mirror of
https://github.com/Open-Cascade-SAS/OCCT.git
synced 2026-07-06 08:47:11 +08:00
d4b867e617
1. Restriction line is processed in IntTools_FaceFace with using methods of GeomInt_IntSS class. 2. Check, if Restriction- and Walking-lines (or Restriction-Restriction lines) are coincided, has been added in IntPatch_ImpPrmIntersection.cxx (at that RLine is considered to be isoline only). 3. Check, if RLine and GLine are coincided, has been added in IntPatch_ImpImpIntersection.cxx. 4. Create new class IntPatch_PointLine, which is inherited from IntPatch_Line. 5. The reason of exception (in DEBUG MODE) has been eliminated. New test cases for issue #25416 were added. tests/bugs/modalg_5/bug24650 was modified.
45 lines
917 B
Plaintext
45 lines
917 B
Plaintext
puts "================"
|
|
puts "OCC25416"
|
|
puts "================"
|
|
puts ""
|
|
#######################################################################
|
|
# Wrong section curve
|
|
#######################################################################
|
|
|
|
#Check if intersection algorithm produces overlapped curves
|
|
|
|
restore [locate_data_file bug25416_s1.brep] s1
|
|
restore [locate_data_file bug25416_s2.brep] s2
|
|
|
|
set ll [intersect ii s1 s2]
|
|
|
|
set status 0
|
|
if { [llength $ll] < 1 } {
|
|
set status 1
|
|
}
|
|
|
|
foreach i $ll {
|
|
foreach j $ll {
|
|
if { $i >= $j } continue
|
|
|
|
decho off
|
|
mkedge e1 $i
|
|
mkedge e2 $j
|
|
set coe [checkoverlapedges e1 e2]
|
|
decho on
|
|
|
|
puts "$i<->$j: $coe"
|
|
if { [regexp "Edges is not overlaped" $coe] != 1 } {
|
|
set status 2
|
|
}
|
|
}
|
|
}
|
|
|
|
decho on
|
|
|
|
if { $status != 0 } {
|
|
puts "Wrong section. Error with code $status"
|
|
} else {
|
|
puts "OK: Good section"
|
|
}
|