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

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

#KPart: plane + plane, penetrating throat
polyline b 0 0 0  20 0 0  20 0 20  10 0 20  10 0 40  0 0 40  0 0 0
mkplane b b
prism b b 0 20 0
explode b f
explode b_4 e
donly b b_4_1

chamf_throat_with_penetration result b b_4_1 b_4 1. 2.

checkshape result

checknbshapes result -solid 1 -shell 1 -face 9 -wire 9 -edge 17 -vertex 9 -shape 47

set tolres [checkmaxtol result]

if { ${tolres} > 0.0001} {
   puts "Error: bad tolerance of result"
}

checkprops result -v 12052 -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: plane + plane, penetrating throat
	7	polyline b 0 0 0 20 0 0 20 0 20 10 0 20 10 0 40 0 0 40 0 0 0
	8	mkplane b b
	9	prism b b 0 20 0
	10	explode b f
	11	explode b_4 e
	12	donly b b_4_1
	13
	14	chamf_throat_with_penetration result b b_4_1 b_4 1. 2.
	15
	16	checkshape result
	17
	18	checknbshapes result -solid 1 -shell 1 -face 9 -wire 9 -edge 17 -vertex 9 -shape 47
	19
	20	set tolres [checkmaxtol result]
	21
	22	if { ${tolres} > 0.0001} {
	23	puts "Error: bad tolerance of result"
	24	}
	25
	26	checkprops result -v 12052 -deps 1.e-7
	27
	28	checkview -display result -2d -path ${imagedir}/${test_image}.png