program test_subproject_inc

implicit none

include 'thousand.f90'

if (thousand /= 1000) error stop 'did not include properly'

end program