[occt.git] / tests / bugs / modalg_6 / bug21821

puts "=========="
puts "OCC21821"
puts "=========="
puts ""
############################################################
# Section of face by plane is not built due to small edges
############################################################

restore [locate_data_file bug21821_plane_tailtop.brep] a

plane p 28.85 0 0 1 0 0
mkface f p -10 10 -10 10
bsection result a f

set length 2.95277
smallview
clear
display result
display f
display a
fit
set only_screen_axo 1
Commit	Line	Data
67680042	1	puts "=========="
	2	puts "OCC21821"
	3	puts "=========="
	4	puts ""
	5	############################################################
	6	# Section of face by plane is not built due to small edges
	7	############################################################
	8
	9	restore [locate_data_file bug21821_plane_tailtop.brep] a
	10
	11	plane p 28.85 0 0 1 0 0
	12	mkface f p -10 10 -10 10
	13	bsection result a f
	14
	15	set length 2.95277
	16	smallview
	17	clear
	18	display result
	19	display f
	20	display a
	21	fit
	22	set only_screen_axo 1