Changeset 4079 for trunk/LMDZ.GENERIC/libf/phygeneric/aerosol_radius.F90
- Timestamp:
- Feb 19, 2026, 9:22:06 PM (2 weeks ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/LMDZ.GENERIC/libf/phygeneric/aerosol_radius.F90
r4077 r4079 190 190 191 191 !================================================================== 192 subroutine h2o_reffrad(ngrid,nlayer,pq,pt,reffrad,nueffrad)193 !================================================================== 194 ! Purpose 195 ! ------- 196 ! Compute the effective radii of liquid and icy water particles192 subroutine aerosol_radius_h2o_liquid_ice_mixture(ngrid,nlayer,pq,pt,reffrad,nueffrad) 193 !================================================================== 194 ! Purpose 195 ! ------- 196 ! Compute the effective radii of the mixture of liquid and icy water particles. 197 197 ! 198 198 ! Authors … … 246 246 nueffrad(1:ngrid,1:nlayer)=nueff_iaero_h2o 247 247 248 end subroutine h2o_reffrad249 !================================================================== 250 251 252 !================================================================== 253 subroutine h2o_cloudrad(ngrid,nlayer,pql,reffliq,reffice)254 !================================================================== 255 ! Purpose 256 ! ------- 257 ! Compute the effective radii of liquid and icy water particles 248 end subroutine aerosol_radius_h2o_liquid_ice_mixture 249 !================================================================== 250 251 252 !================================================================== 253 subroutine aerosol_radius_h2o_liquid_ice_separate(ngrid,nlayer,pql,reffliq,reffice) 254 !================================================================== 255 ! Purpose 256 ! ------- 257 ! Compute the effective radii of liquid and icy water particles independently. 258 258 ! 259 259 ! Authors … … 290 290 endif 291 291 292 end subroutine h2o_cloudrad292 end subroutine aerosol_radius_h2o_liquid_ice_separate 293 293 !================================================================== 294 294
Note: See TracChangeset
for help on using the changeset viewer.
