Changeset 2603 for LMDZ5/trunk/libf/dyn3d_common/disvert.F90

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_common/disvert.F90 (modified) (2 diffs)

LMDZ5/trunk/libf/dyn3d_common/disvert.F90

@@ -12 +12 @@
   USE comvert_mod, ONLY: ap, bp, nivsigs, nivsig, dpres, presnivs, &
                          pa, preff, scaleheight
+  USE logic_mod, ONLY: ok_strato
 
   IMPLICIT NONE
@@ -18 +19 @@
   include "paramet.h"
   include "iniprint.h"
-  include "logic.h"
 
 !-------------------------------------------------------------------------------