7 ######################################################
8 # If it is not possible to create the bezier curve,
9 # it should throw an exception.
10 ######################################################
13 set out [OCC2569 26 res]
14 if {[string compare $out "\n Degree = 25\n"] == 0} {
17 puts "OCC2569: Faulty"