Home
last modified time | relevance | path

Searched refs:iv_totnodes (Results 1 – 2 of 2) sorted by relevance

/phasta/phSolver/incompressible/
H A Dforces.f20 integer :: iv_rankpernode, iv_totnodes, iv_totcores local
193 iv_totnodes = numpe/iv_rankpernode
194 iv_totcores = iv_corepernode*iv_totnodes
202 iv_node = (iv_totnodes-1)-mod(isrf,iv_totnodes)
204 & mod(isrf,iv_totnodes))/iv_totnodes,iv_corepernode)
H A Ditrdrv.f105 integer :: iv_rankpernode, iv_totnodes, iv_totcores local
1385 iv_totnodes = numpe/iv_rankpernode
1386 iv_totcores = iv_corepernode*iv_totnodes
1392 write(*,*) ' Total number of nodes:',iv_totnodes
1401 iv_node = (iv_totnodes-1)-mod(jjm1,iv_totnodes)
1403 & mod(jjm1,iv_totnodes))/iv_totnodes,iv_corepernode)