Adding test cases from chl grid
[occt.git] / tests / bugs / modalg / begin
1 set subgroup modalg
2
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
14
15
16
17
18
19
20