blob: 31b4bc3125618de6b1a45901e04d1b62a3afdc96 [file] [log] [blame]
program namesProv
implicit none
common /names/ a, b, c !<<<<< 3, 13, 3, 18, a_hello, b_hello, c_hello, pass
integer :: a, b, c
print *, "Test the test case program with given names"
end program namesProv