>>> slistToMaybe mempty Nothing
>>> slistToMaybe (one 42) Just 42
>>> slistToMaybe (cons 1 $ cons 2 $ one 3) Just 1Laws :
slistToMaybe . maybeToList ≡ idReverse is right only on singleton/empty lists
maybeToList . slistToMaybe {empty, singleton slist} ≡ {empty, singleton slist}