Changeset 1928 for LMDZ4/branches/LMDZ4_AR5/libf/cosp/write_histmthCOSP.h
- Timestamp:
- Jan 16, 2014, 1:43:34 PM (11 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ4/branches/LMDZ4_AR5/libf/cosp/write_histmthCOSP.h
r1535 r1928 38 38 CALL histwrite_phy(nid_mth_cosp,lCOSP,"parasol_refl", & 39 39 itau_wcosp,stlidar%parasolrefl) 40 CALL histwrite_phy(nid_mth_cosp,lCOSP,"parasol_crefl", & 41 itau_wcosp,parasolcrefl) 42 CALL histwrite_phy(nid_mth_cosp,lCOSP,"Ncrefl", & 43 itau_wcosp,Ncref) 40 44 endif 41 45 if (cfg%Latb532) then … … 91 95 ! Sorties ISCCP 92 96 if (cfg%Lisccp_sim) then 97 CALL histwrite_phy(nid_mth_cosp,lCOSP,"sunlit",itau_wcosp,gbx%sunlit) 93 98 if (cfg%Lclisccp2) then 94 99 do ii=1,7
Note: See TracChangeset
for help on using the changeset viewer.