Lines Matching refs:kn

54 PetscErrorCode SolKxSolution(PetscReal x, PetscReal z, PetscReal kn, PetscReal km, PetscReal B, Pet…  in SolKxSolution()  argument
96 t1 = kn * kn; in SolKxSolution()
101 t12 = 0.8e1 * t7 * kn * km; in SolKxSolution()
107 t2 = kn * kn; in SolKxSolution()
115 t16 = 0.8e1 * t4 * kn * km; in SolKxSolution()
116 …_bb = sigma * kn * (t3 - t6 + t9 + t10 + t12) / (t10 + t9 + t16 + t6 + t12 + t3) / (t10 + t9 - t16… in SolKxSolution()
126 t13 = kn * kn; in SolKxSolution()
133 t32 = 0.8e1 * t15 * BB * kn * Rp; in SolKxSolution()
140 t67 = 0.2e1 * B * kn; in SolKxSolution()
147 t80 = Rm - kn; in SolKxSolution()
150 t88 = Rm + kn; in SolKxSolution()
163 …35 + (0.2e1 * t37 * (t1 - t13 + 0.5e1 * t15 - t18) * AA - 0.8e1 * B * BB * kn * Rm * Rp) * t49 - 0… in SolKxSolution()
171 t8 = kn * kn; in SolKxSolution()
179 t32 = Rm * kn; in SolKxSolution()
186 t54 = kn * Rp; in SolKxSolution()
193 t77 = 0.8e1 * t44 * kn; in SolKxSolution()
209 t98 = 0.2e1 * t73 * kn; in SolKxSolution()
212 t105 = Rm - kn; in SolKxSolution()
216 t114 = Rm + kn; in SolKxSolution()
221 t135 = 0.2e1 * B * kn; in SolKxSolution()
226 …num2 = (0.2e1 * t12 - 0.8e1 * t14 * kn * t1 * BB) * t23 + ((-0.2e1 * t25 * (t7 - t8 + 0.5e1 * t3 -… in SolKxSolution()
238 t19 = kn * kn; in SolKxSolution()
240 t30 = 0.8e1 * t14 * BB * kn * Rp; in SolKxSolution()
247 t65 = 0.2e1 * B * kn; in SolKxSolution()
254 t78 = Rm - kn; in SolKxSolution()
257 t86 = Rm + kn; in SolKxSolution()
270 …3 + (-0.2e1 * t35 * (t1 - t19 + 0.5e1 * t14 - t12) * AA + 0.8e1 * B * BB * kn * Rm * Rp) * t47 + 0… in SolKxSolution()
278 t8 = kn * kn; in SolKxSolution()
286 t30 = Rm * kn; in SolKxSolution()
293 t52 = kn * Rp; in SolKxSolution()
296 t70 = 0.2e1 * B * kn; in SolKxSolution()
298 t76 = Rm - kn; in SolKxSolution()
301 t84 = Rm + kn; in SolKxSolution()
311 t112 = 0.8e1 * t40 * kn; in SolKxSolution()
328 t135 = 0.2e1 * t108 * kn; in SolKxSolution()
333 …num4 = (0.2e1 * t12 - 0.8e1 * t14 * kn * t1 * BB) * t21 + ((0.2e1 * t23 * (t7 - t8 + 0.5e1 * t3 - … in SolKxSolution()
357 t12 = kn * x; in SolKxSolution()
367 t24 = kn * x; in SolKxSolution()
370 …* Rm - 0.2e1 * t23 * AA * t25 - 0.2e1 * t23 * BB * t29 - t22 * AA * t29 * kn + t22 * BB * t25 * kn; in SolKxSolution()
390 t73 = kn * kn; in SolKxSolution()
391 t74 = t73 * kn; in SolKxSolution()
394 t90 = kn * x; in SolKxSolution()
397 …AA * kn - 0.3e1 * t8 * AA * kn - 0.8e1 * t86 * BB) * t91 + (-0.8e1 * t86 * AA - 0.4e1 * AA * t73 *… in SolKxSolution()
409 t18 = kn * x; in SolKxSolution()
423 t78 = kn * kn; in SolKxSolution()
424 …* AA * t19 + 0.4e1 * t62 * BB * t22 + 0.4e1 * B * AA * t22 * kn - 0.4e1 * B * BB * t19 * kn - AA *… in SolKxSolution()
445 t70 = kn * kn; in SolKxSolution()
446 t71 = t70 * kn; in SolKxSolution()
449 t86 = kn * x; in SolKxSolution()
452 …* t76 * AA * kn - t8 * AA * kn - 0.4e1 * t82 * BB) * t87 + (-0.4e1 * t82 * AA - 0.4e1 * AA * t70 *… in SolKxSolution()
473 t74 = kn * kn; in SolKxSolution()
474 t75 = t74 * kn; in SolKxSolution()
475 t83 = kn * x; in SolKxSolution()
478 …1 * t70 * AA * kn - AA * t75 - 0.4e1 * BB * t74 * B + t8 * AA * kn) * t84 + (-t8 * BB * kn - 0.4e1… in SolKxSolution()
495 PetscReal kn = 100 * M_PI; in SolKxWrapperV() local
500 SolKxSolution(x[0], x[1], kn, km, B, &v[0], &v[1], &p, &sxx, &sxz, &szz); in SolKxWrapperV()
507 PetscReal kn = 100 * M_PI; in SolKxWrapperP() local
512 SolKxSolution(x[0], x[1], kn, km, B, &vx, &vz, &v[0], &sxx, &sxz, &szz); in SolKxWrapperP()
524 PetscReal kn, km, B; in MapleTest() local
528 PetscCall(SolKxData5(x, z, &kn, &km, &B, vxMaple, vzMaple, pMaple, sxxMaple, sxzMaple, szzMaple)); in MapleTest()
534 PetscCall(SolKxSolution(x[i], z[j], kn, km, B, &vx, &vz, &p, &sxx, &sxz, &szz)); in MapleTest()