map length (tiers :: [[ Maybe Bool->Bool ]])  =  [8]

length (list :: [ Maybe Bool->Bool ])  =  8

allUnique (list :: [ Maybe Bool->Bool ])  =  True

ratioRepetitions (list :: [ Maybe Bool->Bool ])  =  0 % 1

tiers :: [Maybe Bool->Bool]  =
  [ [ \_ -> False
    , \x -> case x of
            Just True -> True
            _ -> False
    , \x -> case x of
            Just False -> True
            _ -> False
    , \x -> case x of
            Nothing -> False
            _ -> True
    , \x -> case x of
            Nothing -> True
            _ -> False
    , \x -> case x of
            Just False -> False
            _ -> True
    , \x -> case x of
            Just True -> False
            _ -> True
    , \_ -> True
    ]
  ]
