Changeset 162 in lmdz_wrf


Ignore:
Timestamp:
Aug 8, 2014, 12:08:12 PM (10 years ago)
Author:
lfita
Message:

Fixing printing of 'thresvalue'

Location:
branches/LMDZ_WRFmeas_develop/WRFV3/lmdz
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • branches/LMDZ_WRFmeas_develop/WRFV3/lmdz/diagphy_mod.F90

    r160 r162  
    445445    PRINT *,TRIM(errmsg)
    446446    PRINT *,"  at '" // TRIM(funcn) // "' variable '" //TRIM(varn)//                 &
    447       "' is wrong (threshold: ',thresvalue,') in Nvalues= ",wrongi,                  &
     447      "' is wrong (threshold: ",thresvalue,") in Nvalues= ",wrongi,                  &
    448448      ' at i (x,y) k value___'
    449449    DO i=1,wrongi
  • branches/LMDZ_WRFmeas_develop/WRFV3/lmdz/physiq.F90

    r161 r162  
    48024802    PRINT *,TRIM(errmsg)
    48034803    PRINT *,"  at '" // TRIM(funcn) // "' variable '" //TRIM(varn)//                 &
    4804       "' is wrong (threshold: ',thresvalue,') in Nvalues= ",wrongi,                  &
     4804      "' is wrong (threshold: ",thresvalue,") in Nvalues= ",wrongi,                  &
    48054805      ' at i (x,y) k value___'
    48064806    DO i=1,wrongi
Note: See TracChangeset for help on using the changeset viewer.