[occt.git] / tests / lowalgos / intss / bug29323

puts "========"
puts "OCC29323"
puts "========"
puts ""
#################################################
# Intersection algorithm produces the curve with oscillation
#################################################

set MaxTolReached 0.15
set GoodNbCurv 1
set ExpLength 96.268040111795571

restore [locate_data_file bug29323_hb.brep] h
plane p 0 0 4 0 0 1
mkface f p -200 200 -200 200
explode h f

set log [bopcurves h_4 f -2d]

smallview
donly c_1
fit

checkview -screenshot -2d -path ${imagedir}/${test_image}_1.png
checklength c_1 -l $ExpLength

regexp {Tolerance Reached=+([-0-9.+eE]+)\n+([-0-9.+eE]+)} ${log} full Toler NbCurv

if {$Toler > $MaxTolReached} {
  puts "Error: Big tolerance is returned by intersector"
}

if {$NbCurv != $GoodNbCurv} {
  puts "Error: Please check NbCurves for intersector"
}
Commit	Line	Data
faaa95cb	1	puts "========"
	2	puts "OCC29323"
	3	puts "========"
	4	puts ""
	5	#################################################
	6	# Intersection algorithm produces the curve with oscillation
	7	#################################################
	8
	9	set MaxTolReached 0.15
	10	set GoodNbCurv 1
	11	set ExpLength 96.268040111795571
	12
	13	restore [locate_data_file bug29323_hb.brep] h
	14	plane p 0 0 4 0 0 1
	15	mkface f p -200 200 -200 200
	16	explode h f
	17
	18	set log [bopcurves h_4 f -2d]
	19
	20	smallview
	21	donly c_1
	22	fit
	23
	24	checkview -screenshot -2d -path ${imagedir}/${test_image}_1.png
	25	checklength c_1 -l $ExpLength
	26
	27	regexp {Tolerance Reached=+([-0-9.+eE]+)\n+([-0-9.+eE]+)} ${log} full Toler NbCurv
	28
	29	if {$Toler > $MaxTolReached} {
	30	puts "Error: Big tolerance is returned by intersector"
	31	}
	32
	33	if {$NbCurv != $GoodNbCurv} {
	34	puts "Error: Please check NbCurves for intersector"
	35	}