Changeset 1422 for trunk/LMDZ.GENERIC/libf/dynlonlat_phylonlat/phystd/iniphysiq.F90

Timestamp:

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

Author:

milmd

Message:

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

File:

• trunk/LMDZ.GENERIC/libf/dynlonlat_phylonlat/phystd/iniphysiq.F90 (modified) (1 diff)

trunk/LMDZ.GENERIC/libf/dynlonlat_phylonlat/phystd/iniphysiq.F90

@@ -19 +19 @@
 use infotrac, only : nqtot ! number of advected tracers
 use planete_mod, only: ini_planete_mod
+USE comvert_mod, ONLY: ap,bp,preff
 
 implicit none
 include "dimensions.h"
-include "comvert.h"
 include "iniprint.h"