62   PetscScalar t1, t2, t3, t4, t5, t6, t7, t8, t9, t10;  in SolKxSolution()  local
96   t1  = kn * kn;  in SolKxSolution()
102   t14 = 0.4e1 * t7 * t1;  in SolKxSolution()
103   t16 = 0.2e1 * t4 * t1;  in SolKxSolution()
104   t17 = t1 * t1;  in SolKxSolution()
105 …_aa = -0.4e1 * B * t1 * sigma * (t4 + t1) / (t6 + t9 + t12 + t14 + t16 + t17) / (t6 + t9 - t12 + t…  in SolKxSolution()
121   t1   = Rm * Rm;  in SolKxSolution()
131   t22  = t1 * Rp;  in SolKxSolution()
132   t24  = B * t1;  in SolKxSolution()
145   t76  = t73 - t75 + t1 - t13 - t18;  in SolKxSolution()
158   t115 = t73 + t75 + t1 - t13 - t18;  in SolKxSolution()
163 … * t1 * t2 * t4 * AA * t9 + ((0.2e1 * Rp * (-B * t13 + 0.3e1 * t15 * B - t19 - 0.2e1 * t20 - 0.2e1…  in SolKxSolution()
165   t1   = Rp + B;  in SolKxSolution()
166   t2   = Rm * t1;  in SolKxSolution()
226 …num2 = (0.2e1 * t12 - 0.8e1 * t14 * kn * t1 * BB) * t23 + ((-0.2e1 * t25 * (t7 - t8 + 0.5e1 * t3 -…  in SolKxSolution()
228   t1   = Rm * Rm;  in SolKxSolution()
233   t11  = B * t1;  in SolKxSolution()
239   t21  = t1 * Rp;  in SolKxSolution()
252   t74  = t71 - t73 + t1 - t19 - t12;  in SolKxSolution()
265   t113 = t71 + t73 + t1 - t19 - t12;  in SolKxSolution()
270 …* t1 * t2 * t4 * AA * t7 + ((-0.2e1 * Rp * (-t11 - t13 + 0.2e1 * t15 + 0.3e1 * t14 * B - B * t19 +…  in SolKxSolution()
272   t1   = B - Rp;  in SolKxSolution()
273   t2   = Rm * t1;  in SolKxSolution()
333 …num4 = (0.2e1 * t12 - 0.8e1 * t14 * kn * t1 * BB) * t21 + ((0.2e1 * t23 * (t7 - t8 + 0.5e1 * t3 - …  in SolKxSolution()
335   t1   = Rm * Rm;  in SolKxSolution()
337   t3   = t1 * t2;  in SolKxSolution()
339   t5   = t1 * t4;  in SolKxSolution()
343 …den1 = (-0.4e1 * t3 + 0.4e1 * t5) * t9 + ((0.8e1 * t1 + 0.8e1 * t4) * t2 * t15 - 0.8e1 * t5 - 0.8e…  in SolKxSolution()
353   t1  = Rm * x;  in SolKxSolution()
354   t2  = cos(t1);  in SolKxSolution()
355   t4  = sin(t1);  in SolKxSolution()