From 244503bba91c9a99c9ab5a6a74b74d5c9bd9667e Mon Sep 17 00:00:00 2001 From: William Carroll Date: Wed, 5 Aug 2020 23:20:18 +0100 Subject: Support App.transform Apply the transform to a Keyboard. Onwards to the final demonstration! --- scratch/brilliant/Keyboard.hs | 1 + 1 file changed, 1 insertion(+) (limited to 'scratch/brilliant/Keyboard.hs') diff --git a/scratch/brilliant/Keyboard.hs b/scratch/brilliant/Keyboard.hs index c5baaa5f2474..885acb29e4cd 100644 --- a/scratch/brilliant/Keyboard.hs +++ b/scratch/brilliant/Keyboard.hs @@ -6,6 +6,7 @@ import qualified Data.List as List -------------------------------------------------------------------------------- newtype Keyboard = Keyboard [[Char]] + deriving (Eq) instance Show Keyboard where show (Keyboard xxs) = -- cgit 1.4.1