Changeset 1422 for trunk/LMDZ.MARS/libf/phymars/dyn1d

Timestamp:

Apr 30, 2015, 12:33:45 PM (11 years ago)

Author:

milmd

Message:

In GENERIC, MARS and COMMON models replace some include files by modules (usefull for decoupling physics with dynamics).

Location:

trunk/LMDZ.MARS/libf/phymars/dyn1d

Files:

• comconst.h (deleted)
• comconst_mod.F90 (added)
• comvert.h (deleted)
• comvert_mod.F90 (added)
• description.h (deleted)
• ener.h (deleted)
• ener_mod.F90 (added)
• logic.h (deleted)
• logic_mod.F90 (added)
• serre.h (deleted)
• serre_mod.F90 (added)
• temps.h (deleted)
• temps_mod.F90 (added)
• testphys1d.F (modified) (2 diffs)

trunk/LMDZ.MARS/libf/phymars/dyn1d/testphys1d.F

@@ -19 +19 @@
      &                      cpp, dtphys
       use dimradmars_mod, only: tauscaling,tauvis
+      USE comvert_mod, ONLY: ap,bp,aps,bps,pa,preff,sig
       IMPLICIT NONE
 
@@ -52 +53 @@
 !#include "comsaison.h"
 !#include "control.h"
-#include "comvert.h"
 #include "netcdf.inc"
 #include "comg1d.h"
-#include "logic.h"
 !#include "advtrac.h"