hasAlgTy :: Maybe Int -> Int
hasAlgTy = _

hasFunTy :: (Int -> Int) -> Int
hasFunTy = _

isSaturated :: Bool -> Int
isSaturated b = _