Gold Fish 3/goldfish_volume_3.bin/files/gfx/3d/irit/scripts/closloop.irt

Text File | 1993-12-30 | 423 b | 26 lines

#
# Routines to test the boolean operations among geometric objects:
#
# Intersection between a box and a cylinder - make a hole in the box
#
b=box(vector(-3,-2,-1),6,4,2);
c=cylin(vector(0,0,-4),vector(0,0,8),1);

save_view = view_mat;
view_mat = view_mat * scale(vector(0.1, 0.1, 0.1));

a1=b+c;
interact(list(view_mat, a1));

a2=b*c;
interact(a2);

a3=b-c;
interact(a3);

free(b);
free(c);
free(a1);
free(a2);
free(a3);