#
# usage:
# slopecalc =HEIGHT|SLOPE%|+DIST|@ABSDIST ...
-# ... | atp -B -p >ps
+# ... | atp -B >ps
#
# args represent details of control points
#
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