Changeset 1529 for trunk/LMDZ.GENERIC/libf/phystd/dyn1d/rcm1d.F

Timestamp:

Apr 5, 2016, 10:51:51 AM (9 years ago)

Author:

emillour

Message:

Generic GCM: Towards a cleaner separation between physics and dynamics

• Got rid of references to "dimensions.h" from physics packages: use nbp_lon (=iim), nbp_lat (=jjp1) and nbp_lev from module mod_grid_phy_lmdz (in phy_common) instead.
• Removed module "comhdiff_mod.F90", as it is only used by module surf_heat_transp_mod.F90, moved module variables there.
• Addedin "surf_heat_transp_mod" local versions of some arrays and routines (from dyn3d) required to compute gradient, divergence, etc. on the global dynamics grid. As before, the slab ocean only works in serial.

EM

File:

• trunk/LMDZ.GENERIC/libf/phystd/dyn1d/rcm1d.F (modified) (1 diff)

trunk/LMDZ.GENERIC/libf/phystd/dyn1d/rcm1d.F

@@ -907 +907 @@
       end                       !rcm1d
  
-c***********************************************************************
-c***********************************************************************
-c     Subroutines Bidons utilise seulement en 3D, mais
-c     necessaire a la compilation de rcm1d en 1D
-
-!      subroutine gr_fi_dyn
-!      RETURN
-!      END
- 
-c***********************************************************************
-c***********************************************************************
-
-!#include "../dyn3d/disvert.F"
-!#include "../dyn3d/abort_gcm.F"
-!#include "../dyn3d/diverg.F"
-!#include "../dyn3d/grad.F"
-!#include "../dyn3d/gr_u_scal.F"
-!#include "../dyn3d/gr_v_scal.F"
-!#include "../dyn3d/gr_dyn_fi.F"
-
+