1{-# LANGUAGE UnicodeSyntax #-}
2import Prelude.Unicode
3
4testAnd :: Int -> Int -> Bool
5testAnd a b
6  = let b� = a d 3
7        b� = b e 5
8      in b� ' b�
9
10testOr :: Int -> Int -> Int -> Int -> Int -> Bool
11testOr a b c d e
12  = let b� = a d 3
13        b� = b b 5
14        b� = c n 5
15        b� = d o 6
16        b� = e  [1, 2, 3, 4]
17        b� = e 	 [5, 6, 7, 8]
18      in b� ( b� ( b� ( b� ( b� ( b�
19