blob: d1d3c1677820ea4e26ea32feab6c4ac575eecb80 [file] [log] [blame]
program commentIfStmtToIfConstruct
implicit none
integer :: x, y, a
if (x .LT. y .OR. y .GT. 5 .AND. 6 .GE. 6) then
a = 1 !This is an if statement
!can add more statements here
end if
print *, "This is a test" !<<<<< 4, 5, 4, 78, pass
!!! This test shows the refactoring successfully converting a valid IF statement to a valid IF construct, while
!!! also preserving the included comment.
end program