Changeset 3216 for LMDZ6/trunk/libf


Ignore:
Timestamp:
Feb 16, 2018, 5:35:02 PM (7 years ago)
Author:
Laurent Fairhead
Message:

Corrections for Data request

Location:
LMDZ6/trunk/libf/phylmd
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • LMDZ6/trunk/libf/phylmd/phys_output_ctrlout_mod.F90

    r3208 r3216  
    334334  TYPE(ctrl_out), SAVE :: o_rain_fall = ctrl_out((/ 1, 1, 1, 10, 5, 10, 11, 11, 11, 11/), &
    335335    'rain_fall', 'Precip Totale liq', 'kg/(s*m2)', (/ ('', i=1, 10) /))
     336  TYPE(ctrl_out), SAVE :: o_rain_con = ctrl_out((/ 7, 7, 7, 10, 7, 10, 11, 11, 11, 11/), &
     337    'rain_fall', 'Precip liq conv.', 'kg/(s*m2)', (/ ('', i=1, 10) /))
    336338  TYPE(ctrl_out), SAVE :: o_precip = ctrl_out((/ 1, 1, 1, 10, 5, 10, 11, 11, 11, 11/), &
    337339    'precip', 'Precip Totale liq+sol', 'kg/(s*m2)', (/ ('', i=1, 10) /))

  • LMDZ6/trunk/libf/phylmd/phys_output_write_mod.F90

    r3208 r3216  
    705705       ENDIF
    706706       CALL histwrite_phy(o_pluc, zx_tmp_fi2d)
     707       CALL histwrite_phy(o_rain_con, rain_con)
    707708       CALL histwrite_phy(o_snow, snow_fall)
    708709       CALL histwrite_phy(o_msnow, zxsnow)
Note: See TracChangeset for help on using the changeset viewer.