module OpenAI.V1.ListOf
(
ListOf(..)
) where
import OpenAI.Prelude
data ListOf a = List{ forall a. ListOf a -> Vector a
data_ :: Vector a }
deriving stock ((forall x. ListOf a -> Rep (ListOf a) x)
-> (forall x. Rep (ListOf a) x -> ListOf a) -> Generic (ListOf a)
forall x. Rep (ListOf a) x -> ListOf a
forall x. ListOf a -> Rep (ListOf a) x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
forall a x. Rep (ListOf a) x -> ListOf a
forall a x. ListOf a -> Rep (ListOf a) x
$cfrom :: forall a x. ListOf a -> Rep (ListOf a) x
from :: forall x. ListOf a -> Rep (ListOf a) x
$cto :: forall a x. Rep (ListOf a) x -> ListOf a
to :: forall x. Rep (ListOf a) x -> ListOf a
Generic, Int -> ListOf a -> ShowS
[ListOf a] -> ShowS
ListOf a -> String
(Int -> ListOf a -> ShowS)
-> (ListOf a -> String) -> ([ListOf a] -> ShowS) -> Show (ListOf a)
forall a. Show a => Int -> ListOf a -> ShowS
forall a. Show a => [ListOf a] -> ShowS
forall a. Show a => ListOf a -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: forall a. Show a => Int -> ListOf a -> ShowS
showsPrec :: Int -> ListOf a -> ShowS
$cshow :: forall a. Show a => ListOf a -> String
show :: ListOf a -> String
$cshowList :: forall a. Show a => [ListOf a] -> ShowS
showList :: [ListOf a] -> ShowS
Show)
instance FromJSON a => FromJSON (ListOf a) where
parseJSON :: Value -> Parser (ListOf a)
parseJSON = Options -> Value -> Parser (ListOf a)
forall a.
(Generic a, GFromJSON Zero (Rep a)) =>
Options -> Value -> Parser a
genericParseJSON Options
aesonOptions