Changeset 1867 for trunk/MESOSCALE/LMD_MM_MARS/SRC/WRFV2/mars_lmd/libf

Timestamp:

Dec 19, 2017, 12:00:20 AM (7 years ago)

Author:

aslmd

Message:

in mesoscale old physics, corrected runtime errors with picky compilers such as gfortran

File:

• trunk/MESOSCALE/LMD_MM_MARS/SRC/WRFV2/mars_lmd/libf/bibio/lnblnk.F (modified) (1 diff)

trunk/MESOSCALE/LMD_MM_MARS/SRC/WRFV2/mars_lmd/libf/bibio/lnblnk.F

@@ -22 +22 @@
       INTEGER i,imax
       PARAMETER (imax = 256)
-      CHARACTER*256 letter
+      CHARACTER(len=*) letter
 
       i=0