Changeset 1795 for LMDZ5/branches/testing/libf/phylmd/cpl_mod.F90

Timestamp:

Jul 18, 2013, 10:20:28 AM (11 years ago)

Author:

Ehouarn Millour

Message:

Version testing basee sur la r1794

---

Testing release based on r1794

Location:

LMDZ5/branches/testing

Files:

• . (modified) (1 prop)
• libf/phylmd/cpl_mod.F90 (modified) (6 diffs)

LMDZ5/branches/testing/libf/phylmd/cpl_mod.F90

@@ -101 +101 @@
     USE carbon_cycle_mod, ONLY : carbon_cycle_cpl, fco2_ocn_day
     USE surface_data
+    USE indice_sol_mod
 
     INCLUDE "dimensions.h"
-    INCLUDE "indicesol.h"
     INCLUDE "temps.h"
     INCLUDE "iniprint.h"
@@ -295 +295 @@
     USE phys_state_var_mod, ONLY : rlon, rlat
     USE carbon_cycle_mod, ONLY : carbon_cycle_cpl
-    
-    INCLUDE "indicesol.h"
+    USE indice_sol_mod
+
     INCLUDE "temps.h"
     INCLUDE "iniprint.h"
@@ -424 +424 @@
 !
     USE carbon_cycle_mod, ONLY : carbon_cycle_cpl, fco2_ocn_day
-    INCLUDE "indicesol.h"
+    USE indice_sol_mod
 
 ! Input arguments
@@ -541 +541 @@
 !
     USE carbon_cycle_mod, ONLY : carbon_cycle_cpl, co2_send
-    INCLUDE "indicesol.h"
+    USE indice_sol_mod
     INCLUDE "dimensions.h"
 
@@ -732 +732 @@
 !
     USE carbon_cycle_mod, ONLY : carbon_cycle_cpl
-    INCLUDE "indicesol.h"
+    USE indice_sol_mod
     INCLUDE "dimensions.h"
 
@@ -1026 +1026 @@
     USE surface_data
     USE carbon_cycle_mod, ONLY : carbon_cycle_cpl
+    USE indice_sol_mod
 ! Some includes
 !*************************************************************************************
-    INCLUDE "indicesol.h"
     INCLUDE "temps.h"
     INCLUDE "dimensions.h"