module Model.MySettings
     (
           MySettings(..)
         , newSettings
     )where
 import [...]
 -- Typsynonym
 type Max = Int
 --Datentyp MySettings
 data MySettings = MySettings
     { myMax         :: Max }
 --diese Funktion legt die maximale Anzahl an hochladbaren Dateien fest
 newSettings num = do
   return MySettings { myMax = num }