{-# LANGUAGE OverloadedStrings #-}

module Faker.TvShow.AquaTeenHungerForce where

import Data.Text
import Faker
import Faker.Internal
import Faker.Provider.AquaTeenHungerForce

character :: Fake Text
character :: Fake Text
character =
  (FakerSettings -> IO Text) -> Fake Text
forall a. (FakerSettings -> IO a) -> Fake a
Fake ((FakerSettings -> IO Text) -> Fake Text)
-> (FakerSettings -> IO Text) -> Fake Text
forall a b. (a -> b) -> a -> b
$ Text
-> Text
-> (FakerSettings -> IO (Vector Text))
-> FakerSettings
-> IO Text
forall (m :: * -> *).
(MonadThrow m, MonadIO m) =>
Text
-> Text
-> (FakerSettings -> m (Vector Text))
-> FakerSettings
-> m Text
cachedRandomVec Text
"aquaTeenHungerForce" Text
"character" FakerSettings -> IO (Vector Text)
forall (m :: * -> *).
(MonadThrow m, MonadIO m) =>
FakerSettings -> m (Vector Text)
athfCharacterProvider

quote :: Fake Text
quote :: Fake Text
quote =
  (FakerSettings -> IO Text) -> Fake Text
forall a. (FakerSettings -> IO a) -> Fake a
Fake ((FakerSettings -> IO Text) -> Fake Text)
-> (FakerSettings -> IO Text) -> Fake Text
forall a b. (a -> b) -> a -> b
$ Text
-> Text
-> (FakerSettings -> IO (Vector Text))
-> FakerSettings
-> IO Text
forall (m :: * -> *).
(MonadThrow m, MonadIO m) =>
Text
-> Text
-> (FakerSettings -> m (Vector Text))
-> FakerSettings
-> m Text
cachedRandomVec Text
"aquaTeenHungerForce" Text
"quote" FakerSettings -> IO (Vector Text)
forall (m :: * -> *).
(MonadThrow m, MonadIO m) =>
FakerSettings -> m (Vector Text)
quoteProvider