1
0
mirror of https://git.dev.opencascade.org/repos/occt.git synced 2025-08-09 13:22:24 +03:00
Files
occt/tests/bugs/modalg_6/bug27282_2
nbv eee615ad2a 0027282: [Regression to 6.9.1] smesh/bugs_00/A6: Cut produces an empty shape
1. The reason of the regression is not-closed intersection result. This problem has been solved (in this fix) by adding joint point to the both neighbors intersection lines (lines were extended to the this intersection point). It is made in IntPatch_WLineTool::ExtendTwoWlinesToEachOther(...) method.

2. Interface of IntPatch_PointLine and inherited classes has been changed. Methods ChangeVertex(...) and RemoveVertex(...) have been added.

Test cases for this issue have been created.

Small correction in the code.
2016-03-29 15:52:18 +03:00

47 lines
1.1 KiB
Plaintext

puts "TODO OCC27302 ALL: Error: Curve Number is bad!"
puts "============"
puts "OCC27282"
puts "============"
puts ""
###############################
## [Regression to 6.9.1] smesh/bugs_00/A6: Cut produces an empty shape
###############################
set MaxTol 4.8106951786435371e-006
set GoodNbCurv 1
restore [locate_data_file bug27282_cmpd.brep] a
explode a f
smallview
don a_2 a_5
fit
set log [bopcurves a_2 a_5 -2d]
regexp {Tolerance Reached=+([-0-9.+eE]+)\n+([-0-9.+eE]+)} ${log} full Toler NbCurv
checkreal ToleranceReached ${Toler} ${MaxTol} 0.0 0.1
checkview -screenshot -2d -path ${imagedir}/${test_image}.png
if {${NbCurv} != ${GoodNbCurv}} {
puts "Error: Curve Number is bad!"
for {set i 1} {$i < ${NbCurv}} {incr i} {
for {set j [expr $i+1]} {$j <= $NbCurv} {incr j} {
mkedge e1 c_$i
mkedge e2 c_$j
dset dd_val 100.0*${Toler}
distmini dd e1 e2
if { [dval dd_val] > ${Toler} } {
puts "Error: Intersection result is not closed"
}
}
}
} else {
checklength c_1 -l 833.56846559428755
}