Changeset 2601 for LMDZ5/trunk/libf/dyn3dmem/dynredem_loc.F90

Timestamp:

Jul 24, 2016, 11:51:55 AM (9 years ago)

Author:

Ehouarn Millour

Message:

Cleanup in the dynamics: turn temps.h into module temps_mod.F90
EM

File:

• LMDZ5/trunk/libf/dyn3dmem/dynredem_loc.F90 (modified) (4 diffs)

LMDZ5/trunk/libf/dyn3dmem/dynredem_loc.F90

@@ -18 +18 @@
   USE serre_mod, ONLY: clon,clat,grossismx,grossismy,dzoomx,dzoomy, &
                        taux,tauy
+  USE temps_mod, ONLY: annee_ref, day_ref, itau_dyn, itaufin, start_time
 
   IMPLICIT NONE
@@ -23 +24 @@
   include "paramet.h"
   include "comgeom.h"
-  include "temps.h"
   include "ener.h"
   include "logic.h"
@@ -179 +179 @@
   USE dynredem_mod, ONLY: dynredem_write_u, dynredem_write_v, dynredem_read_u, &
                           err, modname, fil, msg
+  USE temps_mod, ONLY: itau_dyn, itaufin
+  
   IMPLICIT NONE
   include "dimensions.h"
@@ -184 +186 @@
   include "description.h"
   include "comgeom.h"
-  include "temps.h"
   include "iniprint.h"
 !===============================================================================