module hpfprocessors
!HPF$ PROCESSORS PROC(number_of_processors())
end module hpfprocessors
