1
0
mirror of https://git.dev.opencascade.org/repos/occt.git synced 2025-04-03 17:56:21 +03:00
occt/tests/bugs/iges/bug23746
ika fdabc2117e 0023746: IGES wheel model fails to load when OCCT unit is meters
Add check for too small distances during edges reordering
Fix writing TrimmedSurface (Type 144).
Fix checking for too small distances between loops of edges during edge's reordering.
Add checking for too small BSpline segments during reading and writing IGES.
Fix wire splitting by adding checking that vertexes same not only in 3d, but in 2d too.
use tolerance of vertexes recomputed through resolution surface, not 2d curves.
Adding test case for this fix
Modified test case bugs iges bug23746 and cases in group de according to new reference data
2013-07-25 12:39:12 +04:00

77 lines
1.5 KiB
Plaintext
Executable File

puts "============"
puts "OCC23746"
puts "============"
puts ""
#######################################################################
# IGES wheel model fails to load when OCCT unit is meters
#######################################################################
param write.iges.brep.mode Faces
dall
tpclear
newmodel
param xstep.cascade.unit MM
igesbrep [locate_data_file bug23746_wheel.igs] a *
checkshape a
tpclear
newmodel
set aFile1 ${imagedir}/bug23746_wheel-0.igs
file delete ${aFile1}
brepiges a ${aFile1}
tpclear
newmodel
param xstep.cascade.unit M
igesbrep [locate_data_file bug23746_wheel.igs] b *
checkshape b
tpclear
newmodel
set aFile2 ${imagedir}/bug23746_wheel-1.igs
file delete ${aFile2}
brepiges b ${aFile2}
tpclear
newmodel
param xstep.cascade.unit MM
igesbrep ${aFile1} a0 *
checkshape a0
tpclear
newmodel
set aFile3 ${imagedir}/bug23746_wheel-0-0.igs
file delete ${aFile3}
brepiges a0 ${aFile3}
tpclear
newmodel
param xstep.cascade.unit M
igesbrep ${aFile1} b0 *
checkshape b0
tpclear
newmodel
set aFile4 ${imagedir}/bug23746_wheel-0-1.igs
file delete ${aFile4}
brepiges b0 ${aFile4}
tpclear
newmodel
param xstep.cascade.unit MM
igesbrep ${aFile2} a1 *
checkshape a1
tpclear
newmodel
set aFile5 ${imagedir}/bug23746_wheel-1-0.igs
file delete ${aFile5}
brepiges a1 ${aFile5}
tpclear
newmodel
param xstep.cascade.unit M
igesbrep ${aFile2} b1 *
checkshape b1
tpclear
newmodel
set aFile6 ${imagedir}/bug23746_wheel-1-1.igs
file delete ${aFile6}
brepiges b1 ${aFile6}