mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-04 18:06:22 +03:00
75 lines
2.3 KiB
Plaintext
Executable File
75 lines
2.3 KiB
Plaintext
Executable File
puts "==========="
|
|
puts "OCC23774"
|
|
puts "==========="
|
|
######################################################
|
|
# Incorrect conversion from gp_Trsf2d to gp_Trsf
|
|
######################################################
|
|
|
|
pload QAcommands
|
|
pload TOPTEST
|
|
|
|
set BugNumber OCC23774
|
|
|
|
restore [locate_data_file bug23774_GrossPlateFace.brep] face
|
|
restore [locate_data_file bug23774_OriginalWire.brep] wire
|
|
|
|
set Info [OCC23774 face wire]
|
|
|
|
regexp {Dist0 += +([-0-9.+eE]+)} ${Info} full Dist0
|
|
regexp {Dist1 += +([-0-9.+eE]+)} ${Info} full Dist1
|
|
regexp {Distance2 += +([-0-9.+eE]+)} ${Info} full Distance2
|
|
puts "Dist0 = ${Dist0}"
|
|
puts "Dist1 = ${Dist1}"
|
|
puts "Distance2 = ${Distance2}"
|
|
|
|
set face_tolerance [maxtolerance face]
|
|
regexp { +Face +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} ${face_tolerance} full F_MaxFaceTolerance
|
|
regexp { +Edge +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} ${face_tolerance} full F_MaxEdgeTolerance
|
|
regexp { +Vertex +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} ${face_tolerance} full F_MaxVertexTolerance
|
|
|
|
set wire_tolerance [maxtolerance wire]
|
|
regexp { +Face +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} ${face_tolerance} full W_MaxFaceTolerance
|
|
regexp { +Edge +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} ${face_tolerance} full W_MaxEdgeTolerance
|
|
regexp { +Vertex +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} ${face_tolerance} full W_MaxVertexTolerance
|
|
|
|
set max_tolerance ${F_MaxFaceTolerance}
|
|
if { ${F_MaxEdgeTolerance} > ${max_tolerance} } {
|
|
set max_tolerance ${F_MaxEdgeTolerance}
|
|
}
|
|
if { ${F_MaxVertexTolerance} > ${max_tolerance} } {
|
|
set max_tolerance ${F_MaxVertexTolerance}
|
|
}
|
|
if { ${W_MaxFaceTolerance} > ${max_tolerance} } {
|
|
set max_tolerance ${W_MaxFaceTolerance}
|
|
}
|
|
if { ${W_MaxEdgeTolerance} > ${max_tolerance} } {
|
|
set max_tolerance ${W_MaxEdgeTolerance}
|
|
}
|
|
if { ${W_MaxVertexTolerance} > ${max_tolerance} } {
|
|
set max_tolerance ${W_MaxVertexTolerance}
|
|
}
|
|
puts "max_tolerance = ${max_tolerance}"
|
|
|
|
set status 0
|
|
set Dist0_GoodValue 0.
|
|
set Dist1_GoodValue 0.
|
|
set Distance2_GoodValue 0.
|
|
|
|
if { [expr abs(${Dist0} - ${Dist0_GoodValue})] > ${max_tolerance} } {
|
|
set status 1
|
|
}
|
|
if { [expr abs(${Dist1} - ${Dist1_GoodValue})] > ${max_tolerance} } {
|
|
set status 1
|
|
}
|
|
if { [expr abs(${Distance2} - ${Distance2_GoodValue})] > ${max_tolerance} } {
|
|
set status 1
|
|
}
|
|
|
|
# Resume
|
|
puts ""
|
|
if { ${status} != 0 } {
|
|
puts "Faulty ${BugNumber}"
|
|
} else {
|
|
puts "OK ${BugNumber}"
|
|
}
|