Changeset 5455
- Timestamp:
- Dec 23, 2024, 8:29:48 PM (6 hours ago)
- Location:
- LMDZ6/branches/contrails/libf/phylmd
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ6/branches/contrails/libf/phylmd/lmdz_aviation.f90
r5453 r5455 596 596 FUNCTION contrail_cross_section_onera(dz) 597 597 598 USE lmdz_lscp_ini t, ONLY: initial_width_contrails598 USE lmdz_lscp_ini, ONLY: initial_width_contrails 599 599 600 600 IMPLICIT NONE -
LMDZ6/branches/contrails/libf/phylmd/lmdz_lscp.f90
r5453 r5455 418 418 Tcritcont(:,:) = missing_val 419 419 qcritcont(:,:) = missing_val 420 potcontfraP(:,:)= missing_val421 potcontfraNP(:,:)= missing_val420 potcontfraP(:,:)= 0. 421 potcontfraNP(:,:)= 0. 422 422 dcf_avi(:,:) = 0. 423 423 dqi_avi(:,:) = 0.
Note: See TracChangeset
for help on using the changeset viewer.