Changeset 2603 for LMDZ5/trunk/libf/dyn3dpar/leapfrog_p.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/dyn3dpar/leapfrog_p.F (modified) (2 diffs)

LMDZ5/trunk/libf/dyn3dpar/leapfrog_p.F

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