5 #######################################################################
6 # Improvement of API of ThruSection
7 #######################################################################
12 polyline s1 0 0 20 0 0 -20
15 polyline s2 0 5 0 5 0 0 -5 -5 0 0 5 0
41 set nb_compound_good 0
46 set index [lsearch [whatis result] Closed]
48 puts "Faulty ${BugNumber} : result is not Closed shape"