1
0
mirror of https://git.dev.opencascade.org/repos/occt.git synced 2025-04-10 18:51:21 +03:00
occt/tests/bugs/modalg_6/bug28718
2017-05-25 11:48:27 +03:00

35 lines
835 B
Plaintext

puts "========"
puts "OCC28718"
puts "========"
puts ""
#################################################
# Section result has a break
#################################################
restore [locate_data_file bug28718_bulk_1.brep] b1
restore [locate_data_file bug28718_hull.brep] b2
####
explode b1 f
explode b2 f
axo
don b2_61
fit
set log [bopcurves b1_1 b2_61 -2d]
regexp {Tolerance Reached=+([-0-9.+eE]+)\n+([-0-9.+eE]+)} ${log} full Toler NbCurv
checkreal TolReached $Toler 5.6917962071676512e-008 0.0 0.1
nurbsconvert ff b2_61
set log [bopcurves b1_1 ff -2d]
regexp {Tolerance Reached=+([-0-9.+eE]+)\n+([-0-9.+eE]+)} ${log} full Toler NbCurv
checkreal TolReached $Toler 6.2331348315760405e-008 0.0 0.1
bsection result b1 b2
checkprops result -l 19.1199
checkview -display result -2d -path ${imagedir}/${test_image}.png