Changeset 506 for trunk


Ignore:
Timestamp:
Jan 25, 2012, 4:40:46 PM (13 years ago)
Author:
acolaitis
Message:

Minor correction on a diagnostic variable introduced in a commit a while ago

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/LMDZ.MARS/libf/phymars/physiq.F

    r499 r506  
    12911291       DO ig=1,ngridmx
    12921292          DO l=1,nlayermx
    1293               zh(ig,l) = zt(ig,l)*(zplay(ig,l)/zplev(ig,1))**rcp
     1293              zh(ig,l) = zt(ig,l)*(zplev(ig,1)/zplay(ig,l))**rcp
    12941294          ENDDO
    12951295       ENDDO
Note: See TracChangeset for help on using the changeset viewer.