| program convertIfStatementToIfConstruct | |
| implicit none | |
| integer :: var1, var2 | |
| print *, "This is an if construct example." | |
| var1 = 4 | |
| var2 = 5 | |
| if (var1 < var2) print *, var1, " is less than ", var2, " using if-stmt." !<<<<< 7, 5, 7, 78, pass | |
| !!! This tests shows the refactoring successfully converting a valid IF statement to a valid IF construct. | |
| end program |