path: root/archive/tests/1/main.f90

program test1
use a, only: f
implicit none

call f()

print *, "TEST1 OK"
end