5 #######################################################################
6 # Implementation of the Partition operator in OCCT
7 #######################################################################
9 # split face by set of edges
11 cylinder cyl 0 0 0 0 0 1 10
13 mkface f cyl 0 2*pi -$height $height
24 set ustep [expr $pi2/$nb_uedges]
25 for {set i 0} {$i <= $pi2} {set i [expr $i + $ustep]} {
32 set vstep [expr 2*$height/$nb_vedges]
33 for {set i -20} {$i <= 20} {set i [expr $i + $vstep]} {
45 checknbshapes result -face 100
46 checkprops result -s 2513.27