5 #########################################
6 ## Incorrect value of IsClosed flag in shapes produced by some algorithms
7 #########################################
13 revol result ff 0 0 0 1 0 0 90
15 set info [whatis result]
16 if { [regexp {Closed} ${info}] != 1 } {
17 puts "OK : value of IsClosed flag is correct"
19 puts "Error : value of IsClosed flag is not correct"