+-------------------------------IBM Extension--------------------------------+
Returns a scalar of type default integer whose value is always 1 for a non-HPF program. This value refers to the number of distributed memory nodes available to the program and is always 1 to ensure backward compatibility between programs written for HPF and non-HPF environments.
Class
System inquiry function
Result Type and Attributes
Default scalar integer which always has a value of 1 for a non-HPF program.
Examples
I = NUMBER_OF_PROCESSORS() ! 1
J = NUMBER_OF_PROCESSORS(DIM=1) ! 1
+----------------------------End of IBM Extension----------------------------+