Changeset 4801

Timestamp:

Feb 2, 2024, 7:18:26 PM (4 months ago)

Author:

lguez

Message:

Bug fix: define awake_s in ce0l

awake_s needs to be defined when we read it with phyetat0_get
because we compute its minval and maxval in phyetat0_get.

File:

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

LMDZ6/trunk/libf/dynphy_lonlat/phylmd/etat0phys_netcdf.F90

@@ -49 +49 @@
     prw_ancien, u10m,v10m, treedrg, u_ancien, v_ancien, wake_delta_pbl_TKE, wake_dens, &
     ale_bl, ale_bl_trig, alp_bl, &
-    ale_wake, ale_bl_stat
+    ale_wake, ale_bl_stat, AWAKE_S
 
   USE comconst_mod, ONLY: pi, dtvr
@@ -276 +276 @@
   entr_therm       = 0.
   detr_therm       = 0.
+  awake_s = 0.
 
   CALL fonte_neige_init(run_off_lic_0)