mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-06-05 11:24:17 +03:00
34 lines
839 B
Plaintext
34 lines
839 B
Plaintext
puts "##################################################"
|
|
puts "0024097: BRepAlgoAPI_Section returns wrong result"
|
|
puts "##################################################"
|
|
|
|
# load and check faces
|
|
restore [locate_data_file bug24097_face1.brep] a
|
|
tolerance a
|
|
checkshape a
|
|
|
|
restore [locate_data_file bug24097_face2.brep] b
|
|
tolerance b
|
|
checkshape b
|
|
|
|
# build section
|
|
bsection result a b
|
|
|
|
# result should be single open edge with length 0.125
|
|
checknbshapes result -vertex 2 -edge 1
|
|
checkmaxtol result 0.0001
|
|
|
|
if { [regexp {Mass\s*:\s*([0-9.e+-]*)} [lprops result] dummy length] } {
|
|
checkreal "Length of the section" $length 0.125 0.0001 0.1
|
|
} else {
|
|
puts "Error: cannot get length of result!"
|
|
}
|
|
|
|
# make snapshot
|
|
vinit Driver1/Viewer1/View1
|
|
vclear
|
|
eval vdisplay result [explode result v]
|
|
vfit
|
|
vdisplay a b
|
|
vdump $imagedir/${test_image}.png
|