part sta_tt tt_atlas mid
part sta_ttmotor tt_atlas_motor cout sta_tt_out90
-#rel sta_4far_platnear sta_2fars -350 -58.5
-#rel sta_2fars sta_3fars 100 27
-#extend sta_3fars -sta_jfar23_a ang 15 -450
-#part sta_jfar23 pt_peco_sr a
-#join sta_2fars -sta_jfar23_b 230
-#extend -sta_jfar23_c sta_2far3m len 160 -450
-
rel sta_4neare sta_3neare 15 -48 -8
part sta_3sc pt_peco_sr c -sta_3neare
join leb_4y_b -sta_3sc_a 230
extend sta_2nears sta_2far upto sta_3far1
join sta_2far -sta_tt_out195 230
-#extend leb_4y_b -l3s_jth_a len 20
-#part l3s_jth pt_peco_sr a
-
-#join -l3s_jth_c sta_3nears 230 arcline
-
-#part sta_3sc pt_peco_sl c sta_3nears
-
#---------- train houses
-
-#extend l3s_jth_b l3th_m ang 135 230
-
-
-
-
-#rel sq_br_i sta_4far 30 300 -175
-#extend -sta_4far -sta_plat_4 len 1118
-
-#rel sta_4far sta_5far 0 30
-#extend -sta_5far -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 10
extendyard(`12',`11')
enddef
-#rel sq_br_i yard_f09 140 550 180
-#part yard yard f09
-
part yard yard yp12_c sta_0y1_a
-#---------- hill branch (figure of 8)
-
-layer 20
-
-#rel sq_bl_i h_bl_l 230 0 180
-#extend h_bl_l h_bl_b ang 90 -230
-
-#extend -h_bl_l -h_bre upto leb_0k 230
-#extend -h_bre -h_brj1 len 20 230
-#extend -h_brj1 -h_brjm len 30
-#extend -h_brjm -h_brj0 len 30
-#extend -h_brj0 -h_brh len 80 230
-#extend -h_brh -h_8m uptoang -35 230
-#extend -h_8m -h_8b uptoang 245 -230
-
-#rel bot_0lk_c -h_pbl_c 0 -45
-#rel bot_0lk_b -h_pbl_b 0 -45
-#join h_pbl_b h_pbl_c 230
-#extend -h_pbl_b -midx_sc_p ang 40 -270
-#join midx_sc_b midx_sc_p 230
-
-#extend h_pbl_c h_ub upto h_brh 270
-#join h_ub h_8b 230
-
-#---------- hill stations turntable
-
-#defobj tt_corner
-# layer 20
-# abs mid 200 200 0
-# extend out sout ang 45 -230
-# extend -in -sin ang 45 230
-
-# layer l20
-# rel in forcirc0 80 80 0
-# rel forcirc0 forcirc1 0 -160 180
-# join forcirc0 forcirc1 0
-# join forcirc1 forcirc0 0
-
-# layer s20
-# extend sin cnr upto sout
-#enddef
-
-#part tt tt_corner cnr -sq_br_i
-
eof