1
0
mirror of https://git.dev.opencascade.org/repos/occt.git synced 2025-04-04 18:06:22 +03:00
occt/tests/bugs/modalg_5/bug25408
ski 5747059b21 0026833: Create command checkview containing all viewer types
Created command checkview for displaying shapes.
2016-02-05 11:14:37 +03:00

33 lines
803 B
Plaintext
Executable File

puts "================"
puts "OCC25408"
puts "================"
puts ""
#######################################################################
# Wrong result obtained by General Fuse operator.
#######################################################################
restore [locate_data_file bug25408_bride_cut.brep] b1
restore [locate_data_file bug25408_goujon_part_tool2_cut.brep] b4
restore [locate_data_file bug25408_RevolPart.brep] b5
#
explode b4 f
copy b4_1 b4
#
explode b5 f
copy b5_1 b5
#
bclearobjects
bcleartools
baddobjects b1 b4 b5
bfillds
bbuild result
checkprops result -s 57200.9
checkshape result
checknbshapes result -vertex 54 -edge 129 -wire 95 -face 95 -shell 22 -solid 22 -compsolid 0 -compound 2 -shape 419
checkview -display result -3d -path ${imagedir}/${test_image}.png