chiark / gitweb /
two-up so we can get a whole metre on
[trains.git] / layout / slopecalc
index 63c8ccb5a512283c8c3a380210d2e1e68a3f8b17..3133646caf4e28c96a5fc59ac6bad1ad5ce9c2ae 100755 (executable)
@@ -2,7 +2,7 @@
 #
 # usage:
 #   slopecalc =HEIGHT|SLOPE%|+DIST|@ABSDIST ...
-#     ... | atp -B -p >ps
+#     ... | atp -B >ps
 #
 # args represent details of control points
 #
@@ -24,7 +24,7 @@ use strict qw(vars refs);
 
 our $halfreverselen= 80; # mm to change from going flat to going up/down
 our $printinterval= 10;
-our $totallinesout= 66;
+our $totallinesout= 132;
 
 our @cp= ({ L => 0 });
 # $cp[]{H}    height