Changeset 4083 for LMDZ6/trunk


Ignore:
Timestamp:
Feb 28, 2022, 7:49:55 PM (2 years ago)
Author:
Laurent Fairhead
Message:

Correcting a bug introduced in r4059
LF/OB

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ6/trunk/libf/phylmd/physiq_mod.F90

    r4071 r4083  
    51045104          d_qx(i,k,iliq) = ( ql_seri(i,k) - qx(i,k,iliq) ) / phys_tstep
    51055105          !CR: on ajoute le contenu en glace
    5106           IF (nqo.gt.3) THEN
     5106          IF (nqo.ge.3) THEN
    51075107             d_qx(i,k,isol) = ( qs_seri(i,k) - qx(i,k,isol) ) / phys_tstep
    51085108          ENDIF
Note: See TracChangeset for help on using the changeset viewer.