facF18 := [Complex(-.478441052867338430e-1,-.442024273781976895)*y^4+Complex(.\
265606573147074282e-1,.346161490089326118)*x^5+Complex(.330155261998031746,.12\
7875278834704730)*y^5+Complex(.442024293424868375,-.478440885595998108e-1)*x^6
+Complex(-.1809965365,-.3621677487)+Complex(.159713129592526398,.2663049395541\
99482)*y^3+Complex(-.320125256239235448e-1,.308871842102679540)*x^4+Complex(-.\
127875221713060426,.330155274219456507)*x+Complex(.638503070688524050e-1,.2875\
88412354781830)*y-Complex(.292865604788136003,.186448409517893432)*x^2+
Complex(.532958991469199839e-1,-.213009055666190966)*y^2+Complex(.207731818403\
916608,-.197002848595488140)*x^3+Complex(-.287588409822200130,.\
638503398721431138e-1)*x^2*y^4-Complex(.478440808336138904e-1,.442024306601188\
910)*x*y^5+Complex(-.745793334654765022e-1,.117146192024187662)*x^3*y^3+
Complex(.218286252904517310,.303594603989917999)*x*y^2+Complex(.25557589617286\
2194,.245021544002062970)*x^2*y+Complex(.207731802830405404,-.1970027729438529\
88)*x^3*y-Complex(.143706932454258085,.420740854883492221)*x^2*y^2+Complex(.\
107289933412350654e-1,-.404734633790436616)*x*y^3-Complex(.330155247682365538,
.127875290704780292)*x^4*y+Complex(.170442187380067056,-.138429690713380960)*x
^3*y^2+Complex(.638503881390497520e-1,.287588378991266880)*x^2*y^3-Complex(.\
212833920991547243e-1,.958627252528246044e-1)*x*y^4+Complex(.13842966499863473\
8,.170442125311147580)*x^5*y+Complex(.255575878208181062,.245021494908587878)*
x^4*y^2-Complex(.638503728628057738e-1,.287588375485235636)*x*y+Complex(-.\
107290379462734316e-1,.404734684849957228)*y^6, Complex(-.663120689681781367e-\
1,.225262337486092922)*x*y^5+Complex(.663121048266673424e-1,-.2252623163734119\
58)*x^2*y^4+Complex(-.143154587571759889,.153685092029216097)*x^3*y^3+Complex(
-.212099203850915158,.304737460087111390)*x^4*y^2+Complex(-.135256695527558562
,.376314752744864146)*x^5*y-Complex(.794751327887399106e-1,.145787188810887202
)*x*y^4+Complex(.368416939865846392,-.873729339132224558e-1)*x^2*y^3-Complex(.\
307370119060317414,.286309101569445502)*x^3*y^2+Complex(.219997037658822642,-.\
821077228259704389e-1)*x^4*y-Complex(.230527443690630496,.214731847148739274)*
x*y^3+Complex(.140521841279242360,-.227894879532995892)*x^2*y^2+Complex(.22262\
9716442359321,-.789782795435714676e-2)*x^3*y+Complex(.135256692702430680,-.376\
314794302377632)*x^2*y+Complex(.296839652305793956,-.105304429865572570e-1)*x*
y^2+Complex(.7897890873e-2,.2226296524)+Complex(.263257897360078550e-2,.\
742098881533463234e-1)*x*y+Complex(.636794172030864526e-1,-.299472257531392892
)*y^6-Complex(.299472204989360222,.636794248324432238e-1)*y^4+Complex(.2942069\
63377170283,-.847404050596708426e-1)*x^5-Complex(.161582876174276357,.36578426\
1110501220)*y^5-Complex(.378947350720218566,.209466557829527554)*x^6+Complex(-\
.288941681558735008,.233160183800132204)*x+Complex(.373682123194210958,.\
610468054224255971e-1)*y+Complex(.299472266814685804,.636793972440788808e-1)*x
^2-Complex(.233160195963755118,.288941732020515428)*y^2+Complex(.2173644633914\
47050,-.156317660326506014)*x^3-Complex(.768425290487625564e-1,.\
715773261661077770e-1)*y^3-Complex(.373682099222375885,.610467804978594777e-1)
*x^4];
t18 := 30.034;
berror18 := .2966000340e-6;