mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-03 17:56:21 +03:00
a8676008f7
Splitting of subgroups bugs/modalg and bugs/moddata to optimise time of testing Correction of end file in group v3d Small correction of test case
31 lines
744 B
Plaintext
Executable File
31 lines
744 B
Plaintext
Executable File
pload QAcommands
|
|
|
|
puts "============"
|
|
puts "OCC22558"
|
|
puts "============"
|
|
puts ""
|
|
#######################################################################
|
|
# Bug in gp_Dir::Mirror(const gp_Ax2 & axis)
|
|
#######################################################################
|
|
|
|
set BugNumber OCC22558
|
|
|
|
set check1 -57735
|
|
set check2 57735
|
|
set info [ OCC22558 1 1 1 1 0 0 0 0 0 ]
|
|
|
|
set res_z1 [lindex ${info} end]
|
|
set res_y1 [lindex ${info} end-1]
|
|
set res_x1 [lindex ${info} end-2]
|
|
|
|
set res_z [ expr int($res_z1 * 100000) ]
|
|
set res_y [ expr int($res_y1 * 100000) ]
|
|
set res_x [ expr int($res_x1 * 100000) ]
|
|
|
|
if { ${res_x} == ${check1} && ${res_y} == ${check2} && ${res_z} == ${check2} } {
|
|
puts "OK ${BugNumber}"
|
|
} else {
|
|
puts "Faulty ${BugNumber}"
|
|
}
|
|
|