Changeset 3523


Ignore:
Timestamp:
May 24, 2019, 8:58:18 AM (5 years ago)
Author:
fhourdin
Message:

Sortie specifique de iflag_con==3

File:
1 edited

Legend:

Unmodified
Added
Removed

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

    r3496 r3523  
    10601060
    10611061          CALL histwrite_phy(o_upwd, upwd)
    1062           CALL histwrite_phy(o_Mipsh, Mipsh)
    10631062          CALL histwrite_phy(o_Ma, Ma)
    10641063          CALL histwrite_phy(o_dnwd, dnwd)
    … …  
    11851184       ! Wakes
    11861185       IF (iflag_con.EQ.3) THEN
     1186          CALL histwrite_phy(o_Mipsh, Mipsh)
    11871187          IF (iflag_wake>=1) THEN
    11881188             CALL histwrite_phy(o_ale_wk, ale_wake)
Note: See TracChangeset for help on using the changeset viewer.