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

Diff of /trunk/dyn3d/laplacien_gam.f

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

revision 102 by guez, Wed Mar 5 14:57:53 2014 UTC revision 103 by guez, Fri Aug 29 13:00:05 2014 UTC
# Line 31  SUBROUTINE laplacien_gam(klevel, cuvsga, Line 31  SUBROUTINE laplacien_gam(klevel, cuvsga,
31    
32    ! ...........    variables  locales    .................    ! ...........    variables  locales    .................
33    
34    REAL ghy(ip1jm, llm), ghx(ip1jmp1, llm)    REAL ghy(ip1jm, klevel), ghx(ip1jmp1, klevel)
35    ! ......................................................    ! ......................................................
36    
37    CALL scopy(ip1jmp1*klevel, teta, 1, divgra, 1)    CALL scopy(ip1jmp1*klevel, teta, 1, divgra, 1)
Legend:
Removed from v.102  
changed lines
  Added in v.103
  ViewVC Help
Powered by ViewVC 1.1.21