mirror of
https://github.com/Open-Cascade-SAS/OCCT.git
synced 2026-05-11 01:58:22 +08:00
c1fe53c64e
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"
|
|
}
|
|
|