program prog
use mod2
implicit none

if (modval1 + modval2 /= 3) stop 1

end program prog