1 puts "================"
3 puts "================"
5 #######################################################################
6 # Exception in conversion B-spline to rational
7 #######################################################################
9 2dbsplinecurve bc 2 2 0.0 3 1.0 3 0 0 1.0 0.5 1 1.0 1 0 1.0
17 if { [regexp {rational} ${info}] } {
18 puts "OK : B-spline is rational"
20 puts "Error : B-spline is non-rational"