Changeset 4139 for LMDZ6/trunk/libf/dyn3dmem/gcm.F90

Timestamp:

Apr 28, 2022, 12:21:33 PM (2 years ago)

Author:

acozic

Message:

added (and call) a routine for the calculation of mass flux used in offline mode

File:

• LMDZ6/trunk/libf/dyn3dmem/gcm.F90 (modified) (2 diffs)

LMDZ6/trunk/libf/dyn3dmem/gcm.F90

@@ -395 +395 @@
   !   Initialisation de la physique :
   !   -------------------------------
+
+  !  Choix des frequences de stokage pour le offline
+  !      istdyn=day_step/4     ! stockage toutes les 6h=1jour/4
+  !      istdyn=day_step/12     ! stockage toutes les 2h=1jour/12
+  istdyn=day_step/8     ! stockage toutes les 6h=1jour/12
+  istphy=istdyn/iphysiq
+
   IF ((iflag_phys==1).or.(iflag_phys>=100)) THEN
      ! Physics:
@@ -434 +441 @@
 #endif
   ! #endif of #ifdef CPP_IOIPSL
-
-  !  Choix des frequences de stokage pour le offline
-  !      istdyn=day_step/4     ! stockage toutes les 6h=1jour/4
-  !      istdyn=day_step/12     ! stockage toutes les 2h=1jour/12
-  istdyn=day_step/4     ! stockage toutes les 6h=1jour/12
-  istphy=istdyn/iphysiq     
-
-
   !
   !-----------------------------------------------------------------------