blob: 55df1a2c637c82ba609c409e604543a39c45f9bd [file] [log] [blame]
program test
implicit none
integer :: i, j
j=1
!<<<<<8,1,13,1,1,true,pass
do i=1,5
print *, i
j = i
end do
j = 1
end program test