Changeset 2603 for LMDZ5/trunk/libf/dyn3d/leapfrog.F

Timestamp:

Jul 25, 2016, 11:31:56 AM (8 years ago)

Author:

Ehouarn Millour

Message:

Cleanup in the dynamics: turn logic.h into module logic_mod.F90
EM

File:

• LMDZ5/trunk/libf/dyn3d/leapfrog.F (modified) (2 diffs)

LMDZ5/trunk/libf/dyn3d/leapfrog.F

@@ -22 +22 @@
       USE comvert_mod, ONLY: ap,bp,pressure_exner,presnivs
       USE comconst_mod, ONLY: cpp, dtphys, dtvr, pi, ihf
+      USE logic_mod, ONLY: iflag_phys,ok_guide,forward,leapf,apphys,
+     &                     statcl,conser,apdiss,purmats,ok_strato
       USE temps_mod, ONLY: jD_ref,jH_ref,itaufin,day_ini,day_ref,
      &                        start_time,dt
@@ -62 +64 @@
       include "comdissnew.h"
       include "comgeom.h"
-      include "logic.h"
       include "ener.h"
       include "description.h"