public function comm_env_node_n_compute() result(n)
Return number of compute ranks on this node
Arguments
None
Return Value
integer
Source Code
function comm_env_node_n_compute()result(n)!! Return number of compute ranks on this nodeinteger::nn=cached_node_n_computeend function comm_env_node_n_compute