0  BEGIN PGM 13_006_POCKET4 MM 
1  * 10 contours
2  ;* origin_file = "Adaptergehaeuse.stp"
3  ; FUNCTION MODE MILL
4  ;* origin = X+0.0000 Y+0.0000 Z+0.0000
5  ; PLANE RESET STAY
6  ; TRANS DATUM AXIS X+0.0000 Y+0.0000 Z+0.0000
7  ; 1 + 3 line(s) + 7 arc(s) + 0 gap-filler(s), minimum arc radius = +4.5000
8  ; all_blk_form from complete file
9  BLK FORM 0.1 Z X-58.7563 Y-38.3047 Z-16
10 BLK FORM 0.2  X+58.1873  Y+38.1148  Z+0
11 ; sel_blk_form from selection
12 BLK FORM 0.1 Z X-12.4238 Y-25.3623 Z-10.025
13 BLK FORM 0.2  X+45.5773  Y+20.2805  Z-9.975
14 L  X+37.9359  Y-9.4272  Z-10
15 L  X+37.1885  Y-7.7861  Z-10
16 CC  X+33.0932  Y-9.6511
17 C  X+33.62  Y-5.1821 DR+
18 L  X+33.0142  Y-5.1107  Z-10
19 CC  X+32.4874  Y-9.5797
20 C  X+28.2678  Y-8.0162 DR+
21 CC  X+8.5762  Y-0.7195
22 C  X+24.4429  Y-14.4762 DR-
23 CC  X+27.843  Y-17.424
24 C  X+27.7724  Y-21.9235 DR+
25 L  X+29.7363  Y-21.9543  Z-10
26 CC  X+29.8069  Y-17.4548
27 C  X+34.2061  Y-18.402 DR+
28 CC  X+39.8273  Y-19.6123
29 C  X+36.4689  Y-14.945 DR-
30 CC  X+33.8406  Y-11.2923
31 C  X+37.9359  Y-9.4272 DR+
32 ;* end contours
33 END PGM 13_006_POCKET4 MM