CODEWITHSUNDEEP
fortrangfortran
Andrew Fakhry
Andrew Fakhry

Reputation: 70

Sum of certain elements in an array in Fortran

I have an array like this :

1717.531
1717.364
1716.725
1716.723
1716.536
1716.304
1716.221
1715.998
1715.799
1715.702
1715.648
1715.254
1715.186
1714.733
1714.532
1714.266
1714.223
1714.094
1713.943
1713.873
1713.803
1713.578

I want to SUM each 5 elements separately, which function to use and how?

Upvotes: 1

Views: 14606

Answers (2)

Ignacio Borge Durán
Ignacio Borge Durán

Reputation: 1

One possible solution would be this:

do i=1,20,5                     
    x=0.0                 
    x=(sum(a(i:i+4)))
    write(*,*) x           
end do

Upvotes: 0

M. S. B.
M. S. B.

Reputation: 29391

You could use a loop with a step size:

do i=1, N, 5

Then the intrinsic function sum applied to slices of the array:

sum (a(i: i+4))

Upvotes: 4

Related Questions