changeset 8:8689a0a4b38e

add example key
author Markus Kaiser <markus.kaiser@in.tum.de>
date Wed, 07 Nov 2012 22:17:33 +0100
parents b50c976522fa
children f4d71c6df64c
files exercises/src/Exercise_4.hs
diffstat 1 files changed, 1 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/exercises/src/Exercise_4.hs	Wed Nov 07 20:27:58 2012 +0100
+++ b/exercises/src/Exercise_4.hs	Wed Nov 07 22:17:33 2012 +0100
@@ -12,6 +12,7 @@
 
 {---------------------------------------------------------------------}
 {- Aufgabe G4.2 -}
+key = [('a','x'),('H','e'),('l','P'),('o','M')]
 
 cryptChar :: [(Char,Char)] -> Char -> Char
 cryptChar [] c = '_'