| /phasta/phSolver/incompressible/ |
| H A D | e3stab.f | 440 c1 = 1.259921049894873D+00 443 tmp1(:) = c1 * dxidx(:,1,1)+c2 *(dxidx(:,2,1)+dxidx(:,3,1)) 444 tmp2(:) = c1 * dxidx(:,2,1)+c2 *(dxidx(:,1,1)+dxidx(:,3,1)) 445 tmp3(:) = c1 * dxidx(:,3,1)+c2 *(dxidx(:,1,1)+dxidx(:,2,1)) 450 tmp1(:) = c1 * dxidx(:,1,2)+c2 *(dxidx(:,2,2)+dxidx(:,3,2)) 451 tmp2(:) = c1 * dxidx(:,2,2)+c2 *(dxidx(:,1,2)+dxidx(:,3,2)) 452 tmp3(:) = c1 * dxidx(:,3,2)+c2 *(dxidx(:,1,2)+dxidx(:,2,2)) 461 tmp1(:) = c1 * dxidx(:,1,3)+c2 *(dxidx(:,2,3)+dxidx(:,3,3)) 462 tmp2(:) = c1 * dxidx(:,2,3)+c2 *(dxidx(:,1,3)+dxidx(:,3,3)) 463 tmp3(:) = c1 * dxidx(:,3,3)+c2 *(dxidx(:,1,3)+dxidx(:,2,3))
|
| H A D | stats.f | 95 & d0, d1, d2, c0, c1, c2, c3, c4, c5 local 163 c1 = r1 + r2 - r4 * r4 * (d1 + d2) + reg 168 det = c0 * (c1 * c2 - c4 * c4) 170 & + c5 * (c3 * c4 - c1 * c5) 172 stsCInv(i,1) = det * (c1 * c2 - c4 * c4) 174 stsCInv(i,3) = det * (c0 * c1 - c3 * c3) 177 stsCInv(i,6) = det * (c3 * c4 - c1 * c5)
|
| H A D | itrPC.f | 187 c1 = -(1.0-c0)/fctCr 195 posinc = max(updFct*updFct2*solinc,c1*y(:,is))
|
| /phasta/phSolver/common/ |
| H A D | proces.f | 49 real*8 c0, c1, c2, c3, x1, x2 local 175 c1 = 0 !zero derivative 179 c2 = (c2 - c1)/(x2 - x1) 192 & c1 + (point2x(nn,1) - x1)*(
|
| H A D | INIprofile.f | 185 c1 = 9.82
|
| /phasta/phSolver/compressible/ |
| H A D | e3tau.f | 1440 c1 = 1.259921049894873D+00 1443 tmp1(:) = c1 * dxidx(:,1,1) + c2 *(dxidx(:,2,1)+dxidx(:,3,1)) 1444 tmp2(:) = c1 * dxidx(:,2,1) + c2 *(dxidx(:,1,1)+dxidx(:,3,1)) 1445 tmp3(:) = c1 * dxidx(:,3,1) + c2 *(dxidx(:,1,1)+dxidx(:,2,1)) 1450 tmp1(:) = c1 * dxidx(:,1,2) + c2 *(dxidx(:,2,2)+dxidx(:,3,2)) 1451 tmp2(:) = c1 * dxidx(:,2,2) + c2 *(dxidx(:,1,2)+dxidx(:,3,2)) 1452 tmp3(:) = c1 * dxidx(:,3,2) + c2 *(dxidx(:,1,2)+dxidx(:,2,2)) 1461 tmp1(:) = c1 * dxidx(:,1,3) + c2 *(dxidx(:,2,3)+dxidx(:,3,3)) 1462 tmp2(:) = c1 * dxidx(:,2,3) + c2 *(dxidx(:,1,3)+dxidx(:,3,3)) 1463 tmp3(:) = c1 * dxidx(:,3,3) + c2 *(dxidx(:,1,3)+dxidx(:,2,3))
|
| H A D | spsi3pre.f | 25 integer sparseloc, c, c1 local
|