1
0
mirror of https://git.dev.opencascade.org/repos/occt.git synced 2025-06-20 11:54:07 +03:00
occt/tests/bugs/modalg_4/bug8842_5
ski 58cf74e0c0 0025945: Make stable checking of shape global properties in tests
- 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
2015-12-10 16:56:03 +03:00

45 lines
1.2 KiB
Plaintext
Executable File

puts "TODO ?OCC25913 ALL: Faulty shapes in variables faulty_1 to faulty_"
puts "TODO OCC25913 ALL: Error : is WRONG because number of"
puts "TODO OCC25913 ALL: Error : The area of result shape is"
puts "============"
puts "OCC8842"
puts "============"
puts ""
#######################################################################
# Errors in Offset Shape algorithm working with bspline and surface of revolution
#######################################################################
set BugNumber OCC8842
if {[info commands testreadiges] == ""} {pload XSDRAW}
proc myoffset {result sh val tan} {
if {$tan == 1} {
offsetparameter 1e-7 p i
} else {
offsetparameter 1e-7 p a
}
uplevel offsetload $sh $val
uplevel offsetperform $result
}
testreadiges [locate_data_file OCC8842_cone_Ideas.igs] a2
DT_ShapeDivide con2 a2
# join type Arc
puts "***** offsetting with join type Arc"
puts " cone_Ideas + 5"
if [catch { myoffset result con2 5 0 } catch_result] {
puts "${BugNumber}: Faulty (1)"
} else {
checkprops result -s 3542.24
checkshape result
checknbshapes result -vertex 60 -edge 90 -wire 42 -face 40 -shell 5 -solid 5 -compsolid 0 -compound 1 -shape 243
}
set 2dviewer 0