<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"><html xmlns="http://www.w3.org/1999/xhtml"><head><link rel="stylesheet" type="text/css" href="style.css" /><script type="text/javascript" src="highlight.js"></script></head><body><pre><span id="local-6989586621679155641"><span id="local-6989586621679155642"><span id="local-6989586621679155643"><span id="local-6989586621679155644"><span id="local-6989586621679155645"><span id="local-6989586621679155646"><span id="local-6989586621679155647"><span id="local-6989586621679155648"></span></span></span></span></span></span></span></span><span class="hs-comment">{-
   OpenAPI Petstore

   This spec is mainly for testing Petstore server and contains fake endpoints, models. Please do not use this for any other purpose. Special characters: \&quot; \\

   OpenAPI Version: 3.0.1
   OpenAPI Petstore API version: 1.0.0
   Generated by OpenAPI Generator (https://openapi-generator.tech)
-}</span><span>
</span><span id="line-10"></span><span>
</span><span id="line-11"></span><span class="annot"><span class="hs-comment">{-|
Module : OpenAPIPetstore.Core
-}</span></span><span>
</span><span id="line-14"></span><span>
</span><span id="line-15"></span><span class="hs-pragma">{-# LANGUAGE DeriveDataTypeable #-}</span><span>
</span><span id="line-16"></span><span class="hs-pragma">{-# LANGUAGE ExistentialQuantification #-}</span><span>
</span><span id="line-17"></span><span class="hs-pragma">{-# LANGUAGE GeneralizedNewtypeDeriving #-}</span><span>
</span><span id="line-18"></span><span class="hs-pragma">{-# LANGUAGE MultiParamTypeClasses #-}</span><span>
</span><span id="line-19"></span><span class="hs-pragma">{-# LANGUAGE NamedFieldPuns #-}</span><span>
</span><span id="line-20"></span><span class="hs-pragma">{-# LANGUAGE OverloadedStrings #-}</span><span>
</span><span id="line-21"></span><span class="hs-pragma">{-# LANGUAGE RankNTypes #-}</span><span>
</span><span id="line-22"></span><span class="hs-pragma">{-# LANGUAGE RecordWildCards #-}</span><span>
</span><span id="line-23"></span><span class="hs-pragma">{-# LANGUAGE ScopedTypeVariables #-}</span><span>
</span><span id="line-24"></span><span class="hs-pragma">{-# LANGUAGE TupleSections #-}</span><span>
</span><span id="line-25"></span><span class="hs-pragma">{-# LANGUAGE TypeFamilies #-}</span><span>
</span><span id="line-26"></span><span class="hs-pragma">{-# LANGUAGE CPP #-}</span><span>
</span><span id="line-27"></span><span class="hs-pragma">{-# OPTIONS_GHC -fno-warn-name-shadowing -fno-warn-unused-binds -fno-warn-unused-imports #-}</span><span>
</span><span id="line-28"></span><span>
</span><span id="line-29"></span><span class="hs-keyword">module</span><span> </span><span class="hs-identifier">OpenAPIPetstore.Core</span><span> </span><span class="hs-keyword">where</span><span>
</span><span id="line-30"></span><span>
</span><span id="line-31"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html"><span class="hs-identifier">OpenAPIPetstore.MimeTypes</span></a></span><span>
</span><span id="line-32"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Logging.html"><span class="hs-identifier">OpenAPIPetstore.Logging</span></a></span><span>
</span><span id="line-33"></span><span>
</span><span id="line-34"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Control.Arrow</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">P</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier">left</span></span><span class="hs-special">)</span><span>
</span><span id="line-35"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Control.DeepSeq</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">NF</span></span><span>
</span><span id="line-36"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Control.Exception.Safe</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">E</span></span><span>
</span><span id="line-37"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Aeson</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">A</span></span><span>
</span><span id="line-38"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.ByteString</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">B</span></span><span>
</span><span id="line-39"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.ByteString.Base64.Lazy</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">BL64</span></span><span>
</span><span id="line-40"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.ByteString.Builder</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">BB</span></span><span>
</span><span id="line-41"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.ByteString.Char8</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">BC</span></span><span>
</span><span id="line-42"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.ByteString.Lazy</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">BL</span></span><span>
</span><span id="line-43"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.ByteString.Lazy.Char8</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">BCL</span></span><span>
</span><span id="line-44"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.CaseInsensitive</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">CI</span></span><span>
</span><span id="line-45"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Data</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">P</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier">Data</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-identifier">Typeable</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-identifier">TypeRep</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-identifier">typeRep</span></span><span class="hs-special">)</span><span>
</span><span id="line-46"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Foldable</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">P</span></span><span>
</span><span id="line-47"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Ix</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">P</span></span><span>
</span><span id="line-48"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Kind</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">K</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier">Type</span></span><span class="hs-special">)</span><span>
</span><span id="line-49"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Maybe</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">P</span></span><span>
</span><span id="line-50"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Proxy</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">P</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier">Proxy</span></span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span class="hs-special">)</span><span>
</span><span id="line-51"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Text</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">T</span></span><span>
</span><span id="line-52"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Text.Encoding</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">T</span></span><span>
</span><span id="line-53"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Time</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">TI</span></span><span>
</span><span id="line-54"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Time.ISO8601</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">TI</span></span><span>
</span><span id="line-55"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">GHC.Base</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">P</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier">Alternative</span></span><span class="hs-special">)</span><span>
</span><span id="line-56"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Lens.Micro</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">L</span></span><span>
</span><span id="line-57"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Network.HTTP.Client.MultipartFormData</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">NH</span></span><span>
</span><span id="line-58"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Network.HTTP.Types</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">NH</span></span><span>
</span><span id="line-59"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Prelude</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">P</span></span><span>
</span><span id="line-60"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Text.Printf</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">T</span></span><span>
</span><span id="line-61"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Web.FormUrlEncoded</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">WH</span></span><span>
</span><span id="line-62"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Web.HttpApiData</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">WH</span></span><span>
</span><span id="line-63"></span><span>
</span><span id="line-64"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><span class="hs-identifier">Control.Applicative</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-operator">(&lt;|&gt;)</span></span><span class="hs-special">)</span><span>
</span><span id="line-65"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><span class="hs-identifier">Control.Applicative</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier">Alternative</span></span><span class="hs-special">)</span><span>
</span><span id="line-66"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><span class="hs-identifier">Control.Monad.Fail</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier">MonadFail</span></span><span class="hs-special">)</span><span>
</span><span id="line-67"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><span class="hs-identifier">Data.Function</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-operator">(&amp;)</span></span><span class="hs-special">)</span><span>
</span><span id="line-68"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><span class="hs-identifier">Data.Foldable</span></span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier">foldlM</span></span><span class="hs-special">)</span><span>
</span><span id="line-69"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><span class="hs-identifier">Data.Monoid</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-operator">(&lt;&gt;)</span></span><span class="hs-special">)</span><span>
</span><span id="line-70"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><span class="hs-identifier">Data.Text</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier">Text</span></span><span class="hs-special">)</span><span>
</span><span id="line-71"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><span class="hs-identifier">Prelude</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-operator">($)</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-operator">(.)</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-operator">(&amp;&amp;)</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-operator">(&lt;$&gt;)</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-operator">(&lt;*&gt;)</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-identifier">Maybe</span></span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-identifier">Bool</span></span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-identifier">Char</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-identifier">String</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-identifier">fmap</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-identifier">mempty</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-identifier">pure</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-identifier">return</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-identifier">show</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-identifier">IO</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-identifier">Monad</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-identifier">Functor</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-identifier">maybe</span></span><span class="hs-special">)</span><span>
</span><span id="line-72"></span><span>
</span><span id="line-73"></span><span class="annot"><span class="hs-comment">-- * OpenAPIPetstoreConfig</span></span><span>
</span><span id="line-74"></span><span>
</span><span id="line-75"></span><span class="annot"><span class="hs-comment">-- |</span></span><span>
</span><span id="line-76"></span><span class="hs-keyword">data</span><span> </span><span id="OpenAPIPetstoreConfig"><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreConfig"><span class="hs-identifier hs-var">OpenAPIPetstoreConfig</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span id="OpenAPIPetstoreConfig"><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreConfig"><span class="hs-identifier hs-var">OpenAPIPetstoreConfig</span></a></span></span><span>
</span><span id="line-77"></span><span>  </span><span class="hs-special">{</span><span> </span><span id="configHost"><span class="annot"><span class="annottext">OpenAPIPetstoreConfig -&gt; ByteString
</span><a href="OpenAPIPetstore.Core.html#configHost"><span class="hs-identifier hs-var hs-var">configHost</span></a></span></span><span>  </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">BCL.ByteString</span></span><span> </span><span class="annot"><span class="hs-comment">-- ^ host supplied in the Request</span></span><span>
</span><span id="line-78"></span><span>  </span><span class="hs-special">,</span><span> </span><span id="configUserAgent"><span class="annot"><span class="annottext">OpenAPIPetstoreConfig -&gt; Text
</span><a href="OpenAPIPetstore.Core.html#configUserAgent"><span class="hs-identifier hs-var hs-var">configUserAgent</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">Text</span></span><span> </span><span class="annot"><span class="hs-comment">-- ^ user-agent supplied in the Request</span></span><span>
</span><span id="line-79"></span><span>  </span><span class="hs-special">,</span><span> </span><span id="configLogExecWithContext"><span class="annot"><span class="annottext">OpenAPIPetstoreConfig -&gt; LogExecWithContext
</span><a href="OpenAPIPetstore.Core.html#configLogExecWithContext"><span class="hs-identifier hs-var hs-var">configLogExecWithContext</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#LogExecWithContext"><span class="hs-identifier hs-type">LogExecWithContext</span></a></span><span> </span><span class="annot"><span class="hs-comment">-- ^ Run a block using a Logger instance</span></span><span>
</span><span id="line-80"></span><span>  </span><span class="hs-special">,</span><span> </span><span id="configLogContext"><span class="annot"><span class="annottext">OpenAPIPetstoreConfig -&gt; LogContext
</span><a href="OpenAPIPetstore.Core.html#configLogContext"><span class="hs-identifier hs-var hs-var">configLogContext</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#LogContext"><span class="hs-identifier hs-type">LogContext</span></a></span><span> </span><span class="annot"><span class="hs-comment">-- ^ Configures the logger</span></span><span>
</span><span id="line-81"></span><span>  </span><span class="hs-special">,</span><span> </span><span id="configAuthMethods"><span class="annot"><span class="annottext">OpenAPIPetstoreConfig -&gt; [AnyAuthMethod]
</span><a href="OpenAPIPetstore.Core.html#configAuthMethods"><span class="hs-identifier hs-var hs-var">configAuthMethods</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">[</span><span class="annot"><a href="OpenAPIPetstore.Core.html#AnyAuthMethod"><span class="hs-identifier hs-type">AnyAuthMethod</span></a></span><span class="hs-special">]</span><span> </span><span class="annot"><span class="hs-comment">-- ^ List of configured auth methods</span></span><span>
</span><span id="line-82"></span><span>  </span><span class="hs-special">,</span><span> </span><span id="configValidateAuthMethods"><span class="annot"><span class="annottext">OpenAPIPetstoreConfig -&gt; Bool
</span><a href="OpenAPIPetstore.Core.html#configValidateAuthMethods"><span class="hs-identifier hs-var hs-var">configValidateAuthMethods</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">Bool</span></span><span> </span><span class="annot"><span class="hs-comment">-- ^ throw exceptions if auth methods are not configured</span></span><span>
</span><span id="line-83"></span><span>  </span><span class="hs-special">,</span><span> </span><span id="configQueryExtraUnreserved"><span class="annot"><span class="annottext">OpenAPIPetstoreConfig -&gt; ByteString
</span><a href="OpenAPIPetstore.Core.html#configQueryExtraUnreserved"><span class="hs-identifier hs-var hs-var">configQueryExtraUnreserved</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">B.ByteString</span></span><span> </span><span class="annot"><span class="hs-comment">-- ^ Configures additional querystring characters which must not be URI encoded, e.g. '+' or ':'</span></span><span>
</span><span id="line-84"></span><span>  </span><span class="hs-special">}</span><span>
</span><span id="line-85"></span><span>
</span><span id="line-86"></span><span class="annot"><span class="hs-comment">-- | display the config</span></span><span>
</span><span id="line-87"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679155696"><span id="local-6989586621679155701"><span class="annot"><span class="hs-identifier hs-type">P.Show</span></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreConfig"><span class="hs-identifier hs-type">OpenAPIPetstoreConfig</span></a></span></span></span><span> </span><span class="hs-keyword">where</span><span>
</span><span id="line-88"></span><span>  </span><span id="local-6989586621679155717"><span class="annot"><span class="annottext">show :: OpenAPIPetstoreConfig -&gt; String
</span><span class="hs-identifier hs-var hs-var hs-var hs-var">show</span></span></span><span> </span><span id="local-6989586621679155718"><span class="annot"><span class="annottext">OpenAPIPetstoreConfig
</span><a href="#local-6989586621679155718"><span class="hs-identifier hs-var">c</span></a></span></span><span> </span><span class="hs-glyph">=</span><span>
</span><span id="line-89"></span><span>    </span><span class="annot"><span class="annottext">String -&gt; String -&gt; ShowS
forall r. PrintfType r =&gt; String -&gt; r
</span><span class="hs-identifier hs-var">T.printf</span></span><span>
</span><span id="line-90"></span><span>      </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;{ configHost = %v, configUserAgent = %v, ..}&quot;</span></span><span>
</span><span id="line-91"></span><span>      </span><span class="hs-special">(</span><span class="annot"><span class="annottext">ByteString -&gt; String
forall a. Show a =&gt; a -&gt; String
</span><span class="hs-identifier hs-var">show</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">OpenAPIPetstoreConfig -&gt; ByteString
</span><a href="OpenAPIPetstore.Core.html#configHost"><span class="hs-identifier hs-var">configHost</span></a></span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreConfig
</span><a href="#local-6989586621679155718"><span class="hs-identifier hs-var">c</span></a></span><span class="hs-special">)</span><span class="hs-special">)</span><span>
</span><span id="line-92"></span><span>      </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Text -&gt; String
forall a. Show a =&gt; a -&gt; String
</span><span class="hs-identifier hs-var">show</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">OpenAPIPetstoreConfig -&gt; Text
</span><a href="OpenAPIPetstore.Core.html#configUserAgent"><span class="hs-identifier hs-var">configUserAgent</span></a></span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreConfig
</span><a href="#local-6989586621679155718"><span class="hs-identifier hs-var">c</span></a></span><span class="hs-special">)</span><span class="hs-special">)</span><span>
</span><span id="line-93"></span><span>
</span><span id="line-94"></span><span class="hs-comment">-- | constructs a default OpenAPIPetstoreConfig</span><span>
</span><span id="line-95"></span><span class="hs-comment">--</span><span>
</span><span id="line-96"></span><span class="hs-comment">-- configHost:</span><span>
</span><span id="line-97"></span><span class="hs-comment">--</span><span>
</span><span id="line-98"></span><span class="hs-comment">-- @http://petstore.swagger.io:80/v2@</span><span>
</span><span id="line-99"></span><span class="hs-comment">--</span><span>
</span><span id="line-100"></span><span class="hs-comment">-- configUserAgent:</span><span>
</span><span id="line-101"></span><span class="hs-comment">--</span><span>
</span><span id="line-102"></span><span class="hs-comment">-- @&quot;openapi-petstore/0.1.0.0&quot;@</span><span>
</span><span id="line-103"></span><span class="hs-comment">--</span><span>
</span><span id="line-104"></span><span class="annot"><a href="OpenAPIPetstore.Core.html#newConfig"><span class="hs-identifier hs-type">newConfig</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">IO</span></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreConfig"><span class="hs-identifier hs-type">OpenAPIPetstoreConfig</span></a></span><span>
</span><span id="line-105"></span><span id="newConfig"><span class="annot"><span class="annottext">newConfig :: IO OpenAPIPetstoreConfig
</span><a href="OpenAPIPetstore.Core.html#newConfig"><span class="hs-identifier hs-var hs-var">newConfig</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
</span><span id="line-106"></span><span>    </span><span id="local-6989586621679155721"><span class="annot"><span class="annottext">LogContext
</span><a href="#local-6989586621679155721"><span class="hs-identifier hs-var">logCxt</span></a></span></span><span> </span><span class="hs-glyph">&lt;-</span><span> </span><span class="annot"><span class="annottext">IO LogContext
</span><a href="OpenAPIPetstore.LoggingKatip.html#initLogContext"><span class="hs-identifier hs-var">initLogContext</span></a></span><span>
</span><span id="line-107"></span><span>    </span><span class="annot"><span class="annottext">OpenAPIPetstoreConfig -&gt; IO OpenAPIPetstoreConfig
forall a. a -&gt; IO a
forall (m :: * -&gt; *) a. Monad m =&gt; a -&gt; m a
</span><span class="hs-identifier hs-var">return</span></span><span> </span><span class="annot"><span class="annottext">(OpenAPIPetstoreConfig -&gt; IO OpenAPIPetstoreConfig)
-&gt; OpenAPIPetstoreConfig -&gt; IO OpenAPIPetstoreConfig
forall a b. (a -&gt; b) -&gt; a -&gt; b
</span><span class="hs-operator hs-var">$</span></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreConfig"><span class="hs-identifier hs-type">OpenAPIPetstoreConfig</span></a></span><span>
</span><span id="line-108"></span><span>        </span><span class="hs-special">{</span><span> </span><span class="annot"><span class="annottext">configHost :: ByteString
</span><a href="OpenAPIPetstore.Core.html#configHost"><span class="hs-identifier hs-var">configHost</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">ByteString
</span><span class="hs-string">&quot;http://petstore.swagger.io:80/v2&quot;</span></span><span>
</span><span id="line-109"></span><span>        </span><span class="hs-special">,</span><span> </span><span class="annot"><span class="annottext">configUserAgent :: Text
</span><a href="OpenAPIPetstore.Core.html#configUserAgent"><span class="hs-identifier hs-var">configUserAgent</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Text
</span><span class="hs-string">&quot;openapi-petstore/0.1.0.0&quot;</span></span><span>
</span><span id="line-110"></span><span>        </span><span class="hs-special">,</span><span> </span><span class="annot"><span class="annottext">configLogExecWithContext :: LogExecWithContext
</span><a href="OpenAPIPetstore.Core.html#configLogExecWithContext"><span class="hs-identifier hs-var">configLogExecWithContext</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">LogContext -&gt; LogExec m a
LogExecWithContext
</span><a href="OpenAPIPetstore.LoggingKatip.html#runDefaultLogExecWithContext"><span class="hs-identifier hs-var">runDefaultLogExecWithContext</span></a></span><span>
</span><span id="line-111"></span><span>        </span><span class="hs-special">,</span><span> </span><span class="annot"><span class="annottext">configLogContext :: LogContext
</span><a href="OpenAPIPetstore.Core.html#configLogContext"><span class="hs-identifier hs-var">configLogContext</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">LogContext
</span><a href="#local-6989586621679155721"><span class="hs-identifier hs-var">logCxt</span></a></span><span>
</span><span id="line-112"></span><span>        </span><span class="hs-special">,</span><span> </span><span class="annot"><span class="annottext">configAuthMethods :: [AnyAuthMethod]
</span><a href="OpenAPIPetstore.Core.html#configAuthMethods"><span class="hs-identifier hs-var">configAuthMethods</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">[</span><span class="hs-special">]</span><span>
</span><span id="line-113"></span><span>        </span><span class="hs-special">,</span><span> </span><span class="annot"><span class="annottext">configValidateAuthMethods :: Bool
</span><a href="OpenAPIPetstore.Core.html#configValidateAuthMethods"><span class="hs-identifier hs-var">configValidateAuthMethods</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Bool
</span><span class="hs-identifier hs-var">True</span></span><span>
</span><span id="line-114"></span><span>        </span><span class="hs-special">,</span><span> </span><span class="annot"><span class="annottext">configQueryExtraUnreserved :: ByteString
</span><a href="OpenAPIPetstore.Core.html#configQueryExtraUnreserved"><span class="hs-identifier hs-var">configQueryExtraUnreserved</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">ByteString
</span><span class="hs-string">&quot;&quot;</span></span><span>
</span><span id="line-115"></span><span>        </span><span class="hs-special">}</span><span>
</span><span id="line-116"></span><span>
</span><span id="line-117"></span><span class="annot"><span class="hs-comment">-- | updates config use AuthMethod on matching requests</span></span><span>
</span><span id="line-118"></span><span id="local-6989586621679155063"><span class="annot"><a href="OpenAPIPetstore.Core.html#addAuthMethod"><span class="hs-identifier hs-type">addAuthMethod</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#AuthMethod"><span class="hs-identifier hs-type">AuthMethod</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155063"><span class="hs-identifier hs-type">auth</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreConfig"><span class="hs-identifier hs-type">OpenAPIPetstoreConfig</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="#local-6989586621679155063"><span class="hs-identifier hs-type">auth</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreConfig"><span class="hs-identifier hs-type">OpenAPIPetstoreConfig</span></a></span></span><span>
</span><span id="line-119"></span><span id="addAuthMethod"><span class="annot"><span class="annottext">addAuthMethod :: forall auth.
AuthMethod auth =&gt;
OpenAPIPetstoreConfig -&gt; auth -&gt; OpenAPIPetstoreConfig
</span><a href="OpenAPIPetstore.Core.html#addAuthMethod"><span class="hs-identifier hs-var hs-var">addAuthMethod</span></a></span></span><span> </span><span id="local-6989586621679155729"><span class="annot"><span class="annottext">config :: OpenAPIPetstoreConfig
</span><a href="#local-6989586621679155729"><span class="hs-identifier hs-var">config</span></a></span></span><span class="hs-glyph">@</span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreConfig"><span class="hs-identifier hs-type">OpenAPIPetstoreConfig</span></a></span><span> </span><span class="hs-special">{</span><span class="annot"><span class="annottext">configAuthMethods :: OpenAPIPetstoreConfig -&gt; [AnyAuthMethod]
</span><a href="OpenAPIPetstore.Core.html#configAuthMethods"><span class="hs-identifier hs-var">configAuthMethods</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span id="local-6989586621679155730"><span class="annot"><span class="annottext">[AnyAuthMethod]
</span><a href="#local-6989586621679155730"><span class="hs-keyword hs-var">as</span></a></span></span><span class="hs-special">}</span><span> </span><span id="local-6989586621679155731"><span class="annot"><span class="annottext">auth
</span><a href="#local-6989586621679155731"><span class="hs-identifier hs-var">a</span></a></span></span><span> </span><span class="hs-glyph">=</span><span>
</span><span id="line-120"></span><span>  </span><span class="annot"><span class="annottext">OpenAPIPetstoreConfig
</span><a href="#local-6989586621679155729"><span class="hs-identifier hs-var">config</span></a></span><span> </span><span class="hs-special">{</span><span> </span><span class="annot"><span class="annottext">configAuthMethods :: [AnyAuthMethod]
</span><a href="OpenAPIPetstore.Core.html#configAuthMethods"><span class="hs-identifier hs-var">configAuthMethods</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">auth -&gt; AnyAuthMethod
forall a. AuthMethod a =&gt; a -&gt; AnyAuthMethod
</span><a href="OpenAPIPetstore.Core.html#AnyAuthMethod"><span class="hs-identifier hs-var">AnyAuthMethod</span></a></span><span> </span><span class="annot"><span class="annottext">auth
</span><a href="#local-6989586621679155731"><span class="hs-identifier hs-var">a</span></a></span><span> </span><span class="annot"><span class="annottext">AnyAuthMethod -&gt; [AnyAuthMethod] -&gt; [AnyAuthMethod]
forall a. a -&gt; [a] -&gt; [a]
</span><span class="hs-glyph hs-var">:</span></span><span> </span><span class="annot"><span class="annottext">[AnyAuthMethod]
</span><a href="#local-6989586621679155730"><span class="hs-keyword hs-var">as</span></a></span><span class="hs-special">}</span><span>
</span><span id="line-121"></span><span>
</span><span id="line-122"></span><span class="annot"><span class="hs-comment">-- | updates the config to use stdout logging</span></span><span>
</span><span id="line-123"></span><span class="annot"><a href="OpenAPIPetstore.Core.html#withStdoutLogging"><span class="hs-identifier hs-type">withStdoutLogging</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreConfig"><span class="hs-identifier hs-type">OpenAPIPetstoreConfig</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="hs-identifier hs-type">IO</span></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreConfig"><span class="hs-identifier hs-type">OpenAPIPetstoreConfig</span></a></span><span>
</span><span id="line-124"></span><span id="withStdoutLogging"><span class="annot"><span class="annottext">withStdoutLogging :: OpenAPIPetstoreConfig -&gt; IO OpenAPIPetstoreConfig
</span><a href="OpenAPIPetstore.Core.html#withStdoutLogging"><span class="hs-identifier hs-var hs-var">withStdoutLogging</span></a></span></span><span> </span><span id="local-6989586621679155734"><span class="annot"><span class="annottext">OpenAPIPetstoreConfig
</span><a href="#local-6989586621679155734"><span class="hs-identifier hs-var">p</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
</span><span id="line-125"></span><span>    </span><span id="local-6989586621679155735"><span class="annot"><span class="annottext">LogContext
</span><a href="#local-6989586621679155735"><span class="hs-identifier hs-var">logCxt</span></a></span></span><span> </span><span class="hs-glyph">&lt;-</span><span> </span><span class="annot"><span class="annottext">LogContext -&gt; IO LogContext
</span><a href="OpenAPIPetstore.LoggingKatip.html#stdoutLoggingContext"><span class="hs-identifier hs-var">stdoutLoggingContext</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">OpenAPIPetstoreConfig -&gt; LogContext
</span><a href="OpenAPIPetstore.Core.html#configLogContext"><span class="hs-identifier hs-var">configLogContext</span></a></span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreConfig
</span><a href="#local-6989586621679155734"><span class="hs-identifier hs-var">p</span></a></span><span class="hs-special">)</span><span>
</span><span id="line-126"></span><span>    </span><span class="annot"><span class="annottext">OpenAPIPetstoreConfig -&gt; IO OpenAPIPetstoreConfig
forall a. a -&gt; IO a
forall (m :: * -&gt; *) a. Monad m =&gt; a -&gt; m a
</span><span class="hs-identifier hs-var">return</span></span><span> </span><span class="annot"><span class="annottext">(OpenAPIPetstoreConfig -&gt; IO OpenAPIPetstoreConfig)
-&gt; OpenAPIPetstoreConfig -&gt; IO OpenAPIPetstoreConfig
forall a b. (a -&gt; b) -&gt; a -&gt; b
</span><span class="hs-operator hs-var">$</span></span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreConfig
</span><a href="#local-6989586621679155734"><span class="hs-identifier hs-var">p</span></a></span><span> </span><span class="hs-special">{</span><span> </span><span class="annot"><span class="annottext">configLogExecWithContext :: LogExecWithContext
</span><a href="OpenAPIPetstore.Core.html#configLogExecWithContext"><span class="hs-identifier hs-var">configLogExecWithContext</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">LogContext -&gt; LogExec m a
LogExecWithContext
</span><a href="OpenAPIPetstore.LoggingKatip.html#stdoutLoggingExec"><span class="hs-identifier hs-var">stdoutLoggingExec</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="annottext">configLogContext :: LogContext
</span><a href="OpenAPIPetstore.Core.html#configLogContext"><span class="hs-identifier hs-var">configLogContext</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">LogContext
</span><a href="#local-6989586621679155735"><span class="hs-identifier hs-var">logCxt</span></a></span><span> </span><span class="hs-special">}</span><span>
</span><span id="line-127"></span><span>
</span><span id="line-128"></span><span class="annot"><span class="hs-comment">-- | updates the config to use stderr logging</span></span><span>
</span><span id="line-129"></span><span class="annot"><a href="OpenAPIPetstore.Core.html#withStderrLogging"><span class="hs-identifier hs-type">withStderrLogging</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreConfig"><span class="hs-identifier hs-type">OpenAPIPetstoreConfig</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="hs-identifier hs-type">IO</span></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreConfig"><span class="hs-identifier hs-type">OpenAPIPetstoreConfig</span></a></span><span>
</span><span id="line-130"></span><span id="withStderrLogging"><span class="annot"><span class="annottext">withStderrLogging :: OpenAPIPetstoreConfig -&gt; IO OpenAPIPetstoreConfig
</span><a href="OpenAPIPetstore.Core.html#withStderrLogging"><span class="hs-identifier hs-var hs-var">withStderrLogging</span></a></span></span><span> </span><span id="local-6989586621679155741"><span class="annot"><span class="annottext">OpenAPIPetstoreConfig
</span><a href="#local-6989586621679155741"><span class="hs-identifier hs-var">p</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
</span><span id="line-131"></span><span>    </span><span id="local-6989586621679155742"><span class="annot"><span class="annottext">LogContext
</span><a href="#local-6989586621679155742"><span class="hs-identifier hs-var">logCxt</span></a></span></span><span> </span><span class="hs-glyph">&lt;-</span><span> </span><span class="annot"><span class="annottext">LogContext -&gt; IO LogContext
</span><a href="OpenAPIPetstore.LoggingKatip.html#stderrLoggingContext"><span class="hs-identifier hs-var">stderrLoggingContext</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">OpenAPIPetstoreConfig -&gt; LogContext
</span><a href="OpenAPIPetstore.Core.html#configLogContext"><span class="hs-identifier hs-var">configLogContext</span></a></span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreConfig
</span><a href="#local-6989586621679155741"><span class="hs-identifier hs-var">p</span></a></span><span class="hs-special">)</span><span>
</span><span id="line-132"></span><span>    </span><span class="annot"><span class="annottext">OpenAPIPetstoreConfig -&gt; IO OpenAPIPetstoreConfig
forall a. a -&gt; IO a
forall (m :: * -&gt; *) a. Monad m =&gt; a -&gt; m a
</span><span class="hs-identifier hs-var">return</span></span><span> </span><span class="annot"><span class="annottext">(OpenAPIPetstoreConfig -&gt; IO OpenAPIPetstoreConfig)
-&gt; OpenAPIPetstoreConfig -&gt; IO OpenAPIPetstoreConfig
forall a b. (a -&gt; b) -&gt; a -&gt; b
</span><span class="hs-operator hs-var">$</span></span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreConfig
</span><a href="#local-6989586621679155741"><span class="hs-identifier hs-var">p</span></a></span><span> </span><span class="hs-special">{</span><span> </span><span class="annot"><span class="annottext">configLogExecWithContext :: LogExecWithContext
</span><a href="OpenAPIPetstore.Core.html#configLogExecWithContext"><span class="hs-identifier hs-var">configLogExecWithContext</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">LogContext -&gt; LogExec m a
LogExecWithContext
</span><a href="OpenAPIPetstore.LoggingKatip.html#stderrLoggingExec"><span class="hs-identifier hs-var">stderrLoggingExec</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="annottext">configLogContext :: LogContext
</span><a href="OpenAPIPetstore.Core.html#configLogContext"><span class="hs-identifier hs-var">configLogContext</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">LogContext
</span><a href="#local-6989586621679155742"><span class="hs-identifier hs-var">logCxt</span></a></span><span> </span><span class="hs-special">}</span><span>
</span><span id="line-133"></span><span>
</span><span id="line-134"></span><span class="annot"><span class="hs-comment">-- | updates the config to disable logging</span></span><span>
</span><span id="line-135"></span><span class="annot"><a href="OpenAPIPetstore.Core.html#withNoLogging"><span class="hs-identifier hs-type">withNoLogging</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreConfig"><span class="hs-identifier hs-type">OpenAPIPetstoreConfig</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreConfig"><span class="hs-identifier hs-type">OpenAPIPetstoreConfig</span></a></span><span>
</span><span id="line-136"></span><span id="withNoLogging"><span class="annot"><span class="annottext">withNoLogging :: OpenAPIPetstoreConfig -&gt; OpenAPIPetstoreConfig
</span><a href="OpenAPIPetstore.Core.html#withNoLogging"><span class="hs-identifier hs-var hs-var">withNoLogging</span></a></span></span><span> </span><span id="local-6989586621679155748"><span class="annot"><span class="annottext">OpenAPIPetstoreConfig
</span><a href="#local-6989586621679155748"><span class="hs-identifier hs-var">p</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreConfig
</span><a href="#local-6989586621679155748"><span class="hs-identifier hs-var">p</span></a></span><span> </span><span class="hs-special">{</span><span> </span><span class="annot"><span class="annottext">configLogExecWithContext :: LogExecWithContext
</span><a href="OpenAPIPetstore.Core.html#configLogExecWithContext"><span class="hs-identifier hs-var">configLogExecWithContext</span></a></span><span> </span><span class="hs-glyph">=</span><span>  </span><span class="annot"><span class="annottext">LogContext -&gt; LogExec m a
LogExecWithContext
</span><a href="OpenAPIPetstore.LoggingKatip.html#runNullLogExec"><span class="hs-identifier hs-var">runNullLogExec</span></a></span><span class="hs-special">}</span><span>
</span><span id="line-137"></span><span>
</span><span id="line-138"></span><span class="annot"><span class="hs-comment">-- * OpenAPIPetstoreRequest</span></span><span>
</span><span id="line-139"></span><span>
</span><span id="line-140"></span><span class="hs-comment">-- | Represents a request.</span><span>
</span><span id="line-141"></span><span class="hs-comment">--</span><span>
</span><span id="line-142"></span><span class="hs-comment">--   Type Variables:</span><span>
</span><span id="line-143"></span><span class="hs-comment">--</span><span>
</span><span id="line-144"></span><span class="hs-comment">--   * req - request operation</span><span>
</span><span id="line-145"></span><span class="hs-comment">--   * contentType - 'MimeType' associated with request body</span><span>
</span><span id="line-146"></span><span class="hs-comment">--   * res - response model</span><span>
</span><span id="line-147"></span><span class="hs-comment">--   * accept - 'MimeType' associated with response body</span><span>
</span><span id="line-148"></span><span class="hs-keyword">data</span><span> </span><span id="OpenAPIPetstoreRequest"><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-var">OpenAPIPetstoreRequest</span></a></span></span><span> </span><span id="local-6989586621679155073"><span class="annot"><a href="#local-6989586621679155073"><span class="hs-identifier hs-type">req</span></a></span></span><span> </span><span id="local-6989586621679155074"><span class="annot"><a href="#local-6989586621679155074"><span class="hs-identifier hs-type">contentType</span></a></span></span><span> </span><span id="local-6989586621679155075"><span class="annot"><a href="#local-6989586621679155075"><span class="hs-identifier hs-type">res</span></a></span></span><span> </span><span id="local-6989586621679155076"><span class="annot"><a href="#local-6989586621679155076"><span class="hs-identifier hs-type">accept</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span id="OpenAPIPetstoreRequest"><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-var">OpenAPIPetstoreRequest</span></a></span></span><span>
</span><span id="line-149"></span><span>  </span><span class="hs-special">{</span><span> </span><span id="rMethod"><span class="annot"><span class="annottext">forall req contentType res accept.
OpenAPIPetstoreRequest req contentType res accept -&gt; ByteString
</span><a href="OpenAPIPetstore.Core.html#rMethod"><span class="hs-identifier hs-var hs-var">rMethod</span></a></span></span><span>  </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">NH.Method</span></span><span>   </span><span class="annot"><span class="hs-comment">-- ^ Method of OpenAPIPetstoreRequest</span></span><span>
</span><span id="line-150"></span><span>  </span><span class="hs-special">,</span><span> </span><span id="rUrlPath"><span class="annot"><span class="annottext">forall req contentType res accept.
OpenAPIPetstoreRequest req contentType res accept -&gt; [ByteString]
</span><a href="OpenAPIPetstore.Core.html#rUrlPath"><span class="hs-identifier hs-var hs-var">rUrlPath</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">[</span><span class="annot"><span class="hs-identifier hs-type">BCL.ByteString</span></span><span class="hs-special">]</span><span> </span><span class="annot"><span class="hs-comment">-- ^ Endpoint of OpenAPIPetstoreRequest</span></span><span>
</span><span id="line-151"></span><span>  </span><span class="hs-special">,</span><span> </span><span id="rParams"><span class="annot"><span class="annottext">forall req contentType res accept.
OpenAPIPetstoreRequest req contentType res accept -&gt; Params
</span><a href="OpenAPIPetstore.Core.html#rParams"><span class="hs-identifier hs-var hs-var">rParams</span></a></span></span><span>   </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#Params"><span class="hs-identifier hs-type">Params</span></a></span><span> </span><span class="annot"><span class="hs-comment">-- ^ params of OpenAPIPetstoreRequest</span></span><span>
</span><span id="line-152"></span><span>  </span><span class="hs-special">,</span><span> </span><span id="rAuthTypes"><span class="annot"><span class="annottext">forall req contentType res accept.
OpenAPIPetstoreRequest req contentType res accept -&gt; [TypeRep]
</span><a href="OpenAPIPetstore.Core.html#rAuthTypes"><span class="hs-identifier hs-var hs-var">rAuthTypes</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">[</span><span class="annot"><span class="hs-identifier hs-type">P.TypeRep</span></span><span class="hs-special">]</span><span> </span><span class="annot"><span class="hs-comment">-- ^ types of auth methods</span></span><span>
</span><span id="line-153"></span><span>  </span><span class="hs-special">}</span><span>
</span><span id="line-154"></span><span>  </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span id="local-6989586621679155759"><span id="local-6989586621679155772"><span id="local-6989586621679155776"><span class="annot"><span class="annottext">Int -&gt; OpenAPIPetstoreRequest req contentType res accept -&gt; ShowS
[OpenAPIPetstoreRequest req contentType res accept] -&gt; ShowS
OpenAPIPetstoreRequest req contentType res accept -&gt; String
(Int -&gt; OpenAPIPetstoreRequest req contentType res accept -&gt; ShowS)
-&gt; (OpenAPIPetstoreRequest req contentType res accept -&gt; String)
-&gt; ([OpenAPIPetstoreRequest req contentType res accept] -&gt; ShowS)
-&gt; Show (OpenAPIPetstoreRequest req contentType res accept)
forall a.
(Int -&gt; a -&gt; ShowS) -&gt; (a -&gt; String) -&gt; ([a] -&gt; ShowS) -&gt; Show a
forall req contentType res accept.
Int -&gt; OpenAPIPetstoreRequest req contentType res accept -&gt; ShowS
forall req contentType res accept.
[OpenAPIPetstoreRequest req contentType res accept] -&gt; ShowS
forall req contentType res accept.
OpenAPIPetstoreRequest req contentType res accept -&gt; String
$cshowsPrec :: forall req contentType res accept.
Int -&gt; OpenAPIPetstoreRequest req contentType res accept -&gt; ShowS
showsPrec :: Int -&gt; OpenAPIPetstoreRequest req contentType res accept -&gt; ShowS
$cshow :: forall req contentType res accept.
OpenAPIPetstoreRequest req contentType res accept -&gt; String
show :: OpenAPIPetstoreRequest req contentType res accept -&gt; String
$cshowList :: forall req contentType res accept.
[OpenAPIPetstoreRequest req contentType res accept] -&gt; ShowS
showList :: [OpenAPIPetstoreRequest req contentType res accept] -&gt; ShowS
</span><span class="hs-identifier hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var">P.Show</span></span></span></span></span><span class="hs-special">)</span><span>
</span><span id="line-155"></span><span>
</span><span id="line-156"></span><span class="annot"><span class="hs-comment">-- | 'rMethod' Lens</span></span><span>
</span><span id="line-157"></span><span id="local-6989586621679155106"><span id="local-6989586621679155107"><span id="local-6989586621679155108"><span id="local-6989586621679155109"><span class="annot"><a href="OpenAPIPetstore.Core.html#rMethodL"><span class="hs-identifier hs-type">rMethodL</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155106"><span class="hs-identifier hs-type">req</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155107"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155108"><span class="hs-identifier hs-type">res</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155109"><span class="hs-identifier hs-type">accept</span></a></span><span class="hs-special">)</span><span> </span><span class="annot"><span class="hs-identifier hs-type">NH.Method</span></span></span></span></span></span><span>
</span><span id="line-158"></span><span id="rMethodL"><span class="annot"><span class="annottext">rMethodL :: forall req contentType res accept (f :: * -&gt; *).
Functor f =&gt;
(ByteString -&gt; f ByteString)
-&gt; OpenAPIPetstoreRequest req contentType res accept
-&gt; f (OpenAPIPetstoreRequest req contentType res accept)
</span><a href="OpenAPIPetstore.Core.html#rMethodL"><span class="hs-identifier hs-var hs-var">rMethodL</span></a></span></span><span> </span><span id="local-6989586621679155782"><span class="annot"><span class="annottext">ByteString -&gt; f ByteString
</span><a href="#local-6989586621679155782"><span class="hs-identifier hs-var">f</span></a></span></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span class="hs-special">{</span><span id="local-6989586621679155783"><span id="local-6989586621679155784"><span id="local-6989586621679155785"><span id="local-6989586621679155786"><span class="annot"><span class="annottext">[TypeRep]
[ByteString]
ByteString
Params
rMethod :: forall req contentType res accept.
OpenAPIPetstoreRequest req contentType res accept -&gt; ByteString
rUrlPath :: forall req contentType res accept.
OpenAPIPetstoreRequest req contentType res accept -&gt; [ByteString]
rParams :: forall req contentType res accept.
OpenAPIPetstoreRequest req contentType res accept -&gt; Params
rAuthTypes :: forall req contentType res accept.
OpenAPIPetstoreRequest req contentType res accept -&gt; [TypeRep]
rMethod :: ByteString
rUrlPath :: [ByteString]
rParams :: Params
rAuthTypes :: [TypeRep]
</span><a href="OpenAPIPetstore.Core.html#rMethod"><span class="hs-glyph hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var">..</span></a></span></span></span></span></span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span id="local-6989586621679155787"><span class="annot"><span class="annottext">ByteString
</span><a href="#local-6989586621679155787"><span class="hs-identifier hs-var">rMethod</span></a></span></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span> </span><span class="hs-special">{</span><span> </span><span class="annot"><span class="annottext">ByteString
rMethod :: ByteString
rMethod :: ByteString
</span><a href="OpenAPIPetstore.Core.html#rMethod"><span class="hs-identifier hs-var hs-var">rMethod</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="annottext">[TypeRep]
[ByteString]
Params
rUrlPath :: [ByteString]
rParams :: Params
rAuthTypes :: [TypeRep]
rUrlPath :: [ByteString]
rParams :: Params
rAuthTypes :: [TypeRep]
</span><a href="OpenAPIPetstore.Core.html#rUrlPath"><span class="hs-glyph hs-var hs-var hs-var hs-var hs-var hs-var">..</span></a></span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">(ByteString -&gt; OpenAPIPetstoreRequest req contentType res accept)
-&gt; f ByteString
-&gt; f (OpenAPIPetstoreRequest req contentType res accept)
forall (f :: * -&gt; *) a b. Functor f =&gt; (a -&gt; b) -&gt; f a -&gt; f b
</span><span class="hs-operator hs-var">&lt;$&gt;</span></span><span> </span><span class="annot"><span class="annottext">ByteString -&gt; f ByteString
</span><a href="#local-6989586621679155782"><span class="hs-identifier hs-var">f</span></a></span><span> </span><span class="annot"><span class="annottext">ByteString
</span><a href="#local-6989586621679155783"><span class="hs-identifier hs-var">rMethod</span></a></span><span>
</span><span id="line-159"></span><span class="hs-pragma">{-# INLINE</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#rMethodL"><span class="hs-pragma hs-type">rMethodL</span></a></span><span> </span><span class="hs-pragma">#-}</span><span>
</span><span id="line-160"></span><span>
</span><span id="line-161"></span><span class="annot"><span class="hs-comment">-- | 'rUrlPath' Lens</span></span><span>
</span><span id="line-162"></span><span id="local-6989586621679155118"><span id="local-6989586621679155119"><span id="local-6989586621679155120"><span id="local-6989586621679155121"><span class="annot"><a href="OpenAPIPetstore.Core.html#rUrlPathL"><span class="hs-identifier hs-type">rUrlPathL</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155118"><span class="hs-identifier hs-type">req</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155119"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155120"><span class="hs-identifier hs-type">res</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155121"><span class="hs-identifier hs-type">accept</span></a></span><span class="hs-special">)</span><span> </span><span class="hs-special">[</span><span class="annot"><span class="hs-identifier hs-type">BCL.ByteString</span></span><span class="hs-special">]</span></span></span></span></span><span>
</span><span id="line-163"></span><span id="rUrlPathL"><span class="annot"><span class="annottext">rUrlPathL :: forall req contentType res accept (f :: * -&gt; *).
Functor f =&gt;
([ByteString] -&gt; f [ByteString])
-&gt; OpenAPIPetstoreRequest req contentType res accept
-&gt; f (OpenAPIPetstoreRequest req contentType res accept)
</span><a href="OpenAPIPetstore.Core.html#rUrlPathL"><span class="hs-identifier hs-var hs-var">rUrlPathL</span></a></span></span><span> </span><span id="local-6989586621679155791"><span class="annot"><span class="annottext">[ByteString] -&gt; f [ByteString]
</span><a href="#local-6989586621679155791"><span class="hs-identifier hs-var">f</span></a></span></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span class="hs-special">{</span><span id="local-6989586621679155792"><span id="local-6989586621679155793"><span id="local-6989586621679155794"><span id="local-6989586621679155795"><span class="annot"><span class="annottext">[TypeRep]
[ByteString]
ByteString
Params
rMethod :: forall req contentType res accept.
OpenAPIPetstoreRequest req contentType res accept -&gt; ByteString
rUrlPath :: forall req contentType res accept.
OpenAPIPetstoreRequest req contentType res accept -&gt; [ByteString]
rParams :: forall req contentType res accept.
OpenAPIPetstoreRequest req contentType res accept -&gt; Params
rAuthTypes :: forall req contentType res accept.
OpenAPIPetstoreRequest req contentType res accept -&gt; [TypeRep]
rMethod :: ByteString
rUrlPath :: [ByteString]
rParams :: Params
rAuthTypes :: [TypeRep]
</span><a href="OpenAPIPetstore.Core.html#rMethod"><span class="hs-glyph hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var">..</span></a></span></span></span></span></span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span id="local-6989586621679155796"><span class="annot"><span class="annottext">[ByteString]
</span><a href="#local-6989586621679155796"><span class="hs-identifier hs-var">rUrlPath</span></a></span></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span> </span><span class="hs-special">{</span><span> </span><span class="annot"><span class="annottext">[ByteString]
rUrlPath :: [ByteString]
rUrlPath :: [ByteString]
</span><a href="OpenAPIPetstore.Core.html#rUrlPath"><span class="hs-identifier hs-var hs-var">rUrlPath</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="annottext">[TypeRep]
ByteString
Params
rMethod :: ByteString
rParams :: Params
rAuthTypes :: [TypeRep]
rMethod :: ByteString
rParams :: Params
rAuthTypes :: [TypeRep]
</span><a href="OpenAPIPetstore.Core.html#rMethod"><span class="hs-glyph hs-var hs-var hs-var hs-var hs-var hs-var">..</span></a></span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">([ByteString] -&gt; OpenAPIPetstoreRequest req contentType res accept)
-&gt; f [ByteString]
-&gt; f (OpenAPIPetstoreRequest req contentType res accept)
forall (f :: * -&gt; *) a b. Functor f =&gt; (a -&gt; b) -&gt; f a -&gt; f b
</span><span class="hs-operator hs-var">&lt;$&gt;</span></span><span> </span><span class="annot"><span class="annottext">[ByteString] -&gt; f [ByteString]
</span><a href="#local-6989586621679155791"><span class="hs-identifier hs-var">f</span></a></span><span> </span><span class="annot"><span class="annottext">[ByteString]
</span><a href="#local-6989586621679155793"><span class="hs-identifier hs-var">rUrlPath</span></a></span><span>
</span><span id="line-164"></span><span class="hs-pragma">{-# INLINE</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#rUrlPathL"><span class="hs-pragma hs-type">rUrlPathL</span></a></span><span> </span><span class="hs-pragma">#-}</span><span>
</span><span id="line-165"></span><span>
</span><span id="line-166"></span><span class="annot"><span class="hs-comment">-- | 'rParams' Lens</span></span><span>
</span><span id="line-167"></span><span id="local-6989586621679155127"><span id="local-6989586621679155128"><span id="local-6989586621679155129"><span id="local-6989586621679155130"><span class="annot"><a href="OpenAPIPetstore.Core.html#rParamsL"><span class="hs-identifier hs-type">rParamsL</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155127"><span class="hs-identifier hs-type">req</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155128"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155129"><span class="hs-identifier hs-type">res</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155130"><span class="hs-identifier hs-type">accept</span></a></span><span class="hs-special">)</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#Params"><span class="hs-identifier hs-type">Params</span></a></span></span></span></span></span><span>
</span><span id="line-168"></span><span id="rParamsL"><span class="annot"><span class="annottext">rParamsL :: forall req contentType res accept (f :: * -&gt; *).
Functor f =&gt;
(Params -&gt; f Params)
-&gt; OpenAPIPetstoreRequest req contentType res accept
-&gt; f (OpenAPIPetstoreRequest req contentType res accept)
</span><a href="OpenAPIPetstore.Core.html#rParamsL"><span class="hs-identifier hs-var hs-var">rParamsL</span></a></span></span><span> </span><span id="local-6989586621679155800"><span class="annot"><span class="annottext">Params -&gt; f Params
</span><a href="#local-6989586621679155800"><span class="hs-identifier hs-var">f</span></a></span></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span class="hs-special">{</span><span id="local-6989586621679155801"><span id="local-6989586621679155802"><span id="local-6989586621679155803"><span id="local-6989586621679155804"><span class="annot"><span class="annottext">[TypeRep]
[ByteString]
ByteString
Params
rMethod :: forall req contentType res accept.
OpenAPIPetstoreRequest req contentType res accept -&gt; ByteString
rUrlPath :: forall req contentType res accept.
OpenAPIPetstoreRequest req contentType res accept -&gt; [ByteString]
rParams :: forall req contentType res accept.
OpenAPIPetstoreRequest req contentType res accept -&gt; Params
rAuthTypes :: forall req contentType res accept.
OpenAPIPetstoreRequest req contentType res accept -&gt; [TypeRep]
rMethod :: ByteString
rUrlPath :: [ByteString]
rParams :: Params
rAuthTypes :: [TypeRep]
</span><a href="OpenAPIPetstore.Core.html#rMethod"><span class="hs-glyph hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var">..</span></a></span></span></span></span></span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span id="local-6989586621679155805"><span class="annot"><span class="annottext">Params
</span><a href="#local-6989586621679155805"><span class="hs-identifier hs-var">rParams</span></a></span></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span> </span><span class="hs-special">{</span><span> </span><span class="annot"><span class="annottext">Params
rParams :: Params
rParams :: Params
</span><a href="OpenAPIPetstore.Core.html#rParams"><span class="hs-identifier hs-var hs-var">rParams</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="annottext">[TypeRep]
[ByteString]
ByteString
rMethod :: ByteString
rUrlPath :: [ByteString]
rAuthTypes :: [TypeRep]
rMethod :: ByteString
rUrlPath :: [ByteString]
rAuthTypes :: [TypeRep]
</span><a href="OpenAPIPetstore.Core.html#rMethod"><span class="hs-glyph hs-var hs-var hs-var hs-var hs-var hs-var">..</span></a></span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">(Params -&gt; OpenAPIPetstoreRequest req contentType res accept)
-&gt; f Params
-&gt; f (OpenAPIPetstoreRequest req contentType res accept)
forall (f :: * -&gt; *) a b. Functor f =&gt; (a -&gt; b) -&gt; f a -&gt; f b
</span><span class="hs-operator hs-var">&lt;$&gt;</span></span><span> </span><span class="annot"><span class="annottext">Params -&gt; f Params
</span><a href="#local-6989586621679155800"><span class="hs-identifier hs-var">f</span></a></span><span> </span><span class="annot"><span class="annottext">Params
</span><a href="#local-6989586621679155803"><span class="hs-identifier hs-var">rParams</span></a></span><span>
</span><span id="line-169"></span><span class="hs-pragma">{-# INLINE</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#rParamsL"><span class="hs-pragma hs-type">rParamsL</span></a></span><span> </span><span class="hs-pragma">#-}</span><span>
</span><span id="line-170"></span><span>
</span><span id="line-171"></span><span class="annot"><span class="hs-comment">-- | 'rParams' Lens</span></span><span>
</span><span id="line-172"></span><span id="local-6989586621679155136"><span id="local-6989586621679155137"><span id="local-6989586621679155138"><span id="local-6989586621679155139"><span class="annot"><a href="OpenAPIPetstore.Core.html#rAuthTypesL"><span class="hs-identifier hs-type">rAuthTypesL</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155136"><span class="hs-identifier hs-type">req</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155137"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155138"><span class="hs-identifier hs-type">res</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155139"><span class="hs-identifier hs-type">accept</span></a></span><span class="hs-special">)</span><span> </span><span class="hs-special">[</span><span class="annot"><span class="hs-identifier hs-type">P.TypeRep</span></span><span class="hs-special">]</span></span></span></span></span><span>
</span><span id="line-173"></span><span id="rAuthTypesL"><span class="annot"><span class="annottext">rAuthTypesL :: forall req contentType res accept (f :: * -&gt; *).
Functor f =&gt;
([TypeRep] -&gt; f [TypeRep])
-&gt; OpenAPIPetstoreRequest req contentType res accept
-&gt; f (OpenAPIPetstoreRequest req contentType res accept)
</span><a href="OpenAPIPetstore.Core.html#rAuthTypesL"><span class="hs-identifier hs-var hs-var">rAuthTypesL</span></a></span></span><span> </span><span id="local-6989586621679155809"><span class="annot"><span class="annottext">[TypeRep] -&gt; f [TypeRep]
</span><a href="#local-6989586621679155809"><span class="hs-identifier hs-var">f</span></a></span></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span class="hs-special">{</span><span id="local-6989586621679155810"><span id="local-6989586621679155811"><span id="local-6989586621679155812"><span id="local-6989586621679155813"><span class="annot"><span class="annottext">[TypeRep]
[ByteString]
ByteString
Params
rMethod :: forall req contentType res accept.
OpenAPIPetstoreRequest req contentType res accept -&gt; ByteString
rUrlPath :: forall req contentType res accept.
OpenAPIPetstoreRequest req contentType res accept -&gt; [ByteString]
rParams :: forall req contentType res accept.
OpenAPIPetstoreRequest req contentType res accept -&gt; Params
rAuthTypes :: forall req contentType res accept.
OpenAPIPetstoreRequest req contentType res accept -&gt; [TypeRep]
rMethod :: ByteString
rUrlPath :: [ByteString]
rParams :: Params
rAuthTypes :: [TypeRep]
</span><a href="OpenAPIPetstore.Core.html#rMethod"><span class="hs-glyph hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var">..</span></a></span></span></span></span></span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span id="local-6989586621679155814"><span class="annot"><span class="annottext">[TypeRep]
</span><a href="#local-6989586621679155814"><span class="hs-identifier hs-var">rAuthTypes</span></a></span></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span> </span><span class="hs-special">{</span><span> </span><span class="annot"><span class="annottext">[TypeRep]
rAuthTypes :: [TypeRep]
rAuthTypes :: [TypeRep]
</span><a href="OpenAPIPetstore.Core.html#rAuthTypes"><span class="hs-identifier hs-var hs-var">rAuthTypes</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="annottext">[ByteString]
ByteString
Params
rMethod :: ByteString
rUrlPath :: [ByteString]
rParams :: Params
rMethod :: ByteString
rUrlPath :: [ByteString]
rParams :: Params
</span><a href="OpenAPIPetstore.Core.html#rMethod"><span class="hs-glyph hs-var hs-var hs-var hs-var hs-var hs-var">..</span></a></span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">([TypeRep] -&gt; OpenAPIPetstoreRequest req contentType res accept)
-&gt; f [TypeRep]
-&gt; f (OpenAPIPetstoreRequest req contentType res accept)
forall (f :: * -&gt; *) a b. Functor f =&gt; (a -&gt; b) -&gt; f a -&gt; f b
</span><span class="hs-operator hs-var">&lt;$&gt;</span></span><span> </span><span class="annot"><span class="annottext">[TypeRep] -&gt; f [TypeRep]
</span><a href="#local-6989586621679155809"><span class="hs-identifier hs-var">f</span></a></span><span> </span><span class="annot"><span class="annottext">[TypeRep]
</span><a href="#local-6989586621679155813"><span class="hs-identifier hs-var">rAuthTypes</span></a></span><span>
</span><span id="line-174"></span><span class="hs-pragma">{-# INLINE</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#rAuthTypesL"><span class="hs-pragma hs-type">rAuthTypesL</span></a></span><span> </span><span class="hs-pragma">#-}</span><span>
</span><span id="line-175"></span><span>
</span><span id="line-176"></span><span class="annot"><span class="hs-comment">-- * HasBodyParam</span></span><span>
</span><span id="line-177"></span><span>
</span><span id="line-178"></span><span class="annot"><span class="hs-comment">-- | Designates the body parameter of a request</span></span><span>
</span><span id="line-179"></span><span class="hs-keyword">class</span><span> </span><span id="HasBodyParam"><span class="annot"><a href="OpenAPIPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-var">HasBodyParam</span></a></span></span><span> </span><span id="local-6989586621679155145"><span class="annot"><a href="#local-6989586621679155145"><span class="hs-identifier hs-type">req</span></a></span></span><span> </span><span id="local-6989586621679155148"><span class="annot"><a href="#local-6989586621679155148"><span class="hs-identifier hs-type">param</span></a></span></span><span> </span><span class="hs-keyword">where</span><span>
</span><span id="line-180"></span><span>  </span><span id="setBodyParam"><span class="annot"><a href="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-identifier hs-type">setBodyParam</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-keyword">forall</span><span> </span><span id="local-6989586621679155146"><span class="annot"><a href="#local-6989586621679155146"><span class="hs-identifier hs-type">contentType</span></a></span></span><span> </span><span id="local-6989586621679155150"><span class="annot"><a href="#local-6989586621679155150"><span class="hs-identifier hs-type">res</span></a></span></span><span> </span><span id="local-6989586621679155151"><span class="annot"><a href="#local-6989586621679155151"><span class="hs-identifier hs-type">accept</span></a></span></span><span class="hs-operator">.</span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155145"><span class="hs-identifier hs-type">req</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155146"><span class="hs-identifier hs-type">contentType</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155146"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155148"><span class="hs-identifier hs-type">param</span></a></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155145"><span class="hs-identifier hs-type">req</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155146"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155150"><span class="hs-identifier hs-type">res</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155151"><span class="hs-identifier hs-type">accept</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="#local-6989586621679155148"><span class="hs-identifier hs-type">param</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155145"><span class="hs-identifier hs-type">req</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155146"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155150"><span class="hs-identifier hs-type">res</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155151"><span class="hs-identifier hs-type">accept</span></a></span><span>
</span><span id="line-181"></span><span>  </span><span id="local-6989586621679155817"><span class="annot"><a href="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-identifier hs-var hs-var">setBodyParam</span></a></span><span> </span><span id="local-6989586621679155824"><span class="annot"><span class="annottext">OpenAPIPetstoreRequest req contentType res accept
</span><a href="#local-6989586621679155824"><span class="hs-identifier hs-var">req</span></a></span></span><span> </span><span id="local-6989586621679155825"><span class="annot"><span class="annottext">param
</span><a href="#local-6989586621679155825"><span class="hs-identifier hs-var">xs</span></a></span></span><span> </span><span class="hs-glyph">=</span><span>
</span><span id="line-182"></span><span>    </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest req contentType res accept
</span><a href="#local-6989586621679155824"><span class="hs-identifier hs-var">req</span></a></span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest req contentType res accept
-&gt; ByteString -&gt; OpenAPIPetstoreRequest req contentType res accept
forall req contentType res accept.
OpenAPIPetstoreRequest req contentType res accept
-&gt; ByteString -&gt; OpenAPIPetstoreRequest req contentType res accept
</span><a href="OpenAPIPetstore.Core.html#_setBodyLBS"><span class="hs-operator hs-var">`_setBodyLBS`</span></a></span><span> </span><span class="annot"><span class="annottext">Proxy contentType -&gt; param -&gt; ByteString
forall mtype x.
MimeRender mtype x =&gt;
Proxy mtype -&gt; x -&gt; ByteString
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier hs-var">mimeRender</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Proxy contentType
forall {k} (t :: k). Proxy t
</span><span class="hs-identifier hs-var">P.Proxy</span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">P.Proxy</span></span><span> </span><span class="annot"><a href="#local-6989586621679155146"><span class="hs-identifier hs-type">contentType</span></a></span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">param
</span><a href="#local-6989586621679155825"><span class="hs-identifier hs-var">xs</span></a></span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest req contentType res accept
-&gt; (OpenAPIPetstoreRequest req contentType res accept
    -&gt; OpenAPIPetstoreRequest req contentType res accept)
-&gt; OpenAPIPetstoreRequest req contentType res accept
forall a b. a -&gt; (a -&gt; b) -&gt; b
</span><span class="hs-operator hs-var">&amp;</span></span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest req contentType res accept
-&gt; OpenAPIPetstoreRequest req contentType res accept
forall req contentType res accept.
MimeType contentType =&gt;
OpenAPIPetstoreRequest req contentType res accept
-&gt; OpenAPIPetstoreRequest req contentType res accept
</span><a href="OpenAPIPetstore.Core.html#_setContentTypeHeader"><span class="hs-identifier hs-var">_setContentTypeHeader</span></a></span></span><span>
</span><span id="line-183"></span><span>
</span><span id="line-184"></span><span class="annot"><span class="hs-comment">-- * HasOptionalParam</span></span><span>
</span><span id="line-185"></span><span>
</span><span id="line-186"></span><span class="annot"><span class="hs-comment">-- | Designates the optional parameters of a request</span></span><span>
</span><span id="line-187"></span><span class="hs-keyword">class</span><span> </span><span id="HasOptionalParam"><span class="annot"><a href="OpenAPIPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-var">HasOptionalParam</span></a></span></span><span> </span><span id="local-6989586621679155174"><span class="annot"><a href="#local-6989586621679155174"><span class="hs-identifier hs-type">req</span></a></span></span><span> </span><span id="local-6989586621679155178"><span class="annot"><a href="#local-6989586621679155178"><span class="hs-identifier hs-type">param</span></a></span></span><span> </span><span class="hs-keyword">where</span><span>
</span><span id="line-188"></span><span>  </span><span class="hs-pragma">{-# MINIMAL</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#applyOptionalParam"><span class="hs-pragma hs-type">applyOptionalParam</span></a></span><span> </span><span class="hs-pragma">|</span><span> </span><span class="hs-pragma">(</span><span class="hs-pragma">-&amp;-</span><span class="hs-pragma">)</span><span> </span><span class="hs-pragma">#-}</span><span>
</span><span id="line-189"></span><span>
</span><span id="line-190"></span><span>  </span><span class="hs-comment">-- | Apply an optional parameter to a request</span><span>
</span><span id="line-191"></span><span>  </span><span id="applyOptionalParam"><span class="annot"><a href="OpenAPIPetstore.Core.html#applyOptionalParam"><span class="hs-identifier hs-type">applyOptionalParam</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span id="local-6989586621679155175"><span id="local-6989586621679155176"><span id="local-6989586621679155177"><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155174"><span class="hs-identifier hs-type">req</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155175"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155176"><span class="hs-identifier hs-type">res</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155177"><span class="hs-identifier hs-type">accept</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="#local-6989586621679155178"><span class="hs-identifier hs-type">param</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155174"><span class="hs-identifier hs-type">req</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155175"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155176"><span class="hs-identifier hs-type">res</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155177"><span class="hs-identifier hs-type">accept</span></a></span></span></span></span><span>
</span><span id="line-192"></span><span>  </span><span id="local-6989586621679155833"><span class="annot"><a href="OpenAPIPetstore.Core.html#applyOptionalParam"><span class="hs-identifier hs-var hs-var">applyOptionalParam</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest req contentType res accept
-&gt; param -&gt; OpenAPIPetstoreRequest req contentType res accept
forall req param contentType res accept.
HasOptionalParam req param =&gt;
OpenAPIPetstoreRequest req contentType res accept
-&gt; param -&gt; OpenAPIPetstoreRequest req contentType res accept
forall contentType res accept.
OpenAPIPetstoreRequest req contentType res accept
-&gt; param -&gt; OpenAPIPetstoreRequest req contentType res accept
</span><a href="OpenAPIPetstore.Core.html#-%26-"><span class="hs-operator hs-var">(-&amp;-)</span></a></span></span><span>
</span><span id="line-193"></span><span>  </span><span class="hs-pragma">{-# INLINE</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#applyOptionalParam"><span class="hs-pragma hs-type">applyOptionalParam</span></a></span><span> </span><span class="hs-pragma">#-}</span><span>
</span><span id="line-194"></span><span>
</span><span id="line-195"></span><span>  </span><span class="hs-comment">-- | infix operator \/ alias for 'addOptionalParam'</span><span>
</span><span id="line-196"></span><span>  </span><span id="-%26-"><span class="annot"><a href="OpenAPIPetstore.Core.html#-%26-"><span class="hs-operator hs-type">(-&amp;-)</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span id="local-6989586621679155835"><span id="local-6989586621679155836"><span id="local-6989586621679155837"><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155174"><span class="hs-identifier hs-type">req</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155835"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155836"><span class="hs-identifier hs-type">res</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155837"><span class="hs-identifier hs-type">accept</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="#local-6989586621679155178"><span class="hs-identifier hs-type">param</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155174"><span class="hs-identifier hs-type">req</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155835"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155836"><span class="hs-identifier hs-type">res</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155837"><span class="hs-identifier hs-type">accept</span></a></span></span></span></span><span>
</span><span id="line-197"></span><span>  </span><span id="local-6989586621679155838"><span class="annot"><a href="OpenAPIPetstore.Core.html#-%26-"><span class="hs-operator hs-var hs-var">(-&amp;-)</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest req contentType res accept
-&gt; param -&gt; OpenAPIPetstoreRequest req contentType res accept
forall req param contentType res accept.
HasOptionalParam req param =&gt;
OpenAPIPetstoreRequest req contentType res accept
-&gt; param -&gt; OpenAPIPetstoreRequest req contentType res accept
forall contentType res accept.
OpenAPIPetstoreRequest req contentType res accept
-&gt; param -&gt; OpenAPIPetstoreRequest req contentType res accept
</span><a href="OpenAPIPetstore.Core.html#applyOptionalParam"><span class="hs-identifier hs-var">applyOptionalParam</span></a></span></span><span>
</span><span id="line-198"></span><span>  </span><span class="hs-pragma">{-# INLINE</span><span> </span><span class="hs-pragma">(</span><span class="hs-pragma">-&amp;-</span><span class="hs-pragma">)</span><span> </span><span class="hs-pragma">#-}</span><span>
</span><span id="line-199"></span><span>
</span><span id="line-200"></span><span class="hs-keyword">infixl</span><span> </span><span class="hs-number">2</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#-%26-"><span class="hs-operator hs-type">-&amp;-</span></a></span><span>
</span><span id="line-201"></span><span>
</span><span id="line-202"></span><span class="annot"><span class="hs-comment">-- | Request Params</span></span><span>
</span><span id="line-203"></span><span class="hs-keyword">data</span><span> </span><span id="Params"><span class="annot"><a href="OpenAPIPetstore.Core.html#Params"><span class="hs-identifier hs-var">Params</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span id="Params"><span class="annot"><a href="OpenAPIPetstore.Core.html#Params"><span class="hs-identifier hs-var">Params</span></a></span></span><span>
</span><span id="line-204"></span><span>  </span><span class="hs-special">{</span><span> </span><span id="paramsQuery"><span class="annot"><span class="annottext">Params -&gt; Query
</span><a href="OpenAPIPetstore.Core.html#paramsQuery"><span class="hs-identifier hs-var hs-var">paramsQuery</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">NH.Query</span></span><span>
</span><span id="line-205"></span><span>  </span><span class="hs-special">,</span><span> </span><span id="paramsHeaders"><span class="annot"><span class="annottext">Params -&gt; RequestHeaders
</span><a href="OpenAPIPetstore.Core.html#paramsHeaders"><span class="hs-identifier hs-var hs-var">paramsHeaders</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">NH.RequestHeaders</span></span><span>
</span><span id="line-206"></span><span>  </span><span class="hs-special">,</span><span> </span><span id="paramsBody"><span class="annot"><span class="annottext">Params -&gt; ParamBody
</span><a href="OpenAPIPetstore.Core.html#paramsBody"><span class="hs-identifier hs-var hs-var">paramsBody</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#ParamBody"><span class="hs-identifier hs-type">ParamBody</span></a></span><span>
</span><span id="line-207"></span><span>  </span><span class="hs-special">}</span><span>
</span><span id="line-208"></span><span>  </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span id="local-6989586621679155845"><span id="local-6989586621679155854"><span id="local-6989586621679155857"><span class="annot"><span class="annottext">Int -&gt; Params -&gt; ShowS
[Params] -&gt; ShowS
Params -&gt; String
(Int -&gt; Params -&gt; ShowS)
-&gt; (Params -&gt; String) -&gt; ([Params] -&gt; ShowS) -&gt; Show Params
forall a.
(Int -&gt; a -&gt; ShowS) -&gt; (a -&gt; String) -&gt; ([a] -&gt; ShowS) -&gt; Show a
$cshowsPrec :: Int -&gt; Params -&gt; ShowS
showsPrec :: Int -&gt; Params -&gt; ShowS
$cshow :: Params -&gt; String
show :: Params -&gt; String
$cshowList :: [Params] -&gt; ShowS
showList :: [Params] -&gt; ShowS
</span><span class="hs-identifier hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var">P.Show</span></span></span></span></span><span class="hs-special">)</span><span>
</span><span id="line-209"></span><span>
</span><span id="line-210"></span><span class="annot"><span class="hs-comment">-- | 'paramsQuery' Lens</span></span><span>
</span><span id="line-211"></span><span class="annot"><a href="OpenAPIPetstore.Core.html#paramsQueryL"><span class="hs-identifier hs-type">paramsQueryL</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#Params"><span class="hs-identifier hs-type">Params</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">NH.Query</span></span><span>
</span><span id="line-212"></span><span id="paramsQueryL"><span class="annot"><span class="annottext">paramsQueryL :: Lens_' Params Query
</span><a href="OpenAPIPetstore.Core.html#paramsQueryL"><span class="hs-identifier hs-var hs-var">paramsQueryL</span></a></span></span><span> </span><span id="local-6989586621679155868"><span class="annot"><span class="annottext">Query -&gt; f Query
</span><a href="#local-6989586621679155868"><span class="hs-identifier hs-var">f</span></a></span></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#Params"><span class="hs-identifier hs-type">Params</span></a></span><span class="hs-special">{</span><span id="local-6989586621679155869"><span id="local-6989586621679155870"><span id="local-6989586621679155871"><span class="annot"><span class="annottext">Query
RequestHeaders
ParamBody
paramsQuery :: Params -&gt; Query
paramsHeaders :: Params -&gt; RequestHeaders
paramsBody :: Params -&gt; ParamBody
paramsQuery :: Query
paramsHeaders :: RequestHeaders
paramsBody :: ParamBody
</span><a href="OpenAPIPetstore.Core.html#paramsQuery"><span class="hs-glyph hs-var hs-var hs-var hs-var hs-var hs-var">..</span></a></span></span></span></span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span id="local-6989586621679155872"><span class="annot"><span class="annottext">Query
</span><a href="#local-6989586621679155872"><span class="hs-identifier hs-var">paramsQuery</span></a></span></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#Params"><span class="hs-identifier hs-type">Params</span></a></span><span> </span><span class="hs-special">{</span><span> </span><span class="annot"><span class="annottext">Query
paramsQuery :: Query
paramsQuery :: Query
</span><a href="OpenAPIPetstore.Core.html#paramsQuery"><span class="hs-identifier hs-var hs-var">paramsQuery</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="annottext">RequestHeaders
ParamBody
paramsHeaders :: RequestHeaders
paramsBody :: ParamBody
paramsHeaders :: RequestHeaders
paramsBody :: ParamBody
</span><a href="OpenAPIPetstore.Core.html#paramsHeaders"><span class="hs-glyph hs-var hs-var hs-var hs-var">..</span></a></span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">(Query -&gt; Params) -&gt; f Query -&gt; f Params
forall (f :: * -&gt; *) a b. Functor f =&gt; (a -&gt; b) -&gt; f a -&gt; f b
</span><span class="hs-operator hs-var">&lt;$&gt;</span></span><span> </span><span class="annot"><span class="annottext">Query -&gt; f Query
</span><a href="#local-6989586621679155868"><span class="hs-identifier hs-var">f</span></a></span><span> </span><span class="annot"><span class="annottext">Query
</span><a href="#local-6989586621679155869"><span class="hs-identifier hs-var">paramsQuery</span></a></span><span>
</span><span id="line-213"></span><span class="hs-pragma">{-# INLINE</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#paramsQueryL"><span class="hs-pragma hs-type">paramsQueryL</span></a></span><span> </span><span class="hs-pragma">#-}</span><span>
</span><span id="line-214"></span><span>
</span><span id="line-215"></span><span class="annot"><span class="hs-comment">-- | 'paramsHeaders' Lens</span></span><span>
</span><span id="line-216"></span><span class="annot"><a href="OpenAPIPetstore.Core.html#paramsHeadersL"><span class="hs-identifier hs-type">paramsHeadersL</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#Params"><span class="hs-identifier hs-type">Params</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">NH.RequestHeaders</span></span><span>
</span><span id="line-217"></span><span id="paramsHeadersL"><span class="annot"><span class="annottext">paramsHeadersL :: Lens_' Params RequestHeaders
</span><a href="OpenAPIPetstore.Core.html#paramsHeadersL"><span class="hs-identifier hs-var hs-var">paramsHeadersL</span></a></span></span><span> </span><span id="local-6989586621679155876"><span class="annot"><span class="annottext">RequestHeaders -&gt; f RequestHeaders
</span><a href="#local-6989586621679155876"><span class="hs-identifier hs-var">f</span></a></span></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#Params"><span class="hs-identifier hs-type">Params</span></a></span><span class="hs-special">{</span><span id="local-6989586621679155877"><span id="local-6989586621679155878"><span id="local-6989586621679155879"><span class="annot"><span class="annottext">Query
RequestHeaders
ParamBody
paramsQuery :: Params -&gt; Query
paramsHeaders :: Params -&gt; RequestHeaders
paramsBody :: Params -&gt; ParamBody
paramsQuery :: Query
paramsHeaders :: RequestHeaders
paramsBody :: ParamBody
</span><a href="OpenAPIPetstore.Core.html#paramsQuery"><span class="hs-glyph hs-var hs-var hs-var hs-var hs-var hs-var">..</span></a></span></span></span></span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span id="local-6989586621679155880"><span class="annot"><span class="annottext">RequestHeaders
</span><a href="#local-6989586621679155880"><span class="hs-identifier hs-var">paramsHeaders</span></a></span></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#Params"><span class="hs-identifier hs-type">Params</span></a></span><span> </span><span class="hs-special">{</span><span> </span><span class="annot"><span class="annottext">RequestHeaders
paramsHeaders :: RequestHeaders
paramsHeaders :: RequestHeaders
</span><a href="OpenAPIPetstore.Core.html#paramsHeaders"><span class="hs-identifier hs-var hs-var">paramsHeaders</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="annottext">Query
ParamBody
paramsQuery :: Query
paramsBody :: ParamBody
paramsQuery :: Query
paramsBody :: ParamBody
</span><a href="OpenAPIPetstore.Core.html#paramsQuery"><span class="hs-glyph hs-var hs-var hs-var hs-var">..</span></a></span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">(RequestHeaders -&gt; Params) -&gt; f RequestHeaders -&gt; f Params
forall (f :: * -&gt; *) a b. Functor f =&gt; (a -&gt; b) -&gt; f a -&gt; f b
</span><span class="hs-operator hs-var">&lt;$&gt;</span></span><span> </span><span class="annot"><span class="annottext">RequestHeaders -&gt; f RequestHeaders
</span><a href="#local-6989586621679155876"><span class="hs-identifier hs-var">f</span></a></span><span> </span><span class="annot"><span class="annottext">RequestHeaders
</span><a href="#local-6989586621679155878"><span class="hs-identifier hs-var">paramsHeaders</span></a></span><span>
</span><span id="line-218"></span><span class="hs-pragma">{-# INLINE</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#paramsHeadersL"><span class="hs-pragma hs-type">paramsHeadersL</span></a></span><span> </span><span class="hs-pragma">#-}</span><span>
</span><span id="line-219"></span><span>
</span><span id="line-220"></span><span class="annot"><span class="hs-comment">-- | 'paramsBody' Lens</span></span><span>
</span><span id="line-221"></span><span class="annot"><a href="OpenAPIPetstore.Core.html#paramsBodyL"><span class="hs-identifier hs-type">paramsBodyL</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#Params"><span class="hs-identifier hs-type">Params</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#ParamBody"><span class="hs-identifier hs-type">ParamBody</span></a></span><span>
</span><span id="line-222"></span><span id="paramsBodyL"><span class="annot"><span class="annottext">paramsBodyL :: Lens_' Params ParamBody
</span><a href="OpenAPIPetstore.Core.html#paramsBodyL"><span class="hs-identifier hs-var hs-var">paramsBodyL</span></a></span></span><span> </span><span id="local-6989586621679155884"><span class="annot"><span class="annottext">ParamBody -&gt; f ParamBody
</span><a href="#local-6989586621679155884"><span class="hs-identifier hs-var">f</span></a></span></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#Params"><span class="hs-identifier hs-type">Params</span></a></span><span class="hs-special">{</span><span id="local-6989586621679155885"><span id="local-6989586621679155886"><span id="local-6989586621679155887"><span class="annot"><span class="annottext">Query
RequestHeaders
ParamBody
paramsQuery :: Params -&gt; Query
paramsHeaders :: Params -&gt; RequestHeaders
paramsBody :: Params -&gt; ParamBody
paramsQuery :: Query
paramsHeaders :: RequestHeaders
paramsBody :: ParamBody
</span><a href="OpenAPIPetstore.Core.html#paramsQuery"><span class="hs-glyph hs-var hs-var hs-var hs-var hs-var hs-var">..</span></a></span></span></span></span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span id="local-6989586621679155888"><span class="annot"><span class="annottext">ParamBody
</span><a href="#local-6989586621679155888"><span class="hs-identifier hs-var">paramsBody</span></a></span></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#Params"><span class="hs-identifier hs-type">Params</span></a></span><span> </span><span class="hs-special">{</span><span> </span><span class="annot"><span class="annottext">ParamBody
paramsBody :: ParamBody
paramsBody :: ParamBody
</span><a href="OpenAPIPetstore.Core.html#paramsBody"><span class="hs-identifier hs-var hs-var">paramsBody</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="annottext">Query
RequestHeaders
paramsQuery :: Query
paramsHeaders :: RequestHeaders
paramsQuery :: Query
paramsHeaders :: RequestHeaders
</span><a href="OpenAPIPetstore.Core.html#paramsQuery"><span class="hs-glyph hs-var hs-var hs-var hs-var">..</span></a></span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">(ParamBody -&gt; Params) -&gt; f ParamBody -&gt; f Params
forall (f :: * -&gt; *) a b. Functor f =&gt; (a -&gt; b) -&gt; f a -&gt; f b
</span><span class="hs-operator hs-var">&lt;$&gt;</span></span><span> </span><span class="annot"><span class="annottext">ParamBody -&gt; f ParamBody
</span><a href="#local-6989586621679155884"><span class="hs-identifier hs-var">f</span></a></span><span> </span><span class="annot"><span class="annottext">ParamBody
</span><a href="#local-6989586621679155887"><span class="hs-identifier hs-var">paramsBody</span></a></span><span>
</span><span id="line-223"></span><span class="hs-pragma">{-# INLINE</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#paramsBodyL"><span class="hs-pragma hs-type">paramsBodyL</span></a></span><span> </span><span class="hs-pragma">#-}</span><span>
</span><span id="line-224"></span><span>
</span><span id="line-225"></span><span class="annot"><span class="hs-comment">-- | Request Body</span></span><span>
</span><span id="line-226"></span><span class="hs-keyword">data</span><span> </span><span id="ParamBody"><span class="annot"><a href="OpenAPIPetstore.Core.html#ParamBody"><span class="hs-identifier hs-var">ParamBody</span></a></span></span><span>
</span><span id="line-227"></span><span>  </span><span class="hs-glyph">=</span><span> </span><span id="ParamBodyNone"><span class="annot"><a href="OpenAPIPetstore.Core.html#ParamBodyNone"><span class="hs-identifier hs-var">ParamBodyNone</span></a></span></span><span>
</span><span id="line-228"></span><span>  </span><span class="hs-glyph">|</span><span> </span><span id="ParamBodyB"><span class="annot"><a href="OpenAPIPetstore.Core.html#ParamBodyB"><span class="hs-identifier hs-var">ParamBodyB</span></a></span></span><span> </span><span class="annot"><span class="hs-identifier hs-type">B.ByteString</span></span><span>
</span><span id="line-229"></span><span>  </span><span class="hs-glyph">|</span><span> </span><span id="ParamBodyBL"><span class="annot"><a href="OpenAPIPetstore.Core.html#ParamBodyBL"><span class="hs-identifier hs-var">ParamBodyBL</span></a></span></span><span> </span><span class="annot"><span class="hs-identifier hs-type">BL.ByteString</span></span><span>
</span><span id="line-230"></span><span>  </span><span class="hs-glyph">|</span><span> </span><span id="ParamBodyFormUrlEncoded"><span class="annot"><a href="OpenAPIPetstore.Core.html#ParamBodyFormUrlEncoded"><span class="hs-identifier hs-var">ParamBodyFormUrlEncoded</span></a></span></span><span> </span><span class="annot"><span class="hs-identifier hs-type">WH.Form</span></span><span>
</span><span id="line-231"></span><span>  </span><span class="hs-glyph">|</span><span> </span><span id="ParamBodyMultipartFormData"><span class="annot"><a href="OpenAPIPetstore.Core.html#ParamBodyMultipartFormData"><span class="hs-identifier hs-var">ParamBodyMultipartFormData</span></a></span></span><span> </span><span class="hs-special">[</span><span class="annot"><span class="hs-identifier hs-type">NH.Part</span></span><span class="hs-special">]</span><span>
</span><span id="line-232"></span><span>  </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span id="local-6989586621679155895"><span id="local-6989586621679155907"><span id="local-6989586621679155910"><span class="annot"><span class="annottext">Int -&gt; ParamBody -&gt; ShowS
[ParamBody] -&gt; ShowS
ParamBody -&gt; String
(Int -&gt; ParamBody -&gt; ShowS)
-&gt; (ParamBody -&gt; String)
-&gt; ([ParamBody] -&gt; ShowS)
-&gt; Show ParamBody
forall a.
(Int -&gt; a -&gt; ShowS) -&gt; (a -&gt; String) -&gt; ([a] -&gt; ShowS) -&gt; Show a
$cshowsPrec :: Int -&gt; ParamBody -&gt; ShowS
showsPrec :: Int -&gt; ParamBody -&gt; ShowS
$cshow :: ParamBody -&gt; String
show :: ParamBody -&gt; String
$cshowList :: [ParamBody] -&gt; ShowS
showList :: [ParamBody] -&gt; ShowS
</span><span class="hs-identifier hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var">P.Show</span></span></span></span></span><span class="hs-special">)</span><span>
</span><span id="line-233"></span><span>
</span><span id="line-234"></span><span class="annot"><span class="hs-comment">-- ** OpenAPIPetstoreRequest Utils</span></span><span>
</span><span id="line-235"></span><span>
</span><span id="line-236"></span><span id="local-6989586621679155203"><span id="local-6989586621679155204"><span id="local-6989586621679155205"><span id="local-6989586621679155206"><span class="annot"><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-type">_mkRequest</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">NH.Method</span></span><span> </span><span class="annot"><span class="hs-comment">-- ^ Method</span></span><span>
</span><span id="line-237"></span><span>          </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-special">[</span><span class="annot"><span class="hs-identifier hs-type">BCL.ByteString</span></span><span class="hs-special">]</span><span> </span><span class="annot"><span class="hs-comment">-- ^ Endpoint</span></span><span>
</span><span id="line-238"></span><span>          </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155203"><span class="hs-identifier hs-type">req</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155204"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155205"><span class="hs-identifier hs-type">res</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155206"><span class="hs-identifier hs-type">accept</span></a></span></span></span></span></span><span> </span><span class="annot"><span class="hs-comment">-- ^ req: Request Type, res: Response Type</span></span><span>
</span><span id="line-239"></span><span id="_mkRequest"><span class="annot"><span class="annottext">_mkRequest :: forall req contentType res accept.
ByteString
-&gt; [ByteString]
-&gt; OpenAPIPetstoreRequest req contentType res accept
</span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var hs-var">_mkRequest</span></a></span></span><span> </span><span id="local-6989586621679155914"><span class="annot"><span class="annottext">ByteString
</span><a href="#local-6989586621679155914"><span class="hs-identifier hs-var">m</span></a></span></span><span> </span><span id="local-6989586621679155915"><span class="annot"><span class="annottext">[ByteString]
</span><a href="#local-6989586621679155915"><span class="hs-identifier hs-var">u</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">ByteString
-&gt; [ByteString]
-&gt; Params
-&gt; [TypeRep]
-&gt; OpenAPIPetstoreRequest req contentType res accept
forall req contentType res accept.
ByteString
-&gt; [ByteString]
-&gt; Params
-&gt; [TypeRep]
-&gt; OpenAPIPetstoreRequest req contentType res accept
</span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-var">OpenAPIPetstoreRequest</span></a></span><span> </span><span class="annot"><span class="annottext">ByteString
</span><a href="#local-6989586621679155914"><span class="hs-identifier hs-var">m</span></a></span><span> </span><span class="annot"><span class="annottext">[ByteString]
</span><a href="#local-6989586621679155915"><span class="hs-identifier hs-var">u</span></a></span><span> </span><span class="annot"><span class="annottext">Params
</span><a href="OpenAPIPetstore.Core.html#_mkParams"><span class="hs-identifier hs-var">_mkParams</span></a></span><span> </span><span class="hs-special">[</span><span class="hs-special">]</span><span>
</span><span id="line-240"></span><span>
</span><span id="line-241"></span><span class="annot"><a href="OpenAPIPetstore.Core.html#_mkParams"><span class="hs-identifier hs-type">_mkParams</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#Params"><span class="hs-identifier hs-type">Params</span></a></span><span>
</span><span id="line-242"></span><span id="_mkParams"><span class="annot"><span class="annottext">_mkParams :: Params
</span><a href="OpenAPIPetstore.Core.html#_mkParams"><span class="hs-identifier hs-var hs-var">_mkParams</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Query -&gt; RequestHeaders -&gt; ParamBody -&gt; Params
</span><a href="OpenAPIPetstore.Core.html#Params"><span class="hs-identifier hs-var">Params</span></a></span><span> </span><span class="hs-special">[</span><span class="hs-special">]</span><span> </span><span class="hs-special">[</span><span class="hs-special">]</span><span> </span><span class="annot"><span class="annottext">ParamBody
</span><a href="OpenAPIPetstore.Core.html#ParamBodyNone"><span class="hs-identifier hs-var">ParamBodyNone</span></a></span><span>
</span><span id="line-243"></span><span>
</span><span id="line-244"></span><span id="local-6989586621679155211"><span id="local-6989586621679155212"><span id="local-6989586621679155213"><span id="local-6989586621679155214"><span class="annot"><a href="OpenAPIPetstore.Core.html#setHeader"><span class="hs-identifier hs-type">setHeader</span></a></span><span> </span><span class="hs-glyph">::</span><span>
</span><span id="line-245"></span><span>     </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155211"><span class="hs-identifier hs-type">req</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155212"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155213"><span class="hs-identifier hs-type">res</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155214"><span class="hs-identifier hs-type">accept</span></a></span><span>
</span><span id="line-246"></span><span>  </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-special">[</span><span class="annot"><span class="hs-identifier hs-type">NH.Header</span></span><span class="hs-special">]</span><span>
</span><span id="line-247"></span><span>  </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155211"><span class="hs-identifier hs-type">req</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155212"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155213"><span class="hs-identifier hs-type">res</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155214"><span class="hs-identifier hs-type">accept</span></a></span></span></span></span></span><span>
</span><span id="line-248"></span><span id="setHeader"><span class="annot"><span class="annottext">setHeader :: forall req contentType res accept.
OpenAPIPetstoreRequest req contentType res accept
-&gt; RequestHeaders
-&gt; OpenAPIPetstoreRequest req contentType res accept
</span><a href="OpenAPIPetstore.Core.html#setHeader"><span class="hs-identifier hs-var hs-var">setHeader</span></a></span></span><span> </span><span id="local-6989586621679155920"><span class="annot"><span class="annottext">OpenAPIPetstoreRequest req contentType res accept
</span><a href="#local-6989586621679155920"><span class="hs-identifier hs-var">req</span></a></span></span><span> </span><span id="local-6989586621679155921"><span class="annot"><span class="annottext">RequestHeaders
</span><a href="#local-6989586621679155921"><span class="hs-identifier hs-var">header</span></a></span></span><span> </span><span class="hs-glyph">=</span><span>
</span><span id="line-249"></span><span>  </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest req contentType res accept
</span><a href="#local-6989586621679155920"><span class="hs-identifier hs-var">req</span></a></span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest req contentType res accept
-&gt; [HeaderName]
-&gt; OpenAPIPetstoreRequest req contentType res accept
forall req contentType res accept.
OpenAPIPetstoreRequest req contentType res accept
-&gt; [HeaderName]
-&gt; OpenAPIPetstoreRequest req contentType res accept
</span><a href="OpenAPIPetstore.Core.html#removeHeader"><span class="hs-operator hs-var">`removeHeader`</span></a></span><span> </span><span class="annot"><span class="annottext">((HeaderName, ByteString) -&gt; HeaderName)
-&gt; RequestHeaders -&gt; [HeaderName]
forall a b. (a -&gt; b) -&gt; [a] -&gt; [b]
forall (f :: * -&gt; *) a b. Functor f =&gt; (a -&gt; b) -&gt; f a -&gt; f b
</span><span class="hs-identifier hs-var">P.fmap</span></span><span> </span><span class="annot"><span class="annottext">(HeaderName, ByteString) -&gt; HeaderName
forall a b. (a, b) -&gt; a
</span><span class="hs-identifier hs-var">P.fst</span></span><span> </span><span class="annot"><span class="annottext">RequestHeaders
</span><a href="#local-6989586621679155921"><span class="hs-identifier hs-var">header</span></a></span><span>
</span><span id="line-250"></span><span>  </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest req contentType res accept
-&gt; (OpenAPIPetstoreRequest req contentType res accept
    -&gt; OpenAPIPetstoreRequest req contentType res accept)
-&gt; OpenAPIPetstoreRequest req contentType res accept
forall a b. a -&gt; (a -&gt; b) -&gt; b
</span><span class="hs-operator hs-var">&amp;</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest req contentType res accept
-&gt; RequestHeaders
-&gt; OpenAPIPetstoreRequest req contentType res accept
forall req contentType res accept.
OpenAPIPetstoreRequest req contentType res accept
-&gt; RequestHeaders
-&gt; OpenAPIPetstoreRequest req contentType res accept
</span><a href="OpenAPIPetstore.Core.html#addHeader"><span class="hs-operator hs-var">`addHeader`</span></a></span><span> </span><span class="annot"><span class="annottext">RequestHeaders
</span><a href="#local-6989586621679155921"><span class="hs-identifier hs-var">header</span></a></span><span class="hs-special">)</span><span>
</span><span id="line-251"></span><span>
</span><span id="line-252"></span><span id="local-6989586621679155925"><span id="local-6989586621679155926"><span id="local-6989586621679155927"><span id="local-6989586621679155928"><span class="annot"><a href="OpenAPIPetstore.Core.html#addHeader"><span class="hs-identifier hs-type">addHeader</span></a></span><span> </span><span class="hs-glyph">::</span><span>
</span><span id="line-253"></span><span>     </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155925"><span class="hs-identifier hs-type">req</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155926"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155927"><span class="hs-identifier hs-type">res</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155928"><span class="hs-identifier hs-type">accept</span></a></span><span>
</span><span id="line-254"></span><span>  </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-special">[</span><span class="annot"><span class="hs-identifier hs-type">NH.Header</span></span><span class="hs-special">]</span><span>
</span><span id="line-255"></span><span>  </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155925"><span class="hs-identifier hs-type">req</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155926"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155927"><span class="hs-identifier hs-type">res</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155928"><span class="hs-identifier hs-type">accept</span></a></span></span></span></span></span><span>
</span><span id="line-256"></span><span id="addHeader"><span class="annot"><span class="annottext">addHeader :: forall req contentType res accept.
OpenAPIPetstoreRequest req contentType res accept
-&gt; RequestHeaders
-&gt; OpenAPIPetstoreRequest req contentType res accept
</span><a href="OpenAPIPetstore.Core.html#addHeader"><span class="hs-identifier hs-var hs-var">addHeader</span></a></span></span><span> </span><span id="local-6989586621679155932"><span class="annot"><span class="annottext">OpenAPIPetstoreRequest req contentType res accept
</span><a href="#local-6989586621679155932"><span class="hs-identifier hs-var">req</span></a></span></span><span> </span><span id="local-6989586621679155933"><span class="annot"><span class="annottext">RequestHeaders
</span><a href="#local-6989586621679155933"><span class="hs-identifier hs-var">header</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">ASetter
  (OpenAPIPetstoreRequest req contentType res accept)
  (OpenAPIPetstoreRequest req contentType res accept)
  RequestHeaders
  RequestHeaders
-&gt; (RequestHeaders -&gt; RequestHeaders)
-&gt; OpenAPIPetstoreRequest req contentType res accept
-&gt; OpenAPIPetstoreRequest req contentType res accept
forall s t a b. ASetter s t a b -&gt; (a -&gt; b) -&gt; s -&gt; t
</span><span class="hs-identifier hs-var">L.over</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">(Params -&gt; Identity Params)
-&gt; OpenAPIPetstoreRequest req contentType res accept
-&gt; Identity (OpenAPIPetstoreRequest req contentType res accept)
forall req contentType res accept (f :: * -&gt; *).
Functor f =&gt;
(Params -&gt; f Params)
-&gt; OpenAPIPetstoreRequest req contentType res accept
-&gt; f (OpenAPIPetstoreRequest req contentType res accept)
</span><a href="OpenAPIPetstore.Core.html#rParamsL"><span class="hs-identifier hs-var">rParamsL</span></a></span><span> </span><span class="annot"><span class="annottext">((Params -&gt; Identity Params)
 -&gt; OpenAPIPetstoreRequest req contentType res accept
 -&gt; Identity (OpenAPIPetstoreRequest req contentType res accept))
-&gt; ((RequestHeaders -&gt; Identity RequestHeaders)
    -&gt; Params -&gt; Identity Params)
-&gt; ASetter
     (OpenAPIPetstoreRequest req contentType res accept)
     (OpenAPIPetstoreRequest req contentType res accept)
     RequestHeaders
     RequestHeaders
forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">(RequestHeaders -&gt; Identity RequestHeaders)
-&gt; Params -&gt; Identity Params
Lens_' Params RequestHeaders
</span><a href="OpenAPIPetstore.Core.html#paramsHeadersL"><span class="hs-identifier hs-var">paramsHeadersL</span></a></span><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">RequestHeaders
</span><a href="#local-6989586621679155933"><span class="hs-identifier hs-var">header</span></a></span><span> </span><span class="annot"><span class="annottext">RequestHeaders -&gt; RequestHeaders -&gt; RequestHeaders
forall a. [a] -&gt; [a] -&gt; [a]
</span><span class="hs-operator hs-var">P.++</span></span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest req contentType res accept
</span><a href="#local-6989586621679155932"><span class="hs-identifier hs-var">req</span></a></span><span>
</span><span id="line-257"></span><span>
</span><span id="line-258"></span><span id="local-6989586621679155219"><span id="local-6989586621679155220"><span id="local-6989586621679155221"><span id="local-6989586621679155222"><span class="annot"><a href="OpenAPIPetstore.Core.html#removeHeader"><span class="hs-identifier hs-type">removeHeader</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155219"><span class="hs-identifier hs-type">req</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155220"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155221"><span class="hs-identifier hs-type">res</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155222"><span class="hs-identifier hs-type">accept</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-special">[</span><span class="annot"><span class="hs-identifier hs-type">NH.HeaderName</span></span><span class="hs-special">]</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155219"><span class="hs-identifier hs-type">req</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155220"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155221"><span class="hs-identifier hs-type">res</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155222"><span class="hs-identifier hs-type">accept</span></a></span></span></span></span></span><span>
</span><span id="line-259"></span><span id="removeHeader"><span class="annot"><span class="annottext">removeHeader :: forall req contentType res accept.
OpenAPIPetstoreRequest req contentType res accept
-&gt; [HeaderName]
-&gt; OpenAPIPetstoreRequest req contentType res accept
</span><a href="OpenAPIPetstore.Core.html#removeHeader"><span class="hs-identifier hs-var hs-var">removeHeader</span></a></span></span><span> </span><span id="local-6989586621679155947"><span class="annot"><span class="annottext">OpenAPIPetstoreRequest req contentType res accept
</span><a href="#local-6989586621679155947"><span class="hs-identifier hs-var">req</span></a></span></span><span> </span><span id="local-6989586621679155948"><span class="annot"><span class="annottext">[HeaderName]
</span><a href="#local-6989586621679155948"><span class="hs-identifier hs-var">header</span></a></span></span><span> </span><span class="hs-glyph">=</span><span>
</span><span id="line-260"></span><span>  </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest req contentType res accept
</span><a href="#local-6989586621679155947"><span class="hs-identifier hs-var">req</span></a></span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest req contentType res accept
-&gt; (OpenAPIPetstoreRequest req contentType res accept
    -&gt; OpenAPIPetstoreRequest req contentType res accept)
-&gt; OpenAPIPetstoreRequest req contentType res accept
forall a b. a -&gt; (a -&gt; b) -&gt; b
</span><span class="hs-operator hs-var">&amp;</span></span><span>
</span><span id="line-261"></span><span>  </span><span class="annot"><span class="annottext">ASetter
  (OpenAPIPetstoreRequest req contentType res accept)
  (OpenAPIPetstoreRequest req contentType res accept)
  RequestHeaders
  RequestHeaders
-&gt; (RequestHeaders -&gt; RequestHeaders)
-&gt; OpenAPIPetstoreRequest req contentType res accept
-&gt; OpenAPIPetstoreRequest req contentType res accept
forall s t a b. ASetter s t a b -&gt; (a -&gt; b) -&gt; s -&gt; t
</span><span class="hs-identifier hs-var">L.over</span></span><span>
</span><span id="line-262"></span><span>    </span><span class="hs-special">(</span><span class="annot"><span class="annottext">(Params -&gt; Identity Params)
-&gt; OpenAPIPetstoreRequest req contentType res accept
-&gt; Identity (OpenAPIPetstoreRequest req contentType res accept)
forall req contentType res accept (f :: * -&gt; *).
Functor f =&gt;
(Params -&gt; f Params)
-&gt; OpenAPIPetstoreRequest req contentType res accept
-&gt; f (OpenAPIPetstoreRequest req contentType res accept)
</span><a href="OpenAPIPetstore.Core.html#rParamsL"><span class="hs-identifier hs-var">rParamsL</span></a></span><span> </span><span class="annot"><span class="annottext">((Params -&gt; Identity Params)
 -&gt; OpenAPIPetstoreRequest req contentType res accept
 -&gt; Identity (OpenAPIPetstoreRequest req contentType res accept))
-&gt; ((RequestHeaders -&gt; Identity RequestHeaders)
    -&gt; Params -&gt; Identity Params)
-&gt; ASetter
     (OpenAPIPetstoreRequest req contentType res accept)
     (OpenAPIPetstoreRequest req contentType res accept)
     RequestHeaders
     RequestHeaders
forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">(RequestHeaders -&gt; Identity RequestHeaders)
-&gt; Params -&gt; Identity Params
Lens_' Params RequestHeaders
</span><a href="OpenAPIPetstore.Core.html#paramsHeadersL"><span class="hs-identifier hs-var">paramsHeadersL</span></a></span><span class="hs-special">)</span><span>
</span><span id="line-263"></span><span>    </span><span class="hs-special">(</span><span class="annot"><span class="annottext">((HeaderName, ByteString) -&gt; Bool)
-&gt; RequestHeaders -&gt; RequestHeaders
forall a. (a -&gt; Bool) -&gt; [a] -&gt; [a]
</span><span class="hs-identifier hs-var">P.filter</span></span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span id="local-6989586621679155949"><span class="annot"><span class="annottext">(HeaderName, ByteString)
</span><a href="#local-6989586621679155949"><span class="hs-identifier hs-var">h</span></a></span></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">(HeaderName, ByteString) -&gt; CI HeaderName
forall {b}. (HeaderName, b) -&gt; CI HeaderName
</span><a href="#local-6989586621679155950"><span class="hs-identifier hs-var">cifst</span></a></span><span> </span><span class="annot"><span class="annottext">(HeaderName, ByteString)
</span><a href="#local-6989586621679155949"><span class="hs-identifier hs-var">h</span></a></span><span> </span><span class="annot"><span class="annottext">CI HeaderName -&gt; [CI HeaderName] -&gt; Bool
forall (t :: * -&gt; *) a. (Foldable t, Eq a) =&gt; a -&gt; t a -&gt; Bool
</span><span class="hs-operator hs-var">`P.notElem`</span></span><span> </span><span class="annot"><span class="annottext">(HeaderName -&gt; CI HeaderName) -&gt; [HeaderName] -&gt; [CI HeaderName]
forall a b. (a -&gt; b) -&gt; [a] -&gt; [b]
forall (f :: * -&gt; *) a b. Functor f =&gt; (a -&gt; b) -&gt; f a -&gt; f b
</span><span class="hs-identifier hs-var">P.fmap</span></span><span> </span><span class="annot"><span class="annottext">HeaderName -&gt; CI HeaderName
forall s. FoldCase s =&gt; s -&gt; CI s
</span><span class="hs-identifier hs-var">CI.mk</span></span><span> </span><span class="annot"><span class="annottext">[HeaderName]
</span><a href="#local-6989586621679155948"><span class="hs-identifier hs-var">header</span></a></span><span class="hs-special">)</span><span class="hs-special">)</span><span>
</span><span id="line-264"></span><span>  </span><span class="hs-keyword">where</span><span>
</span><span id="line-265"></span><span>    </span><span id="local-6989586621679155950"><span class="annot"><span class="annottext">cifst :: (HeaderName, b) -&gt; CI HeaderName
</span><a href="#local-6989586621679155950"><span class="hs-identifier hs-var hs-var">cifst</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">HeaderName -&gt; CI HeaderName
forall s. FoldCase s =&gt; s -&gt; CI s
</span><span class="hs-identifier hs-var">CI.mk</span></span><span> </span><span class="annot"><span class="annottext">(HeaderName -&gt; CI HeaderName)
-&gt; ((HeaderName, b) -&gt; HeaderName)
-&gt; (HeaderName, b)
-&gt; CI HeaderName
forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">(HeaderName, b) -&gt; HeaderName
forall a b. (a, b) -&gt; a
</span><span class="hs-identifier hs-var">P.fst</span></span><span>
</span><span id="line-266"></span><span>
</span><span id="line-267"></span><span>
</span><span id="line-268"></span><span class="annot"><a href="OpenAPIPetstore.Core.html#_setContentTypeHeader"><span class="hs-identifier hs-type">_setContentTypeHeader</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-keyword">forall</span><span> </span><span id="local-6989586621679155171"><span class="annot"><a href="#local-6989586621679155171"><span class="hs-identifier hs-type">req</span></a></span></span><span> </span><span id="local-6989586621679155170"><span class="annot"><a href="#local-6989586621679155170"><span class="hs-identifier hs-type">contentType</span></a></span></span><span> </span><span id="local-6989586621679155172"><span class="annot"><a href="#local-6989586621679155172"><span class="hs-identifier hs-type">res</span></a></span></span><span> </span><span id="local-6989586621679155173"><span class="annot"><a href="#local-6989586621679155173"><span class="hs-identifier hs-type">accept</span></a></span></span><span class="hs-operator">.</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155170"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155171"><span class="hs-identifier hs-type">req</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155170"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155172"><span class="hs-identifier hs-type">res</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155173"><span class="hs-identifier hs-type">accept</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155171"><span class="hs-identifier hs-type">req</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155170"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155172"><span class="hs-identifier hs-type">res</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155173"><span class="hs-identifier hs-type">accept</span></a></span><span>
</span><span id="line-269"></span><span id="_setContentTypeHeader"><span class="annot"><span class="annottext">_setContentTypeHeader :: forall req contentType res accept.
MimeType contentType =&gt;
OpenAPIPetstoreRequest req contentType res accept
-&gt; OpenAPIPetstoreRequest req contentType res accept
</span><a href="OpenAPIPetstore.Core.html#_setContentTypeHeader"><span class="hs-identifier hs-var hs-var">_setContentTypeHeader</span></a></span></span><span> </span><span id="local-6989586621679155963"><span class="annot"><span class="annottext">OpenAPIPetstoreRequest req contentType res accept
</span><a href="#local-6989586621679155963"><span class="hs-identifier hs-var">req</span></a></span></span><span> </span><span class="hs-glyph">=</span><span>
</span><span id="line-270"></span><span>    </span><span class="hs-keyword">case</span><span> </span><span class="annot"><span class="annottext">Proxy contentType -&gt; Maybe MediaType
forall mtype. MimeType mtype =&gt; Proxy mtype -&gt; Maybe MediaType
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier hs-var">mimeType</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Proxy contentType
forall {k} (t :: k). Proxy t
</span><span class="hs-identifier hs-var">P.Proxy</span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">P.Proxy</span></span><span> </span><span class="annot"><a href="#local-6989586621679155170"><span class="hs-identifier hs-type">contentType</span></a></span><span class="hs-special">)</span><span> </span><span class="hs-keyword">of</span><span>
</span><span id="line-271"></span><span>        </span><span class="annot"><span class="hs-identifier hs-type">Just</span></span><span> </span><span id="local-6989586621679155965"><span class="annot"><span class="annottext">MediaType
</span><a href="#local-6989586621679155965"><span class="hs-identifier hs-var">m</span></a></span></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest req contentType res accept
</span><a href="#local-6989586621679155963"><span class="hs-identifier hs-var">req</span></a></span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest req contentType res accept
-&gt; RequestHeaders
-&gt; OpenAPIPetstoreRequest req contentType res accept
forall req contentType res accept.
OpenAPIPetstoreRequest req contentType res accept
-&gt; RequestHeaders
-&gt; OpenAPIPetstoreRequest req contentType res accept
</span><a href="OpenAPIPetstore.Core.html#setHeader"><span class="hs-operator hs-var">`setHeader`</span></a></span><span> </span><span class="hs-special">[</span><span class="hs-special">(</span><span class="annot"><span class="annottext">HeaderName
</span><span class="hs-string">&quot;content-type&quot;</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="annottext">String -&gt; ByteString
</span><span class="hs-identifier hs-var">BC.pack</span></span><span> </span><span class="annot"><span class="annottext">(String -&gt; ByteString) -&gt; String -&gt; ByteString
forall a b. (a -&gt; b) -&gt; a -&gt; b
</span><span class="hs-operator hs-var">$</span></span><span> </span><span class="annot"><span class="annottext">MediaType -&gt; String
forall a. Show a =&gt; a -&gt; String
</span><span class="hs-identifier hs-var">P.show</span></span><span> </span><span class="annot"><span class="annottext">MediaType
</span><a href="#local-6989586621679155965"><span class="hs-identifier hs-var">m</span></a></span><span class="hs-special">)</span><span class="hs-special">]</span><span>
</span><span id="line-272"></span><span>        </span><span class="annot"><span class="annottext">Maybe MediaType
</span><span class="hs-identifier hs-var">Nothing</span></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest req contentType res accept
</span><a href="#local-6989586621679155963"><span class="hs-identifier hs-var">req</span></a></span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest req contentType res accept
-&gt; [HeaderName]
-&gt; OpenAPIPetstoreRequest req contentType res accept
forall req contentType res accept.
OpenAPIPetstoreRequest req contentType res accept
-&gt; [HeaderName]
-&gt; OpenAPIPetstoreRequest req contentType res accept
</span><a href="OpenAPIPetstore.Core.html#removeHeader"><span class="hs-operator hs-var">`removeHeader`</span></a></span><span> </span><span class="hs-special">[</span><span class="annot"><span class="annottext">HeaderName
</span><span class="hs-string">&quot;content-type&quot;</span></span><span class="hs-special">]</span><span>
</span><span id="line-273"></span><span>
</span><span id="line-274"></span><span class="annot"><a href="OpenAPIPetstore.Core.html#_setAcceptHeader"><span class="hs-identifier hs-type">_setAcceptHeader</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-keyword">forall</span><span> </span><span id="local-6989586621679155262"><span class="annot"><a href="#local-6989586621679155262"><span class="hs-identifier hs-type">req</span></a></span></span><span> </span><span id="local-6989586621679155263"><span class="annot"><a href="#local-6989586621679155263"><span class="hs-identifier hs-type">contentType</span></a></span></span><span> </span><span id="local-6989586621679155264"><span class="annot"><a href="#local-6989586621679155264"><span class="hs-identifier hs-type">res</span></a></span></span><span> </span><span id="local-6989586621679155261"><span class="annot"><a href="#local-6989586621679155261"><span class="hs-identifier hs-type">accept</span></a></span></span><span class="hs-operator">.</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155261"><span class="hs-identifier hs-type">accept</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155262"><span class="hs-identifier hs-type">req</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155263"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155264"><span class="hs-identifier hs-type">res</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155261"><span class="hs-identifier hs-type">accept</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155262"><span class="hs-identifier hs-type">req</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155263"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155264"><span class="hs-identifier hs-type">res</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155261"><span class="hs-identifier hs-type">accept</span></a></span><span>
</span><span id="line-275"></span><span id="_setAcceptHeader"><span class="annot"><span class="annottext">_setAcceptHeader :: forall req contentType res accept.
MimeType accept =&gt;
OpenAPIPetstoreRequest req contentType res accept
-&gt; OpenAPIPetstoreRequest req contentType res accept
</span><a href="OpenAPIPetstore.Core.html#_setAcceptHeader"><span class="hs-identifier hs-var hs-var">_setAcceptHeader</span></a></span></span><span> </span><span id="local-6989586621679155974"><span class="annot"><span class="annottext">OpenAPIPetstoreRequest req contentType res accept
</span><a href="#local-6989586621679155974"><span class="hs-identifier hs-var">req</span></a></span></span><span> </span><span class="hs-glyph">=</span><span>
</span><span id="line-276"></span><span>    </span><span class="hs-keyword">case</span><span> </span><span class="annot"><span class="annottext">Proxy accept -&gt; Maybe MediaType
forall mtype. MimeType mtype =&gt; Proxy mtype -&gt; Maybe MediaType
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier hs-var">mimeType</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Proxy accept
forall {k} (t :: k). Proxy t
</span><span class="hs-identifier hs-var">P.Proxy</span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">P.Proxy</span></span><span> </span><span class="annot"><a href="#local-6989586621679155261"><span class="hs-identifier hs-type">accept</span></a></span><span class="hs-special">)</span><span> </span><span class="hs-keyword">of</span><span>
</span><span id="line-277"></span><span>        </span><span class="annot"><span class="hs-identifier hs-type">Just</span></span><span> </span><span id="local-6989586621679155975"><span class="annot"><span class="annottext">MediaType
</span><a href="#local-6989586621679155975"><span class="hs-identifier hs-var">m</span></a></span></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest req contentType res accept
</span><a href="#local-6989586621679155974"><span class="hs-identifier hs-var">req</span></a></span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest req contentType res accept
-&gt; RequestHeaders
-&gt; OpenAPIPetstoreRequest req contentType res accept
forall req contentType res accept.
OpenAPIPetstoreRequest req contentType res accept
-&gt; RequestHeaders
-&gt; OpenAPIPetstoreRequest req contentType res accept
</span><a href="OpenAPIPetstore.Core.html#setHeader"><span class="hs-operator hs-var">`setHeader`</span></a></span><span> </span><span class="hs-special">[</span><span class="hs-special">(</span><span class="annot"><span class="annottext">HeaderName
</span><span class="hs-string">&quot;accept&quot;</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="annottext">String -&gt; ByteString
</span><span class="hs-identifier hs-var">BC.pack</span></span><span> </span><span class="annot"><span class="annottext">(String -&gt; ByteString) -&gt; String -&gt; ByteString
forall a b. (a -&gt; b) -&gt; a -&gt; b
</span><span class="hs-operator hs-var">$</span></span><span> </span><span class="annot"><span class="annottext">MediaType -&gt; String
forall a. Show a =&gt; a -&gt; String
</span><span class="hs-identifier hs-var">P.show</span></span><span> </span><span class="annot"><span class="annottext">MediaType
</span><a href="#local-6989586621679155975"><span class="hs-identifier hs-var">m</span></a></span><span class="hs-special">)</span><span class="hs-special">]</span><span>
</span><span id="line-278"></span><span>        </span><span class="annot"><span class="annottext">Maybe MediaType
</span><span class="hs-identifier hs-var">Nothing</span></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest req contentType res accept
</span><a href="#local-6989586621679155974"><span class="hs-identifier hs-var">req</span></a></span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest req contentType res accept
-&gt; [HeaderName]
-&gt; OpenAPIPetstoreRequest req contentType res accept
forall req contentType res accept.
OpenAPIPetstoreRequest req contentType res accept
-&gt; [HeaderName]
-&gt; OpenAPIPetstoreRequest req contentType res accept
</span><a href="OpenAPIPetstore.Core.html#removeHeader"><span class="hs-operator hs-var">`removeHeader`</span></a></span><span> </span><span class="hs-special">[</span><span class="annot"><span class="annottext">HeaderName
</span><span class="hs-string">&quot;accept&quot;</span></span><span class="hs-special">]</span><span>
</span><span id="line-279"></span><span>
</span><span id="line-280"></span><span id="local-6989586621679155269"><span id="local-6989586621679155270"><span id="local-6989586621679155271"><span id="local-6989586621679155272"><span class="annot"><a href="OpenAPIPetstore.Core.html#setQuery"><span class="hs-identifier hs-type">setQuery</span></a></span><span> </span><span class="hs-glyph">::</span><span>
</span><span id="line-281"></span><span>     </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155269"><span class="hs-identifier hs-type">req</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155270"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155271"><span class="hs-identifier hs-type">res</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155272"><span class="hs-identifier hs-type">accept</span></a></span><span>
</span><span id="line-282"></span><span>  </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-special">[</span><span class="annot"><span class="hs-identifier hs-type">NH.QueryItem</span></span><span class="hs-special">]</span><span>
</span><span id="line-283"></span><span>  </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155269"><span class="hs-identifier hs-type">req</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155270"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155271"><span class="hs-identifier hs-type">res</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155272"><span class="hs-identifier hs-type">accept</span></a></span></span></span></span></span><span>
</span><span id="line-284"></span><span id="setQuery"><span class="annot"><span class="annottext">setQuery :: forall req contentType res accept.
OpenAPIPetstoreRequest req contentType res accept
-&gt; Query -&gt; OpenAPIPetstoreRequest req contentType res accept
</span><a href="OpenAPIPetstore.Core.html#setQuery"><span class="hs-identifier hs-var hs-var">setQuery</span></a></span></span><span> </span><span id="local-6989586621679155984"><span class="annot"><span class="annottext">OpenAPIPetstoreRequest req contentType res accept
</span><a href="#local-6989586621679155984"><span class="hs-identifier hs-var">req</span></a></span></span><span> </span><span id="local-6989586621679155985"><span class="annot"><span class="annottext">Query
</span><a href="#local-6989586621679155985"><span class="hs-identifier hs-var">query</span></a></span></span><span> </span><span class="hs-glyph">=</span><span>
</span><span id="line-285"></span><span>  </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest req contentType res accept
</span><a href="#local-6989586621679155984"><span class="hs-identifier hs-var">req</span></a></span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest req contentType res accept
-&gt; (OpenAPIPetstoreRequest req contentType res accept
    -&gt; OpenAPIPetstoreRequest req contentType res accept)
-&gt; OpenAPIPetstoreRequest req contentType res accept
forall a b. a -&gt; (a -&gt; b) -&gt; b
</span><span class="hs-operator hs-var">&amp;</span></span><span>
</span><span id="line-286"></span><span>  </span><span class="annot"><span class="annottext">ASetter
  (OpenAPIPetstoreRequest req contentType res accept)
  (OpenAPIPetstoreRequest req contentType res accept)
  Query
  Query
-&gt; (Query -&gt; Query)
-&gt; OpenAPIPetstoreRequest req contentType res accept
-&gt; OpenAPIPetstoreRequest req contentType res accept
forall s t a b. ASetter s t a b -&gt; (a -&gt; b) -&gt; s -&gt; t
</span><span class="hs-identifier hs-var">L.over</span></span><span>
</span><span id="line-287"></span><span>    </span><span class="hs-special">(</span><span class="annot"><span class="annottext">(Params -&gt; Identity Params)
-&gt; OpenAPIPetstoreRequest req contentType res accept
-&gt; Identity (OpenAPIPetstoreRequest req contentType res accept)
forall req contentType res accept (f :: * -&gt; *).
Functor f =&gt;
(Params -&gt; f Params)
-&gt; OpenAPIPetstoreRequest req contentType res accept
-&gt; f (OpenAPIPetstoreRequest req contentType res accept)
</span><a href="OpenAPIPetstore.Core.html#rParamsL"><span class="hs-identifier hs-var">rParamsL</span></a></span><span> </span><span class="annot"><span class="annottext">((Params -&gt; Identity Params)
 -&gt; OpenAPIPetstoreRequest req contentType res accept
 -&gt; Identity (OpenAPIPetstoreRequest req contentType res accept))
-&gt; ((Query -&gt; Identity Query) -&gt; Params -&gt; Identity Params)
-&gt; ASetter
     (OpenAPIPetstoreRequest req contentType res accept)
     (OpenAPIPetstoreRequest req contentType res accept)
     Query
     Query
forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">(Query -&gt; Identity Query) -&gt; Params -&gt; Identity Params
Lens_' Params Query
</span><a href="OpenAPIPetstore.Core.html#paramsQueryL"><span class="hs-identifier hs-var">paramsQueryL</span></a></span><span class="hs-special">)</span><span>
</span><span id="line-288"></span><span>    </span><span class="hs-special">(</span><span class="annot"><span class="annottext">((ByteString, Maybe ByteString) -&gt; Bool) -&gt; Query -&gt; Query
forall a. (a -&gt; Bool) -&gt; [a] -&gt; [a]
</span><span class="hs-identifier hs-var">P.filter</span></span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span id="local-6989586621679155986"><span class="annot"><span class="annottext">(ByteString, Maybe ByteString)
</span><a href="#local-6989586621679155986"><span class="hs-identifier hs-var">q</span></a></span></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">(ByteString, Maybe ByteString) -&gt; HeaderName
forall {b}. (ByteString, b) -&gt; HeaderName
</span><a href="#local-6989586621679155987"><span class="hs-identifier hs-var">cifst</span></a></span><span> </span><span class="annot"><span class="annottext">(ByteString, Maybe ByteString)
</span><a href="#local-6989586621679155986"><span class="hs-identifier hs-var">q</span></a></span><span> </span><span class="annot"><span class="annottext">HeaderName -&gt; [HeaderName] -&gt; Bool
forall (t :: * -&gt; *) a. (Foldable t, Eq a) =&gt; a -&gt; t a -&gt; Bool
</span><span class="hs-operator hs-var">`P.notElem`</span></span><span> </span><span class="annot"><span class="annottext">((ByteString, Maybe ByteString) -&gt; HeaderName)
-&gt; Query -&gt; [HeaderName]
forall a b. (a -&gt; b) -&gt; [a] -&gt; [b]
forall (f :: * -&gt; *) a b. Functor f =&gt; (a -&gt; b) -&gt; f a -&gt; f b
</span><span class="hs-identifier hs-var">P.fmap</span></span><span> </span><span class="annot"><span class="annottext">(ByteString, Maybe ByteString) -&gt; HeaderName
forall {b}. (ByteString, b) -&gt; HeaderName
</span><a href="#local-6989586621679155987"><span class="hs-identifier hs-var">cifst</span></a></span><span> </span><span class="annot"><span class="annottext">Query
</span><a href="#local-6989586621679155985"><span class="hs-identifier hs-var">query</span></a></span><span class="hs-special">)</span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest req contentType res accept
-&gt; (OpenAPIPetstoreRequest req contentType res accept
    -&gt; OpenAPIPetstoreRequest req contentType res accept)
-&gt; OpenAPIPetstoreRequest req contentType res accept
forall a b. a -&gt; (a -&gt; b) -&gt; b
</span><span class="hs-operator hs-var">&amp;</span></span><span>
</span><span id="line-289"></span><span>  </span><span class="hs-special">(</span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest req contentType res accept
-&gt; Query -&gt; OpenAPIPetstoreRequest req contentType res accept
forall req contentType res accept.
OpenAPIPetstoreRequest req contentType res accept
-&gt; Query -&gt; OpenAPIPetstoreRequest req contentType res accept
</span><a href="OpenAPIPetstore.Core.html#addQuery"><span class="hs-operator hs-var">`addQuery`</span></a></span><span> </span><span class="annot"><span class="annottext">Query
</span><a href="#local-6989586621679155985"><span class="hs-identifier hs-var">query</span></a></span><span class="hs-special">)</span><span>
</span><span id="line-290"></span><span>  </span><span class="hs-keyword">where</span><span>
</span><span id="line-291"></span><span>    </span><span id="local-6989586621679155987"><span class="annot"><span class="annottext">cifst :: (ByteString, b) -&gt; HeaderName
</span><a href="#local-6989586621679155987"><span class="hs-identifier hs-var hs-var">cifst</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">ByteString -&gt; HeaderName
forall s. FoldCase s =&gt; s -&gt; CI s
</span><span class="hs-identifier hs-var">CI.mk</span></span><span> </span><span class="annot"><span class="annottext">(ByteString -&gt; HeaderName)
-&gt; ((ByteString, b) -&gt; ByteString) -&gt; (ByteString, b) -&gt; HeaderName
forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">(ByteString, b) -&gt; ByteString
forall a b. (a, b) -&gt; a
</span><span class="hs-identifier hs-var">P.fst</span></span><span>
</span><span id="line-292"></span><span>
</span><span id="line-293"></span><span id="local-6989586621679155990"><span id="local-6989586621679155991"><span id="local-6989586621679155992"><span id="local-6989586621679155993"><span class="annot"><a href="OpenAPIPetstore.Core.html#addQuery"><span class="hs-identifier hs-type">addQuery</span></a></span><span> </span><span class="hs-glyph">::</span><span>
</span><span id="line-294"></span><span>     </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155990"><span class="hs-identifier hs-type">req</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155991"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155992"><span class="hs-identifier hs-type">res</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155993"><span class="hs-identifier hs-type">accept</span></a></span><span>
</span><span id="line-295"></span><span>  </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-special">[</span><span class="annot"><span class="hs-identifier hs-type">NH.QueryItem</span></span><span class="hs-special">]</span><span>
</span><span id="line-296"></span><span>  </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155990"><span class="hs-identifier hs-type">req</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155991"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155992"><span class="hs-identifier hs-type">res</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155993"><span class="hs-identifier hs-type">accept</span></a></span></span></span></span></span><span>
</span><span id="line-297"></span><span id="addQuery"><span class="annot"><span class="annottext">addQuery :: forall req contentType res accept.
OpenAPIPetstoreRequest req contentType res accept
-&gt; Query -&gt; OpenAPIPetstoreRequest req contentType res accept
</span><a href="OpenAPIPetstore.Core.html#addQuery"><span class="hs-identifier hs-var hs-var">addQuery</span></a></span></span><span> </span><span id="local-6989586621679155996"><span class="annot"><span class="annottext">OpenAPIPetstoreRequest req contentType res accept
</span><a href="#local-6989586621679155996"><span class="hs-identifier hs-var">req</span></a></span></span><span> </span><span id="local-6989586621679155997"><span class="annot"><span class="annottext">Query
</span><a href="#local-6989586621679155997"><span class="hs-identifier hs-var">query</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest req contentType res accept
</span><a href="#local-6989586621679155996"><span class="hs-identifier hs-var">req</span></a></span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest req contentType res accept
-&gt; (OpenAPIPetstoreRequest req contentType res accept
    -&gt; OpenAPIPetstoreRequest req contentType res accept)
-&gt; OpenAPIPetstoreRequest req contentType res accept
forall a b. a -&gt; (a -&gt; b) -&gt; b
</span><span class="hs-operator hs-var">&amp;</span></span><span> </span><span class="annot"><span class="annottext">ASetter
  (OpenAPIPetstoreRequest req contentType res accept)
  (OpenAPIPetstoreRequest req contentType res accept)
  Query
  Query
-&gt; (Query -&gt; Query)
-&gt; OpenAPIPetstoreRequest req contentType res accept
-&gt; OpenAPIPetstoreRequest req contentType res accept
forall s t a b. ASetter s t a b -&gt; (a -&gt; b) -&gt; s -&gt; t
</span><span class="hs-identifier hs-var">L.over</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">(Params -&gt; Identity Params)
-&gt; OpenAPIPetstoreRequest req contentType res accept
-&gt; Identity (OpenAPIPetstoreRequest req contentType res accept)
forall req contentType res accept (f :: * -&gt; *).
Functor f =&gt;
(Params -&gt; f Params)
-&gt; OpenAPIPetstoreRequest req contentType res accept
-&gt; f (OpenAPIPetstoreRequest req contentType res accept)
</span><a href="OpenAPIPetstore.Core.html#rParamsL"><span class="hs-identifier hs-var">rParamsL</span></a></span><span> </span><span class="annot"><span class="annottext">((Params -&gt; Identity Params)
 -&gt; OpenAPIPetstoreRequest req contentType res accept
 -&gt; Identity (OpenAPIPetstoreRequest req contentType res accept))
-&gt; ((Query -&gt; Identity Query) -&gt; Params -&gt; Identity Params)
-&gt; ASetter
     (OpenAPIPetstoreRequest req contentType res accept)
     (OpenAPIPetstoreRequest req contentType res accept)
     Query
     Query
forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">(Query -&gt; Identity Query) -&gt; Params -&gt; Identity Params
Lens_' Params Query
</span><a href="OpenAPIPetstore.Core.html#paramsQueryL"><span class="hs-identifier hs-var">paramsQueryL</span></a></span><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Query
</span><a href="#local-6989586621679155997"><span class="hs-identifier hs-var">query</span></a></span><span> </span><span class="annot"><span class="annottext">Query -&gt; Query -&gt; Query
forall a. [a] -&gt; [a] -&gt; [a]
</span><span class="hs-operator hs-var">P.++</span></span><span class="hs-special">)</span><span>
</span><span id="line-298"></span><span>
</span><span id="line-299"></span><span id="local-6989586621679155282"><span id="local-6989586621679155283"><span id="local-6989586621679155284"><span id="local-6989586621679155285"><span class="annot"><a href="OpenAPIPetstore.Core.html#addForm"><span class="hs-identifier hs-type">addForm</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155282"><span class="hs-identifier hs-type">req</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155283"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155284"><span class="hs-identifier hs-type">res</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155285"><span class="hs-identifier hs-type">accept</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="hs-identifier hs-type">WH.Form</span></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155282"><span class="hs-identifier hs-type">req</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155283"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155284"><span class="hs-identifier hs-type">res</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155285"><span class="hs-identifier hs-type">accept</span></a></span></span></span></span></span><span>
</span><span id="line-300"></span><span id="addForm"><span class="annot"><span class="annottext">addForm :: forall req contentType res accept.
OpenAPIPetstoreRequest req contentType res accept
-&gt; Form -&gt; OpenAPIPetstoreRequest req contentType res accept
</span><a href="OpenAPIPetstore.Core.html#addForm"><span class="hs-identifier hs-var hs-var">addForm</span></a></span></span><span> </span><span id="local-6989586621679156005"><span class="annot"><span class="annottext">OpenAPIPetstoreRequest req contentType res accept
</span><a href="#local-6989586621679156005"><span class="hs-identifier hs-var">req</span></a></span></span><span> </span><span id="local-6989586621679156006"><span class="annot"><span class="annottext">Form
</span><a href="#local-6989586621679156006"><span class="hs-identifier hs-var">newform</span></a></span></span><span> </span><span class="hs-glyph">=</span><span>
</span><span id="line-301"></span><span>    </span><span class="hs-keyword">let</span><span> </span><span id="local-6989586621679156007"><span class="annot"><span class="annottext">form :: Form
</span><a href="#local-6989586621679156007"><span class="hs-identifier hs-var hs-var">form</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">case</span><span> </span><span class="annot"><span class="annottext">Params -&gt; ParamBody
</span><a href="OpenAPIPetstore.Core.html#paramsBody"><span class="hs-identifier hs-var">paramsBody</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest req contentType res accept -&gt; Params
forall req contentType res accept.
OpenAPIPetstoreRequest req contentType res accept -&gt; Params
</span><a href="OpenAPIPetstore.Core.html#rParams"><span class="hs-identifier hs-var">rParams</span></a></span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest req contentType res accept
</span><a href="#local-6989586621679156005"><span class="hs-identifier hs-var">req</span></a></span><span class="hs-special">)</span><span> </span><span class="hs-keyword">of</span><span>
</span><span id="line-302"></span><span>            </span><span class="annot"><a href="OpenAPIPetstore.Core.html#ParamBodyFormUrlEncoded"><span class="hs-identifier hs-type">ParamBodyFormUrlEncoded</span></a></span><span> </span><span id="local-6989586621679156008"><span class="annot"><span class="annottext">Form
</span><a href="#local-6989586621679156008"><span class="hs-identifier hs-var">_form</span></a></span></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">Form
</span><a href="#local-6989586621679156008"><span class="hs-identifier hs-var">_form</span></a></span><span>
</span><span id="line-303"></span><span>            </span><span class="annot"><span class="annottext">ParamBody
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">Form
forall a. Monoid a =&gt; a
</span><span class="hs-identifier hs-var">mempty</span></span><span>
</span><span id="line-304"></span><span>    </span><span class="hs-keyword">in</span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest req contentType res accept
</span><a href="#local-6989586621679156005"><span class="hs-identifier hs-var">req</span></a></span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest req contentType res accept
-&gt; (OpenAPIPetstoreRequest req contentType res accept
    -&gt; OpenAPIPetstoreRequest req contentType res accept)
-&gt; OpenAPIPetstoreRequest req contentType res accept
forall a b. a -&gt; (a -&gt; b) -&gt; b
</span><span class="hs-operator hs-var">&amp;</span></span><span> </span><span class="annot"><span class="annottext">ASetter
  (OpenAPIPetstoreRequest req contentType res accept)
  (OpenAPIPetstoreRequest req contentType res accept)
  ParamBody
  ParamBody
-&gt; ParamBody
-&gt; OpenAPIPetstoreRequest req contentType res accept
-&gt; OpenAPIPetstoreRequest req contentType res accept
forall s t a b. ASetter s t a b -&gt; b -&gt; s -&gt; t
</span><span class="hs-identifier hs-var">L.set</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">(Params -&gt; Identity Params)
-&gt; OpenAPIPetstoreRequest req contentType res accept
-&gt; Identity (OpenAPIPetstoreRequest req contentType res accept)
forall req contentType res accept (f :: * -&gt; *).
Functor f =&gt;
(Params -&gt; f Params)
-&gt; OpenAPIPetstoreRequest req contentType res accept
-&gt; f (OpenAPIPetstoreRequest req contentType res accept)
</span><a href="OpenAPIPetstore.Core.html#rParamsL"><span class="hs-identifier hs-var">rParamsL</span></a></span><span> </span><span class="annot"><span class="annottext">((Params -&gt; Identity Params)
 -&gt; OpenAPIPetstoreRequest req contentType res accept
 -&gt; Identity (OpenAPIPetstoreRequest req contentType res accept))
-&gt; ((ParamBody -&gt; Identity ParamBody) -&gt; Params -&gt; Identity Params)
-&gt; ASetter
     (OpenAPIPetstoreRequest req contentType res accept)
     (OpenAPIPetstoreRequest req contentType res accept)
     ParamBody
     ParamBody
forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">(ParamBody -&gt; Identity ParamBody) -&gt; Params -&gt; Identity Params
Lens_' Params ParamBody
</span><a href="OpenAPIPetstore.Core.html#paramsBodyL"><span class="hs-identifier hs-var">paramsBodyL</span></a></span><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Form -&gt; ParamBody
</span><a href="OpenAPIPetstore.Core.html#ParamBodyFormUrlEncoded"><span class="hs-identifier hs-var">ParamBodyFormUrlEncoded</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Form
</span><a href="#local-6989586621679156006"><span class="hs-identifier hs-var">newform</span></a></span><span> </span><span class="annot"><span class="annottext">Form -&gt; Form -&gt; Form
forall a. Semigroup a =&gt; a -&gt; a -&gt; a
</span><span class="hs-operator hs-var">&lt;&gt;</span></span><span> </span><span class="annot"><span class="annottext">Form
</span><a href="#local-6989586621679156007"><span class="hs-identifier hs-var">form</span></a></span><span class="hs-special">)</span><span class="hs-special">)</span><span>
</span><span id="line-305"></span><span>
</span><span id="line-306"></span><span id="local-6989586621679155296"><span id="local-6989586621679155297"><span id="local-6989586621679155298"><span id="local-6989586621679155299"><span class="annot"><a href="OpenAPIPetstore.Core.html#_addMultiFormPart"><span class="hs-identifier hs-type">_addMultiFormPart</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155296"><span class="hs-identifier hs-type">req</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155297"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155298"><span class="hs-identifier hs-type">res</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155299"><span class="hs-identifier hs-type">accept</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="hs-identifier hs-type">NH.Part</span></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155296"><span class="hs-identifier hs-type">req</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155297"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155298"><span class="hs-identifier hs-type">res</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155299"><span class="hs-identifier hs-type">accept</span></a></span></span></span></span></span><span>
</span><span id="line-307"></span><span id="_addMultiFormPart"><span class="annot"><span class="annottext">_addMultiFormPart :: forall req contentType res accept.
OpenAPIPetstoreRequest req contentType res accept
-&gt; Part -&gt; OpenAPIPetstoreRequest req contentType res accept
</span><a href="OpenAPIPetstore.Core.html#_addMultiFormPart"><span class="hs-identifier hs-var hs-var">_addMultiFormPart</span></a></span></span><span> </span><span id="local-6989586621679156013"><span class="annot"><span class="annottext">OpenAPIPetstoreRequest req contentType res accept
</span><a href="#local-6989586621679156013"><span class="hs-identifier hs-var">req</span></a></span></span><span> </span><span id="local-6989586621679156014"><span class="annot"><span class="annottext">Part
</span><a href="#local-6989586621679156014"><span class="hs-identifier hs-var">newpart</span></a></span></span><span> </span><span class="hs-glyph">=</span><span>
</span><span id="line-308"></span><span>    </span><span class="hs-keyword">let</span><span> </span><span id="local-6989586621679156015"><span class="annot"><span class="annottext">parts :: [Part]
</span><a href="#local-6989586621679156015"><span class="hs-identifier hs-var hs-var">parts</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">case</span><span> </span><span class="annot"><span class="annottext">Params -&gt; ParamBody
</span><a href="OpenAPIPetstore.Core.html#paramsBody"><span class="hs-identifier hs-var">paramsBody</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest req contentType res accept -&gt; Params
forall req contentType res accept.
OpenAPIPetstoreRequest req contentType res accept -&gt; Params
</span><a href="OpenAPIPetstore.Core.html#rParams"><span class="hs-identifier hs-var">rParams</span></a></span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest req contentType res accept
</span><a href="#local-6989586621679156013"><span class="hs-identifier hs-var">req</span></a></span><span class="hs-special">)</span><span> </span><span class="hs-keyword">of</span><span>
</span><span id="line-309"></span><span>            </span><span class="annot"><a href="OpenAPIPetstore.Core.html#ParamBodyMultipartFormData"><span class="hs-identifier hs-type">ParamBodyMultipartFormData</span></a></span><span> </span><span id="local-6989586621679156016"><span class="annot"><span class="annottext">[Part]
</span><a href="#local-6989586621679156016"><span class="hs-identifier hs-var">_parts</span></a></span></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">[Part]
</span><a href="#local-6989586621679156016"><span class="hs-identifier hs-var">_parts</span></a></span><span>
</span><span id="line-310"></span><span>            </span><span class="annot"><span class="annottext">ParamBody
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-special">[</span><span class="hs-special">]</span><span>
</span><span id="line-311"></span><span>    </span><span class="hs-keyword">in</span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest req contentType res accept
</span><a href="#local-6989586621679156013"><span class="hs-identifier hs-var">req</span></a></span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest req contentType res accept
-&gt; (OpenAPIPetstoreRequest req contentType res accept
    -&gt; OpenAPIPetstoreRequest req contentType res accept)
-&gt; OpenAPIPetstoreRequest req contentType res accept
forall a b. a -&gt; (a -&gt; b) -&gt; b
</span><span class="hs-operator hs-var">&amp;</span></span><span> </span><span class="annot"><span class="annottext">ASetter
  (OpenAPIPetstoreRequest req contentType res accept)
  (OpenAPIPetstoreRequest req contentType res accept)
  ParamBody
  ParamBody
-&gt; ParamBody
-&gt; OpenAPIPetstoreRequest req contentType res accept
-&gt; OpenAPIPetstoreRequest req contentType res accept
forall s t a b. ASetter s t a b -&gt; b -&gt; s -&gt; t
</span><span class="hs-identifier hs-var">L.set</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">(Params -&gt; Identity Params)
-&gt; OpenAPIPetstoreRequest req contentType res accept
-&gt; Identity (OpenAPIPetstoreRequest req contentType res accept)
forall req contentType res accept (f :: * -&gt; *).
Functor f =&gt;
(Params -&gt; f Params)
-&gt; OpenAPIPetstoreRequest req contentType res accept
-&gt; f (OpenAPIPetstoreRequest req contentType res accept)
</span><a href="OpenAPIPetstore.Core.html#rParamsL"><span class="hs-identifier hs-var">rParamsL</span></a></span><span> </span><span class="annot"><span class="annottext">((Params -&gt; Identity Params)
 -&gt; OpenAPIPetstoreRequest req contentType res accept
 -&gt; Identity (OpenAPIPetstoreRequest req contentType res accept))
-&gt; ((ParamBody -&gt; Identity ParamBody) -&gt; Params -&gt; Identity Params)
-&gt; ASetter
     (OpenAPIPetstoreRequest req contentType res accept)
     (OpenAPIPetstoreRequest req contentType res accept)
     ParamBody
     ParamBody
forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">(ParamBody -&gt; Identity ParamBody) -&gt; Params -&gt; Identity Params
Lens_' Params ParamBody
</span><a href="OpenAPIPetstore.Core.html#paramsBodyL"><span class="hs-identifier hs-var">paramsBodyL</span></a></span><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">[Part] -&gt; ParamBody
</span><a href="OpenAPIPetstore.Core.html#ParamBodyMultipartFormData"><span class="hs-identifier hs-var">ParamBodyMultipartFormData</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Part
</span><a href="#local-6989586621679156014"><span class="hs-identifier hs-var">newpart</span></a></span><span> </span><span class="annot"><span class="annottext">Part -&gt; [Part] -&gt; [Part]
forall a. a -&gt; [a] -&gt; [a]
</span><span class="hs-glyph hs-var">:</span></span><span> </span><span class="annot"><span class="annottext">[Part]
</span><a href="#local-6989586621679156015"><span class="hs-identifier hs-var">parts</span></a></span><span class="hs-special">)</span><span class="hs-special">)</span><span>
</span><span id="line-312"></span><span>
</span><span id="line-313"></span><span id="local-6989586621679155304"><span id="local-6989586621679155305"><span id="local-6989586621679155306"><span id="local-6989586621679155307"><span class="annot"><a href="OpenAPIPetstore.Core.html#_setBodyBS"><span class="hs-identifier hs-type">_setBodyBS</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155304"><span class="hs-identifier hs-type">req</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155305"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155306"><span class="hs-identifier hs-type">res</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155307"><span class="hs-identifier hs-type">accept</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="hs-identifier hs-type">B.ByteString</span></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155304"><span class="hs-identifier hs-type">req</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155305"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155306"><span class="hs-identifier hs-type">res</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155307"><span class="hs-identifier hs-type">accept</span></a></span></span></span></span></span><span>
</span><span id="line-314"></span><span id="_setBodyBS"><span class="annot"><span class="annottext">_setBodyBS :: forall req contentType res accept.
OpenAPIPetstoreRequest req contentType res accept
-&gt; ByteString -&gt; OpenAPIPetstoreRequest req contentType res accept
</span><a href="OpenAPIPetstore.Core.html#_setBodyBS"><span class="hs-identifier hs-var hs-var">_setBodyBS</span></a></span></span><span> </span><span id="local-6989586621679156020"><span class="annot"><span class="annottext">OpenAPIPetstoreRequest req contentType res accept
</span><a href="#local-6989586621679156020"><span class="hs-identifier hs-var">req</span></a></span></span><span> </span><span id="local-6989586621679156021"><span class="annot"><span class="annottext">ByteString
</span><a href="#local-6989586621679156021"><span class="hs-identifier hs-var">body</span></a></span></span><span> </span><span class="hs-glyph">=</span><span>
</span><span id="line-315"></span><span>    </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest req contentType res accept
</span><a href="#local-6989586621679156020"><span class="hs-identifier hs-var">req</span></a></span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest req contentType res accept
-&gt; (OpenAPIPetstoreRequest req contentType res accept
    -&gt; OpenAPIPetstoreRequest req contentType res accept)
-&gt; OpenAPIPetstoreRequest req contentType res accept
forall a b. a -&gt; (a -&gt; b) -&gt; b
</span><span class="hs-operator hs-var">&amp;</span></span><span> </span><span class="annot"><span class="annottext">ASetter
  (OpenAPIPetstoreRequest req contentType res accept)
  (OpenAPIPetstoreRequest req contentType res accept)
  ParamBody
  ParamBody
-&gt; ParamBody
-&gt; OpenAPIPetstoreRequest req contentType res accept
-&gt; OpenAPIPetstoreRequest req contentType res accept
forall s t a b. ASetter s t a b -&gt; b -&gt; s -&gt; t
</span><span class="hs-identifier hs-var">L.set</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">(Params -&gt; Identity Params)
-&gt; OpenAPIPetstoreRequest req contentType res accept
-&gt; Identity (OpenAPIPetstoreRequest req contentType res accept)
forall req contentType res accept (f :: * -&gt; *).
Functor f =&gt;
(Params -&gt; f Params)
-&gt; OpenAPIPetstoreRequest req contentType res accept
-&gt; f (OpenAPIPetstoreRequest req contentType res accept)
</span><a href="OpenAPIPetstore.Core.html#rParamsL"><span class="hs-identifier hs-var">rParamsL</span></a></span><span> </span><span class="annot"><span class="annottext">((Params -&gt; Identity Params)
 -&gt; OpenAPIPetstoreRequest req contentType res accept
 -&gt; Identity (OpenAPIPetstoreRequest req contentType res accept))
-&gt; ((ParamBody -&gt; Identity ParamBody) -&gt; Params -&gt; Identity Params)
-&gt; ASetter
     (OpenAPIPetstoreRequest req contentType res accept)
     (OpenAPIPetstoreRequest req contentType res accept)
     ParamBody
     ParamBody
forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">(ParamBody -&gt; Identity ParamBody) -&gt; Params -&gt; Identity Params
Lens_' Params ParamBody
</span><a href="OpenAPIPetstore.Core.html#paramsBodyL"><span class="hs-identifier hs-var">paramsBodyL</span></a></span><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">ByteString -&gt; ParamBody
</span><a href="OpenAPIPetstore.Core.html#ParamBodyB"><span class="hs-identifier hs-var">ParamBodyB</span></a></span><span> </span><span class="annot"><span class="annottext">ByteString
</span><a href="#local-6989586621679156021"><span class="hs-identifier hs-var">body</span></a></span><span class="hs-special">)</span><span>
</span><span id="line-316"></span><span>
</span><span id="line-317"></span><span id="local-6989586621679155159"><span id="local-6989586621679155160"><span id="local-6989586621679155161"><span id="local-6989586621679155162"><span class="annot"><a href="OpenAPIPetstore.Core.html#_setBodyLBS"><span class="hs-identifier hs-type">_setBodyLBS</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155159"><span class="hs-identifier hs-type">req</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155160"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155161"><span class="hs-identifier hs-type">res</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155162"><span class="hs-identifier hs-type">accept</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="hs-identifier hs-type">BL.ByteString</span></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155159"><span class="hs-identifier hs-type">req</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155160"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155161"><span class="hs-identifier hs-type">res</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155162"><span class="hs-identifier hs-type">accept</span></a></span></span></span></span></span><span>
</span><span id="line-318"></span><span id="_setBodyLBS"><span class="annot"><span class="annottext">_setBodyLBS :: forall req contentType res accept.
OpenAPIPetstoreRequest req contentType res accept
-&gt; ByteString -&gt; OpenAPIPetstoreRequest req contentType res accept
</span><a href="OpenAPIPetstore.Core.html#_setBodyLBS"><span class="hs-identifier hs-var hs-var">_setBodyLBS</span></a></span></span><span> </span><span id="local-6989586621679156024"><span class="annot"><span class="annottext">OpenAPIPetstoreRequest req contentType res accept
</span><a href="#local-6989586621679156024"><span class="hs-identifier hs-var">req</span></a></span></span><span> </span><span id="local-6989586621679156025"><span class="annot"><span class="annottext">ByteString
</span><a href="#local-6989586621679156025"><span class="hs-identifier hs-var">body</span></a></span></span><span> </span><span class="hs-glyph">=</span><span>
</span><span id="line-319"></span><span>    </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest req contentType res accept
</span><a href="#local-6989586621679156024"><span class="hs-identifier hs-var">req</span></a></span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest req contentType res accept
-&gt; (OpenAPIPetstoreRequest req contentType res accept
    -&gt; OpenAPIPetstoreRequest req contentType res accept)
-&gt; OpenAPIPetstoreRequest req contentType res accept
forall a b. a -&gt; (a -&gt; b) -&gt; b
</span><span class="hs-operator hs-var">&amp;</span></span><span> </span><span class="annot"><span class="annottext">ASetter
  (OpenAPIPetstoreRequest req contentType res accept)
  (OpenAPIPetstoreRequest req contentType res accept)
  ParamBody
  ParamBody
-&gt; ParamBody
-&gt; OpenAPIPetstoreRequest req contentType res accept
-&gt; OpenAPIPetstoreRequest req contentType res accept
forall s t a b. ASetter s t a b -&gt; b -&gt; s -&gt; t
</span><span class="hs-identifier hs-var">L.set</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">(Params -&gt; Identity Params)
-&gt; OpenAPIPetstoreRequest req contentType res accept
-&gt; Identity (OpenAPIPetstoreRequest req contentType res accept)
forall req contentType res accept (f :: * -&gt; *).
Functor f =&gt;
(Params -&gt; f Params)
-&gt; OpenAPIPetstoreRequest req contentType res accept
-&gt; f (OpenAPIPetstoreRequest req contentType res accept)
</span><a href="OpenAPIPetstore.Core.html#rParamsL"><span class="hs-identifier hs-var">rParamsL</span></a></span><span> </span><span class="annot"><span class="annottext">((Params -&gt; Identity Params)
 -&gt; OpenAPIPetstoreRequest req contentType res accept
 -&gt; Identity (OpenAPIPetstoreRequest req contentType res accept))
-&gt; ((ParamBody -&gt; Identity ParamBody) -&gt; Params -&gt; Identity Params)
-&gt; ASetter
     (OpenAPIPetstoreRequest req contentType res accept)
     (OpenAPIPetstoreRequest req contentType res accept)
     ParamBody
     ParamBody
forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">(ParamBody -&gt; Identity ParamBody) -&gt; Params -&gt; Identity Params
Lens_' Params ParamBody
</span><a href="OpenAPIPetstore.Core.html#paramsBodyL"><span class="hs-identifier hs-var">paramsBodyL</span></a></span><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">ByteString -&gt; ParamBody
</span><a href="OpenAPIPetstore.Core.html#ParamBodyBL"><span class="hs-identifier hs-var">ParamBodyBL</span></a></span><span> </span><span class="annot"><span class="annottext">ByteString
</span><a href="#local-6989586621679156025"><span class="hs-identifier hs-var">body</span></a></span><span class="hs-special">)</span><span>
</span><span id="line-320"></span><span>
</span><span id="line-321"></span><span id="local-6989586621679155316"><span id="local-6989586621679155317"><span id="local-6989586621679155318"><span id="local-6989586621679155319"><span id="local-6989586621679155320"><span class="annot"><a href="OpenAPIPetstore.Core.html#_hasAuthType"><span class="hs-identifier hs-type">_hasAuthType</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#AuthMethod"><span class="hs-identifier hs-type">AuthMethod</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155316"><span class="hs-identifier hs-type">authMethod</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155317"><span class="hs-identifier hs-type">req</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155318"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155319"><span class="hs-identifier hs-type">res</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155320"><span class="hs-identifier hs-type">accept</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="hs-identifier hs-type">P.Proxy</span></span><span> </span><span class="annot"><a href="#local-6989586621679155316"><span class="hs-identifier hs-type">authMethod</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155317"><span class="hs-identifier hs-type">req</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155318"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155319"><span class="hs-identifier hs-type">res</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155320"><span class="hs-identifier hs-type">accept</span></a></span></span></span></span></span></span><span>
</span><span id="line-322"></span><span id="_hasAuthType"><span class="annot"><span class="annottext">_hasAuthType :: forall authMethod req contentType res accept.
AuthMethod authMethod =&gt;
OpenAPIPetstoreRequest req contentType res accept
-&gt; Proxy authMethod
-&gt; OpenAPIPetstoreRequest req contentType res accept
</span><a href="OpenAPIPetstore.Core.html#_hasAuthType"><span class="hs-identifier hs-var hs-var">_hasAuthType</span></a></span></span><span> </span><span id="local-6989586621679156032"><span class="annot"><span class="annottext">OpenAPIPetstoreRequest req contentType res accept
</span><a href="#local-6989586621679156032"><span class="hs-identifier hs-var">req</span></a></span></span><span> </span><span id="local-6989586621679156033"><span class="annot"><span class="annottext">Proxy authMethod
</span><a href="#local-6989586621679156033"><span class="hs-identifier hs-var">proxy</span></a></span></span><span> </span><span class="hs-glyph">=</span><span>
</span><span id="line-323"></span><span>  </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest req contentType res accept
</span><a href="#local-6989586621679156032"><span class="hs-identifier hs-var">req</span></a></span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest req contentType res accept
-&gt; (OpenAPIPetstoreRequest req contentType res accept
    -&gt; OpenAPIPetstoreRequest req contentType res accept)
-&gt; OpenAPIPetstoreRequest req contentType res accept
forall a b. a -&gt; (a -&gt; b) -&gt; b
</span><span class="hs-operator hs-var">&amp;</span></span><span> </span><span class="annot"><span class="annottext">ASetter
  (OpenAPIPetstoreRequest req contentType res accept)
  (OpenAPIPetstoreRequest req contentType res accept)
  [TypeRep]
  [TypeRep]
-&gt; ([TypeRep] -&gt; [TypeRep])
-&gt; OpenAPIPetstoreRequest req contentType res accept
-&gt; OpenAPIPetstoreRequest req contentType res accept
forall s t a b. ASetter s t a b -&gt; (a -&gt; b) -&gt; s -&gt; t
</span><span class="hs-identifier hs-var">L.over</span></span><span> </span><span class="annot"><span class="annottext">ASetter
  (OpenAPIPetstoreRequest req contentType res accept)
  (OpenAPIPetstoreRequest req contentType res accept)
  [TypeRep]
  [TypeRep]
forall req contentType res accept (f :: * -&gt; *).
Functor f =&gt;
([TypeRep] -&gt; f [TypeRep])
-&gt; OpenAPIPetstoreRequest req contentType res accept
-&gt; f (OpenAPIPetstoreRequest req contentType res accept)
</span><a href="OpenAPIPetstore.Core.html#rAuthTypesL"><span class="hs-identifier hs-var">rAuthTypesL</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Proxy authMethod -&gt; TypeRep
forall {k} (proxy :: k -&gt; *) (a :: k).
Typeable a =&gt;
proxy a -&gt; TypeRep
</span><span class="hs-identifier hs-var">P.typeRep</span></span><span> </span><span class="annot"><span class="annottext">Proxy authMethod
</span><a href="#local-6989586621679156033"><span class="hs-identifier hs-var">proxy</span></a></span><span> </span><span class="annot"><span class="annottext">TypeRep -&gt; [TypeRep] -&gt; [TypeRep]
forall a. a -&gt; [a] -&gt; [a]
</span><span class="hs-glyph hs-var">:</span></span><span class="hs-special">)</span><span>
</span><span id="line-324"></span><span>
</span><span id="line-325"></span><span class="annot"><span class="hs-comment">-- ** Params Utils</span></span><span>
</span><span id="line-326"></span><span>
</span><span id="line-327"></span><span id="local-6989586621679155330"><span class="annot"><a href="OpenAPIPetstore.Core.html#toPath"><span class="hs-identifier hs-type">toPath</span></a></span><span>
</span><span id="line-328"></span><span>  </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">WH.ToHttpApiData</span></span><span> </span><span class="annot"><a href="#local-6989586621679155330"><span class="hs-identifier hs-type">a</span></a></span><span>
</span><span id="line-329"></span><span>  </span><span class="hs-glyph">=&gt;</span><span> </span><span class="annot"><a href="#local-6989586621679155330"><span class="hs-identifier hs-type">a</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="hs-identifier hs-type">BCL.ByteString</span></span></span><span>
</span><span id="line-330"></span><span id="toPath"><span class="annot"><span class="annottext">toPath :: forall a. ToHttpApiData a =&gt; a -&gt; ByteString
</span><a href="OpenAPIPetstore.Core.html#toPath"><span class="hs-identifier hs-var hs-var">toPath</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Builder -&gt; ByteString
</span><span class="hs-identifier hs-var">BB.toLazyByteString</span></span><span> </span><span class="annot"><span class="annottext">(Builder -&gt; ByteString) -&gt; (a -&gt; Builder) -&gt; a -&gt; ByteString
forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">a -&gt; Builder
forall a. ToHttpApiData a =&gt; a -&gt; Builder
</span><span class="hs-identifier hs-var">WH.toEncodedUrlPiece</span></span><span>
</span><span id="line-331"></span><span>
</span><span id="line-332"></span><span id="local-6989586621679155335"><span class="annot"><a href="OpenAPIPetstore.Core.html#toHeader"><span class="hs-identifier hs-type">toHeader</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">WH.ToHttpApiData</span></span><span> </span><span class="annot"><a href="#local-6989586621679155335"><span class="hs-identifier hs-type">a</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">NH.HeaderName</span></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="#local-6989586621679155335"><span class="hs-identifier hs-type">a</span></a></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-special">[</span><span class="annot"><span class="hs-identifier hs-type">NH.Header</span></span><span class="hs-special">]</span></span><span>
</span><span id="line-333"></span><span id="toHeader"><span class="annot"><span class="annottext">toHeader :: forall a. ToHttpApiData a =&gt; (HeaderName, a) -&gt; RequestHeaders
</span><a href="OpenAPIPetstore.Core.html#toHeader"><span class="hs-identifier hs-var hs-var">toHeader</span></a></span></span><span> </span><span id="local-6989586621679156044"><span class="annot"><span class="annottext">(HeaderName, a)
</span><a href="#local-6989586621679156044"><span class="hs-identifier hs-var">x</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">[</span><span class="annot"><span class="annottext">(a -&gt; ByteString) -&gt; (HeaderName, a) -&gt; (HeaderName, ByteString)
forall a b. (a -&gt; b) -&gt; (HeaderName, a) -&gt; (HeaderName, b)
forall (f :: * -&gt; *) a b. Functor f =&gt; (a -&gt; b) -&gt; f a -&gt; f b
</span><span class="hs-identifier hs-var">fmap</span></span><span> </span><span class="annot"><span class="annottext">a -&gt; ByteString
forall a. ToHttpApiData a =&gt; a -&gt; ByteString
</span><span class="hs-identifier hs-var">WH.toHeader</span></span><span> </span><span class="annot"><span class="annottext">(HeaderName, a)
</span><a href="#local-6989586621679156044"><span class="hs-identifier hs-var">x</span></a></span><span class="hs-special">]</span><span>
</span><span id="line-334"></span><span>
</span><span id="line-335"></span><span id="local-6989586621679155338"><span class="annot"><a href="OpenAPIPetstore.Core.html#toForm"><span class="hs-identifier hs-type">toForm</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">WH.ToHttpApiData</span></span><span> </span><span class="annot"><a href="#local-6989586621679155338"><span class="hs-identifier hs-type">v</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">BC.ByteString</span></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="#local-6989586621679155338"><span class="hs-identifier hs-type">v</span></a></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="hs-identifier hs-type">WH.Form</span></span></span><span>
</span><span id="line-336"></span><span id="toForm"><span class="annot"><span class="annottext">toForm :: forall v. ToHttpApiData v =&gt; (ByteString, v) -&gt; Form
</span><a href="OpenAPIPetstore.Core.html#toForm"><span class="hs-identifier hs-var hs-var">toForm</span></a></span></span><span> </span><span class="hs-special">(</span><span id="local-6989586621679156052"><span class="annot"><span class="annottext">ByteString
</span><a href="#local-6989586621679156052"><span class="hs-identifier hs-var">k</span></a></span></span><span class="hs-special">,</span><span id="local-6989586621679156053"><span class="annot"><span class="annottext">v
</span><a href="#local-6989586621679156053"><span class="hs-identifier hs-var">v</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">[(String, v)] -&gt; Form
forall a. ToForm a =&gt; a -&gt; Form
</span><span class="hs-identifier hs-var">WH.toForm</span></span><span> </span><span class="hs-special">[</span><span class="hs-special">(</span><span class="annot"><span class="annottext">ByteString -&gt; String
</span><span class="hs-identifier hs-var">BC.unpack</span></span><span> </span><span class="annot"><span class="annottext">ByteString
</span><a href="#local-6989586621679156052"><span class="hs-identifier hs-var">k</span></a></span><span class="hs-special">,</span><span class="annot"><span class="annottext">v
</span><a href="#local-6989586621679156053"><span class="hs-identifier hs-var">v</span></a></span><span class="hs-special">)</span><span class="hs-special">]</span><span>
</span><span id="line-337"></span><span>
</span><span id="line-338"></span><span id="local-6989586621679155345"><span class="annot"><a href="OpenAPIPetstore.Core.html#toQuery"><span class="hs-identifier hs-type">toQuery</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">WH.ToHttpApiData</span></span><span> </span><span class="annot"><a href="#local-6989586621679155345"><span class="hs-identifier hs-type">a</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">BC.ByteString</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-identifier hs-type">Maybe</span></span><span> </span><span class="annot"><a href="#local-6989586621679155345"><span class="hs-identifier hs-type">a</span></a></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-special">[</span><span class="annot"><span class="hs-identifier hs-type">NH.QueryItem</span></span><span class="hs-special">]</span></span><span>
</span><span id="line-339"></span><span id="toQuery"><span class="annot"><span class="annottext">toQuery :: forall a. ToHttpApiData a =&gt; (ByteString, Maybe a) -&gt; Query
</span><a href="OpenAPIPetstore.Core.html#toQuery"><span class="hs-identifier hs-var hs-var">toQuery</span></a></span></span><span> </span><span id="local-6989586621679156061"><span class="annot"><span class="annottext">(ByteString, Maybe a)
</span><a href="#local-6989586621679156061"><span class="hs-identifier hs-var">x</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">[</span><span class="hs-special">(</span><span class="annot"><span class="annottext">(Maybe a -&gt; Maybe ByteString)
-&gt; (ByteString, Maybe a) -&gt; (ByteString, Maybe ByteString)
forall a b. (a -&gt; b) -&gt; (ByteString, a) -&gt; (ByteString, b)
forall (f :: * -&gt; *) a b. Functor f =&gt; (a -&gt; b) -&gt; f a -&gt; f b
</span><span class="hs-identifier hs-var">fmap</span></span><span> </span><span class="annot"><span class="annottext">((Maybe a -&gt; Maybe ByteString)
 -&gt; (ByteString, Maybe a) -&gt; (ByteString, Maybe ByteString))
-&gt; ((a -&gt; ByteString) -&gt; Maybe a -&gt; Maybe ByteString)
-&gt; (a -&gt; ByteString)
-&gt; (ByteString, Maybe a)
-&gt; (ByteString, Maybe ByteString)
forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">(a -&gt; ByteString) -&gt; Maybe a -&gt; Maybe ByteString
forall a b. (a -&gt; b) -&gt; Maybe a -&gt; Maybe b
forall (f :: * -&gt; *) a b. Functor f =&gt; (a -&gt; b) -&gt; f a -&gt; f b
</span><span class="hs-identifier hs-var">fmap</span></span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">a -&gt; ByteString
</span><a href="#local-6989586621679156062"><span class="hs-identifier hs-var">toQueryParam</span></a></span><span> </span><span class="annot"><span class="annottext">(ByteString, Maybe a)
</span><a href="#local-6989586621679156061"><span class="hs-identifier hs-var">x</span></a></span><span class="hs-special">]</span><span>
</span><span id="line-340"></span><span>  </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679156062"><span class="annot"><span class="annottext">toQueryParam :: a -&gt; ByteString
</span><a href="#local-6989586621679156062"><span class="hs-identifier hs-var hs-var">toQueryParam</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Text -&gt; ByteString
</span><span class="hs-identifier hs-var">T.encodeUtf8</span></span><span> </span><span class="annot"><span class="annottext">(Text -&gt; ByteString) -&gt; (a -&gt; Text) -&gt; a -&gt; ByteString
forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">a -&gt; Text
forall a. ToHttpApiData a =&gt; a -&gt; Text
</span><span class="hs-identifier hs-var">WH.toQueryParam</span></span><span>
</span><span id="line-341"></span><span>
</span><span id="line-342"></span><span class="annot"><a href="OpenAPIPetstore.Core.html#toPartialEscapeQuery"><span class="hs-identifier hs-type">toPartialEscapeQuery</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">B.ByteString</span></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="hs-identifier hs-type">NH.Query</span></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="hs-identifier hs-type">NH.PartialEscapeQuery</span></span><span>
</span><span id="line-343"></span><span id="toPartialEscapeQuery"><span class="annot"><span class="annottext">toPartialEscapeQuery :: ByteString -&gt; Query -&gt; PartialEscapeQuery
</span><a href="OpenAPIPetstore.Core.html#toPartialEscapeQuery"><span class="hs-identifier hs-var hs-var">toPartialEscapeQuery</span></a></span></span><span> </span><span id="local-6989586621679156067"><span class="annot"><span class="annottext">ByteString
</span><a href="#local-6989586621679156067"><span class="hs-identifier hs-var">extraUnreserved</span></a></span></span><span> </span><span id="local-6989586621679156068"><span class="annot"><span class="annottext">Query
</span><a href="#local-6989586621679156068"><span class="hs-identifier hs-var">query</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">((ByteString, Maybe ByteString) -&gt; PartialEscapeQueryItem)
-&gt; Query -&gt; PartialEscapeQuery
forall a b. (a -&gt; b) -&gt; [a] -&gt; [b]
forall (f :: * -&gt; *) a b. Functor f =&gt; (a -&gt; b) -&gt; f a -&gt; f b
</span><span class="hs-identifier hs-var">fmap</span></span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span class="hs-special">(</span><span id="local-6989586621679156069"><span class="annot"><span class="annottext">ByteString
</span><a href="#local-6989586621679156069"><span class="hs-identifier hs-var">k</span></a></span></span><span class="hs-special">,</span><span> </span><span id="local-6989586621679156070"><span class="annot"><span class="annottext">Maybe ByteString
</span><a href="#local-6989586621679156070"><span class="hs-identifier hs-var">v</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">ByteString
</span><a href="#local-6989586621679156069"><span class="hs-identifier hs-var">k</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="annottext">[EscapeItem]
-&gt; (ByteString -&gt; [EscapeItem]) -&gt; Maybe ByteString -&gt; [EscapeItem]
forall b a. b -&gt; (a -&gt; b) -&gt; Maybe a -&gt; b
</span><span class="hs-identifier hs-var">maybe</span></span><span> </span><span class="hs-special">[</span><span class="hs-special">]</span><span> </span><span class="annot"><span class="annottext">ByteString -&gt; [EscapeItem]
</span><a href="#local-6989586621679156071"><span class="hs-identifier hs-var">go</span></a></span><span> </span><span class="annot"><span class="annottext">Maybe ByteString
</span><a href="#local-6989586621679156070"><span class="hs-identifier hs-var">v</span></a></span><span class="hs-special">)</span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">Query
</span><a href="#local-6989586621679156068"><span class="hs-identifier hs-var">query</span></a></span><span>
</span><span id="line-344"></span><span>  </span><span class="hs-keyword">where</span><span> </span><span class="annot"><a href="#local-6989586621679156071"><span class="hs-identifier hs-type">go</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">B.ByteString</span></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-special">[</span><span class="annot"><span class="hs-identifier hs-type">NH.EscapeItem</span></span><span class="hs-special">]</span><span>
</span><span id="line-345"></span><span>        </span><span id="local-6989586621679156071"><span class="annot"><span class="annottext">go :: ByteString -&gt; [EscapeItem]
</span><a href="#local-6989586621679156071"><span class="hs-identifier hs-var hs-var">go</span></a></span></span><span> </span><span id="local-6989586621679156072"><span class="annot"><span class="annottext">ByteString
</span><a href="#local-6989586621679156072"><span class="hs-identifier hs-var">v</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">ByteString
</span><a href="#local-6989586621679156072"><span class="hs-identifier hs-var">v</span></a></span><span> </span><span class="annot"><span class="annottext">ByteString -&gt; (ByteString -&gt; [ByteString]) -&gt; [ByteString]
forall a b. a -&gt; (a -&gt; b) -&gt; b
</span><span class="hs-operator hs-var">&amp;</span></span><span> </span><span class="annot"><span class="annottext">(Word8 -&gt; Word8 -&gt; Bool) -&gt; ByteString -&gt; [ByteString]
</span><span class="hs-identifier hs-var">B.groupBy</span></span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span id="local-6989586621679156074"><span class="annot"><span class="annottext">Word8
</span><a href="#local-6989586621679156074"><span class="hs-identifier hs-var">a</span></a></span></span><span> </span><span id="local-6989586621679156075"><span class="annot"><span class="annottext">Word8
</span><a href="#local-6989586621679156075"><span class="hs-identifier hs-var">b</span></a></span></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">Word8
</span><a href="#local-6989586621679156074"><span class="hs-identifier hs-var">a</span></a></span><span> </span><span class="annot"><span class="annottext">Word8 -&gt; ByteString -&gt; Bool
</span><span class="hs-operator hs-var">`B.notElem`</span></span><span> </span><span class="annot"><span class="annottext">ByteString
</span><a href="#local-6989586621679156067"><span class="hs-identifier hs-var">extraUnreserved</span></a></span><span> </span><span class="annot"><span class="annottext">Bool -&gt; Bool -&gt; Bool
</span><span class="hs-operator hs-var">&amp;&amp;</span></span><span> </span><span class="annot"><span class="annottext">Word8
</span><a href="#local-6989586621679156075"><span class="hs-identifier hs-var">b</span></a></span><span> </span><span class="annot"><span class="annottext">Word8 -&gt; ByteString -&gt; Bool
</span><span class="hs-operator hs-var">`B.notElem`</span></span><span> </span><span class="annot"><span class="annottext">ByteString
</span><a href="#local-6989586621679156067"><span class="hs-identifier hs-var">extraUnreserved</span></a></span><span class="hs-special">)</span><span>
</span><span id="line-346"></span><span>                 </span><span class="annot"><span class="annottext">[ByteString] -&gt; ([ByteString] -&gt; [EscapeItem]) -&gt; [EscapeItem]
forall a b. a -&gt; (a -&gt; b) -&gt; b
</span><span class="hs-operator hs-var">&amp;</span></span><span> </span><span class="annot"><span class="annottext">(ByteString -&gt; EscapeItem) -&gt; [ByteString] -&gt; [EscapeItem]
forall a b. (a -&gt; b) -&gt; [a] -&gt; [b]
forall (f :: * -&gt; *) a b. Functor f =&gt; (a -&gt; b) -&gt; f a -&gt; f b
</span><span class="hs-identifier hs-var">fmap</span></span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span id="local-6989586621679156077"><span class="annot"><span class="annottext">ByteString
</span><a href="#local-6989586621679156077"><span class="hs-identifier hs-var">xs</span></a></span></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-keyword">if</span><span> </span><span class="annot"><span class="annottext">ByteString -&gt; Bool
</span><span class="hs-identifier hs-var">B.null</span></span><span> </span><span class="annot"><span class="annottext">ByteString
</span><a href="#local-6989586621679156077"><span class="hs-identifier hs-var">xs</span></a></span><span> </span><span class="hs-keyword">then</span><span> </span><span class="annot"><span class="annottext">ByteString -&gt; EscapeItem
</span><span class="hs-identifier hs-var">NH.QN</span></span><span> </span><span class="annot"><span class="annottext">ByteString
</span><a href="#local-6989586621679156077"><span class="hs-identifier hs-var">xs</span></a></span><span>
</span><span id="line-347"></span><span>                                  </span><span class="hs-keyword">else</span><span> </span><span class="hs-keyword">if</span><span> </span><span class="annot"><span class="annottext">HasCallStack =&gt; ByteString -&gt; Word8
ByteString -&gt; Word8
</span><span class="hs-identifier hs-var">B.head</span></span><span> </span><span class="annot"><span class="annottext">ByteString
</span><a href="#local-6989586621679156077"><span class="hs-identifier hs-var">xs</span></a></span><span> </span><span class="annot"><span class="annottext">Word8 -&gt; ByteString -&gt; Bool
</span><span class="hs-operator hs-var">`B.elem`</span></span><span> </span><span class="annot"><span class="annottext">ByteString
</span><a href="#local-6989586621679156067"><span class="hs-identifier hs-var">extraUnreserved</span></a></span><span>
</span><span id="line-348"></span><span>                                          </span><span class="hs-keyword">then</span><span> </span><span class="annot"><span class="annottext">ByteString -&gt; EscapeItem
</span><span class="hs-identifier hs-var">NH.QN</span></span><span> </span><span class="annot"><span class="annottext">ByteString
</span><a href="#local-6989586621679156077"><span class="hs-identifier hs-var">xs</span></a></span><span> </span><span class="hs-comment">-- Not Encoded</span><span>
</span><span id="line-349"></span><span>                                          </span><span class="hs-keyword">else</span><span> </span><span class="annot"><span class="annottext">ByteString -&gt; EscapeItem
</span><span class="hs-identifier hs-var">NH.QE</span></span><span> </span><span class="annot"><span class="annottext">ByteString
</span><a href="#local-6989586621679156077"><span class="hs-identifier hs-var">xs</span></a></span><span> </span><span class="hs-comment">-- Encoded</span><span>
</span><span id="line-350"></span><span>                        </span><span class="hs-special">)</span><span>
</span><span id="line-351"></span><span>
</span><span id="line-352"></span><span class="annot"><span class="hs-comment">-- *** OpenAPI `CollectionFormat` Utils</span></span><span>
</span><span id="line-353"></span><span>
</span><span id="line-354"></span><span class="annot"><span class="hs-comment">-- | Determines the format of the array if type array is used.</span></span><span>
</span><span id="line-355"></span><span class="hs-keyword">data</span><span> </span><span id="CollectionFormat"><span class="annot"><a href="OpenAPIPetstore.Core.html#CollectionFormat"><span class="hs-identifier hs-var">CollectionFormat</span></a></span></span><span>
</span><span id="line-356"></span><span>  </span><span class="hs-glyph">=</span><span> </span><span id="CommaSeparated"><span class="annot"><a href="OpenAPIPetstore.Core.html#CommaSeparated"><span class="hs-identifier hs-var">CommaSeparated</span></a></span></span><span> </span><span class="annot"><span class="hs-comment">-- ^ CSV format for multiple parameters.</span></span><span>
</span><span id="line-357"></span><span>  </span><span class="hs-glyph">|</span><span> </span><span id="SpaceSeparated"><span class="annot"><a href="OpenAPIPetstore.Core.html#SpaceSeparated"><span class="hs-identifier hs-var">SpaceSeparated</span></a></span></span><span> </span><span class="annot"><span class="hs-comment">-- ^ Also called &quot;SSV&quot;</span></span><span>
</span><span id="line-358"></span><span>  </span><span class="hs-glyph">|</span><span> </span><span id="TabSeparated"><span class="annot"><a href="OpenAPIPetstore.Core.html#TabSeparated"><span class="hs-identifier hs-var">TabSeparated</span></a></span></span><span> </span><span class="annot"><span class="hs-comment">-- ^ Also called &quot;TSV&quot;</span></span><span>
</span><span id="line-359"></span><span>  </span><span class="hs-glyph">|</span><span> </span><span id="PipeSeparated"><span class="annot"><a href="OpenAPIPetstore.Core.html#PipeSeparated"><span class="hs-identifier hs-var">PipeSeparated</span></a></span></span><span> </span><span class="annot"><span class="hs-comment">-- ^ `value1|value2|value2`</span></span><span>
</span><span id="line-360"></span><span>  </span><span class="hs-glyph">|</span><span> </span><span id="MultiParamArray"><span class="annot"><a href="OpenAPIPetstore.Core.html#MultiParamArray"><span class="hs-identifier hs-var">MultiParamArray</span></a></span></span><span> </span><span class="annot"><span class="hs-comment">-- ^ Using multiple GET parameters, e.g. `foo=bar&amp;foo=baz`. This is valid only for parameters in &quot;query&quot; ('NH.Query') or &quot;formData&quot; ('WH.Form')</span></span><span>
</span><span id="line-361"></span><span>
</span><span id="line-362"></span><span id="local-6989586621679155352"><span class="annot"><a href="OpenAPIPetstore.Core.html#toHeaderColl"><span class="hs-identifier hs-type">toHeaderColl</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">WH.ToHttpApiData</span></span><span> </span><span class="annot"><a href="#local-6989586621679155352"><span class="hs-identifier hs-type">a</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#CollectionFormat"><span class="hs-identifier hs-type">CollectionFormat</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">NH.HeaderName</span></span><span class="hs-special">,</span><span> </span><span class="hs-special">[</span><span class="annot"><a href="#local-6989586621679155352"><span class="hs-identifier hs-type">a</span></a></span><span class="hs-special">]</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-special">[</span><span class="annot"><span class="hs-identifier hs-type">NH.Header</span></span><span class="hs-special">]</span></span><span>
</span><span id="line-363"></span><span id="toHeaderColl"><span class="annot"><span class="annottext">toHeaderColl :: forall a.
ToHttpApiData a =&gt;
CollectionFormat -&gt; (HeaderName, [a]) -&gt; RequestHeaders
</span><a href="OpenAPIPetstore.Core.html#toHeaderColl"><span class="hs-identifier hs-var hs-var">toHeaderColl</span></a></span></span><span> </span><span id="local-6989586621679156094"><span class="annot"><span class="annottext">CollectionFormat
</span><a href="#local-6989586621679156094"><span class="hs-identifier hs-var">c</span></a></span></span><span> </span><span id="local-6989586621679156095"><span class="annot"><span class="annottext">(HeaderName, [a])
</span><a href="#local-6989586621679156095"><span class="hs-identifier hs-var">xs</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">CollectionFormat
-&gt; ((HeaderName, a) -&gt; RequestHeaders)
-&gt; (HeaderName, [a])
-&gt; RequestHeaders
forall (f :: * -&gt; *) a b.
Traversable f =&gt;
CollectionFormat
-&gt; (f a -&gt; [(b, ByteString)]) -&gt; f [a] -&gt; [(b, ByteString)]
</span><a href="OpenAPIPetstore.Core.html#_toColl"><span class="hs-identifier hs-var">_toColl</span></a></span><span> </span><span class="annot"><span class="annottext">CollectionFormat
</span><a href="#local-6989586621679156094"><span class="hs-identifier hs-var">c</span></a></span><span> </span><span class="annot"><span class="annottext">(HeaderName, a) -&gt; RequestHeaders
forall a. ToHttpApiData a =&gt; (HeaderName, a) -&gt; RequestHeaders
</span><a href="OpenAPIPetstore.Core.html#toHeader"><span class="hs-identifier hs-var">toHeader</span></a></span><span> </span><span class="annot"><span class="annottext">(HeaderName, [a])
</span><a href="#local-6989586621679156095"><span class="hs-identifier hs-var">xs</span></a></span><span>
</span><span id="line-364"></span><span>
</span><span id="line-365"></span><span id="local-6989586621679155359"><span class="annot"><a href="OpenAPIPetstore.Core.html#toFormColl"><span class="hs-identifier hs-type">toFormColl</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">WH.ToHttpApiData</span></span><span> </span><span class="annot"><a href="#local-6989586621679155359"><span class="hs-identifier hs-type">v</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#CollectionFormat"><span class="hs-identifier hs-type">CollectionFormat</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">BC.ByteString</span></span><span class="hs-special">,</span><span> </span><span class="hs-special">[</span><span class="annot"><a href="#local-6989586621679155359"><span class="hs-identifier hs-type">v</span></a></span><span class="hs-special">]</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="hs-identifier hs-type">WH.Form</span></span></span><span>
</span><span id="line-366"></span><span id="toFormColl"><span class="annot"><span class="annottext">toFormColl :: forall v.
ToHttpApiData v =&gt;
CollectionFormat -&gt; (ByteString, [v]) -&gt; Form
</span><a href="OpenAPIPetstore.Core.html#toFormColl"><span class="hs-identifier hs-var hs-var">toFormColl</span></a></span></span><span> </span><span id="local-6989586621679156107"><span class="annot"><span class="annottext">CollectionFormat
</span><a href="#local-6989586621679156107"><span class="hs-identifier hs-var">c</span></a></span></span><span> </span><span id="local-6989586621679156108"><span class="annot"><span class="annottext">(ByteString, [v])
</span><a href="#local-6989586621679156108"><span class="hs-identifier hs-var">xs</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">[(String, String)] -&gt; Form
forall a. ToForm a =&gt; a -&gt; Form
</span><span class="hs-identifier hs-var">WH.toForm</span></span><span> </span><span class="annot"><span class="annottext">([(String, String)] -&gt; Form) -&gt; [(String, String)] -&gt; Form
forall a b. (a -&gt; b) -&gt; a -&gt; b
</span><span class="hs-operator hs-var">$</span></span><span> </span><span class="annot"><span class="annottext">((HeaderName, ByteString) -&gt; (String, String))
-&gt; RequestHeaders -&gt; [(String, String)]
forall a b. (a -&gt; b) -&gt; [a] -&gt; [b]
forall (f :: * -&gt; *) a b. Functor f =&gt; (a -&gt; b) -&gt; f a -&gt; f b
</span><span class="hs-identifier hs-var">fmap</span></span><span> </span><span class="annot"><span class="annottext">(HeaderName, ByteString) -&gt; (String, String)
</span><a href="#local-6989586621679156109"><span class="hs-identifier hs-var">unpack</span></a></span><span> </span><span class="annot"><span class="annottext">(RequestHeaders -&gt; [(String, String)])
-&gt; RequestHeaders -&gt; [(String, String)]
forall a b. (a -&gt; b) -&gt; a -&gt; b
</span><span class="hs-operator hs-var">$</span></span><span> </span><span class="annot"><span class="annottext">CollectionFormat
-&gt; ((HeaderName, v) -&gt; RequestHeaders)
-&gt; (HeaderName, [v])
-&gt; RequestHeaders
forall (f :: * -&gt; *) a b.
Traversable f =&gt;
CollectionFormat
-&gt; (f a -&gt; [(b, ByteString)]) -&gt; f [a] -&gt; [(b, ByteString)]
</span><a href="OpenAPIPetstore.Core.html#_toColl"><span class="hs-identifier hs-var">_toColl</span></a></span><span> </span><span class="annot"><span class="annottext">CollectionFormat
</span><a href="#local-6989586621679156107"><span class="hs-identifier hs-var">c</span></a></span><span> </span><span class="annot"><span class="annottext">(HeaderName, v) -&gt; RequestHeaders
forall a. ToHttpApiData a =&gt; (HeaderName, a) -&gt; RequestHeaders
</span><a href="OpenAPIPetstore.Core.html#toHeader"><span class="hs-identifier hs-var">toHeader</span></a></span><span> </span><span class="annot"><span class="annottext">((HeaderName, [v]) -&gt; RequestHeaders)
-&gt; (HeaderName, [v]) -&gt; RequestHeaders
forall a b. (a -&gt; b) -&gt; a -&gt; b
</span><span class="hs-operator hs-var">$</span></span><span> </span><span class="annot"><span class="annottext">(ByteString, [v]) -&gt; (HeaderName, [v])
forall {s} {b}. FoldCase s =&gt; (s, b) -&gt; (CI s, b)
</span><a href="#local-6989586621679156110"><span class="hs-identifier hs-var">pack</span></a></span><span> </span><span class="annot"><span class="annottext">(ByteString, [v])
</span><a href="#local-6989586621679156108"><span class="hs-identifier hs-var">xs</span></a></span><span>
</span><span id="line-367"></span><span>  </span><span class="hs-keyword">where</span><span>
</span><span id="line-368"></span><span>    </span><span id="local-6989586621679156110"><span class="annot"><span class="annottext">pack :: (s, b) -&gt; (CI s, b)
</span><a href="#local-6989586621679156110"><span class="hs-identifier hs-var hs-var">pack</span></a></span></span><span> </span><span class="hs-special">(</span><span id="local-6989586621679156113"><span class="annot"><span class="annottext">s
</span><a href="#local-6989586621679156113"><span class="hs-identifier hs-var">k</span></a></span></span><span class="hs-special">,</span><span id="local-6989586621679156114"><span class="annot"><span class="annottext">b
</span><a href="#local-6989586621679156114"><span class="hs-identifier hs-var">v</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">s -&gt; CI s
forall s. FoldCase s =&gt; s -&gt; CI s
</span><span class="hs-identifier hs-var">CI.mk</span></span><span> </span><span class="annot"><span class="annottext">s
</span><a href="#local-6989586621679156113"><span class="hs-identifier hs-var">k</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="annottext">b
</span><a href="#local-6989586621679156114"><span class="hs-identifier hs-var">v</span></a></span><span class="hs-special">)</span><span>
</span><span id="line-369"></span><span>    </span><span id="local-6989586621679156109"><span class="annot"><span class="annottext">unpack :: (HeaderName, ByteString) -&gt; (String, String)
</span><a href="#local-6989586621679156109"><span class="hs-identifier hs-var hs-var">unpack</span></a></span></span><span> </span><span class="hs-special">(</span><span id="local-6989586621679156115"><span class="annot"><span class="annottext">HeaderName
</span><a href="#local-6989586621679156115"><span class="hs-identifier hs-var">k</span></a></span></span><span class="hs-special">,</span><span id="local-6989586621679156116"><span class="annot"><span class="annottext">ByteString
</span><a href="#local-6989586621679156116"><span class="hs-identifier hs-var">v</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">ByteString -&gt; String
</span><span class="hs-identifier hs-var">BC.unpack</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">HeaderName -&gt; ByteString
forall s. CI s -&gt; s
</span><span class="hs-identifier hs-var">CI.original</span></span><span> </span><span class="annot"><span class="annottext">HeaderName
</span><a href="#local-6989586621679156115"><span class="hs-identifier hs-var">k</span></a></span><span class="hs-special">)</span><span class="hs-special">,</span><span> </span><span class="annot"><span class="annottext">ByteString -&gt; String
</span><span class="hs-identifier hs-var">BC.unpack</span></span><span> </span><span class="annot"><span class="annottext">ByteString
</span><a href="#local-6989586621679156116"><span class="hs-identifier hs-var">v</span></a></span><span class="hs-special">)</span><span>
</span><span id="line-370"></span><span>
</span><span id="line-371"></span><span id="local-6989586621679155364"><span class="annot"><a href="OpenAPIPetstore.Core.html#toQueryColl"><span class="hs-identifier hs-type">toQueryColl</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">WH.ToHttpApiData</span></span><span> </span><span class="annot"><a href="#local-6989586621679155364"><span class="hs-identifier hs-type">a</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#CollectionFormat"><span class="hs-identifier hs-type">CollectionFormat</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">BC.ByteString</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-identifier hs-type">Maybe</span></span><span> </span><span class="hs-special">[</span><span class="annot"><a href="#local-6989586621679155364"><span class="hs-identifier hs-type">a</span></a></span><span class="hs-special">]</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="hs-identifier hs-type">NH.Query</span></span></span><span>
</span><span id="line-372"></span><span id="toQueryColl"><span class="annot"><span class="annottext">toQueryColl :: forall a.
ToHttpApiData a =&gt;
CollectionFormat -&gt; (ByteString, Maybe [a]) -&gt; Query
</span><a href="OpenAPIPetstore.Core.html#toQueryColl"><span class="hs-identifier hs-var hs-var">toQueryColl</span></a></span></span><span> </span><span id="local-6989586621679156126"><span class="annot"><span class="annottext">CollectionFormat
</span><a href="#local-6989586621679156126"><span class="hs-identifier hs-var">c</span></a></span></span><span> </span><span id="local-6989586621679156127"><span class="annot"><span class="annottext">(ByteString, Maybe [a])
</span><a href="#local-6989586621679156127"><span class="hs-identifier hs-var">xs</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">CollectionFormat
-&gt; ((ByteString, Maybe a) -&gt; Query)
-&gt; (ByteString, Maybe [a])
-&gt; Query
forall (f :: * -&gt; *) (t :: * -&gt; *) a b.
(Traversable f, Traversable t, Alternative t) =&gt;
CollectionFormat
-&gt; (f (t a) -&gt; [(b, t ByteString)])
-&gt; f (t [a])
-&gt; [(b, t ByteString)]
</span><a href="OpenAPIPetstore.Core.html#_toCollA"><span class="hs-identifier hs-var">_toCollA</span></a></span><span> </span><span class="annot"><span class="annottext">CollectionFormat
</span><a href="#local-6989586621679156126"><span class="hs-identifier hs-var">c</span></a></span><span> </span><span class="annot"><span class="annottext">(ByteString, Maybe a) -&gt; Query
forall a. ToHttpApiData a =&gt; (ByteString, Maybe a) -&gt; Query
</span><a href="OpenAPIPetstore.Core.html#toQuery"><span class="hs-identifier hs-var">toQuery</span></a></span><span> </span><span class="annot"><span class="annottext">(ByteString, Maybe [a])
</span><a href="#local-6989586621679156127"><span class="hs-identifier hs-var">xs</span></a></span><span>
</span><span id="line-373"></span><span>
</span><span id="line-374"></span><span id="local-6989586621679155356"><span id="local-6989586621679155357"><span id="local-6989586621679155358"><span class="annot"><a href="OpenAPIPetstore.Core.html#_toColl"><span class="hs-identifier hs-type">_toColl</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">P.Traversable</span></span><span> </span><span class="annot"><a href="#local-6989586621679155356"><span class="hs-identifier hs-type">f</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#CollectionFormat"><span class="hs-identifier hs-type">CollectionFormat</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-special">(</span><span class="annot"><a href="#local-6989586621679155356"><span class="hs-identifier hs-type">f</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155357"><span class="hs-identifier hs-type">a</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-special">[</span><span class="hs-special">(</span><span class="annot"><a href="#local-6989586621679155358"><span class="hs-identifier hs-type">b</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-identifier hs-type">BC.ByteString</span></span><span class="hs-special">)</span><span class="hs-special">]</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="#local-6989586621679155356"><span class="hs-identifier hs-type">f</span></a></span><span> </span><span class="hs-special">[</span><span class="annot"><a href="#local-6989586621679155357"><span class="hs-identifier hs-type">a</span></a></span><span class="hs-special">]</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-special">[</span><span class="hs-special">(</span><span class="annot"><a href="#local-6989586621679155358"><span class="hs-identifier hs-type">b</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-identifier hs-type">BC.ByteString</span></span><span class="hs-special">)</span><span class="hs-special">]</span></span></span></span><span>
</span><span id="line-375"></span><span id="_toColl"><span class="annot"><span class="annottext">_toColl :: forall (f :: * -&gt; *) a b.
Traversable f =&gt;
CollectionFormat
-&gt; (f a -&gt; [(b, ByteString)]) -&gt; f [a] -&gt; [(b, ByteString)]
</span><a href="OpenAPIPetstore.Core.html#_toColl"><span class="hs-identifier hs-var hs-var">_toColl</span></a></span></span><span> </span><span id="local-6989586621679156147"><span class="annot"><span class="annottext">CollectionFormat
</span><a href="#local-6989586621679156147"><span class="hs-identifier hs-var">c</span></a></span></span><span> </span><span id="local-6989586621679156148"><span class="annot"><span class="annottext">f a -&gt; [(b, ByteString)]
</span><a href="#local-6989586621679156148"><span class="hs-identifier hs-var">encode</span></a></span></span><span> </span><span id="local-6989586621679156149"><span class="annot"><span class="annottext">f [a]
</span><a href="#local-6989586621679156149"><span class="hs-identifier hs-var">xs</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">((b, Maybe ByteString) -&gt; (b, ByteString))
-&gt; [(b, Maybe ByteString)] -&gt; [(b, ByteString)]
forall a b. (a -&gt; b) -&gt; [a] -&gt; [b]
forall (f :: * -&gt; *) a b. Functor f =&gt; (a -&gt; b) -&gt; f a -&gt; f b
</span><span class="hs-identifier hs-var">fmap</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">(Maybe ByteString -&gt; ByteString)
-&gt; (b, Maybe ByteString) -&gt; (b, ByteString)
forall a b. (a -&gt; b) -&gt; (b, a) -&gt; (b, b)
forall (f :: * -&gt; *) a b. Functor f =&gt; (a -&gt; b) -&gt; f a -&gt; f b
</span><span class="hs-identifier hs-var">fmap</span></span><span> </span><span class="annot"><span class="annottext">Maybe ByteString -&gt; ByteString
forall a. HasCallStack =&gt; Maybe a -&gt; a
</span><span class="hs-identifier hs-var">P.fromJust</span></span><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">CollectionFormat
-&gt; (f (Maybe a) -&gt; [(b, Maybe ByteString)])
-&gt; (Char -&gt; ByteString)
-&gt; f (Maybe [a])
-&gt; [(b, Maybe ByteString)]
forall c (f :: * -&gt; *) (t :: * -&gt; *) a b.
(Monoid c, Traversable f, Traversable t, Alternative t) =&gt;
CollectionFormat
-&gt; (f (t a) -&gt; [(b, t c)])
-&gt; (Char -&gt; c)
-&gt; f (t [a])
-&gt; [(b, t c)]
</span><a href="OpenAPIPetstore.Core.html#_toCollA%27"><span class="hs-identifier hs-var">_toCollA'</span></a></span><span> </span><span class="annot"><span class="annottext">CollectionFormat
</span><a href="#local-6989586621679156147"><span class="hs-identifier hs-var">c</span></a></span><span> </span><span class="annot"><span class="annottext">f (Maybe a) -&gt; [(b, Maybe ByteString)]
</span><a href="#local-6989586621679156152"><span class="hs-identifier hs-var">fencode</span></a></span><span> </span><span class="annot"><span class="annottext">Char -&gt; ByteString
</span><span class="hs-identifier hs-var">BC.singleton</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">([a] -&gt; Maybe [a]) -&gt; f [a] -&gt; f (Maybe [a])
forall a b. (a -&gt; b) -&gt; f a -&gt; f b
forall (f :: * -&gt; *) a b. Functor f =&gt; (a -&gt; b) -&gt; f a -&gt; f b
</span><span class="hs-identifier hs-var">fmap</span></span><span> </span><span class="annot"><span class="annottext">[a] -&gt; Maybe [a]
forall a. a -&gt; Maybe a
</span><span class="hs-identifier hs-var">Just</span></span><span> </span><span class="annot"><span class="annottext">f [a]
</span><a href="#local-6989586621679156149"><span class="hs-identifier hs-var">xs</span></a></span><span class="hs-special">)</span><span class="hs-special">)</span><span>
</span><span id="line-376"></span><span>  </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679156152"><span class="annot"><span class="annottext">fencode :: f (Maybe a) -&gt; [(b, Maybe ByteString)]
</span><a href="#local-6989586621679156152"><span class="hs-identifier hs-var hs-var">fencode</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">((b, ByteString) -&gt; (b, Maybe ByteString))
-&gt; [(b, ByteString)] -&gt; [(b, Maybe ByteString)]
forall a b. (a -&gt; b) -&gt; [a] -&gt; [b]
forall (f :: * -&gt; *) a b. Functor f =&gt; (a -&gt; b) -&gt; f a -&gt; f b
</span><span class="hs-identifier hs-var">fmap</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">(ByteString -&gt; Maybe ByteString)
-&gt; (b, ByteString) -&gt; (b, Maybe ByteString)
forall a b. (a -&gt; b) -&gt; (b, a) -&gt; (b, b)
forall (f :: * -&gt; *) a b. Functor f =&gt; (a -&gt; b) -&gt; f a -&gt; f b
</span><span class="hs-identifier hs-var">fmap</span></span><span> </span><span class="annot"><span class="annottext">ByteString -&gt; Maybe ByteString
forall a. a -&gt; Maybe a
</span><span class="hs-identifier hs-var">Just</span></span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">([(b, ByteString)] -&gt; [(b, Maybe ByteString)])
-&gt; (f (Maybe a) -&gt; [(b, ByteString)])
-&gt; f (Maybe a)
-&gt; [(b, Maybe ByteString)]
forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">f a -&gt; [(b, ByteString)]
</span><a href="#local-6989586621679156148"><span class="hs-identifier hs-var">encode</span></a></span><span> </span><span class="annot"><span class="annottext">(f a -&gt; [(b, ByteString)])
-&gt; (f (Maybe a) -&gt; f a) -&gt; f (Maybe a) -&gt; [(b, ByteString)]
forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">(Maybe a -&gt; a) -&gt; f (Maybe a) -&gt; f a
forall a b. (a -&gt; b) -&gt; f a -&gt; f b
forall (f :: * -&gt; *) a b. Functor f =&gt; (a -&gt; b) -&gt; f a -&gt; f b
</span><span class="hs-identifier hs-var">fmap</span></span><span> </span><span class="annot"><span class="annottext">Maybe a -&gt; a
forall a. HasCallStack =&gt; Maybe a -&gt; a
</span><span class="hs-identifier hs-var">P.fromJust</span></span><span>
</span><span id="line-377"></span><span>        </span><span class="hs-pragma">{-# INLINE</span><span> </span><span class="annot"><a href="#local-6989586621679156152"><span class="hs-pragma hs-type">fencode</span></a></span><span> </span><span class="hs-pragma">#-}</span><span>
</span><span id="line-378"></span><span>
</span><span id="line-379"></span><span id="local-6989586621679155367"><span id="local-6989586621679155368"><span id="local-6989586621679155369"><span id="local-6989586621679155370"><span class="annot"><a href="OpenAPIPetstore.Core.html#_toCollA"><span class="hs-identifier hs-type">_toCollA</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">P.Traversable</span></span><span> </span><span class="annot"><a href="#local-6989586621679155367"><span class="hs-identifier hs-type">f</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-identifier hs-type">P.Traversable</span></span><span> </span><span class="annot"><a href="#local-6989586621679155368"><span class="hs-identifier hs-type">t</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-identifier hs-type">P.Alternative</span></span><span> </span><span class="annot"><a href="#local-6989586621679155368"><span class="hs-identifier hs-type">t</span></a></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#CollectionFormat"><span class="hs-identifier hs-type">CollectionFormat</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-special">(</span><span class="annot"><a href="#local-6989586621679155367"><span class="hs-identifier hs-type">f</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="#local-6989586621679155368"><span class="hs-identifier hs-type">t</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155369"><span class="hs-identifier hs-type">a</span></a></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-special">[</span><span class="hs-special">(</span><span class="annot"><a href="#local-6989586621679155370"><span class="hs-identifier hs-type">b</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="#local-6989586621679155368"><span class="hs-identifier hs-type">t</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">BC.ByteString</span></span><span class="hs-special">)</span><span class="hs-special">]</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="#local-6989586621679155367"><span class="hs-identifier hs-type">f</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="#local-6989586621679155368"><span class="hs-identifier hs-type">t</span></a></span><span> </span><span class="hs-special">[</span><span class="annot"><a href="#local-6989586621679155369"><span class="hs-identifier hs-type">a</span></a></span><span class="hs-special">]</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-special">[</span><span class="hs-special">(</span><span class="annot"><a href="#local-6989586621679155370"><span class="hs-identifier hs-type">b</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="#local-6989586621679155368"><span class="hs-identifier hs-type">t</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">BC.ByteString</span></span><span class="hs-special">)</span><span class="hs-special">]</span></span></span></span></span><span>
</span><span id="line-380"></span><span id="_toCollA"><span class="annot"><span class="annottext">_toCollA :: forall (f :: * -&gt; *) (t :: * -&gt; *) a b.
(Traversable f, Traversable t, Alternative t) =&gt;
CollectionFormat
-&gt; (f (t a) -&gt; [(b, t ByteString)])
-&gt; f (t [a])
-&gt; [(b, t ByteString)]
</span><a href="OpenAPIPetstore.Core.html#_toCollA"><span class="hs-identifier hs-var hs-var">_toCollA</span></a></span></span><span> </span><span id="local-6989586621679156161"><span class="annot"><span class="annottext">CollectionFormat
</span><a href="#local-6989586621679156161"><span class="hs-identifier hs-var">c</span></a></span></span><span> </span><span id="local-6989586621679156162"><span class="annot"><span class="annottext">f (t a) -&gt; [(b, t ByteString)]
</span><a href="#local-6989586621679156162"><span class="hs-identifier hs-var">encode</span></a></span></span><span> </span><span id="local-6989586621679156163"><span class="annot"><span class="annottext">f (t [a])
</span><a href="#local-6989586621679156163"><span class="hs-identifier hs-var">xs</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">CollectionFormat
-&gt; (f (t a) -&gt; [(b, t ByteString)])
-&gt; (Char -&gt; ByteString)
-&gt; f (t [a])
-&gt; [(b, t ByteString)]
forall c (f :: * -&gt; *) (t :: * -&gt; *) a b.
(Monoid c, Traversable f, Traversable t, Alternative t) =&gt;
CollectionFormat
-&gt; (f (t a) -&gt; [(b, t c)])
-&gt; (Char -&gt; c)
-&gt; f (t [a])
-&gt; [(b, t c)]
</span><a href="OpenAPIPetstore.Core.html#_toCollA%27"><span class="hs-identifier hs-var">_toCollA'</span></a></span><span> </span><span class="annot"><span class="annottext">CollectionFormat
</span><a href="#local-6989586621679156161"><span class="hs-identifier hs-var">c</span></a></span><span> </span><span class="annot"><span class="annottext">f (t a) -&gt; [(b, t ByteString)]
</span><a href="#local-6989586621679156162"><span class="hs-identifier hs-var">encode</span></a></span><span> </span><span class="annot"><span class="annottext">Char -&gt; ByteString
</span><span class="hs-identifier hs-var">BC.singleton</span></span><span> </span><span class="annot"><span class="annottext">f (t [a])
</span><a href="#local-6989586621679156163"><span class="hs-identifier hs-var">xs</span></a></span><span>
</span><span id="line-381"></span><span>
</span><span id="line-382"></span><span id="local-6989586621679155376"><span id="local-6989586621679155377"><span id="local-6989586621679155378"><span id="local-6989586621679155379"><span id="local-6989586621679155380"><span class="annot"><a href="OpenAPIPetstore.Core.html#_toCollA%27"><span class="hs-identifier hs-type">_toCollA'</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">P.Monoid</span></span><span> </span><span class="annot"><a href="#local-6989586621679155376"><span class="hs-identifier hs-type">c</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-identifier hs-type">P.Traversable</span></span><span> </span><span class="annot"><a href="#local-6989586621679155377"><span class="hs-identifier hs-type">f</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-identifier hs-type">P.Traversable</span></span><span> </span><span class="annot"><a href="#local-6989586621679155378"><span class="hs-identifier hs-type">t</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-identifier hs-type">P.Alternative</span></span><span> </span><span class="annot"><a href="#local-6989586621679155378"><span class="hs-identifier hs-type">t</span></a></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#CollectionFormat"><span class="hs-identifier hs-type">CollectionFormat</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-special">(</span><span class="annot"><a href="#local-6989586621679155377"><span class="hs-identifier hs-type">f</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="#local-6989586621679155378"><span class="hs-identifier hs-type">t</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155379"><span class="hs-identifier hs-type">a</span></a></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-special">[</span><span class="hs-special">(</span><span class="annot"><a href="#local-6989586621679155380"><span class="hs-identifier hs-type">b</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="#local-6989586621679155378"><span class="hs-identifier hs-type">t</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155376"><span class="hs-identifier hs-type">c</span></a></span><span class="hs-special">)</span><span class="hs-special">]</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">Char</span></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="#local-6989586621679155376"><span class="hs-identifier hs-type">c</span></a></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="#local-6989586621679155377"><span class="hs-identifier hs-type">f</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="#local-6989586621679155378"><span class="hs-identifier hs-type">t</span></a></span><span> </span><span class="hs-special">[</span><span class="annot"><a href="#local-6989586621679155379"><span class="hs-identifier hs-type">a</span></a></span><span class="hs-special">]</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-special">[</span><span class="hs-special">(</span><span class="annot"><a href="#local-6989586621679155380"><span class="hs-identifier hs-type">b</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="#local-6989586621679155378"><span class="hs-identifier hs-type">t</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155376"><span class="hs-identifier hs-type">c</span></a></span><span class="hs-special">)</span><span class="hs-special">]</span></span></span></span></span></span><span>
</span><span id="line-383"></span><span id="_toCollA%27"><span class="annot"><span class="annottext">_toCollA' :: forall c (f :: * -&gt; *) (t :: * -&gt; *) a b.
(Monoid c, Traversable f, Traversable t, Alternative t) =&gt;
CollectionFormat
-&gt; (f (t a) -&gt; [(b, t c)])
-&gt; (Char -&gt; c)
-&gt; f (t [a])
-&gt; [(b, t c)]
</span><a href="OpenAPIPetstore.Core.html#_toCollA%27"><span class="hs-identifier hs-var hs-var">_toCollA'</span></a></span></span><span> </span><span id="local-6989586621679156186"><span class="annot"><span class="annottext">CollectionFormat
</span><a href="#local-6989586621679156186"><span class="hs-identifier hs-var">c</span></a></span></span><span> </span><span id="local-6989586621679156187"><span class="annot"><span class="annottext">f (t a) -&gt; [(b, t c)]
</span><a href="#local-6989586621679156187"><span class="hs-identifier hs-var">encode</span></a></span></span><span> </span><span id="local-6989586621679156188"><span class="annot"><span class="annottext">Char -&gt; c
</span><a href="#local-6989586621679156188"><span class="hs-identifier hs-var">one</span></a></span></span><span> </span><span id="local-6989586621679156189"><span class="annot"><span class="annottext">f (t [a])
</span><a href="#local-6989586621679156189"><span class="hs-identifier hs-var">xs</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">case</span><span> </span><span class="annot"><span class="annottext">CollectionFormat
</span><a href="#local-6989586621679156186"><span class="hs-identifier hs-var">c</span></a></span><span> </span><span class="hs-keyword">of</span><span>
</span><span id="line-384"></span><span>  </span><span class="annot"><span class="annottext">CollectionFormat
</span><a href="OpenAPIPetstore.Core.html#CommaSeparated"><span class="hs-identifier hs-var">CommaSeparated</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">c -&gt; [(b, t c)]
</span><a href="#local-6989586621679156190"><span class="hs-identifier hs-var">go</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Char -&gt; c
</span><a href="#local-6989586621679156188"><span class="hs-identifier hs-var">one</span></a></span><span> </span><span class="annot"><span class="annottext">Char
</span><span class="hs-char">','</span></span><span class="hs-special">)</span><span>
</span><span id="line-385"></span><span>  </span><span class="annot"><span class="annottext">CollectionFormat
</span><a href="OpenAPIPetstore.Core.html#SpaceSeparated"><span class="hs-identifier hs-var">SpaceSeparated</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">c -&gt; [(b, t c)]
</span><a href="#local-6989586621679156190"><span class="hs-identifier hs-var">go</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Char -&gt; c
</span><a href="#local-6989586621679156188"><span class="hs-identifier hs-var">one</span></a></span><span> </span><span class="annot"><span class="annottext">Char
</span><span class="hs-char">' '</span></span><span class="hs-special">)</span><span>
</span><span id="line-386"></span><span>  </span><span class="annot"><span class="annottext">CollectionFormat
</span><a href="OpenAPIPetstore.Core.html#TabSeparated"><span class="hs-identifier hs-var">TabSeparated</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">c -&gt; [(b, t c)]
</span><a href="#local-6989586621679156190"><span class="hs-identifier hs-var">go</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Char -&gt; c
</span><a href="#local-6989586621679156188"><span class="hs-identifier hs-var">one</span></a></span><span> </span><span class="annot"><span class="annottext">Char
</span><span class="hs-char">'\t'</span></span><span class="hs-special">)</span><span>
</span><span id="line-387"></span><span>  </span><span class="annot"><span class="annottext">CollectionFormat
</span><a href="OpenAPIPetstore.Core.html#PipeSeparated"><span class="hs-identifier hs-var">PipeSeparated</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">c -&gt; [(b, t c)]
</span><a href="#local-6989586621679156190"><span class="hs-identifier hs-var">go</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Char -&gt; c
</span><a href="#local-6989586621679156188"><span class="hs-identifier hs-var">one</span></a></span><span> </span><span class="annot"><span class="annottext">Char
</span><span class="hs-char">'|'</span></span><span class="hs-special">)</span><span>
</span><span id="line-388"></span><span>  </span><span class="annot"><span class="annottext">CollectionFormat
</span><a href="OpenAPIPetstore.Core.html#MultiParamArray"><span class="hs-identifier hs-var">MultiParamArray</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">[(b, t c)]
</span><a href="#local-6989586621679156191"><span class="hs-identifier hs-var">expandList</span></a></span><span>
</span><span id="line-389"></span><span>  </span><span class="hs-keyword">where</span><span>
</span><span id="line-390"></span><span>    </span><span id="local-6989586621679156190"><span class="annot"><span class="annottext">go :: c -&gt; [(b, t c)]
</span><a href="#local-6989586621679156190"><span class="hs-identifier hs-var hs-var">go</span></a></span></span><span> </span><span id="local-6989586621679156192"><span class="annot"><span class="annottext">c
</span><a href="#local-6989586621679156192"><span class="hs-identifier hs-var">sep</span></a></span></span><span> </span><span class="hs-glyph">=</span><span>
</span><span id="line-391"></span><span>      </span><span class="hs-special">[</span><span class="annot"><span class="annottext">((b, t c) -&gt; (b, t c) -&gt; (b, t c)) -&gt; [(b, t c)] -&gt; (b, t c)
forall a. (a -&gt; a -&gt; a) -&gt; [a] -&gt; a
forall (t :: * -&gt; *) a. Foldable t =&gt; (a -&gt; a -&gt; a) -&gt; t a -&gt; a
</span><span class="hs-identifier hs-var">P.foldl1</span></span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span class="hs-special">(</span><span id="local-6989586621679156194"><span class="annot"><span class="annottext">b
</span><a href="#local-6989586621679156194"><span class="hs-identifier hs-var">sk</span></a></span></span><span class="hs-special">,</span><span> </span><span id="local-6989586621679156195"><span class="annot"><span class="annottext">t c
</span><a href="#local-6989586621679156195"><span class="hs-identifier hs-var">sv</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">b
</span><span class="hs-identifier">_</span></span><span class="hs-special">,</span><span> </span><span id="local-6989586621679156196"><span class="annot"><span class="annottext">t c
</span><a href="#local-6989586621679156196"><span class="hs-identifier hs-var">v</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">b
</span><a href="#local-6989586621679156194"><span class="hs-identifier hs-var">sk</span></a></span><span class="hs-special">,</span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">c -&gt; c -&gt; c -&gt; c
forall {a}. Semigroup a =&gt; a -&gt; a -&gt; a -&gt; a
</span><a href="#local-6989586621679156197"><span class="hs-identifier hs-var">combine</span></a></span><span> </span><span class="annot"><span class="annottext">c
</span><a href="#local-6989586621679156192"><span class="hs-identifier hs-var">sep</span></a></span><span> </span><span class="annot"><span class="annottext">(c -&gt; c -&gt; c) -&gt; t c -&gt; t (c -&gt; c)
forall (f :: * -&gt; *) a b. Functor f =&gt; (a -&gt; b) -&gt; f a -&gt; f b
</span><span class="hs-operator hs-var">&lt;$&gt;</span></span><span> </span><span class="annot"><span class="annottext">t c
</span><a href="#local-6989586621679156195"><span class="hs-identifier hs-var">sv</span></a></span><span> </span><span class="annot"><span class="annottext">t (c -&gt; c) -&gt; t c -&gt; t c
forall a b. t (a -&gt; b) -&gt; t a -&gt; t b
forall (f :: * -&gt; *) a b. Applicative f =&gt; f (a -&gt; b) -&gt; f a -&gt; f b
</span><span class="hs-operator hs-var">&lt;*&gt;</span></span><span> </span><span class="annot"><span class="annottext">t c
</span><a href="#local-6989586621679156196"><span class="hs-identifier hs-var">v</span></a></span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">t c -&gt; t c -&gt; t c
forall a. t a -&gt; t a -&gt; t a
forall (f :: * -&gt; *) a. Alternative f =&gt; f a -&gt; f a -&gt; f a
</span><span class="hs-operator hs-var">&lt;|&gt;</span></span><span> </span><span class="annot"><span class="annottext">t c
</span><a href="#local-6989586621679156195"><span class="hs-identifier hs-var">sv</span></a></span><span> </span><span class="annot"><span class="annottext">t c -&gt; t c -&gt; t c
forall a. t a -&gt; t a -&gt; t a
forall (f :: * -&gt; *) a. Alternative f =&gt; f a -&gt; f a -&gt; f a
</span><span class="hs-operator hs-var">&lt;|&gt;</span></span><span> </span><span class="annot"><span class="annottext">t c
</span><a href="#local-6989586621679156196"><span class="hs-identifier hs-var">v</span></a></span><span class="hs-special">)</span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">[(b, t c)]
</span><a href="#local-6989586621679156191"><span class="hs-identifier hs-var">expandList</span></a></span><span class="hs-special">]</span><span>
</span><span id="line-392"></span><span>    </span><span id="local-6989586621679156197"><span class="annot"><span class="annottext">combine :: a -&gt; a -&gt; a -&gt; a
</span><a href="#local-6989586621679156197"><span class="hs-identifier hs-var hs-var">combine</span></a></span></span><span> </span><span id="local-6989586621679156201"><span class="annot"><span class="annottext">a
</span><a href="#local-6989586621679156201"><span class="hs-identifier hs-var">sep</span></a></span></span><span> </span><span id="local-6989586621679156202"><span class="annot"><span class="annottext">a
</span><a href="#local-6989586621679156202"><span class="hs-identifier hs-var">x</span></a></span></span><span> </span><span id="local-6989586621679156203"><span class="annot"><span class="annottext">a
</span><a href="#local-6989586621679156203"><span class="hs-identifier hs-var">y</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">a
</span><a href="#local-6989586621679156202"><span class="hs-identifier hs-var">x</span></a></span><span> </span><span class="annot"><span class="annottext">a -&gt; a -&gt; a
forall a. Semigroup a =&gt; a -&gt; a -&gt; a
</span><span class="hs-operator hs-var">&lt;&gt;</span></span><span> </span><span class="annot"><span class="annottext">a
</span><a href="#local-6989586621679156201"><span class="hs-identifier hs-var">sep</span></a></span><span> </span><span class="annot"><span class="annottext">a -&gt; a -&gt; a
forall a. Semigroup a =&gt; a -&gt; a -&gt; a
</span><span class="hs-operator hs-var">&lt;&gt;</span></span><span> </span><span class="annot"><span class="annottext">a
</span><a href="#local-6989586621679156203"><span class="hs-identifier hs-var">y</span></a></span><span>
</span><span id="line-393"></span><span>    </span><span id="local-6989586621679156191"><span class="annot"><span class="annottext">expandList :: [(b, t c)]
</span><a href="#local-6989586621679156191"><span class="hs-identifier hs-var hs-var">expandList</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">(f (t a) -&gt; [(b, t c)]) -&gt; [f (t a)] -&gt; [(b, t c)]
forall (t :: * -&gt; *) a b. Foldable t =&gt; (a -&gt; [b]) -&gt; t a -&gt; [b]
</span><span class="hs-identifier hs-var">P.concatMap</span></span><span> </span><span class="annot"><span class="annottext">f (t a) -&gt; [(b, t c)]
</span><a href="#local-6989586621679156187"><span class="hs-identifier hs-var">encode</span></a></span><span> </span><span class="annot"><span class="annottext">([f (t a)] -&gt; [(b, t c)])
-&gt; (f (t [a]) -&gt; [f (t a)]) -&gt; f (t [a]) -&gt; [(b, t c)]
forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">(t [a] -&gt; [t a]) -&gt; f (t [a]) -&gt; [f (t a)]
forall (t :: * -&gt; *) (f :: * -&gt; *) a b.
(Traversable t, Applicative f) =&gt;
(a -&gt; f b) -&gt; t a -&gt; f (t b)
forall (f :: * -&gt; *) a b.
Applicative f =&gt;
(a -&gt; f b) -&gt; f a -&gt; f (f b)
</span><span class="hs-identifier hs-var">P.traverse</span></span><span> </span><span class="annot"><span class="annottext">((t [a] -&gt; [t a]) -&gt; f (t [a]) -&gt; [f (t a)])
-&gt; (([a] -&gt; [a]) -&gt; t [a] -&gt; [t a])
-&gt; ([a] -&gt; [a])
-&gt; f (t [a])
-&gt; [f (t a)]
forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">([a] -&gt; [a]) -&gt; t [a] -&gt; [t a]
forall (t :: * -&gt; *) (f :: * -&gt; *) a b.
(Traversable t, Applicative f) =&gt;
(a -&gt; f b) -&gt; t a -&gt; f (t b)
forall (f :: * -&gt; *) a b.
Applicative f =&gt;
(a -&gt; f b) -&gt; t a -&gt; f (t b)
</span><span class="hs-identifier hs-var">P.traverse</span></span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">[a] -&gt; [a]
forall a. [a] -&gt; [a]
forall (t :: * -&gt; *) a. Foldable t =&gt; t a -&gt; [a]
</span><span class="hs-identifier hs-var">P.toList</span></span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">f (t [a])
</span><a href="#local-6989586621679156189"><span class="hs-identifier hs-var">xs</span></a></span><span>
</span><span id="line-394"></span><span>    </span><span class="hs-pragma">{-# INLINE</span><span> </span><span class="annot"><a href="#local-6989586621679156190"><span class="hs-pragma hs-type">go</span></a></span><span> </span><span class="hs-pragma">#-}</span><span>
</span><span id="line-395"></span><span>    </span><span class="hs-pragma">{-# INLINE</span><span> </span><span class="annot"><a href="#local-6989586621679156191"><span class="hs-pragma hs-type">expandList</span></a></span><span> </span><span class="hs-pragma">#-}</span><span>
</span><span id="line-396"></span><span>    </span><span class="hs-pragma">{-# INLINE</span><span> </span><span class="annot"><a href="#local-6989586621679156197"><span class="hs-pragma hs-type">combine</span></a></span><span> </span><span class="hs-pragma">#-}</span><span>
</span><span id="line-397"></span><span>
</span><span id="line-398"></span><span class="annot"><span class="hs-comment">-- * AuthMethods</span></span><span>
</span><span id="line-399"></span><span>
</span><span id="line-400"></span><span class="annot"><span class="hs-comment">-- | Provides a method to apply auth methods to requests</span></span><span>
</span><span id="line-401"></span><span class="hs-keyword">class</span><span> </span><span class="annot"><span class="hs-identifier hs-type">P.Typeable</span></span><span> </span><span class="annot"><a href="#local-6989586621679155322"><span class="hs-identifier hs-type">a</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span>
</span><span id="line-402"></span><span>      </span><span id="AuthMethod"><span class="annot"><a href="OpenAPIPetstore.Core.html#AuthMethod"><span class="hs-identifier hs-var">AuthMethod</span></a></span></span><span> </span><span id="local-6989586621679155322"><span class="annot"><a href="#local-6989586621679155322"><span class="hs-identifier hs-type">a</span></a></span></span><span>  </span><span class="hs-keyword">where</span><span>
</span><span id="line-403"></span><span>  </span><span id="applyAuthMethod"><span class="annot"><a href="OpenAPIPetstore.Core.html#applyAuthMethod"><span class="hs-identifier hs-type">applyAuthMethod</span></a></span></span><span>
</span><span id="line-404"></span><span>    </span><span class="hs-glyph">::</span><span> </span><span id="local-6989586621679155405"><span id="local-6989586621679155406"><span id="local-6989586621679155407"><span id="local-6989586621679155408"><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreConfig"><span class="hs-identifier hs-type">OpenAPIPetstoreConfig</span></a></span><span>
</span><span id="line-405"></span><span>    </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="#local-6989586621679155322"><span class="hs-identifier hs-type">a</span></a></span><span>
</span><span id="line-406"></span><span>    </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155405"><span class="hs-identifier hs-type">req</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155406"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155407"><span class="hs-identifier hs-type">res</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155408"><span class="hs-identifier hs-type">accept</span></a></span><span>
</span><span id="line-407"></span><span>    </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="hs-identifier hs-type">IO</span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155405"><span class="hs-identifier hs-type">req</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155406"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155407"><span class="hs-identifier hs-type">res</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155408"><span class="hs-identifier hs-type">accept</span></a></span><span class="hs-special">)</span></span></span></span></span><span>
</span><span id="line-408"></span><span>
</span><span id="line-409"></span><span class="annot"><span class="hs-comment">-- | An existential wrapper for any AuthMethod</span></span><span>
</span><span id="line-410"></span><span class="hs-keyword">data</span><span> </span><span id="AnyAuthMethod"><span class="annot"><a href="OpenAPIPetstore.Core.html#AnyAuthMethod"><span class="hs-identifier hs-var">AnyAuthMethod</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">forall</span><span> </span><span id="local-6989586621679156208"><span class="annot"><a href="#local-6989586621679156208"><span class="hs-identifier hs-type">a</span></a></span></span><span class="hs-operator">.</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#AuthMethod"><span class="hs-identifier hs-type">AuthMethod</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679156208"><span class="hs-identifier hs-type">a</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span id="AnyAuthMethod"><span class="annot"><a href="OpenAPIPetstore.Core.html#AnyAuthMethod"><span class="hs-identifier hs-var">AnyAuthMethod</span></a></span></span><span> </span><span class="annot"><a href="#local-6989586621679156208"><span class="hs-identifier hs-type">a</span></a></span><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">P.Typeable</span></span><span class="hs-special">)</span><span>
</span><span id="line-411"></span><span>
</span><span id="line-412"></span><span class="hs-keyword">instance</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#AuthMethod"><span class="hs-identifier hs-type">AuthMethod</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#AnyAuthMethod"><span class="hs-identifier hs-type">AnyAuthMethod</span></a></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679156214"><span class="annot"><span class="annottext">applyAuthMethod :: forall req contentType res accept.
OpenAPIPetstoreConfig
-&gt; AnyAuthMethod
-&gt; OpenAPIPetstoreRequest req contentType res accept
-&gt; IO (OpenAPIPetstoreRequest req contentType res accept)
</span><a href="OpenAPIPetstore.Core.html#applyAuthMethod"><span class="hs-identifier hs-var hs-var hs-var hs-var">applyAuthMethod</span></a></span></span><span> </span><span id="local-6989586621679156215"><span class="annot"><span class="annottext">OpenAPIPetstoreConfig
</span><a href="#local-6989586621679156215"><span class="hs-identifier hs-var">config</span></a></span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Core.html#AnyAuthMethod"><span class="hs-identifier hs-type">AnyAuthMethod</span></a></span><span> </span><span id="local-6989586621679156218"><span class="annot"><span class="annottext">a
</span><a href="#local-6989586621679156218"><span class="hs-identifier hs-var">a</span></a></span></span><span class="hs-special">)</span><span> </span><span id="local-6989586621679156219"><span class="annot"><span class="annottext">OpenAPIPetstoreRequest req contentType res accept
</span><a href="#local-6989586621679156219"><span class="hs-identifier hs-var">req</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreConfig
-&gt; a
-&gt; OpenAPIPetstoreRequest req contentType res accept
-&gt; IO (OpenAPIPetstoreRequest req contentType res accept)
forall a req contentType res accept.
AuthMethod a =&gt;
OpenAPIPetstoreConfig
-&gt; a
-&gt; OpenAPIPetstoreRequest req contentType res accept
-&gt; IO (OpenAPIPetstoreRequest req contentType res accept)
forall req contentType res accept.
OpenAPIPetstoreConfig
-&gt; a
-&gt; OpenAPIPetstoreRequest req contentType res accept
-&gt; IO (OpenAPIPetstoreRequest req contentType res accept)
</span><a href="OpenAPIPetstore.Core.html#applyAuthMethod"><span class="hs-identifier hs-var">applyAuthMethod</span></a></span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreConfig
</span><a href="#local-6989586621679156215"><span class="hs-identifier hs-var">config</span></a></span><span> </span><span class="annot"><span class="annottext">a
</span><a href="#local-6989586621679156218"><span class="hs-identifier hs-var">a</span></a></span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest req contentType res accept
</span><a href="#local-6989586621679156219"><span class="hs-identifier hs-var">req</span></a></span><span>
</span><span id="line-413"></span><span>
</span><span id="line-414"></span><span class="annot"><span class="hs-comment">-- | indicates exceptions related to AuthMethods</span></span><span>
</span><span id="line-415"></span><span class="hs-keyword">data</span><span> </span><span id="AuthMethodException"><span class="annot"><a href="OpenAPIPetstore.Core.html#AuthMethodException"><span class="hs-identifier hs-var">AuthMethodException</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span id="AuthMethodException"><span class="annot"><a href="OpenAPIPetstore.Core.html#AuthMethodException"><span class="hs-identifier hs-var">AuthMethodException</span></a></span></span><span> </span><span class="annot"><span class="hs-identifier hs-type">String</span></span><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span id="local-6989586621679156222"><span id="local-6989586621679156227"><span id="local-6989586621679156231"><span class="annot"><span class="annottext">Int -&gt; AuthMethodException -&gt; ShowS
[AuthMethodException] -&gt; ShowS
AuthMethodException -&gt; String
(Int -&gt; AuthMethodException -&gt; ShowS)
-&gt; (AuthMethodException -&gt; String)
-&gt; ([AuthMethodException] -&gt; ShowS)
-&gt; Show AuthMethodException
forall a.
(Int -&gt; a -&gt; ShowS) -&gt; (a -&gt; String) -&gt; ([a] -&gt; ShowS) -&gt; Show a
$cshowsPrec :: Int -&gt; AuthMethodException -&gt; ShowS
showsPrec :: Int -&gt; AuthMethodException -&gt; ShowS
$cshow :: AuthMethodException -&gt; String
show :: AuthMethodException -&gt; String
$cshowList :: [AuthMethodException] -&gt; ShowS
showList :: [AuthMethodException] -&gt; ShowS
</span><span class="hs-identifier hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var">P.Show</span></span></span></span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-identifier hs-type">P.Typeable</span></span><span class="hs-special">)</span><span>
</span><span id="line-416"></span><span>
</span><span id="line-417"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679156239"><span id="local-6989586621679156243"><span id="local-6989586621679156246"><span class="annot"><span class="hs-identifier hs-type">E.Exception</span></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#AuthMethodException"><span class="hs-identifier hs-type">AuthMethodException</span></a></span></span></span></span><span>
</span><span id="line-418"></span><span>
</span><span id="line-419"></span><span class="annot"><span class="hs-comment">-- | apply all matching AuthMethods in config to request</span></span><span>
</span><span id="line-420"></span><span id="local-6989586621679155418"><span id="local-6989586621679155419"><span id="local-6989586621679155420"><span id="local-6989586621679155421"><span class="annot"><a href="OpenAPIPetstore.Core.html#_applyAuthMethods"><span class="hs-identifier hs-type">_applyAuthMethods</span></a></span><span>
</span><span id="line-421"></span><span>  </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155418"><span class="hs-identifier hs-type">req</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155419"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155420"><span class="hs-identifier hs-type">res</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155421"><span class="hs-identifier hs-type">accept</span></a></span><span>
</span><span id="line-422"></span><span>  </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreConfig"><span class="hs-identifier hs-type">OpenAPIPetstoreConfig</span></a></span><span>
</span><span id="line-423"></span><span>  </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="hs-identifier hs-type">IO</span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155418"><span class="hs-identifier hs-type">req</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155419"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155420"><span class="hs-identifier hs-type">res</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155421"><span class="hs-identifier hs-type">accept</span></a></span><span class="hs-special">)</span></span></span></span></span><span>
</span><span id="line-424"></span><span id="_applyAuthMethods"><span class="annot"><span class="annottext">_applyAuthMethods :: forall req contentType res accept.
OpenAPIPetstoreRequest req contentType res accept
-&gt; OpenAPIPetstoreConfig
-&gt; IO (OpenAPIPetstoreRequest req contentType res accept)
</span><a href="OpenAPIPetstore.Core.html#_applyAuthMethods"><span class="hs-identifier hs-var hs-var">_applyAuthMethods</span></a></span></span><span> </span><span id="local-6989586621679156252"><span class="annot"><span class="annottext">OpenAPIPetstoreRequest req contentType res accept
</span><a href="#local-6989586621679156252"><span class="hs-identifier hs-var">req</span></a></span></span><span> </span><span id="local-6989586621679156253"><span class="annot"><span class="annottext">config :: OpenAPIPetstoreConfig
</span><a href="#local-6989586621679156253"><span class="hs-identifier hs-var">config</span></a></span></span><span class="hs-glyph">@</span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreConfig"><span class="hs-identifier hs-type">OpenAPIPetstoreConfig</span></a></span><span> </span><span class="hs-special">{</span><span class="annot"><span class="annottext">configAuthMethods :: OpenAPIPetstoreConfig -&gt; [AnyAuthMethod]
</span><a href="OpenAPIPetstore.Core.html#configAuthMethods"><span class="hs-identifier hs-var">configAuthMethods</span></a></span><span> </span><span class="hs-glyph">=</span><span> </span><span id="local-6989586621679156254"><span class="annot"><span class="annottext">[AnyAuthMethod]
</span><a href="#local-6989586621679156254"><span class="hs-keyword hs-var">as</span></a></span></span><span class="hs-special">}</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
</span><span id="line-425"></span><span>  </span><span class="annot"><span class="annottext">(OpenAPIPetstoreRequest req contentType res accept
 -&gt; AnyAuthMethod
 -&gt; IO (OpenAPIPetstoreRequest req contentType res accept))
-&gt; OpenAPIPetstoreRequest req contentType res accept
-&gt; [AnyAuthMethod]
-&gt; IO (OpenAPIPetstoreRequest req contentType res accept)
forall (t :: * -&gt; *) (m :: * -&gt; *) b a.
(Foldable t, Monad m) =&gt;
(b -&gt; a -&gt; m b) -&gt; b -&gt; t a -&gt; m b
</span><span class="hs-identifier hs-var">foldlM</span></span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest req contentType res accept
-&gt; AnyAuthMethod
-&gt; IO (OpenAPIPetstoreRequest req contentType res accept)
</span><a href="#local-6989586621679156255"><span class="hs-identifier hs-var">go</span></a></span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest req contentType res accept
</span><a href="#local-6989586621679156252"><span class="hs-identifier hs-var">req</span></a></span><span> </span><span class="annot"><span class="annottext">[AnyAuthMethod]
</span><a href="#local-6989586621679156254"><span class="hs-keyword hs-var">as</span></a></span><span>
</span><span id="line-426"></span><span>  </span><span class="hs-keyword">where</span><span>
</span><span id="line-427"></span><span>    </span><span id="local-6989586621679156255"><span class="annot"><span class="annottext">go :: OpenAPIPetstoreRequest req contentType res accept
-&gt; AnyAuthMethod
-&gt; IO (OpenAPIPetstoreRequest req contentType res accept)
</span><a href="#local-6989586621679156255"><span class="hs-identifier hs-var hs-var">go</span></a></span></span><span> </span><span id="local-6989586621679156256"><span class="annot"><span class="annottext">OpenAPIPetstoreRequest req contentType res accept
</span><a href="#local-6989586621679156256"><span class="hs-identifier hs-var">r</span></a></span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Core.html#AnyAuthMethod"><span class="hs-identifier hs-type">AnyAuthMethod</span></a></span><span> </span><span id="local-6989586621679156259"><span class="annot"><span class="annottext">a
</span><a href="#local-6989586621679156259"><span class="hs-identifier hs-var">a</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreConfig
-&gt; a
-&gt; OpenAPIPetstoreRequest req contentType res accept
-&gt; IO (OpenAPIPetstoreRequest req contentType res accept)
forall a req contentType res accept.
AuthMethod a =&gt;
OpenAPIPetstoreConfig
-&gt; a
-&gt; OpenAPIPetstoreRequest req contentType res accept
-&gt; IO (OpenAPIPetstoreRequest req contentType res accept)
forall req contentType res accept.
OpenAPIPetstoreConfig
-&gt; a
-&gt; OpenAPIPetstoreRequest req contentType res accept
-&gt; IO (OpenAPIPetstoreRequest req contentType res accept)
</span><a href="OpenAPIPetstore.Core.html#applyAuthMethod"><span class="hs-identifier hs-var">applyAuthMethod</span></a></span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreConfig
</span><a href="#local-6989586621679156253"><span class="hs-identifier hs-var">config</span></a></span><span> </span><span class="annot"><span class="annottext">a
</span><a href="#local-6989586621679156259"><span class="hs-identifier hs-var">a</span></a></span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest req contentType res accept
</span><a href="#local-6989586621679156256"><span class="hs-identifier hs-var">r</span></a></span><span>
</span><span id="line-428"></span><span>
</span><span id="line-429"></span><span class="annot"><span class="hs-comment">-- * Utils</span></span><span>
</span><span id="line-430"></span><span>
</span><span id="line-431"></span><span class="annot"><span class="hs-comment">-- | Removes Null fields.  (OpenAPI-Specification 2.0 does not allow Null in JSON)</span></span><span class="hs-cpp">
#if MIN_VERSION_aeson(2,0,0)
</span><span class="annot"><a href="OpenAPIPetstore.Core.html#_omitNulls"><span class="hs-identifier hs-type">_omitNulls</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">[</span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">A.Key</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-identifier hs-type">A.Value</span></span><span class="hs-special">)</span><span class="hs-special">]</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="hs-identifier hs-type">A.Value</span></span><span class="hs-cpp">
#else
</span><span class="hs-identifier">_omitNulls</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">[</span><span class="hs-special">(</span><span class="hs-identifier">Text</span><span class="hs-special">,</span><span> </span><span class="hs-identifier">A.Value</span><span class="hs-special">)</span><span class="hs-special">]</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier">A.Value</span><span class="hs-cpp">
#endif
</span><span id="_omitNulls"><span class="annot"><span class="annottext">_omitNulls :: [(Key, Value)] -&gt; Value
</span><a href="OpenAPIPetstore.Core.html#_omitNulls"><span class="hs-identifier hs-var hs-var">_omitNulls</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">[(Key, Value)] -&gt; Value
</span><span class="hs-identifier hs-var">A.object</span></span><span> </span><span class="annot"><span class="annottext">([(Key, Value)] -&gt; Value)
-&gt; ([(Key, Value)] -&gt; [(Key, Value)]) -&gt; [(Key, Value)] -&gt; Value
forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">((Key, Value) -&gt; Bool) -&gt; [(Key, Value)] -&gt; [(Key, Value)]
forall a. (a -&gt; Bool) -&gt; [a] -&gt; [a]
</span><span class="hs-identifier hs-var">P.filter</span></span><span> </span><span class="annot"><span class="annottext">(Key, Value) -&gt; Bool
forall {a}. (a, Value) -&gt; Bool
</span><a href="#local-6989586621679156262"><span class="hs-identifier hs-var">notNull</span></a></span><span>
</span><span id="line-438"></span><span>  </span><span class="hs-keyword">where</span><span>
</span><span id="line-439"></span><span>    </span><span id="local-6989586621679156262"><span class="annot"><span class="annottext">notNull :: (a, Value) -&gt; Bool
</span><a href="#local-6989586621679156262"><span class="hs-identifier hs-var hs-var">notNull</span></a></span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">a
</span><span class="hs-identifier">_</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="annottext">Value
</span><span class="hs-identifier hs-var">A.Null</span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Bool
</span><span class="hs-identifier hs-var">False</span></span><span>
</span><span id="line-440"></span><span>    </span><span class="annot"><a href="#local-6989586621679156262"><span class="hs-identifier hs-var">notNull</span></a></span><span> </span><span class="annot"><span class="annottext">(a, Value)
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Bool
</span><span class="hs-identifier hs-var">True</span></span><span>
</span><span id="line-441"></span><span>
</span><span id="line-442"></span><span class="annot"><span class="hs-comment">-- | Encodes fields using WH.toQueryParam</span></span><span>
</span><span id="line-443"></span><span id="local-6989586621679155434"><span id="local-6989586621679155435"><span id="local-6989586621679155436"><span class="annot"><a href="OpenAPIPetstore.Core.html#_toFormItem"><span class="hs-identifier hs-type">_toFormItem</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">WH.ToHttpApiData</span></span><span> </span><span class="annot"><a href="#local-6989586621679155434"><span class="hs-identifier hs-type">a</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-identifier hs-type">Functor</span></span><span> </span><span class="annot"><a href="#local-6989586621679155435"><span class="hs-identifier hs-type">f</span></a></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span class="annot"><a href="#local-6989586621679155436"><span class="hs-identifier hs-type">t</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="#local-6989586621679155435"><span class="hs-identifier hs-type">f</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155434"><span class="hs-identifier hs-type">a</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="#local-6989586621679155435"><span class="hs-identifier hs-type">f</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="#local-6989586621679155436"><span class="hs-identifier hs-type">t</span></a></span><span class="hs-special">,</span><span> </span><span class="hs-special">[</span><span class="annot"><span class="hs-identifier hs-type">Text</span></span><span class="hs-special">]</span><span class="hs-special">)</span></span></span></span><span>
</span><span id="line-444"></span><span id="_toFormItem"><span class="annot"><span class="annottext">_toFormItem :: forall a (f :: * -&gt; *) t.
(ToHttpApiData a, Functor f) =&gt;
t -&gt; f a -&gt; f (t, [Text])
</span><a href="OpenAPIPetstore.Core.html#_toFormItem"><span class="hs-identifier hs-var hs-var">_toFormItem</span></a></span></span><span> </span><span id="local-6989586621679156269"><span class="annot"><span class="annottext">t
</span><a href="#local-6989586621679156269"><span class="hs-identifier hs-var">name</span></a></span></span><span> </span><span id="local-6989586621679156270"><span class="annot"><span class="annottext">f a
</span><a href="#local-6989586621679156270"><span class="hs-identifier hs-var">x</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">t
</span><a href="#local-6989586621679156269"><span class="hs-identifier hs-var">name</span></a></span><span class="hs-special">,</span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">([Text] -&gt; (t, [Text])) -&gt; (a -&gt; [Text]) -&gt; a -&gt; (t, [Text])
forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Text -&gt; [Text] -&gt; [Text]
forall a. a -&gt; [a] -&gt; [a]
</span><span class="hs-glyph hs-var">:</span></span><span class="hs-special">[</span><span class="hs-special">]</span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">(Text -&gt; [Text]) -&gt; (a -&gt; Text) -&gt; a -&gt; [Text]
forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">a -&gt; Text
forall a. ToHttpApiData a =&gt; a -&gt; Text
</span><span class="hs-identifier hs-var">WH.toQueryParam</span></span><span> </span><span class="annot"><span class="annottext">(a -&gt; (t, [Text])) -&gt; f a -&gt; f (t, [Text])
forall (f :: * -&gt; *) a b. Functor f =&gt; (a -&gt; b) -&gt; f a -&gt; f b
</span><span class="hs-operator hs-var">&lt;$&gt;</span></span><span> </span><span class="annot"><span class="annottext">f a
</span><a href="#local-6989586621679156270"><span class="hs-identifier hs-var">x</span></a></span><span>
</span><span id="line-445"></span><span>
</span><span id="line-446"></span><span class="annot"><span class="hs-comment">-- | Collapse (Just &quot;&quot;) to Nothing</span></span><span>
</span><span id="line-447"></span><span class="annot"><a href="OpenAPIPetstore.Core.html#_emptyToNothing"><span class="hs-identifier hs-type">_emptyToNothing</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">Maybe</span></span><span> </span><span class="annot"><span class="hs-identifier hs-type">String</span></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="hs-identifier hs-type">Maybe</span></span><span> </span><span class="annot"><span class="hs-identifier hs-type">String</span></span><span>
</span><span id="line-448"></span><span id="_emptyToNothing"><span class="annot"><span class="annottext">_emptyToNothing :: Maybe String -&gt; Maybe String
</span><a href="OpenAPIPetstore.Core.html#_emptyToNothing"><span class="hs-identifier hs-var hs-var">_emptyToNothing</span></a></span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">Just</span></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;&quot;</span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Maybe String
forall a. Maybe a
</span><span class="hs-identifier hs-var">Nothing</span></span><span>
</span><span id="line-449"></span><span class="annot"><a href="OpenAPIPetstore.Core.html#_emptyToNothing"><span class="hs-identifier hs-var">_emptyToNothing</span></a></span><span> </span><span id="local-6989586621679156272"><span class="annot"><span class="annottext">Maybe String
</span><a href="#local-6989586621679156272"><span class="hs-identifier hs-var">x</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Maybe String
</span><a href="#local-6989586621679156272"><span class="hs-identifier hs-var">x</span></a></span><span>
</span><span id="line-450"></span><span class="hs-pragma">{-# INLINE</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#_emptyToNothing"><span class="hs-pragma hs-type">_emptyToNothing</span></a></span><span> </span><span class="hs-pragma">#-}</span><span>
</span><span id="line-451"></span><span>
</span><span id="line-452"></span><span class="annot"><span class="hs-comment">-- | Collapse (Just mempty) to Nothing</span></span><span>
</span><span id="line-453"></span><span id="local-6989586621679155440"><span class="annot"><a href="OpenAPIPetstore.Core.html#_memptyToNothing"><span class="hs-identifier hs-type">_memptyToNothing</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">P.Monoid</span></span><span> </span><span class="annot"><a href="#local-6989586621679155440"><span class="hs-identifier hs-type">a</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-identifier hs-type">P.Eq</span></span><span> </span><span class="annot"><a href="#local-6989586621679155440"><span class="hs-identifier hs-type">a</span></a></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span class="annot"><span class="hs-identifier hs-type">Maybe</span></span><span> </span><span class="annot"><a href="#local-6989586621679155440"><span class="hs-identifier hs-type">a</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="hs-identifier hs-type">Maybe</span></span><span> </span><span class="annot"><a href="#local-6989586621679155440"><span class="hs-identifier hs-type">a</span></a></span></span><span>
</span><span id="line-454"></span><span id="_memptyToNothing"><span class="annot"><span class="annottext">_memptyToNothing :: forall a. (Monoid a, Eq a) =&gt; Maybe a -&gt; Maybe a
</span><a href="OpenAPIPetstore.Core.html#_memptyToNothing"><span class="hs-identifier hs-var hs-var">_memptyToNothing</span></a></span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">Just</span></span><span> </span><span id="local-6989586621679156278"><span class="annot"><span class="annottext">a
</span><a href="#local-6989586621679156278"><span class="hs-identifier hs-var">x</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">|</span><span> </span><span class="annot"><span class="annottext">a
</span><a href="#local-6989586621679156278"><span class="hs-identifier hs-var">x</span></a></span><span> </span><span class="annot"><span class="annottext">a -&gt; a -&gt; Bool
forall a. Eq a =&gt; a -&gt; a -&gt; Bool
</span><span class="hs-operator hs-var">P.==</span></span><span> </span><span class="annot"><span class="annottext">a
forall a. Monoid a =&gt; a
</span><span class="hs-identifier hs-var">P.mempty</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Maybe a
forall a. Maybe a
</span><span class="hs-identifier hs-var">Nothing</span></span><span>
</span><span id="line-455"></span><span class="annot"><a href="OpenAPIPetstore.Core.html#_memptyToNothing"><span class="hs-identifier hs-var">_memptyToNothing</span></a></span><span> </span><span id="local-6989586621679156279"><span class="annot"><span class="annottext">Maybe a
</span><a href="#local-6989586621679156279"><span class="hs-identifier hs-var">x</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Maybe a
</span><a href="#local-6989586621679156279"><span class="hs-identifier hs-var">x</span></a></span><span>
</span><span id="line-456"></span><span class="hs-pragma">{-# INLINE</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#_memptyToNothing"><span class="hs-pragma hs-type">_memptyToNothing</span></a></span><span> </span><span class="hs-pragma">#-}</span><span>
</span><span id="line-457"></span><span>
</span><span id="line-458"></span><span class="annot"><span class="hs-comment">-- * DateTime Formatting</span></span><span>
</span><span id="line-459"></span><span>
</span><span id="line-460"></span><span class="hs-keyword">newtype</span><span> </span><span id="DateTime"><span class="annot"><a href="OpenAPIPetstore.Core.html#DateTime"><span class="hs-identifier hs-var">DateTime</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span id="DateTime"><span class="annot"><a href="OpenAPIPetstore.Core.html#DateTime"><span class="hs-identifier hs-var">DateTime</span></a></span></span><span> </span><span class="hs-special">{</span><span> </span><span id="unDateTime"><span class="annot"><span class="annottext">DateTime -&gt; UTCTime
</span><a href="OpenAPIPetstore.Core.html#unDateTime"><span class="hs-identifier hs-var hs-var">unDateTime</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">TI.UTCTime</span></span><span> </span><span class="hs-special">}</span><span>
</span><span id="line-461"></span><span>  </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span id="local-6989586621679156283"><span id="local-6989586621679156288"><span class="annot"><span class="annottext">DateTime -&gt; DateTime -&gt; Bool
(DateTime -&gt; DateTime -&gt; Bool)
-&gt; (DateTime -&gt; DateTime -&gt; Bool) -&gt; Eq DateTime
forall a. (a -&gt; a -&gt; Bool) -&gt; (a -&gt; a -&gt; Bool) -&gt; Eq a
$c== :: DateTime -&gt; DateTime -&gt; Bool
== :: DateTime -&gt; DateTime -&gt; Bool
$c/= :: DateTime -&gt; DateTime -&gt; Bool
/= :: DateTime -&gt; DateTime -&gt; Bool
</span><span class="hs-identifier hs-var hs-var hs-var hs-var hs-var hs-var">P.Eq</span></span></span></span><span class="hs-special">,</span><span id="local-6989586621679156296"><span id="local-6989586621679156300"><span id="local-6989586621679156303"><span id="local-6989586621679156305"><span id="local-6989586621679156307"><span id="local-6989586621679156313"><span id="local-6989586621679156318"><span id="local-6989586621679156321"><span id="local-6989586621679156324"><span id="local-6989586621679156327"><span id="local-6989586621679156330"><span id="local-6989586621679156333"><span id="local-6989586621679156338"><span id="local-6989586621679156343"><span class="annot"><span class="annottext">Typeable DateTime
Typeable DateTime
-&gt; (forall (c :: * -&gt; *).
    (forall d b. Data d =&gt; c (d -&gt; b) -&gt; d -&gt; c b)
    -&gt; (forall g. g -&gt; c g) -&gt; DateTime -&gt; c DateTime)
-&gt; (forall (c :: * -&gt; *).
    (forall b r. Data b =&gt; c (b -&gt; r) -&gt; c r)
    -&gt; (forall r. r -&gt; c r) -&gt; Constr -&gt; c DateTime)
-&gt; (DateTime -&gt; Constr)
-&gt; (DateTime -&gt; DataType)
-&gt; (forall (t :: * -&gt; *) (c :: * -&gt; *).
    Typeable t =&gt;
    (forall d. Data d =&gt; c (t d)) -&gt; Maybe (c DateTime))
-&gt; (forall (t :: * -&gt; * -&gt; *) (c :: * -&gt; *).
    Typeable t =&gt;
    (forall d e. (Data d, Data e) =&gt; c (t d e)) -&gt; Maybe (c DateTime))
-&gt; ((forall b. Data b =&gt; b -&gt; b) -&gt; DateTime -&gt; DateTime)
-&gt; (forall r r'.
    (r -&gt; r' -&gt; r)
    -&gt; r -&gt; (forall d. Data d =&gt; d -&gt; r') -&gt; DateTime -&gt; r)
-&gt; (forall r r'.
    (r' -&gt; r -&gt; r)
    -&gt; r -&gt; (forall d. Data d =&gt; d -&gt; r') -&gt; DateTime -&gt; r)
-&gt; (forall u. (forall d. Data d =&gt; d -&gt; u) -&gt; DateTime -&gt; [u])
-&gt; (forall u. Int -&gt; (forall d. Data d =&gt; d -&gt; u) -&gt; DateTime -&gt; u)
-&gt; (forall (m :: * -&gt; *).
    Monad m =&gt;
    (forall d. Data d =&gt; d -&gt; m d) -&gt; DateTime -&gt; m DateTime)
-&gt; (forall (m :: * -&gt; *).
    MonadPlus m =&gt;
    (forall d. Data d =&gt; d -&gt; m d) -&gt; DateTime -&gt; m DateTime)
-&gt; (forall (m :: * -&gt; *).
    MonadPlus m =&gt;
    (forall d. Data d =&gt; d -&gt; m d) -&gt; DateTime -&gt; m DateTime)
-&gt; Data DateTime
DateTime -&gt; Constr
DateTime -&gt; DataType
(forall b. Data b =&gt; b -&gt; b) -&gt; DateTime -&gt; DateTime
forall a.
Typeable a
-&gt; (forall (c :: * -&gt; *).
    (forall d b. Data d =&gt; c (d -&gt; b) -&gt; d -&gt; c b)
    -&gt; (forall g. g -&gt; c g) -&gt; a -&gt; c a)
-&gt; (forall (c :: * -&gt; *).
    (forall b r. Data b =&gt; c (b -&gt; r) -&gt; c r)
    -&gt; (forall r. r -&gt; c r) -&gt; Constr -&gt; c a)
-&gt; (a -&gt; Constr)
-&gt; (a -&gt; DataType)
-&gt; (forall (t :: * -&gt; *) (c :: * -&gt; *).
    Typeable t =&gt;
    (forall d. Data d =&gt; c (t d)) -&gt; Maybe (c a))
-&gt; (forall (t :: * -&gt; * -&gt; *) (c :: * -&gt; *).
    Typeable t =&gt;
    (forall d e. (Data d, Data e) =&gt; c (t d e)) -&gt; Maybe (c a))
-&gt; ((forall b. Data b =&gt; b -&gt; b) -&gt; a -&gt; a)
-&gt; (forall r r'.
    (r -&gt; r' -&gt; r) -&gt; r -&gt; (forall d. Data d =&gt; d -&gt; r') -&gt; a -&gt; r)
-&gt; (forall r r'.
    (r' -&gt; r -&gt; r) -&gt; r -&gt; (forall d. Data d =&gt; d -&gt; r') -&gt; a -&gt; r)
-&gt; (forall u. (forall d. Data d =&gt; d -&gt; u) -&gt; a -&gt; [u])
-&gt; (forall u. Int -&gt; (forall d. Data d =&gt; d -&gt; u) -&gt; a -&gt; u)
-&gt; (forall (m :: * -&gt; *).
    Monad m =&gt;
    (forall d. Data d =&gt; d -&gt; m d) -&gt; a -&gt; m a)
-&gt; (forall (m :: * -&gt; *).
    MonadPlus m =&gt;
    (forall d. Data d =&gt; d -&gt; m d) -&gt; a -&gt; m a)
-&gt; (forall (m :: * -&gt; *).
    MonadPlus m =&gt;
    (forall d. Data d =&gt; d -&gt; m d) -&gt; a -&gt; m a)
-&gt; Data a
forall u. Int -&gt; (forall d. Data d =&gt; d -&gt; u) -&gt; DateTime -&gt; u
forall u. (forall d. Data d =&gt; d -&gt; u) -&gt; DateTime -&gt; [u]
forall r r'.
(r -&gt; r' -&gt; r)
-&gt; r -&gt; (forall d. Data d =&gt; d -&gt; r') -&gt; DateTime -&gt; r
forall r r'.
(r' -&gt; r -&gt; r)
-&gt; r -&gt; (forall d. Data d =&gt; d -&gt; r') -&gt; DateTime -&gt; r
forall (m :: * -&gt; *).
Monad m =&gt;
(forall d. Data d =&gt; d -&gt; m d) -&gt; DateTime -&gt; m DateTime
forall (m :: * -&gt; *).
MonadPlus m =&gt;
(forall d. Data d =&gt; d -&gt; m d) -&gt; DateTime -&gt; m DateTime
forall (c :: * -&gt; *).
(forall b r. Data b =&gt; c (b -&gt; r) -&gt; c r)
-&gt; (forall r. r -&gt; c r) -&gt; Constr -&gt; c DateTime
forall (c :: * -&gt; *).
(forall d b. Data d =&gt; c (d -&gt; b) -&gt; d -&gt; c b)
-&gt; (forall g. g -&gt; c g) -&gt; DateTime -&gt; c DateTime
forall (t :: * -&gt; *) (c :: * -&gt; *).
Typeable t =&gt;
(forall d. Data d =&gt; c (t d)) -&gt; Maybe (c DateTime)
forall (t :: * -&gt; * -&gt; *) (c :: * -&gt; *).
Typeable t =&gt;
(forall d e. (Data d, Data e) =&gt; c (t d e)) -&gt; Maybe (c DateTime)
$cgfoldl :: forall (c :: * -&gt; *).
(forall d b. Data d =&gt; c (d -&gt; b) -&gt; d -&gt; c b)
-&gt; (forall g. g -&gt; c g) -&gt; DateTime -&gt; c DateTime
gfoldl :: forall (c :: * -&gt; *).
(forall d b. Data d =&gt; c (d -&gt; b) -&gt; d -&gt; c b)
-&gt; (forall g. g -&gt; c g) -&gt; DateTime -&gt; c DateTime
$cgunfold :: forall (c :: * -&gt; *).
(forall b r. Data b =&gt; c (b -&gt; r) -&gt; c r)
-&gt; (forall r. r -&gt; c r) -&gt; Constr -&gt; c DateTime
gunfold :: forall (c :: * -&gt; *).
(forall b r. Data b =&gt; c (b -&gt; r) -&gt; c r)
-&gt; (forall r. r -&gt; c r) -&gt; Constr -&gt; c DateTime
$ctoConstr :: DateTime -&gt; Constr
toConstr :: DateTime -&gt; Constr
$cdataTypeOf :: DateTime -&gt; DataType
dataTypeOf :: DateTime -&gt; DataType
$cdataCast1 :: forall (t :: * -&gt; *) (c :: * -&gt; *).
Typeable t =&gt;
(forall d. Data d =&gt; c (t d)) -&gt; Maybe (c DateTime)
dataCast1 :: forall (t :: * -&gt; *) (c :: * -&gt; *).
Typeable t =&gt;
(forall d. Data d =&gt; c (t d)) -&gt; Maybe (c DateTime)
$cdataCast2 :: forall (t :: * -&gt; * -&gt; *) (c :: * -&gt; *).
Typeable t =&gt;
(forall d e. (Data d, Data e) =&gt; c (t d e)) -&gt; Maybe (c DateTime)
dataCast2 :: forall (t :: * -&gt; * -&gt; *) (c :: * -&gt; *).
Typeable t =&gt;
(forall d e. (Data d, Data e) =&gt; c (t d e)) -&gt; Maybe (c DateTime)
$cgmapT :: (forall b. Data b =&gt; b -&gt; b) -&gt; DateTime -&gt; DateTime
gmapT :: (forall b. Data b =&gt; b -&gt; b) -&gt; DateTime -&gt; DateTime
$cgmapQl :: forall r r'.
(r -&gt; r' -&gt; r)
-&gt; r -&gt; (forall d. Data d =&gt; d -&gt; r') -&gt; DateTime -&gt; r
gmapQl :: forall r r'.
(r -&gt; r' -&gt; r)
-&gt; r -&gt; (forall d. Data d =&gt; d -&gt; r') -&gt; DateTime -&gt; r
$cgmapQr :: forall r r'.
(r' -&gt; r -&gt; r)
-&gt; r -&gt; (forall d. Data d =&gt; d -&gt; r') -&gt; DateTime -&gt; r
gmapQr :: forall r r'.
(r' -&gt; r -&gt; r)
-&gt; r -&gt; (forall d. Data d =&gt; d -&gt; r') -&gt; DateTime -&gt; r
$cgmapQ :: forall u. (forall d. Data d =&gt; d -&gt; u) -&gt; DateTime -&gt; [u]
gmapQ :: forall u. (forall d. Data d =&gt; d -&gt; u) -&gt; DateTime -&gt; [u]
$cgmapQi :: forall u. Int -&gt; (forall d. Data d =&gt; d -&gt; u) -&gt; DateTime -&gt; u
gmapQi :: forall u. Int -&gt; (forall d. Data d =&gt; d -&gt; u) -&gt; DateTime -&gt; u
$cgmapM :: forall (m :: * -&gt; *).
Monad m =&gt;
(forall d. Data d =&gt; d -&gt; m d) -&gt; DateTime -&gt; m DateTime
gmapM :: forall (m :: * -&gt; *).
Monad m =&gt;
(forall d. Data d =&gt; d -&gt; m d) -&gt; DateTime -&gt; m DateTime
$cgmapMp :: forall (m :: * -&gt; *).
MonadPlus m =&gt;
(forall d. Data d =&gt; d -&gt; m d) -&gt; DateTime -&gt; m DateTime
gmapMp :: forall (m :: * -&gt; *).
MonadPlus m =&gt;
(forall d. Data d =&gt; d -&gt; m d) -&gt; DateTime -&gt; m DateTime
$cgmapMo :: forall (m :: * -&gt; *).
MonadPlus m =&gt;
(forall d. Data d =&gt; d -&gt; m d) -&gt; DateTime -&gt; m DateTime
gmapMo :: forall (m :: * -&gt; *).
MonadPlus m =&gt;
(forall d. Data d =&gt; d -&gt; m d) -&gt; DateTime -&gt; m DateTime
</span><span class="hs-identifier hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var">P.Data</span></span></span></span></span></span></span></span></span></span></span></span></span></span></span></span><span class="hs-special">,</span><span id="local-6989586621679156351"><span id="local-6989586621679156356"><span id="local-6989586621679156360"><span id="local-6989586621679156364"><span id="local-6989586621679156368"><span id="local-6989586621679156372"><span id="local-6989586621679156376"><span class="annot"><span class="annottext">Eq DateTime
Eq DateTime
-&gt; (DateTime -&gt; DateTime -&gt; Ordering)
-&gt; (DateTime -&gt; DateTime -&gt; Bool)
-&gt; (DateTime -&gt; DateTime -&gt; Bool)
-&gt; (DateTime -&gt; DateTime -&gt; Bool)
-&gt; (DateTime -&gt; DateTime -&gt; Bool)
-&gt; (DateTime -&gt; DateTime -&gt; DateTime)
-&gt; (DateTime -&gt; DateTime -&gt; DateTime)
-&gt; Ord DateTime
DateTime -&gt; DateTime -&gt; Bool
DateTime -&gt; DateTime -&gt; Ordering
DateTime -&gt; DateTime -&gt; DateTime
forall a.
Eq a
-&gt; (a -&gt; a -&gt; Ordering)
-&gt; (a -&gt; a -&gt; Bool)
-&gt; (a -&gt; a -&gt; Bool)
-&gt; (a -&gt; a -&gt; Bool)
-&gt; (a -&gt; a -&gt; Bool)
-&gt; (a -&gt; a -&gt; a)
-&gt; (a -&gt; a -&gt; a)
-&gt; Ord a
$ccompare :: DateTime -&gt; DateTime -&gt; Ordering
compare :: DateTime -&gt; DateTime -&gt; Ordering
$c&lt; :: DateTime -&gt; DateTime -&gt; Bool
&lt; :: DateTime -&gt; DateTime -&gt; Bool
$c&lt;= :: DateTime -&gt; DateTime -&gt; Bool
&lt;= :: DateTime -&gt; DateTime -&gt; Bool
$c&gt; :: DateTime -&gt; DateTime -&gt; Bool
&gt; :: DateTime -&gt; DateTime -&gt; Bool
$c&gt;= :: DateTime -&gt; DateTime -&gt; Bool
&gt;= :: DateTime -&gt; DateTime -&gt; Bool
$cmax :: DateTime -&gt; DateTime -&gt; DateTime
max :: DateTime -&gt; DateTime -&gt; DateTime
$cmin :: DateTime -&gt; DateTime -&gt; DateTime
min :: DateTime -&gt; DateTime -&gt; DateTime
</span><span class="hs-identifier hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var">P.Ord</span></span></span></span></span></span></span></span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier hs-type">P.Typeable</span></span><span class="hs-special">,</span><span id="local-6989586621679156382"><span class="annot"><span class="annottext">DateTime -&gt; ()
(DateTime -&gt; ()) -&gt; NFData DateTime
forall a. (a -&gt; ()) -&gt; NFData a
$crnf :: DateTime -&gt; ()
rnf :: DateTime -&gt; ()
</span><span class="hs-identifier hs-var hs-var hs-var hs-var">NF.NFData</span></span></span><span class="hs-special">)</span><span>
</span><span id="line-462"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679156390"><span class="annot"><span class="hs-identifier hs-type">A.FromJSON</span></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#DateTime"><span class="hs-identifier hs-type">DateTime</span></a></span></span><span> </span><span class="hs-keyword">where</span><span>
</span><span id="line-463"></span><span>  </span><span id="local-6989586621679156398"><span class="annot"><span class="annottext">parseJSON :: Value -&gt; Parser DateTime
</span><a href="#local-6989586621679156398"><span class="hs-identifier hs-var hs-var hs-var hs-var">parseJSON</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; (Text -&gt; Parser DateTime) -&gt; Value -&gt; Parser DateTime
forall a. String -&gt; (Text -&gt; Parser a) -&gt; Value -&gt; Parser a
</span><span class="hs-identifier hs-var">A.withText</span></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;DateTime&quot;</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">String -&gt; Parser DateTime
forall (m :: * -&gt; *).
(MonadFail m, Alternative m) =&gt;
String -&gt; m DateTime
</span><a href="OpenAPIPetstore.Core.html#_readDateTime"><span class="hs-identifier hs-var">_readDateTime</span></a></span><span> </span><span class="annot"><span class="annottext">(String -&gt; Parser DateTime)
-&gt; (Text -&gt; String) -&gt; Text -&gt; Parser DateTime
forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">Text -&gt; String
</span><span class="hs-identifier hs-var">T.unpack</span></span><span class="hs-special">)</span><span>
</span><span id="line-464"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679156405"><span id="local-6989586621679156409"><span id="local-6989586621679156412"><span class="annot"><span class="hs-identifier hs-type">A.ToJSON</span></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#DateTime"><span class="hs-identifier hs-type">DateTime</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
</span><span id="line-465"></span><span>  </span><span id="local-6989586621679156422"><span class="annot"><span class="annottext">toJSON :: DateTime -&gt; Value
</span><a href="#local-6989586621679156422"><span class="hs-identifier hs-var hs-var hs-var hs-var">toJSON</span></a></span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Core.html#DateTime"><span class="hs-identifier hs-type">DateTime</span></a></span><span> </span><span id="local-6989586621679156424"><span class="annot"><span class="annottext">UTCTime
</span><a href="#local-6989586621679156424"><span class="hs-identifier hs-var">t</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; Value
forall a. ToJSON a =&gt; a -&gt; Value
</span><span class="hs-identifier hs-var">A.toJSON</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">UTCTime -&gt; String
forall t. (t ~ UTCTime, FormatTime t) =&gt; t -&gt; String
</span><a href="OpenAPIPetstore.Core.html#_showDateTime"><span class="hs-identifier hs-var">_showDateTime</span></a></span><span> </span><span class="annot"><span class="annottext">UTCTime
</span><a href="#local-6989586621679156424"><span class="hs-identifier hs-var">t</span></a></span><span class="hs-special">)</span><span>
</span><span id="line-466"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679156428"><span id="local-6989586621679156432"><span class="annot"><span class="hs-identifier hs-type">WH.FromHttpApiData</span></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#DateTime"><span class="hs-identifier hs-type">DateTime</span></a></span></span></span><span> </span><span class="hs-keyword">where</span><span>
</span><span id="line-467"></span><span>  </span><span id="local-6989586621679156439"><span class="annot"><span class="annottext">parseUrlPiece :: Text -&gt; Either Text DateTime
</span><a href="#local-6989586621679156439"><span class="hs-identifier hs-var hs-var hs-var hs-var">parseUrlPiece</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Either Text DateTime
-&gt; (DateTime -&gt; Either Text DateTime)
-&gt; Maybe DateTime
-&gt; Either Text DateTime
forall b a. b -&gt; (a -&gt; b) -&gt; Maybe a -&gt; b
</span><span class="hs-identifier hs-var">P.maybe</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Text -&gt; Either Text DateTime
forall a b. a -&gt; Either a b
</span><span class="hs-identifier hs-var">P.Left</span></span><span> </span><span class="annot"><span class="annottext">Text
</span><span class="hs-string">&quot;parseUrlPiece @DateTime&quot;</span></span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">DateTime -&gt; Either Text DateTime
forall a b. b -&gt; Either a b
</span><span class="hs-identifier hs-var">P.Right</span></span><span> </span><span class="annot"><span class="annottext">(Maybe DateTime -&gt; Either Text DateTime)
-&gt; (Text -&gt; Maybe DateTime) -&gt; Text -&gt; Either Text DateTime
forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">String -&gt; Maybe DateTime
forall (m :: * -&gt; *).
(MonadFail m, Alternative m) =&gt;
String -&gt; m DateTime
</span><a href="OpenAPIPetstore.Core.html#_readDateTime"><span class="hs-identifier hs-var">_readDateTime</span></a></span><span> </span><span class="annot"><span class="annottext">(String -&gt; Maybe DateTime)
-&gt; (Text -&gt; String) -&gt; Text -&gt; Maybe DateTime
forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">Text -&gt; String
</span><span class="hs-identifier hs-var">T.unpack</span></span><span>
</span><span id="line-468"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679156443"><span id="local-6989586621679156447"><span id="local-6989586621679156450"><span class="annot"><span class="hs-identifier hs-type">WH.ToHttpApiData</span></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#DateTime"><span class="hs-identifier hs-type">DateTime</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
</span><span id="line-469"></span><span>  </span><span id="local-6989586621679156455"><span class="annot"><span class="annottext">toUrlPiece :: DateTime -&gt; Text
</span><a href="#local-6989586621679156455"><span class="hs-identifier hs-var hs-var hs-var hs-var">toUrlPiece</span></a></span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Core.html#DateTime"><span class="hs-identifier hs-type">DateTime</span></a></span><span> </span><span id="local-6989586621679156457"><span class="annot"><span class="annottext">UTCTime
</span><a href="#local-6989586621679156457"><span class="hs-identifier hs-var">t</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; Text
</span><span class="hs-identifier hs-var">T.pack</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">UTCTime -&gt; String
forall t. (t ~ UTCTime, FormatTime t) =&gt; t -&gt; String
</span><a href="OpenAPIPetstore.Core.html#_showDateTime"><span class="hs-identifier hs-var">_showDateTime</span></a></span><span> </span><span class="annot"><span class="annottext">UTCTime
</span><a href="#local-6989586621679156457"><span class="hs-identifier hs-var">t</span></a></span><span class="hs-special">)</span><span>
</span><span id="line-470"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679156460"><span id="local-6989586621679156465"><span class="annot"><span class="hs-identifier hs-type">P.Show</span></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#DateTime"><span class="hs-identifier hs-type">DateTime</span></a></span></span></span><span> </span><span class="hs-keyword">where</span><span>
</span><span id="line-471"></span><span>  </span><span id="local-6989586621679156469"><span class="annot"><span class="annottext">show :: DateTime -&gt; String
</span><span class="hs-identifier hs-var hs-var hs-var hs-var">show</span></span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Core.html#DateTime"><span class="hs-identifier hs-type">DateTime</span></a></span><span> </span><span id="local-6989586621679156470"><span class="annot"><span class="annottext">UTCTime
</span><a href="#local-6989586621679156470"><span class="hs-identifier hs-var">t</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">UTCTime -&gt; String
forall t. (t ~ UTCTime, FormatTime t) =&gt; t -&gt; String
</span><a href="OpenAPIPetstore.Core.html#_showDateTime"><span class="hs-identifier hs-var">_showDateTime</span></a></span><span> </span><span class="annot"><span class="annottext">UTCTime
</span><a href="#local-6989586621679156470"><span class="hs-identifier hs-var">t</span></a></span><span>
</span><span id="line-472"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679156476"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#DateTime"><span class="hs-identifier hs-type">DateTime</span></a></span></span><span> </span><span class="hs-keyword">where</span><span>
</span><span id="line-473"></span><span>  </span><span id="local-6989586621679156481"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -&gt; DateTime -&gt; ByteString
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeMultipartFormData
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">DateTime -&gt; ByteString
forall a. ToHttpApiData a =&gt; a -&gt; ByteString
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a></span><span>
</span><span id="line-474"></span><span>
</span><span id="line-475"></span><span class="annot"><span class="hs-comment">-- | @_parseISO8601@</span></span><span>
</span><span id="line-476"></span><span id="local-6989586621679155489"><span class="annot"><a href="OpenAPIPetstore.Core.html#_readDateTime"><span class="hs-identifier hs-type">_readDateTime</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">MonadFail</span></span><span> </span><span class="annot"><a href="#local-6989586621679155489"><span class="hs-identifier hs-type">m</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-identifier hs-type">Alternative</span></span><span> </span><span class="annot"><a href="#local-6989586621679155489"><span class="hs-identifier hs-type">m</span></a></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span class="annot"><span class="hs-identifier hs-type">String</span></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="#local-6989586621679155489"><span class="hs-identifier hs-type">m</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#DateTime"><span class="hs-identifier hs-type">DateTime</span></a></span></span><span>
</span><span id="line-477"></span><span id="_readDateTime"><span class="annot"><span class="annottext">_readDateTime :: forall (m :: * -&gt; *).
(MonadFail m, Alternative m) =&gt;
String -&gt; m DateTime
</span><a href="OpenAPIPetstore.Core.html#_readDateTime"><span class="hs-identifier hs-var hs-var">_readDateTime</span></a></span></span><span> </span><span id="local-6989586621679156493"><span class="annot"><span class="annottext">String
</span><a href="#local-6989586621679156493"><span class="hs-identifier hs-var">s</span></a></span></span><span> </span><span class="hs-glyph">=</span><span>
</span><span id="line-478"></span><span>  </span><span class="annot"><span class="annottext">UTCTime -&gt; DateTime
</span><a href="OpenAPIPetstore.Core.html#DateTime"><span class="hs-identifier hs-var">DateTime</span></a></span><span> </span><span class="annot"><span class="annottext">(UTCTime -&gt; DateTime) -&gt; m UTCTime -&gt; m DateTime
forall (f :: * -&gt; *) a b. Functor f =&gt; (a -&gt; b) -&gt; f a -&gt; f b
</span><span class="hs-operator hs-var">&lt;$&gt;</span></span><span> </span><span class="annot"><span class="annottext">String -&gt; m UTCTime
forall t (m :: * -&gt; *).
(ParseTime t, MonadFail m, Alternative m) =&gt;
String -&gt; m t
</span><a href="OpenAPIPetstore.Core.html#_parseISO8601"><span class="hs-identifier hs-var">_parseISO8601</span></a></span><span> </span><span class="annot"><span class="annottext">String
</span><a href="#local-6989586621679156493"><span class="hs-identifier hs-var">s</span></a></span><span>
</span><span id="line-479"></span><span class="hs-pragma">{-# INLINE</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#_readDateTime"><span class="hs-pragma hs-type">_readDateTime</span></a></span><span> </span><span class="hs-pragma">#-}</span><span>
</span><span id="line-480"></span><span>
</span><span id="line-481"></span><span class="annot"><span class="hs-comment">-- | @TI.formatISO8601Millis@</span></span><span>
</span><span id="line-482"></span><span id="local-6989586621679155495"><span class="annot"><a href="OpenAPIPetstore.Core.html#_showDateTime"><span class="hs-identifier hs-type">_showDateTime</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><span class="annot"><a href="#local-6989586621679155495"><span class="hs-identifier hs-type">t</span></a></span><span> </span><span class="annot"><span class="hs-operator hs-type">~</span></span><span> </span><span class="annot"><span class="hs-identifier hs-type">TI.UTCTime</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-identifier hs-type">TI.FormatTime</span></span><span> </span><span class="annot"><a href="#local-6989586621679155495"><span class="hs-identifier hs-type">t</span></a></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span class="annot"><a href="#local-6989586621679155495"><span class="hs-identifier hs-type">t</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="hs-identifier hs-type">String</span></span></span><span>
</span><span id="line-483"></span><span id="_showDateTime"><span class="annot"><span class="annottext">_showDateTime :: forall t. (t ~ UTCTime, FormatTime t) =&gt; t -&gt; String
</span><a href="OpenAPIPetstore.Core.html#_showDateTime"><span class="hs-identifier hs-var hs-var">_showDateTime</span></a></span></span><span> </span><span class="hs-glyph">=</span><span>
</span><span id="line-484"></span><span>  </span><span class="annot"><span class="annottext">t -&gt; String
UTCTime -&gt; String
</span><span class="hs-identifier hs-var">TI.formatISO8601Millis</span></span><span>
</span><span id="line-485"></span><span class="hs-pragma">{-# INLINE</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#_showDateTime"><span class="hs-pragma hs-type">_showDateTime</span></a></span><span> </span><span class="hs-pragma">#-}</span><span>
</span><span id="line-486"></span><span>
</span><span id="line-487"></span><span class="annot"><span class="hs-comment">-- | parse an ISO8601 date-time string</span></span><span>
</span><span id="line-488"></span><span id="local-6989586621679155503"><span id="local-6989586621679155504"><span class="annot"><a href="OpenAPIPetstore.Core.html#_parseISO8601"><span class="hs-identifier hs-type">_parseISO8601</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">TI.ParseTime</span></span><span> </span><span class="annot"><a href="#local-6989586621679155503"><span class="hs-identifier hs-type">t</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-identifier hs-type">MonadFail</span></span><span> </span><span class="annot"><a href="#local-6989586621679155504"><span class="hs-identifier hs-type">m</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-identifier hs-type">Alternative</span></span><span> </span><span class="annot"><a href="#local-6989586621679155504"><span class="hs-identifier hs-type">m</span></a></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span class="annot"><span class="hs-identifier hs-type">String</span></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="#local-6989586621679155504"><span class="hs-identifier hs-type">m</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679155503"><span class="hs-identifier hs-type">t</span></a></span></span></span><span>
</span><span id="line-489"></span><span id="_parseISO8601"><span class="annot"><span class="annottext">_parseISO8601 :: forall t (m :: * -&gt; *).
(ParseTime t, MonadFail m, Alternative m) =&gt;
String -&gt; m t
</span><a href="OpenAPIPetstore.Core.html#_parseISO8601"><span class="hs-identifier hs-var hs-var">_parseISO8601</span></a></span></span><span> </span><span id="local-6989586621679156510"><span class="annot"><span class="annottext">String
</span><a href="#local-6989586621679156510"><span class="hs-identifier hs-var">t</span></a></span></span><span> </span><span class="hs-glyph">=</span><span>
</span><span id="line-490"></span><span>  </span><span class="annot"><span class="annottext">[m t] -&gt; m t
forall (t :: * -&gt; *) (f :: * -&gt; *) a.
(Foldable t, Alternative f) =&gt;
t (f a) -&gt; f a
</span><span class="hs-identifier hs-var">P.asum</span></span><span> </span><span class="annot"><span class="annottext">([m t] -&gt; m t) -&gt; [m t] -&gt; m t
forall a b. (a -&gt; b) -&gt; a -&gt; b
</span><span class="hs-operator hs-var">$</span></span><span>
</span><span id="line-491"></span><span>  </span><span class="annot"><span class="annottext">(String -&gt; String -&gt; m t) -&gt; String -&gt; String -&gt; m t
forall a b c. (a -&gt; b -&gt; c) -&gt; b -&gt; a -&gt; c
</span><span class="hs-identifier hs-var">P.flip</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Bool -&gt; TimeLocale -&gt; String -&gt; String -&gt; m t
forall (m :: * -&gt; *) t.
(MonadFail m, ParseTime t) =&gt;
Bool -&gt; TimeLocale -&gt; String -&gt; String -&gt; m t
</span><span class="hs-identifier hs-var">TI.parseTimeM</span></span><span> </span><span class="annot"><span class="annottext">Bool
</span><span class="hs-identifier hs-var">True</span></span><span> </span><span class="annot"><span class="annottext">TimeLocale
</span><span class="hs-identifier hs-var">TI.defaultTimeLocale</span></span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">String
</span><a href="#local-6989586621679156510"><span class="hs-identifier hs-var">t</span></a></span><span> </span><span class="annot"><span class="annottext">(String -&gt; m t) -&gt; [String] -&gt; [m t]
forall (f :: * -&gt; *) a b. Functor f =&gt; (a -&gt; b) -&gt; f a -&gt; f b
</span><span class="hs-operator hs-var">&lt;$&gt;</span></span><span>
</span><span id="line-492"></span><span>  </span><span class="hs-special">[</span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;%FT%T%QZ&quot;</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;%FT%T%Q%z&quot;</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;%FT%T%Q%Z&quot;</span></span><span class="hs-special">]</span><span>
</span><span id="line-493"></span><span class="hs-pragma">{-# INLINE</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#_parseISO8601"><span class="hs-pragma hs-type">_parseISO8601</span></a></span><span> </span><span class="hs-pragma">#-}</span><span>
</span><span id="line-494"></span><span>
</span><span id="line-495"></span><span class="annot"><span class="hs-comment">-- * Date Formatting</span></span><span>
</span><span id="line-496"></span><span>
</span><span id="line-497"></span><span class="hs-keyword">newtype</span><span> </span><span id="Date"><span class="annot"><a href="OpenAPIPetstore.Core.html#Date"><span class="hs-identifier hs-var">Date</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span id="Date"><span class="annot"><a href="OpenAPIPetstore.Core.html#Date"><span class="hs-identifier hs-var">Date</span></a></span></span><span> </span><span class="hs-special">{</span><span> </span><span id="unDate"><span class="annot"><span class="annottext">Date -&gt; Day
</span><a href="OpenAPIPetstore.Core.html#unDate"><span class="hs-identifier hs-var hs-var">unDate</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">TI.Day</span></span><span> </span><span class="hs-special">}</span><span>
</span><span id="line-498"></span><span>  </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span id="local-6989586621679156518"><span id="local-6989586621679156523"><span id="local-6989586621679156527"><span id="local-6989586621679156531"><span id="local-6989586621679156535"><span id="local-6989586621679156539"><span id="local-6989586621679156543"><span id="local-6989586621679156547"><span class="annot"><span class="annottext">Int -&gt; Date
Date -&gt; Int
Date -&gt; [Date]
Date -&gt; Date
Date -&gt; Date -&gt; [Date]
Date -&gt; Date -&gt; Date -&gt; [Date]
(Date -&gt; Date)
-&gt; (Date -&gt; Date)
-&gt; (Int -&gt; Date)
-&gt; (Date -&gt; Int)
-&gt; (Date -&gt; [Date])
-&gt; (Date -&gt; Date -&gt; [Date])
-&gt; (Date -&gt; Date -&gt; [Date])
-&gt; (Date -&gt; Date -&gt; Date -&gt; [Date])
-&gt; Enum Date
forall a.
(a -&gt; a)
-&gt; (a -&gt; a)
-&gt; (Int -&gt; a)
-&gt; (a -&gt; Int)
-&gt; (a -&gt; [a])
-&gt; (a -&gt; a -&gt; [a])
-&gt; (a -&gt; a -&gt; [a])
-&gt; (a -&gt; a -&gt; a -&gt; [a])
-&gt; Enum a
$csucc :: Date -&gt; Date
succ :: Date -&gt; Date
$cpred :: Date -&gt; Date
pred :: Date -&gt; Date
$ctoEnum :: Int -&gt; Date
toEnum :: Int -&gt; Date
$cfromEnum :: Date -&gt; Int
fromEnum :: Date -&gt; Int
$cenumFrom :: Date -&gt; [Date]
enumFrom :: Date -&gt; [Date]
$cenumFromThen :: Date -&gt; Date -&gt; [Date]
enumFromThen :: Date -&gt; Date -&gt; [Date]
$cenumFromTo :: Date -&gt; Date -&gt; [Date]
enumFromTo :: Date -&gt; Date -&gt; [Date]
$cenumFromThenTo :: Date -&gt; Date -&gt; Date -&gt; [Date]
enumFromThenTo :: Date -&gt; Date -&gt; Date -&gt; [Date]
</span><span class="hs-identifier hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var">P.Enum</span></span></span></span></span></span></span></span></span></span><span class="hs-special">,</span><span id="local-6989586621679156553"><span id="local-6989586621679156558"><span class="annot"><span class="annottext">Date -&gt; Date -&gt; Bool
(Date -&gt; Date -&gt; Bool) -&gt; (Date -&gt; Date -&gt; Bool) -&gt; Eq Date
forall a. (a -&gt; a -&gt; Bool) -&gt; (a -&gt; a -&gt; Bool) -&gt; Eq a
$c== :: Date -&gt; Date -&gt; Bool
== :: Date -&gt; Date -&gt; Bool
$c/= :: Date -&gt; Date -&gt; Bool
/= :: Date -&gt; Date -&gt; Bool
</span><span class="hs-identifier hs-var hs-var hs-var hs-var hs-var hs-var">P.Eq</span></span></span></span><span class="hs-special">,</span><span id="local-6989586621679156565"><span id="local-6989586621679156569"><span id="local-6989586621679156572"><span id="local-6989586621679156574"><span id="local-6989586621679156576"><span id="local-6989586621679156582"><span id="local-6989586621679156587"><span id="local-6989586621679156590"><span id="local-6989586621679156593"><span id="local-6989586621679156596"><span id="local-6989586621679156599"><span id="local-6989586621679156602"><span id="local-6989586621679156607"><span id="local-6989586621679156612"><span class="annot"><span class="annottext">Typeable Date
Typeable Date
-&gt; (forall (c :: * -&gt; *).
    (forall d b. Data d =&gt; c (d -&gt; b) -&gt; d -&gt; c b)
    -&gt; (forall g. g -&gt; c g) -&gt; Date -&gt; c Date)
-&gt; (forall (c :: * -&gt; *).
    (forall b r. Data b =&gt; c (b -&gt; r) -&gt; c r)
    -&gt; (forall r. r -&gt; c r) -&gt; Constr -&gt; c Date)
-&gt; (Date -&gt; Constr)
-&gt; (Date -&gt; DataType)
-&gt; (forall (t :: * -&gt; *) (c :: * -&gt; *).
    Typeable t =&gt;
    (forall d. Data d =&gt; c (t d)) -&gt; Maybe (c Date))
-&gt; (forall (t :: * -&gt; * -&gt; *) (c :: * -&gt; *).
    Typeable t =&gt;
    (forall d e. (Data d, Data e) =&gt; c (t d e)) -&gt; Maybe (c Date))
-&gt; ((forall b. Data b =&gt; b -&gt; b) -&gt; Date -&gt; Date)
-&gt; (forall r r'.
    (r -&gt; r' -&gt; r) -&gt; r -&gt; (forall d. Data d =&gt; d -&gt; r') -&gt; Date -&gt; r)
-&gt; (forall r r'.
    (r' -&gt; r -&gt; r) -&gt; r -&gt; (forall d. Data d =&gt; d -&gt; r') -&gt; Date -&gt; r)
-&gt; (forall u. (forall d. Data d =&gt; d -&gt; u) -&gt; Date -&gt; [u])
-&gt; (forall u. Int -&gt; (forall d. Data d =&gt; d -&gt; u) -&gt; Date -&gt; u)
-&gt; (forall (m :: * -&gt; *).
    Monad m =&gt;
    (forall d. Data d =&gt; d -&gt; m d) -&gt; Date -&gt; m Date)
-&gt; (forall (m :: * -&gt; *).
    MonadPlus m =&gt;
    (forall d. Data d =&gt; d -&gt; m d) -&gt; Date -&gt; m Date)
-&gt; (forall (m :: * -&gt; *).
    MonadPlus m =&gt;
    (forall d. Data d =&gt; d -&gt; m d) -&gt; Date -&gt; m Date)
-&gt; Data Date
Date -&gt; Constr
Date -&gt; DataType
(forall b. Data b =&gt; b -&gt; b) -&gt; Date -&gt; Date
forall a.
Typeable a
-&gt; (forall (c :: * -&gt; *).
    (forall d b. Data d =&gt; c (d -&gt; b) -&gt; d -&gt; c b)
    -&gt; (forall g. g -&gt; c g) -&gt; a -&gt; c a)
-&gt; (forall (c :: * -&gt; *).
    (forall b r. Data b =&gt; c (b -&gt; r) -&gt; c r)
    -&gt; (forall r. r -&gt; c r) -&gt; Constr -&gt; c a)
-&gt; (a -&gt; Constr)
-&gt; (a -&gt; DataType)
-&gt; (forall (t :: * -&gt; *) (c :: * -&gt; *).
    Typeable t =&gt;
    (forall d. Data d =&gt; c (t d)) -&gt; Maybe (c a))
-&gt; (forall (t :: * -&gt; * -&gt; *) (c :: * -&gt; *).
    Typeable t =&gt;
    (forall d e. (Data d, Data e) =&gt; c (t d e)) -&gt; Maybe (c a))
-&gt; ((forall b. Data b =&gt; b -&gt; b) -&gt; a -&gt; a)
-&gt; (forall r r'.
    (r -&gt; r' -&gt; r) -&gt; r -&gt; (forall d. Data d =&gt; d -&gt; r') -&gt; a -&gt; r)
-&gt; (forall r r'.
    (r' -&gt; r -&gt; r) -&gt; r -&gt; (forall d. Data d =&gt; d -&gt; r') -&gt; a -&gt; r)
-&gt; (forall u. (forall d. Data d =&gt; d -&gt; u) -&gt; a -&gt; [u])
-&gt; (forall u. Int -&gt; (forall d. Data d =&gt; d -&gt; u) -&gt; a -&gt; u)
-&gt; (forall (m :: * -&gt; *).
    Monad m =&gt;
    (forall d. Data d =&gt; d -&gt; m d) -&gt; a -&gt; m a)
-&gt; (forall (m :: * -&gt; *).
    MonadPlus m =&gt;
    (forall d. Data d =&gt; d -&gt; m d) -&gt; a -&gt; m a)
-&gt; (forall (m :: * -&gt; *).
    MonadPlus m =&gt;
    (forall d. Data d =&gt; d -&gt; m d) -&gt; a -&gt; m a)
-&gt; Data a
forall u. Int -&gt; (forall d. Data d =&gt; d -&gt; u) -&gt; Date -&gt; u
forall u. (forall d. Data d =&gt; d -&gt; u) -&gt; Date -&gt; [u]
forall r r'.
(r -&gt; r' -&gt; r) -&gt; r -&gt; (forall d. Data d =&gt; d -&gt; r') -&gt; Date -&gt; r
forall r r'.
(r' -&gt; r -&gt; r) -&gt; r -&gt; (forall d. Data d =&gt; d -&gt; r') -&gt; Date -&gt; r
forall (m :: * -&gt; *).
Monad m =&gt;
(forall d. Data d =&gt; d -&gt; m d) -&gt; Date -&gt; m Date
forall (m :: * -&gt; *).
MonadPlus m =&gt;
(forall d. Data d =&gt; d -&gt; m d) -&gt; Date -&gt; m Date
forall (c :: * -&gt; *).
(forall b r. Data b =&gt; c (b -&gt; r) -&gt; c r)
-&gt; (forall r. r -&gt; c r) -&gt; Constr -&gt; c Date
forall (c :: * -&gt; *).
(forall d b. Data d =&gt; c (d -&gt; b) -&gt; d -&gt; c b)
-&gt; (forall g. g -&gt; c g) -&gt; Date -&gt; c Date
forall (t :: * -&gt; *) (c :: * -&gt; *).
Typeable t =&gt;
(forall d. Data d =&gt; c (t d)) -&gt; Maybe (c Date)
forall (t :: * -&gt; * -&gt; *) (c :: * -&gt; *).
Typeable t =&gt;
(forall d e. (Data d, Data e) =&gt; c (t d e)) -&gt; Maybe (c Date)
$cgfoldl :: forall (c :: * -&gt; *).
(forall d b. Data d =&gt; c (d -&gt; b) -&gt; d -&gt; c b)
-&gt; (forall g. g -&gt; c g) -&gt; Date -&gt; c Date
gfoldl :: forall (c :: * -&gt; *).
(forall d b. Data d =&gt; c (d -&gt; b) -&gt; d -&gt; c b)
-&gt; (forall g. g -&gt; c g) -&gt; Date -&gt; c Date
$cgunfold :: forall (c :: * -&gt; *).
(forall b r. Data b =&gt; c (b -&gt; r) -&gt; c r)
-&gt; (forall r. r -&gt; c r) -&gt; Constr -&gt; c Date
gunfold :: forall (c :: * -&gt; *).
(forall b r. Data b =&gt; c (b -&gt; r) -&gt; c r)
-&gt; (forall r. r -&gt; c r) -&gt; Constr -&gt; c Date
$ctoConstr :: Date -&gt; Constr
toConstr :: Date -&gt; Constr
$cdataTypeOf :: Date -&gt; DataType
dataTypeOf :: Date -&gt; DataType
$cdataCast1 :: forall (t :: * -&gt; *) (c :: * -&gt; *).
Typeable t =&gt;
(forall d. Data d =&gt; c (t d)) -&gt; Maybe (c Date)
dataCast1 :: forall (t :: * -&gt; *) (c :: * -&gt; *).
Typeable t =&gt;
(forall d. Data d =&gt; c (t d)) -&gt; Maybe (c Date)
$cdataCast2 :: forall (t :: * -&gt; * -&gt; *) (c :: * -&gt; *).
Typeable t =&gt;
(forall d e. (Data d, Data e) =&gt; c (t d e)) -&gt; Maybe (c Date)
dataCast2 :: forall (t :: * -&gt; * -&gt; *) (c :: * -&gt; *).
Typeable t =&gt;
(forall d e. (Data d, Data e) =&gt; c (t d e)) -&gt; Maybe (c Date)
$cgmapT :: (forall b. Data b =&gt; b -&gt; b) -&gt; Date -&gt; Date
gmapT :: (forall b. Data b =&gt; b -&gt; b) -&gt; Date -&gt; Date
$cgmapQl :: forall r r'.
(r -&gt; r' -&gt; r) -&gt; r -&gt; (forall d. Data d =&gt; d -&gt; r') -&gt; Date -&gt; r
gmapQl :: forall r r'.
(r -&gt; r' -&gt; r) -&gt; r -&gt; (forall d. Data d =&gt; d -&gt; r') -&gt; Date -&gt; r
$cgmapQr :: forall r r'.
(r' -&gt; r -&gt; r) -&gt; r -&gt; (forall d. Data d =&gt; d -&gt; r') -&gt; Date -&gt; r
gmapQr :: forall r r'.
(r' -&gt; r -&gt; r) -&gt; r -&gt; (forall d. Data d =&gt; d -&gt; r') -&gt; Date -&gt; r
$cgmapQ :: forall u. (forall d. Data d =&gt; d -&gt; u) -&gt; Date -&gt; [u]
gmapQ :: forall u. (forall d. Data d =&gt; d -&gt; u) -&gt; Date -&gt; [u]
$cgmapQi :: forall u. Int -&gt; (forall d. Data d =&gt; d -&gt; u) -&gt; Date -&gt; u
gmapQi :: forall u. Int -&gt; (forall d. Data d =&gt; d -&gt; u) -&gt; Date -&gt; u
$cgmapM :: forall (m :: * -&gt; *).
Monad m =&gt;
(forall d. Data d =&gt; d -&gt; m d) -&gt; Date -&gt; m Date
gmapM :: forall (m :: * -&gt; *).
Monad m =&gt;
(forall d. Data d =&gt; d -&gt; m d) -&gt; Date -&gt; m Date
$cgmapMp :: forall (m :: * -&gt; *).
MonadPlus m =&gt;
(forall d. Data d =&gt; d -&gt; m d) -&gt; Date -&gt; m Date
gmapMp :: forall (m :: * -&gt; *).
MonadPlus m =&gt;
(forall d. Data d =&gt; d -&gt; m d) -&gt; Date -&gt; m Date
$cgmapMo :: forall (m :: * -&gt; *).
MonadPlus m =&gt;
(forall d. Data d =&gt; d -&gt; m d) -&gt; Date -&gt; m Date
gmapMo :: forall (m :: * -&gt; *).
MonadPlus m =&gt;
(forall d. Data d =&gt; d -&gt; m d) -&gt; Date -&gt; m Date
</span><span class="hs-identifier hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var">P.Data</span></span></span></span></span></span></span></span></span></span></span></span></span></span></span></span><span class="hs-special">,</span><span id="local-6989586621679156619"><span id="local-6989586621679156624"><span id="local-6989586621679156628"><span id="local-6989586621679156632"><span id="local-6989586621679156636"><span id="local-6989586621679156640"><span id="local-6989586621679156644"><span class="annot"><span class="annottext">Eq Date
Eq Date
-&gt; (Date -&gt; Date -&gt; Ordering)
-&gt; (Date -&gt; Date -&gt; Bool)
-&gt; (Date -&gt; Date -&gt; Bool)
-&gt; (Date -&gt; Date -&gt; Bool)
-&gt; (Date -&gt; Date -&gt; Bool)
-&gt; (Date -&gt; Date -&gt; Date)
-&gt; (Date -&gt; Date -&gt; Date)
-&gt; Ord Date
Date -&gt; Date -&gt; Bool
Date -&gt; Date -&gt; Ordering
Date -&gt; Date -&gt; Date
forall a.
Eq a
-&gt; (a -&gt; a -&gt; Ordering)
-&gt; (a -&gt; a -&gt; Bool)
-&gt; (a -&gt; a -&gt; Bool)
-&gt; (a -&gt; a -&gt; Bool)
-&gt; (a -&gt; a -&gt; Bool)
-&gt; (a -&gt; a -&gt; a)
-&gt; (a -&gt; a -&gt; a)
-&gt; Ord a
$ccompare :: Date -&gt; Date -&gt; Ordering
compare :: Date -&gt; Date -&gt; Ordering
$c&lt; :: Date -&gt; Date -&gt; Bool
&lt; :: Date -&gt; Date -&gt; Bool
$c&lt;= :: Date -&gt; Date -&gt; Bool
&lt;= :: Date -&gt; Date -&gt; Bool
$c&gt; :: Date -&gt; Date -&gt; Bool
&gt; :: Date -&gt; Date -&gt; Bool
$c&gt;= :: Date -&gt; Date -&gt; Bool
&gt;= :: Date -&gt; Date -&gt; Bool
$cmax :: Date -&gt; Date -&gt; Date
max :: Date -&gt; Date -&gt; Date
$cmin :: Date -&gt; Date -&gt; Date
min :: Date -&gt; Date -&gt; Date
</span><span class="hs-identifier hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var">P.Ord</span></span></span></span></span></span></span></span></span><span class="hs-special">,</span><span id="local-6989586621679156651"><span id="local-6989586621679156656"><span id="local-6989586621679156660"><span id="local-6989586621679156664"><span id="local-6989586621679156668"><span id="local-6989586621679156672"><span class="annot"><span class="annottext">Ord Date
Ord Date
-&gt; ((Date, Date) -&gt; [Date])
-&gt; ((Date, Date) -&gt; Date -&gt; Int)
-&gt; ((Date, Date) -&gt; Date -&gt; Int)
-&gt; ((Date, Date) -&gt; Date -&gt; Bool)
-&gt; ((Date, Date) -&gt; Int)
-&gt; ((Date, Date) -&gt; Int)
-&gt; Ix Date
(Date, Date) -&gt; Int
(Date, Date) -&gt; [Date]
(Date, Date) -&gt; Date -&gt; Bool
(Date, Date) -&gt; Date -&gt; Int
forall a.
Ord a
-&gt; ((a, a) -&gt; [a])
-&gt; ((a, a) -&gt; a -&gt; Int)
-&gt; ((a, a) -&gt; a -&gt; Int)
-&gt; ((a, a) -&gt; a -&gt; Bool)
-&gt; ((a, a) -&gt; Int)
-&gt; ((a, a) -&gt; Int)
-&gt; Ix a
$crange :: (Date, Date) -&gt; [Date]
range :: (Date, Date) -&gt; [Date]
$cindex :: (Date, Date) -&gt; Date -&gt; Int
index :: (Date, Date) -&gt; Date -&gt; Int
$cunsafeIndex :: (Date, Date) -&gt; Date -&gt; Int
unsafeIndex :: (Date, Date) -&gt; Date -&gt; Int
$cinRange :: (Date, Date) -&gt; Date -&gt; Bool
inRange :: (Date, Date) -&gt; Date -&gt; Bool
$crangeSize :: (Date, Date) -&gt; Int
rangeSize :: (Date, Date) -&gt; Int
$cunsafeRangeSize :: (Date, Date) -&gt; Int
unsafeRangeSize :: (Date, Date) -&gt; Int
</span><span class="hs-identifier hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var">P.Ix</span></span></span></span></span></span></span></span><span class="hs-special">,</span><span id="local-6989586621679156678"><span class="annot"><span class="annottext">Date -&gt; ()
(Date -&gt; ()) -&gt; NFData Date
forall a. (a -&gt; ()) -&gt; NFData a
$crnf :: Date -&gt; ()
rnf :: Date -&gt; ()
</span><span class="hs-identifier hs-var hs-var hs-var hs-var">NF.NFData</span></span></span><span class="hs-special">)</span><span>
</span><span id="line-499"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679156685"><span class="annot"><span class="hs-identifier hs-type">A.FromJSON</span></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#Date"><span class="hs-identifier hs-type">Date</span></a></span></span><span> </span><span class="hs-keyword">where</span><span>
</span><span id="line-500"></span><span>  </span><span id="local-6989586621679156689"><span class="annot"><span class="annottext">parseJSON :: Value -&gt; Parser Date
</span><span class="hs-identifier hs-var hs-var hs-var hs-var">parseJSON</span></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; (Text -&gt; Parser Date) -&gt; Value -&gt; Parser Date
forall a. String -&gt; (Text -&gt; Parser a) -&gt; Value -&gt; Parser a
</span><span class="hs-identifier hs-var">A.withText</span></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;Date&quot;</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">String -&gt; Parser Date
forall (m :: * -&gt; *). MonadFail m =&gt; String -&gt; m Date
</span><a href="OpenAPIPetstore.Core.html#_readDate"><span class="hs-identifier hs-var">_readDate</span></a></span><span> </span><span class="annot"><span class="annottext">(String -&gt; Parser Date) -&gt; (Text -&gt; String) -&gt; Text -&gt; Parser Date
forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">Text -&gt; String
</span><span class="hs-identifier hs-var">T.unpack</span></span><span class="hs-special">)</span><span>
</span><span id="line-501"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679156693"><span id="local-6989586621679156697"><span id="local-6989586621679156700"><span class="annot"><span class="hs-identifier hs-type">A.ToJSON</span></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#Date"><span class="hs-identifier hs-type">Date</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
</span><span id="line-502"></span><span>  </span><span id="local-6989586621679156706"><span class="annot"><span class="annottext">toJSON :: Date -&gt; Value
</span><span class="hs-identifier hs-var hs-var hs-var hs-var">toJSON</span></span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Core.html#Date"><span class="hs-identifier hs-type">Date</span></a></span><span> </span><span id="local-6989586621679156707"><span class="annot"><span class="annottext">Day
</span><a href="#local-6989586621679156707"><span class="hs-identifier hs-var">t</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; Value
forall a. ToJSON a =&gt; a -&gt; Value
</span><span class="hs-identifier hs-var">A.toJSON</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Day -&gt; String
forall t. FormatTime t =&gt; t -&gt; String
</span><a href="OpenAPIPetstore.Core.html#_showDate"><span class="hs-identifier hs-var">_showDate</span></a></span><span> </span><span class="annot"><span class="annottext">Day
</span><a href="#local-6989586621679156707"><span class="hs-identifier hs-var">t</span></a></span><span class="hs-special">)</span><span>
</span><span id="line-503"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679156711"><span id="local-6989586621679156715"><span class="annot"><span class="hs-identifier hs-type">WH.FromHttpApiData</span></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#Date"><span class="hs-identifier hs-type">Date</span></a></span></span></span><span> </span><span class="hs-keyword">where</span><span>
</span><span id="line-504"></span><span>  </span><span id="local-6989586621679156719"><span class="annot"><span class="annottext">parseUrlPiece :: Text -&gt; Either Text Date
</span><span class="hs-identifier hs-var hs-var hs-var hs-var">parseUrlPiece</span></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Either Text Date
-&gt; (Date -&gt; Either Text Date) -&gt; Maybe Date -&gt; Either Text Date
forall b a. b -&gt; (a -&gt; b) -&gt; Maybe a -&gt; b
</span><span class="hs-identifier hs-var">P.maybe</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Text -&gt; Either Text Date
forall a b. a -&gt; Either a b
</span><span class="hs-identifier hs-var">P.Left</span></span><span> </span><span class="annot"><span class="annottext">Text
</span><span class="hs-string">&quot;parseUrlPiece @Date&quot;</span></span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">Date -&gt; Either Text Date
forall a b. b -&gt; Either a b
</span><span class="hs-identifier hs-var">P.Right</span></span><span> </span><span class="annot"><span class="annottext">(Maybe Date -&gt; Either Text Date)
-&gt; (Text -&gt; Maybe Date) -&gt; Text -&gt; Either Text Date
forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">String -&gt; Maybe Date
forall (m :: * -&gt; *). MonadFail m =&gt; String -&gt; m Date
</span><a href="OpenAPIPetstore.Core.html#_readDate"><span class="hs-identifier hs-var">_readDate</span></a></span><span> </span><span class="annot"><span class="annottext">(String -&gt; Maybe Date) -&gt; (Text -&gt; String) -&gt; Text -&gt; Maybe Date
forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">Text -&gt; String
</span><span class="hs-identifier hs-var">T.unpack</span></span><span>
</span><span id="line-505"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679156722"><span id="local-6989586621679156726"><span id="local-6989586621679156729"><span class="annot"><span class="hs-identifier hs-type">WH.ToHttpApiData</span></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#Date"><span class="hs-identifier hs-type">Date</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
</span><span id="line-506"></span><span>  </span><span id="local-6989586621679156732"><span class="annot"><span class="annottext">toUrlPiece :: Date -&gt; Text
</span><span class="hs-identifier hs-var hs-var hs-var hs-var">toUrlPiece</span></span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Core.html#Date"><span class="hs-identifier hs-type">Date</span></a></span><span> </span><span id="local-6989586621679156733"><span class="annot"><span class="annottext">Day
</span><a href="#local-6989586621679156733"><span class="hs-identifier hs-var">t</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; Text
</span><span class="hs-identifier hs-var">T.pack</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Day -&gt; String
forall t. FormatTime t =&gt; t -&gt; String
</span><a href="OpenAPIPetstore.Core.html#_showDate"><span class="hs-identifier hs-var">_showDate</span></a></span><span> </span><span class="annot"><span class="annottext">Day
</span><a href="#local-6989586621679156733"><span class="hs-identifier hs-var">t</span></a></span><span class="hs-special">)</span><span>
</span><span id="line-507"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679156735"><span id="local-6989586621679156740"><span class="annot"><span class="hs-identifier hs-type">P.Show</span></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#Date"><span class="hs-identifier hs-type">Date</span></a></span></span></span><span> </span><span class="hs-keyword">where</span><span>
</span><span id="line-508"></span><span>  </span><span id="local-6989586621679156743"><span class="annot"><span class="annottext">show :: Date -&gt; String
</span><span class="hs-identifier hs-var hs-var hs-var hs-var">show</span></span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Core.html#Date"><span class="hs-identifier hs-type">Date</span></a></span><span> </span><span id="local-6989586621679156744"><span class="annot"><span class="annottext">Day
</span><a href="#local-6989586621679156744"><span class="hs-identifier hs-var">t</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Day -&gt; String
forall t. FormatTime t =&gt; t -&gt; String
</span><a href="OpenAPIPetstore.Core.html#_showDate"><span class="hs-identifier hs-var">_showDate</span></a></span><span> </span><span class="annot"><span class="annottext">Day
</span><a href="#local-6989586621679156744"><span class="hs-identifier hs-var">t</span></a></span><span>
</span><span id="line-509"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679156749"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#Date"><span class="hs-identifier hs-type">Date</span></a></span></span><span> </span><span class="hs-keyword">where</span><span>
</span><span id="line-510"></span><span>  </span><span id="local-6989586621679156753"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -&gt; Date -&gt; ByteString
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeMultipartFormData
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Date -&gt; ByteString
forall a. ToHttpApiData a =&gt; a -&gt; ByteString
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a></span><span>
</span><span id="line-511"></span><span>
</span><span id="line-512"></span><span class="annot"><span class="hs-comment">-- | @TI.parseTimeM True TI.defaultTimeLocale &quot;%Y-%m-%d&quot;@</span></span><span>
</span><span id="line-513"></span><span id="local-6989586621679155526"><span class="annot"><a href="OpenAPIPetstore.Core.html#_readDate"><span class="hs-identifier hs-type">_readDate</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">MonadFail</span></span><span> </span><span class="annot"><a href="#local-6989586621679155526"><span class="hs-identifier hs-type">m</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span class="annot"><span class="hs-identifier hs-type">String</span></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="#local-6989586621679155526"><span class="hs-identifier hs-type">m</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#Date"><span class="hs-identifier hs-type">Date</span></a></span></span><span>
</span><span id="line-514"></span><span id="_readDate"><span class="annot"><span class="annottext">_readDate :: forall (m :: * -&gt; *). MonadFail m =&gt; String -&gt; m Date
</span><a href="OpenAPIPetstore.Core.html#_readDate"><span class="hs-identifier hs-var hs-var">_readDate</span></a></span></span><span> </span><span id="local-6989586621679156764"><span class="annot"><span class="annottext">String
</span><a href="#local-6989586621679156764"><span class="hs-identifier hs-var">s</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Day -&gt; Date
</span><a href="OpenAPIPetstore.Core.html#Date"><span class="hs-identifier hs-var">Date</span></a></span><span> </span><span class="annot"><span class="annottext">(Day -&gt; Date) -&gt; m Day -&gt; m Date
forall (f :: * -&gt; *) a b. Functor f =&gt; (a -&gt; b) -&gt; f a -&gt; f b
</span><span class="hs-operator hs-var">&lt;$&gt;</span></span><span> </span><span class="annot"><span class="annottext">Bool -&gt; TimeLocale -&gt; String -&gt; String -&gt; m Day
forall (m :: * -&gt; *) t.
(MonadFail m, ParseTime t) =&gt;
Bool -&gt; TimeLocale -&gt; String -&gt; String -&gt; m t
</span><span class="hs-identifier hs-var">TI.parseTimeM</span></span><span> </span><span class="annot"><span class="annottext">Bool
</span><span class="hs-identifier hs-var">True</span></span><span> </span><span class="annot"><span class="annottext">TimeLocale
</span><span class="hs-identifier hs-var">TI.defaultTimeLocale</span></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;%Y-%m-%d&quot;</span></span><span> </span><span class="annot"><span class="annottext">String
</span><a href="#local-6989586621679156764"><span class="hs-identifier hs-var">s</span></a></span><span>
</span><span id="line-515"></span><span class="hs-pragma">{-# INLINE</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#_readDate"><span class="hs-pragma hs-type">_readDate</span></a></span><span> </span><span class="hs-pragma">#-}</span><span>
</span><span id="line-516"></span><span>
</span><span id="line-517"></span><span class="annot"><span class="hs-comment">-- | @TI.formatTime TI.defaultTimeLocale &quot;%Y-%m-%d&quot;@</span></span><span>
</span><span id="line-518"></span><span id="local-6989586621679155527"><span class="annot"><a href="OpenAPIPetstore.Core.html#_showDate"><span class="hs-identifier hs-type">_showDate</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">TI.FormatTime</span></span><span> </span><span class="annot"><a href="#local-6989586621679155527"><span class="hs-identifier hs-type">t</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span class="annot"><a href="#local-6989586621679155527"><span class="hs-identifier hs-type">t</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="hs-identifier hs-type">String</span></span></span><span>
</span><span id="line-519"></span><span id="_showDate"><span class="annot"><span class="annottext">_showDate :: forall t. FormatTime t =&gt; t -&gt; String
</span><a href="OpenAPIPetstore.Core.html#_showDate"><span class="hs-identifier hs-var hs-var">_showDate</span></a></span></span><span> </span><span class="hs-glyph">=</span><span>
</span><span id="line-520"></span><span>  </span><span class="annot"><span class="annottext">TimeLocale -&gt; String -&gt; t -&gt; String
forall t. FormatTime t =&gt; TimeLocale -&gt; String -&gt; t -&gt; String
</span><span class="hs-identifier hs-var">TI.formatTime</span></span><span> </span><span class="annot"><span class="annottext">TimeLocale
</span><span class="hs-identifier hs-var">TI.defaultTimeLocale</span></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;%Y-%m-%d&quot;</span></span><span>
</span><span id="line-521"></span><span class="hs-pragma">{-# INLINE</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#_showDate"><span class="hs-pragma hs-type">_showDate</span></a></span><span> </span><span class="hs-pragma">#-}</span><span>
</span><span id="line-522"></span><span>
</span><span id="line-523"></span><span class="annot"><span class="hs-comment">-- * Byte/Binary Formatting</span></span><span>
</span><span id="line-524"></span><span>
</span><span id="line-525"></span><span>
</span><span id="line-526"></span><span class="annot"><span class="hs-comment">-- | base64 encoded characters</span></span><span>
</span><span id="line-527"></span><span class="hs-keyword">newtype</span><span> </span><span id="ByteArray"><span class="annot"><a href="OpenAPIPetstore.Core.html#ByteArray"><span class="hs-identifier hs-var">ByteArray</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span id="ByteArray"><span class="annot"><a href="OpenAPIPetstore.Core.html#ByteArray"><span class="hs-identifier hs-var">ByteArray</span></a></span></span><span> </span><span class="hs-special">{</span><span> </span><span id="unByteArray"><span class="annot"><span class="annottext">ByteArray -&gt; ByteString
</span><a href="OpenAPIPetstore.Core.html#unByteArray"><span class="hs-identifier hs-var hs-var">unByteArray</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">BL.ByteString</span></span><span> </span><span class="hs-special">}</span><span>
</span><span id="line-528"></span><span>  </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span id="local-6989586621679156771"><span id="local-6989586621679156776"><span class="annot"><span class="annottext">ByteArray -&gt; ByteArray -&gt; Bool
(ByteArray -&gt; ByteArray -&gt; Bool)
-&gt; (ByteArray -&gt; ByteArray -&gt; Bool) -&gt; Eq ByteArray
forall a. (a -&gt; a -&gt; Bool) -&gt; (a -&gt; a -&gt; Bool) -&gt; Eq a
$c== :: ByteArray -&gt; ByteArray -&gt; Bool
== :: ByteArray -&gt; ByteArray -&gt; Bool
$c/= :: ByteArray -&gt; ByteArray -&gt; Bool
/= :: ByteArray -&gt; ByteArray -&gt; Bool
</span><span class="hs-identifier hs-var hs-var hs-var hs-var hs-var hs-var">P.Eq</span></span></span></span><span class="hs-special">,</span><span id="local-6989586621679156783"><span id="local-6989586621679156787"><span id="local-6989586621679156790"><span id="local-6989586621679156792"><span id="local-6989586621679156794"><span id="local-6989586621679156800"><span id="local-6989586621679156805"><span id="local-6989586621679156808"><span id="local-6989586621679156811"><span id="local-6989586621679156814"><span id="local-6989586621679156817"><span id="local-6989586621679156820"><span id="local-6989586621679156825"><span id="local-6989586621679156830"><span class="annot"><span class="annottext">Typeable ByteArray
Typeable ByteArray
-&gt; (forall (c :: * -&gt; *).
    (forall d b. Data d =&gt; c (d -&gt; b) -&gt; d -&gt; c b)
    -&gt; (forall g. g -&gt; c g) -&gt; ByteArray -&gt; c ByteArray)
-&gt; (forall (c :: * -&gt; *).
    (forall b r. Data b =&gt; c (b -&gt; r) -&gt; c r)
    -&gt; (forall r. r -&gt; c r) -&gt; Constr -&gt; c ByteArray)
-&gt; (ByteArray -&gt; Constr)
-&gt; (ByteArray -&gt; DataType)
-&gt; (forall (t :: * -&gt; *) (c :: * -&gt; *).
    Typeable t =&gt;
    (forall d. Data d =&gt; c (t d)) -&gt; Maybe (c ByteArray))
-&gt; (forall (t :: * -&gt; * -&gt; *) (c :: * -&gt; *).
    Typeable t =&gt;
    (forall d e. (Data d, Data e) =&gt; c (t d e)) -&gt; Maybe (c ByteArray))
-&gt; ((forall b. Data b =&gt; b -&gt; b) -&gt; ByteArray -&gt; ByteArray)
-&gt; (forall r r'.
    (r -&gt; r' -&gt; r)
    -&gt; r -&gt; (forall d. Data d =&gt; d -&gt; r') -&gt; ByteArray -&gt; r)
-&gt; (forall r r'.
    (r' -&gt; r -&gt; r)
    -&gt; r -&gt; (forall d. Data d =&gt; d -&gt; r') -&gt; ByteArray -&gt; r)
-&gt; (forall u. (forall d. Data d =&gt; d -&gt; u) -&gt; ByteArray -&gt; [u])
-&gt; (forall u.
    Int -&gt; (forall d. Data d =&gt; d -&gt; u) -&gt; ByteArray -&gt; u)
-&gt; (forall (m :: * -&gt; *).
    Monad m =&gt;
    (forall d. Data d =&gt; d -&gt; m d) -&gt; ByteArray -&gt; m ByteArray)
-&gt; (forall (m :: * -&gt; *).
    MonadPlus m =&gt;
    (forall d. Data d =&gt; d -&gt; m d) -&gt; ByteArray -&gt; m ByteArray)
-&gt; (forall (m :: * -&gt; *).
    MonadPlus m =&gt;
    (forall d. Data d =&gt; d -&gt; m d) -&gt; ByteArray -&gt; m ByteArray)
-&gt; Data ByteArray
ByteArray -&gt; Constr
ByteArray -&gt; DataType
(forall b. Data b =&gt; b -&gt; b) -&gt; ByteArray -&gt; ByteArray
forall a.
Typeable a
-&gt; (forall (c :: * -&gt; *).
    (forall d b. Data d =&gt; c (d -&gt; b) -&gt; d -&gt; c b)
    -&gt; (forall g. g -&gt; c g) -&gt; a -&gt; c a)
-&gt; (forall (c :: * -&gt; *).
    (forall b r. Data b =&gt; c (b -&gt; r) -&gt; c r)
    -&gt; (forall r. r -&gt; c r) -&gt; Constr -&gt; c a)
-&gt; (a -&gt; Constr)
-&gt; (a -&gt; DataType)
-&gt; (forall (t :: * -&gt; *) (c :: * -&gt; *).
    Typeable t =&gt;
    (forall d. Data d =&gt; c (t d)) -&gt; Maybe (c a))
-&gt; (forall (t :: * -&gt; * -&gt; *) (c :: * -&gt; *).
    Typeable t =&gt;
    (forall d e. (Data d, Data e) =&gt; c (t d e)) -&gt; Maybe (c a))
-&gt; ((forall b. Data b =&gt; b -&gt; b) -&gt; a -&gt; a)
-&gt; (forall r r'.
    (r -&gt; r' -&gt; r) -&gt; r -&gt; (forall d. Data d =&gt; d -&gt; r') -&gt; a -&gt; r)
-&gt; (forall r r'.
    (r' -&gt; r -&gt; r) -&gt; r -&gt; (forall d. Data d =&gt; d -&gt; r') -&gt; a -&gt; r)
-&gt; (forall u. (forall d. Data d =&gt; d -&gt; u) -&gt; a -&gt; [u])
-&gt; (forall u. Int -&gt; (forall d. Data d =&gt; d -&gt; u) -&gt; a -&gt; u)
-&gt; (forall (m :: * -&gt; *).
    Monad m =&gt;
    (forall d. Data d =&gt; d -&gt; m d) -&gt; a -&gt; m a)
-&gt; (forall (m :: * -&gt; *).
    MonadPlus m =&gt;
    (forall d. Data d =&gt; d -&gt; m d) -&gt; a -&gt; m a)
-&gt; (forall (m :: * -&gt; *).
    MonadPlus m =&gt;
    (forall d. Data d =&gt; d -&gt; m d) -&gt; a -&gt; m a)
-&gt; Data a
forall u. Int -&gt; (forall d. Data d =&gt; d -&gt; u) -&gt; ByteArray -&gt; u
forall u. (forall d. Data d =&gt; d -&gt; u) -&gt; ByteArray -&gt; [u]
forall r r'.
(r -&gt; r' -&gt; r)
-&gt; r -&gt; (forall d. Data d =&gt; d -&gt; r') -&gt; ByteArray -&gt; r
forall r r'.
(r' -&gt; r -&gt; r)
-&gt; r -&gt; (forall d. Data d =&gt; d -&gt; r') -&gt; ByteArray -&gt; r
forall (m :: * -&gt; *).
Monad m =&gt;
(forall d. Data d =&gt; d -&gt; m d) -&gt; ByteArray -&gt; m ByteArray
forall (m :: * -&gt; *).
MonadPlus m =&gt;
(forall d. Data d =&gt; d -&gt; m d) -&gt; ByteArray -&gt; m ByteArray
forall (c :: * -&gt; *).
(forall b r. Data b =&gt; c (b -&gt; r) -&gt; c r)
-&gt; (forall r. r -&gt; c r) -&gt; Constr -&gt; c ByteArray
forall (c :: * -&gt; *).
(forall d b. Data d =&gt; c (d -&gt; b) -&gt; d -&gt; c b)
-&gt; (forall g. g -&gt; c g) -&gt; ByteArray -&gt; c ByteArray
forall (t :: * -&gt; *) (c :: * -&gt; *).
Typeable t =&gt;
(forall d. Data d =&gt; c (t d)) -&gt; Maybe (c ByteArray)
forall (t :: * -&gt; * -&gt; *) (c :: * -&gt; *).
Typeable t =&gt;
(forall d e. (Data d, Data e) =&gt; c (t d e)) -&gt; Maybe (c ByteArray)
$cgfoldl :: forall (c :: * -&gt; *).
(forall d b. Data d =&gt; c (d -&gt; b) -&gt; d -&gt; c b)
-&gt; (forall g. g -&gt; c g) -&gt; ByteArray -&gt; c ByteArray
gfoldl :: forall (c :: * -&gt; *).
(forall d b. Data d =&gt; c (d -&gt; b) -&gt; d -&gt; c b)
-&gt; (forall g. g -&gt; c g) -&gt; ByteArray -&gt; c ByteArray
$cgunfold :: forall (c :: * -&gt; *).
(forall b r. Data b =&gt; c (b -&gt; r) -&gt; c r)
-&gt; (forall r. r -&gt; c r) -&gt; Constr -&gt; c ByteArray
gunfold :: forall (c :: * -&gt; *).
(forall b r. Data b =&gt; c (b -&gt; r) -&gt; c r)
-&gt; (forall r. r -&gt; c r) -&gt; Constr -&gt; c ByteArray
$ctoConstr :: ByteArray -&gt; Constr
toConstr :: ByteArray -&gt; Constr
$cdataTypeOf :: ByteArray -&gt; DataType
dataTypeOf :: ByteArray -&gt; DataType
$cdataCast1 :: forall (t :: * -&gt; *) (c :: * -&gt; *).
Typeable t =&gt;
(forall d. Data d =&gt; c (t d)) -&gt; Maybe (c ByteArray)
dataCast1 :: forall (t :: * -&gt; *) (c :: * -&gt; *).
Typeable t =&gt;
(forall d. Data d =&gt; c (t d)) -&gt; Maybe (c ByteArray)
$cdataCast2 :: forall (t :: * -&gt; * -&gt; *) (c :: * -&gt; *).
Typeable t =&gt;
(forall d e. (Data d, Data e) =&gt; c (t d e)) -&gt; Maybe (c ByteArray)
dataCast2 :: forall (t :: * -&gt; * -&gt; *) (c :: * -&gt; *).
Typeable t =&gt;
(forall d e. (Data d, Data e) =&gt; c (t d e)) -&gt; Maybe (c ByteArray)
$cgmapT :: (forall b. Data b =&gt; b -&gt; b) -&gt; ByteArray -&gt; ByteArray
gmapT :: (forall b. Data b =&gt; b -&gt; b) -&gt; ByteArray -&gt; ByteArray
$cgmapQl :: forall r r'.
(r -&gt; r' -&gt; r)
-&gt; r -&gt; (forall d. Data d =&gt; d -&gt; r') -&gt; ByteArray -&gt; r
gmapQl :: forall r r'.
(r -&gt; r' -&gt; r)
-&gt; r -&gt; (forall d. Data d =&gt; d -&gt; r') -&gt; ByteArray -&gt; r
$cgmapQr :: forall r r'.
(r' -&gt; r -&gt; r)
-&gt; r -&gt; (forall d. Data d =&gt; d -&gt; r') -&gt; ByteArray -&gt; r
gmapQr :: forall r r'.
(r' -&gt; r -&gt; r)
-&gt; r -&gt; (forall d. Data d =&gt; d -&gt; r') -&gt; ByteArray -&gt; r
$cgmapQ :: forall u. (forall d. Data d =&gt; d -&gt; u) -&gt; ByteArray -&gt; [u]
gmapQ :: forall u. (forall d. Data d =&gt; d -&gt; u) -&gt; ByteArray -&gt; [u]
$cgmapQi :: forall u. Int -&gt; (forall d. Data d =&gt; d -&gt; u) -&gt; ByteArray -&gt; u
gmapQi :: forall u. Int -&gt; (forall d. Data d =&gt; d -&gt; u) -&gt; ByteArray -&gt; u
$cgmapM :: forall (m :: * -&gt; *).
Monad m =&gt;
(forall d. Data d =&gt; d -&gt; m d) -&gt; ByteArray -&gt; m ByteArray
gmapM :: forall (m :: * -&gt; *).
Monad m =&gt;
(forall d. Data d =&gt; d -&gt; m d) -&gt; ByteArray -&gt; m ByteArray
$cgmapMp :: forall (m :: * -&gt; *).
MonadPlus m =&gt;
(forall d. Data d =&gt; d -&gt; m d) -&gt; ByteArray -&gt; m ByteArray
gmapMp :: forall (m :: * -&gt; *).
MonadPlus m =&gt;
(forall d. Data d =&gt; d -&gt; m d) -&gt; ByteArray -&gt; m ByteArray
$cgmapMo :: forall (m :: * -&gt; *).
MonadPlus m =&gt;
(forall d. Data d =&gt; d -&gt; m d) -&gt; ByteArray -&gt; m ByteArray
gmapMo :: forall (m :: * -&gt; *).
MonadPlus m =&gt;
(forall d. Data d =&gt; d -&gt; m d) -&gt; ByteArray -&gt; m ByteArray
</span><span class="hs-identifier hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var">P.Data</span></span></span></span></span></span></span></span></span></span></span></span></span></span></span></span><span class="hs-special">,</span><span id="local-6989586621679156837"><span id="local-6989586621679156842"><span id="local-6989586621679156846"><span id="local-6989586621679156850"><span id="local-6989586621679156854"><span id="local-6989586621679156858"><span id="local-6989586621679156862"><span class="annot"><span class="annottext">Eq ByteArray
Eq ByteArray
-&gt; (ByteArray -&gt; ByteArray -&gt; Ordering)
-&gt; (ByteArray -&gt; ByteArray -&gt; Bool)
-&gt; (ByteArray -&gt; ByteArray -&gt; Bool)
-&gt; (ByteArray -&gt; ByteArray -&gt; Bool)
-&gt; (ByteArray -&gt; ByteArray -&gt; Bool)
-&gt; (ByteArray -&gt; ByteArray -&gt; ByteArray)
-&gt; (ByteArray -&gt; ByteArray -&gt; ByteArray)
-&gt; Ord ByteArray
ByteArray -&gt; ByteArray -&gt; Bool
ByteArray -&gt; ByteArray -&gt; Ordering
ByteArray -&gt; ByteArray -&gt; ByteArray
forall a.
Eq a
-&gt; (a -&gt; a -&gt; Ordering)
-&gt; (a -&gt; a -&gt; Bool)
-&gt; (a -&gt; a -&gt; Bool)
-&gt; (a -&gt; a -&gt; Bool)
-&gt; (a -&gt; a -&gt; Bool)
-&gt; (a -&gt; a -&gt; a)
-&gt; (a -&gt; a -&gt; a)
-&gt; Ord a
$ccompare :: ByteArray -&gt; ByteArray -&gt; Ordering
compare :: ByteArray -&gt; ByteArray -&gt; Ordering
$c&lt; :: ByteArray -&gt; ByteArray -&gt; Bool
&lt; :: ByteArray -&gt; ByteArray -&gt; Bool
$c&lt;= :: ByteArray -&gt; ByteArray -&gt; Bool
&lt;= :: ByteArray -&gt; ByteArray -&gt; Bool
$c&gt; :: ByteArray -&gt; ByteArray -&gt; Bool
&gt; :: ByteArray -&gt; ByteArray -&gt; Bool
$c&gt;= :: ByteArray -&gt; ByteArray -&gt; Bool
&gt;= :: ByteArray -&gt; ByteArray -&gt; Bool
$cmax :: ByteArray -&gt; ByteArray -&gt; ByteArray
max :: ByteArray -&gt; ByteArray -&gt; ByteArray
$cmin :: ByteArray -&gt; ByteArray -&gt; ByteArray
min :: ByteArray -&gt; ByteArray -&gt; ByteArray
</span><span class="hs-identifier hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var">P.Ord</span></span></span></span></span></span></span></span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier hs-type">P.Typeable</span></span><span class="hs-special">,</span><span id="local-6989586621679156867"><span class="annot"><span class="annottext">ByteArray -&gt; ()
(ByteArray -&gt; ()) -&gt; NFData ByteArray
forall a. (a -&gt; ()) -&gt; NFData a
$crnf :: ByteArray -&gt; ()
rnf :: ByteArray -&gt; ()
</span><span class="hs-identifier hs-var hs-var hs-var hs-var">NF.NFData</span></span></span><span class="hs-special">)</span><span>
</span><span id="line-529"></span><span>
</span><span id="line-530"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679156874"><span class="annot"><span class="hs-identifier hs-type">A.FromJSON</span></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#ByteArray"><span class="hs-identifier hs-type">ByteArray</span></a></span></span><span> </span><span class="hs-keyword">where</span><span>
</span><span id="line-531"></span><span>  </span><span id="local-6989586621679156878"><span class="annot"><span class="annottext">parseJSON :: Value -&gt; Parser ByteArray
</span><span class="hs-identifier hs-var hs-var hs-var hs-var">parseJSON</span></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; (Text -&gt; Parser ByteArray) -&gt; Value -&gt; Parser ByteArray
forall a. String -&gt; (Text -&gt; Parser a) -&gt; Value -&gt; Parser a
</span><span class="hs-identifier hs-var">A.withText</span></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;ByteArray&quot;</span></span><span> </span><span class="annot"><span class="annottext">Text -&gt; Parser ByteArray
forall (m :: * -&gt; *). MonadFail m =&gt; Text -&gt; m ByteArray
</span><a href="OpenAPIPetstore.Core.html#_readByteArray"><span class="hs-identifier hs-var">_readByteArray</span></a></span><span>
</span><span id="line-532"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679156882"><span id="local-6989586621679156886"><span id="local-6989586621679156889"><span class="annot"><span class="hs-identifier hs-type">A.ToJSON</span></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#ByteArray"><span class="hs-identifier hs-type">ByteArray</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
</span><span id="line-533"></span><span>  </span><span id="local-6989586621679156893"><span class="annot"><span class="annottext">toJSON :: ByteArray -&gt; Value
</span><span class="hs-identifier hs-var hs-var hs-var hs-var">toJSON</span></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Text -&gt; Value
forall a. ToJSON a =&gt; a -&gt; Value
</span><span class="hs-identifier hs-var">A.toJSON</span></span><span> </span><span class="annot"><span class="annottext">(Text -&gt; Value) -&gt; (ByteArray -&gt; Text) -&gt; ByteArray -&gt; Value
forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">ByteArray -&gt; Text
</span><a href="OpenAPIPetstore.Core.html#_showByteArray"><span class="hs-identifier hs-var">_showByteArray</span></a></span><span>
</span><span id="line-534"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679156897"><span id="local-6989586621679156901"><span class="annot"><span class="hs-identifier hs-type">WH.FromHttpApiData</span></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#ByteArray"><span class="hs-identifier hs-type">ByteArray</span></a></span></span></span><span> </span><span class="hs-keyword">where</span><span>
</span><span id="line-535"></span><span>  </span><span id="local-6989586621679156905"><span class="annot"><span class="annottext">parseUrlPiece :: Text -&gt; Either Text ByteArray
</span><span class="hs-identifier hs-var hs-var hs-var hs-var">parseUrlPiece</span></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Either Text ByteArray
-&gt; (ByteArray -&gt; Either Text ByteArray)
-&gt; Maybe ByteArray
-&gt; Either Text ByteArray
forall b a. b -&gt; (a -&gt; b) -&gt; Maybe a -&gt; b
</span><span class="hs-identifier hs-var">P.maybe</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Text -&gt; Either Text ByteArray
forall a b. a -&gt; Either a b
</span><span class="hs-identifier hs-var">P.Left</span></span><span> </span><span class="annot"><span class="annottext">Text
</span><span class="hs-string">&quot;parseUrlPiece @ByteArray&quot;</span></span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">ByteArray -&gt; Either Text ByteArray
forall a b. b -&gt; Either a b
</span><span class="hs-identifier hs-var">P.Right</span></span><span> </span><span class="annot"><span class="annottext">(Maybe ByteArray -&gt; Either Text ByteArray)
-&gt; (Text -&gt; Maybe ByteArray) -&gt; Text -&gt; Either Text ByteArray
forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">Text -&gt; Maybe ByteArray
forall (m :: * -&gt; *). MonadFail m =&gt; Text -&gt; m ByteArray
</span><a href="OpenAPIPetstore.Core.html#_readByteArray"><span class="hs-identifier hs-var">_readByteArray</span></a></span><span>
</span><span id="line-536"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679156908"><span id="local-6989586621679156912"><span id="local-6989586621679156915"><span class="annot"><span class="hs-identifier hs-type">WH.ToHttpApiData</span></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#ByteArray"><span class="hs-identifier hs-type">ByteArray</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
</span><span id="line-537"></span><span>  </span><span id="local-6989586621679156917"><span class="annot"><span class="annottext">toUrlPiece :: ByteArray -&gt; Text
</span><span class="hs-identifier hs-var hs-var hs-var hs-var">toUrlPiece</span></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">ByteArray -&gt; Text
</span><a href="OpenAPIPetstore.Core.html#_showByteArray"><span class="hs-identifier hs-var">_showByteArray</span></a></span><span>
</span><span id="line-538"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679156919"><span id="local-6989586621679156924"><span class="annot"><span class="hs-identifier hs-type">P.Show</span></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#ByteArray"><span class="hs-identifier hs-type">ByteArray</span></a></span></span></span><span> </span><span class="hs-keyword">where</span><span>
</span><span id="line-539"></span><span>  </span><span id="local-6989586621679156926"><span class="annot"><span class="annottext">show :: ByteArray -&gt; String
</span><span class="hs-identifier hs-var hs-var hs-var hs-var">show</span></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Text -&gt; String
</span><span class="hs-identifier hs-var">T.unpack</span></span><span> </span><span class="annot"><span class="annottext">(Text -&gt; String) -&gt; (ByteArray -&gt; Text) -&gt; ByteArray -&gt; String
forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">ByteArray -&gt; Text
</span><a href="OpenAPIPetstore.Core.html#_showByteArray"><span class="hs-identifier hs-var">_showByteArray</span></a></span><span>
</span><span id="line-540"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679156931"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#ByteArray"><span class="hs-identifier hs-type">ByteArray</span></a></span></span><span> </span><span class="hs-keyword">where</span><span>
</span><span id="line-541"></span><span>  </span><span id="local-6989586621679156935"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -&gt; ByteArray -&gt; ByteString
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeMultipartFormData
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">ByteArray -&gt; ByteString
forall a. ToHttpApiData a =&gt; a -&gt; ByteString
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a></span><span>
</span><span id="line-542"></span><span>
</span><span id="line-543"></span><span class="annot"><span class="hs-comment">-- | read base64 encoded characters</span></span><span>
</span><span id="line-544"></span><span id="local-6989586621679155538"><span class="annot"><a href="OpenAPIPetstore.Core.html#_readByteArray"><span class="hs-identifier hs-type">_readByteArray</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">MonadFail</span></span><span> </span><span class="annot"><a href="#local-6989586621679155538"><span class="hs-identifier hs-type">m</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span class="annot"><span class="hs-identifier hs-type">Text</span></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="#local-6989586621679155538"><span class="hs-identifier hs-type">m</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#ByteArray"><span class="hs-identifier hs-type">ByteArray</span></a></span></span><span>
</span><span id="line-545"></span><span id="_readByteArray"><span class="annot"><span class="annottext">_readByteArray :: forall (m :: * -&gt; *). MonadFail m =&gt; Text -&gt; m ByteArray
</span><a href="OpenAPIPetstore.Core.html#_readByteArray"><span class="hs-identifier hs-var hs-var">_readByteArray</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">(String -&gt; m ByteArray)
-&gt; (ByteString -&gt; m ByteArray)
-&gt; Either String ByteString
-&gt; m ByteArray
forall a c b. (a -&gt; c) -&gt; (b -&gt; c) -&gt; Either a b -&gt; c
</span><span class="hs-identifier hs-var">P.either</span></span><span> </span><span class="annot"><span class="annottext">String -&gt; m ByteArray
forall a. String -&gt; m a
forall (m :: * -&gt; *) a. MonadFail m =&gt; String -&gt; m a
</span><span class="hs-identifier hs-var">P.fail</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">ByteArray -&gt; m ByteArray
forall a. a -&gt; m a
forall (f :: * -&gt; *) a. Applicative f =&gt; a -&gt; f a
</span><span class="hs-identifier hs-var">pure</span></span><span> </span><span class="annot"><span class="annottext">(ByteArray -&gt; m ByteArray)
-&gt; (ByteString -&gt; ByteArray) -&gt; ByteString -&gt; m ByteArray
forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">ByteString -&gt; ByteArray
</span><a href="OpenAPIPetstore.Core.html#ByteArray"><span class="hs-identifier hs-var">ByteArray</span></a></span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">(Either String ByteString -&gt; m ByteArray)
-&gt; (Text -&gt; Either String ByteString) -&gt; Text -&gt; m ByteArray
forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">ByteString -&gt; Either String ByteString
</span><span class="hs-identifier hs-var">BL64.decode</span></span><span> </span><span class="annot"><span class="annottext">(ByteString -&gt; Either String ByteString)
-&gt; (Text -&gt; ByteString) -&gt; Text -&gt; Either String ByteString
forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">ByteString -&gt; ByteString
</span><span class="hs-identifier hs-var">BL.fromStrict</span></span><span> </span><span class="annot"><span class="annottext">(ByteString -&gt; ByteString)
-&gt; (Text -&gt; ByteString) -&gt; Text -&gt; ByteString
forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">Text -&gt; ByteString
</span><span class="hs-identifier hs-var">T.encodeUtf8</span></span><span>
</span><span id="line-546"></span><span class="hs-pragma">{-# INLINE</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#_readByteArray"><span class="hs-pragma hs-type">_readByteArray</span></a></span><span> </span><span class="hs-pragma">#-}</span><span>
</span><span id="line-547"></span><span>
</span><span id="line-548"></span><span class="annot"><span class="hs-comment">-- | show base64 encoded characters</span></span><span>
</span><span id="line-549"></span><span class="annot"><a href="OpenAPIPetstore.Core.html#_showByteArray"><span class="hs-identifier hs-type">_showByteArray</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#ByteArray"><span class="hs-identifier hs-type">ByteArray</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="hs-identifier hs-type">Text</span></span><span>
</span><span id="line-550"></span><span id="_showByteArray"><span class="annot"><span class="annottext">_showByteArray :: ByteArray -&gt; Text
</span><a href="OpenAPIPetstore.Core.html#_showByteArray"><span class="hs-identifier hs-var hs-var">_showByteArray</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">ByteString -&gt; Text
</span><span class="hs-identifier hs-var">T.decodeUtf8</span></span><span> </span><span class="annot"><span class="annottext">(ByteString -&gt; Text)
-&gt; (ByteArray -&gt; ByteString) -&gt; ByteArray -&gt; Text
forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">ByteString -&gt; ByteString
</span><span class="hs-identifier hs-var">BL.toStrict</span></span><span> </span><span class="annot"><span class="annottext">(ByteString -&gt; ByteString)
-&gt; (ByteArray -&gt; ByteString) -&gt; ByteArray -&gt; ByteString
forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">ByteString -&gt; ByteString
</span><span class="hs-identifier hs-var">BL64.encode</span></span><span> </span><span class="annot"><span class="annottext">(ByteString -&gt; ByteString)
-&gt; (ByteArray -&gt; ByteString) -&gt; ByteArray -&gt; ByteString
forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">ByteArray -&gt; ByteString
</span><a href="OpenAPIPetstore.Core.html#unByteArray"><span class="hs-identifier hs-var">unByteArray</span></a></span><span>
</span><span id="line-551"></span><span class="hs-pragma">{-# INLINE</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#_showByteArray"><span class="hs-pragma hs-type">_showByteArray</span></a></span><span> </span><span class="hs-pragma">#-}</span><span>
</span><span id="line-552"></span><span>
</span><span id="line-553"></span><span class="annot"><span class="hs-comment">-- | any sequence of octets</span></span><span>
</span><span id="line-554"></span><span class="hs-keyword">newtype</span><span> </span><span id="Binary"><span class="annot"><a href="OpenAPIPetstore.Core.html#Binary"><span class="hs-identifier hs-var">Binary</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span id="Binary"><span class="annot"><a href="OpenAPIPetstore.Core.html#Binary"><span class="hs-identifier hs-var">Binary</span></a></span></span><span> </span><span class="hs-special">{</span><span> </span><span id="unBinary"><span class="annot"><span class="annottext">Binary -&gt; ByteString
</span><a href="OpenAPIPetstore.Core.html#unBinary"><span class="hs-identifier hs-var hs-var">unBinary</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">BL.ByteString</span></span><span> </span><span class="hs-special">}</span><span>
</span><span id="line-555"></span><span>  </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span id="local-6989586621679156950"><span id="local-6989586621679156954"><span class="annot"><span class="annottext">Binary -&gt; Binary -&gt; Bool
(Binary -&gt; Binary -&gt; Bool)
-&gt; (Binary -&gt; Binary -&gt; Bool) -&gt; Eq Binary
forall a. (a -&gt; a -&gt; Bool) -&gt; (a -&gt; a -&gt; Bool) -&gt; Eq a
$c== :: Binary -&gt; Binary -&gt; Bool
== :: Binary -&gt; Binary -&gt; Bool
$c/= :: Binary -&gt; Binary -&gt; Bool
/= :: Binary -&gt; Binary -&gt; Bool
</span><span class="hs-identifier hs-var hs-var hs-var hs-var hs-var hs-var">P.Eq</span></span></span></span><span class="hs-special">,</span><span id="local-6989586621679156961"><span id="local-6989586621679156964"><span id="local-6989586621679156967"><span id="local-6989586621679156969"><span id="local-6989586621679156971"><span id="local-6989586621679156977"><span id="local-6989586621679156982"><span id="local-6989586621679156985"><span id="local-6989586621679156988"><span id="local-6989586621679156991"><span id="local-6989586621679156994"><span id="local-6989586621679156997"><span id="local-6989586621679157002"><span id="local-6989586621679157007"><span class="annot"><span class="annottext">Typeable Binary
Typeable Binary
-&gt; (forall (c :: * -&gt; *).
    (forall d b. Data d =&gt; c (d -&gt; b) -&gt; d -&gt; c b)
    -&gt; (forall g. g -&gt; c g) -&gt; Binary -&gt; c Binary)
-&gt; (forall (c :: * -&gt; *).
    (forall b r. Data b =&gt; c (b -&gt; r) -&gt; c r)
    -&gt; (forall r. r -&gt; c r) -&gt; Constr -&gt; c Binary)
-&gt; (Binary -&gt; Constr)
-&gt; (Binary -&gt; DataType)
-&gt; (forall (t :: * -&gt; *) (c :: * -&gt; *).
    Typeable t =&gt;
    (forall d. Data d =&gt; c (t d)) -&gt; Maybe (c Binary))
-&gt; (forall (t :: * -&gt; * -&gt; *) (c :: * -&gt; *).
    Typeable t =&gt;
    (forall d e. (Data d, Data e) =&gt; c (t d e)) -&gt; Maybe (c Binary))
-&gt; ((forall b. Data b =&gt; b -&gt; b) -&gt; Binary -&gt; Binary)
-&gt; (forall r r'.
    (r -&gt; r' -&gt; r)
    -&gt; r -&gt; (forall d. Data d =&gt; d -&gt; r') -&gt; Binary -&gt; r)
-&gt; (forall r r'.
    (r' -&gt; r -&gt; r)
    -&gt; r -&gt; (forall d. Data d =&gt; d -&gt; r') -&gt; Binary -&gt; r)
-&gt; (forall u. (forall d. Data d =&gt; d -&gt; u) -&gt; Binary -&gt; [u])
-&gt; (forall u. Int -&gt; (forall d. Data d =&gt; d -&gt; u) -&gt; Binary -&gt; u)
-&gt; (forall (m :: * -&gt; *).
    Monad m =&gt;
    (forall d. Data d =&gt; d -&gt; m d) -&gt; Binary -&gt; m Binary)
-&gt; (forall (m :: * -&gt; *).
    MonadPlus m =&gt;
    (forall d. Data d =&gt; d -&gt; m d) -&gt; Binary -&gt; m Binary)
-&gt; (forall (m :: * -&gt; *).
    MonadPlus m =&gt;
    (forall d. Data d =&gt; d -&gt; m d) -&gt; Binary -&gt; m Binary)
-&gt; Data Binary
Binary -&gt; Constr
Binary -&gt; DataType
(forall b. Data b =&gt; b -&gt; b) -&gt; Binary -&gt; Binary
forall a.
Typeable a
-&gt; (forall (c :: * -&gt; *).
    (forall d b. Data d =&gt; c (d -&gt; b) -&gt; d -&gt; c b)
    -&gt; (forall g. g -&gt; c g) -&gt; a -&gt; c a)
-&gt; (forall (c :: * -&gt; *).
    (forall b r. Data b =&gt; c (b -&gt; r) -&gt; c r)
    -&gt; (forall r. r -&gt; c r) -&gt; Constr -&gt; c a)
-&gt; (a -&gt; Constr)
-&gt; (a -&gt; DataType)
-&gt; (forall (t :: * -&gt; *) (c :: * -&gt; *).
    Typeable t =&gt;
    (forall d. Data d =&gt; c (t d)) -&gt; Maybe (c a))
-&gt; (forall (t :: * -&gt; * -&gt; *) (c :: * -&gt; *).
    Typeable t =&gt;
    (forall d e. (Data d, Data e) =&gt; c (t d e)) -&gt; Maybe (c a))
-&gt; ((forall b. Data b =&gt; b -&gt; b) -&gt; a -&gt; a)
-&gt; (forall r r'.
    (r -&gt; r' -&gt; r) -&gt; r -&gt; (forall d. Data d =&gt; d -&gt; r') -&gt; a -&gt; r)
-&gt; (forall r r'.
    (r' -&gt; r -&gt; r) -&gt; r -&gt; (forall d. Data d =&gt; d -&gt; r') -&gt; a -&gt; r)
-&gt; (forall u. (forall d. Data d =&gt; d -&gt; u) -&gt; a -&gt; [u])
-&gt; (forall u. Int -&gt; (forall d. Data d =&gt; d -&gt; u) -&gt; a -&gt; u)
-&gt; (forall (m :: * -&gt; *).
    Monad m =&gt;
    (forall d. Data d =&gt; d -&gt; m d) -&gt; a -&gt; m a)
-&gt; (forall (m :: * -&gt; *).
    MonadPlus m =&gt;
    (forall d. Data d =&gt; d -&gt; m d) -&gt; a -&gt; m a)
-&gt; (forall (m :: * -&gt; *).
    MonadPlus m =&gt;
    (forall d. Data d =&gt; d -&gt; m d) -&gt; a -&gt; m a)
-&gt; Data a
forall u. Int -&gt; (forall d. Data d =&gt; d -&gt; u) -&gt; Binary -&gt; u
forall u. (forall d. Data d =&gt; d -&gt; u) -&gt; Binary -&gt; [u]
forall r r'.
(r -&gt; r' -&gt; r) -&gt; r -&gt; (forall d. Data d =&gt; d -&gt; r') -&gt; Binary -&gt; r
forall r r'.
(r' -&gt; r -&gt; r) -&gt; r -&gt; (forall d. Data d =&gt; d -&gt; r') -&gt; Binary -&gt; r
forall (m :: * -&gt; *).
Monad m =&gt;
(forall d. Data d =&gt; d -&gt; m d) -&gt; Binary -&gt; m Binary
forall (m :: * -&gt; *).
MonadPlus m =&gt;
(forall d. Data d =&gt; d -&gt; m d) -&gt; Binary -&gt; m Binary
forall (c :: * -&gt; *).
(forall b r. Data b =&gt; c (b -&gt; r) -&gt; c r)
-&gt; (forall r. r -&gt; c r) -&gt; Constr -&gt; c Binary
forall (c :: * -&gt; *).
(forall d b. Data d =&gt; c (d -&gt; b) -&gt; d -&gt; c b)
-&gt; (forall g. g -&gt; c g) -&gt; Binary -&gt; c Binary
forall (t :: * -&gt; *) (c :: * -&gt; *).
Typeable t =&gt;
(forall d. Data d =&gt; c (t d)) -&gt; Maybe (c Binary)
forall (t :: * -&gt; * -&gt; *) (c :: * -&gt; *).
Typeable t =&gt;
(forall d e. (Data d, Data e) =&gt; c (t d e)) -&gt; Maybe (c Binary)
$cgfoldl :: forall (c :: * -&gt; *).
(forall d b. Data d =&gt; c (d -&gt; b) -&gt; d -&gt; c b)
-&gt; (forall g. g -&gt; c g) -&gt; Binary -&gt; c Binary
gfoldl :: forall (c :: * -&gt; *).
(forall d b. Data d =&gt; c (d -&gt; b) -&gt; d -&gt; c b)
-&gt; (forall g. g -&gt; c g) -&gt; Binary -&gt; c Binary
$cgunfold :: forall (c :: * -&gt; *).
(forall b r. Data b =&gt; c (b -&gt; r) -&gt; c r)
-&gt; (forall r. r -&gt; c r) -&gt; Constr -&gt; c Binary
gunfold :: forall (c :: * -&gt; *).
(forall b r. Data b =&gt; c (b -&gt; r) -&gt; c r)
-&gt; (forall r. r -&gt; c r) -&gt; Constr -&gt; c Binary
$ctoConstr :: Binary -&gt; Constr
toConstr :: Binary -&gt; Constr
$cdataTypeOf :: Binary -&gt; DataType
dataTypeOf :: Binary -&gt; DataType
$cdataCast1 :: forall (t :: * -&gt; *) (c :: * -&gt; *).
Typeable t =&gt;
(forall d. Data d =&gt; c (t d)) -&gt; Maybe (c Binary)
dataCast1 :: forall (t :: * -&gt; *) (c :: * -&gt; *).
Typeable t =&gt;
(forall d. Data d =&gt; c (t d)) -&gt; Maybe (c Binary)
$cdataCast2 :: forall (t :: * -&gt; * -&gt; *) (c :: * -&gt; *).
Typeable t =&gt;
(forall d e. (Data d, Data e) =&gt; c (t d e)) -&gt; Maybe (c Binary)
dataCast2 :: forall (t :: * -&gt; * -&gt; *) (c :: * -&gt; *).
Typeable t =&gt;
(forall d e. (Data d, Data e) =&gt; c (t d e)) -&gt; Maybe (c Binary)
$cgmapT :: (forall b. Data b =&gt; b -&gt; b) -&gt; Binary -&gt; Binary
gmapT :: (forall b. Data b =&gt; b -&gt; b) -&gt; Binary -&gt; Binary
$cgmapQl :: forall r r'.
(r -&gt; r' -&gt; r) -&gt; r -&gt; (forall d. Data d =&gt; d -&gt; r') -&gt; Binary -&gt; r
gmapQl :: forall r r'.
(r -&gt; r' -&gt; r) -&gt; r -&gt; (forall d. Data d =&gt; d -&gt; r') -&gt; Binary -&gt; r
$cgmapQr :: forall r r'.
(r' -&gt; r -&gt; r) -&gt; r -&gt; (forall d. Data d =&gt; d -&gt; r') -&gt; Binary -&gt; r
gmapQr :: forall r r'.
(r' -&gt; r -&gt; r) -&gt; r -&gt; (forall d. Data d =&gt; d -&gt; r') -&gt; Binary -&gt; r
$cgmapQ :: forall u. (forall d. Data d =&gt; d -&gt; u) -&gt; Binary -&gt; [u]
gmapQ :: forall u. (forall d. Data d =&gt; d -&gt; u) -&gt; Binary -&gt; [u]
$cgmapQi :: forall u. Int -&gt; (forall d. Data d =&gt; d -&gt; u) -&gt; Binary -&gt; u
gmapQi :: forall u. Int -&gt; (forall d. Data d =&gt; d -&gt; u) -&gt; Binary -&gt; u
$cgmapM :: forall (m :: * -&gt; *).
Monad m =&gt;
(forall d. Data d =&gt; d -&gt; m d) -&gt; Binary -&gt; m Binary
gmapM :: forall (m :: * -&gt; *).
Monad m =&gt;
(forall d. Data d =&gt; d -&gt; m d) -&gt; Binary -&gt; m Binary
$cgmapMp :: forall (m :: * -&gt; *).
MonadPlus m =&gt;
(forall d. Data d =&gt; d -&gt; m d) -&gt; Binary -&gt; m Binary
gmapMp :: forall (m :: * -&gt; *).
MonadPlus m =&gt;
(forall d. Data d =&gt; d -&gt; m d) -&gt; Binary -&gt; m Binary
$cgmapMo :: forall (m :: * -&gt; *).
MonadPlus m =&gt;
(forall d. Data d =&gt; d -&gt; m d) -&gt; Binary -&gt; m Binary
gmapMo :: forall (m :: * -&gt; *).
MonadPlus m =&gt;
(forall d. Data d =&gt; d -&gt; m d) -&gt; Binary -&gt; m Binary
</span><span class="hs-identifier hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var">P.Data</span></span></span></span></span></span></span></span></span></span></span></span></span></span></span></span><span class="hs-special">,</span><span id="local-6989586621679157014"><span id="local-6989586621679157018"><span id="local-6989586621679157022"><span id="local-6989586621679157026"><span id="local-6989586621679157030"><span id="local-6989586621679157034"><span id="local-6989586621679157038"><span class="annot"><span class="annottext">Eq Binary
Eq Binary
-&gt; (Binary -&gt; Binary -&gt; Ordering)
-&gt; (Binary -&gt; Binary -&gt; Bool)
-&gt; (Binary -&gt; Binary -&gt; Bool)
-&gt; (Binary -&gt; Binary -&gt; Bool)
-&gt; (Binary -&gt; Binary -&gt; Bool)
-&gt; (Binary -&gt; Binary -&gt; Binary)
-&gt; (Binary -&gt; Binary -&gt; Binary)
-&gt; Ord Binary
Binary -&gt; Binary -&gt; Bool
Binary -&gt; Binary -&gt; Ordering
Binary -&gt; Binary -&gt; Binary
forall a.
Eq a
-&gt; (a -&gt; a -&gt; Ordering)
-&gt; (a -&gt; a -&gt; Bool)
-&gt; (a -&gt; a -&gt; Bool)
-&gt; (a -&gt; a -&gt; Bool)
-&gt; (a -&gt; a -&gt; Bool)
-&gt; (a -&gt; a -&gt; a)
-&gt; (a -&gt; a -&gt; a)
-&gt; Ord a
$ccompare :: Binary -&gt; Binary -&gt; Ordering
compare :: Binary -&gt; Binary -&gt; Ordering
$c&lt; :: Binary -&gt; Binary -&gt; Bool
&lt; :: Binary -&gt; Binary -&gt; Bool
$c&lt;= :: Binary -&gt; Binary -&gt; Bool
&lt;= :: Binary -&gt; Binary -&gt; Bool
$c&gt; :: Binary -&gt; Binary -&gt; Bool
&gt; :: Binary -&gt; Binary -&gt; Bool
$c&gt;= :: Binary -&gt; Binary -&gt; Bool
&gt;= :: Binary -&gt; Binary -&gt; Bool
$cmax :: Binary -&gt; Binary -&gt; Binary
max :: Binary -&gt; Binary -&gt; Binary
$cmin :: Binary -&gt; Binary -&gt; Binary
min :: Binary -&gt; Binary -&gt; Binary
</span><span class="hs-identifier hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var">P.Ord</span></span></span></span></span></span></span></span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier hs-type">P.Typeable</span></span><span class="hs-special">,</span><span id="local-6989586621679157043"><span class="annot"><span class="annottext">Binary -&gt; ()
(Binary -&gt; ()) -&gt; NFData Binary
forall a. (a -&gt; ()) -&gt; NFData a
$crnf :: Binary -&gt; ()
rnf :: Binary -&gt; ()
</span><span class="hs-identifier hs-var hs-var hs-var hs-var">NF.NFData</span></span></span><span class="hs-special">)</span><span>
</span><span id="line-556"></span><span>
</span><span id="line-557"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679157049"><span class="annot"><span class="hs-identifier hs-type">A.FromJSON</span></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#Binary"><span class="hs-identifier hs-type">Binary</span></a></span></span><span> </span><span class="hs-keyword">where</span><span>
</span><span id="line-558"></span><span>  </span><span id="local-6989586621679157053"><span class="annot"><span class="annottext">parseJSON :: Value -&gt; Parser Binary
</span><span class="hs-identifier hs-var hs-var hs-var hs-var">parseJSON</span></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; (Text -&gt; Parser Binary) -&gt; Value -&gt; Parser Binary
forall a. String -&gt; (Text -&gt; Parser a) -&gt; Value -&gt; Parser a
</span><span class="hs-identifier hs-var">A.withText</span></span><span> </span><span class="annot"><span class="annottext">String
</span><span class="hs-string">&quot;Binary&quot;</span></span><span> </span><span class="annot"><span class="annottext">Text -&gt; Parser Binary
forall (m :: * -&gt; *). MonadFail m =&gt; Text -&gt; m Binary
</span><a href="OpenAPIPetstore.Core.html#_readBinaryBase64"><span class="hs-identifier hs-var">_readBinaryBase64</span></a></span><span>
</span><span id="line-559"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679157057"><span id="local-6989586621679157061"><span id="local-6989586621679157064"><span class="annot"><span class="hs-identifier hs-type">A.ToJSON</span></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#Binary"><span class="hs-identifier hs-type">Binary</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
</span><span id="line-560"></span><span>  </span><span id="local-6989586621679157067"><span class="annot"><span class="annottext">toJSON :: Binary -&gt; Value
</span><span class="hs-identifier hs-var hs-var hs-var hs-var">toJSON</span></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Text -&gt; Value
forall a. ToJSON a =&gt; a -&gt; Value
</span><span class="hs-identifier hs-var">A.toJSON</span></span><span> </span><span class="annot"><span class="annottext">(Text -&gt; Value) -&gt; (Binary -&gt; Text) -&gt; Binary -&gt; Value
forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">Binary -&gt; Text
</span><a href="OpenAPIPetstore.Core.html#_showBinaryBase64"><span class="hs-identifier hs-var">_showBinaryBase64</span></a></span><span>
</span><span id="line-561"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679157071"><span id="local-6989586621679157075"><span class="annot"><span class="hs-identifier hs-type">WH.FromHttpApiData</span></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#Binary"><span class="hs-identifier hs-type">Binary</span></a></span></span></span><span> </span><span class="hs-keyword">where</span><span>
</span><span id="line-562"></span><span>  </span><span id="local-6989586621679157079"><span class="annot"><span class="annottext">parseUrlPiece :: Text -&gt; Either Text Binary
</span><span class="hs-identifier hs-var hs-var hs-var hs-var">parseUrlPiece</span></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Either Text Binary
-&gt; (Binary -&gt; Either Text Binary)
-&gt; Maybe Binary
-&gt; Either Text Binary
forall b a. b -&gt; (a -&gt; b) -&gt; Maybe a -&gt; b
</span><span class="hs-identifier hs-var">P.maybe</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Text -&gt; Either Text Binary
forall a b. a -&gt; Either a b
</span><span class="hs-identifier hs-var">P.Left</span></span><span> </span><span class="annot"><span class="annottext">Text
</span><span class="hs-string">&quot;parseUrlPiece @Binary&quot;</span></span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">Binary -&gt; Either Text Binary
forall a b. b -&gt; Either a b
</span><span class="hs-identifier hs-var">P.Right</span></span><span> </span><span class="annot"><span class="annottext">(Maybe Binary -&gt; Either Text Binary)
-&gt; (Text -&gt; Maybe Binary) -&gt; Text -&gt; Either Text Binary
forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">Text -&gt; Maybe Binary
forall (m :: * -&gt; *). MonadFail m =&gt; Text -&gt; m Binary
</span><a href="OpenAPIPetstore.Core.html#_readBinaryBase64"><span class="hs-identifier hs-var">_readBinaryBase64</span></a></span><span>
</span><span id="line-563"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679157082"><span id="local-6989586621679157086"><span id="local-6989586621679157089"><span class="annot"><span class="hs-identifier hs-type">WH.ToHttpApiData</span></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#Binary"><span class="hs-identifier hs-type">Binary</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
</span><span id="line-564"></span><span>  </span><span id="local-6989586621679157091"><span class="annot"><span class="annottext">toUrlPiece :: Binary -&gt; Text
</span><span class="hs-identifier hs-var hs-var hs-var hs-var">toUrlPiece</span></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Binary -&gt; Text
</span><a href="OpenAPIPetstore.Core.html#_showBinaryBase64"><span class="hs-identifier hs-var">_showBinaryBase64</span></a></span><span>
</span><span id="line-565"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679157093"><span id="local-6989586621679157098"><span class="annot"><span class="hs-identifier hs-type">P.Show</span></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#Binary"><span class="hs-identifier hs-type">Binary</span></a></span></span></span><span> </span><span class="hs-keyword">where</span><span>
</span><span id="line-566"></span><span>  </span><span id="local-6989586621679157100"><span class="annot"><span class="annottext">show :: Binary -&gt; String
</span><span class="hs-identifier hs-var hs-var hs-var hs-var">show</span></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Text -&gt; String
</span><span class="hs-identifier hs-var">T.unpack</span></span><span> </span><span class="annot"><span class="annottext">(Text -&gt; String) -&gt; (Binary -&gt; Text) -&gt; Binary -&gt; String
forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">Binary -&gt; Text
</span><a href="OpenAPIPetstore.Core.html#_showBinaryBase64"><span class="hs-identifier hs-var">_showBinaryBase64</span></a></span><span>
</span><span id="line-567"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679157105"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#Binary"><span class="hs-identifier hs-type">Binary</span></a></span></span><span> </span><span class="hs-keyword">where</span><span>
</span><span id="line-568"></span><span>  </span><span id="local-6989586621679157108"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -&gt; Binary -&gt; ByteString
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeMultipartFormData
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Binary -&gt; ByteString
</span><a href="OpenAPIPetstore.Core.html#unBinary"><span class="hs-identifier hs-var">unBinary</span></a></span><span>
</span><span id="line-569"></span><span>
</span><span id="line-570"></span><span id="local-6989586621679155551"><span class="annot"><a href="OpenAPIPetstore.Core.html#_readBinaryBase64"><span class="hs-identifier hs-type">_readBinaryBase64</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">MonadFail</span></span><span> </span><span class="annot"><a href="#local-6989586621679155551"><span class="hs-identifier hs-type">m</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span class="annot"><span class="hs-identifier hs-type">Text</span></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="#local-6989586621679155551"><span class="hs-identifier hs-type">m</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#Binary"><span class="hs-identifier hs-type">Binary</span></a></span></span><span>
</span><span id="line-571"></span><span id="_readBinaryBase64"><span class="annot"><span class="annottext">_readBinaryBase64 :: forall (m :: * -&gt; *). MonadFail m =&gt; Text -&gt; m Binary
</span><a href="OpenAPIPetstore.Core.html#_readBinaryBase64"><span class="hs-identifier hs-var hs-var">_readBinaryBase64</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">(String -&gt; m Binary)
-&gt; (ByteString -&gt; m Binary) -&gt; Either String ByteString -&gt; m Binary
forall a c b. (a -&gt; c) -&gt; (b -&gt; c) -&gt; Either a b -&gt; c
</span><span class="hs-identifier hs-var">P.either</span></span><span> </span><span class="annot"><span class="annottext">String -&gt; m Binary
forall a. String -&gt; m a
forall (m :: * -&gt; *) a. MonadFail m =&gt; String -&gt; m a
</span><span class="hs-identifier hs-var">P.fail</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Binary -&gt; m Binary
forall a. a -&gt; m a
forall (f :: * -&gt; *) a. Applicative f =&gt; a -&gt; f a
</span><span class="hs-identifier hs-var">pure</span></span><span> </span><span class="annot"><span class="annottext">(Binary -&gt; m Binary)
-&gt; (ByteString -&gt; Binary) -&gt; ByteString -&gt; m Binary
forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">ByteString -&gt; Binary
</span><a href="OpenAPIPetstore.Core.html#Binary"><span class="hs-identifier hs-var">Binary</span></a></span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">(Either String ByteString -&gt; m Binary)
-&gt; (Text -&gt; Either String ByteString) -&gt; Text -&gt; m Binary
forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">ByteString -&gt; Either String ByteString
</span><span class="hs-identifier hs-var">BL64.decode</span></span><span> </span><span class="annot"><span class="annottext">(ByteString -&gt; Either String ByteString)
-&gt; (Text -&gt; ByteString) -&gt; Text -&gt; Either String ByteString
forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">ByteString -&gt; ByteString
</span><span class="hs-identifier hs-var">BL.fromStrict</span></span><span> </span><span class="annot"><span class="annottext">(ByteString -&gt; ByteString)
-&gt; (Text -&gt; ByteString) -&gt; Text -&gt; ByteString
forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">Text -&gt; ByteString
</span><span class="hs-identifier hs-var">T.encodeUtf8</span></span><span>
</span><span id="line-572"></span><span class="hs-pragma">{-# INLINE</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#_readBinaryBase64"><span class="hs-pragma hs-type">_readBinaryBase64</span></a></span><span> </span><span class="hs-pragma">#-}</span><span>
</span><span id="line-573"></span><span>
</span><span id="line-574"></span><span class="annot"><a href="OpenAPIPetstore.Core.html#_showBinaryBase64"><span class="hs-identifier hs-type">_showBinaryBase64</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#Binary"><span class="hs-identifier hs-type">Binary</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="hs-identifier hs-type">Text</span></span><span>
</span><span id="line-575"></span><span id="_showBinaryBase64"><span class="annot"><span class="annottext">_showBinaryBase64 :: Binary -&gt; Text
</span><a href="OpenAPIPetstore.Core.html#_showBinaryBase64"><span class="hs-identifier hs-var hs-var">_showBinaryBase64</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">ByteString -&gt; Text
</span><span class="hs-identifier hs-var">T.decodeUtf8</span></span><span> </span><span class="annot"><span class="annottext">(ByteString -&gt; Text) -&gt; (Binary -&gt; ByteString) -&gt; Binary -&gt; Text
forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">ByteString -&gt; ByteString
</span><span class="hs-identifier hs-var">BL.toStrict</span></span><span> </span><span class="annot"><span class="annottext">(ByteString -&gt; ByteString)
-&gt; (Binary -&gt; ByteString) -&gt; Binary -&gt; ByteString
forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">ByteString -&gt; ByteString
</span><span class="hs-identifier hs-var">BL64.encode</span></span><span> </span><span class="annot"><span class="annottext">(ByteString -&gt; ByteString)
-&gt; (Binary -&gt; ByteString) -&gt; Binary -&gt; ByteString
forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">Binary -&gt; ByteString
</span><a href="OpenAPIPetstore.Core.html#unBinary"><span class="hs-identifier hs-var">unBinary</span></a></span><span>
</span><span id="line-576"></span><span class="hs-pragma">{-# INLINE</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#_showBinaryBase64"><span class="hs-pragma hs-type">_showBinaryBase64</span></a></span><span> </span><span class="hs-pragma">#-}</span><span>
</span><span id="line-577"></span><span>
</span><span id="line-578"></span><span class="annot"><span class="hs-comment">-- * Lens Type Aliases</span></span><span>
</span><span id="line-579"></span><span>
</span><span id="line-580"></span><span class="hs-keyword">type</span><span> </span><span id="Lens_%27"><span class="annot"><a href="OpenAPIPetstore.Core.html#Lens_%27"><span class="hs-identifier hs-var">Lens_'</span></a></span></span><span> </span><span id="local-6989586621679157114"><span class="annot"><a href="#local-6989586621679157114"><span class="hs-identifier hs-type">s</span></a></span></span><span> </span><span id="local-6989586621679157115"><span class="annot"><a href="#local-6989586621679157115"><span class="hs-identifier hs-type">a</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#Lens_"><span class="hs-identifier hs-type">Lens_</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679157114"><span class="hs-identifier hs-type">s</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679157114"><span class="hs-identifier hs-type">s</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679157115"><span class="hs-identifier hs-type">a</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679157115"><span class="hs-identifier hs-type">a</span></a></span><span>
</span><span id="line-581"></span><span class="hs-keyword">type</span><span> </span><span id="Lens_"><span class="annot"><a href="OpenAPIPetstore.Core.html#Lens_"><span class="hs-identifier hs-var">Lens_</span></a></span></span><span> </span><span id="local-6989586621679157117"><span class="annot"><a href="#local-6989586621679157117"><span class="hs-identifier hs-type">s</span></a></span></span><span> </span><span id="local-6989586621679157118"><span class="annot"><a href="#local-6989586621679157118"><span class="hs-identifier hs-type">t</span></a></span></span><span> </span><span id="local-6989586621679157119"><span class="annot"><a href="#local-6989586621679157119"><span class="hs-identifier hs-type">a</span></a></span></span><span> </span><span id="local-6989586621679157120"><span class="annot"><a href="#local-6989586621679157120"><span class="hs-identifier hs-type">b</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">forall</span><span> </span><span class="hs-special">(</span><span id="local-6989586621679155105"><span class="annot"><a href="#local-6989586621679155105"><span class="hs-identifier hs-type">f</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">K.Type</span></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="hs-identifier hs-type">K.Type</span></span><span class="hs-special">)</span><span class="hs-operator">.</span><span> </span><span class="annot"><span class="hs-identifier hs-type">Functor</span></span><span> </span><span class="annot"><a href="#local-6989586621679155105"><span class="hs-identifier hs-type">f</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span class="hs-special">(</span><span class="annot"><a href="#local-6989586621679157119"><span class="hs-identifier hs-type">a</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="#local-6989586621679155105"><span class="hs-identifier hs-type">f</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679157120"><span class="hs-identifier hs-type">b</span></a></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="#local-6989586621679157117"><span class="hs-identifier hs-type">s</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="#local-6989586621679155105"><span class="hs-identifier hs-type">f</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679157118"><span class="hs-identifier hs-type">t</span></a></span><span>
</span><span id="line-582"></span></pre></body></html>