some experiments on layer 0

diff --git a/layout/ours.m4 b/layout/ours.m4
index 22c2e9bbcf4b78fd657d0d3d7bf7c81cf8f3bea5..3449518d1651f2ec0a75921e6f3ee994cf2ef8db 100644 (file)
--- a/layout/ours.m4
+++ b/layout/ours.m4
@@ -143,6 +143,43 @@ extend -l3_ptl -l3_tlc7 ang 60 -389
 extend -l2_ptl -l2_tcl7 ang 60 -352
 extend -l0_jtl_c -l0_tcl7 ang 60 -315
 
+part l45_lx scis_shino tl l4_ct
+
+part l4_shbr pt_peco_sl c l4_cl
+
+#---------- station
+
+layer 0
+
+rel sq_br_i sta_far_4 30 300 -175
+extend -sta_far_4 -sta_plat_4 len 1118
+
+rel sta_far_4 sta_far_5 0 30
+extend -sta_far_5 -sta_plat_5 upto sta_plat_4
+
+part l4_stbr pt_peco_sl a sta_plat_4
+part l4_stbrx pt_peco_sr c -sta_plat_4
+
+extend l4_shbr_a l4_stbr_q ang 100 -315
+#join l4_shbr_a l4_stbr_c 315
+
+#---------- shunting yard
+
+layer 0
+
+rel sq_br_i shunt_f09 140 550 180
+extend -shunt_f09 -shunt_yp09_b len 400
+part shunt_yp09 pt_peco_sr b
+
+define(`extendyard',`
+ part $1_yp$2 pt_peco_sr a $1_yp$3_c
+ extend $1_yp$2_b $1_f$2 upto $1_f$3
+')
+
+extendyard(`shunt',`10',`09')
+extendyard(`shunt',`11',`10')
+extendyard(`shunt',`12',`11')
+
 
 #---------- hill branch (figure of 8)