Changeset 3217 for LMDZ6/trunk/libf/phylmd/phys_output_ctrlout_mod.F90

Timestamp:

Feb 16, 2018, 5:37:49 PM (7 years ago)

Author:

Laurent Fairhead

Message:

Error in previous modification

File:

• LMDZ6/trunk/libf/phylmd/phys_output_ctrlout_mod.F90 (modified) (1 diff)

LMDZ6/trunk/libf/phylmd/phys_output_ctrlout_mod.F90

@@ -335 +335 @@
     'rain_fall', 'Precip Totale liq', 'kg/(s*m2)', (/ ('', i=1, 10) /))
   TYPE(ctrl_out), SAVE :: o_rain_con = ctrl_out((/ 7, 7, 7, 10, 7, 10, 11, 11, 11, 11/), &
-    'rain_fall', 'Precip liq conv.', 'kg/(s*m2)', (/ ('', i=1, 10) /))
+    'rain_con', 'Precip liq conv.', 'kg/(s*m2)', (/ ('', i=1, 10) /))
   TYPE(ctrl_out), SAVE :: o_precip = ctrl_out((/ 1, 1, 1, 10, 5, 10, 11, 11, 11, 11/), &
     'precip', 'Precip Totale liq+sol', 'kg/(s*m2)', (/ ('', i=1, 10) /))