Skip to content

Instantly share code, notes, and snippets.

View sanssecours's full-sized avatar

René Schwaiger sanssecours

View GitHub Profile
-- Imports ---------------------------------------------------------------------
import Aufgabe7 (
Nat(..), Ziffer(..), Zeichen(..), Graph(..)
, kIndependent, isConnected, isTree
, Airports(..), Airlines(..), Networks, Fare
, airlineConnections, allianceConnections, cheapestConnections
)
import Data.List (sort)
-- Imports ---------------------------------------------------------------------
import Aufgabe6 (
Nat(..), Ziffer(..), Zeichen(..)
, Tree(..), smt
, STree(..), t2st
, tsum, tdepth
, Graph(..), ne, independent, cover
)
import Test.HUnit
-- Imports ---------------------------------------------------------------------
import Aufgabe5 (Nat(..), Zeichen(..), Ziffer(..),
isCanPR, mkCanPR, plusPR, minusPR, timesPR, divPR,
eqPR, neqPR, grPR, lePR, grEqPR, leEqPR)
import Test.HUnit
-- Numbers ---------------------------------------------------------------------
nat0 = Nat ((A, A, A), (Null, Null, Null))
-- Imports ---------------------------------------------------------------------
import Aufgabe4
import Test.HUnit
import Control.Exception
import Control.Monad
-- Support ---------------------------------------------------------------------