[occt.git] / tests / bugs / modalg_7 / bug24692

puts "TODO OCC24692 ALL: Faulty shapes in variables faulty_1 to faulty_"

puts "========"
puts "OCC24692"
puts "========"
puts ""
#########################################
# fuseedge corruption of spherical edge
#########################################

# Object_1
pcylinder cyl 10 40
box abox 10 40 25
ttranslate abox 0 -20 5
bop cyl abox
bopfuse fuse1

# Object_2
psphere asphere 7
ttranslate asphere 0 0 3
box abox2 5 30 25
ttranslate abox2 -2 -15 -11
bop abox2 asphere
bopfuse fuse2

# Object_Result
bop fuse1 fuse2
bopcut result
fuseedge result

checkshape result_1
Commit	Line	Data
dfdfa61f	1	puts "TODO OCC24692 ALL: Faulty shapes in variables faulty_1 to faulty_"
	2
	3	puts "========"
	4	puts "OCC24692"
	5	puts "========"
	6	puts ""
	7	#########################################
	8	# fuseedge corruption of spherical edge
	9	#########################################
	10
	11	# Object_1
	12	pcylinder cyl 10 40
	13	box abox 10 40 25
	14	ttranslate abox 0 -20 5
	15	bop cyl abox
	16	bopfuse fuse1
	17
	18	# Object_2
	19	psphere asphere 7
	20	ttranslate asphere 0 0 3
	21	box abox2 5 30 25
	22	ttranslate abox2 -2 -15 -11
	23	bop abox2 asphere
	24	bopfuse fuse2
	25
	26	# Object_Result
	27	bop fuse1 fuse2
	28	bopcut result
	29	fuseedge result
	30
	31	checkshape result_1