mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-05-06 10:36:12 +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
70 lines
1.9 KiB
Plaintext
Executable File
70 lines
1.9 KiB
Plaintext
Executable File
puts "=========="
|
|
puts "BUC60533"
|
|
puts "=========="
|
|
|
|
restore [locate_data_file buc60533a.brep] part
|
|
checkshape part
|
|
#puts "Tolerance part"
|
|
#computetolerance part
|
|
|
|
restore [locate_data_file buc60533b.brep] trTool
|
|
checkshape trTool
|
|
#puts "Tolerance trTool"
|
|
#computetolerance trTool
|
|
|
|
# create halfspace
|
|
vertex v 10000 15000 -15000
|
|
halfspace hs trTool 10000 15000 -15000
|
|
#puts "Tolerance hs"
|
|
#computetolerance hs
|
|
|
|
#*************************************************
|
|
if [catch {bcut result part hs} catch_result] {
|
|
puts "Faulty BUC60533: function CUT works wrongly"
|
|
} else {
|
|
puts " BUC60533 OK: function CUT works properly"
|
|
}
|
|
#*************************************************
|
|
|
|
#set che [checkshape res r]
|
|
#set err [lindex $che [expr [llength $che] - 1]]
|
|
#if { $err != "OK"} {
|
|
# puts "Faulty : mistakes are found in checked shape by checkshape command"
|
|
#} else {
|
|
# puts "Checking by checkshape - OK"
|
|
|
|
#explode res e
|
|
#mkcurve cu1 res_1
|
|
#mkcurve cu2 res_2
|
|
#mkcurve cu3 res_3
|
|
#mkcurve cu4 res_4
|
|
#mkcurve cu5 res_5
|
|
|
|
#checkshape res
|
|
|
|
#set tolerance [ maxtolerance res ]
|
|
#set MaxFaceTolerance [ lindex $tolerance 14 ]
|
|
#set MaxEdgeTolerance [ lindex $tolerance 20 ]
|
|
#set MaxVertexTolerance [ lindex $tolerance 26 ]
|
|
#if { $MaxFaceTolerance > 1 || $MaxEdgeTolerance > 1 || $MaxVertexTolerance > 1 } {
|
|
#puts "Faulty :Tolerance of shape is more then 1.0"
|
|
#} else {
|
|
#puts "Tolerance of shape is less then 1.0"
|
|
#}
|
|
#}
|
|
|
|
# Objectif : Couper part par trTool
|
|
#
|
|
# part est construite a partir d'un semi de point et de telle facon que u=x et v=y.
|
|
# On obtient une Geom_BSplineSurface. On cree alors la topologie a partir de cette
|
|
# surface via BRepAPI::MakeFace(surface)
|
|
# Dans notre code, a aucun moment, nous
|
|
# n'initialisons la tolerance.
|
|
#
|
|
# Le cut n'est pas effectue car une exception est levee :
|
|
# An exception was caught Standard_ConstructionError:
|
|
# ** Exception ** Standard_ConstructionError:
|
|
|
|
set square 1.63191e+07
|
|
set 2dviewer 0
|