-- Bar: wine, Tatsushi Someya, graduate school, Hosei University, 2004
wine(x[3], a[1])
{
array vertex01[3];
array center01[3];

center01=[0, 0, 0];
obj02 = hfEllipsoid(x, center01, 2.9, 4.9, 2.9);
vertex01=[-7,-9,-7];
obj06 = hfBlock(x,vertex01,14,8,14);
wine = obj02&obj06;
}