mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-08 18:40:55 +03:00
Added new parameter to bopcheck command that defines which interferences to check: bopcheck shape [level of check: 0 - 5] Examples: 1. bopcheck shape 1 #The level of check is set to V/E, i.e. intersections #E/E, V/F, E/F, F/F will not be checked. 2. bopcheck shape 4 #The level of check is set to E/F, i.e. intersection F/F is disabled. 3. bopcheck shape 5 #All intersections will be checked. It is the same as bopcheck shape. Added test case bugs/modalg_5/bug24029
35 lines
929 B
Plaintext
35 lines
929 B
Plaintext
puts "============"
|
|
puts "OCC24029"
|
|
puts "============"
|
|
puts ""
|
|
############################################################################################
|
|
# Add a flag to bopcheck command to provide possibility to disable Face/Face intersection
|
|
############################################################################################
|
|
|
|
box b1 10 10 10
|
|
box b2 5 5 5 10 10 10
|
|
compound b1 b2 c
|
|
|
|
set info1 [bopcheck c]
|
|
set info2 [bopcheck c 4]
|
|
set info3 [bopcheck c 3]
|
|
|
|
if { [regexp "x23" $info1] != 1 } {
|
|
puts "Error : bopcheck c works wrong"
|
|
} else {
|
|
puts "OK: bopcheck c works properly"
|
|
}
|
|
|
|
if { [regexp "x11" $info2] != 1 || [regexp "F/F:x12," $info2] != 0 } {
|
|
puts "Error : bopcheck c 4 works wrong"
|
|
} else {
|
|
puts "OK: bopcheck c 4 works properly"
|
|
}
|
|
|
|
if { [regexp "This shape seems to be OK" $info3] != 1 } {
|
|
puts "Error : bopcheck c 3 works wrong"
|
|
} else {
|
|
puts "OK: bopcheck c 3 works properly"
|
|
}
|
|
|