mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-03 17:56:21 +03:00
44 lines
1.1 KiB
Plaintext
44 lines
1.1 KiB
Plaintext
puts "========"
|
|
puts "0030395: DRAW bop: Some sub-shapes of some of the argument become connected through other shapes and the argument became self-interfered."
|
|
puts "========"
|
|
puts ""
|
|
|
|
restore [locate_data_file bug30395_s1.brep] s1
|
|
restore [locate_data_file bug30395_fds.brep] fds
|
|
|
|
bclearobjects
|
|
bcleartools
|
|
baddobjects s1
|
|
baddtools fds
|
|
bfillds
|
|
|
|
bbop rcommon 0
|
|
bbop rfuse 1
|
|
bbop rcut 2
|
|
bbop rcut21 3
|
|
bbop rsection 4
|
|
|
|
foreach r {rcommon rfuse rcut rcut21 rsection} {
|
|
checkshape $r
|
|
if {![regexp "OK" [bopcheck $r]]} {
|
|
puts "Error: $r is self-interfered shape"
|
|
}
|
|
}
|
|
|
|
checknbshapes rcommon -wire 8 -face 8 -shell 1 -solid 1
|
|
checkprops rcommon -s 11331.9 -v 30686.2
|
|
|
|
checknbshapes rfuse -wire 14 -face 12 -shell 1 -solid 1
|
|
checkprops rfuse -s 105935 -v 362551
|
|
|
|
checknbshapes rcut -wire 14 -face 12 -shell 1 -solid 1
|
|
checkprops rcut -s 21665.6 -v 25031.2
|
|
|
|
checknbshapes rcut21 -wire 8 -face 8 -shell 1 -solid 1
|
|
checkprops rcut21 -s 95601 -v 306833
|
|
|
|
checksection rsection -r 0
|
|
checkprops rsection -l 554.848
|
|
|
|
checkview -display rcommon -2d -path ${imagedir}/${test_image}.png
|