Changeset 5601 for LMDZ6/branches/contrails/libf/phylmd/dyn1d/scm.f90
- Timestamp:
- Apr 2, 2025, 4:04:40 PM (2 months ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ6/branches/contrails/libf/phylmd/dyn1d/scm.f90
r5450 r5601 18 18 zgam, zmax0, zmea, zpic, zsig, & 19 19 zstd, zthe, zval, ale_bl, ale_bl_trig, alp_bl, & 20 ql_ancien, qs_ancien, qbs_ancien, cf_ancien, rvc_ancien, & 20 ql_ancien, qs_ancien, qbs_ancien, & 21 cf_ancien, qvc_ancien, cfa_ancien, qta_ancien, & 21 22 prlw_ancien, prsw_ancien, prbsw_ancien, prw_ancien, & 22 23 u10m,v10m,ale_wake,ale_bl_stat, ratqs_inter_ … … 614 615 IF ( ok_ice_supersat ) THEN 615 616 cf_ancien = 0. 616 rvc_ancien = 0. 617 qvc_ancien = 0. 618 ENDIF 619 IF ( ok_plane_contrail ) THEN 620 cfa_ancien = 0. 621 qta_ancien = 0. 617 622 ENDIF 618 623 rain_fall=0.
Note: See TracChangeset
for help on using the changeset viewer.