do loop (Fortran)

Applies to: fortran

Fortran's do loop is the counted loop that powers numerical kernels (do i = 1, n). A do while (cond) form loops until a condition fails. Tight do loops over arrays are exactly what Fortran's compiler vectorizes for speed.

total = 0
do i = 1, n
  total = total + a(i)
end do

See also: loop, array