CONFIG USERHOMOTOPY: 1; SHARPENDIGITS: 100; DEGREEBOUND: 4; COEFFBOUND: 10; TRACKTOLBEFOREEG: 1e-7; TRACKTOLDURINGEG: 1e-7; FINALTOL: 1e-10; SECURITYLEVEL: 1; MAXNORM: 1e20; CONDNUMTHRESHOLD: 1e100; END; INPUT variable x1,x2,a1,a2,n1,n2; variable y1,y2,b1,b2,m1,m2; function f1, f2, f3, f4, f5, f6, f7, f8, f9, f10, f11, f12; constant d11, d1Hat1, d12, d1Hat2, d13, d1Hat3, d14, d1Hat4, d15, d1Hat5, d16, d1Hat6, d17, d1Hat7, d18, d1Hat8; constant d01, d0Hat1, d02, d0Hat2, d03, d0Hat3, d04, d0Hat4, d05, d0Hat5, d06, d0Hat6, d07, d0Hat7, d08, d0Hat8; pathvariable t; parameter s; s = t; x = x1 + I*x2; xHat = x1 - I*x2; a = a1 + I*a2; aHat = a1 - I*a2; n = n1 + I*n2; nHat = n1 - I*n2; y = y1 + I*y2; yHat = y1 - I*y2; b = b1 + I*b2; bHat = b1 - I*b2; m = m1 + I*m2; mHat = m1 - I*m2; d11=-0.235393964012611692261502504935564980706555611390441048927417176773382884389107398930478333374240150915678896167611799421490952743974500858319999200619143904083270703108994160335483119841815110220978711200071679590594326881658341267440380978613482748629252482565768401079639566770746281947685869612137+0.971900036889817836543273244884582659137551907242960520723924868745058472203955202623427246490149623854168224284665038359704235868968566144725529029075609982416024861001547933892719576606593333287258908489324483656799794986098982948130308823719155410382273819729434763986110487224407235856381673744059*I; d1Hat1=-0.594340739616907781238056821655233222650665923139295778601504305640697313448864500157006412473974307906897741273962638977699463741494667606750846396918892573565112638882582202109208668948386635254325188734446194932335972176990682823935809111886613207623118465675616445244145352553290900960003861196637+0.804213333159570928428146226490995162762804629369736764666198850180247012968310546980179476585651407311468056849060272606759642082911630003235661707505251936895274732049827159716662977412741485732836401502194509694068583883569554441222357696782580136921525151886816068509790771223687327382547206489833*I; d12=0.920132010121632952679652313293459828424508401739631816297803781912121959455283845215296443050573551994249451826996316871406086446695457396829710609549493236395562227737884302014142103645778123784796255708224258811156646301485435845039862365267479454436198492576722284601731878339463989353515550236350+0.391608329775457091875521607226421476996500595589643573419917136526569914481073755510641701587466355062057420845106206037455622958643892871787873941375725444130991090739942950034263226603076165761095040105745994106609615925320274325472243107361401540873946436374617000703943824088535036904824832334174*I; d1Hat2=0.901255552659512048717976416114229021099190013731913906679619762527474094638472407284884100154975387210986462073997815995174969758992614211503588074504311943450249636491564871772348577564314796829336981901136967107483261506256667669262718647109778396419765827309966879502546826902446042132719301889816+0.433287928288335197335529293949399555030825655604836793045452965338649860883912273640783302217904142068538582718922205142398602733189272995969198741233992572480157511599990217387361822927398466282474377017868582187566523791804552050821140501793795520705407693169626898802509178641662057699967641721423*I; d13=-0.429828591013231693363009491479785070576806012798930859756729574705987383675013869760826145716909406613983555514845403043074715544684405681716080370453835987893837123715143379685967488768953212661043350491528026526253098594999355694712030092162033646975084558796968812199257753911761566194066571979763+0.902910506278213598886227420417653000201714246942839858778633845913779121917876495277645399423614328403818267684554911504458837203774404332059622995248093076338555507623679015561362801655177098734916037006927189770857298761376742264585875688750907506072052416494532348166416892714742539106480115716564*I; d1Hat3=-0.960718122258366451332242663657736243881798847148767096627880315057061795507006190503179575958828496921420446866507876758979479695540214934393458749327115817126264778791799129708783632835591662913152599965959264634743155574963754916900045081808011488389770202741074263482008984420109318075161885589005+0.277526016013559442494987170121976941523191855374972053172299143421542674044643519343309446537141941622634084515652888879649190021871670098551733794543393845569339528328021401385229997742672333517158030836662087614680277982640235089821153904045412606171471378792681662350638550879496264217800156042045*I; d14=0.586875246501847496622905467394380954495079912338311649832246141749490468746640131923389118186044112826402358266789247696904418582651437895334360964011255849350636311611352753307968086848066789534280229299780969197252190830140066808943021432666446576013756346111746773410324591199960287689271164338764+0.809677370959196152881232310844702189334757412182856683019510878981154487956112560051329883741353601794598116975815521118369537725147180438605089224670634036752942515792227324748710086196710402208495433716373807619391560246455681368075821071972915453112404635024193069066388495679894097006595747643653*I; d1Hat4=0.162892223754992254157809521596666613355942460822096558254175603177421600075462675302043053402337396455514272612182365967541649117914706722908624719370947036941703091690544755045328313682660908634267552756480538973729001383691839536773650963867669811425601079692370288621995796093045957218362660890991+0.986643868597050339554952981592001253985026135255982143171990850106270082601504296343865576085552420662694336944375236045987543874426202440850977957484345484870577879403131748609280553257016368292415202354989949176751330873705383991559299798913730593097709389876522858047385798255438986525860879725993*I; d15=0.322880907216352200150287768715852626982736136971704022317627853104068025558026639423184946726946133599945300280752759490935233156085617330674687048077249761981531000165580592970012889021915882603036632452553912614907155853058994145122333044092888226181537309501305612277692141742588136011015610741378+0.946439601747066246313557861660703519581081027609672792961831626888835484345157137383025919765434502304165352074966873676978177345415611721989081528265549908838729745941711025671279804003563758495557817091386803775008232917255976821104458767965555243036613844354387984020300910367549293352402043585001*I; d1Hat5=-0.431975654218670112398461973008814076139323386674797574160964196528284671157647578033079891119713407948199812409136555016535554344414017837760363754029740094364939597768800031939225901292131321504096837679942819482222375798589993987585761623418939757111688171198506719807821838024767180974032337654614+0.901885266628938757898203196717864851303381611481192829167535579901615496395279585468853497915054186007786586209367418167584005797546984811417492349579595629756575975668896548765504892533300653210673991920240171509372615639725838712171623826691829146784719346945761429688380499964778602452974011786629*I; d16=-0.419496324780180335884851413227725170544953535039818891937799879104785214958118889192871155788488627751228492257330151832226339174175065742678692132619364315968769285435507978859666437590795886772665204564770562571343226132013802323829114853580590428265613055522290270486256386266608176763505151049916+0.907757034396275806392001595052634937859161442779788439408177746885394934200353658078145144135501674627380508407321372695895779520024633974005190956935931209008470880061677781874385350838597542527137560412595790418407456491852011143995810777019869132013369870097748054911365312718823743308198121764286*I; d1Hat6=0.871819678135829918059581752608162247965323668359363795252973686423979201663489757247377833364803686029775432286067254403357920466042381800164497722612638798309965973180733534980630693405088977097256805631870662284684548560007223750382374649837177585765667281455664548047458519137995826407916622378837+0.489826958032260536719548614945205424931333332450499047872273312153103837964889012888846436200670851377852609337809197766683782743680435912619471602815770451495027844505075844691962591311101687334043699440425795695833452216378282485165858036751209180432741535644838099614243180558878367484971533502840*I; d17=0.158481715928229594197111396309738686171814956718432972845777066863162222773225458063054013302938706038930192585641238847993876124991542916150066265558505495412721082657282552645624801861512286968415250612644553302622435199957180661493554913098191188889667832927786081460934676454016478640515469857916e-1+0.999874409842138343832812638176256123117007626394474535228471743473983046830006328234447355128062860477448648294734372007222547583534631333932776218613974863254702979769504158388374741419024288592976169771464833373538059998893262554134768722257624649608718229867384274281221751180564843307553811128975*I; d1Hat7=-0.194363192556878997788669365497921488081959315237573588693536375701140796942848092450532946909760944277877285345065454774609937377023959023593349279121459444550853817930928452878669337883332007779221786093665386005521273912423009681394031108408225307638500403954593973926430177317901729140465339331449+0.980929635284354928003115441670109616970736896022917657470545196108544180920448854704347746358394312284953910016918667608261125033265553920329554875660224959541572579110769743196293926590391400088723725331836887114248441874986187532440846228829061454235134851821626427205388664228131221365572718955818*I; d18=0.371407314718774191218327063810331011669496340087712875970387048948546468863999963499022492406379609005013733978045380069422429401591080778943844024936256242627673491262883209140652398109471930211184954250975126322993255552529414421250791538563362261892977514323486803270747066960745371086703790154356+0.928470035366456734860178141789709781478323234965163968258457583042295840815344340538473497309699145978137056173181635564616843815535388633712816024899101129002018208473036921211482105349471560328724441071016686774089948110825826021895993287504883780327186169061762336748634053810937744085071584584073*I; d1Hat8=0.730394491766873740037278623099026898955852005696925510183934510773367259971015419948171076175200975774856233654241930163734636115772111967985013879415757172845305196563266275799188788822223261281089736902928113483143741184295386444508430730034746433036475042518537369261790232642519039929524591752039+0.683025538612290988748809806618864725119581636153407147121180691142272509967459252112643742087394187358076668513147588514508595775158892260313540346204429886099774692076316460475901967230892046503152939496136150029289943393718737983224859320925724225607331393674391024445921087428607802528737465440893*I; d01 = 0.27 + I*0.1; d0Hat1 = 0.27 - I*0.1; d02 = 0.55 + I*0.7; d0Hat2 = 0.55 - I*0.7; d03 = 0.95 + I*1.0; d0Hat3 = 0.95 - I*1.0; d04 = 1.15 + I*1.3; d0Hat4 = 1.15 - I*1.3; d05 = 0.85 + I*1.48; d0Hat5 = 0.85 - I*1.48; d06 = 0.45 + I*1.4; d0Hat6 = 0.45 - I*1.4; d07 = -0.05 + I*1.0; d0Hat7 = -0.05 - I*1.0; d08 = -0.23 + I*0.4; d0Hat8 = -0.23 - I*0.4; d1 = d01*(1-s) + s*d11; dHat1 = d0Hat1*(1-s) + s*d1Hat1; d2 = d02*(1-s) + s*d12; dHat2 = d0Hat2*(1-s) + s*d1Hat2; d3 = d03*(1-s) + s*d13; dHat3 = d0Hat3*(1-s) + s*d1Hat3; d4 = d04*(1-s) + s*d14; dHat4 = d0Hat4*(1-s) + s*d1Hat4; d5 = d05*(1-s) + s*d15; dHat5 = d0Hat5*(1-s) + s*d1Hat5; d6 = d06*(1-s) + s*d16; dHat6 = d0Hat6*(1-s) + s*d1Hat6; d7 = d07*(1-s) + s*d17; dHat7 = d0Hat7*(1-s) + s*d1Hat7; d8 = d08*(1-s) + s*d18; dHat8 = d0Hat8*(1-s) + s*d1Hat8; aminusx = a - x; aHatminusxHat = aHat - xHat; bminusy = b - y; bHatminusyHat = bHat - yHat; pz1 = nHat - x*dHat1; pw1 = mHat - y*dHat1; qz1 = n - xHat*d1; qw1 = m - yHat*d1; rz1 = d1*aHatminusxHat + dHat1*aminusx - d1*dHat1; rw1 = d1*bHatminusyHat + dHat1*bminusy - d1*dHat1; pz2 = nHat - x*dHat2; pw2 = mHat - y*dHat2; qz2 = n - xHat*d2; qw2 = m - yHat*d2; rz2 = d2*aHatminusxHat + dHat2*aminusx - d2*dHat2; rw2 = d2*bHatminusyHat + dHat2*bminusy - d2*dHat2; pz3 = nHat - x*dHat3; pw3 = mHat - y*dHat3; qz3 = n - xHat*d3; qw3 = m - yHat*d3; rz3 = d3*aHatminusxHat + dHat3*aminusx - d3*dHat3; rw3 = d3*bHatminusyHat + dHat3*bminusy - d3*dHat3; pz4 = nHat - x*dHat4; pw4 = mHat - y*dHat4; qz4 = n - xHat*d4; qw4 = m - yHat*d4; rz4 = d4*aHatminusxHat + dHat4*aminusx - d4*dHat4; rw4 = d4*bHatminusyHat + dHat4*bminusy - d4*dHat4; pz5 = nHat - x*dHat5; pw5 = mHat - y*dHat5; qz5 = n - xHat*d5; qw5 = m - yHat*d5; rz5 = d5*aHatminusxHat + dHat5*aminusx - d5*dHat5; rw5 = d5*bHatminusyHat + dHat5*bminusy - d5*dHat5; pz6 = nHat - x*dHat6; pw6 = mHat - y*dHat6; qz6 = n - xHat*d6; qw6 = m - yHat*d6; rz6 = d6*aHatminusxHat + dHat6*aminusx - d6*dHat6; rw6 = d6*bHatminusyHat + dHat6*bminusy - d6*dHat6; pz7 = nHat - x*dHat7; pw7 = mHat - y*dHat7; qz7 = n - xHat*d7; qw7 = m - yHat*d7; rz7 = d7*aHatminusxHat + dHat7*aminusx - d7*dHat7; rw7 = d7*bHatminusyHat + dHat7*bminusy - d7*dHat7; pz8 = nHat - x*dHat8; pw8 = mHat - y*dHat8; qz8 = n - xHat*d8; qw8 = m - yHat*d8; rz8 = d8*aHatminusxHat + dHat8*aminusx - d8*dHat8; rw8 = d8*bHatminusyHat + dHat8*bminusy - d8*dHat8; gamma1 = qz1*rw1 - qw1*rz1; gammaHat1 = pw1*rz1 - pz1*rw1; gammaZero1 = pz1*qw1 - pw1*qz1; gamma2 = qz2*rw2 - qw2*rz2; gammaHat2 = pw2*rz2 - pz2*rw2; gammaZero2 = pz2*qw2 - pw2*qz2; gamma3 = qz3*rw3 - qw3*rz3; gammaHat3 = pw3*rz3 - pz3*rw3; gammaZero3 = pz3*qw3 - pw3*qz3; gamma4 = qz4*rw4 - qw4*rz4; gammaHat4 = pw4*rz4 - pz4*rw4; gammaZero4 = pz4*qw4 - pw4*qz4; gamma5 = qz5*rw5 - qw5*rz5; gammaHat5 = pw5*rz5 - pz5*rw5; gammaZero5 = pz5*qw5 - pw5*qz5; gamma6 = qz6*rw6 - qw6*rz6; gammaHat6 = pw6*rz6 - pz6*rw6; gammaZero6 = pz6*qw6 - pw6*qz6; gamma7 = qz7*rw7 - qw7*rz7; gammaHat7 = pw7*rz7 - pz7*rw7; gammaZero7 = pz7*qw7 - pw7*qz7; gamma8 = qz8*rw8 - qw8*rz8; gammaHat8 = pw8*rz8 - pz8*rw8; gammaZero8 = pz8*qw8 - pw8*qz8; f1 = n - a*xHat; f2 = nHat - aHat*x; f3 = m - b*yHat; f4 = mHat - bHat*y; f5 = gamma1*gammaHat1 + gammaZero1*(gamma1 + gammaHat1); f6 = gamma2*gammaHat2 + gammaZero2*(gamma2 + gammaHat2); f7 = gamma3*gammaHat3 + gammaZero3*(gamma3 + gammaHat3); f8 = gamma4*gammaHat4 + gammaZero4*(gamma4 + gammaHat4); f9 = gamma5*gammaHat5 + gammaZero5*(gamma5 + gammaHat5); f10= gamma6*gammaHat6 + gammaZero6*(gamma6 + gammaHat6); f11= gamma7*gammaHat7 + gammaZero7*(gamma7 + gammaHat7); f12= gamma8*gammaHat8 + gammaZero8*(gamma8 + gammaHat8); END;