module Model.MySettings
    (
          MySettings(..)
        , newSettings
    )where
import [...]
-- type synonym
type Max = Int
--Datentyp MySettings
data MySettings = MySettings
    { myMax         :: Max }
--this function determines the maximum number of uploadable files
newSettings num = do
  return MySettings { myMax = num }