[occt.git] / tests / bugs / modalg / bug60532_1

#INTERFACE IGES
puts "==========="
puts "BUC60532"
puts "==========="

restore [locate_data_file buc60532a.brep] p 
puts [checkshape p]

restore [locate_data_file buc60532b.brep] t1
puts [checkshape t1]

restore [locate_data_file buc60532c.brep] t2
puts [checkshape t2]

# create halfspace
halfspace h1 t1 20 20 0
halfspace h2 t2 20 20 0

# first cut
bcut result p h1

set square 81.8172
set 2dviewer 0
Commit	Line	Data
0e94a94e	1	#INTERFACE IGES
	2	puts "==========="
	3	puts "BUC60532"
	4	puts "==========="
	5
	6	restore [locate_data_file buc60532a.brep] p
	7	puts [checkshape p]
	8
	9	restore [locate_data_file buc60532b.brep] t1
	10	puts [checkshape t1]
	11
	12	restore [locate_data_file buc60532c.brep] t2
	13	puts [checkshape t2]
	14
	15	# create halfspace
	16	halfspace h1 t1 20 20 0
	17	halfspace h2 t2 20 20 0
	18
	19	# first cut
	20	bcut result p h1
	21
	22	set square 81.8172
	23	set 2dviewer 0
	24