Commit | Line | Data |
---|---|---|
355c1551 | 1 | set subgroup modalg |
2 | ||
3bea4c16 | 3 | set calcul "p" |
4 | set type "i" | |
5 | ||
6 | proc OFFSETSHAPE {distance faces calcul type} { | |
7 | uplevel #0 explode s f | |
8 | uplevel #0 offsetparameter 1e-7 $calcul $type | |
9 | uplevel #0 offsetload s $distance $faces | |
10 | uplevel #0 offsetperform result | |
11 | } | |
12 | ||
13 | ||
355c1551 | 14 | |
15 | ||
16 | ||
17 | ||
18 | ||
19 | ||
20 |