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

Diff of /trunk/dyn3d/dynredem0.f

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

revision 7 by guez, Mon Mar 31 12:24:17 2008 UTC revision 15 by guez, Fri Aug 1 15:24:12 2008 UTC
# Line 7  contains Line 7  contains
7    SUBROUTINE dynredem0(fichnom, iday_end, phis)    SUBROUTINE dynredem0(fichnom, iday_end, phis)
8    
9      ! From dyn3d/dynredem.F, v 1.2 2004/06/22 11:45:30      ! From dyn3d/dynredem.F, v 1.2 2004/06/22 11:45:30
   
10      ! Ecriture du fichier de redémarrage au format NetCDF (initialisation)      ! Ecriture du fichier de redémarrage au format NetCDF (initialisation)
11    
12      USE IOIPSL, only: ymds2ju, ju2ymds      USE IOIPSL, only: ymds2ju, ju2ymds
13      use dimens_m, only: iim, jjm, llm, nqmx      use dimens_m, only: iim, jjm, llm, nqmx
14      use paramet_m, only: ip1jmp1, iip1, jjp1, llmp1      use paramet_m, only: iip1, jjp1, llmp1
15      use comconst, only: rad, cpp, daysec, dtvr, kappa, g, omeg      use comconst, only: rad, cpp, daysec, dtvr, kappa, g, omeg
16      use comvert, only: pa, bp, ap, nivsigs, preff, presnivs, nivsig      use comvert, only: pa, bp, ap, nivsigs, preff, presnivs, nivsig
17      use logic      use logic
Legend:
Removed from v.7  
changed lines
  Added in v.15
  ViewVC Help
Powered by ViewVC 1.1.21