facCor01 := [95.118480010082*y-57.287266352023*x-82.147778573330-50.8019154676\
95*x^2+77.824210730841*x^3+52.963699162421*x^5-107.00828989405*x^4+95.11848003\
6456*x^6+20.536944538933*x^7-77.824210836523*x*y^5-39.992997322818*y^5-36.7503\
21805676*y^3-65.934400852203*y^7-45.397456351694*y^2-24.860511728357*y^6+33.50\
7646242601*y^4-31.345862813536*x^2*y^4+71.338860032216*x^2*y^5-98.361155523763
*x^2*y^3-57.287266244089*x^2*y^2-20.536944513637*x^2*y+73.500643643602*x*y^6-\
94.037588265032*x*y^4+85.390453608213*x*y^3+46.478348000380*x*y^2+86.471345623\
545*x^3*y-54.044590910392*x^6*y-57.287266346707*x^5*y^2+91.875804528312*x^5*y+
84.309561895371*x^4*y^3+18.375160836971*x^4*y^2+32.426754673322*x^3*y^2-71.338\
860025041*x*y-91.875804552903*x^3*y^4-92.956696300561*x^3*y^3+77.824211034496*
x^4*y, 21.278725278583*y-77.713605361937+37.931640545097*x+28.680020905181*x^2
+49.958746285554*x^3+58.285203832865*x^5-86.040062906311*x^4+.11486248276461e-\
6*x^6-78.638767117259*x^8-34.230992665823*x^7+.92516184314104*x*y^5-.925161904\
64664*y^5+51.809070273876*y^3-83.264576934917*y^7-53.659394062816*y^8-2.775485\
8130871*y^2+46.258098275026*y^6+86.965224907420*y^4-56.434879944891*x^2*y^4+91\
.591034539829*x^2*y^5-46.258098214130*x^2*y^3-11.101943655772*x^2*y^2-16.65291\
5438636*x^2*y-24.054211115016*x*y^7-57.360041925340*x*y^6-43.482612333629*x*y^
4-84.189738845162*x*y^3-43.482612366707*x*y^2+61.060689736808*x^3*y-50.8839081\
22944*x^7*y-32.380668822607*x^6*y^2+89.740710798594*x^6*y+73.087795329273*x^5*
y^3+51.809070164128*x^5*y^2+45.332936285282*x^5*y+45.332936371513*x^4*y^4-54.5\
84556075028*x^4*y^3+41.632288361969*x^4*y^2+85.114900897130*x^3*y^5+71.2374712\
49237*x^3*y^2-4.6258098171200*x^2*y^6-56.434880014869*x*y+39.781964520704*x^3*
y^4-57.360041925269*x^3*y^3-.15054677696065e-6*x^4*y];
t4 := 47.737;
berror4 := .23770292610052e-8;