-- Virtual Shikki: stand
-- minimal grid: 60
my_model(x[3], a[1])
{
-- Stand
array xx[3];
array center1[3], center2[3], vertex[3], vertex1[3],center3[3];

xx[1] = x[1]/1.4+6.5;
xx[2] = x[2]/1.4+6.5;
xx[3] = x[3]/1.4+6.5;

vertex = [0,0,0];
dx = 11.5;
dy = 9.7;
dz = 11.5;
Blok1 = hfBlock(xx,vertex,dx,dy,dz);

-- four cutting planes
tang = 0.5/1.4;
plane1 = -tang*(xx[1]-11.5)-(xx[2]-9.2);
plane2 = tang*xx[1]-(xx[2]-9.2);
plane3 = -tang*(xx[3]-11.5)-(xx[2]-9.2);
plane4 = tang*xx[3]-(xx[2]-9.2);
Blok1 = Blok1 & plane1 & plane2 & plane3 & plane4;

center1 = [5.75,4.2,0];
CylZ1 = 1-((xx[1]-5.75)/4)^4-((xx[2]-4.2)/2.3)^4;
CylZ2 = 1-((xx[1]-5.75)/3.2)^4-((xx[2]-4.2)/3)^4;
hole1 = CylZ1  | CylZ2;

center2 = [0,4.2,5.75];
CylX3 = 1-((xx[2]-4.2)/2.3)^4-((xx[3]-5.75)/4)^4;
CylX4 = 1-((xx[2]-4.2)/3.2)^4-((xx[3]-5.75)/3)^4;
hole2 = CylX3  | CylX4;

center3 = [5.75,11.0,5.7];
Sphere = hfSphere(xx,center3,2.5); 
center3 = [5.75,12.44,5.7];
Bottom = hfSphere(xx,center3,2.525); 
chavanchik = (Sphere \ Bottom) & (11.3-xx[2]);

vertex1 = [0.5,-1,0.5];
dx = 10.5;
dy = 10.2;
dz = 10.5;
Blok2 = hfBlock(xx,vertex1,dx,dy,dz);

my_model = chavanchik | Blok1 \ hole1\hole2\Blok2;
}