%Special Case -- Ojika2
clc;
clear;
format long;
format infsup;

syms x y z
f1=x^2+y+z-1;
f2=x+y^2+z-1;
f3=x+y+z^2-1;

vars = [x,y,z];
zeros = rand(1,3)/1000 + [1,0,0];
tol = 0.005;
F =[f1,f2,f3]
appsol=zeros.'

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




