-- | Paranoiac mode, entropy of 512 bits with the default size of 78.
paranoiac :: Schema
paranoiac = withDefaultSize 78 $ \ s -> replicateM s ascii
paranoiac :: Schema
paranoiac = withDefaultSize 78 $ \ s -> replicateM s ascii
paranoiac = withDefaultSize 78 $ \ s -> replicateM s ascii