{-# 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