Changeset 3873
- Timestamp:
- Apr 19, 2021, 5:06:51 PM (4 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ6/trunk/libf/phylmd/phys_output_ctrlout_mod.F90
r3857 r3873 582 582 TYPE(ctrl_out), SAVE, DIMENSION(4) :: o_evappot_srf = (/ & 583 583 ctrl_out((/ 1, 6, 10, 10, 10, 10, 11, 11, 11, 11/),'evappot_ter', & 584 " Temperature"//clnsurf(1),"K", (/ ('', i=1, 10) /)), &584 "Potential evaporation "//clnsurf(1),"kg/(m2*s)", (/ ('', i=1, 10) /)), & 585 585 ctrl_out((/ 4, 6, 10, 10, 10, 10, 11, 11, 11, 11/),'evappot_lic', & 586 " Temperature"//clnsurf(2),"K", (/ ('', i=1, 10) /)), &586 "Potential evaporation "//clnsurf(2),"kg/(m2*s)", (/ ('', i=1, 10) /)), & 587 587 ctrl_out((/ 4, 6, 10, 10, 10, 10, 11, 11, 11, 11/),'evappot_oce', & 588 " Temperature"//clnsurf(3),"K", (/ ('', i=1, 10) /)), &588 "Potential evaporation "//clnsurf(3),"kg/(m2*s)", (/ ('', i=1, 10) /)), & 589 589 ctrl_out((/ 4, 6, 10, 10, 10, 10, 11, 11, 11, 11/),'evappot_sic', & 590 " Temperature"//clnsurf(4),"K", (/ ('', i=1, 10) /)) /)590 "Potential evaporation "//clnsurf(4),"kg/(m2*s)", (/ ('', i=1, 10) /)) /) 591 591 592 592 TYPE(ctrl_out), SAVE, DIMENSION(4) :: o_sens_srf = (/ &
Note: See TracChangeset
for help on using the changeset viewer.