/[lmdze]/trunk/filtrez/acc.f
ViewVC logotype

Diff of /trunk/filtrez/acc.f

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

revision 107 by guez, Wed Mar 5 14:57:53 2014 UTC revision 108 by guez, Tue Sep 16 14:00:41 2014 UTC
# Line 3  Line 3 
3  ! 12:53:09 lmdzadmin Exp $  ! 12:53:09 lmdzadmin Exp $
4    
5  SUBROUTINE acc(vec, d, im)  SUBROUTINE acc(vec, d, im)
6    DIMENSION vec(im, im), d(im)    implicit none
7      integer im, i, j
8      real vec(im, im), d(im)
9      real sum, ssum
10    
11    DO j = 1, im    DO j = 1, im
12      DO i = 1, im      DO i = 1, im
Legend:
Removed from v.107  
changed lines
  Added in v.108
  ViewVC Help
Powered by ViewVC 1.1.21