Searched refs:iv_node (Results 1 – 2 of 2) sorted by relevance
| /phasta/phSolver/incompressible/ ! |
| H A D | forces.f | 21 integer :: iv_node, iv_core, iv_thread local
202 iv_node = (iv_totnodes-1)-mod(isrf,iv_totnodes)
207 irankfilesforce(isrf) = iv_node*iv_rankpernode
213 & irankfilesforce(isrf), ' on node', iv_node
|
| H A D | itrdrv.f | 106 integer :: iv_node, iv_core, iv_thread local
1401 iv_node = (iv_totnodes-1)-mod(jjm1,iv_totnodes)
1406 iv_rank(jj) = iv_node*iv_rankpernode
1412 & iv_rank(jj), ' on node', iv_node
|