mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-08-09 13:22:24 +03:00
0cbfb9f151
I ComputePurgedWLine() function: Excess points in walking line are deleted when: 1) Distance between neighboring points too small. 2) Points lie in one pipe without big jump on chord length. III Fixed problem with extremaPC with too close knot distribution to [minParam, maxParam] borders. IV ApproxInt_Approx.gxx New division criteria in intersection approximator. III Test case Test cases update to the new behavior. Test case for CR21564 Correction of test cases for issue CR21564
38 lines
974 B
Plaintext
Executable File
38 lines
974 B
Plaintext
Executable File
puts "==========="
|
|
puts "BUC60555"
|
|
puts "CUT Case 1"
|
|
puts "==========="
|
|
#cpulim add aki 070704
|
|
cpulimit 1600
|
|
restore [locate_data_file buc60555a.brep] part
|
|
checkshape part
|
|
restore [locate_data_file buc60555b.brep] trTool1
|
|
checkshape trTool1
|
|
halfspace hs1 trTool1 20000 10000 0
|
|
bcut cut1 part hs1
|
|
|
|
checkshape cut1
|
|
|
|
tcopy cut1 result
|
|
|
|
explode cut1 e
|
|
mkcurve cu1 cut1_1
|
|
mkcurve cu2 cut1_2
|
|
mkcurve cu3 cut1_3
|
|
mkcurve cu4 cut1_4
|
|
|
|
set tolerance [ maxtolerance cut1 ]
|
|
|
|
regexp { +Face +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxFaceTolerance
|
|
regexp { +Edge +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxEdgeTolerance
|
|
regexp { +Vertex +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxVertexTolerance
|
|
|
|
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"
|
|
}
|
|
|
|
set square 4.10276e+007
|
|
set 2dviewer 0
|