Commit | Line | Data |
---|---|---|
40093367 | 1 | # cts20088 |
2 | ||
34dd4990 | 3 | restore [locate_data_file cts20088_base.brep] base |
8418c617 | 4 | restore [locate_data_file contour_pkv.rle] cont |
40093367 | 5 | |
6 | explode base face | |
7 | ||
8 | mksurface p54 base_54 | |
9 | mkface f54 p54 | |
10 | mksurface p55 base_55 | |
11 | mkface f55 p55 | |
12 | ||
13 | featprism base cont cont 1 0 0 1 1 | |
14 | featperform prism result f54 f55 | |
15 | ||
1704c576 | 16 | set square 4685.62 |
17 |