mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-08-09 13:22:24 +03:00
Test for 0023163: Intersection of tori fails to produce results
This commit is contained in:
28
tests/bugs/modalg_7/bug23163_1
Normal file
28
tests/bugs/modalg_7/bug23163_1
Normal file
@@ -0,0 +1,28 @@
|
||||
puts "TODO OCC23163 ALL: Error: No resulting circle of radius 5 at the intersection of tori, only b-splines"
|
||||
|
||||
puts "================"
|
||||
puts "OCC23163"
|
||||
puts "================"
|
||||
puts ""
|
||||
#######################################################################
|
||||
# Intersection of tori fails to produce results
|
||||
#######################################################################
|
||||
|
||||
torus t1 20 5
|
||||
torus t2 40 0 0 20 5
|
||||
|
||||
intersect result t1 t2
|
||||
|
||||
set NbCurv [llength [directory result*]]
|
||||
|
||||
if { $NbCurv > 4 } {
|
||||
puts "OK: Number of curves is good"
|
||||
} else {
|
||||
puts "Error: No resulting circle of radius 5 at the intersection of tori, only b-splines"
|
||||
}
|
||||
|
||||
smallview
|
||||
donly result*
|
||||
fit
|
||||
display t1 t2
|
||||
checkview -screenshot -2d -path ${imagedir}/${test_image}.png
|
28
tests/bugs/modalg_7/bug23163_2
Normal file
28
tests/bugs/modalg_7/bug23163_2
Normal file
@@ -0,0 +1,28 @@
|
||||
puts "TODO OCC23163 ALL: Error: No resulting circle at the intersection of tori, only b-splines"
|
||||
|
||||
puts "================"
|
||||
puts "OCC23163"
|
||||
puts "================"
|
||||
puts ""
|
||||
#######################################################################
|
||||
# Intersection of tori fails to produce results
|
||||
#######################################################################
|
||||
|
||||
restore [locate_data_file bug23163_surface1_draw_b.draw] s1
|
||||
restore [locate_data_file bug23163_surface2_draw_b.draw] s2
|
||||
|
||||
intersect result s1 s2
|
||||
|
||||
set NbCurv [llength [directory result*]]
|
||||
|
||||
if { $NbCurv > 6 } {
|
||||
puts "OK: Number of curves is good"
|
||||
} else {
|
||||
puts "Error: No resulting circle at the intersection of tori, only b-splines"
|
||||
}
|
||||
|
||||
smallview
|
||||
donly result*
|
||||
fit
|
||||
display s1 s2
|
||||
checkview -screenshot -2d -path ${imagedir}/${test_image}.png
|
28
tests/bugs/modalg_7/bug23163_3
Normal file
28
tests/bugs/modalg_7/bug23163_3
Normal file
@@ -0,0 +1,28 @@
|
||||
puts "TODO OCC23163 ALL: Error: No resulting circle at the intersection of tori, only b-splines"
|
||||
|
||||
puts "================"
|
||||
puts "OCC23163"
|
||||
puts "================"
|
||||
puts ""
|
||||
#######################################################################
|
||||
# Intersection of tori fails to produce results
|
||||
#######################################################################
|
||||
|
||||
restore [locate_data_file bug23163_surface1_draw_b.draw] ss1
|
||||
restore [locate_data_file bug23163_surface2_draw_b.draw] ss2
|
||||
|
||||
intersect result ss1 ss2
|
||||
|
||||
set NbCurv [llength [directory result*]]
|
||||
|
||||
if { $NbCurv > 6 } {
|
||||
puts "OK: Number of curves is good"
|
||||
} else {
|
||||
puts "Error: No resulting circle at the intersection of tori, only b-splines"
|
||||
}
|
||||
|
||||
smallview
|
||||
donly result*
|
||||
fit
|
||||
display ss1 ss2
|
||||
checkview -screenshot -2d -path ${imagedir}/${test_image}.png
|
Reference in New Issue
Block a user