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

Diff of /trunk/dyn3d/advyp.f

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

revision 3 by guez, Wed Feb 27 13:16:39 2008 UTC revision 66 by guez, Thu Sep 20 13:00:41 2012 UTC
# Line 6  Line 6 
6        use dimens_m        use dimens_m
7        use comconst        use comconst
8        use paramet_m        use paramet_m
9        use comvert        use disvert_m
10        use comgeom        use comgeom
11        IMPLICIT NONE        IMPLICIT NONE
12  CCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCC  CCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCC
# Line 44  C  parbu,pbarv : flux de masse en x et y Line 44  C  parbu,pbarv : flux de masse en x et y
44  C      PARAMETER (ntra = 1)  C      PARAMETER (ntra = 1)
45    
46        REAL dty        REAL dty
47        REAL pbarv ( iip1,jjm, llm )        REAL, intent(in):: pbarv ( iip1,jjm, llm )
48    
49  C  moments: SM  total mass in each grid box  C  moments: SM  total mass in each grid box
50  C           S0  mass of tracer in each grid box  C           S0  mass of tracer in each grid box
Legend:
Removed from v.3  
changed lines
  Added in v.66
  ViewVC Help
Powered by ViewVC 1.1.21