aboutsummaryrefslogtreecommitdiff
path: root/src/AHFinder_dat.F
diff options
context:
space:
mode:
authormiguel <miguel@89daf98e-ef62-4674-b946-b8ff9de2216c>2001-01-22 11:57:25 +0000
committermiguel <miguel@89daf98e-ef62-4674-b946-b8ff9de2216c>2001-01-22 11:57:25 +0000
commit3bee885b5616fe2b641a37ea68c3514972175a87 (patch)
tree90184f3a39544010444d2db5c935e7abb5cf2bf4 /src/AHFinder_dat.F
parent41c9a1b15ac878b2b49f2f31c5fdf568a7313121 (diff)
Making the circumferences visible to all routines.
git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinAnalysis/AHFinder/trunk@169 89daf98e-ef62-4674-b946-b8ff9de2216c
Diffstat (limited to 'src/AHFinder_dat.F')
-rw-r--r--src/AHFinder_dat.F9
1 files changed, 7 insertions, 2 deletions
diff --git a/src/AHFinder_dat.F b/src/AHFinder_dat.F
index ea551e5..0851f24 100644
--- a/src/AHFinder_dat.F
+++ b/src/AHFinder_dat.F
@@ -44,6 +44,7 @@
CCTK_REAL xc_old,yc_old,zc_old
CCTK_REAL intexp,intexp2,intexpdel2,intarea
CCTK_REAL rhmax,rhmin
+ CCTK_REAL circ_eq,meri_p1,meri_p2
CCTK_REAL hw,cw,nw
CCTK_REAL dx,dy,dz
@@ -81,9 +82,9 @@
!
! cartoon Are we using cartoon_2d?
!
-! inner Look for inner horizon?
+! inner Look for inner horizon?
!
-! sloppy Sloppy initial guess?
+! sloppy Sloppy initial guess?
!
! offset Is the center offset from the origin?
! wander Do we allow the center to wander?
@@ -129,6 +130,10 @@
! rhmax Maximum radius of horizon.
! rhmin Minimum radius of horizon.
!
+! circ_eq Equatorial circumference.
+! meri_p1 Length of meridian at phi=0.
+! meri_p2 Length of meridian at phi=pi/2.
+!
! c0(l) Coefficients of LEGEN(l,0,cos(theta))
! 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)