-define(theta,38.50)
-abs a 5 50 0
-extend a b ang theta -230
-extend b c uptoang 0 230
-extend c d ang theta 230
-extend d e uptoang 0 -230
-extend e f len 300
+# -* fundamental -*-
+
+include(`parts.i4')
+
+abs c0 200 100 15
+extend -c0 -c1 len 150 230
+part pt pt_peco_sl c c0
+
+extend pt_a a1 len 150 230
+extend a1 a2 len 50 -315
+extend a2 a3 len 50 -315
+
+extend pt_b b1 len 300 230
+extend b1 b2 len 50 -315
+extend b2 b3 len 50 -315
+extend b3 b4 len 50 -315