Searched defs:forces (Results 1 – 1 of 1) sorted by relevance
| /phasta/phSolver/incompressible/ |
| H A D | forces.f | 1 subroutine forces (y , ilwork) subroutine
13 integer ilwork(nlwork)
15 real*8 y(nshg,ndof)
16 real*8 Forin(5), Forout(5),spmasss
17 real*8 ftots(3,0:MAXSURF),ftot(3)
20 integer :: iv_rankpernode, iv_totnodes, iv_totcores
21 integer :: iv_node, iv_core, iv_thread
170 1000 format(1p,i6,8e20.12)
|