interface integer function omp_get_num_procs ( ) end function omp_get_num_procs end interface integer result result = omp_get_num_procs ( )
This function returns an integer value indicating the number of processors that are available to your program.