mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-07-20 12:45:50 +03:00
- Added function checkprops, set default tolerance parameter to 1.0e-4 - Using "area" instead of "square". - Options "-equal\notequal" isn't used together with "-s" in blend and offset test cases. - Correct regressions/differences/improvements and CPU problem (set props tolerance to 0.1) - Corrected test cases to use checkprops proc. - Correct image difference - Updated TODOs in test cases. - Updated test cases to get correct images of result shape
39 lines
952 B
Plaintext
Executable File
39 lines
952 B
Plaintext
Executable File
puts "============"
|
|
puts "OCC1477"
|
|
puts "============"
|
|
puts ""
|
|
######################################################
|
|
# Problems in MakePipeShell
|
|
# (case 14)
|
|
# test2.tcl
|
|
######################################################
|
|
|
|
beziercurve c11 5 0 0 0 10 0 0 20 10 12 25 30 20 50 40 50
|
|
beziercurve c12 4 50 40 50 70 30 30 90 20 20 100 50 0
|
|
mkedge e11 c11
|
|
mkedge e12 c12
|
|
wire s1 e11 e12
|
|
|
|
beziercurve c21 4 0 0 0 0 0 10 0 10 10 0 10 20
|
|
mkedge e21 c21
|
|
wire s2 e21
|
|
|
|
puts "###############################################################################"
|
|
puts "# (case /-/-/-/)"
|
|
puts "###############################################################################"
|
|
|
|
checkshape s1
|
|
checkshape s2
|
|
|
|
mksweep s1
|
|
|
|
addsweep s2
|
|
if [catch { buildsweep result } res] {
|
|
puts "Faulty OCC1477: buildsweep is wrong"
|
|
}
|
|
|
|
checkprops result -s 2570.32
|
|
|
|
checknbshapes result -vertex 6 -edge 7 -wire 2 -face 2 -shell 1 -solid 0 -compsolid 0 -compound 0 -shape 18
|
|
set 2dviewer 0
|