| /phasta/shapeFunction/ |
| H A D | Makefile.am | 6 src/blend.c \ 7 src/blendDrv.c \ 8 src/Bn.c \ 9 src/BnDrv.c \ 10 src/En.c \ 11 src/EnDrv.c \ 12 src/Fn.c \ 13 src/FnDrv.c \ 14 src/Lagrange.c \ 15 src/modeShape.c \ [all …]
|
| H A D | CMakeLists.txt | 1 add_subdirectory("src")
|
| H A D | Makefile | 5 dirs := src
|
| /phasta/phSolver/compressible/ |
| H A D | e3source.f | 38 real*8 src(npro,nflow), bcool(npro), 45 src=zero 50 src(:,1) = zero 51 src(:,2) = rho(:) * datmat(1,5,1) 52 src(:,3) = rho(:) * datmat(2,5,1) 53 src(:,4) = rho(:) * datmat(3,5,1) 54 src(:,5) = u1*src(:,2) + u2*src(:,3) + u3*src(:,4) 71 src(:,2) = rho(:) * ampl * delta 75 src(:,5) = u1*src(:,2) 112 & src(id,1) = -bcool(id)*(dui(id,1) - duitarg(id,1)) [all …]
|
| /phasta/phSolver/incompressible/ |
| H A D | e3res.f | 6 & shpfun, shg, src, argument 46 & shpfun(npro,nshl),shg(npro,nshl,nsd), src(npro,nsd), 74 & - src(:,1) 76 & - src(:,2) 78 & - src(:,3) 271 & shpfun, shg, src, argument 280 & tauS(npro), shpfun(npro,nshl), src(npro), local 305 & - src 309 tmp = rcp * tauS * (rLS -src) 355 & rLui, src, divqi) argument [all …]
|
| H A D | e3ivar.f | 7 & ql, rLui, src, argument 66 & src(npro,nsd), Temp(npro),xx(npro,nsd) 248 & rLui, src, divqi) 253 src(:,1) = src(:,1) + sforce(:,1) 254 src(:,2) = src(:,2) + sforce(:,2) 255 src(:,3) = src(:,3) + sforce(:,3) 345 & src(npro,nsd), rho(npro), local 460 & rLui, src, divqi) 461 src(:,1)=u1 ! 462 src(:,2)=u2 ! store u in src memory [all …]
|
| H A D | e3source.f | 1 subroutine e3source(xx, src) argument 13 real*8 xx(npro,nsd), src(npro,nsd) local 31 src(iel,1) = -xx(iel,2)/r * Stheta 32 src(iel,2) = xx(iel,1)/r * Stheta 33 src(iel,3) = dpdz 194 src(iel,1) = 0.0 195 src(iel,2) = t54 196 src(iel,3) = 0.0
|
| H A D | e3.f | 62 & src(npro,3) 104 & ql, rLui, src, 122 & shpfun, shg, src,
|
| H A D | advLES.f | 29 & src(npro,nsd), Temp(npro), 269 src = zero 278 src(:,1) = bfx 279 src(:,2) = bfy 280 src(:,3) = bfz 287 src(:,1) = bfx * (Temp(:)-Tref) 288 src(:,2) = bfy * (Temp(:)-Tref) 289 src(:,3) = bfz * (Temp(:)-Tref) 298 call e3source(xx, src) 342 src(:,1)=src(:,1) [all …]
|
| /phasta/phSolver/common/ |
| H A D | phString.h | 8 void phstr_appendDbl(char* dest, double src); 9 void phstr_appendStr(char* dest, char* src);
|
| H A D | phStr.f | 22 subroutine phstr_appendStr(dest, src) 26 character(c_char) :: src(*) local
|
| H A D | phString.cc | 25 void phstr_appendStr(char* dest, char* src) { in phstr_appendStr() argument 27 ss << dest << src; in phstr_appendStr()
|
| H A D | elm3keps.f | 124 & src(npro,2), srcJac(npro,4), local 351 src(e,1) = pk - rho(e) * eps 352 src(e,2) = ff1 * Ce1 * pk * Tinv 411 src1 = src(:,1) 414 src1 = src(:,2)
|
| H A D | missing_win32.c | 7 void link(char *src, char *dst) { in link() argument
|
| /phasta/M2N/ |
| H A D | CMakeLists.txt | 23 add_subdirectory(src)
|
| /phasta/M2NFixBnd/ |
| H A D | CMakeLists.txt | 23 add_subdirectory(src)
|
| /phasta/AcuStat/ |
| H A D | CMakeLists.txt | 23 add_subdirectory(src)
|
| /phasta/phSolver/incompressible/e3source/ |
| H A D | e3source.fRHSonly | 1 subroutine e3source(xx, src) 13 real*8 xx(npro,nsd), src(npro,nsd) 31 src(iel,1) = -xx(iel,2)/r * Stheta 32 src(iel,2) = xx(iel,1)/r * Stheta 33 src(iel,3) = dpdz 163 c$$$ src(iel,1) = fx + fxa 164 c$$$ src(iel,2) = fy + fya 165 c$$$ src(iel,3) = fza 194 src(iel,1) = 0.0 195 src(iel,2) = t54 [all …]
|
| H A D | e3source.fimplicit | 1 subroutine e3source(xx, src) 13 real*8 xx(npro,nsd), src(npro,nsd) 31 src(iel,1) = -xx(iel,2)/r * Stheta 32 src(iel,2) = xx(iel,1)/r * Stheta 33 src(iel,3) = dpdz 163 c$$$ src(iel,1) = fx + fxa 164 c$$$ src(iel,2) = fy + fya 165 c$$$ src(iel,3) = fza 194 src(iel,1) = 0.0 195 src(iel,2) = t54 [all …]
|
| /phasta/ |
| H A D | CMakeLists.txt | 125 list(APPEND PHASTA_INCLUDES "${PHASTA_SOURCE_DIR}/shapeFunction/src") 132 list(APPEND PHASTA_INCLUDES "${PHASTA_SOURCE_DIR}/phShape/src")
|