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

puts "========"
puts "OCC23575"
puts "========"
puts ""
##################################################################################################
# Bounding box for a planar edge has non-zero dimension in direction orthogonal to an edge plane
##################################################################################################

bsplinecurve c 3 2 0 4 1 4 0 0 0 1 0 1 0 1 1 1 0 1 1 0 0 1
mkedge e c
bounding e -save Xmin Ymin Zmin Xmax Ymax Zmax

checkreal "Xmin" [dval Xmin]  0. 0.1 0.
checkreal "Ymin" [dval Ymin] 0. 0.1 0.
checkreal "Zmin" [dval Zmin] 0. 0.1 0.
checkreal "Xmax" [dval Xmax] 1. 0.1 0.
checkreal "Ymax" [dval Ymax] 1. 0.1 0.
checkreal "Zmax" [dval Zmax] 0. 0.1 0.
Commit	Line	Data
4201bf79	1	puts "========"
	2	puts "OCC23575"
	3	puts "========"
	4	puts ""
	5	##################################################################################################
	6	# Bounding box for a planar edge has non-zero dimension in direction orthogonal to an edge plane
	7	##################################################################################################
	8
	9	bsplinecurve c 3 2 0 4 1 4 0 0 0 1 0 1 0 1 1 1 0 1 1 0 0 1
	10	mkedge e c
1f26f80b	11	bounding e -save Xmin Ymin Zmin Xmax Ymax Zmax
4201bf79	12
1a0339b4	13	checkreal "Xmin" [dval Xmin] 0. 0.1 0.
	14	checkreal "Ymin" [dval Ymin] 0. 0.1 0.
	15	checkreal "Zmin" [dval Zmin] 0. 0.1 0.
	16	checkreal "Xmax" [dval Xmax] 1. 0.1 0.
	17	checkreal "Ymax" [dval Ymax] 1. 0.1 0.
	18	checkreal "Zmax" [dval Zmax] 0. 0.1 0.