{-# LANGUAGE DeriveGeneric #-}

module Server.DTOs.CreateTextElement (CreateTextElement (..)) where

import GHC.Generics (Generic)

import Data.Aeson (FromJSON, ToJSON)

import Data.OpenApi (ToSchema)

import Docs.TextElement (TextElementKind, TextElementType)

data CreateTextElement = CreateTextElement
    { CreateTextElement -> TextElementKind
kind :: TextElementKind
    , CreateTextElement -> TextElementKind
type_ :: TextElementType
    }
    deriving ((forall x. CreateTextElement -> Rep CreateTextElement x)
-> (forall x. Rep CreateTextElement x -> CreateTextElement)
-> Generic CreateTextElement
forall x. Rep CreateTextElement x -> CreateTextElement
forall x. CreateTextElement -> Rep CreateTextElement x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cfrom :: forall x. CreateTextElement -> Rep CreateTextElement x
from :: forall x. CreateTextElement -> Rep CreateTextElement x
$cto :: forall x. Rep CreateTextElement x -> CreateTextElement
to :: forall x. Rep CreateTextElement x -> CreateTextElement
Generic)

instance ToJSON CreateTextElement

instance FromJSON CreateTextElement

instance ToSchema CreateTextElement