extend near$1b far$1b $4
')
abs e 200 200 0
- extendyard(`0',`e',`len 500',`len 500')
- extendyard(`1',`j0_a',`len 500',`len 500')
+ extendyard(`0',`e', `len 600',`len 500')
+ extendyard(`1',`j0_a',`len 500',`len 400')
extend j1_a e2a ang 2 -230
extend e2a near2a parallel near0a 230
- extend near2a far2a len 400
+ extend near2a far2a len 370
enddef
-extend sta_0y1_a yard_0e ang 30 -230
+extend sta_0y1_a yard_0e ang 31 -230
part yard yard e yard_0e
#---------- train houses
-extend sta_tt_out135 sta_9house parallel yard_far0a -230
-extend sta_tt_out150 sta_8house parallel yard_far0a -300
-extend sta_tt_out165 sta_7house parallel yard_far0a -430
+extend sta_tt_out135 sta_9house len 200 -230
+extend sta_tt_out150 sta_8house len 230 -400
+extend sta_tt_out165 sta_7house upto sta_8house -2000
eof