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

puts "===================================================================="
puts "OCC28828: New functionalities of BRepFilletAPI_MakeChamfer algorithm"
puts "===================================================================="
puts ""

#KPart: cone + plane, penetrating throat
pcone a1 40 0 70
box a2 -50 -50 -20  100 100 40
bfuse b a1 a2
savehistory hh

explode a1 f
modified ff hh a1_1
generated ee hh a1_1
donly b ff ee

chamf_throat_with_penetration result b ee ff 2. 3.

checkshape result

checknbshapes result -solid 1 -shell 1 -face 8 -wire 9 -edge 17 -vertex 11 -shape 48

set tolres [checkmaxtol result]

if { ${tolres} > 1.001e-7} {
   puts "Error: bad tolerance of result"
}

checkprops result -v 446299 -deps 1.e-7

checkview -display result -2d -path ${imagedir}/${test_image}.png
Commit	Line	Data
1d54b807	1	puts "===================================================================="
	2	puts "OCC28828: New functionalities of BRepFilletAPI_MakeChamfer algorithm"
	3	puts "===================================================================="
	4	puts ""
	5
	6	#KPart: cone + plane, penetrating throat
	7	pcone a1 40 0 70
	8	box a2 -50 -50 -20 100 100 40
	9	bfuse b a1 a2
	10	savehistory hh
	11
	12	explode a1 f
	13	modified ff hh a1_1
	14	generated ee hh a1_1
	15	donly b ff ee
	16
	17	chamf_throat_with_penetration result b ee ff 2. 3.
	18
	19	checkshape result
	20
	21	checknbshapes result -solid 1 -shell 1 -face 8 -wire 9 -edge 17 -vertex 11 -shape 48
	22
	23	set tolres [checkmaxtol result]
	24
	25	if { ${tolres} > 1.001e-7} {
	26	puts "Error: bad tolerance of result"
	27	}
	28
	29	checkprops result -v 446299 -deps 1.e-7
	30
	31	checkview -display result -2d -path ${imagedir}/${test_image}.png