Changeset 3825 for dynamico_lmdz/aquaplanet/LMDZ5/libf/phylmd/phyredem.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/phyredem.F90 (modified) (2 diffs)

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

@@ -9 +9 @@
   USE pbl_surface_mod,  ONLY : pbl_surface_final
   USE phys_state_var_mod
+  USE geometry_mod, ONLY : lon_degrees, lat_degrees
   USE iostart
   USE traclmdz_mod, ONLY : traclmdz_to_restart
@@ -93 +94 @@
 
   CALL put_field("longitude", &
-       "Longitudes de la grille physique", rlon)
-
-  CALL put_field("latitude", "Latitudes de la grille physique", rlat)
+       "Longitudes de la grille physique", lon_degrees)
+
+  CALL put_field("latitude", "Latitudes de la grille physique", lat_degrees)
 
   ! PB ajout du masque terre/mer