v0=vector(1.333333,2.750000,2.479167);
v1=vector(-1.416667,-2.750000,-1.270833);
v2=vector(1.333333,-2.750000,-1.270833);
v3=vector(-1.416667,2.750000,-1.270833);
v4=vector(1.333333,2.750000,-1.270833);
v5=vector(0.083333,2.750000,2.479167);
v6=vector(0.083333,-2.750000,-0.020833);
v7=vector(0.083333,2.750000,-0.020833);
v8=vector(-1.416667,-2.750000,-0.020833);
v9=vector(-1.416667,2.750000,-0.020833);
v10=vector(0.083333,-2.750000,0.104167);
v11=vector(1.333333,-2.750000,0.104167);

poly0=poly(list(v7,v6,v10,v5),FALSE);
poly1=poly(list(v6,v7,v9,v8),FALSE);
poly2=poly(list(v2,v1,v3,v4),FALSE);
poly3=poly(list(v1,v8,v9,v3),FALSE);
poly4=poly(list(v11,v2,v4,v0),FALSE);
poly5=poly(list(v1,v2,v11,v10,v6,v8),FALSE);
poly6=poly(list(v0,v4,v3,v9,v7,v5),FALSE);
poly7=poly(list(v0,v5,v10,v11),FALSE);

obj = mergepoly(list(poly0,poly1,poly2,poly3,poly4,poly5,poly6,poly7));

save("block1.dat",convex(obj));