/[lmdze]/trunk/dyn3d/startdyn.f90
ViewVC logotype

Diff of /trunk/dyn3d/startdyn.f90

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 134 by guez, Wed Apr 29 15:47:56 2015 UTC revision 225 by guez, Mon Oct 16 12:35:41 2017 UTC
# Line 5  MODULE startdyn Line 5  MODULE startdyn
5    
6    INTEGER iml_dyn, jml_dyn, llm_dyn    INTEGER iml_dyn, jml_dyn, llm_dyn
7    
8    REAL, pointer:: lon_ini(:), lat_ini(:)    REAL, allocatable:: lon_ini(:), lat_ini(:)
9    ! longitude and latitude from the input file, converted to rad    ! longitude and latitude from the input file, converted to rad
10    
11    real, pointer:: levdyn_ini(:)    real, allocatable:: levdyn_ini(:)
12    
13  CONTAINS  CONTAINS
14    
15    SUBROUTINE start_init_dyn(tsol_2d, phis, ps)    SUBROUTINE start_init_dyn(tsol_2d, phis, ps)
16    
17      use comgeom, only: rlonu, rlatv, aire_2d, apoln, apols      use comgeom, only: aire_2d, apoln, apols
18      use conf_dat2d_m, only: conf_dat2d      use conf_dat2d_m, only: conf_dat2d
19      use dimens_m, only: iim, jjm      use dimens_m, only: iim, jjm
20        use dynetat0_m, only: rlonu, rlatv
21      use gr_int_dyn_m, only: gr_int_dyn      use gr_int_dyn_m, only: gr_int_dyn
22      use inter_barxy_m, only: inter_barxy      use inter_barxy_m, only: inter_barxy
23      use netcdf, only: nf90_nowrite      use netcdf, only: nf90_nowrite
Legend:
Removed from v.134  
changed lines
  Added in v.225
  ViewVC Help
Powered by ViewVC 1.1.21