From 91154440a3fd4c2a156290cd50dc6d1e15bf779a Mon Sep 17 00:00:00 2001
From: Werner Almesberger <werner@almesberger.net>
Date: Sat, 26 May 2012 20:10:26 -0300
Subject: [PATCH] test/floor: add two real-life-like rounding problems (mil to
 mm)

---
 test/floor | 18 ++++++++++++++++++
 1 file changed, 18 insertions(+)

diff --git a/test/floor b/test/floor
index ced963e..e0c399b 100755
--- a/test/floor
+++ b/test/floor
@@ -19,4 +19,22 @@ expect <<EOF
 -2
 EOF
 
+#------------------------------------------------------------------------------
+
+fped "floor: round 7 mil (0.1778 mm) to two digits in mm" <<EOF
+%print floor(7mil/0.01mm+0.5)*0.01mm
+EOF
+expect <<EOF
+0.18mm
+EOF
+
+#------------------------------------------------------------------------------
+
+fped "floor: round 12 mil (0.3048 mm) to two digits in mm" <<EOF
+%print floor(12mil/0.01mm+0.5)*0.01mm
+EOF
+expect <<EOF
+0.3mm
+EOF
+
 ###############################################################################