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

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

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

trunk/libf/dyn3d/Vlsplt/vly.f90 revision 66 by guez, Thu Sep 20 13:00:41 2012 UTC trunk/Sources/dyn3d/Vlsplt/vly.f 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.66  
changed lines
  Added in v.139

  ViewVC Help
Powered by ViewVC 1.1.21