program test1
implicit none
integer :: i
i = 5+5
print *, i
print *, "Fortran test code executed"
print *, "TESTS PASSED"
end program