mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-04 18:06:22 +03:00
26 lines
609 B
Plaintext
26 lines
609 B
Plaintext
puts "================"
|
|
puts "OCC25706"
|
|
puts "================"
|
|
puts ""
|
|
#######################################################################
|
|
# Exception in conversion B-spline to rational
|
|
#######################################################################
|
|
|
|
bsplinecurve bc 2 2 0.0 3 1.0 3 0 0 0 1.0 0.5 1 0 1.0 1 0 0 1.0
|
|
mkedge e1 bc
|
|
|
|
dump bc
|
|
|
|
setweight bc 2 0.5
|
|
|
|
set info [dump bc]
|
|
if { [regexp {rational} ${info}] } {
|
|
puts "OK : B-spline is rational"
|
|
} else {
|
|
puts "Error : B-spline is non-rational"
|
|
}
|
|
|
|
mkedge result bc
|
|
|
|
checkview -display result -2d -path ${imagedir}/${test_image}.png
|