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


puts "========================"
puts "  BUC60706 "
puts " OCC110 "
puts "(case 7-9)"
puts "========================"

restore [locate_data_file buc60706s.brep] f 
puts [checkshape f]

restore [locate_data_file buc60706b.brep] w
puts [checkshape w]
pipe t w f

restore [locate_data_file buc60706l.brep] s
puts [checkshape s]

bcut res_1 s t
puts [checkshape res_1]

restore [locate_data_file buc60706v.brep] f 
puts [checkshape f]

restore [locate_data_file buc60706e.brep] w
puts [checkshape w]
pipe t w f

bcut res_2 res_1 t
puts [checkshape res_2]

restore [locate_data_file buc60706x.brep] f 
puts [checkshape f]

restore [locate_data_file buc60706h.brep] w
puts [checkshape w]
pipe t w f

bcut result res_2 t

set square 861220
set 2dviewer 0
Commit	Line	Data
a87752f3	1
	2	puts "========================"
	3	puts " BUC60706 "
	4	puts " OCC110 "
	5	puts "(case 7-9)"
	6	puts "========================"
	7
	8	restore [locate_data_file buc60706s.brep] f
	9	puts [checkshape f]
	10
	11	restore [locate_data_file buc60706b.brep] w
	12	puts [checkshape w]
	13	pipe t w f
	14
	15	restore [locate_data_file buc60706l.brep] s
	16	puts [checkshape s]
	17
	18	bcut res_1 s t
	19	puts [checkshape res_1]
	20
	21	restore [locate_data_file buc60706v.brep] f
	22	puts [checkshape f]
	23
	24	restore [locate_data_file buc60706e.brep] w
	25	puts [checkshape w]
	26	pipe t w f
	27
	28	bcut res_2 res_1 t
	29	puts [checkshape res_2]
	30
	31	restore [locate_data_file buc60706x.brep] f
	32	puts [checkshape f]
	33
	34	restore [locate_data_file buc60706h.brep] w
	35	puts [checkshape w]
	36	pipe t w f
	37
	38	bcut result res_2 t
	39
	40	set square 861220
	41	set 2dviewer 0