/[lmdze]/trunk/dyn3d/dynetat0.f
ViewVC logotype

Diff of /trunk/dyn3d/dynetat0.f

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

revision 57 by guez, Mon Jan 30 12:54:02 2012 UTC revision 66 by guez, Thu Sep 20 13:00:41 2012 UTC
# Line 13  contains Line 13  contains
13      ! This procedure reads the initial state of the atmosphere.      ! This procedure reads the initial state of the atmosphere.
14    
15      use comconst, only: im, dtvr, jm, lllm      use comconst, only: im, dtvr, jm, lllm
16      use comvert, only: pa      use disvert_m, only: pa
17      use comgeom, only: rlonu, rlatu, rlonv, rlatv, cu_2d, cv_2d, aire_2d      use comgeom, only: rlonu, rlatu, rlonv, rlatv, cu_2d, cv_2d, aire_2d
18      use dimens_m, only: iim, jjm, llm, nqmx      use dimens_m, only: iim, jjm, llm, nqmx
19      use ener, only: etot0, ang0, ptot0, stot0, ztot0      use ener, only: etot0, ang0, ptot0, stot0, ztot0
Legend:
Removed from v.57  
changed lines
  Added in v.66
  ViewVC Help
Powered by ViewVC 1.1.21