diff options
author | allen <allen@89daf98e-ef62-4674-b946-b8ff9de2216c> | 1999-09-24 08:57:07 +0000 |
---|---|---|
committer | allen <allen@89daf98e-ef62-4674-b946-b8ff9de2216c> | 1999-09-24 08:57:07 +0000 |
commit | 27d6f112a588ddaeb048c0c5f992e9c6d18e033d (patch) | |
tree | 1606720b430f0e72c624db2805a4632a6c03c331 /src/AHFinder_dat.F | |
parent | 44673801ab613c6a99e9fa81ae297f2616f91c4e (diff) |
Removed ' in comments for preprocessor, removed ifdef MPIs, fixed
couple of compiler complaints
git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinAnalysis/AHFinder/trunk@13 89daf98e-ef62-4674-b946-b8ff9de2216c
Diffstat (limited to 'src/AHFinder_dat.F')
-rw-r--r-- | src/AHFinder_dat.F | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/src/AHFinder_dat.F b/src/AHFinder_dat.F index c765baf..4bcce98 100644 --- a/src/AHFinder_dat.F +++ b/src/AHFinder_dat.F @@ -35,7 +35,6 @@ c@@*/ integer nprocs,myproc integer ierr - CCTK_REAL dx,dy,dz CCTK_REAL xc,yc,zc CCTK_REAL xc_old,yc_old,zc_old CCTK_REAL intexp,intexp2,intexpdel2,intarea @@ -116,9 +115,9 @@ c@@*/ ! cc(l,m) Coefficients of LEGEN(l,m,cos(theta))*cos(m*phi) ! cs(l,m) Coefficients of LEGEN(l,m,cos(theta))*sin(m*phi) ! -! hflow* Spectral components for `H' flow. -! cflow* Spectral components for `C' flow. -! nflow* Spectral components for `N' flow. +! hflow* Spectral components for "H" flow. +! cflow* Spectral components for "C" flow. +! nflow* Spectral components for "N" flow. ! ! interror1 Different from zero if radius is negative. ! interror2 Different from zero if outside computational domain. |