diff options
author | ryoji <ryoji@971fb155-194f-0410-9daf-e2eca44e59f5> | 2000-01-12 17:00:55 +0000 |
---|---|---|
committer | ryoji <ryoji@971fb155-194f-0410-9daf-e2eca44e59f5> | 2000-01-12 17:00:55 +0000 |
commit | 7d1417aaaa1aa7cba3515b006e7d67657bc01b59 (patch) | |
tree | 81683cc486c3047945e68766c7b136a51b5c4397 | |
parent | 6b266c308ed6ed21b401e3a670cc017286d79036 (diff) |
fix typo
Still trouble in alpha
git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinInitialData/DistortedBHIVP/trunk@5 971fb155-194f-0410-9daf-e2eca44e59f5
-rw-r--r-- | src/DistortedBHIVP.F | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/DistortedBHIVP.F b/src/DistortedBHIVP.F index 9682cf4..a9234a5 100644 --- a/src/DistortedBHIVP.F +++ b/src/DistortedBHIVP.F @@ -61,7 +61,7 @@ c Perhaps this and others should go into cctk.h $ o63,o64,o65,o66,o67 real*8 rmax,adm real*8,parameter :: dbh_eps = 1.0d-9 - real*8 r,pi + real*8 pi integer :: nx,ny,nz integer i,j,k,ier,nquads,nocts,order integer npoints,handle,ierror |