dvdblk

3
3
1
2
1 2
2 3 3
2 2 2
3 3 3

3

dvdblk

import Data.List

type Operator a = a -> a -> a
type Compute = [String] -> [String]

-- isDigit for strings from Data.Char
isDigit :: String -> Bool
isDigit [] = True
isDigit (x:xs) = (f >= 48) && (f <= 57) && isDigit xs where f = fromEnum x 

dvdblk

--- implementation of useful haskell functions
--- http://fi.muny.cz/data/IB015/IB015-neimp-funkcie.pdf

myAll :: (a -> Bool) -> [a] -> Bool
myAll _ [] = True
myAll predicate (x:l) = if not (predicate x) then False else myAll predicate l

myAnd :: [Bool] -> Bool
myAnd = foldr1 (&&)

dvdblk

{- |
Fourth assignment for IB016, semester spring 2017, 20 points.

== Obtaining weather information from <http://openweathermap.org openweathermap.org>

This time, your task is to implement downloading and processing of weather data
from <http://openweathermap.org>.

You are given a partially implemented module (some data type definitions, 'main',
argument parsing and dispatch functions). Do not change any of the code

dvdblk

dvdblk

STRICT: Found: 1162 outer and 0 inner phrases; Gold: 6177 (outer) and 0 (inner).
LOOSE: Found: 1162 outer and 0 inner phrases; Gold: 6177 (outer) and 0 (inner).

1. Strict, Combined Evaluation (official):
Accuracy:  95.75%;
Precision:  67.81%;
Recall:  12.76%;
FB1:  21.47

2. Loose, Combined Evaluation: