Ignore:
Timestamp:
Dec 19, 2013, 10:12:49 AM (12 years ago)
Author:
aslmd
Message:

MESOSCALE. corrected an interp bug on surface roughness. added a security check in module_lmd_driver.

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/MESOSCALE/LMD_MM_MARS/SRC/WRFV2/phys/module_lmd_driver.F

    r1038 r1128  
    981981   z0_val = 0.01
    982982ENDIF
     983!!!! ADDITIONAL SECURITY. INTERP+SMOOTH IN GEOGRID MIGHT YIELD NEGATIVE Z0 !!!
     984IF (z0_val < 0.) THEN
     985   PRINT *, 'WELL, z0 is NEGATIVE, this is impossible. better stop here.'
     986   PRINT *, 'advice --> correct interpolation / smoothing of z0 in WPS'
     987   PRINT *, '           -- or check the constant value set in namelist.input'
     988   STOP
     989ENDIF
    983990#endif
    984991
Note: See TracChangeset for help on using the changeset viewer.