mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-04 18:06:22 +03:00
0d42485334
Get rid of hard-coded tolerance 0.0001 for intersection with a conical surface. Small correction of test case for issue CR27283 Adjusting test cases
36 lines
788 B
Plaintext
36 lines
788 B
Plaintext
puts "================"
|
|
puts "OCC27283"
|
|
puts "================"
|
|
puts ""
|
|
#######################################################################
|
|
# Regression vs 6.9.1: smesh/bugs_11/L9: invalid result of General Fuse
|
|
#######################################################################
|
|
|
|
restore [locate_data_file bug27283_shapes.brep] a
|
|
set lst [explode a]
|
|
|
|
bclearobjects
|
|
bcleartools
|
|
baddobjects a_1
|
|
eval baddtools [lrange $lst 1 end]
|
|
bfillds
|
|
bbuild result0
|
|
|
|
checkshape result0
|
|
|
|
# extract the parts of result corresponding to object
|
|
shape result C
|
|
foreach s [explode a_1 So] {
|
|
bmodified r_$s $s
|
|
add r_$s result
|
|
}
|
|
|
|
checknbshapes result -solid 76 -shell 76 -face 279
|
|
checkprops result -s 1880.4
|
|
|
|
smallview
|
|
don result
|
|
fit
|
|
|
|
checkview -screenshot -2d -path ${imagedir}/${test_image}.png
|