/[lmdze]/trunk/libf/dyn3d/laplacien.f90
ViewVC logotype

Diff of /trunk/libf/dyn3d/laplacien.f90

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

revision 3 by guez, Wed Feb 27 13:16:39 2008 UTC revision 55 by guez, Mon Dec 12 13:25:01 2011 UTC
# Line 14  c Line 14  c
14        use dimens_m        use dimens_m
15        use paramet_m        use paramet_m
16        use comgeom        use comgeom
17          use filtreg_m, only: filtreg
18        IMPLICIT NONE        IMPLICIT NONE
19  c  c
20    
21  c  c
22  c    .........      variables  en arguments   ..............  c    .........      variables  en arguments   ..............
23  c  c
24        INTEGER klevel        INTEGER, intent(in):: klevel
25        REAL teta( ip1jmp1,klevel ), divgra( ip1jmp1,klevel )        REAL teta( ip1jmp1,klevel ), divgra( ip1jmp1,klevel )
26  c  c
27  c    ............     variables  locales      ..............  c    ............     variables  locales      ..............
Legend:
Removed from v.3  
changed lines
  Added in v.55
  ViewVC Help
Powered by ViewVC 1.1.21