5d1833ef |
1 | puts "TODO ?OCC23068 ALL: \\*\\* Exception" |
8db070a5 |
2 | puts "TODO ?OCC23068 ALL: An exception was caught" |
3 | puts "TODO ?OCC23068 ALL: TEST INCOMPLETE" |
b7a3c470 |
4 | puts "TODO ?OCC23068 ALL: Error : The offset is not valid" |
ab87e6fc |
5 | puts "TODO ?OCC23748 ALL: ERROR. offsetperform operation not done." |
6 | puts "TODO ?OCC23748 ALL: Tcl Exception: ERROR. offsetperform operation not done." |
40093367 |
7 | |
8 | ellipse w1 0 0 0 15 10 |
9 | mkedge w1 w1 0 pi/2 |
10 | trotate w1 0 0 0 1 0 0 90 |
11 | polyline w2 0 0 10 0 0 -10 25 0 -10 15 0 0 |
12 | wire w w1 w2 |
13 | mkplane w w |
14 | revol s w 0 0 0 0 0 1 90 |
15 | |
16 | OFFSETSHAPE -1 {s_4 s_5} $calcul $type |
17 | |
18 | set volume 0 |