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

Diff of /trunk/dyn3d/laplacien.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 57 by guez, Mon Jan 30 12:54:02 2012 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          use divergf_m, only: divergf
19    
20        IMPLICIT NONE        IMPLICIT NONE
21  c  c
22    
23  c  c
24  c    .........      variables  en arguments   ..............  c    .........      variables  en arguments   ..............
25  c  c
26        INTEGER klevel        INTEGER, intent(in):: klevel
27        REAL teta( ip1jmp1,klevel ), divgra( ip1jmp1,klevel )        REAL teta( ip1jmp1,klevel ), divgra( ip1jmp1,klevel )
28  c  c
29  c    ............     variables  locales      ..............  c    ............     variables  locales      ..............
Legend:
Removed from v.3  
changed lines
  Added in v.57
  ViewVC Help
Powered by ViewVC 1.1.21