summaryrefslogtreecommitdiff
path: root/Master/texmf/doc/asymptote/examples/washer.asy
blob: 083039e55a37adc055badadd03b8701cc821f731 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
import three;
size(10cm);

path3[] p=reverse(unitcircle3)^^scale3(0.5)*unitcircle3;
path[] g=reverse(unitcircle)^^scale(0.5)*unitcircle;
triple H=-0.4Z;

draw(surface(p,planar=true));
draw(surface(shift(H)*p,planar=true));
material m=material(lightgray,shininess=1.0);
for(path pp : g)
  draw(extrude(pp,H),m);