| /phasta/shapeFunction/src/ |
| H A D | Bn.c | 21 double t1,t2,t3,t4,t5,t6,t7,t8,t9,t10,t11,t12,t13,t14,t15,t16,t17,t18; in Bn() local 244 t12 = t10*t10; in Bn() 246 t10+3.0/10.0*t12); in Bn() 381 t12 = t7*t7; in Bn() 383 105.0/143.0*t1*t12+14.0/143.0*t*t12*t5+7.0/1716.0*t12*t7; in Bn() 390 t12 = t8*t8; in Bn() 392 40.0/33.0*t2*t8*t5+5.0/22.0*t*t12+t12*t5/77); in Bn() 422 t12 = t*t; in Bn() 425 f = (t2+4.0/3.0*t1*s*t4+4.0/7.0*t1*t6+8.0/91.0*s*t6*t4+t10/273)*(t12+ in Bn() 442 t12 = t7*t7; in Bn() [all …]
|
| H A D | BnDrv.c | 20 double t1,t2,t3,t4,t5,t6,t7,t8,t9,t10,t11,t12,t13,t14,t15,t16,t17,t18; in BnDrv() local 201 t12 = t8+6.0/11.0*s*t9+3.0/55.0*t11; in BnDrv() 202 t14 = t12*(6.0/5.0*t+3.0/5.0*s+3.0/5.0*r-3.0/5.0); in BnDrv() 205 drv[2] = t12*(2.0*t+6.0/5.0*s+6.0/5.0*r-6.0/5.0); in BnDrv() 255 t12 = t10*(6.0/5.0*t+3.0/5.0*s+3.0/5.0*r-3.0/5.0); in BnDrv() 256 drv[0] = t1*t6+2.0/9.0*t9+t12; in BnDrv() 257 drv[1] = t9+t12; in BnDrv() 267 t12 = t8*t5; in BnDrv() 268 drv[0] = t5*t6+t8*(2.0/3.0*s+r/6-1.0/6.0)*t6+2.0/3.0*t12; in BnDrv() 269 drv[1] = t8*(2.0*s+2.0/3.0*r-2.0/3.0)*t6+2.0/3.0*t12; in BnDrv() [all …]
|
| H A D | EnDrv.c | 18 double t1,t2,t3,t4,t5,t6,t7,t8,t9,t10,t11,t12,t13,t14,t15,t16,t17,t18; in EnDrv() local 72 t12 = t10*r; in EnDrv() 73 drv[0] = -21.0*t3+210.0*t4-525.0*t7+420.0*t9-105.0*t11+6.0*t12; in EnDrv() 74 drv[1] = 6.0*t3-105.0*t4+420.0*t7-525.0*t9+210.0*t11-21.0*t12; in EnDrv() 85 t12 = t11*t1; in EnDrv() 88 drv[0] = -28.0*t3+392.0*t5-1470.0*t7+1960.0*t10-980.0*t12+168.0*t14-7.0* in EnDrv() 90 drv[1] = 7.0*t3-168.0*t5+980.0*t7-1960.0*t10+1470.0*t12-392.0*t14+28.0* in EnDrv() 103 t12 = t7*t7; in EnDrv() 104 t13 = t12*t2; in EnDrv() 105 t15 = t12*r*t1; in EnDrv() [all …]
|
| H A D | Fn.c | 20 double t1,t2,t3,t4,t5,t6,t7,t8,t9,t10,t11,t12,t13,t14,t15,t16,t17,t18; in Fn() local 309 t12 = 1.0/352716.0-t2*t4+t1/1938-5.0/3876.0*t6+t3/1938-5.0/3876.0*t4+t7 in Fn() 314 f = t12+t24; in Fn() 322 t12 = t1*r; in Fn() 324 *t4-3.0/19.0*t2*s+2.0/323.0*t2+15.0/19.0*t12*t5-10.0/19.0*t12*t4+30.0/323.0*t12 in Fn() 325 *s-5.0/1292.0*t12; in Fn() 337 t12 = t1*r; in Fn() 338 t20 = 70.0/323.0*t12*s-35.0/2584.0*t12+35.0/323.0*t1*t4-105.0/2584.0*t1*s in Fn() 342 /190.0*t7+63.0/38.0*t2*t4-21.0/38.0*t2*s+21.0/646.0*t2-35.0/57.0*t12*t4+t20; in Fn() 440 t12 = t1*r; in Fn() [all …]
|
| H A D | FnDrv.c | 19 double t1,t2,t3,t4,t5,t6,t7,t8,t9,t10,t11,t12,t13,t14,t15,t16,t17,t18; in FnDrv() local 233 t12 = 6.0*r*t4-35.0/3.0*r*t2+140.0/17.0*r*t5-175.0/68.0*r*t1+35.0/102.0*r in FnDrv() 238 drv[1] = t12; in FnDrv() 268 t12 = r*s; in FnDrv() 270 80.0/51.0*t10-10.0/17.0*t11+4.0/51.0*t12-r/357+2.0/17.0*t3-5.0/34.0*t5+t2/17-s in FnDrv() 274 +40.0/17.0*t7-10.0/17.0*t8+2.0/51.0*t1+8.0/17.0*t10-15.0/34.0*t11+2.0/17.0*t12- in FnDrv() 288 t12 = r*t3; in FnDrv() 291 -15.0/34.0*t10+t1/51+40.0/51.0*r*t4-10.0/17.0*t12+2.0/17.0*t13-2.0/357.0*r-5.0/ in FnDrv() 295 34.0*t2+20.0/17.0*t9-10.0/17.0*t10+t1/17-5.0/34.0*t12+4.0/51.0*t13-r/119+t3/204 in FnDrv() 308 t12 = r*s; in FnDrv() [all …]
|
| H A D | En.c | 19 double t1,t2,t3,t4,t5,t6,t7,t8,t9,t10,t11,t12,t13,t14,t15,t18; in En() local 67 t12 = t7*t7; in En() 68 f = t3*t2-28.0*r*t3*t1+196.0*t7*t3*s-490.0*t10*t3+490.0*t12*t2-196.0* in En() 69 t12*r*t1+28.0*t12*t7*s-t12*t10; in En() 141 t12 = t8*r; in En() 145 f = t4*t3-91.0*r*t2*t4+2366.0*t8*t4*t9-26026.0*t12*t4*t1+143143.0*t15* in En() 146 t4*s-429429.0*t18*t4+736164.0*t15*t8*t2*t9-736164.0*t15*t12*t2*t1+429429.0*t26* in En() 147 t3-143143.0*t26*r*t2+26026.0*t26*t8*t9-2366.0*t26*t12*t1+91.0*t26*t15*s-t26*t18 in En()
|
| /phasta/phSolver/incompressible/e3source/ |
| H A D | e3source.fRHSonly | 65 c$$$ t12 = t2*t5 76 c$$$ t46 = -40.D0*t6*t9-6.D0*t12*t7+92.D0*t15*t19+132.D0*t23*t24+80.D0* 87 c$$$ #D0*t57*y+36.D0*t12*t60+192.D0*t50*t18+98.D0*t66*t8+24.D0*t12*t18+2 89 c$$$ t106 = -336.D0*t50*t8-12.D0*t12*t9+8.D0*t73*t9-140.D0*t6*t8+28.D0* 92 c$$$ t131 = -8.D0*t57*t18-20.D0*t6*t7+56.D0*t77*t7-42.D0*t12*t8-24.D0*t 141 c$$$ t12 = y**2 143 c$$$ fxa = 2.D0*om2*w+2.D0*t3*t5*(2.D0+x-10.D0*t7+7.D0*t7*x)*t12*t15+om
|
| H A D | e3source.fimplicit | 65 c$$$ t12 = t2*t5 76 c$$$ t46 = -40.D0*t6*t9-6.D0*t12*t7+92.D0*t15*t19+132.D0*t23*t24+80.D0* 87 c$$$ #D0*t57*y+36.D0*t12*t60+192.D0*t50*t18+98.D0*t66*t8+24.D0*t12*t18+2 89 c$$$ t106 = -336.D0*t50*t8-12.D0*t12*t9+8.D0*t73*t9-140.D0*t6*t8+28.D0* 92 c$$$ t131 = -8.D0*t57*t18-20.D0*t6*t7+56.D0*t77*t7-42.D0*t12*t8-24.D0*t 141 c$$$ t12 = y**2 143 c$$$ fxa = 2.D0*om2*w+2.D0*t3*t5*(2.D0+x-10.D0*t7+7.D0*t7*x)*t12*t15+om
|