diff options
author | ryoji <ryoji@971fb155-194f-0410-9daf-e2eca44e59f5> | 2001-01-05 10:55:26 +0000 |
---|---|---|
committer | ryoji <ryoji@971fb155-194f-0410-9daf-e2eca44e59f5> | 2001-01-05 10:55:26 +0000 |
commit | aecbe577d91d470181488169ea26bb1dc5df6050 (patch) | |
tree | 1c6d245633b746f967852a75793a4bfcc5fe806a /src | |
parent | badf769257939b25d698d16f5616eb40ad3860a0 (diff) |
add pughreduce.
git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinInitialData/DistortedBHIVP/trunk@17 971fb155-194f-0410-9daf-e2eca44e59f5
Diffstat (limited to 'src')
-rw-r--r-- | src/Stab3d.F | 3 |
1 files changed, 0 insertions, 3 deletions
diff --git a/src/Stab3d.F b/src/Stab3d.F index dd8292e..f8ca5e0 100644 --- a/src/Stab3d.F +++ b/src/Stab3d.F @@ -237,9 +237,6 @@ c rnorm = sum(r**2) rnorm=sqrt(rnorm) if (rnorm .gt. tol) goto 1 - print*,'-----------' - write(*,*) "ncyc=",kk - print*,'-----------------------------------------------------------' return end c |