diff options
| author | diener <diener@89daf98e-ef62-4674-b946-b8ff9de2216c> | 2003-11-05 20:31:57 +0000 |
|---|---|---|
| committer | diener <diener@89daf98e-ef62-4674-b946-b8ff9de2216c> | 2003-11-05 20:31:57 +0000 |
| commit | 5c2e8c71ff02174ae7d9f5d5de9b7c2e4b843415 (patch) | |
| tree | 45e17a91be46190d8c447110d081d6cc2f4f8661 /src/AHFinder_dis.F | |
| parent | 7ce729799d3bf56ea66b14c93e14023b342b77d6 (diff) | |
Slight formatting changes to make the red hat C preprocessor work without
any special options.
git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinAnalysis/AHFinder/trunk@359 89daf98e-ef62-4674-b946-b8ff9de2216c
Diffstat (limited to 'src/AHFinder_dis.F')
| -rw-r--r-- | src/AHFinder_dis.F | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/src/AHFinder_dis.F b/src/AHFinder_dis.F index f0516a5..44b3bfd 100644 --- a/src/AHFinder_dis.F +++ b/src/AHFinder_dis.F @@ -8,9 +8,10 @@ @@*/ #include "cctk.h" -#include "cctk_Parameters.h" + #include "cctk_Arguments.h" #include "cctk_Functions.h" +#include "cctk_Parameters.h" subroutine AHFinder_dis(CCTK_ARGUMENTS) @@ -594,7 +595,7 @@ ! *** OUTPUT *** ! ****************** - 100 continue + 100 continue disf = filestr(1:nfile) // "/ahf_d12" // ".tl" if (myproc.eq.0) then |