[occt.git] / tests / bugs / modalg_6 / bug26738

puts "============"
puts "OCC26738"
puts "============"
puts ""
#######################################################################
# Make Boolean operations non-destructive when running with fuzzy option
#######################################################################

restore [locate_data_file bug26619_shell_ft81_h0.brep] h0
restore [locate_data_file bug26619_the_face.brep] f0

regexp {Tolerance +MAX=([-0-9.+eE]+)} [tolerance h0] full ExpectedMaxTol_h0
regexp {Tolerance +MAX=([-0-9.+eE]+)} [tolerance f0] full ExpectedMaxTol_f0

#turn on non-destructive mode of BOP and fuzzy value;
#with this combination the test is fail before the fix 26738,
#as tolerance of input shape is changed
bnondestructive 1
bfuzzyvalue 0.1

bclearobjects
bcleartools
baddobjects h0
baddtools f0
bfillds
bbop result 4

regexp {Tolerance +MAX=([-0-9.+eE]+)} [tolerance h0] full MaxTol_h0
regexp {Tolerance +MAX=([-0-9.+eE]+)} [tolerance f0] full MaxTol_f0

set tol_abs_MaxTol 0.0001
set tol_rel_MaxTol 0.0001
checkreal "MaxTolerance h0" ${MaxTol_h0} ${ExpectedMaxTol_h0} ${tol_abs_MaxTol} ${tol_rel_MaxTol}
checkreal "MaxTolerance f0" ${MaxTol_f0} ${ExpectedMaxTol_f0} ${tol_abs_MaxTol} ${tol_rel_MaxTol}

checkprops result -l 150.23

set 2dviewer 1
Commit	Line	Data
0d0481c7	1	puts "============"
	2	puts "OCC26738"
	3	puts "============"
	4	puts ""
	5	#######################################################################
	6	# Make Boolean operations non-destructive when running with fuzzy option
	7	#######################################################################
	8
	9	restore [locate_data_file bug26619_shell_ft81_h0.brep] h0
	10	restore [locate_data_file bug26619_the_face.brep] f0
	11
	12	regexp {Tolerance +MAX=([-0-9.+eE]+)} [tolerance h0] full ExpectedMaxTol_h0
	13	regexp {Tolerance +MAX=([-0-9.+eE]+)} [tolerance f0] full ExpectedMaxTol_f0
	14
	15	#turn on non-destructive mode of BOP and fuzzy value;
	16	#with this combination the test is fail before the fix 26738,
	17	#as tolerance of input shape is changed
	18	bnondestructive 1
	19	bfuzzyvalue 0.1
	20
	21	bclearobjects
	22	bcleartools
	23	baddobjects h0
	24	baddtools f0
	25	bfillds
	26	bbop result 4
	27
	28	regexp {Tolerance +MAX=([-0-9.+eE]+)} [tolerance h0] full MaxTol_h0
	29	regexp {Tolerance +MAX=([-0-9.+eE]+)} [tolerance f0] full MaxTol_f0
	30
	31	set tol_abs_MaxTol 0.0001
	32	set tol_rel_MaxTol 0.0001
	33	checkreal "MaxTolerance h0" ${MaxTol_h0} ${ExpectedMaxTol_h0} ${tol_abs_MaxTol} ${tol_rel_MaxTol}
	34	checkreal "MaxTolerance f0" ${MaxTol_f0} ${ExpectedMaxTol_f0} ${tol_abs_MaxTol} ${tol_rel_MaxTol}
	35
	36	checkprops result -l 150.23
	37
	38	set 2dviewer 1