{-# LANGUAGE DuplicateRecordFields #-}
{-# LANGUAGE NoFieldSelectors #-}

module Okapi.Record.Data where

data Request method path query headers body = Request
  { forall method path query headers body.
Request method path query headers body -> method
method :: method
  , forall method path query headers body.
Request method path query headers body -> path
path :: path
  , forall method path query headers body.
Request method path query headers body -> query
query :: query
  , forall method path query headers body.
Request method path query headers body -> headers
headers :: headers
  , forall method path query headers body.
Request method path query headers body -> body
body :: body
  }

data Response status headers body = Response
  { forall status headers body. Response status headers body -> status
status :: status
  , forall status headers body. Response status headers body -> headers
headers :: headers
  , forall status headers body. Response status headers body -> body
body :: body
  }