From: ian <ian>
Date: Fri, 6 Feb 2004 22:26:58 +0000 (+0000)
Subject: bogus shino curved point
X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~ijackson/git?a=commitdiff_plain;h=c74a341df5c89cde229f40ec636db5a70052a415;p=trains.git

bogus shino curved point
---

diff --git a/layout/parts.i4 b/layout/parts.i4
index 6249016..70baf35 100644
--- a/layout/parts.i4
+++ b/layout/parts.i4
@@ -102,6 +102,16 @@ defpart pt_shino_x3
   join c r 1 arcline
 enddef
 
+defpart pt_shino_cl
+  abs c 200 200 -20
+  extend c a len 268 -315
+  extend c b upto a -285
+enddef
+defpart pt_shino_cr
+  abs c 200 200 20
+  objflip pt_shino_cl c c =
+enddef
+
 defpart slip2_shino
  abs m 200 200 0
  rel m ml 0 0  4.75