diff options
| author | tradke <tradke@89daf98e-ef62-4674-b946-b8ff9de2216c> | 2001-10-12 12:49:02 +0000 |
|---|---|---|
| committer | tradke <tradke@89daf98e-ef62-4674-b946-b8ff9de2216c> | 2001-10-12 12:49:02 +0000 |
| commit | 270986d55dba30624c2cf5f9212257585530811c (patch) | |
| tree | 2c47c54d50f946080eb02e122a973048e0978905 /src/AHFinder_dis.F | |
| parent | 09c65736ef6f31258543609bea417ebee783255f (diff) | |
Fixed some statements which seem to be non-standard (eg. exceeding 72 chars
per source line - this couldn't be broken into another continuation line
by the perl preprocessor when it was in the middle of a keyword).
git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinAnalysis/AHFinder/trunk@250 89daf98e-ef62-4674-b946-b8ff9de2216c
Diffstat (limited to 'src/AHFinder_dis.F')
| -rw-r--r-- | src/AHFinder_dis.F | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/AHFinder_dis.F b/src/AHFinder_dis.F index 271d697..bd98e68 100644 --- a/src/AHFinder_dis.F +++ b/src/AHFinder_dis.F @@ -309,7 +309,8 @@ open(1,file=disf,form='formatted',status='replace') write(1,"(A14)") '" Horizon distance' else - open(1,file=disf,form='formatted',status='old',position='append') + open(1,file=disf,form='formatted',status='old', + . position='append') end if write(1,"(2ES14.6)") cctk_time,d12 |