0023087: Upgrade of the OCCT test system
[occt.git] / tests / feat / featprism / L1
CommitLineData
40093367 1# Original bug : fra60618
2# Date : 23 Mar 98
3
4restore fra60618-part.rle base
5restore fra60618-tool.rle wire
6
7mkplane cont wire
8
9nexplode base face
10copy base_15 funtil
11
12## creation de face infinie support
13mksurface p15 base_15
14mkface f15 p15
15
16featprism base cont cont 0 0 -1 0 1
17featperform prism result f15
18
19set square 16398.2