-- Virtual Shikki: cup
-- minimal grid: 80
my_model(x[3], a[1])
{
-- Piala
array xx[3];
array center1[3];

xx[1] = x[1]/1.73;
xx[2] = x[2]/1.73;
xx[3] = x[3]/1.73;

-- Cup body
center1 = [0,3.5,0];
Sphere1 = hfSphere(xx,center1,5.76);
Sphere2 = hfSphere(xx,center1,5.56);

-- Leg

plane1 = -xx[2]-1.95;
plane2 = xx[2]+2.6;
slab = plane1 & plane2;
Conus1 = ((0.25*(xx[2]-5.4))^2 - xx[1]^2 - xx[3]^2) & slab;
Conus2 = (0.25*(xx[2]-4.2))^2 - xx[1]^2 - xx[3]^2 ;


Leg = Conus1 \ Conus2;
Chasha = (Sphere1\Sphere2) \ xx[2];

my_model = Chasha | Leg;
}