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

puts "============================================================="
puts "OCC26568 - Modeling Algorithms - Crash when creating pipe"
puts "============================================================="
puts ""
################################
# Exception when creating pipe
################################

box b 10 10 10
explode b f
circle c 0 0 0 0 1 0 10
mkedge e c
wire w e
pipe result w b_1

checkshape result

checknbshapes result -solid 1 -shell 1 -face 3 -wire 3 -edge 7 -vertex 4

set tolres [checkmaxtol result]

if { ${tolres} > 2.e-7} {
   puts "Error: bad tolerance of result"
}
Commit	Line	Data
ce9aefc8	1	puts "============================================================="
	2	puts "OCC26568 - Modeling Algorithms - Crash when creating pipe"
	3	puts "============================================================="
cba287d6	4	puts ""
	5	################################
	6	# Exception when creating pipe
	7	################################
	8
	9	box b 10 10 10
	10	explode b f
	11	circle c 0 0 0 0 1 0 10
	12	mkedge e c
	13	wire w e
ce9aefc8	14	pipe result w b_1
	15
	16	checkshape result
	17
	18	checknbshapes result -solid 1 -shell 1 -face 3 -wire 3 -edge 7 -vertex 4
	19
	20	set tolres [checkmaxtol result]
	21
	22	if { ${tolres} > 2.e-7} {
	23	puts "Error: bad tolerance of result"
	24	}