22    double t19,t20,t21,t22,t23,t24,t25,t26,t27,t28,t29,t30,t31,t32,t33,t34;  in Bn()  local
1537       t24 = t20*t20;  in Bn()
1540 t20*t18+5.0/126.0*t24);  in Bn()
1565       t24 = t22*t22;  in Bn()
1568 5.0*t*t22+3.0/10.0*t24);  in Bn()
2133       t24 = t15*t15;  in Bn()
2136 323.0*t10*t15*t12+165.0/4522.0*t1*t24+55.0/29393.0*t*t24*t6+11.0/352716.0*t24*  in Bn()
2148       t24 = t16*t16;  in Bn()
2151 t8*t16*t10+360.0/4199.0*t2*t16*t13+45.0/8398.0*t*t24+5.0/46189.0*t24*t6);  in Bn()
2255       t24 = t*t;  in Bn()
2260 s*t14*t12+3.0/163438.0*t22)*(t24+6.0/5.0*t*t25+3.0/10.0*t27);  in Bn()
2286       t24 = t15*t15;  in Bn()
2289 7429.0*t10*t15*t12+225.0/14858.0*t1*t24+5.0/7429.0*s*t24*t6+t24*t8/104006;  in Bn()
2300       t24 = t16*t16;  in Bn()
2303 t10+360.0/4199.0*t2*t16*t13+45.0/8398.0*t*t24+5.0/46189.0*t24*t6);  in Bn()
2357       t24 = t20*t20;  in Bn()
2360 5.0/22.0*t*t24+t24*t17/77);  in Bn()
2385       t24 = t22*t22;  in Bn()
2388 *t*t24+4.0/35.0*t24*t22);  in Bn()
2399       t24 = s+r-1.0;  in Bn()
2400       t26 = t24*t24;  in Bn()
2403 *(t23+6.0/5.0*t*t24+3.0/10.0*t26);  in Bn()
2428       t24 = t16*t16;  in Bn()
2431 323.0*t2*t16*t13+9.0/4522.0*s*t24+t24*t6/29393);  in Bn()
2443       t24 = t16*t16;  in Bn()
2446 t16*t11+36.0/2431.0*t*t16*t14+9.0/24310.0*t24);  in Bn()
2500       t24 = t20*t20;  in Bn()
2503 /21.0*t*t20*t18+5.0/126.0*t24);  in Bn()
2528       t24 = t22*t22;  in Bn()
2531 +6.0/5.0*t*t22+3.0/10.0*t24);  in Bn()
2556       t24 = t16*t16;  in Bn()
2559 t3*t16*t11+24.0/4199.0*s*t16*t14+t24/8398);  in Bn()
3067       t24 = t20*t20;  in Bn()
3069 56.0/15.0*t14*t12*t17+28.0/5.0*t14*t*t20+56.0/13.0*t22*t14+70.0/39.0*t13*t24+  in Bn()
3070 56.0/143.0*t12*t24*t17+28.0/715.0*t*t24*t20+8.0/6435.0*t24*t22);  in Bn()
3096       t24 = t21*t21;  in Bn()
3097       t28 = t24*t24;  in Bn()
3100 11.0*t18*t*t24+40.0/33.0*t18*t24*t21+5.0/22.0*t*t28+t28*t21/77);  in Bn()
3112       t24 = s+r-1.0;  in Bn()
3113       t26 = t24*t24;  in Bn()
3117 t22+20.0/9.0*t21*t*t24+5.0/3.0*t21*t26+10.0/21.0*t*t26*t24+5.0/126.0*t30);  in Bn()
3129       t24 = t*t;  in Bn()
3134 s*t14*t12+t22/120175)*(t24*t+12.0/7.0*t26*t24+6.0/7.0*t*t28+4.0/35.0*t28*t26);  in Bn()
3163       t24 = t15*t15;  in Bn()
3166 t12+3.0/437.0*t1*t24+2.0/7429.0*s*t24*t6+t24*t8/297160;  in Bn()
3333       t24 = t16*t16;  in Bn()
3336 t16*t10+1440.0/81719.0*t2*t16*t13+135.0/163438.0*s*t24+t24*t6/81719)*(t+2.0/3.0  in Bn()
3469       t24 = t*t;  in Bn()
3474 t15*t13/14535)*(t24+6.0/5.0*t*t25+3.0/10.0*t27);  in Bn()
3486       t24 = t16*t16;  in Bn()
3489 t11+4.0/1615.0*s*t16*t14+t24/22610)*(t+2.0/3.0*s+2.0/3.0*r-2.0/3.0);  in Bn()