| /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 118 t6 = t4*t4; in Bn() 119 t10 = t6*t6; in Bn() 120 f = t2+20.0/9.0*t1*t*t4+5.0/3.0*t1*t6+10.0/21.0*t*t6*t4+5.0/126.0*t10; in Bn() 125 t6 = t4*t4; in Bn() 126 f = (s+2.0/11.0*r-2.0/11.0)*(t2*t+12.0/7.0*t2*t4+6.0/7.0*t*t6+4.0/35.0* in Bn() 127 t6*t4); in Bn() 133 t6 = t*t; in Bn() 136 f = (t1+6.0/11.0*s*t2+3.0/55.0*t4)*(t6+6.0/5.0*t*t7+3.0/10.0*t9); in Bn() 149 t6 = t4*t4; in Bn() [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 137 t6 = t1*s; in Fn() 138 f = r*t3-15.0/8.0*r*t2+5.0/4.0*r*t6-5.0/14.0*r*t1+15.0/364.0*r*s-r/728- in Fn() 139 t3/8+t2/4-5.0/28.0*t6+5.0/91.0*t1-5.0/728.0*s+1.0/4004.0; in Fn() 162 t6 = r*t1; in Fn() 163 f = t2*t3-3.0/8.0*t2*s+t2/40-5.0/4.0*t6*t3+t6*s/2-t6/28+t1*t3/2-3.0/ in Fn() 170 t6 = r*t1; in Fn() 171 f = t3*s-t3/8-15.0/8.0*t2*s+t2/4+5.0/4.0*t6*s-5.0/28.0*t6-5.0/14.0*t1*s in Fn() 212 t6 = t3*s; in Fn() 213 f = t2*t4-10.0/9.0*t2*t6+20.0/51.0*t2*t3-5.0/102.0*t2*s+t2/612-2.0/3.0* in Fn() [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 101 t6 = s*t5; in BnDrv() 103 drv[0] = (2.0/3.0*s+r/6-1.0/6.0)*t2+2.0/3.0*t4+4.0/9.0*t6+t7/18; in BnDrv() 104 drv[1] = (2.0*s+2.0/3.0*r-2.0/3.0)*t2+2.0/3.0*t4+4.0/9.0*t6+t7/18; in BnDrv() 105 drv[2] = t4+2.0/3.0*t6+t7/12; in BnDrv() 131 t6 = t4*t1; in BnDrv() 132 drv[0] = t1*t2+2.0/7.0*t5+2.0/3.0*t6; in BnDrv() 133 drv[1] = t5+2.0/3.0*t6; in BnDrv() 134 drv[2] = t6; in BnDrv() 171 t6 = t*t5; in BnDrv() [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 125 t6 = r*s; in FnDrv() 127 drv[0] = 3.0*t1*t2-9.0/7.0*t4+9.0/91.0*t1-12.0/7.0*r*t2+72.0/91.0*t6-6.0/ in FnDrv() 129 drv[1] = 2.0*t8*s-3.0/7.0*t8-12.0/7.0*t4+36.0/91.0*t1+36.0/91.0*t6-9.0/ in FnDrv() 166 t6 = r*t1; in FnDrv() 169 t13 = 4.0*t9*t4-15.0/4.0*t9*t1+t9*s-t9/14-3.0/2.0*t5+3.0/2.0*t6-3.0/7.0* in FnDrv() 171 drv[0] = 2.0*r*t2-5.0/2.0*t5+t6-t7/7+r/182-3.0/8.0*t2+t4/2-3.0/14.0*t1+ in FnDrv() 180 t6 = t1*s; in FnDrv() 183 t10 = 3.0*t1*t3-9.0/4.0*t5+9.0/20.0*t6-3.0/140.0*t1-3.0/2.0*r*t3+6.0/5.0* in FnDrv() 186 t14 = 3.0*t11*t2-3.0/2.0*t11*s+3.0/20.0*t11-9.0/4.0*t5+6.0/5.0*t6-9.0/ in FnDrv() [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 47 t6 = t4*r; in EnDrv() 48 drv[0] = -10.0*t2+40.0*t3-30.0*t5+4.0*t6; in EnDrv() 49 drv[1] = 4.0*t2-30.0*t3+40.0*t5-10.0*t6; in EnDrv() 56 t6 = t5*t1; in EnDrv() 59 drv[0] = -15.0*t2+100.0*t4-150.0*t6+60.0*t8-5.0*t9; in EnDrv() 60 drv[1] = 5.0*t2-60.0*t4+150.0*t6-100.0*t8+15.0*t9; in EnDrv() 81 t6 = r*r; in EnDrv() 82 t7 = t6*t2; in EnDrv() 83 t10 = t6*r*t1*s; in EnDrv() [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 56 t6 = r*r; in En() 57 t11 = t6*t6; in En() 58 f = t2*t1-21.0*r*t2*s+105.0*t6*t2-175.0*t6*r*t1*s+105.0*t11*t1-21.0*t11 in En() 59 *r*s+t11*t6; in En() 87 t6 = r*r; in En() 89 t10 = t6*r; in En() 90 t13 = t6*t6; in En() 92 f = t3*s-45.0*t3*r+540.0*t6*t2*t7-2520.0*t10*t2*t1+5292.0*t13*t2*s in En() 93 -5292.0*t13*r*t2+2520.0*t13*t6*t7-540.0*t13*t10*t1+45.0*t22*s-t22*r; in En()
|
| /phasta/phSolver/incompressible/e3source/ |
| H A D | e3source.fRHSonly | 61 c$$$ t6 = t2*x*t5 76 c$$$ t46 = -40.D0*t6*t9-6.D0*t12*t7+92.D0*t15*t19+132.D0*t23*t24+80.D0* 77 c$$$ #t6*t18-252.D0*t23*t29+168.D0*t23*t19+96.D0*t34*t29-64.D0*t34*t19+2 89 c$$$ t106 = -336.D0*t50*t8-12.D0*t12*t9+8.D0*t73*t9-140.D0*t6*t8+28.D0* 91 c$$$ #4.D0*t77*t18-56.D0*t66*t18+120.D0*t6*t60 92 c$$$ t131 = -8.D0*t57*t18-20.D0*t6*t7+56.D0*t77*t7-42.D0*t12*t8-24.D0*t 102 c$$$ t6 = t5*y 116 c$$$ t50 = -84.D0*t3*t6+343.D0*t11*t5*t2+66.D0*t11*t5*x-98.D0*t11*t5*t1 117 c$$$ #8-24.D0*t22*t6+120.D0*t25*t6-287.D0*t11*t5*t1-140.D0*t33*t10+14.D0 129 c$$$ t109 = 112.D0*t55*t40+80.D0*t55*t10-12.D0*t86*t6-275.D0*t86*t89+57
|
| H A D | e3source.fimplicit | 61 c$$$ t6 = t2*x*t5 76 c$$$ t46 = -40.D0*t6*t9-6.D0*t12*t7+92.D0*t15*t19+132.D0*t23*t24+80.D0* 77 c$$$ #t6*t18-252.D0*t23*t29+168.D0*t23*t19+96.D0*t34*t29-64.D0*t34*t19+2 89 c$$$ t106 = -336.D0*t50*t8-12.D0*t12*t9+8.D0*t73*t9-140.D0*t6*t8+28.D0* 91 c$$$ #4.D0*t77*t18-56.D0*t66*t18+120.D0*t6*t60 92 c$$$ t131 = -8.D0*t57*t18-20.D0*t6*t7+56.D0*t77*t7-42.D0*t12*t8-24.D0*t 102 c$$$ t6 = t5*y 116 c$$$ t50 = -84.D0*t3*t6+343.D0*t11*t5*t2+66.D0*t11*t5*x-98.D0*t11*t5*t1 117 c$$$ #8-24.D0*t22*t6+120.D0*t25*t6-287.D0*t11*t5*t1-140.D0*t33*t10+14.D0 129 c$$$ t109 = 112.D0*t55*t40+80.D0*t55*t10-12.D0*t86*t6-275.D0*t86*t89+57
|