claude-1.0.0: Servant bindings to Anthropic's Claude API
Safe HaskellNone
LanguageHaskell2010

Claude.V1.Messages.Batches

Description

/v1/messages/batches

This module provides types for the Claude Message Batches API. Batches allow asynchronous processing of multiple messages at once.

Synopsis

Request types

data CreateBatch Source #

Request body for creating a batch

Constructors

CreateBatch 

Fields

Instances

Instances details
FromJSON CreateBatch Source # 
Instance details

Defined in Claude.V1.Messages.Batches

Methods

parseJSON :: Value -> Parser CreateBatch #

parseJSONList :: Value -> Parser [CreateBatch] #

omittedField :: Maybe CreateBatch #

ToJSON CreateBatch Source # 
Instance details

Defined in Claude.V1.Messages.Batches

Methods

toJSON :: CreateBatch -> Value #

toEncoding :: CreateBatch -> Encoding #

toJSONList :: [CreateBatch] -> Value #

toEncodingList :: [CreateBatch] -> Encoding #

omitField :: CreateBatch -> Bool #

Generic CreateBatch Source # 
Instance details

Defined in Claude.V1.Messages.Batches

Associated Types

type Rep CreateBatch 
Instance details

Defined in Claude.V1.Messages.Batches

type Rep CreateBatch = D1 ('MetaData "CreateBatch" "Claude.V1.Messages.Batches" "claude-1.0.0-1j0Plg9n3EjAvfVKcV8Pl0" 'False) (C1 ('MetaCons "CreateBatch" 'PrefixI 'True) (S1 ('MetaSel ('Just "requests") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Vector BatchRequest))))

Methods

from :: CreateBatch -> Rep CreateBatch x #

to :: Rep CreateBatch x -> CreateBatch #

Show CreateBatch Source # 
Instance details

Defined in Claude.V1.Messages.Batches

Methods

showsPrec :: Int -> CreateBatch -> ShowS #

show :: CreateBatch -> String #

showList :: [CreateBatch] -> ShowS #

type Rep CreateBatch Source # 
Instance details

Defined in Claude.V1.Messages.Batches

type Rep CreateBatch = D1 ('MetaData "CreateBatch" "Claude.V1.Messages.Batches" "claude-1.0.0-1j0Plg9n3EjAvfVKcV8Pl0" 'False) (C1 ('MetaCons "CreateBatch" 'PrefixI 'True) (S1 ('MetaSel ('Just "requests") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Vector BatchRequest))))

_CreateBatch :: CreateBatch Source #

Default CreateBatch

data BatchRequest Source #

A single request within a batch

Constructors

BatchRequest 

Fields

Instances

Instances details
FromJSON BatchRequest Source # 
Instance details

Defined in Claude.V1.Messages.Batches

Methods

parseJSON :: Value -> Parser BatchRequest #

parseJSONList :: Value -> Parser [BatchRequest] #

omittedField :: Maybe BatchRequest #

ToJSON BatchRequest Source # 
Instance details

Defined in Claude.V1.Messages.Batches

Methods

toJSON :: BatchRequest -> Value #

toEncoding :: BatchRequest -> Encoding #

toJSONList :: [BatchRequest] -> Value #

toEncodingList :: [BatchRequest] -> Encoding #

omitField :: BatchRequest -> Bool #

Generic BatchRequest Source # 
Instance details

Defined in Claude.V1.Messages.Batches

Associated Types

type Rep BatchRequest 
Instance details

Defined in Claude.V1.Messages.Batches

type Rep BatchRequest = D1 ('MetaData "BatchRequest" "Claude.V1.Messages.Batches" "claude-1.0.0-1j0Plg9n3EjAvfVKcV8Pl0" 'False) (C1 ('MetaCons "BatchRequest" 'PrefixI 'True) (S1 ('MetaSel ('Just "custom_id") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text) :*: S1 ('MetaSel ('Just "params") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 CreateMessage)))

Methods

from :: BatchRequest -> Rep BatchRequest x #

to :: Rep BatchRequest x -> BatchRequest #

Show BatchRequest Source # 
Instance details

Defined in Claude.V1.Messages.Batches

Methods

showsPrec :: Int -> BatchRequest -> ShowS #

show :: BatchRequest -> String #

showList :: [BatchRequest] -> ShowS #

type Rep BatchRequest Source # 
Instance details

Defined in Claude.V1.Messages.Batches

type Rep BatchRequest = D1 ('MetaData "BatchRequest" "Claude.V1.Messages.Batches" "claude-1.0.0-1j0Plg9n3EjAvfVKcV8Pl0" 'False) (C1 ('MetaCons "BatchRequest" 'PrefixI 'True) (S1 ('MetaSel ('Just "custom_id") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text) :*: S1 ('MetaSel ('Just "params") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 CreateMessage)))

Response types

data BatchObject Source #

A batch object returned from the API

Constructors

BatchObject 

Fields

Instances

Instances details
FromJSON BatchObject Source # 
Instance details

Defined in Claude.V1.Messages.Batches

Methods

parseJSON :: Value -> Parser BatchObject #

parseJSONList :: Value -> Parser [BatchObject] #

omittedField :: Maybe BatchObject #

ToJSON BatchObject Source # 
Instance details

Defined in Claude.V1.Messages.Batches

Methods

toJSON :: BatchObject -> Value #

toEncoding :: BatchObject -> Encoding #

toJSONList :: [BatchObject] -> Value #

toEncodingList :: [BatchObject] -> Encoding #

omitField :: BatchObject -> Bool #

Generic BatchObject Source # 
Instance details

Defined in Claude.V1.Messages.Batches

Associated Types

type Rep BatchObject 
Instance details

Defined in Claude.V1.Messages.Batches

type Rep BatchObject = D1 ('MetaData "BatchObject" "Claude.V1.Messages.Batches" "claude-1.0.0-1j0Plg9n3EjAvfVKcV8Pl0" 'False) (C1 ('MetaCons "BatchObject" 'PrefixI 'True) (((S1 ('MetaSel ('Just "id") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text) :*: S1 ('MetaSel ('Just "type_") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text)) :*: (S1 ('MetaSel ('Just "processing_status") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 ProcessingStatus) :*: S1 ('MetaSel ('Just "request_counts") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 RequestCounts))) :*: ((S1 ('MetaSel ('Just "ended_at") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe POSIXTime)) :*: S1 ('MetaSel ('Just "created_at") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 POSIXTime)) :*: (S1 ('MetaSel ('Just "expires_at") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 POSIXTime) :*: (S1 ('MetaSel ('Just "cancel_initiated_at") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe POSIXTime)) :*: S1 ('MetaSel ('Just "results_url") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Text)))))))

Methods

from :: BatchObject -> Rep BatchObject x #

to :: Rep BatchObject x -> BatchObject #

Show BatchObject Source # 
Instance details

Defined in Claude.V1.Messages.Batches

Methods

showsPrec :: Int -> BatchObject -> ShowS #

show :: BatchObject -> String #

showList :: [BatchObject] -> ShowS #

type Rep BatchObject Source # 
Instance details

Defined in Claude.V1.Messages.Batches

type Rep BatchObject = D1 ('MetaData "BatchObject" "Claude.V1.Messages.Batches" "claude-1.0.0-1j0Plg9n3EjAvfVKcV8Pl0" 'False) (C1 ('MetaCons "BatchObject" 'PrefixI 'True) (((S1 ('MetaSel ('Just "id") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text) :*: S1 ('MetaSel ('Just "type_") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text)) :*: (S1 ('MetaSel ('Just "processing_status") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 ProcessingStatus) :*: S1 ('MetaSel ('Just "request_counts") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 RequestCounts))) :*: ((S1 ('MetaSel ('Just "ended_at") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe POSIXTime)) :*: S1 ('MetaSel ('Just "created_at") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 POSIXTime)) :*: (S1 ('MetaSel ('Just "expires_at") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 POSIXTime) :*: (S1 ('MetaSel ('Just "cancel_initiated_at") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe POSIXTime)) :*: S1 ('MetaSel ('Just "results_url") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Text)))))))

data ProcessingStatus Source #

Processing status of a batch

Constructors

In_Progress 
Canceling 
Ended 

Instances

Instances details
FromJSON ProcessingStatus Source # 
Instance details

Defined in Claude.V1.Messages.Batches

Methods

parseJSON :: Value -> Parser ProcessingStatus #

parseJSONList :: Value -> Parser [ProcessingStatus] #

omittedField :: Maybe ProcessingStatus #

ToJSON ProcessingStatus Source # 
Instance details

Defined in Claude.V1.Messages.Batches

Methods

toJSON :: ProcessingStatus -> Value #

toEncoding :: ProcessingStatus -> Encoding #

toJSONList :: [ProcessingStatus] -> Value #

toEncodingList :: [ProcessingStatus] -> Encoding #

omitField :: ProcessingStatus -> Bool #

Generic ProcessingStatus Source # 
Instance details

Defined in Claude.V1.Messages.Batches

Associated Types

type Rep ProcessingStatus 
Instance details

Defined in Claude.V1.Messages.Batches

type Rep ProcessingStatus = D1 ('MetaData "ProcessingStatus" "Claude.V1.Messages.Batches" "claude-1.0.0-1j0Plg9n3EjAvfVKcV8Pl0" 'False) (C1 ('MetaCons "In_Progress" 'PrefixI 'False) (U1 :: Type -> Type) :+: (C1 ('MetaCons "Canceling" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "Ended" 'PrefixI 'False) (U1 :: Type -> Type)))

Methods

from :: ProcessingStatus -> Rep ProcessingStatus x #

to :: Rep ProcessingStatus x -> ProcessingStatus #

Show ProcessingStatus Source # 
Instance details

Defined in Claude.V1.Messages.Batches

Methods

showsPrec :: Int -> ProcessingStatus -> ShowS #

show :: ProcessingStatus -> String #

showList :: [ProcessingStatus] -> ShowS #

Eq ProcessingStatus Source # 
Instance details

Defined in Claude.V1.Messages.Batches

Methods

(==) :: ProcessingStatus -> ProcessingStatus -> Bool #

(/=) :: ProcessingStatus -> ProcessingStatus -> Bool #

type Rep ProcessingStatus Source # 
Instance details

Defined in Claude.V1.Messages.Batches

type Rep ProcessingStatus = D1 ('MetaData "ProcessingStatus" "Claude.V1.Messages.Batches" "claude-1.0.0-1j0Plg9n3EjAvfVKcV8Pl0" 'False) (C1 ('MetaCons "In_Progress" 'PrefixI 'False) (U1 :: Type -> Type) :+: (C1 ('MetaCons "Canceling" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "Ended" 'PrefixI 'False) (U1 :: Type -> Type)))

data RequestCounts Source #

Counts of requests in various states

Constructors

RequestCounts 

Fields

Instances

Instances details
FromJSON RequestCounts Source # 
Instance details

Defined in Claude.V1.Messages.Batches

Methods

parseJSON :: Value -> Parser RequestCounts #

parseJSONList :: Value -> Parser [RequestCounts] #

omittedField :: Maybe RequestCounts #

ToJSON RequestCounts Source # 
Instance details

Defined in Claude.V1.Messages.Batches

Methods

toJSON :: RequestCounts -> Value #

toEncoding :: RequestCounts -> Encoding #

toJSONList :: [RequestCounts] -> Value #

toEncodingList :: [RequestCounts] -> Encoding #

omitField :: RequestCounts -> Bool #

Generic RequestCounts Source # 
Instance details

Defined in Claude.V1.Messages.Batches

Associated Types

type Rep RequestCounts 
Instance details

Defined in Claude.V1.Messages.Batches

type Rep RequestCounts = D1 ('MetaData "RequestCounts" "Claude.V1.Messages.Batches" "claude-1.0.0-1j0Plg9n3EjAvfVKcV8Pl0" 'False) (C1 ('MetaCons "RequestCounts" 'PrefixI 'True) ((S1 ('MetaSel ('Just "processing") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Natural) :*: S1 ('MetaSel ('Just "succeeded") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Natural)) :*: (S1 ('MetaSel ('Just "errored") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Natural) :*: (S1 ('MetaSel ('Just "canceled") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Natural) :*: S1 ('MetaSel ('Just "expired") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Natural)))))

Methods

from :: RequestCounts -> Rep RequestCounts x #

to :: Rep RequestCounts x -> RequestCounts #

Show RequestCounts Source # 
Instance details

Defined in Claude.V1.Messages.Batches

Methods

showsPrec :: Int -> RequestCounts -> ShowS #

show :: RequestCounts -> String #

showList :: [RequestCounts] -> ShowS #

type Rep RequestCounts Source # 
Instance details

Defined in Claude.V1.Messages.Batches

type Rep RequestCounts = D1 ('MetaData "RequestCounts" "Claude.V1.Messages.Batches" "claude-1.0.0-1j0Plg9n3EjAvfVKcV8Pl0" 'False) (C1 ('MetaCons "RequestCounts" 'PrefixI 'True) ((S1 ('MetaSel ('Just "processing") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Natural) :*: S1 ('MetaSel ('Just "succeeded") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Natural)) :*: (S1 ('MetaSel ('Just "errored") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Natural) :*: (S1 ('MetaSel ('Just "canceled") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Natural) :*: S1 ('MetaSel ('Just "expired") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Natural)))))

data BatchResult Source #

A single result from a batch

Constructors

BatchResult 

Fields

Instances

Instances details
FromJSON BatchResult Source # 
Instance details

Defined in Claude.V1.Messages.Batches

Methods

parseJSON :: Value -> Parser BatchResult #

parseJSONList :: Value -> Parser [BatchResult] #

omittedField :: Maybe BatchResult #

ToJSON BatchResult Source # 
Instance details

Defined in Claude.V1.Messages.Batches

Methods

toJSON :: BatchResult -> Value #

toEncoding :: BatchResult -> Encoding #

toJSONList :: [BatchResult] -> Value #

toEncodingList :: [BatchResult] -> Encoding #

omitField :: BatchResult -> Bool #

Generic BatchResult Source # 
Instance details

Defined in Claude.V1.Messages.Batches

Associated Types

type Rep BatchResult 
Instance details

Defined in Claude.V1.Messages.Batches

type Rep BatchResult = D1 ('MetaData "BatchResult" "Claude.V1.Messages.Batches" "claude-1.0.0-1j0Plg9n3EjAvfVKcV8Pl0" 'False) (C1 ('MetaCons "BatchResult" 'PrefixI 'True) (S1 ('MetaSel ('Just "custom_id") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text) :*: S1 ('MetaSel ('Just "result") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 BatchResultType)))

Methods

from :: BatchResult -> Rep BatchResult x #

to :: Rep BatchResult x -> BatchResult #

Show BatchResult Source # 
Instance details

Defined in Claude.V1.Messages.Batches

Methods

showsPrec :: Int -> BatchResult -> ShowS #

show :: BatchResult -> String #

showList :: [BatchResult] -> ShowS #

type Rep BatchResult Source # 
Instance details

Defined in Claude.V1.Messages.Batches

type Rep BatchResult = D1 ('MetaData "BatchResult" "Claude.V1.Messages.Batches" "claude-1.0.0-1j0Plg9n3EjAvfVKcV8Pl0" 'False) (C1 ('MetaCons "BatchResult" 'PrefixI 'True) (S1 ('MetaSel ('Just "custom_id") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text) :*: S1 ('MetaSel ('Just "result") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 BatchResultType)))

data BatchResultType Source #

Type of result for a batch request

Constructors

Succeeded 

Fields

Errored 

Fields

Canceled 
Expired 

Instances

Instances details
FromJSON BatchResultType Source # 
Instance details

Defined in Claude.V1.Messages.Batches

Methods

parseJSON :: Value -> Parser BatchResultType #

parseJSONList :: Value -> Parser [BatchResultType] #

omittedField :: Maybe BatchResultType #

ToJSON BatchResultType Source # 
Instance details

Defined in Claude.V1.Messages.Batches

Methods

toJSON :: BatchResultType -> Value #

toEncoding :: BatchResultType -> Encoding #

toJSONList :: [BatchResultType] -> Value #

toEncodingList :: [BatchResultType] -> Encoding #

omitField :: BatchResultType -> Bool #

Generic BatchResultType Source # 
Instance details

Defined in Claude.V1.Messages.Batches

Associated Types

type Rep BatchResultType 
Instance details

Defined in Claude.V1.Messages.Batches

type Rep BatchResultType = D1 ('MetaData "BatchResultType" "Claude.V1.Messages.Batches" "claude-1.0.0-1j0Plg9n3EjAvfVKcV8Pl0" 'False) ((C1 ('MetaCons "Succeeded" 'PrefixI 'True) (S1 ('MetaSel ('Just "message") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 MessageResponse)) :+: C1 ('MetaCons "Errored" 'PrefixI 'True) (S1 ('MetaSel ('Just "error") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Error))) :+: (C1 ('MetaCons "Canceled" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "Expired" 'PrefixI 'False) (U1 :: Type -> Type)))

Methods

from :: BatchResultType -> Rep BatchResultType x #

to :: Rep BatchResultType x -> BatchResultType #

Show BatchResultType Source # 
Instance details

Defined in Claude.V1.Messages.Batches

Methods

showsPrec :: Int -> BatchResultType -> ShowS #

show :: BatchResultType -> String #

showList :: [BatchResultType] -> ShowS #

type Rep BatchResultType Source # 
Instance details

Defined in Claude.V1.Messages.Batches

type Rep BatchResultType = D1 ('MetaData "BatchResultType" "Claude.V1.Messages.Batches" "claude-1.0.0-1j0Plg9n3EjAvfVKcV8Pl0" 'False) ((C1 ('MetaCons "Succeeded" 'PrefixI 'True) (S1 ('MetaSel ('Just "message") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 MessageResponse)) :+: C1 ('MetaCons "Errored" 'PrefixI 'True) (S1 ('MetaSel ('Just "error") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Error))) :+: (C1 ('MetaCons "Canceled" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "Expired" 'PrefixI 'False) (U1 :: Type -> Type)))

data ListBatchesResponse Source #

Pagination response for listing batches

Constructors

ListBatchesResponse 

Fields

Instances

Instances details
FromJSON ListBatchesResponse Source # 
Instance details

Defined in Claude.V1.Messages.Batches

Methods

parseJSON :: Value -> Parser ListBatchesResponse #

parseJSONList :: Value -> Parser [ListBatchesResponse] #

omittedField :: Maybe ListBatchesResponse #

ToJSON ListBatchesResponse Source # 
Instance details

Defined in Claude.V1.Messages.Batches

Methods

toJSON :: ListBatchesResponse -> Value #

toEncoding :: ListBatchesResponse -> Encoding #

toJSONList :: [ListBatchesResponse] -> Value #

toEncodingList :: [ListBatchesResponse] -> Encoding #

omitField :: ListBatchesResponse -> Bool #

Generic ListBatchesResponse Source # 
Instance details

Defined in Claude.V1.Messages.Batches

Associated Types

type Rep ListBatchesResponse 
Instance details

Defined in Claude.V1.Messages.Batches

type Rep ListBatchesResponse = D1 ('MetaData "ListBatchesResponse" "Claude.V1.Messages.Batches" "claude-1.0.0-1j0Plg9n3EjAvfVKcV8Pl0" 'False) (C1 ('MetaCons "ListBatchesResponse" 'PrefixI 'True) ((S1 ('MetaSel ('Just "data_") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Vector BatchObject)) :*: S1 ('MetaSel ('Just "has_more") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Bool)) :*: (S1 ('MetaSel ('Just "first_id") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Text)) :*: S1 ('MetaSel ('Just "last_id") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Text)))))

Methods

from :: ListBatchesResponse -> Rep ListBatchesResponse x #

to :: Rep ListBatchesResponse x -> ListBatchesResponse #

Show ListBatchesResponse Source # 
Instance details

Defined in Claude.V1.Messages.Batches

Methods

showsPrec :: Int -> ListBatchesResponse -> ShowS #

show :: ListBatchesResponse -> String #

showList :: [ListBatchesResponse] -> ShowS #

type Rep ListBatchesResponse Source # 
Instance details

Defined in Claude.V1.Messages.Batches

type Rep ListBatchesResponse = D1 ('MetaData "ListBatchesResponse" "Claude.V1.Messages.Batches" "claude-1.0.0-1j0Plg9n3EjAvfVKcV8Pl0" 'False) (C1 ('MetaCons "ListBatchesResponse" 'PrefixI 'True) ((S1 ('MetaSel ('Just "data_") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Vector BatchObject)) :*: S1 ('MetaSel ('Just "has_more") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Bool)) :*: (S1 ('MetaSel ('Just "first_id") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Text)) :*: S1 ('MetaSel ('Just "last_id") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Text)))))

Servant

type API = "messages" :> ("batches" :> ((ReqBody '[JSON] CreateBatch :> Post '[JSON] BatchObject) :<|> ((Capture "batch_id" Text :> Get '[JSON] BatchObject) :<|> ((QueryParam "limit" Natural :> (QueryParam "before_id" Text :> (QueryParam "after_id" Text :> Get '[JSON] ListBatchesResponse))) :<|> (Capture "batch_id" Text :> ("cancel" :> Post '[JSON] BatchObject)))))) Source #

Servant API for /v1/messages/batches