From 98a1b367d578be56001954991b54534ce5ccb614 Mon Sep 17 00:00:00 2001 From: hasufell Date: Mon, 6 Oct 2014 22:19:46 +0200 Subject: [PATCH] Style --- Diagram.hs | 1 - 1 file changed, 1 deletion(-) diff --git a/Diagram.hs b/Diagram.hs index d8c0a5d..bf17400 100644 --- a/Diagram.hs +++ b/Diagram.hs @@ -126,7 +126,6 @@ showWhiteRectB = Diag f f p _ = whiteRect (xuD p - xlD p + 50) (yuD p - ylD p + 50) - -- |Create the Diagram from the VTable. diag :: DiagProp -> VTable -> Diagram Cairo R2 diag p = case alg p of