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/bug26075
aml 20a216fe6f 0026075: Make Extrema_GenExtCC return IsParallel flag in case of parallel curves
1) Added check for parallel curves.
2) Changed unefficient o(n^2) duplicates deleting algorithm to o(n) algorithm.
3) Deleted useless upper level duplicates deleting algorithm.

Test-case for issue #26075
2015-06-04 14:14:52 +03:00

19 lines
663 B
Plaintext

puts "========"
puts "OCC26075"
puts "========"
puts ""
###########################################################################
# Make Extrema_GenExtCC return IsParallel flag in case of parallel curves
###########################################################################
restore [locate_data_file dist1-s1.brep] s1
restore [locate_data_file dist1-s2.brep] s2
mkcurve c1 s1
mkcurve c2 s2
set bug_info [extrema c1 c2]
set bug_info [string range $bug_info [expr {[string first "\n" $bug_info] + 1}] [expr {[string last "\n" $bug_info] - 1}]]
if {$bug_info != "No solutions!"} {
puts "ERROR: OCC26075 is reproduced. Flag IsParallel is not returned."
}