1 # This script creates a model described at
2 # http://www.caddd.org/2010/04/opencascade-challenge.html
4 pload MODELING VISUALIZATION
20 box h1 3 -1 2.5 2 9 0.5
35 # make box for inner cylindrical cut
40 blend bc4 bc3 1 bc3_20
41 blend bc5 bc4 1 bc3_23
42 blend bc6 bc5 1.99 bc3_21
43 blend bc7 bc6 1.99 bc3_22
45 # make inner cylindrical cut
47 revol r bc7_1 -1 0 6 1 0 0 100
50 # make outer cylindrical cut