[occt.git] / tests / bugs / modalg_5 / bug24738

puts "============"
puts "OCC24738"
puts "============"
puts ""
#######################################################################
# BRepOffsetAPI_MakePipe algorithm fails on circular path and section (the case where result is part of sphere)
#######################################################################

restore [locate_data_file bug24738_path.brep] sp
restore [locate_data_file bug24738_profile.brep] pr

pipe result sp pr

checknbshapes result -vertex 2 -edge 3 -wire 1 -face 1 -shell 1 -solid 0 -compsolid 0 -compound 0 -shape 8
set info [sprops result]

set string {Center +of +gravity +:[\t\n]*[\s\t]*X +=[\s\t]*([-0-9.+eE]+)[\t\n]*Y +=[\s\t]*([-0-9.+eE]+)[\t\n]*Z +=[\s\t]*([-0-9.+eE]+)[\t\n]*}

regexp ${string} ${info} full X Y Z

puts "X=${X}"
puts "Y=${Y}"
puts "Z=${Z}"

set good_Z 94.9994

checkreal "Z" ${Z} ${good_Z} 0.1 0.1

checkview -display result -2d -path ${imagedir}/${test_image}.png
Commit	Line	Data
9ba2c30f	1	puts "============"
	2	puts "OCC24738"
	3	puts "============"
	4	puts ""
	5	#######################################################################
	6	# BRepOffsetAPI_MakePipe algorithm fails on circular path and section (the case where result is part of sphere)
	7	#######################################################################
	8
	9	restore [locate_data_file bug24738_path.brep] sp
	10	restore [locate_data_file bug24738_profile.brep] pr
	11
	12	pipe result sp pr
	13
a4eba920	14	checknbshapes result -vertex 2 -edge 3 -wire 1 -face 1 -shell 1 -solid 0 -compsolid 0 -compound 0 -shape 8
9ba2c30f	15	set info [sprops result]
	16
	17	set string {Center +of +gravity +:[\t\n][\s\t]X +=[\s\t]([-0-9.+eE]+)[\t\n]Y +=[\s\t]([-0-9.+eE]+)[\t\n]Z +=[\s\t]([-0-9.+eE]+)[\t\n]}
	18
	19	regexp ${string} ${info} full X Y Z
	20
	21	puts "X=${X}"
	22	puts "Y=${Y}"
	23	puts "Z=${Z}"
	24
	25	set good_Z 94.9994
	26
	27	checkreal "Z" ${Z} ${good_Z} 0.1 0.1
	28
5747059b	29	checkview -display result -2d -path ${imagedir}/${test_image}.png