fdabc211 |
1 | puts "============" |
2 | puts "OCC23746" |
3 | puts "============" |
4 | puts "" |
5 | ####################################################################### |
6 | # IGES wheel model fails to load when OCCT unit is meters |
7 | ####################################################################### |
8 | |
9 | param write.iges.brep.mode Faces |
10 | dall |
11 | |
12 | tpclear |
13 | newmodel |
14 | param xstep.cascade.unit MM |
15 | igesbrep [locate_data_file bug23746_wheel.igs] a * |
16 | checkshape a |
17 | tpclear |
18 | newmodel |
19 | set aFile1 ${imagedir}/bug23746_wheel-0.igs |
20 | file delete ${aFile1} |
21 | brepiges a ${aFile1} |
22 | |
23 | tpclear |
24 | newmodel |
25 | param xstep.cascade.unit M |
26 | igesbrep [locate_data_file bug23746_wheel.igs] b * |
27 | checkshape b |
28 | tpclear |
29 | newmodel |
30 | set aFile2 ${imagedir}/bug23746_wheel-1.igs |
31 | file delete ${aFile2} |
32 | brepiges b ${aFile2} |
33 | |
34 | tpclear |
35 | newmodel |
36 | param xstep.cascade.unit MM |
37 | igesbrep ${aFile1} a0 * |
38 | checkshape a0 |
39 | tpclear |
40 | newmodel |
41 | set aFile3 ${imagedir}/bug23746_wheel-0-0.igs |
42 | file delete ${aFile3} |
43 | brepiges a0 ${aFile3} |
44 | |
45 | tpclear |
46 | newmodel |
47 | param xstep.cascade.unit M |
48 | igesbrep ${aFile1} b0 * |
49 | checkshape b0 |
50 | tpclear |
51 | newmodel |
52 | set aFile4 ${imagedir}/bug23746_wheel-0-1.igs |
53 | file delete ${aFile4} |
54 | brepiges b0 ${aFile4} |
55 | |
56 | tpclear |
57 | newmodel |
58 | param xstep.cascade.unit MM |
59 | igesbrep ${aFile2} a1 * |
60 | checkshape a1 |
61 | tpclear |
62 | newmodel |
63 | set aFile5 ${imagedir}/bug23746_wheel-1-0.igs |
64 | file delete ${aFile5} |
65 | brepiges a1 ${aFile5} |
66 | |
67 | tpclear |
68 | newmodel |
69 | param xstep.cascade.unit M |
70 | igesbrep ${aFile2} b1 * |
71 | checkshape b1 |
72 | tpclear |
73 | newmodel |
74 | set aFile6 ${imagedir}/bug23746_wheel-1-1.igs |
75 | file delete ${aFile6} |
76 | brepiges b1 ${aFile6} |