view exercises/src/Exercise_1.hs @ 0:9bd0c4f30c49

week 1
author Markus Kaiser <markus.kaiser@in.tum.de>
date Wed, 17 Oct 2012 14:47:38 +0200
parents
children e532198d58f4
line wrap: on
line source

module Exercise_1 where
import Test.QuickCheck

{---------------------------------------------------------------------}
{- G1.1 -}
threeDifferent :: Integer -> Integer -> Integer -> Bool
threeDifferent x y z = undefined

fourEqual :: Integer -> Integer -> Integer -> Integer -> Bool
fourEqual w x y z = undefined



{---------------------------------------------------------------------}
{- G1.2 -}
fac :: Integer -> Integer
fac n = undefined

sum_ten :: Integer -> Integer
sum_ten n = undefined



{---------------------------------------------------------------------}
{- G1.3 -}
g :: Integer -> Integer
g n = if n < 10 then n*n else n

max_g :: Integer -> Integer
max_g n = undefined

{- Aufgabe H1.1 -}
{-WETT-} {- Diese Zeile nicht entfernen -}
sum_max_sq :: Integer -> Integer -> Integer -> Integer
sum_max_sq x y z = undefined

{-TTEW-} {- Diese Zeile nicht enfernen! -}




{---------------------------------------------------------------------}
{- Aufgabe H1.2 -}

{- Teil 1 -}
f :: Integer -> Integer
f n = undefined

{- Teil 2 -}
{-
 - Schreiben Sie ihre Lösungen in diesen Kommentar
 -}

{- Teil 3 -}
f' :: Integer -> Integer
f' n = undefined

{-   Quickcheck test -}



{---------------------------------------------------------------------}
{- Aufgabe H1.3 -}

{- Teil 1 -}
is_square' :: Integer -> Integer -> Bool
is_square' n m = undefined

{- Teil 2 -}
is_square :: Integer -> Bool
is_square n = undefined