Haskell Übungsblatt 2

Aufgabe 2.4

>module Uebung2
>   where
>       --min3 :: Int -> Int -> Int -> Int
>       min3 x y z
>           | (x < y) && (x < z) = x
>           | (y < x) && (y < z) = y
>           | (z < x) && (z < y) = z
>           | otherwise = error "Fehler!"

Aufgabe 2.5

Die Signatur muss angepasst werden.
Bsp. min3 :: Double -> Double -> Double -> Double

>       allequal :: Bool -> Bool -> Bool -> Bool
>       allequal a b c
>           |(a == b) && (b == c) = True
>           |otherwise = False