camfort-0.906: tests/fixtures/Specification/Stencils/example5.expected.f
program example5
implicit none
integer i, imax
parameter (imax = 3)
real a(0:imax)
do i = 0, imax
c= stencil readOnce, atLeast, pointed(dim=1) :: a
c= stencil readOnce, atMost, forward(depth=2, dim=1) :: a
a(i) = a(i) + a(i+2)
end do
end