Author: ligut2am
Date: Thu Sep 11 17:11:05 2014
New Revision: 4765
URL: http://svn.gna.org/viewcvs/getfem?rev=4765&view=rev
Log:
minor fix
Modified:
trunk/getfem/interface/src/gf_linsolve.cc
Modified: trunk/getfem/interface/src/gf_linsolve.cc
URL:
http://svn.gna.org/viewcvs/getfem/trunk/getfem/interface/src/gf_linsolve.cc?rev=4765&r1=4764&r2=4765&view=diff
==============================================================================
--- trunk/getfem/interface/src/gf_linsolve.cc (original)
+++ trunk/getfem/interface/src/gf_linsolve.cc Thu Sep 11 17:11:05 2014
@@ -96,6 +96,7 @@
out.pop().from_scalar(rcond ? 1./rcond : 0.);
}
+#if defined(GMM_USES_MUMPS) || defined(HAVE_DMUMPS_C_H)
template <typename T> static void
mumps_solver(gsparse &gsp,
getfemint::mexargs_in& in, getfemint::mexargs_out& out, T) {
@@ -104,6 +105,7 @@
gsp.to_csc();
gmm::MUMPS_solve(gsp.csc(T()),x,b);
}
+#endif
/*@GFDOC
Various linear system solvers.
@@ -202,6 +204,7 @@
else superlu_solver(gsp, in, out, scalar_type());
);
+#if defined(GMM_USES_MUMPS) || defined(HAVE_DMUMPS_C_H)
/*@FUNC @CELL{U, cond} = ('mumps', @tsp M, @vec b)
Solve `M.U = b` using the MUMPS solver.@*/
sub_command
@@ -213,6 +216,7 @@
if (gsp.is_complex()) mumps_solver(gsp, in, out, complex_type());
else mumps_solver(gsp, in, out, scalar_type());
);
+#endif
}
_______________________________________________
Getfem-commits mailing list
[email protected]
https://mail.gna.org/listinfo/getfem-commits
