Changeset 3575 for LMDZ6/trunk/libf/phylmd/dyn1d/old_lmdz1d.F90

Timestamp:

Oct 7, 2019, 11:48:33 AM (5 years ago)

Author:

fhourdin

Message:

Correction suite a la detections de problemes en 1D avec le mode
debug sur jean-zay.

File:

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

LMDZ6/trunk/libf/phylmd/dyn1d/old_lmdz1d.F90

@@ -18 +18 @@
        zgam, zmax0, zmea, zpic, zsig, &
        zstd, zthe, zval, ale_bl, ale_bl_trig, alp_bl, ql_ancien, qs_ancien, &
-       prlw_ancien, prsw_ancien, prw_ancien
+       prlw_ancien, prsw_ancien, prw_ancien, &
+       u10m,v10m,ale_wake,ale_bl_stat
+
   
    USE dimphy
@@ -910 +912 @@
         u_ancien(1,:)=u(:)
         v_ancien(1,:)=v(:)
+
+u10m=0.
+v10m=0.
+ale_wake=0.
+ale_bl_stat=0.
  
 !------------------------------------------------------------------------