Mercurial > 12ws.info2
view exercises/src/Exercise_13.hs @ 33:71b56f8b3069
week 13
author | Markus Kaiser <markus.kaiser@in.tum.de> |
---|---|
date | Wed, 23 Jan 2013 23:22:07 +0100 |
parents | |
children | f62e3ed2c90d |
line wrap: on
line source
module Exercise_13 where import Data.Char (isDigit, digitToInt) import Data.List (find, isInfixOf, isSuffixOf, nub, sort, intersect) import System.Random (randomRIO) import Test.QuickCheck {---------------------------------------------------------------------} {- Aufgabe G13.1 -} nRandomR :: (Int, Int) -> Int -> IO [Int] nRandomR lowhigh = undefined {---------------------------------------------------------------------} {- Aufgabe G13.1 -} getLineInt :: IO Int getLineInt = undefined guessNum :: IO Int guessNum = undefined {---------------------------------------------------------------------} {- Aufgabe H13.1 -} getSorted :: IO [String] getSorted = undefined {---------------------------------------------------------------------} {- Aufgabe H13.2 -} bullsAndBears :: IO () bullsAndBears = undefined