From d72ffdd90d30eb28cb035a8b6064a382c0c936e3 Mon Sep 17 00:00:00 2001 From: Matthew Butterick Date: Wed, 29 Jan 2020 13:12:33 -0800 Subject: [PATCH] floating div --- quad/quadwriter/attrs.rkt | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/quad/quadwriter/attrs.rkt b/quad/quadwriter/attrs.rkt index ddb97332..2d534c6f 100644 --- a/quad/quadwriter/attrs.rkt +++ b/quad/quadwriter/attrs.rkt @@ -11,7 +11,7 @@ (define (cm->in x) (/ x 2.54)) (define (in->pts x) (* 72 x)) -(define (mm->cm x) (/ x 10)) +(define (mm->cm x) (/ x 10.0)) (define (parse-dimension x) (match x