blob: 9c5dd1079cc0111004bee58b47c2f334e8b692e9 [file] [log] [blame]
forall (i=1:10, j=1:10) A(i,j) = 2.0
forall (i=1:10, j=1:10)
A(i,j) = 2.0
end forall
end program