Changeset 4629 for LMDZ6/trunk/libf


Ignore:
Timestamp:
Jul 13, 2023, 4:46:24 PM (17 months ago)
Author:
dcugnet
Message:

Fix for r4625

Location:
LMDZ6/trunk/libf
Files:
2 edited

Legend:

Unmodified
Added
Removed

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

    r4627 r4629  
    48534853!      ecmwf routine METHOX
    48544854       CALL METHOX(1,klon,klon,klev,q_seri,d_q_ch4,pplay)
    4855 #end if
     4855#endif
    48564856       ! ajout de la tendance d'humidite due au methane
    48574857       d_q_ch4_dtime(:,:) = d_q_ch4(:,:)*phys_tstep

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

    r4628 r4629  
    61506150!      ecmwf routine METHOX
    61516151       CALL METHOX(1,klon,klon,klev,q_seri,d_q_ch4,pplay)
    6152 #end if
     6152#endif
    61536153       ! ajout de la tendance d'humidite due au methane
    61546154       d_q_ch4_dtime(:,:) = d_q_ch4(:,:)*phys_tstep
Note: See TracChangeset for help on using the changeset viewer.