Changeset 2140 for trunk/LMDZ.MARS/util/zrecast.F90

Timestamp:

Jun 1, 2019, 10:34:01 PM (5 years ago)

Author:

emillour

Message:

Mars GCM utilities:
Very minor syntax fixes for picky recent gfortran compilers.
EM

File:

• trunk/LMDZ.MARS/util/zrecast.F90 (modified) (2 diffs)

trunk/LMDZ.MARS/util/zrecast.F90

@@ -1447 +1447 @@
     if (ierr.ne.NF_NOERR) then
       write(*,*) "Error failed to copy long_name attribute:",trim(text)
-      stop""
+      stop ""
     endif
   endif
@@ -1461 +1461 @@
     if (ierr.ne.NF_NOERR) then
       write(*,*) "Error failed to copy units attribute:",trim(text)
-      stop""
+      stop ""
     endif
   endif