Ignore:
Timestamp:
Nov 22, 2023, 3:46:17 PM (12 months ago)
Author:
lebasn
Message:

Methox: Update comments to correct units + bugfix on output variable

File:
1 edited

Legend:

Unmodified
Added
Removed
  • LMDZ6/trunk/libf/phylmdiso/physiq_mod.F90

    r4745 r4755  
    61966196    !DC Calcul de la tendance due au methane
    61976197    IF (ok_qch4) THEN
    6198 !      d_q_ch4: H2O source in ppmv/sec
     6198!      d_q_ch4: H2O source from CH4 in MMR/s (mass mixing ratio/s or kg H2O/kg air/s)
    61996199#ifdef CPP_StratAer
    62006200       CALL stratH2O_methox(debut,paprs,d_q_ch4)
    62016201#else
    6202 !      ecmwf routine METHOX
     6202!      ECMWF routine METHOX
    62036203       CALL METHOX(1,klon,klon,klev,q_seri,d_q_ch4,pplay)
    62046204#endif
    6205        ! ajout de la tendance d'humidite due au methane
     6205       ! add humidity tendency due to methane
    62066206       d_q_ch4_dtime(:,:) = d_q_ch4(:,:)*phys_tstep
    62076207#ifdef ISO
     
    62146214#endif     
    62156215     &   )
    6216        d_q_ch4(:,:) = d_q_ch4_dtime(:,:)/phys_tstep
    6217 #ifdef ISO
    6218        d_xt_ch4(:,:,:) = d_xt_ch4_dtime(:,:,:)/phys_tstep
     6216       d_q_ch4(:,:) = d_q_ch4_dtime(:,:)/phys_tstep ! update with H2O conserv done in add_phys_tend
     6217#ifdef ISO
     6218       d_xt_ch4(:,:,:) = d_xt_ch4_dtime(:,:,:)/phys_tstep ! update with H2O conserv done in add_phys_tend
    62196219#endif
    62206220    ENDIF
Note: See TracChangeset for help on using the changeset viewer.