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

puts "================================================================================"
puts "OCC30597: Result of BRepOffsetAPI_MakePipeShell doesn't match the given profiles"
puts "================================================================================"
puts ""

restore [locate_data_file bug30597_compound.brep] a
explode a

explode a_1 v
explode a_2
explode a_3

mksweep a_1
addsweep a_2_1 a_1_1
addsweep a_3_1 a_1_2

buildsweep result

checkprops result -s 0.880677

explode result e

explode a_2_1
mkcurve c2 a_2_1_1
cvalue c2 pi x2 y2 z2
vertex v2 x2 y2 z2
distmini d2 v2 result_2

if {[dval d2_val] > 1.e-7} {
   puts "Error: result is far from first profile"
}

explode a_3_1
mkcurve c3 a_3_1_1
cvalue c3 pi x3 y3 z3
vertex v3 x3 y3 z3
distmini d3 v3 result_3

if {[dval d3_val] > 1.e-7} {
   puts "Error: result is far from second profile"
}

smallview
donly result a_2_1 a_3_1
fit

checkview -screenshot -2d -path ${imagedir}/${test_image}.png
Commit	Line	Data
9a1701fb	1	puts "================================================================================"
	2	puts "OCC30597: Result of BRepOffsetAPI_MakePipeShell doesn't match the given profiles"
	3	puts "================================================================================"
a5278fc1	4	puts ""
	5
	6	restore [locate_data_file bug30597_compound.brep] a
	7	explode a
	8
	9	explode a_1 v
	10	explode a_2
	11	explode a_3
	12
	13	mksweep a_1
	14	addsweep a_2_1 a_1_1
	15	addsweep a_3_1 a_1_2
	16
	17	buildsweep result
	18
9a1701fb	19	checkprops result -s 0.880677
	20
	21	explode result e
	22
	23	explode a_2_1
	24	mkcurve c2 a_2_1_1
	25	cvalue c2 pi x2 y2 z2
	26	vertex v2 x2 y2 z2
	27	distmini d2 v2 result_2
	28
	29	if {[dval d2_val] > 1.e-7} {
	30	puts "Error: result is far from first profile"
	31	}
	32
	33	explode a_3_1
	34	mkcurve c3 a_3_1_1
	35	cvalue c3 pi x3 y3 z3
	36	vertex v3 x3 y3 z3
	37	distmini d3 v3 result_3
	38
	39	if {[dval d3_val] > 1.e-7} {
	40	puts "Error: result is far from second profile"
	41	}
	42
	43	smallview
	44	donly result a_2_1 a_3_1
	45	fit
	46
	47	checkview -screenshot -2d -path ${imagedir}/${test_image}.png