%General Case -- cyclic9
clc;
clear;
format long;

syms y1 y2 y3 y4 y5 y6 y7 y8 y9
f1=y1+y2+y3+y4+y5+y6+y7+y8+y9;
f2=y1*y2+y2*y3+y3*y4+y4*y5+y5*y6+y6*y7+y7*y8+y8*y9+y9*y1;
f3=y1*y2*y3+y2*y3*y4+y3*y4*y5+y4*y5*y6+y5*y6*y7+y6*y7*y8+y7*y8*y9+y8*y9*y1+y9*y1*y2;
f4=y1*y2*y3*y4+y2*y3*y4*y5+y3*y4*y5*y6+y4*y5*y6*y7+y5*y6*y7*y8+y6*y7*y8*y9+y7*y8*y9*y1+y8*y9*y1*y2+y9*y1*y2*y3;
f5=y1*y2*y3*y4*y5+y2*y3*y4*y5*y6+y3*y4*y5*y6*y7+y4*y5*y6*y7*y8+y5*y6*y7*y8*y9+y6*y7*y8*y9*y1+y7*y8*y9*y1*y2+y8*y9*y1*y2*y3+y9*y1*y2*y3*y4;
f6=y1*y2*y3*y4*y5*y6+y2*y3*y4*y5*y6*y7+y3*y4*y5*y6*y7*y8+y4*y5*y6*y7*y8*y9+y5*y6*y7*y8*y9*y1+y6*y7*y8*y9*y1*y2+y7*y8*y9*y1*y2*y3+y8*y9*y1*y2*y3*y4+y9*y1*y2*y3*y4*y5;
f7=y1*y2*y3*y4*y5*y6*y7+y2*y3*y4*y5*y6*y7*y8+y3*y4*y5*y6*y7*y8*y9+y4*y5*y6*y7*y8*y9*y1+y5*y6*y7*y8*y9*y1*y2+y6*y7*y8*y9*y1*y2*y3+y7*y8*y9*y1*y2*y3*y4+y8*y9*y1*y2*y3*y4*y5+y9*y1*y2*y3*y4*y5*y6;
f8=y1*y2*y3*y4*y5*y6*y7*y8+y2*y3*y4*y5*y6*y7*y8*y9+y3*y4*y5*y6*y7*y8*y9*y1+y4*y5*y6*y7*y8*y9*y1*y2+y5*y6*y7*y8*y9*y1*y2*y3+y6*y7*y8*y9*y1*y2*y3*y4+y7*y8*y9*y1*y2*y3*y4*y5+y8*y9*y1*y2*y3*y4*y5*y6+y9*y1*y2*y3*y4*y5*y6*y7;
f9=y1*y2*y3*y4*y5*y6*y7*y8*y9-1;
F=[f1,f2,f3,f4,f5,f6,f7,f8,f9]
vars=[y1,y2,y3,y4,y5,y6,y7,y8,y9];
zeros=[-.9396926-.3420201*sqrt(-1),-2.4601472-.8954204*sqrt(-1), -.3589306-.1306401*sqrt(-1),-.9396926-.3420201*sqrt(-1),.3589306+.1306401*sqrt(-1),2.4601472+.8954204*sqrt(-1),-.9396926-.3420201*sqrt(-1),.3589306+.1306401*sqrt(-1), 2.4601472+.8954204*sqrt(-1)];
appsol=zeros.'
tol= 0.005;


[X,xs] = viss(F,vars,zeros,tol)