Changeset 1226 for trunk/LMDZ.MARS/libf/phymars/updatereffrad.F

Timestamp:

Apr 15, 2014, 11:46:48 PM (11 years ago)

Author:

aslmd

Message:

LMDZ.MARS : Replaced comcstfi and planete includes by modules.

File:

• trunk/LMDZ.MARS/libf/phymars/updatereffrad.F (modified) (2 diffs)

trunk/LMDZ.MARS/libf/phymars/updatereffrad.F

@@ -9 +9 @@
      &                       ref_r0, igcm_dust_submicron
        USE dimradmars_mod, only: nueffdust
+       USE comcstfi_h
        IMPLICIT NONE
 c=======================================================================
@@ -33 +34 @@
 !#include "dimensions.h"
 !#include "dimphys.h"
-#include "comcstfi.h"
 #include "callkeys.h"
 !#include "dimradmars.h"