mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-08-09 13:22:24 +03:00
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.
47 lines
1.1 KiB
Plaintext
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
|
|
} |