Changeset 3954 for trunk/LMDZ.VENUS/libf/phyvenus/physiq_mod.F
- Timestamp:
- Nov 6, 2025, 4:06:36 PM (3 months ago)
- File:
-
- 1 edited
-
trunk/LMDZ.VENUS/libf/phyvenus/physiq_mod.F (modified) (2 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/LMDZ.VENUS/libf/phyvenus/physiq_mod.F
r3911 r3954 234 234 REAL Fsedim(klon,klev+1) ! Flux de sedimentation (kg.m-2) 235 235 236 EXTERNAL moldiff_MPF 236 237 237 238 c … … 1670 1671 IF (callthermos .and. ok_chem) THEN 1671 1672 1672 call moldiff_red(klon, klev, nqmax, 1673 !---------------------------------------- 1674 ! VCD 2.0 1675 1676 ! call moldiff_red(klon, klev, nqmax, 1677 ! & pplay,paprs,t_seri, tr_seri, pdtphys, 1678 ! & d_t_euv,d_t_conduc,d_q_moldif) 1679 1680 !---------------------------------------- 1681 ! VCD 2.4 1682 1683 call moldiff_MPF(klon, klev, nqmax, 1673 1684 & pplay,paprs,t_seri, tr_seri, pdtphys, 1674 1685 & d_t_euv,d_t_conduc,d_q_moldif) 1675 1676 1686 1677 1687 ! --- update tendencies tracers ---
Note: See TracChangeset
for help on using the changeset viewer.
