[occt.git] / tests / bugs / moddata_3 / bug25706_2

puts "================"
puts "OCC25706"
puts "================"
puts ""
#######################################################################
# Exception in conversion B-spline to rational
#######################################################################

2dbsplinecurve bc 2 2  0.0 3  1.0 3  0 0 1.0  0.5 1 1.0  1 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
Commit	Line	Data
52ba6031	1	puts "================"
	2	puts "OCC25706"
	3	puts "================"
	4	puts ""
	5	#######################################################################
	6	# Exception in conversion B-spline to rational
	7	#######################################################################
	8
	9	2dbsplinecurve bc 2 2 0.0 3 1.0 3 0 0 1.0 0.5 1 1.0 1 0 1.0
	10	mkedge e1 bc
	11
	12	dump bc
	13
	14	setweight bc 2 0.5
	15
	16	set info [dump bc]
	17	if { [regexp {rational} ${info}] } {
	18	puts "OK : B-spline is rational"
	19	} else {
	20	puts "Error : B-spline is non-rational"
	21	}
	22
	23	mkedge result bc
	24
5747059b	25	checkview -display result -2d -path ${imagedir}/${test_image}.png