diff options
author | jthorn <jthorn@f88db872-0e4f-0410-b76b-b9085cfa78c5> | 2002-09-20 16:08:12 +0000 |
---|---|---|
committer | jthorn <jthorn@f88db872-0e4f-0410-b76b-b9085cfa78c5> | 2002-09-20 16:08:12 +0000 |
commit | 87b9db6fc5132b943484b4c75439d95516812893 (patch) | |
tree | 10a2a54dfb5c53e30dce203a02aa907f7ca2e520 /src/elliptic | |
parent | 6d42c1ece21804916e8150ea9c43fbc3317a5715 (diff) |
* add #include of "config.hh" so we know what Jacobian types are configured
* change C++ to C-style comments on #endif lines
git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinAnalysis/AHFinderDirect/trunk@757 f88db872-0e4f-0410-b76b-b9085cfa78c5
Diffstat (limited to 'src/elliptic')
-rw-r--r-- | src/elliptic/gecon_wrapper.F77 | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/src/elliptic/gecon_wrapper.F77 b/src/elliptic/gecon_wrapper.F77 index 962dec1..eda57aa 100644 --- a/src/elliptic/gecon_wrapper.F77 +++ b/src/elliptic/gecon_wrapper.F77 @@ -12,6 +12,8 @@ c norm_int = (in) 0 ==> infinity-norm c 1 ==> 1-norm c +#include "config.hh" + #ifdef HAVE_DENSE_JACOBIAN subroutine sgecon_wrapper(norm_int, $ N, A, LDA, anorm, rcond, @@ -32,7 +34,7 @@ c end if return end -#endif // HAVE_DENSE_JACOBIAN +#endif /* HAVE_DENSE_JACOBIAN */ #ifdef HAVE_DENSE_JACOBIAN subroutine dgecon_wrapper(norm_int, @@ -54,4 +56,4 @@ c end if return end -#endif // HAVE_DENSE_JACOBIAN +#endif /* HAVE_DENSE_JACOBIAN */ |