Ignore:
Timestamp:
Jan 24, 2012, 6:31:51 PM (13 years ago)
Author:
acolaitis
Message:

Mesoscale/Les?. Added improvments to mode 21. Corrected variable names for new subgrid gustiness definitions.

File:
1 edited

Legend:

Unmodified
Added
Removed

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

    r485 r503  
    13031303      ENDDO
    13041304      IF(lctindex .eq. 0) print*, 'probleme index'
    1305         ziindex=zipbl(lctindex)
     1305        IF ((zilct(lctindex) .gt. 12.) .and.( zilct(lctindex) .lt. 18)) THEN
     1306            ziindex=MAX(0.,zipbl(lctindex)-7.)
     1307        ELSE
     1308            ziindex=0.
     1309        ENDIF
    13061310ENDIF
    13071311
Note: See TracChangeset for help on using the changeset viewer.