Changeset 1310 for trunk/LMDZ.VENUS/libf/phyvenus/write_histins.h

Timestamp:

Jul 10, 2014, 5:59:16 PM (11 years ago)

Author:

slebonnois

Message:

SL: VENUS VERTICAL EXTENSION. NLTE and thermospheric processes, to be run with 78 levels and specific inputs.

File:

• trunk/LMDZ.VENUS/libf/phyvenus/write_histins.h (modified) (1 diff)

trunk/LMDZ.VENUS/libf/phyvenus/write_histins.h

@@ -104 +104 @@
       call histwrite_phy(nid_ins,.false.,"dtajs",itau_w,d_t_ajs)
 c en K/s      
-      call histwrite_phy(nid_ins,.false.,"dtswr",itau_w,heat)
+      call histwrite_phy(nid_ins,.false.,"dtswr",itau_w,dtsw)
 c en K/s      
-      call histwrite_phy(nid_ins,.false.,"dtlwr",itau_w,-1.*cool)
+      call histwrite_phy(nid_ins,.false.,"dtlwr",itau_w,dtlw)
 c en K/s      
 c     call histwrite_phy(nid_ins,.false.,"dtec",itau_w,d_t_ec)