Searched refs:phi (Results 1 – 5 of 5) sorted by relevance
| /phasta/phSolver/common/ |
| H A D | blowerControl.f90 | 201 real*8 :: phi local 225 read(1003, *) surfIDin, phi 226 blower(i)%t0 = -phi*blower(i)%t_cycle 254 real*8 :: phi local 268 phi = mod((BC_t - blower(i)%t0)/blower(i)%t_cycle,1.0d0) 270 phi = 0.0d00 273 write(1003, "(i9, F18.14)") blower(i)%surfID, phi
|
| H A D | newshape.cc | 43 double phi(int p, double x) in phi() function 312 entfn[i] = phi(i+2, xi1); in mesh_edge() 364 entfn[mc] = phi(a1,xi1)*phi(a2,xi2); in quad_face() 365 edrv[mc][gOrd[0]] = phiDrv(a1, xi1)*phi(a2, xi2); in quad_face() 366 edrv[mc][gOrd[1]] = phi(a1, xi1)*phiDrv(a2, xi2); in quad_face() 401 entfn[mc]=phi(a1,xi1)*phi(a2,xi2)*phi(a3,xi3); in hex_regn() 403 edrv[mc][0]=phiDrv(a1,xi1)*phi(a2,xi2)*phi(a3,xi3); in hex_regn() 405 edrv[mc][1]=phi(a1,xi1)*phiDrv(a2,xi2)*phi(a3,xi3); in hex_regn() 407 edrv[mc++][2]=phi(a1,xi1)*phi(a2,xi2)*phiDrv(a3,xi3); in hex_regn()
|
| H A D | topo_shapedefs.h | 5 extern "C" double phi(int p, double x);
|
| /phasta/phSolver/incompressible/e3source/ |
| H A D | e3source.fimplicit | 268 c phi, + |u - -----phi, | phi, - -----|(nu+phi)phi, | 273 c ~ phi^2 274 c - cb1*S*phi + cw1*fw*----- 412 c.... One source term has the form (beta_i)*(phi,_i). Since 413 c the convective term has (u_i)*(phi,_i), it is useful to treat 418 c is given by beta_i=(cb_2)*(phi,_i)/(sigma) 480 c.... No source terms with the form (beta_i)*(phi,_i) for K or E 533 cad d_{,t} + sign(phi)*( d_{,i}/|d_{,i}| )* d_{,i} = sign(phi) 537 cad d_{,t} + u * d_{,i} = sign(phi)
|
| H A D | e3source.fRHSonly | 268 c phi, + |u - -----phi, | phi, - -----|(nu+phi)phi, | 273 c ~ phi^2 274 c - cb1*S*phi + cw1*fw*----- 398 c.... One source term has the form (beta_i)*(phi,_i). Since 399 c the convective term has (u_i)*(phi,_i), it is useful to treat 404 c is given by beta_i=(cb_2)*(phi,_i)/(sigma) 466 c.... No source terms with the form (beta_i)*(phi,_i) for K or E 519 cad d_{,t} + sign(phi)*( d_{,i}/|d_{,i}| )* d_{,i} = sign(phi) 523 cad d_{,t} + u * d_{,i} = sign(phi)
|