module Main where import Aufgabe1 main :: IO () main = putStrLn result