Changeset 1564 for trunk/LMDZ.GENERIC/libf/dynphy_lonlat/phystd

Timestamp:

May 20, 2016, 8:16:32 AM (9 years ago)

Author:

emillour

Message:

All GCMS:

• correction wrt previous commit: inigeom is also the name of a routine

in dyn3d_common! To avoid confusion rename inigeom (in dynphy_lonlat)
inigeomphy.

• cosmetic cleanup in leapfrog ('fake' calls to init_phys_lmdz,

which no longer exists, removed).
EM

File:

• trunk/LMDZ.GENERIC/libf/dynphy_lonlat/phystd/iniphysiq_mod.F90 (modified) (2 diffs)

trunk/LMDZ.GENERIC/libf/dynphy_lonlat/phystd/iniphysiq_mod.F90

@@ -18 +18 @@
 use ioipsl_getin_p_mod, only: getin_p
 
-
+use inigeomphy_mod, only: inigeomphy
 use geometry_mod, only: cell_area, & ! physics grid area (m2)
                         longitude, & ! longitudes (rad)
@@ -57 +57 @@
   !------------------------------------------
   ! --> initialize physics distribution, global fields and geometry
-  CALL inigeom(ii,jj,nlayer, &
+  CALL inigeomphy(ii,jj,nlayer, &
                nbp, communicator, &
                rlatudyn,rlatvdyn, &