diff options
Diffstat (limited to 'src/Extract.F')
| -rw-r--r-- | src/Extract.F | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/Extract.F b/src/Extract.F index 49d0ba9..5d9053b 100644 --- a/src/Extract.F +++ b/src/Extract.F @@ -698,7 +698,8 @@ c Get the output directory sorted out 101 format(a1,a14) call Extract_Advertise(cctkGH,fullname) else - OPEN(UNIT=filehandle,FILE=fullname,STATUS="old",POSITION="append") + OPEN(UNIT=filehandle,FILE=fullname,STATUS="old", + . POSITION="append") end if |