Changeset 2799 for LMDZ5/trunk/libf/phylmd/YOETHF.h

Timestamp:

Feb 24, 2017, 7:50:33 PM (7 years ago)

Author:

jyg

Message:

New diagnostics to verify energy conservation.
Some corrections to improve energy conservation.
Some bug correction.

New output variables and new flags are

introduced:

(1)New variables: d_xx_col is the budget over

each column of variable "xx".

(2) fl_ebil: 0 -> no diag; 1 -> diags activated
(3) fl_cor_ebil: 0 -> no correction ensuring

energy conservation; 1 -> first set of
corrections.

+ ok_bad_ecmwf_thermo: if true, a bug setting

RVTMP2 to 0 is fixed; for backward compatibility
the default is "false".

File:

• LMDZ5/trunk/libf/phylmd/YOETHF.h (modified) (2 diffs)

LMDZ5/trunk/libf/phylmd/YOETHF.h

@@ -19 +19 @@
       REAL R5ALVCP,R5ALSCP,RALVDCP,RALSDCP,RALFDCP,RTWAT,RTBER,RTBERCU
       REAL RTICE,RTICECU,RTWAT_RTICE_R,RTWAT_RTICECU_R,RKOOP1,RKOOP2
+      LOGICAL OK_BAD_ECMWF_THERMO ! If TRUE, then variables set by rrtm/suphec.F90
+                                  ! If FALSE, then variables set by suphel.F90
       COMMON /YOETHF/R2ES, R3LES, R3IES, R4LES, R4IES, R5LES, R5IES,    &
      &               RVTMP2, RHOH2O,                                    &
@@ -24 +26 @@
      &               RALFDCP,RTWAT,RTBER,RTBERCU,                       &
      &               RTICE,RTICECU,RTWAT_RTICE_R,RTWAT_RTICECU_R,RKOOP1,&
-     &               RKOOP2
+     &               RKOOP2,                                            &
+     &               OK_BAD_ECMWF_THERMO
 
 !$OMP THREADPRIVATE(/YOETHF/)