camfort-0.906: tests/fixtures/Specification/Stencils/example15.expected.f
program example15
implicit none
integer i
real a(0:10)
do i = 0, 10
c= stencil readOnce, forward(depth=1, dim=1) :: a
c= stencil readOnce, forward(depth=1, dim=1) :: a
a(i) = a(i) + a(i+1)
end do
end