Ignore:
Timestamp:
Mar 8, 2021, 3:37:48 PM (3 years ago)
Author:
acozic
Message:

merge with rev 3860

File:
1 edited

Legend:

Unmodified
Added
Removed

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

    r3856 r3861  
    47804780    ELSE
    47814781       sh_in(:,:) = qx(:,:,ivap)
    4782        ch_in(:,:) = qx(:,:,iliq)
     4782       IF (nqo .EQ. 3) THEN
     4783          ch_in(:,:) = qx(:,:,iliq) + qx(:,:,isol)
     4784       ELSE
     4785          ch_in(:,:) = qx(:,:,iliq)
     4786       ENDIF
    47834787    ENDIF
    47844788
Note: See TracChangeset for help on using the changeset viewer.