22    double t19,t20,t21,t22,t23,t24,t25,t26,t27,t28,t29,t30,t31,t32,t33,t34;  in Bn()  local
1033       t21 = t17*t17;  in Bn()
1035 *t10)*(t13+20.0/9.0*t12*t*t15+5.0/3.0*t17*t12+10.0/21.0*t*t17*t15+5.0/126.0*t21  in Bn()
1059       t21 = t19*t19;  in Bn()
1062 *t21);  in Bn()
1563       t21 = t*t;  in Bn()
1567 171.0*t2*t13+56.0/969.0*t1*t13*t6+7.0/1938.0*s*t13*t9+t13*t11/14535)*(t21+6.0/  in Bn()
1645       t21 = t17*t17;  in Bn()
1648 t21+t21*t14/77);  in Bn()
1673       t21 = t19*t19;  in Bn()
1675 *t8*t5+25.0/1292.0*s*t12+t12*t5/1938)*(t17*t+12.0/7.0*t19*t17+6.0/7.0*t*t21+4.0  in Bn()
1676 /35.0*t21*t19);  in Bn()
1685       t21 = s+r-1.0;  in Bn()
1686       t23 = t21*t21;  in Bn()
1689 t21+3.0/10.0*t23);  in Bn()
1764       t21 = t17*t17;  in Bn()
1766 /170)*(t13+20.0/9.0*t12*t*t15+5.0/3.0*t12*t17+10.0/21.0*t*t17*t15+5.0/126.0*t21  in Bn()
1791       t21 = t19*t19;  in Bn()
1794 10.0*t21);  in Bn()
2180       t21 = t17*t17;  in Bn()
2182 56.0/15.0*t11*t9*t14+28.0/5.0*t11*t*t17+56.0/13.0*t19*t11+70.0/39.0*t10*t21+  in Bn()
2183 56.0/143.0*t9*t21*t14+28.0/715.0*t*t21*t17+8.0/6435.0*t21*t19);  in Bn()
2209       t21 = t18*t18;  in Bn()
2210       t25 = t21*t21;  in Bn()
2213 t21+40.0/33.0*t15*t21*t18+5.0/22.0*t*t25+t25*t18/77);  in Bn()
2223       t21 = s+r-1.0;  in Bn()
2224       t23 = t21*t21;  in Bn()
2227 15.0/253.0*t1*t12+18.0/4807.0*s*t12*t5+t12*t7/14421)*(t19+20.0/9.0*t18*t*t21+  in Bn()
2228 5.0/3.0*t23*t18+10.0/21.0*t*t23*t21+5.0/126.0*t27);  in Bn()
2238       t21 = t*t;  in Bn()
2243 *t11)*(t21*t+12.0/7.0*t21*t23+6.0/7.0*t*t25+4.0/35.0*t25*t23);  in Bn()
2526       t21 = t*t;  in Bn()
2530 700.0/969.0*t3*s*t9*t7+175.0/1292.0*t3*t14+7.0/646.0*s*t14*t7+t14*t9/3876)*(t21  in Bn()
3081       t21 = t19*t19;  in Bn()
3082       t26 = t21*t21;  in Bn()
3084 *t4/8855)*(t16*t15+42.0/13.0*t16*t*t19+105.0/26.0*t16*t21+350.0/143.0*t15*t*t21  in Bn()
3085 *t19+105.0/143.0*t15*t26+14.0/143.0*t*t26*t19+7.0/1716.0*t26*t21);  in Bn()
3095       t21 = s+r-1.0;  in Bn()
3096       t24 = t21*t21;  in Bn()
3099 506.0*t1*t12+3.0/1265.0*s*t12*t5+t7*t12/25300)*(t19*t+30.0/11.0*t21*t19+30.0/  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()
3110       t21 = t*t;  in Bn()
3111       t22 = t21*t21;  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()
3226       t21 = t16*t16;  in Bn()
3227       t29 = t21*t21;  in Bn()
3229 t13+126.0/17.0*t9*t8*t16+588.0/85.0*t9*t*t19+63.0/17.0*t9*t21+252.0/221.0*t11*  in Bn()
3230 t21*t13+42.0/221.0*t8*t21*t16+36.0/2431.0*t*t21*t19+9.0/24310.0*t29);  in Bn()
3241       t21 = t19*t16;  in Bn()
3244 )*(t12*t13+56.0/15.0*t11*t16*t13+28.0/5.0*t13*t*t19+56.0/13.0*t21*t13+70.0/39.0  in Bn()
3245 *t12*t23+56.0/143.0*t11*t23*t16+28.0/715.0*t*t23*t19+8.0/6435.0*t23*t21);  in Bn()
3284       t21 = t20*t20;  in Bn()
3289 *t2*s*t8*t6+15.0/253.0*t2*t13+18.0/4807.0*s*t13*t6+t13*t8/14421)*(t21+20.0/9.0*  in Bn()
3395       t21 = t17*t17;  in Bn()
3397 *t11*t9*t14+28.0/5.0*t11*t*t17+56.0/13.0*t11*t19+70.0/39.0*t10*t21+56.0/143.0*  in Bn()
3398 t9*t21*t14+28.0/715.0*t*t21*t17+8.0/6435.0*t21*t19);  in Bn()
3424       t21 = t18*t18;  in Bn()
3425       t25 = t21*t21;  in Bn()
3427 133.0*s*t6*t8+t12/1197)*(t16*t+30.0/11.0*t18*t16+30.0/11.0*t15*t*t21+40.0/33.0*  in Bn()
3428 t15*t21*t18+5.0/22.0*t*t25+t25*t18/77);  in Bn()
3439       t21 = s+r-1.0;  in Bn()
3440       t23 = t21*t21;  in Bn()
3443 133.0*t3*t9*t6+5.0/399.0*s*t13+2.0/6783.0*t13*t6)*(t19+20.0/9.0*t18*t*t21+5.0/  in Bn()
3444 3.0*t23*t18+10.0/21.0*t*t23*t21+5.0/126.0*t27);  in Bn()
3453       t21 = t*t;  in Bn()
3457 *t3*s*t9*t7+5.0/57.0*t3*t14+2.0/323.0*s*t14*t7+t14*t9/7752)*(t21*t+12.0/7.0*t23  in Bn()
3458 *t21+6.0/7.0*t*t25+4.0/35.0*t25*t23);  in Bn()
3543       t21 = t16*t16;  in Bn()
3546 143.0*t10*t21+14.0/143.0*t*t21*t14+7.0/1716.0*t21*t16);  in Bn()
3572       t21 = t19*t19;  in Bn()
3573       t25 = t21*t21;  in Bn()
3576 t21*t16+10.0/21.0*t*t21*t19+5.0/126.0*t25);  in Bn()
3586       t21 = s+r-1.0;  in Bn()
3587       t23 = t21*t21;  in Bn()
3590 7.0*t21*t19+6.0/7.0*t*t23+4.0/35.0*t23*t21);  in Bn()
3670       t21 = t17*t17;  in Bn()
3673 t11*t17*t14+5.0/22.0*t*t21+t21*t14/77);  in Bn()
3700       t21 = t19*t19;  in Bn()
3703 7.0*t*t21+4.0/35.0*t21*t19);  in Bn()
3714       t21 = s+r-1.0;  in Bn()
3715       t23 = t21*t21;  in Bn()
3718 t15*t8)*(t20+6.0/5.0*t*t21+3.0/10.0*t23);  in Bn()
3780       t21 = t17*t17;  in Bn()
3783 t15+5.0/126.0*t21);  in Bn()
3808       t21 = t19*t19;  in Bn()
3811 +3.0/10.0*t21);  in Bn()