blob: 5d6074755b374f03b2cc091d402e0e42b0a4261e [file] [log] [blame]
program test
implicit none
integer :: k
print *, 5
print *, 4
print *, 3
print *, 2
print *, 1
end program test