mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-09 18:50:54 +03:00
352ffd7358
Test case tests/bugs/modalg/dxf906 was renamed to bug889 Adding test cases to tests/bugs/moddata Modified expressions puts [checkshape result]. Added command vzfit in end file in folder bugs. Unlocked command coordload in QABugs_3.cxx Modified test case bugs vis buc60738 Added test cases to modalg and moddata Added test cases to caf and fclasses Added test cases to group heal
49 lines
1.0 KiB
Plaintext
Executable File
49 lines
1.0 KiB
Plaintext
Executable File
puts "TODO OCC12345 ALL: Error : The square of result shape is"
|
|
puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_"
|
|
puts "TODO OCC12345 ALL: Faulty OCC827"
|
|
|
|
pload QAcommands
|
|
|
|
puts "========"
|
|
puts "OCC827"
|
|
puts "========"
|
|
puts ""
|
|
###################################
|
|
## BRepAlgoAPI_Fuse fails on cylinder and torus
|
|
###################################
|
|
## (old topology)
|
|
#####################################
|
|
|
|
#
|
|
# a1 - Cylinder
|
|
# a2 - Torus1
|
|
# a3 - Torus1
|
|
# res1 - Fuse(Torus1 & Cylinder)
|
|
# res2 - Fuse(Torus2 & res1)
|
|
#
|
|
|
|
if { [ catch { set info_result [OCC827 a1 a2 a3 res1 res2 0] } ] } {
|
|
puts "Faulty OCC827"
|
|
} else {
|
|
if { [regexp {FAILED} $info_result] } {
|
|
puts "Faulty OCC827"
|
|
}
|
|
checkshape a1
|
|
checkshape a2
|
|
checkshape a3
|
|
checkshape res1
|
|
|
|
set ExplodeList [explode res1]
|
|
if {[llength ${ExplodeList}] < 1} {
|
|
puts "Faulty OCC827"
|
|
}
|
|
|
|
set ExplodeList [explode res2]
|
|
if {[llength ${ExplodeList}] < 1} {
|
|
puts "Faulty OCC827"
|
|
}
|
|
renamevar res2 result
|
|
}
|
|
set square 0
|
|
set 2dviewer 1
|