Changeset 5282 for LMDZ6/trunk/libf/phylmdiso/phyredem.F90

Timestamp:

Oct 28, 2024, 1:11:48 PM (6 hours ago)

Author:

abarral

Message:

Turn iniprint.h clesphys.h into modules
Remove unused description.h

File:

• LMDZ6/trunk/libf/phylmdiso/phyredem.F90 (modified) (3 diffs)

LMDZ6/trunk/libf/phylmdiso/phyredem.F90

@@ -46 +46 @@
 #endif
 #endif
+  USE clesphys_mod_h
   USE carbon_cycle_mod, ONLY : carbon_cycle_cpl, co2_send, carbon_cycle_rad, RCO2_glo
   USE indice_sol_mod, ONLY: nbsrf, is_oce, is_sic, is_ter, is_lic, epsfra
@@ -55 +56 @@
 
   IMPLICIT none
-  include "clesphys.h"
   include "alpale.h"
   include "compbl.h"
@@ -512 +512 @@
     use isotrac_mod, only: index_zone,index_iso,strtrac
 #endif
-      USE dimsoil_mod_h, ONLY: nsoilmx
+      USE clesphys_mod_h
+USE dimsoil_mod_h, ONLY: nsoilmx
         implicit none
 
         ! equivalent isotopique de phyredem
-INCLUDE "clesphys.h"
 INCLUDE "alpale.h"
 INCLUDE "compbl.h"