59   PetscScalar a, b, r, _aa, _bb, AA, BB, Rm;  in SolKxSolution()  local
89   Rm = sqrt((r - a) / 2.0);  in SolKxSolution()
121   t1   = Rm * Rm;  in SolKxSolution()
134   t34  = 0.2e1 * Rm;  in SolKxSolution()
136   t37  = Rm * Rp;  in SolKxSolution()
139   t65  = Rm * t2;  in SolKxSolution()
141   t68  = B * Rm;  in SolKxSolution()
147   t80  = Rm - kn;  in SolKxSolution()
150   t88  = Rm + kn;  in SolKxSolution()
156   t110 = Rm * t4;  in SolKxSolution()
163 …(0.2e1 * t37 * (t1 - t13 + 0.5e1 * t15 - t18) * AA - 0.8e1 * B * BB * kn * Rm * Rp) * t49 - 0.2e1 …  in SolKxSolution()
166   t2   = Rm * t1;  in SolKxSolution()
170   t7   = Rm * Rm;  in SolKxSolution()
175   t14  = B * Rm;  in SolKxSolution()
178   t25  = Rm * Rp;  in SolKxSolution()
179   t32  = Rm * kn;  in SolKxSolution()
180   t37  = 0.2e1 * Rm;  in SolKxSolution()
190   t72  = Rm * t71;  in SolKxSolution()
191   t73  = t3 * Rm;  in SolKxSolution()
195   t79  = t7 * Rm;  in SolKxSolution()
199   t84  = 0.3e1 * t41 * Rm;  in SolKxSolution()
212   t105 = Rm - kn;  in SolKxSolution()
216   t114 = Rm + kn;  in SolKxSolution()
228   t1   = Rm * Rm;  in SolKxSolution()
241   t32  = 0.2e1 * Rm;  in SolKxSolution()
243   t35  = Rm * Rp;  in SolKxSolution()
246   t63  = Rm * t2;  in SolKxSolution()
248   t66  = B * Rm;  in SolKxSolution()
254   t78  = Rm - kn;  in SolKxSolution()
257   t86  = Rm + kn;  in SolKxSolution()
263   t108 = Rm * t4;  in SolKxSolution()
270 …-0.2e1 * t35 * (t1 - t19 + 0.5e1 * t14 - t12) * AA + 0.8e1 * B * BB * kn * Rm * Rp) * t47 + 0.2e1 …  in SolKxSolution()
273   t2   = Rm * t1;  in SolKxSolution()
277   t7   = Rm * Rm;  in SolKxSolution()
282   t14  = B * Rm;  in SolKxSolution()
285   t23  = Rm * Rp;  in SolKxSolution()
286   t30  = Rm * kn;  in SolKxSolution()
287   t35  = 0.2e1 * Rm;  in SolKxSolution()
298   t76  = Rm - kn;  in SolKxSolution()
301   t84  = Rm + kn;  in SolKxSolution()
308   t107 = Rm * t106;  in SolKxSolution()
309   t108 = t3 * Rm;  in SolKxSolution()
313   t114 = t7 * Rm;  in SolKxSolution()
317   t119 = 0.3e1 * t42 * Rm;  in SolKxSolution()
335   t1   = Rm * Rm;  in SolKxSolution()
341   t15  = cos(0.2e1 * Rm);  in SolKxSolution()
353   t1  = Rm * x;  in SolKxSolution()
362   t2  = Rm * x;  in SolKxSolution()
370 … * t3 + UU * _C2 * t6 - _C1 * t6 * Rm + _C2 * t3 * Rm - VV * _C3 * t3 - VV * _C4 * t6 - _C3 * t6 *…  in SolKxSolution()
376   t11  = 0.3e1 * t9 * Rm;  in SolKxSolution()
377   t12  = Rm * Rm;  in SolKxSolution()
378   t14  = t3 * t12 * Rm;  in SolKxSolution()
380   t19  = 0.4e1 * t4 * UU * Rm - t11 - t14 + 0.3e1 * t3 * t15 * Rm;  in SolKxSolution()
381   t20  = Rm * x;  in SolKxSolution()
388   t53  = -t11 - t14 + 0.3e1 * t3 * t46 * Rm - 0.4e1 * t4 * VV * Rm;  in SolKxSolution()
402   t6  = Rm * x;  in SolKxSolution()
415   t38 = Rm * Rm;  in SolKxSolution()
418 …BB * t22 + t25 * t8 + t25 * t11 - 0.2e1 * t28 * _C1 * t10 * Rm + 0.2e1 * t28 * _C2 * t7 * Rm - t3 …  in SolKxSolution()
424 …t82 = t46 * t13 + t46 * t15 + 0.2e1 * t49 * _C3 * t10 * Rm - 0.2e1 * t49 * _C4 * t7 * Rm - t3 * _C…  in SolKxSolution()
431   t10  = t9 * Rm;  in SolKxSolution()
432   t11  = Rm * Rm;  in SolKxSolution()
433   t13  = t3 * t11 * Rm;  in SolKxSolution()
435   t18  = 0.4e1 * t4 * UU * Rm - t10 - t13 + 0.3e1 * t3 * t14 * Rm;  in SolKxSolution()
436   t19  = Rm * x;  in SolKxSolution()
443   t51  = -t10 - t13 + 0.3e1 * t3 * t44 * Rm - 0.4e1 * t4 * VV * Rm;  in SolKxSolution()
458   t10 = t9 * Rm;  in SolKxSolution()
459   t11 = Rm * Rm;  in SolKxSolution()
460   t13 = t3 * t11 * Rm;  in SolKxSolution()
462   t18 = 0.3e1 * t3 * t4 * Rm + t10 - t13 + 0.4e1 * t14 * UU * Rm;  in SolKxSolution()
463   t19 = Rm * x;  in SolKxSolution()
470   t51 = t10 - 0.4e1 * t14 * VV * Rm + 0.3e1 * t3 * t47 * Rm - t13;  in SolKxSolution()