Changeset 4575 for LMDZ6/trunk/libf/phylmd/physiq_mod.F90

Timestamp:

Jun 14, 2023, 5:06:15 PM (12 months ago)

Author:

Laurent Fairhead

Message:

Sortir les profils de flux sensible et d'eau dus à la diffusion turbulente (déja calculés auparavant)
FC

File:

• LMDZ6/trunk/libf/phylmd/physiq_mod.F90 (modified) (2 diffs)

LMDZ6/trunk/libf/phylmd/physiq_mod.F90

@@ -323 +323 @@
        beta_prec,  &
        rneb,  &
-       zxsnow,snowhgt,qsnow,to_ice,sissnow,runoff,albsol3_lic
+       zxsnow,snowhgt,qsnow,to_ice,sissnow,runoff,albsol3_lic, &
+       zxfluxt,zxfluxq 
        !
       USE output_physiqex_mod, ONLY: output_physiqex
@@ -844 +845 @@
     REAL fluxqbs(klon,klev, nbsrf)   ! flux turbulent de neige soufflee
     !
-    REAL zxfluxt(klon, klev)
-    REAL zxfluxq(klon, klev)
+    !FC    REAL zxfluxt(klon, klev)
+    !FC    REAL zxfluxq(klon, klev)
     REAL zxfluxqbs(klon,klev)
     REAL zxfluxu(klon, klev)