200   PetscReal kn, km, x, z;  in SolKxSolution()  local
228   kn = (PetscReal)n * PETSC_PI;  in SolKxSolution()
251   t1  = kn * kn;  in SolKxSolution()
255   t8  = pow(km + kn, 0.2e1);  in SolKxSolution()
257   t16 = pow(km - kn, 0.2e1);  in SolKxSolution()
261   t3  = kn * kn;  in SolKxSolution()
263   t6  = km - kn;  in SolKxSolution()
264   t7  = km + kn;  in SolKxSolution()
268 …_bb = sigma * kn * (t5 + 0.4e1 * t6 * t7 * t9) / (t5 + 0.4e1 * t13 * t9) / (t5 + 0.4e1 * t19 * t9);  in SolKxSolution()
286   t22  = kn * kn;  in SolKxSolution()
288   t32  = 0.8e1 * t13 * BB * kn * Rp;  in SolKxSolution()
295   t67  = 0.2e1 * B * kn;  in SolKxSolution()
302   t80  = Rm - kn;  in SolKxSolution()
305   t88  = Rm + kn;  in SolKxSolution()
318 …35 + (0.2e1 * t37 * (t1 + 0.5e1 * t13 - t22 - t18) * AA - 0.8e1 * B * BB * kn * Rm * Rp) * t49 - 0…  in SolKxSolution()
326   t8   = kn * kn;  in SolKxSolution()
334   t32  = Rm * kn;  in SolKxSolution()
350   t80  = 0.8e1 * t45 * kn;  in SolKxSolution()
363   t100 = 0.2e1 * t3 * Rm * kn;  in SolKxSolution()
365   t105 = Rm - kn;  in SolKxSolution()
369   t114 = Rm + kn;  in SolKxSolution()
374   t135 = 0.2e1 * B * kn;  in SolKxSolution()
379 …kn * t1 * BB) * t23 + ((-0.2e1 * t25 * (t7 + 0.5e1 * t3 - t8 - t9) * AA + 0.8e1 * B * BB * t32 * R…  in SolKxSolution()
386   t11  = kn * kn;  in SolKxSolution()
393   t30  = 0.8e1 * t16 * BB * kn * Rp;  in SolKxSolution()
400   t65  = 0.2e1 * B * kn;  in SolKxSolution()
407   t78  = Rm - kn;  in SolKxSolution()
410   t86  = Rm + kn;  in SolKxSolution()
423 …3 + (-0.2e1 * t35 * (t1 + 0.5e1 * t16 - t11 - t14) * AA + 0.8e1 * B * BB * kn * Rm * Rp) * t47 + 0…  in SolKxSolution()
431   t8   = kn * kn;  in SolKxSolution()
439   t30  = Rm * kn;  in SolKxSolution()
448   t70  = 0.2e1 * B * kn;  in SolKxSolution()
450   t76  = Rm - kn;  in SolKxSolution()
453   t84  = Rm + kn;  in SolKxSolution()
466   t115 = 0.8e1 * t41 * kn;  in SolKxSolution()
471   t124 = 0.2e1 * t3 * Rm * kn;  in SolKxSolution()
484 …kn * t1 * BB) * t21 + ((0.2e1 * t23 * (t7 + 0.5e1 * t3 - t8 - t9) * AA - 0.8e1 * B * BB * t30 * Rp…  in SolKxSolution()
505   t12 = kn * x;  in SolKxSolution()
515   t24 = kn * x;  in SolKxSolution()
518 …* Rm - 0.2e1 * t23 * AA * t25 - 0.2e1 * t23 * BB * t29 - t22 * AA * t29 * kn + t22 * BB * t25 * kn;  in SolKxSolution()
539   t80  = kn * kn;  in SolKxSolution()
541   t87  = t80 * kn;  in SolKxSolution()
542   t90  = kn * x;  in SolKxSolution()
545 …kn - 0.8e1 * t76 * BB - 0.4e1 * BB * B * t80 + 0.4e1 * AA * t83 * kn - AA * t87) * t91 + (-0.4e1 *…  in SolKxSolution()
557   t18 = kn * x;  in SolKxSolution()
571   t78 = kn * kn;  in SolKxSolution()
572 …* AA * t19 + 0.4e1 * t62 * BB * t22 + 0.4e1 * B * AA * t22 * kn - 0.4e1 * B * BB * t19 * kn - AA *…  in SolKxSolution()
594   t76  = kn * kn;  in SolKxSolution()
596   t83  = t76 * kn;  in SolKxSolution()
597   t86  = kn * x;  in SolKxSolution()
600 … kn - 0.4e1 * t72 * BB - 0.4e1 * BB * B * t76 + 0.4e1 * AA * t79 * kn - AA * t83) * t87 + (-0.4e1 …  in SolKxSolution()
620   t71 = kn * kn;  in SolKxSolution()
622   t80 = t71 * kn;  in SolKxSolution()
623   t83 = kn * x;  in SolKxSolution()
626 …* t71 + 0.4e1 * AA * t74 * kn + t8 * AA * kn - AA * t80) * t84 + (-0.4e1 * AA * t71 * B - t8 * BB …  in SolKxSolution()