Searched defs:setBlowing_Duct3 (Results 1 – 1 of 1) sorted by relevance
| /phasta/phSolver/common/ |
| H A D | setBlowing_Duct3.f | 3 subroutine setBlowing_Duct3(x,BC,iTurbWall) subroutine
10 integer i, nn
11 real*8 BC(nshg,ndofBC)
12 real*8 x(nshg,nsd)
14 real Temp,veloMag,xcoor,ycoor,zcoor,rz,ratio_s
15 real*8 x_begin,y_begin,x_end,y_end,jetnx,jetny
16 real*8 edge_length, edge_s
17 integer isfID
18 integer iTurbWall(nshg)
|