1
0
mirror of https://git.dev.opencascade.org/repos/occt.git synced 2025-04-09 18:50:54 +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

53 lines
1.1 KiB
Plaintext
Executable File

puts "============"
puts "OCC895"
puts "============"
puts ""
#########################################################
## In one case, twisted surface is created.
## The problem is in incorrect computation of mutual orientations of wire segments.
#########################################################
pload QAcommands
set scale 73.609
set proj_X 0.523995
set proj_Y 0.359655
set proj_Z 0.77206
set up_X -0.739036
set up_Y -0.258607
set up_Z 0.622051
set at_X 5.51184366274157
set at_Y 5.10968389884332
set at_Z 0.581665443993578
set x_coord 210
set y_coord 210
set status 0
set angle 5
set reverse 0
set order 0
if { [ catch { OCC895 result ${angle} ${reverse} ${order} } ] } {
puts "Faulty : an exception was caught"
}
if { ${status} == 0} {
vinit
vsetdispmode 1
vdisplay result
vviewparams -scale ${scale} -proj ${proj_X} ${proj_Y} ${proj_Z} -up ${up_X} ${up_Y} ${up_Z} -at ${at_X} ${at_Y} ${at_Z}
checkcolor $x_coord $y_coord 0.98 0.72 0.13
if { ${stat} != 1 } {
puts "Faulty OCC895 (case 2)"
}
}
checkprops result -s 18.1614
checkshape result
set 3dviewer 1