aboutsummaryrefslogtreecommitdiff
path: root/layer/ductusPrinter.ml
diff options
context:
space:
mode:
Diffstat (limited to 'layer/ductusPrinter.ml')
-rwxr-xr-xlayer/ductusPrinter.ml4
1 files changed, 2 insertions, 2 deletions
diff --git a/layer/ductusPrinter.ml b/layer/ductusPrinter.ml
index 2ee96e4..8383a9c 100755
--- a/layer/ductusPrinter.ml
+++ b/layer/ductusPrinter.ml
@@ -46,9 +46,9 @@ module Make(Repr: Repr.PRINTER) = struct
recent point *)
let delay =
((Path.Point.get_stamp p0) -. (Path.Point.get_stamp p1))
- *. 20.
+ *. 30.
in
- for i = 0 to ((Int.of_float delay) -1) do
+ for i = 0 to ((Int.of_float delay) ) do
let ratio = (Float.of_int i) /. delay in
let bezier', _ = Shapes.Bezier.slice ratio bezier in