/[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 27 by guez, Thu Mar 25 14:29:07 2010 UTC revision 57 by guez, Mon Jan 30 12:54:02 2012 UTC
# Line 15  c Line 15  c
15        use paramet_m        use paramet_m
16        use comgeom        use comgeom
17        use filtreg_m, only: filtreg        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.27  
changed lines
  Added in v.57
  ViewVC Help
Powered by ViewVC 1.1.21