mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-05 18:16:23 +03:00
32 lines
863 B
Plaintext
32 lines
863 B
Plaintext
puts "============"
|
|
puts "OCC26684"
|
|
puts "============"
|
|
puts ""
|
|
###################################################
|
|
## Big tolerance values of the intersection curves
|
|
###################################################
|
|
|
|
brestore [locate_data_file CTO909_IR2_TuyoPipe20.brep] b1
|
|
brestore [locate_data_file CTO909_IR2_sphere1_20.brep] b2
|
|
|
|
explode b1 f; copy b1_1 f1
|
|
explode b2 f; copy b2_1 f2
|
|
|
|
smallview
|
|
donly f1 f2
|
|
fit
|
|
|
|
# 1 case
|
|
set bop_info [bopcurves f1 f2]
|
|
regexp {Tolerance Reached=([-0-9.+eE]+)} $bop_info full Tolerance
|
|
|
|
checkreal "Reached tolerance" ${Tolerance} 5.8654166482879483e-009 1.e-7 0
|
|
|
|
# 2 case
|
|
set bop_info_2d [bopcurves f1 f2 -2d]
|
|
regexp {Tolerance Reached=([-0-9.+eE]+)} $bop_info_2d full Tolerance_2d
|
|
|
|
checkreal "Reached tolerance" ${Tolerance_2d} 1.4569392656749484e-008 1.e-7 0
|
|
|
|
checkview -screenshot -2d -path ${imagedir}/${test_image}.png
|