Changeset 5110 for LMDZ6/branches/Amaury_dev/libf/phylmd/surf_land_orchidee_mod.F90

Timestamp:

Jul 24, 2024, 11:19:08 AM (3 months ago)

Author:

abarral

Message:

Rename modules properly (mod_* -> lmdz_*) in phy_common

File:

• LMDZ6/branches/Amaury_dev/libf/phylmd/surf_land_orchidee_mod.F90 (modified) (4 diffs)

LMDZ6/branches/Amaury_dev/libf/phylmd/surf_land_orchidee_mod.F90

@@ -26 +26 @@
   USE surface_data, ONLY: type_ocean, landice_opt
   USE geometry_mod, ONLY: dx, dy, boundslon, boundslat,longitude, latitude, cell_area,  ind_cell_glo
-  USE mod_grid_phy_lmdz
-  USE mod_phys_lmdz_para, mpi_root_rank=>mpi_master
+  USE lmdz_grid_phy
+  USE lmdz_phys_para, mpi_root_rank=>mpi_master
   USE carbon_cycle_mod, ONLY: nbcf_in_orc, nbcf_out, fields_in, yfields_in, yfields_out, cfname_in, cfname_out
   USE nrtype, ONLY: PI
@@ -57 +57 @@
     USE indice_sol_mod
     USE print_control_mod, ONLY: lunout
-    USE mod_grid_phy_lmdz, ONLY: nbp_lon, nbp_lat
+    USE lmdz_grid_phy, ONLY: nbp_lon, nbp_lat
 #ifdef CPP_VEGET
     USE time_phylmdz_mod, ONLY: itau_phy 
@@ -658 +658 @@
   SUBROUTINE Init_orchidee_index(knon,knindex,offset,ktindex)
   USE mod_surf_para
-  USE mod_grid_phy_lmdz
+  USE lmdz_grid_phy
   
     INTEGER,INTENT(IN)    :: knon
@@ -741 +741 @@
 
   SUBROUTINE Init_neighbours(knon,neighbours,knindex,pctsrf)
-    USE mod_grid_phy_lmdz
+    USE lmdz_grid_phy
     USE mod_surf_para    
     USE indice_sol_mod