mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-10 18:51:21 +03:00
0022454: Export /Import of valid model leads to lost of tolerances
Adding testing case
This commit is contained in:
parent
5c7744eaef
commit
849c137461
30
tests/bugs/modalg_6/bug22454
Normal file
30
tests/bugs/modalg_6/bug22454
Normal file
@ -0,0 +1,30 @@
|
|||||||
|
puts "============"
|
||||||
|
puts "OCC22454"
|
||||||
|
puts "============"
|
||||||
|
puts ""
|
||||||
|
###########################################################
|
||||||
|
# Export /Import of valid model leads to lost of tolerances
|
||||||
|
###########################################################
|
||||||
|
|
||||||
|
pload DATAEXCHANGE
|
||||||
|
|
||||||
|
restore [locate_data_file bug22454.brep] s
|
||||||
|
|
||||||
|
checkshape s
|
||||||
|
stepwrite m s $imagedir/shape.stp
|
||||||
|
stepread $imagedir/shape.stp a *
|
||||||
|
|
||||||
|
set tolref [checkmaxtol s]
|
||||||
|
|
||||||
|
set tol [checkmaxtol a_1]
|
||||||
|
|
||||||
|
puts "MAX tolerance shape before export : $tolref"
|
||||||
|
puts "MAX tolerance shape after import : $tol"
|
||||||
|
|
||||||
|
if { ${tol} > ${tolref} } {
|
||||||
|
puts "Error: Export /Import cause increasing tolerances of shape"
|
||||||
|
} else {
|
||||||
|
puts "Export /Import does not cause increasing tolerances of shape"
|
||||||
|
}
|
||||||
|
|
||||||
|
checkview -display a_1 -2d -path ${imagedir}/${test_image}.png
|
Loading…
x
Reference in New Issue
Block a user