Home
last modified time | relevance | path

Searched refs:zcoor (Results 1 – 5 of 5) sorted by relevance

/phasta/phSolver/common/
H A DBCprofile2.f37 real*8 xcoor,ycoor,zcoor local
56 zcoor=x(nn,3)
71 if(zcoor<(-0.587375+1.0e-4))then
72 rz=(zcoor+0.587375)/1.0e-4
73 elseif(zcoor>(0.587375-1.0e-4))then
74 rz=(0.587375-zcoor)/1.0e-4
H A DsetBlowing_Duct3.f14 real Temp,veloMag,xcoor,ycoor,zcoor,rz,ratio_s local
44 zcoor=x(nn,3)
52 if(zcoor<(-0.05715+1.0e-3))then
53 rz=(zcoor+0.05715)/1.0e-3
54 elseif(zcoor>(0.05715-1.0e-3))then
55 rz=(0.05715-zcoor)/1.0e-3
H A DINIprofile.f175 real*8 xcoor,ycoor,zcoor local
205 zcoor=x(nn,3)
H A DsetSuction_Duct3.f9017 real*8 xcoor,ycoor,zcoor local
/phasta/phSolver/compressible/
H A DsetBlowing_Duct2.f15 real*8 xcoor,ycoor,zcoor local