Changeset 5112 for LMDZ6/branches/Amaury_dev/libf/phylmdiso/isotopes_routines_mod.F90

Timestamp:

Jul 24, 2024, 12:45:32 PM (2 months ago)

Author:

abarral

Message:

Rename modules in phy_common from *_mod > lmdz_*

File:

• LMDZ6/branches/Amaury_dev/libf/phylmdiso/isotopes_routines_mod.F90 (modified) (6 diffs)

LMDZ6/branches/Amaury_dev/libf/phylmdiso/isotopes_routines_mod.F90

@@ -15859 +15859 @@
         rain_fall,snow_fall,fevap,fxtevap,xtsol,qsol
       !USE iostart, ONLY: close_startphy, get_field, get_var, open_startphy
-      !USE write_field_phy
+      !USE lmdz_write_field_phy
       USE indice_sol_mod, only: nbsrf  
   USE isotopes_mod, ONLY: initialisation_iso, iso_eau,iso_HDO, &
@@ -16034 +16034 @@
         fevap,fxtevap,xtsol,qsol
       !USE iostart
-      !USE write_field_phy
+      !USE lmdz_write_field_phy
       USE indice_sol_mod, only: nbsrf
   USE isotopes_mod, ONLY: tnat,iso_HDO,iso_O18,iso_HTO, iso_eau,toce, &
@@ -16627 +16627 @@
         USE isotopes_mod, only: iso_HTO,ok_prod_nucl_tritium
         USE dimphy, only: klon,klev
-        USE geometry_mod, only: latitude_deg,longitude_deg, & ! en degré, remplace rlat et rlon
+        USE lmdz_geometry, only: latitude_deg,longitude_deg, & ! en degré, remplace rlat et rlon
                    latitude,longitude ! en radian, remplace rlatd et rlond
         USE lmdz_yomcst
@@ -18148 +18148 @@
 &               zmin_nucl, zmax_nucl, HTO_nucl
         USE dimphy, only: klon,klev
-        use geometry_mod, only: latitude_deg,longitude_deg
+        use lmdz_geometry, only: latitude_deg,longitude_deg
 #ifdef ISOVERIF
         USE isotopes_verif_mod
@@ -18225 +18225 @@
                                      kmin_jessai,kmax_jessai)
         USE dimphy, only: klon,klev
-        use geometry_mod, only: latitude_deg,longitude_deg
+        use lmdz_geometry, only: latitude_deg,longitude_deg
         USE lmdz_yomcst
 #ifdef ISOVERIF
@@ -18366 +18366 @@
                                       prod_nucl)
         USE isotopes_mod, ONLY: iso_HTO
-        use geometry_mod, only: cell_area
+        use lmdz_geometry, only: cell_area
         use dimphy, only: klon,klev
         USE lmdz_yomcst