mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-05 18:16:23 +03:00
parent
8447359f09
commit
d0fdf9893d
35
tests/bugs/modalg_6/bug21670
Normal file
35
tests/bugs/modalg_6/bug21670
Normal file
@ -0,0 +1,35 @@
|
||||
puts "========"
|
||||
puts "OCC21670"
|
||||
puts "========"
|
||||
puts ""
|
||||
###################################
|
||||
# BOP section produces bad result
|
||||
###################################
|
||||
|
||||
smallview
|
||||
|
||||
restore [locate_data_file bug21633_SECC19_1_IZQ.brep] a
|
||||
|
||||
explode a f
|
||||
mksurface s a_1
|
||||
mkface f s
|
||||
|
||||
restore [locate_data_file bug21670-bug_prj_wire.brep] w
|
||||
|
||||
explode w
|
||||
prism p w_1 0 0 -1
|
||||
|
||||
donly f p
|
||||
fit
|
||||
|
||||
puts "Checking f: [bopcheck f] [checkshape f] [tolerance f]"
|
||||
puts "Checking p: [bopcheck p] [checkshape p] [tolerance p]"
|
||||
|
||||
bsection result f p
|
||||
|
||||
set bug_info [explode result]
|
||||
if {[llength $bug_info] != 1} {
|
||||
puts "ERROR: OCC21670 is reproduced. Result of bsection command is set of shapes."
|
||||
}
|
||||
|
||||
set only_screen_axo 1
|
Loading…
x
Reference in New Issue
Block a user