/[lmdze]/trunk/Sources/dyn3d/Dissipation/divgrad2.f
ViewVC logotype

Diff of /trunk/Sources/dyn3d/Dissipation/divgrad2.f

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

revision 55 by guez, Mon Dec 12 13:25:01 2011 UTC revision 56 by guez, Tue Jan 10 19:02:02 2012 UTC
# Line 22  c    .......    variables en arguments Line 22  c    .......    variables en arguments
22  c  c
23        INTEGER klevel        INTEGER klevel
24        REAL, intent(in):: h( ip1jmp1,klevel ), deltapres( ip1jmp1,klevel)        REAL, intent(in):: h( ip1jmp1,klevel ), deltapres( ip1jmp1,klevel)
25        REAL divgra( ip1jmp1,klevel)        REAL, intent(out):: divgra( ip1jmp1,klevel)
26        real, intent(in):: cdivh        real, intent(in):: cdivh
27  c  c
28  c    .......    variables  locales    ..........  c    .......    variables  locales    ..........

Legend:
Removed from v.55  
changed lines
  Added in v.56

  ViewVC Help
Powered by ViewVC 1.1.21