Changeset 3165 for LMDZ6/trunk/libf/phylmd/phys_output_ctrlout_mod.F90
- Timestamp:
- Jan 29, 2018, 3:54:04 PM (7 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ6/trunk/libf/phylmd/phys_output_ctrlout_mod.F90
r3125 r3165 963 963 TYPE(ctrl_out), SAVE :: o_rh2m = ctrl_out((/ 5, 5, 10, 10, 10, 10, 11, 11, 11, 11/), & 964 964 'rh2m', 'Relative humidity at 2m', '%', (/ ('', i=1, 10) /)) 965 TYPE(ctrl_out), SAVE :: o_rh2m_min = ctrl_out((/ 10, 5, 10, 10, 10, 10, 11, 11, 11, 11/), &966 'rh2m_min', 'Min Relative humidity at 2m', '%', &967 (/ 't_min(X)', 't_min(X)', 't_min(X)', 't_min(X)', 't_min(X)', &968 't_min(X)', 't_min(X)', 't_min(X)', 't_min(X)', 't_min(X)' /))969 TYPE(ctrl_out), SAVE :: o_rh2m_max = ctrl_out((/ 10, 5, 10, 10, 10, 10, 11, 11, 11, 11/), &970 'rh2m_max', 'Max Relative humidity at 2m', '%', &971 (/ 't_max(X)', 't_max(X)', 't_max(X)', 't_max(X)', 't_max(X)', &972 't_max(X)', 't_max(X)', 't_max(X)', 't_max(X)', 't_max(X)' /))965 ! TYPE(ctrl_out), SAVE :: o_rh2m_min = ctrl_out((/ 10, 5, 10, 10, 10, 10, 11, 11, 11, 11/), & 966 ! 'rh2m_min', 'Min Relative humidity at 2m', '%', & 967 ! (/ 't_min(X)', 't_min(X)', 't_min(X)', 't_min(X)', 't_min(X)', & 968 ! 't_min(X)', 't_min(X)', 't_min(X)', 't_min(X)', 't_min(X)' /)) 969 ! TYPE(ctrl_out), SAVE :: o_rh2m_max = ctrl_out((/ 10, 5, 10, 10, 10, 10, 11, 11, 11, 11/), & 970 ! 'rh2m_max', 'Max Relative humidity at 2m', '%', & 971 ! (/ 't_max(X)', 't_max(X)', 't_max(X)', 't_max(X)', 't_max(X)', & 972 ! 't_max(X)', 't_max(X)', 't_max(X)', 't_max(X)', 't_max(X)' /)) 973 973 TYPE(ctrl_out), SAVE :: o_qsat2m = ctrl_out((/ 10, 5, 10, 10, 10, 10, 11, 11, 11, 11/), & 974 974 'qsat2m', 'Saturant humidity at 2m', '%', (/ ('', i=1, 10) /))
Note: See TracChangeset
for help on using the changeset viewer.