/[lmdze]/trunk/dyn3d/Vlsplt/vly.f
ViewVC logotype

Diff of /trunk/dyn3d/Vlsplt/vly.f

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

revision 134 by guez, Wed Apr 29 15:47:56 2015 UTC revision 139 by guez, Tue May 26 17:46:03 2015 UTC
# Line 7  Line 7 
7  !    *************************************************************  !    *************************************************************
8  !     q,masse_adv_v,w sont des arguments d'entree  pour le s-pg ....  !     q,masse_adv_v,w sont des arguments d'entree  pour le s-pg ....
9  !     dq              sont des arguments de sortie pour le s-pg ....  !     dq              sont des arguments de sortie pour le s-pg ....
10  !  
 !  
 !   ----------------------------------------------------------------  
       use dimens_m  
       use paramet_m  
11        use comconst        use comconst
12        use disvert_m        use comgeom, only: aire
13        use conf_gcm_m        use conf_gcm_m
14        use comgeom        use dimens_m
15          use disvert_m
16          USE dynetat0_m, only: rlonv, rlonu
17        USE nr_util, ONLY : pi        USE nr_util, ONLY : pi
18          use paramet_m
19    
20        IMPLICIT NONE        IMPLICIT NONE
21  !  !
22  !  !
Legend:
Removed from v.134  
changed lines
  Added in v.139
  ViewVC Help
Powered by ViewVC 1.1.21