399   double t107, t110, t113, t114, t115, t116, t119, t120;  in func_pol()  local
593   t120 = t119 * t2;  in func_pol()
599     vsigma[0] = -0.8e1 / 0.3e1 * t120 * t10 * t128;  in func_pol()
609     vsigma[2] = -0.8e1 / 0.3e1 * t120 * t31 * t139;  in func_pol()
733     v2rhosigma[0] = -0.4e1 * t306 - 0.4e1 * t120 * t308 * t56 - 0.8e1 / 0.3e1 * t120 * t10 * t322;  in func_pol()
742     v2rhosigma[2] = -0.4e1 * t120 * t328 * t82 - 0.4e1 * t327;  in func_pol()
746     v2rhosigma[3] = -0.4e1 * t120 * t332 - 0.4e1 * t306;  in func_pol()
758     v2rhosigma[5] = -0.4e1 * t327 - 0.4e1 * t120 * t336 - 0.8e1 / 0.3e1 * t120 * t350;  in func_pol()
764     v2sigma2[0] = -0.8e1 / 0.3e1 * t120 * t361;  in func_pol()
782     v2sigma2[5] = -0.8e1 / 0.3e1 * t120 * t372;  in func_pol()
1001 …2 - 0.8e1 * t734 - 0.2e1 * t120 * t736 * t150 - 0.8e1 * t120 * t740 * t56 - 0.4e1 * t120 * t308 * …  in func_pol()
1011 …  v3rho2sigma[2] = -0.2e1 * t120 * t770 * t199 - 0.4e1 * t120 * t328 * t206 - 0.12e2 * t765 - t769;  in func_pol()
1015   t782 = t120 * t148;  in func_pol()
1022 …v3rho2sigma[3] = -0.4e1 * t120 * t787 - 0.2e1 * t782 * t784 - 0.4e1 * t790 * t791 - 0.6e1 * t728 -…  in func_pol()
1028   t797 = t120 * t197;  in func_pol()
1036 …v3rho2sigma[5] = -0.4e1 * t120 * t808 + 0.4e1 * t790 * t802 - 0.2e1 * t797 * t799 - 0.6e1 * t765 -…  in func_pol()
1041     v3rho2sigma[6] = -0.2e1 * t120 * t812 - 0.4e1 * t120 * t815 - t732 - 0.12e2 * t780;  in func_pol()
1055 …t795 - t769 - 0.8e1 * t805 - 0.2e1 * t120 * t820 - 0.8e1 * t120 * t823 - 0.4e1 * t120 * t826 - 0.8…  in func_pol()
1065     v3rhosigma2[0] = -0.4e1 * t846 - 0.4e1 * t120 * t849 - 0.8e1 / 0.3e1 * t120 * t862;  in func_pol()
1083     v3rhosigma2[5] = -0.4e1 * t120 * t867 - 0.4e1 * t865;  in func_pol()
1087     v3rhosigma2[6] = -0.4e1 * t120 * t870 - 0.4e1 * t846;  in func_pol()
1107     v3rhosigma2[11] = -0.4e1 * t865 - 0.4e1 * t120 * t874 - 0.8e1 / 0.3e1 * t120 * t887;  in func_pol()
1112     v3sigma3[0] = -0.8e1 / 0.3e1 * t120 * t896;  in func_pol()
1141     v3sigma3[9] = -0.8e1 / 0.3e1 * t120 * t905;  in func_pol()
1330 …t120 * t1820 * t150 - 0.12e2 * t120 * t1824 * t56 - 0.12e2 * t120 * t740 * t163 - 0.4e1 * t120 * t…  in func_pol()
1341 …v4rho3sigma[2] = -0.6e1 * t797 * t139 * t82 * t206 + t120 * t1884 * t432 - 0.4e1 * t120 * t328 * t…  in func_pol()
1347   t1922 = t120 * t415;  in func_pol()
1349 …4e1 * t1184 * t128 * t3 * t56 - 0.4e1 * t782 * t322 * t92 * t56 - 0.4e1 * t120 * t1824 * t92 + t19…  in func_pol()
1356   t1936 = t120 * t430;  in func_pol()
1361 …v4rho3sigma[5] = 0.4e1 * t1198 * t139 * t3 * t82 - 0.2e1 * t120 * t1952 * t199 - 0.4e1 * t120 * t8…  in func_pol()
1367 … * t56 - 0.4e1 * t1184 * t783 * t3 - 0.2e1 * t120 * t1820 * t258 - 0.4e1 * t120 * t740 * t263 - 0.…  in func_pol()
1378 …97 * t349 * t96 * t82 + 0.4e1 * t1198 * t798 * t3 - 0.4e1 * t120 * t2021 * t82 - 0.4e1 * t120 * t3…  in func_pol()
1381 …v4rho3sigma[9] = t120 * t1866 * t691 - 0.4e1 * t120 * t308 * t707 - 0.6e1 * t782 * t783 * t263 + t…  in func_pol()
1387 …t120 * t1952 * t267 - 0.12e2 * t120 * t2021 * t96 - 0.12e2 * t120 * t807 * t275 - 0.4e1 * t120 * t…  in func_pol()
1395 …- 0.8e1 * t2083 - 0.2e1 * t120 * t2085 * t150 - 0.8e1 * t120 * t2089 * t56 - 0.4e1 * t120 * t848 *…  in func_pol()
1413 …v4rho2sigma2[5] = -0.2e1 * t120 * t2115 * t199 - 0.4e1 * t120 * t866 * t206 - t2112 - 0.12e2 * t21…  in func_pol()
1417 …v4rho2sigma2[6] = -0.2e1 * t782 * t360 * t92 * t56 - 0.4e1 * t120 * t2089 * t92 - 0.4e1 * t790 * t…  in func_pol()
1435 …v4rho2sigma2[11] = -0.2e1 * t797 * t371 * t96 * t82 - 0.4e1 * t120 * t2148 * t82 + 0.4e1 * t790 * …  in func_pol()
1438 …v4rho2sigma2[12] = -0.2e1 * t120 * t2085 * t258 - 0.4e1 * t120 * t848 * t263 - t2080 - 0.12e2 * t2…  in func_pol()
1453 …- 0.8e1 * t2146 - 0.2e1 * t120 * t2115 * t267 - 0.8e1 * t120 * t2148 * t96 - 0.4e1 * t120 * t866 *…  in func_pol()
1458 …v4rhosigma3[0] = -0.4e1 * t2185 - 0.4e1 * t120 * t2187 * t56 - 0.8e1 / 0.3e1 * t120 * t10 * (-0.54…  in func_pol()
1487     v4rhosigma3[9] = -0.4e1 * t120 * t2203 * t82 - 0.4e1 * t2202;  in func_pol()
1490     v4rhosigma3[10] = -0.4e1 * t120 * t2187 * t92 - 0.4e1 * t2185;  in func_pol()
1517 …v4rhosigma3[19] = -0.4e1 * t2202 - 0.4e1 * t120 * t2203 * t96 - 0.8e1 / 0.3e1 * t120 * t31 * (-0.5…  in func_pol()
1520 …v4sigma4[0] = -0.8e1 / 0.3e1 * t120 * t10 * (-0.18351998147964406248e-7 * t398 * t408 + 0.14319720…  in func_pol()
1562 …v4sigma4[14] = -0.8e1 / 0.3e1 * t120 * t31 * (-0.18351998147964406248e-7 * t667 * t677 + 0.1431972…  in func_pol()