1
0
mirror of https://git.dev.opencascade.org/repos/occt.git synced 2025-04-07 18:30:55 +03:00
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

33 lines
922 B
Plaintext
Executable File

puts "=========="
puts "OCC705 "
puts "=========="
puts ""
###########################################################
## The matrix of inertia for sphere computed incorrectly.
## In the secod case the not diagonal elements of the inertia matrix are not close to zero.
###########################################################
psphere result 10 10 10
ttranslate result 10 10 10
trotate result 0 0 0 0 1 1 34
set list [vprops result]
set inertia [regexp -all -inline { +[-0-9.+eE]+ +[-0-9.+eE]+ +[-0-9.+eE]+} $list]
set matrix [regexp -all -inline {[-0-9.+eE]+} $inertia]
set matrix12 [lindex $matrix 1]
set matrix21 [lindex $matrix 3]
set matrix23 [lindex $matrix 5]
set matrix32 [lindex $matrix 7]
if { ${matrix12} != 0. || ${matrix21} != 0. || ${matrix23} != 0. || ${matrix32} != 0. } {
puts "Faulty OCC705"
} else {
puts "OCC705 OK"
}
checkprops result -l 123.755
checksection result
set 2dviewer 0