Changeset 3577 for LMDZ6/trunk/libf/phylmd/coef_diff_turb_mod.F90

Timestamp:

Oct 7, 2019, 3:30:19 PM (5 years ago)

Author:

fhourdin

Message:

Corrections d'erreurs identifiees en debug ancienne physique sur Jean-Zay
Vive le poihl interactif.

File:

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

LMDZ6/trunk/libf/phylmd/coef_diff_turb_mod.F90

@@ -182 +182 @@
        ycoefh(1:knon,2:klev)=ykmn(1:knon,2:klev)
                 
+    ELSE
+       ! No TKE for Standard Physics
+       yq2=0.
     ENDIF !(iflag_pbl.ge.3)