mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-03 17:56:21 +03:00
37 lines
862 B
Plaintext
37 lines
862 B
Plaintext
puts "========"
|
|
puts "OCC32882: Modeling Data - Extrema curve/curve cannot find all solutions"
|
|
puts "========"
|
|
puts ""
|
|
|
|
|
|
# Read input
|
|
restore [locate_data_file bug32882.brep] cc
|
|
explode cc
|
|
|
|
# Extract geometry from topology
|
|
mkcurve c1 cc_1
|
|
mkcurve c2 cc_2
|
|
mkcurve c3 cc_3
|
|
|
|
# Run extrema c1/c3
|
|
set info [extrema c1 c3]
|
|
|
|
# Check number of solution
|
|
if { [llength $info] != 3 } {
|
|
puts "Error: Invalid extrema number in extrema c1-c3 output"
|
|
}
|
|
|
|
# Check result
|
|
checklength ext_1 -l 2.929642751e-14 -eps .01
|
|
checklength ext_2 -l 3.480934286e-14 -eps .01
|
|
checklength ext_3 -l 2.929642751054232-14 -eps .01
|
|
|
|
# Run extrema c3/c2
|
|
set info [extrema c3 c2]
|
|
# Check number of solutions
|
|
if { [llength $info] != 2 } {
|
|
puts "Error: Invalid extrema number in extrema c3-c2 output"
|
|
}
|
|
checklength ext_1 -l 5.684341886e-14 -eps .01
|
|
checklength ext_2 -l 2.929642751e-14 -eps .01
|