203   PetscReal a, b, r, _aa, _bb, AA, BB, Rm;  in SolKxSolution()  local
235   Rm = PetscSqrtReal((r - a) / 2.0);  in SolKxSolution()
276   t1   = Rm * Rm;  in SolKxSolution()
289   t34  = 0.2e1 * Rm;  in SolKxSolution()
291   t37  = Rp * Rm;  in SolKxSolution()
294   t65  = Rm * t2;  in SolKxSolution()
296   t68  = B * Rm;  in SolKxSolution()
302   t80  = Rm - kn;  in SolKxSolution()
305   t88  = Rm + kn;  in SolKxSolution()
311   t110 = Rm * t4;  in SolKxSolution()
318 …(0.2e1 * t37 * (t1 + 0.5e1 * t13 - t22 - t18) * AA - 0.8e1 * B * BB * kn * Rm * Rp) * t49 - 0.2e1 …  in SolKxSolution()
321   t2   = Rm * t1;  in SolKxSolution()
325   t7   = Rm * Rm;  in SolKxSolution()
330   t14  = B * Rm;  in SolKxSolution()
333   t25  = Rp * Rm;  in SolKxSolution()
334   t32  = Rm * kn;  in SolKxSolution()
335   t37  = 0.2e1 * Rm;  in SolKxSolution()
343   t72  = 0.3e1 * t40 * Rm;  in SolKxSolution()
345   t74  = t73 * Rm;  in SolKxSolution()
346   t75  = t7 * Rm;  in SolKxSolution()
352   t83  = 0.5e1 * t45 * Rm;  in SolKxSolution()
353   t84  = t44 * Rm;  in SolKxSolution()
363   t100 = 0.2e1 * t3 * Rm * kn;  in SolKxSolution()
365   t105 = Rm - kn;  in SolKxSolution()
369   t114 = Rm + kn;  in SolKxSolution()
381   t1   = Rm * Rm;  in SolKxSolution()
394   t32  = 0.2e1 * Rm;  in SolKxSolution()
396   t35  = Rp * Rm;  in SolKxSolution()
399   t63  = Rm * t2;  in SolKxSolution()
401   t66  = B * Rm;  in SolKxSolution()
407   t78  = Rm - kn;  in SolKxSolution()
410   t86  = Rm + kn;  in SolKxSolution()
416   t108 = Rm * t4;  in SolKxSolution()
423 …-0.2e1 * t35 * (t1 + 0.5e1 * t16 - t11 - t14) * AA + 0.8e1 * B * BB * kn * Rm * Rp) * t47 + 0.2e1 …  in SolKxSolution()
426   t2   = Rm * t1;  in SolKxSolution()
430   t7   = Rm * Rm;  in SolKxSolution()
435   t14  = B * Rm;  in SolKxSolution()
438   t23  = Rp * Rm;  in SolKxSolution()
439   t30  = Rm * kn;  in SolKxSolution()
440   t35  = 0.2e1 * Rm;  in SolKxSolution()
450   t76  = Rm - kn;  in SolKxSolution()
453   t84  = Rm + kn;  in SolKxSolution()
459   t107 = 0.3e1 * t43 * Rm;  in SolKxSolution()
461   t109 = t108 * Rm;  in SolKxSolution()
462   t110 = t7 * Rm;  in SolKxSolution()
468   t118 = 0.5e1 * t41 * Rm;  in SolKxSolution()
469   t119 = t40 * Rm;  in SolKxSolution()
471   t124 = 0.2e1 * t3 * Rm * kn;  in SolKxSolution()
486   t1   = Rm * Rm;  in SolKxSolution()
492   t15  = PetscCosReal(0.2e1 * Rm);  in SolKxSolution()
501   t1  = Rm * x;  in SolKxSolution()
510   t2  = Rm * x;  in SolKxSolution()
518 …3 + UU * _PC2 * t6 - _PC1 * t6 * Rm + _PC2 * t3 * Rm - VV * _PC3 * t3 - VV * _PC4 * t6 - _PC3 * t6…  in SolKxSolution()
524   t11  = 0.3e1 * t9 * Rm;  in SolKxSolution()
525   t12  = Rm * Rm;  in SolKxSolution()
526   t14  = t3 * t12 * Rm;  in SolKxSolution()
528   t19  = 0.4e1 * t4 * UU * Rm - t11 - t14 + 0.3e1 * t3 * t15 * Rm;  in SolKxSolution()
529   t20  = Rm * x;  in SolKxSolution()
536   t53  = -0.4e1 * t4 * VV * Rm - t11 + 0.3e1 * t3 * t49 * Rm - t14;  in SolKxSolution()
550   t6  = Rm * x;  in SolKxSolution()
563   t38 = Rm * Rm;  in SolKxSolution()
566 …B * t22 + t25 * t8 + t25 * t11 - 0.2e1 * t28 * _PC1 * t10 * Rm + 0.2e1 * t28 * _PC2 * t7 * Rm - t3…  in SolKxSolution()
572 …t82 = t46 * t13 + t46 * t15 + 0.2e1 * t49 * _PC3 * t10 * Rm - 0.2e1 * t49 * _PC4 * t7 * Rm - t3 * …  in SolKxSolution()
579   t10  = t9 * Rm;  in SolKxSolution()
580   t11  = Rm * Rm;  in SolKxSolution()
581   t13  = t3 * t11 * Rm;  in SolKxSolution()
583   t18  = 0.4e1 * t4 * UU * Rm - t10 - t13 + 0.3e1 * t3 * t14 * Rm;  in SolKxSolution()
584   t19  = Rm * x;  in SolKxSolution()
591   t51  = -0.4e1 * t4 * VV * Rm - t10 + 0.3e1 * t3 * t47 * Rm - t13;  in SolKxSolution()
606   t10 = t9 * Rm;  in SolKxSolution()
607   t11 = Rm * Rm;  in SolKxSolution()
608   t13 = t3 * t11 * Rm;  in SolKxSolution()
610   t18 = 0.3e1 * t3 * t4 * Rm + t10 - t13 + 0.4e1 * t14 * UU * Rm;  in SolKxSolution()
611   t19 = Rm * x;  in SolKxSolution()
618   t51 = -0.4e1 * t14 * VV * Rm - t13 + t10 + 0.3e1 * t3 * t47 * Rm;  in SolKxSolution()