Changeset 4079 for trunk/LMDZ.GENERIC/libf/phygeneric/rain.F90

Timestamp:

Feb 19, 2026, 9:22:06 PM (9 days ago)

Author:

mturbet

Message:

minor renaming commit

File:

• trunk/LMDZ.GENERIC/libf/phygeneric/rain.F90 (modified) (2 diffs)

trunk/LMDZ.GENERIC/libf/phygeneric/rain.F90

@@ -4 +4 @@
   use ioipsl_getin_p_mod, only: getin_p
   use watercommon_h, only: T_h2O_ice_liq,T_h2O_ice_clouds, RLVTT, RCPD, RCPV, RW, RVTMP2,Psat_water,Tsat_water,rhowater
-  use aerosol_radius, only: h2o_cloudrad
+  use aerosol_radius, only: aerosol_radius_h2o_liquid_ice_separate
   USE tracer_h, only: igcm_h2o_vap, igcm_h2o_ice
   use comcstfi_mod, only: g, r
@@ -278 +278 @@
 
  !recalculate liquid water particle radii
-           call h2o_cloudrad(ngrid,nlayer,ql,reffh2oliq,reffh2oice)
+           call aerosol_radius_h2o_liquid_ice_separate(ngrid,nlayer,ql,reffh2oliq,reffh2oice)
 
            SELECT CASE(precip_scheme)