mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-08 18:40:55 +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
90 lines
2.2 KiB
Plaintext
Executable File
90 lines
2.2 KiB
Plaintext
Executable File
puts "TODO OCC11111 ALL: Faulty OCC21121"
|
|
puts "TODO OCC11111 ALL: Error : The square of result shape is"
|
|
|
|
puts "============"
|
|
puts "OCC21121"
|
|
puts "============"
|
|
puts ""
|
|
#######################################################################
|
|
# Triangulation on face is not built
|
|
#######################################################################
|
|
|
|
set BugNumber OCC21121
|
|
|
|
restore [locate_data_file OCC21121.brep] result
|
|
|
|
tclean result
|
|
|
|
set Deflection 0.1
|
|
catch {incmesh result ${Deflection} }
|
|
|
|
set tri_info [trinfo result]
|
|
regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri
|
|
regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod
|
|
regexp {deflection +([-0-9.+eE]+)} $tri_info full defl
|
|
|
|
if { [string compare $tcl_platform(platform) "windows"] == 0 } {
|
|
puts "OS = Windows NT"
|
|
set good_tri 1555
|
|
set good_nod 1475
|
|
set good_defl 3.5015692105840144e-06
|
|
} else {
|
|
puts "OS = Linux"
|
|
set good_tri 1555
|
|
set good_nod 1475
|
|
set good_defl 3.5015692105840144e-06
|
|
}
|
|
|
|
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}
|
|
}
|
|
|
|
set percent_max 0.1
|
|
set status 0
|
|
|
|
set triangle_percent [GetPercent ${tri} ${good_tri}]
|
|
puts "triangle_percent = ${triangle_percent}"
|
|
if { ${triangle_percent} > ${percent_max} } {
|
|
puts "triangle: Faulty ${BugNumber}"
|
|
set status 1
|
|
} else {
|
|
puts "triangle: OK ${BugNumber}"
|
|
}
|
|
|
|
set node_percent [GetPercent ${nod} ${good_nod}]
|
|
puts "node_percent = ${node_percent}"
|
|
if { ${node_percent} > ${percent_max} } {
|
|
puts "node: Faulty ${BugNumber}"
|
|
set status 1
|
|
} else {
|
|
puts "node: OK ${BugNumber}"
|
|
}
|
|
|
|
set deflection_percent [GetPercent ${defl} ${good_defl}]
|
|
puts "deflection_percent = ${deflection_percent}"
|
|
if { ${deflection_percent} > ${percent_max} } {
|
|
puts "deflection: Faulty ${BugNumber}"
|
|
set status 1
|
|
} else {
|
|
puts "deflection: OK ${BugNumber}"
|
|
}
|
|
|
|
# Resume
|
|
puts ""
|
|
if { ${status} != 0 } {
|
|
puts "Faulty ${BugNumber}"
|
|
} else {
|
|
puts "OK ${BugNumber}"
|
|
}
|
|
|
|
set square 0
|
|
set 2dviewer 0
|