[occt.git] / tests / bugs / step / pro19895

puts "=========="
puts "PRO19895"
puts "=========="

#############################################################################
## There is wrong tolerance after reading of the model in optimaze mode (C30). Retrive entity number 2139 from file
## "bm4_db_punch_a.stp" and will obtaine tolerance. It is very big and isolains extend from entity. 
#############################################################################

stepread [locate_data_file bm4_db_punch_a.stp] a *

tpcompound b
isos b 0
isos b 3
tpcompound result

tpdraw 2139

checkshape tp_2139
checkshape tp_2139 r

set MaxTolerance [ lindex [ split [ lindex [tolerance tp_2139] 1 ] = ] 1 ]
puts "MaxTolerance = $MaxTolerance"
if { $MaxTolerance > 1 } {
    puts "Error : Tolerance of shape is more then 1.0"
}

checkview -display result -2d -path ${imagedir}/${test_image}.png
Commit	Line	Data
0e94a94e	1	puts "=========="
	2	puts "PRO19895"
	3	puts "=========="
	4
	5	#############################################################################
	6	## There is wrong tolerance after reading of the model in optimaze mode (C30). Retrive entity number 2139 from file
	7	## "bm4_db_punch_a.stp" and will obtaine tolerance. It is very big and isolains extend from entity.
	8	#############################################################################
	9
	10	stepread [locate_data_file bm4_db_punch_a.stp] a *
	11
	12	tpcompound b
	13	isos b 0
	14	isos b 3
	15	tpcompound result
	16
	17	tpdraw 2139
	18
352ffd73	19	checkshape tp_2139
352ffd73	20	checkshape tp_2139 r
0e94a94e	21
	22	set MaxTolerance [ lindex [ split [ lindex [tolerance tp_2139] 1 ] = ] 1 ]
	23	puts "MaxTolerance = $MaxTolerance"
	24	if { $MaxTolerance > 1 } {
	25	puts "Error : Tolerance of shape is more then 1.0"
	26	}
	27
5747059b	28	checkview -display result -2d -path ${imagedir}/${test_image}.png
0e94a94e	29