Changeset 3825 for dynamico_lmdz/aquaplanet/LMDZ5/libf/phylmd/cpl_mod.F90

Timestamp:

May 6, 2015, 12:14:12 PM (10 years ago)

Author:

ymipsl

Message:

Reorganize geometry and grid modules. Prepare physics for unstructutured grid support. Simplify initialization of physics from dynamic.
Compiled only with dynd3dmem, but not tested for moment.

YM

File:

• dynamico_lmdz/aquaplanet/LMDZ5/libf/phylmd/cpl_mod.F90 (modified) (2 diffs)

dynamico_lmdz/aquaplanet/LMDZ5/libf/phylmd/cpl_mod.F90

@@ -294 +294 @@
 ! are stored in this module.
     USE surface_data
-    USE phys_state_var_mod, ONLY : rlon, rlat
+    USE geometry_mod, ONLY : lon_degrees, lat_degrees
     USE carbon_cycle_mod, ONLY : carbon_cycle_cpl
     USE indice_sol_mod
@@ -365 +365 @@
 
 ! Transform the longitudes and latitudes on 2D arrays
-          CALL gather_omp(rlon,rlon_mpi)
-          CALL gather_omp(rlat,rlat_mpi)
+          CALL gather_omp(lon_degrees,rlon_mpi)
+          CALL gather_omp(lat_degrees,rlat_mpi)
 !$OMP MASTER
           CALL Grid1DTo2D_mpi(rlon_mpi,tmp_lon)