mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-10 18:51:21 +03:00
355c155147
Modified END file of all group bugs. Command nbshape moved to END file. Add begin with variable subgroup Small correction in END file Replaced test case bug726_3 from moddata to modalg
16 lines
378 B
Plaintext
Executable File
16 lines
378 B
Plaintext
Executable File
pload XDE
|
|
|
|
set subgroup xde
|
|
|
|
proc GetPercent {Value GoodValue} {
|
|
set Percent 0.
|
|
if {${GoodValue} != 0.} {
|
|
set Percent [expr abs(${Value} - ${GoodValue}) / abs(double(${GoodValue})) * 100.]
|
|
} elseif {${Value} != 0.} {
|
|
set Percent [expr abs(${GoodValue} - ${Value}) / abs(double(${Value})) * 100.]
|
|
} else {
|
|
set Percent 0.
|
|
}
|
|
return ${Percent}
|
|
}
|