22    double t19,t20,t21,t22,t23,t24,t25,t26,t27,t28,t29,t30,t31,t32,t33,t34;  in Bn()  local
1018       t19 = t15*t15;  in Bn()
1020 11.0*t12*t10+30.0/11.0*t9*t*t15+40.0/33.0*t9*t15*t12+5.0/22.0*t*t19+t19*t12/77)  in Bn()
1046       t19 = t17*t17;  in Bn()
1048 1292.0*s*t11+t11*t4/1938)*(t15*t+12.0/7.0*t17*t15+6.0/7.0*t*t19+4.0/35.0*t19*  in Bn()
1058       t19 = s+r-1.0;  in Bn()
1059       t21 = t19*t19;  in Bn()
1061 175.0/1292.0*t1*t12+7.0/646.0*s*t12*t5+t7*t12/3876)*(t18+6.0/5.0*t*t19+3.0/10.0  in Bn()
1632       t19 = t14*t14;  in Bn()
1634 105.0/26.0*t9*t14+350.0/143.0*t8*t*t14*t12+105.0/143.0*t8*t19+14.0/143.0*t*t19*  in Bn()
1635 t12+7.0/1716.0*t19*t14);  in Bn()
1659       t19 = t17*t17;  in Bn()
1660       t23 = t19*t19;  in Bn()
1662 t5+5.0/3876.0*t11)*(t15+20.0/9.0*t14*t*t17+5.0/3.0*t19*t14+10.0/21.0*t*t19*t17+  in Bn()
1672       t19 = s+r-1.0;  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()
1750       t19 = t15*t15;  in Bn()
1752 30.0/11.0*t10*t12+30.0/11.0*t9*t*t15+40.0/33.0*t9*t15*t12+5.0/22.0*t*t19+t19*  in Bn()
1778       t19 = t17*t17;  in Bn()
1780 t8*t6/17+t12/476)*(t15*t+12.0/7.0*t17*t15+6.0/7.0*t*t19+4.0/35.0*t19*t17);  in Bn()
1790       t19 = s+r-1.0;  in Bn()
1791       t21 = t19*t19;  in Bn()
1793 5.0/17.0*t3*t9*t6+15.0/476.0*s*t13+3.0/3094.0*t13*t6)*(t18+6.0/5.0*t*t19+3.0/  in Bn()
1851       t19 = t15*t15;  in Bn()
1853 *(t11+20.0/9.0*t10*t*t13+5.0/3.0*t15*t10+10.0/21.0*t*t15*t13+5.0/126.0*t19);  in Bn()
1876       t19 = t17*t17;  in Bn()
1878 /7.0*t4*t9+8.0/91.0*s*t9*t7+t13/273)*(t16+6.0/5.0*t*t17+3.0/10.0*t19);  in Bn()
2164       t19 = t14*t14;  in Bn()
2165       t27 = t19*t19;  in Bn()
2167 t7*t6*t14+588.0/85.0*t7*t*t17+63.0/17.0*t7*t19+252.0/221.0*t9*t19*t11+42.0/  in Bn()
2168 221.0*t6*t19*t14+36.0/2431.0*t*t19*t17+9.0/24310.0*t27);  in Bn()
2179       t19 = t17*t14;  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()
2222       t19 = t18*t18;  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()
2634       t19 = t*t;  in Bn()
2638 /68.0*t4*s*t10+5.0/17.0*t4*t10*t7+15.0/476.0*s*t14+3.0/3094.0*t14*t7)*(t19+6.0/  in Bn()
3080       t19 = s+r-1.0;  in Bn()
3081       t21 = t19*t19;  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()
3094       t19 = t18*t18;  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()
3225       t19 = t16*t13;  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()
3240       t19 = t16*t16;  in Bn()
3241       t21 = t19*t16;  in Bn()
3242       t23 = t19*t19;  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()
3394       t19 = t17*t14;  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()
3438       t19 = t18*t18;  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()
3556       t19 = t16*t16;  in Bn()
3557       t23 = t19*t19;  in Bn()
3559 19.0*s*t8+4.0/969.0*t8*t6)*(t14*t+30.0/11.0*t16*t14+30.0/11.0*t13*t*t19+40.0/  in Bn()
3560 33.0*t13*t19*t16+5.0/22.0*t*t23+t23*t16/77);  in Bn()
3571       t19 = s+r-1.0;  in Bn()
3572       t21 = t19*t19;  in Bn()
3575 57.0*t4*t9+40.0/969.0*s*t9*t7+5.0/3876.0*t13)*(t17+20.0/9.0*t16*t*t19+5.0/3.0*  in Bn()
3576 t21*t16+10.0/21.0*t*t21*t19+5.0/126.0*t25);  in Bn()
3585       t19 = t*t;  in Bn()
3589 57.0*t4*s*t10+200.0/969.0*t4*t10*t7+25.0/1292.0*s*t14+t14*t7/1938)*(t19*t+12.0/  in Bn()
3590 7.0*t21*t19+6.0/7.0*t*t23+4.0/35.0*t23*t21);  in Bn()
3684       t19 = t17*t17;  in Bn()
3685       t23 = t19*t19;  in Bn()
3687 /17.0*t5*t7+9.0/68.0*s*t9+t9*t7/170)*(t15+20.0/9.0*t14*t*t17+5.0/3.0*t14*t19+  in Bn()
3688 10.0/21.0*t*t19*t17+5.0/126.0*t23);  in Bn()
3699       t19 = s+r-1.0;  in Bn()
3700       t21 = t19*t19;  in Bn()
3702 17.0*t8*t5*s+15.0/34.0*t5*t10+s*t10*t8/17+t14/476)*(t17*t+12.0/7.0*t19*t17+6.0/  in Bn()
3703 7.0*t*t21+4.0/35.0*t21*t19);  in Bn()
3793       t19 = t17*t17;  in Bn()
3796 /7.0*t*t19+4.0/35.0*t19*t17);  in Bn()
3807       t19 = s+r-1.0;  in Bn()
3808       t21 = t19*t19;  in Bn()
3810 t7+4.0/3.0*t6*s*t9+4.0/7.0*t6*t11+8.0/91.0*s*t11*t9+t15/273)*(t18+6.0/5.0*t*t19  in Bn()
3882       t19 = t17*t17;  in Bn()
3885 t16+6.0/5.0*t*t17+3.0/10.0*t19);  in Bn()