[haskell-http-client] Update haskell-http-client generator to Aeson 2.x (#12309)

* Update haskell-http-client generator to Aeson 2.x

Co-authored-by: Andrea Cognolato <andrecogno@hotmail.it>

samples/client/petstore/haskell-http-client/docs/src/OpenAPIPetstore.API.AnotherFake.html

@@ -69,11 +69,13 @@ Module : OpenAPIPetstore.API.AnotherFake
 </span><span id="line-69"></span><span>  </span><span class="hs-glyph">::</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="OpenAPIPetstore.API.AnotherFake.html#Op123testSpecialTags"><span class="hs-identifier hs-type">Op123testSpecialTags</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</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="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Client"><span class="hs-identifier hs-type">Client</span></a></span><span class="hs-special">)</span><span>
 </span><span id="line-70"></span><span>  </span><span class="hs-glyph">=&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Client"><span class="hs-identifier hs-type">Client</span></a></span><span> </span><span class="hs-comment">-- ^ &quot;body&quot; -  client model</span><span>
 </span><span id="line-71"></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="OpenAPIPetstore.API.AnotherFake.html#Op123testSpecialTags"><span class="hs-identifier hs-type">Op123testSpecialTags</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Client"><span class="hs-identifier hs-type">Client</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a></span><span>
-</span><span id="line-72"></span><span id="op123testSpecialTags"><span class="annot"><span class="annottext">op123testSpecialTags :: Client
+</span><span id="line-72"></span><span id="op123testSpecialTags"><span class="annot"><span class="annottext">op123testSpecialTags :: (Consumes Op123testSpecialTags MimeJSON,
+ MimeRender MimeJSON Client) =&gt;
+Client
 -&gt; OpenAPIPetstoreRequest
      Op123testSpecialTags MimeJSON Client MimeJSON
-</span><a href="OpenAPIPetstore.API.AnotherFake.html#op123testSpecialTags"><span class="hs-identifier hs-var hs-var">op123testSpecialTags</span></a></span></span><span> </span><span id="local-6989586621679152869"><span class="annot"><span class="annottext">Client
-</span><a href="#local-6989586621679152869"><span class="hs-identifier hs-var">body</span></a></span></span><span> </span><span class="hs-glyph">=</span><span>
+</span><a href="OpenAPIPetstore.API.AnotherFake.html#op123testSpecialTags"><span class="hs-identifier hs-var hs-var">op123testSpecialTags</span></a></span></span><span> </span><span id="local-6989586621679164599"><span class="annot"><span class="annottext">Client
+</span><a href="#local-6989586621679164599"><span class="hs-identifier hs-var">body</span></a></span></span><span> </span><span class="hs-glyph">=</span><span>
 </span><span id="line-73"></span><span>  </span><span class="annot"><span class="annottext">Method
 -&gt; [ByteString]
 -&gt; OpenAPIPetstoreRequest
@@ -96,12 +98,12 @@ forall req param contentType res accept.
 OpenAPIPetstoreRequest req contentType res accept
 -&gt; param -&gt; OpenAPIPetstoreRequest req contentType res accept
 </span><a href="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-operator hs-var">`setBodyParam`</span></a></span><span> </span><span class="annot"><span class="annottext">Client
-</span><a href="#local-6989586621679152869"><span class="hs-identifier hs-var">body</span></a></span><span>
+</span><a href="#local-6989586621679164599"><span class="hs-identifier hs-var">body</span></a></span><span>
 </span><span id="line-75"></span><span>
 </span><span id="line-76"></span><span class="hs-keyword">data</span><span> </span><span id="Op123testSpecialTags"><span class="annot"><a href="OpenAPIPetstore.API.AnotherFake.html#Op123testSpecialTags"><span class="hs-identifier hs-var">Op123testSpecialTags</span></a></span></span><span> </span><span>
 </span><span id="line-77"></span><span>
 </span><span id="line-78"></span><span class="hs-comment">-- | /Body Param/ &quot;body&quot; - client model</span><span>
-</span><span id="line-79"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679152865"><span class="annot"><a href="OpenAPIPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.AnotherFake.html#Op123testSpecialTags"><span class="hs-identifier hs-type">Op123testSpecialTags</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Client"><span class="hs-identifier hs-type">Client</span></a></span></span><span> </span><span>
+</span><span id="line-79"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679164595"><span class="annot"><a href="OpenAPIPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.AnotherFake.html#Op123testSpecialTags"><span class="hs-identifier hs-type">Op123testSpecialTags</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Client"><span class="hs-identifier hs-type">Client</span></a></span></span><span> </span><span>
 </span><span id="line-80"></span><span>
 </span><span id="line-81"></span><span class="hs-comment">-- | @application/json@</span><span>
 </span><span id="line-82"></span><span class="hs-keyword">instance</span><span> </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="OpenAPIPetstore.API.AnotherFake.html#Op123testSpecialTags"><span class="hs-identifier hs-type">Op123testSpecialTags</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a></span><span>

samples/client/petstore/haskell-http-client/docs/src/OpenAPIPetstore.API.FakeClassnameTags123.html

@@ -71,10 +71,11 @@ Module : OpenAPIPetstore.API.FakeClassnameTags123
 </span><span id="line-71"></span><span>  </span><span class="hs-glyph">::</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="OpenAPIPetstore.API.FakeClassnameTags123.html#TestClassname"><span class="hs-identifier hs-type">TestClassname</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</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="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Client"><span class="hs-identifier hs-type">Client</span></a></span><span class="hs-special">)</span><span>
 </span><span id="line-72"></span><span>  </span><span class="hs-glyph">=&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Client"><span class="hs-identifier hs-type">Client</span></a></span><span> </span><span class="hs-comment">-- ^ &quot;body&quot; -  client model</span><span>
 </span><span id="line-73"></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="OpenAPIPetstore.API.FakeClassnameTags123.html#TestClassname"><span class="hs-identifier hs-type">TestClassname</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Client"><span class="hs-identifier hs-type">Client</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a></span><span>
-</span><span id="line-74"></span><span id="testClassname"><span class="annot"><span class="annottext">testClassname :: Client
+</span><span id="line-74"></span><span id="testClassname"><span class="annot"><span class="annottext">testClassname :: (Consumes TestClassname MimeJSON, MimeRender MimeJSON Client) =&gt;
+Client
 -&gt; OpenAPIPetstoreRequest TestClassname MimeJSON Client MimeJSON
-</span><a href="OpenAPIPetstore.API.FakeClassnameTags123.html#testClassname"><span class="hs-identifier hs-var hs-var">testClassname</span></a></span></span><span> </span><span id="local-6989586621679152197"><span class="annot"><span class="annottext">Client
-</span><a href="#local-6989586621679152197"><span class="hs-identifier hs-var">body</span></a></span></span><span> </span><span class="hs-glyph">=</span><span>
+</span><a href="OpenAPIPetstore.API.FakeClassnameTags123.html#testClassname"><span class="hs-identifier hs-var hs-var">testClassname</span></a></span></span><span> </span><span id="local-6989586621679163660"><span class="annot"><span class="annottext">Client
+</span><a href="#local-6989586621679163660"><span class="hs-identifier hs-var">body</span></a></span></span><span> </span><span class="hs-glyph">=</span><span>
 </span><span id="line-75"></span><span>  </span><span class="annot"><span class="annottext">Method
 -&gt; [ByteString]
 -&gt; OpenAPIPetstoreRequest TestClassname MimeJSON Client MimeJSON
@@ -94,7 +95,7 @@ OpenAPIPetstoreRequest req contentType res accept
 -&gt; Proxy authMethod
 -&gt; OpenAPIPetstoreRequest req contentType res accept
 </span><a href="OpenAPIPetstore.Core.html#_hasAuthType"><span class="hs-operator hs-var">`_hasAuthType`</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Proxy AuthApiKeyApiKeyQuery
-forall k (t :: k). Proxy t
+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="OpenAPIPetstore.Model.html#AuthApiKeyApiKeyQuery"><span class="hs-identifier hs-type">AuthApiKeyApiKeyQuery</span></a></span><span class="hs-special">)</span><span>
 </span><span id="line-77"></span><span>    </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest TestClassname MimeJSON Client MimeJSON
 -&gt; Client
@@ -105,12 +106,12 @@ forall req param contentType res accept.
 OpenAPIPetstoreRequest req contentType res accept
 -&gt; param -&gt; OpenAPIPetstoreRequest req contentType res accept
 </span><a href="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-operator hs-var">`setBodyParam`</span></a></span><span> </span><span class="annot"><span class="annottext">Client
-</span><a href="#local-6989586621679152197"><span class="hs-identifier hs-var">body</span></a></span><span>
+</span><a href="#local-6989586621679163660"><span class="hs-identifier hs-var">body</span></a></span><span>
 </span><span id="line-78"></span><span>
 </span><span id="line-79"></span><span class="hs-keyword">data</span><span> </span><span id="TestClassname"><span class="annot"><a href="OpenAPIPetstore.API.FakeClassnameTags123.html#TestClassname"><span class="hs-identifier hs-var">TestClassname</span></a></span></span><span> </span><span>
 </span><span id="line-80"></span><span>
 </span><span id="line-81"></span><span class="hs-comment">-- | /Body Param/ &quot;body&quot; - client model</span><span>
-</span><span id="line-82"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679152191"><span class="annot"><a href="OpenAPIPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.FakeClassnameTags123.html#TestClassname"><span class="hs-identifier hs-type">TestClassname</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Client"><span class="hs-identifier hs-type">Client</span></a></span></span><span> </span><span>
+</span><span id="line-82"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679163654"><span class="annot"><a href="OpenAPIPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.FakeClassnameTags123.html#TestClassname"><span class="hs-identifier hs-type">TestClassname</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Client"><span class="hs-identifier hs-type">Client</span></a></span></span><span> </span><span>
 </span><span id="line-83"></span><span>
 </span><span id="line-84"></span><span class="hs-comment">-- | @application/json@</span><span>
 </span><span id="line-85"></span><span class="hs-keyword">instance</span><span> </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="OpenAPIPetstore.API.FakeClassnameTags123.html#TestClassname"><span class="hs-identifier hs-type">TestClassname</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a></span><span>

samples/client/petstore/haskell-http-client/docs/src/OpenAPIPetstore.API.Pet.html

@@ -65,18 +65,20 @@ Module : OpenAPIPetstore.API.Pet
 </span><span id="line-65"></span><span class="hs-comment">-- </span><span>
 </span><span id="line-66"></span><span class="hs-comment">-- AuthMethod: 'AuthOAuthPetstoreAuth'</span><span>
 </span><span id="line-67"></span><span class="hs-comment">-- </span><span>
-</span><span id="line-68"></span><span id="local-6989586621679152027"><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#addPet"><span class="hs-identifier hs-type">addPet</span></a></span><span>
-</span><span id="line-69"></span><span>  </span><span class="hs-glyph">::</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="OpenAPIPetstore.API.Pet.html#AddPet"><span class="hs-identifier hs-type">AddPet</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679152027"><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-6989586621679152027"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a></span><span class="hs-special">)</span><span>
-</span><span id="line-70"></span><span>  </span><span class="hs-glyph">=&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679152027"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="hs-comment">-- ^ request content-type ('MimeType')</span><span>
+</span><span id="line-68"></span><span id="local-6989586621679163620"><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#addPet"><span class="hs-identifier hs-type">addPet</span></a></span><span>
+</span><span id="line-69"></span><span>  </span><span class="hs-glyph">::</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="OpenAPIPetstore.API.Pet.html#AddPet"><span class="hs-identifier hs-type">AddPet</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679163620"><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-6989586621679163620"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a></span><span class="hs-special">)</span><span>
+</span><span id="line-70"></span><span>  </span><span class="hs-glyph">=&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679163620"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="hs-comment">-- ^ request content-type ('MimeType')</span><span>
 </span><span id="line-71"></span><span>  </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a></span><span> </span><span class="hs-comment">-- ^ &quot;body&quot; -  Pet object that needs to be added to the store</span><span>
-</span><span id="line-72"></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="OpenAPIPetstore.API.Pet.html#AddPet"><span class="hs-identifier hs-type">AddPet</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679152027"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span></span><span>
-</span><span id="line-73"></span><span id="addPet"><span class="annot"><span class="annottext">addPet :: ContentType contentType
+</span><span id="line-72"></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="OpenAPIPetstore.API.Pet.html#AddPet"><span class="hs-identifier hs-type">AddPet</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679163620"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span></span><span>
+</span><span id="line-73"></span><span id="addPet"><span class="annot"><span class="annottext">addPet :: forall contentType.
+(Consumes AddPet contentType, MimeRender contentType Pet) =&gt;
+ContentType contentType
 -&gt; Pet
 -&gt; OpenAPIPetstoreRequest
      AddPet contentType NoContent MimeNoContent
 </span><a href="OpenAPIPetstore.API.Pet.html#addPet"><span class="hs-identifier hs-var hs-var">addPet</span></a></span></span><span> </span><span class="annot"><span class="annottext">ContentType contentType
-</span><span class="hs-identifier">_</span></span><span> </span><span id="local-6989586621679152025"><span class="annot"><span class="annottext">Pet
-</span><a href="#local-6989586621679152025"><span class="hs-identifier hs-var">body</span></a></span></span><span> </span><span class="hs-glyph">=</span><span>
+</span><span class="hs-identifier">_</span></span><span> </span><span id="local-6989586621679163459"><span class="annot"><span class="annottext">Pet
+</span><a href="#local-6989586621679163459"><span class="hs-identifier hs-var">body</span></a></span></span><span> </span><span class="hs-glyph">=</span><span>
 </span><span id="line-74"></span><span>  </span><span class="annot"><span class="annottext">Method
 -&gt; [ByteString]
 -&gt; OpenAPIPetstoreRequest
@@ -98,7 +100,7 @@ OpenAPIPetstoreRequest req contentType res accept
 -&gt; Proxy authMethod
 -&gt; OpenAPIPetstoreRequest req contentType res accept
 </span><a href="OpenAPIPetstore.Core.html#_hasAuthType"><span class="hs-operator hs-var">`_hasAuthType`</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Proxy AuthOAuthPetstoreAuth
-forall k (t :: k). Proxy t
+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="OpenAPIPetstore.Model.html#AuthOAuthPetstoreAuth"><span class="hs-identifier hs-type">AuthOAuthPetstoreAuth</span></a></span><span class="hs-special">)</span><span>
 </span><span id="line-76"></span><span>    </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest AddPet contentType NoContent MimeNoContent
 -&gt; Pet
@@ -110,12 +112,12 @@ forall req param contentType res accept.
 OpenAPIPetstoreRequest req contentType res accept
 -&gt; param -&gt; OpenAPIPetstoreRequest req contentType res accept
 </span><a href="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-operator hs-var">`setBodyParam`</span></a></span><span> </span><span class="annot"><span class="annottext">Pet
-</span><a href="#local-6989586621679152025"><span class="hs-identifier hs-var">body</span></a></span><span>
+</span><a href="#local-6989586621679163459"><span class="hs-identifier hs-var">body</span></a></span><span>
 </span><span id="line-77"></span><span>
 </span><span id="line-78"></span><span class="hs-keyword">data</span><span> </span><span id="AddPet"><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#AddPet"><span class="hs-identifier hs-var">AddPet</span></a></span></span><span> </span><span>
 </span><span id="line-79"></span><span>
 </span><span id="line-80"></span><span class="hs-comment">-- | /Body Param/ &quot;body&quot; - Pet object that needs to be added to the store</span><span>
-</span><span id="line-81"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679152019"><span class="annot"><a href="OpenAPIPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#AddPet"><span class="hs-identifier hs-type">AddPet</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a></span></span><span> </span><span>
+</span><span id="line-81"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679163453"><span class="annot"><a href="OpenAPIPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#AddPet"><span class="hs-identifier hs-type">AddPet</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a></span></span><span> </span><span>
 </span><span id="line-82"></span><span>
 </span><span id="line-83"></span><span class="hs-comment">-- | @application/xml@</span><span>
 </span><span id="line-84"></span><span class="hs-keyword">instance</span><span> </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="OpenAPIPetstore.API.Pet.html#AddPet"><span class="hs-identifier hs-type">AddPet</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier hs-type">MimeXML</span></a></span><span>
@@ -139,8 +141,8 @@ OpenAPIPetstoreRequest req contentType res accept
 </span><span id="line-102"></span><span id="deletePet"><span class="annot"><span class="annottext">deletePet :: PetId
 -&gt; OpenAPIPetstoreRequest
      DeletePet MimeNoContent NoContent MimeNoContent
-</span><a href="OpenAPIPetstore.API.Pet.html#deletePet"><span class="hs-identifier hs-var hs-var">deletePet</span></a></span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Model.html#PetId"><span class="hs-identifier hs-type">PetId</span></a></span><span> </span><span id="local-6989586621679152010"><span class="annot"><span class="annottext">Integer
-</span><a href="#local-6989586621679152010"><span class="hs-identifier hs-var">petId</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
+</span><a href="OpenAPIPetstore.API.Pet.html#deletePet"><span class="hs-identifier hs-var hs-var">deletePet</span></a></span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Model.html#PetId"><span class="hs-identifier hs-type">PetId</span></a></span><span> </span><span id="local-6989586621679163435"><span class="annot"><span class="annottext">Integer
+</span><a href="#local-6989586621679163435"><span class="hs-identifier hs-var">petId</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
 </span><span id="line-103"></span><span>  </span><span class="annot"><span class="annottext">Method
 -&gt; [ByteString]
 -&gt; OpenAPIPetstoreRequest
@@ -154,7 +156,7 @@ Method
 </span><span class="hs-string">&quot;/pet/&quot;</span></span><span class="hs-special">,</span><span class="annot"><span class="annottext">Integer -&gt; ByteString
 forall a. ToHttpApiData a =&gt; a -&gt; ByteString
 </span><a href="OpenAPIPetstore.Core.html#toPath"><span class="hs-identifier hs-var">toPath</span></a></span><span> </span><span class="annot"><span class="annottext">Integer
-</span><a href="#local-6989586621679152010"><span class="hs-identifier hs-var">petId</span></a></span><span class="hs-special">]</span><span>
+</span><a href="#local-6989586621679163435"><span class="hs-identifier hs-var">petId</span></a></span><span class="hs-special">]</span><span>
 </span><span id="line-104"></span><span>    </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest
   DeletePet MimeNoContent NoContent MimeNoContent
 -&gt; Proxy AuthOAuthPetstoreAuth
@@ -166,19 +168,20 @@ OpenAPIPetstoreRequest req contentType res accept
 -&gt; Proxy authMethod
 -&gt; OpenAPIPetstoreRequest req contentType res accept
 </span><a href="OpenAPIPetstore.Core.html#_hasAuthType"><span class="hs-operator hs-var">`_hasAuthType`</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Proxy AuthOAuthPetstoreAuth
-forall k (t :: k). Proxy t
+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="OpenAPIPetstore.Model.html#AuthOAuthPetstoreAuth"><span class="hs-identifier hs-type">AuthOAuthPetstoreAuth</span></a></span><span class="hs-special">)</span><span>
 </span><span id="line-105"></span><span>
 </span><span id="line-106"></span><span class="hs-keyword">data</span><span> </span><span id="DeletePet"><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#DeletePet"><span class="hs-identifier hs-var">DeletePet</span></a></span></span><span>  </span><span>
-</span><span id="line-107"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679152006"><span class="annot"><a href="OpenAPIPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#DeletePet"><span class="hs-identifier hs-type">DeletePet</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#ApiKey"><span class="hs-identifier hs-type">ApiKey</span></a></span></span><span> </span><span class="hs-keyword">where</span><span>
-</span><span id="line-108"></span><span>  </span><span id="local-6989586621679152004"><span class="annot"><span class="annottext">applyOptionalParam :: OpenAPIPetstoreRequest DeletePet contentType res accept
+</span><span id="line-107"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679163431"><span class="annot"><a href="OpenAPIPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#DeletePet"><span class="hs-identifier hs-type">DeletePet</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#ApiKey"><span class="hs-identifier hs-type">ApiKey</span></a></span></span><span> </span><span class="hs-keyword">where</span><span>
+</span><span id="line-108"></span><span>  </span><span id="local-6989586621679163423"><span class="annot"><span class="annottext">applyOptionalParam :: forall contentType res accept.
+OpenAPIPetstoreRequest DeletePet contentType res accept
 -&gt; ApiKey
 -&gt; OpenAPIPetstoreRequest DeletePet contentType res accept
-</span><a href="OpenAPIPetstore.Core.html#applyOptionalParam"><span class="hs-identifier hs-var hs-var hs-var hs-var">applyOptionalParam</span></a></span></span><span> </span><span id="local-6989586621679152002"><span class="annot"><span class="annottext">OpenAPIPetstoreRequest DeletePet contentType res accept
-</span><a href="#local-6989586621679152002"><span class="hs-identifier hs-var">req</span></a></span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Model.html#ApiKey"><span class="hs-identifier hs-type">ApiKey</span></a></span><span> </span><span id="local-6989586621679152000"><span class="annot"><span class="annottext">Text
-</span><a href="#local-6989586621679152000"><span class="hs-identifier hs-var">xs</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
+</span><a href="OpenAPIPetstore.Core.html#applyOptionalParam"><span class="hs-identifier hs-var hs-var hs-var hs-var">applyOptionalParam</span></a></span></span><span> </span><span id="local-6989586621679163421"><span class="annot"><span class="annottext">OpenAPIPetstoreRequest DeletePet contentType res accept
+</span><a href="#local-6989586621679163421"><span class="hs-identifier hs-var">req</span></a></span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Model.html#ApiKey"><span class="hs-identifier hs-type">ApiKey</span></a></span><span> </span><span id="local-6989586621679163419"><span class="annot"><span class="annottext">Text
+</span><a href="#local-6989586621679163419"><span class="hs-identifier hs-var">xs</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
 </span><span id="line-109"></span><span>    </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest DeletePet contentType res accept
-</span><a href="#local-6989586621679152002"><span class="hs-identifier hs-var">req</span></a></span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest DeletePet contentType res accept
+</span><a href="#local-6989586621679163421"><span class="hs-identifier hs-var">req</span></a></span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest DeletePet contentType res accept
 -&gt; [Header]
 -&gt; OpenAPIPetstoreRequest DeletePet contentType res accept
 forall req contentType res accept.
@@ -188,7 +191,7 @@ OpenAPIPetstoreRequest req contentType res accept
 forall a. ToHttpApiData a =&gt; (HeaderName, a) -&gt; [Header]
 </span><a href="OpenAPIPetstore.Core.html#toHeader"><span class="hs-identifier hs-var">toHeader</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">HeaderName
 </span><span class="hs-string">&quot;api_key&quot;</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="annottext">Text
-</span><a href="#local-6989586621679152000"><span class="hs-identifier hs-var">xs</span></a></span><span class="hs-special">)</span><span>
+</span><a href="#local-6989586621679163419"><span class="hs-identifier hs-var">xs</span></a></span><span class="hs-special">)</span><span>
 </span><span id="line-110"></span><span class="hs-keyword">instance</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#DeletePet"><span class="hs-identifier hs-type">DeletePet</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span><span>
 </span><span id="line-111"></span><span>
 </span><span id="line-112"></span><span>
@@ -202,17 +205,18 @@ forall a. ToHttpApiData a =&gt; (HeaderName, a) -&gt; [Header]
 </span><span id="line-120"></span><span class="hs-comment">-- </span><span>
 </span><span id="line-121"></span><span class="hs-comment">-- AuthMethod: 'AuthOAuthPetstoreAuth'</span><span>
 </span><span id="line-122"></span><span class="hs-comment">-- </span><span>
-</span><span id="line-123"></span><span id="local-6989586621679151996"><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#findPetsByStatus"><span class="hs-identifier hs-type">findPetsByStatus</span></a></span><span>
-</span><span id="line-124"></span><span>  </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151996"><span class="hs-identifier hs-type">accept</span></a></span><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
+</span><span id="line-123"></span><span id="local-6989586621679163568"><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#findPetsByStatus"><span class="hs-identifier hs-type">findPetsByStatus</span></a></span><span>
+</span><span id="line-124"></span><span>  </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679163568"><span class="hs-identifier hs-type">accept</span></a></span><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
 </span><span id="line-125"></span><span>  </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Status"><span class="hs-identifier hs-type">Status</span></a></span><span> </span><span class="hs-comment">-- ^ &quot;status&quot; -  Status values that need to be considered for filter</span><span>
-</span><span id="line-126"></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="OpenAPIPetstore.API.Pet.html#FindPetsByStatus"><span class="hs-identifier hs-type">FindPetsByStatus</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span><span> </span><span class="hs-special">[</span><span class="annot"><a href="OpenAPIPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a></span><span class="hs-special">]</span><span> </span><span class="annot"><a href="#local-6989586621679151996"><span class="hs-identifier hs-type">accept</span></a></span></span><span>
-</span><span id="line-127"></span><span id="findPetsByStatus"><span class="annot"><span class="annottext">findPetsByStatus :: Accept accept
+</span><span id="line-126"></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="OpenAPIPetstore.API.Pet.html#FindPetsByStatus"><span class="hs-identifier hs-type">FindPetsByStatus</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span><span> </span><span class="hs-special">[</span><span class="annot"><a href="OpenAPIPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a></span><span class="hs-special">]</span><span> </span><span class="annot"><a href="#local-6989586621679163568"><span class="hs-identifier hs-type">accept</span></a></span></span><span>
+</span><span id="line-127"></span><span id="findPetsByStatus"><span class="annot"><span class="annottext">findPetsByStatus :: forall accept.
+Accept accept
 -&gt; Status
 -&gt; OpenAPIPetstoreRequest
      FindPetsByStatus MimeNoContent [Pet] accept
 </span><a href="OpenAPIPetstore.API.Pet.html#findPetsByStatus"><span class="hs-identifier hs-var hs-var">findPetsByStatus</span></a></span></span><span>  </span><span class="annot"><span class="annottext">Accept accept
-</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Model.html#Status"><span class="hs-identifier hs-type">Status</span></a></span><span> </span><span id="local-6989586621679151993"><span class="annot"><span class="annottext">[E'Status2]
-</span><a href="#local-6989586621679151993"><span class="hs-identifier hs-var">status</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
+</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Model.html#Status"><span class="hs-identifier hs-type">Status</span></a></span><span> </span><span id="local-6989586621679163405"><span class="annot"><span class="annottext">[E'Status2]
+</span><a href="#local-6989586621679163405"><span class="hs-identifier hs-var">status</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
 </span><span id="line-128"></span><span>  </span><span class="annot"><span class="annottext">Method
 -&gt; [ByteString]
 -&gt; OpenAPIPetstoreRequest
@@ -234,7 +238,7 @@ OpenAPIPetstoreRequest req contentType res accept
 -&gt; Proxy authMethod
 -&gt; OpenAPIPetstoreRequest req contentType res accept
 </span><a href="OpenAPIPetstore.Core.html#_hasAuthType"><span class="hs-operator hs-var">`_hasAuthType`</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Proxy AuthOAuthPetstoreAuth
-forall k (t :: k). Proxy t
+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="OpenAPIPetstore.Model.html#AuthOAuthPetstoreAuth"><span class="hs-identifier hs-type">AuthOAuthPetstoreAuth</span></a></span><span class="hs-special">)</span><span>
 </span><span id="line-130"></span><span>    </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest FindPetsByStatus MimeNoContent [Pet] accept
 -&gt; [QueryItem]
@@ -252,7 +256,7 @@ CollectionFormat -&gt; (Method, Maybe [a]) -&gt; [QueryItem]
 </span><span class="hs-string">&quot;status&quot;</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="annottext">[E'Status2] -&gt; Maybe [E'Status2]
 forall a. a -&gt; Maybe a
 </span><span class="hs-identifier hs-var">Just</span></span><span> </span><span class="annot"><span class="annottext">[E'Status2]
-</span><a href="#local-6989586621679151993"><span class="hs-identifier hs-var">status</span></a></span><span class="hs-special">)</span><span>
+</span><a href="#local-6989586621679163405"><span class="hs-identifier hs-var">status</span></a></span><span class="hs-special">)</span><span>
 </span><span id="line-131"></span><span>
 </span><span id="line-132"></span><span class="hs-keyword">data</span><span> </span><span id="FindPetsByStatus"><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#FindPetsByStatus"><span class="hs-identifier hs-var">FindPetsByStatus</span></a></span></span><span>  </span><span>
 </span><span id="line-133"></span><span class="hs-comment">-- | @application/xml@</span><span>
@@ -271,16 +275,17 @@ forall a. a -&gt; Maybe a
 </span><span id="line-146"></span><span class="hs-comment">-- </span><span>
 </span><span id="line-147"></span><span class="hs-comment">-- AuthMethod: 'AuthOAuthPetstoreAuth'</span><span>
 </span><span id="line-148"></span><span class="hs-comment">-- </span><span>
-</span><span id="line-149"></span><span id="local-6989586621679151987"><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#findPetsByTags"><span class="hs-identifier hs-type">findPetsByTags</span></a></span><span>
-</span><span id="line-150"></span><span>  </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151987"><span class="hs-identifier hs-type">accept</span></a></span><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
+</span><span id="line-149"></span><span id="local-6989586621679163554"><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#findPetsByTags"><span class="hs-identifier hs-type">findPetsByTags</span></a></span><span>
+</span><span id="line-150"></span><span>  </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679163554"><span class="hs-identifier hs-type">accept</span></a></span><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
 </span><span id="line-151"></span><span>  </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Tags"><span class="hs-identifier hs-type">Tags</span></a></span><span> </span><span class="hs-comment">-- ^ &quot;tags&quot; -  Tags to filter by</span><span>
-</span><span id="line-152"></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="OpenAPIPetstore.API.Pet.html#FindPetsByTags"><span class="hs-identifier hs-type">FindPetsByTags</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span><span> </span><span class="hs-special">[</span><span class="annot"><a href="OpenAPIPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a></span><span class="hs-special">]</span><span> </span><span class="annot"><a href="#local-6989586621679151987"><span class="hs-identifier hs-type">accept</span></a></span></span><span>
-</span><span id="line-153"></span><span id="findPetsByTags"><span class="annot"><span class="annottext">findPetsByTags :: Accept accept
+</span><span id="line-152"></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="OpenAPIPetstore.API.Pet.html#FindPetsByTags"><span class="hs-identifier hs-type">FindPetsByTags</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span><span> </span><span class="hs-special">[</span><span class="annot"><a href="OpenAPIPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a></span><span class="hs-special">]</span><span> </span><span class="annot"><a href="#local-6989586621679163554"><span class="hs-identifier hs-type">accept</span></a></span></span><span>
+</span><span id="line-153"></span><span id="findPetsByTags"><span class="annot"><span class="annottext">findPetsByTags :: forall accept.
+Accept accept
 -&gt; Tags
 -&gt; OpenAPIPetstoreRequest FindPetsByTags MimeNoContent [Pet] accept
 </span><a href="OpenAPIPetstore.API.Pet.html#findPetsByTags"><span class="hs-identifier hs-var hs-var">findPetsByTags</span></a></span></span><span>  </span><span class="annot"><span class="annottext">Accept accept
-</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Model.html#Tags"><span class="hs-identifier hs-type">Tags</span></a></span><span> </span><span id="local-6989586621679151984"><span class="annot"><span class="annottext">[Text]
-</span><a href="#local-6989586621679151984"><span class="hs-identifier hs-var">tags</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
+</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Model.html#Tags"><span class="hs-identifier hs-type">Tags</span></a></span><span> </span><span id="local-6989586621679163388"><span class="annot"><span class="annottext">[Text]
+</span><a href="#local-6989586621679163388"><span class="hs-identifier hs-var">tags</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
 </span><span id="line-154"></span><span>  </span><span class="annot"><span class="annottext">Method
 -&gt; [ByteString]
 -&gt; OpenAPIPetstoreRequest FindPetsByTags MimeNoContent [Pet] accept
@@ -300,7 +305,7 @@ OpenAPIPetstoreRequest req contentType res accept
 -&gt; Proxy authMethod
 -&gt; OpenAPIPetstoreRequest req contentType res accept
 </span><a href="OpenAPIPetstore.Core.html#_hasAuthType"><span class="hs-operator hs-var">`_hasAuthType`</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Proxy AuthOAuthPetstoreAuth
-forall k (t :: k). Proxy t
+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="OpenAPIPetstore.Model.html#AuthOAuthPetstoreAuth"><span class="hs-identifier hs-type">AuthOAuthPetstoreAuth</span></a></span><span class="hs-special">)</span><span>
 </span><span id="line-156"></span><span>    </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest FindPetsByTags MimeNoContent [Pet] accept
 -&gt; [QueryItem]
@@ -317,7 +322,7 @@ CollectionFormat -&gt; (Method, Maybe [a]) -&gt; [QueryItem]
 </span><span class="hs-string">&quot;tags&quot;</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="annottext">[Text] -&gt; Maybe [Text]
 forall a. a -&gt; Maybe a
 </span><span class="hs-identifier hs-var">Just</span></span><span> </span><span class="annot"><span class="annottext">[Text]
-</span><a href="#local-6989586621679151984"><span class="hs-identifier hs-var">tags</span></a></span><span class="hs-special">)</span><span>
+</span><a href="#local-6989586621679163388"><span class="hs-identifier hs-var">tags</span></a></span><span class="hs-special">)</span><span>
 </span><span id="line-157"></span><span>
 </span><span id="line-158"></span><span class="hs-pragma">{-# DEPRECATED</span><span> </span><span class="hs-pragma">findPetsByTags</span><span> </span><span class="hs-pragma">&quot;&quot;</span><span> </span><span class="hs-pragma">#-}</span><span>
 </span><span id="line-159"></span><span>
@@ -338,16 +343,17 @@ forall a. a -&gt; Maybe a
 </span><span id="line-174"></span><span class="hs-comment">-- </span><span>
 </span><span id="line-175"></span><span class="hs-comment">-- AuthMethod: 'AuthApiKeyApiKey'</span><span>
 </span><span id="line-176"></span><span class="hs-comment">-- </span><span>
-</span><span id="line-177"></span><span id="local-6989586621679151981"><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#getPetById"><span class="hs-identifier hs-type">getPetById</span></a></span><span>
-</span><span id="line-178"></span><span>  </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151981"><span class="hs-identifier hs-type">accept</span></a></span><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
+</span><span id="line-177"></span><span id="local-6989586621679163550"><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#getPetById"><span class="hs-identifier hs-type">getPetById</span></a></span><span>
+</span><span id="line-178"></span><span>  </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679163550"><span class="hs-identifier hs-type">accept</span></a></span><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
 </span><span id="line-179"></span><span>  </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#PetId"><span class="hs-identifier hs-type">PetId</span></a></span><span> </span><span class="hs-comment">-- ^ &quot;petId&quot; -  ID of pet to return</span><span>
-</span><span id="line-180"></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="OpenAPIPetstore.API.Pet.html#GetPetById"><span class="hs-identifier hs-type">GetPetById</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151981"><span class="hs-identifier hs-type">accept</span></a></span></span><span>
-</span><span id="line-181"></span><span id="getPetById"><span class="annot"><span class="annottext">getPetById :: Accept accept
+</span><span id="line-180"></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="OpenAPIPetstore.API.Pet.html#GetPetById"><span class="hs-identifier hs-type">GetPetById</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679163550"><span class="hs-identifier hs-type">accept</span></a></span></span><span>
+</span><span id="line-181"></span><span id="getPetById"><span class="annot"><span class="annottext">getPetById :: forall accept.
+Accept accept
 -&gt; PetId
 -&gt; OpenAPIPetstoreRequest GetPetById MimeNoContent Pet accept
 </span><a href="OpenAPIPetstore.API.Pet.html#getPetById"><span class="hs-identifier hs-var hs-var">getPetById</span></a></span></span><span>  </span><span class="annot"><span class="annottext">Accept accept
-</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Model.html#PetId"><span class="hs-identifier hs-type">PetId</span></a></span><span> </span><span id="local-6989586621679151979"><span class="annot"><span class="annottext">Integer
-</span><a href="#local-6989586621679151979"><span class="hs-identifier hs-var">petId</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
+</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Model.html#PetId"><span class="hs-identifier hs-type">PetId</span></a></span><span> </span><span id="local-6989586621679163375"><span class="annot"><span class="annottext">Integer
+</span><a href="#local-6989586621679163375"><span class="hs-identifier hs-var">petId</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
 </span><span id="line-182"></span><span>  </span><span class="annot"><span class="annottext">Method
 -&gt; [ByteString]
 -&gt; OpenAPIPetstoreRequest GetPetById MimeNoContent Pet accept
@@ -360,7 +366,7 @@ Method
 </span><span class="hs-string">&quot;/pet/&quot;</span></span><span class="hs-special">,</span><span class="annot"><span class="annottext">Integer -&gt; ByteString
 forall a. ToHttpApiData a =&gt; a -&gt; ByteString
 </span><a href="OpenAPIPetstore.Core.html#toPath"><span class="hs-identifier hs-var">toPath</span></a></span><span> </span><span class="annot"><span class="annottext">Integer
-</span><a href="#local-6989586621679151979"><span class="hs-identifier hs-var">petId</span></a></span><span class="hs-special">]</span><span>
+</span><a href="#local-6989586621679163375"><span class="hs-identifier hs-var">petId</span></a></span><span class="hs-special">]</span><span>
 </span><span id="line-183"></span><span>    </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest GetPetById MimeNoContent Pet accept
 -&gt; Proxy AuthApiKeyApiKey
 -&gt; OpenAPIPetstoreRequest GetPetById MimeNoContent Pet accept
@@ -370,7 +376,7 @@ OpenAPIPetstoreRequest req contentType res accept
 -&gt; Proxy authMethod
 -&gt; OpenAPIPetstoreRequest req contentType res accept
 </span><a href="OpenAPIPetstore.Core.html#_hasAuthType"><span class="hs-operator hs-var">`_hasAuthType`</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Proxy AuthApiKeyApiKey
-forall k (t :: k). Proxy t
+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="OpenAPIPetstore.Model.html#AuthApiKeyApiKey"><span class="hs-identifier hs-type">AuthApiKeyApiKey</span></a></span><span class="hs-special">)</span><span>
 </span><span id="line-184"></span><span>
 </span><span id="line-185"></span><span class="hs-keyword">data</span><span> </span><span id="GetPetById"><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#GetPetById"><span class="hs-identifier hs-var">GetPetById</span></a></span></span><span>  </span><span>
@@ -388,18 +394,20 @@ forall k (t :: k). Proxy t
 </span><span id="line-197"></span><span class="hs-comment">-- </span><span>
 </span><span id="line-198"></span><span class="hs-comment">-- AuthMethod: 'AuthOAuthPetstoreAuth'</span><span>
 </span><span id="line-199"></span><span class="hs-comment">-- </span><span>
-</span><span id="line-200"></span><span id="local-6989586621679151976"><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#updatePet"><span class="hs-identifier hs-type">updatePet</span></a></span><span>
-</span><span id="line-201"></span><span>  </span><span class="hs-glyph">::</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="OpenAPIPetstore.API.Pet.html#UpdatePet"><span class="hs-identifier hs-type">UpdatePet</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151976"><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-6989586621679151976"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a></span><span class="hs-special">)</span><span>
-</span><span id="line-202"></span><span>  </span><span class="hs-glyph">=&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151976"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="hs-comment">-- ^ request content-type ('MimeType')</span><span>
+</span><span id="line-200"></span><span id="local-6989586621679163546"><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#updatePet"><span class="hs-identifier hs-type">updatePet</span></a></span><span>
+</span><span id="line-201"></span><span>  </span><span class="hs-glyph">::</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="OpenAPIPetstore.API.Pet.html#UpdatePet"><span class="hs-identifier hs-type">UpdatePet</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679163546"><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-6989586621679163546"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a></span><span class="hs-special">)</span><span>
+</span><span id="line-202"></span><span>  </span><span class="hs-glyph">=&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679163546"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="hs-comment">-- ^ request content-type ('MimeType')</span><span>
 </span><span id="line-203"></span><span>  </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a></span><span> </span><span class="hs-comment">-- ^ &quot;body&quot; -  Pet object that needs to be added to the store</span><span>
-</span><span id="line-204"></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="OpenAPIPetstore.API.Pet.html#UpdatePet"><span class="hs-identifier hs-type">UpdatePet</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151976"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span></span><span>
-</span><span id="line-205"></span><span id="updatePet"><span class="annot"><span class="annottext">updatePet :: ContentType contentType
+</span><span id="line-204"></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="OpenAPIPetstore.API.Pet.html#UpdatePet"><span class="hs-identifier hs-type">UpdatePet</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679163546"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span></span><span>
+</span><span id="line-205"></span><span id="updatePet"><span class="annot"><span class="annottext">updatePet :: forall contentType.
+(Consumes UpdatePet contentType, MimeRender contentType Pet) =&gt;
+ContentType contentType
 -&gt; Pet
 -&gt; OpenAPIPetstoreRequest
      UpdatePet contentType NoContent MimeNoContent
 </span><a href="OpenAPIPetstore.API.Pet.html#updatePet"><span class="hs-identifier hs-var hs-var">updatePet</span></a></span></span><span> </span><span class="annot"><span class="annottext">ContentType contentType
-</span><span class="hs-identifier">_</span></span><span> </span><span id="local-6989586621679151974"><span class="annot"><span class="annottext">Pet
-</span><a href="#local-6989586621679151974"><span class="hs-identifier hs-var">body</span></a></span></span><span> </span><span class="hs-glyph">=</span><span>
+</span><span class="hs-identifier">_</span></span><span> </span><span id="local-6989586621679163359"><span class="annot"><span class="annottext">Pet
+</span><a href="#local-6989586621679163359"><span class="hs-identifier hs-var">body</span></a></span></span><span> </span><span class="hs-glyph">=</span><span>
 </span><span id="line-206"></span><span>  </span><span class="annot"><span class="annottext">Method
 -&gt; [ByteString]
 -&gt; OpenAPIPetstoreRequest
@@ -422,7 +430,7 @@ OpenAPIPetstoreRequest req contentType res accept
 -&gt; Proxy authMethod
 -&gt; OpenAPIPetstoreRequest req contentType res accept
 </span><a href="OpenAPIPetstore.Core.html#_hasAuthType"><span class="hs-operator hs-var">`_hasAuthType`</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Proxy AuthOAuthPetstoreAuth
-forall k (t :: k). Proxy t
+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="OpenAPIPetstore.Model.html#AuthOAuthPetstoreAuth"><span class="hs-identifier hs-type">AuthOAuthPetstoreAuth</span></a></span><span class="hs-special">)</span><span>
 </span><span id="line-208"></span><span>    </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest
   UpdatePet contentType NoContent MimeNoContent
@@ -435,12 +443,12 @@ forall req param contentType res accept.
 OpenAPIPetstoreRequest req contentType res accept
 -&gt; param -&gt; OpenAPIPetstoreRequest req contentType res accept
 </span><a href="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-operator hs-var">`setBodyParam`</span></a></span><span> </span><span class="annot"><span class="annottext">Pet
-</span><a href="#local-6989586621679151974"><span class="hs-identifier hs-var">body</span></a></span><span>
+</span><a href="#local-6989586621679163359"><span class="hs-identifier hs-var">body</span></a></span><span>
 </span><span id="line-209"></span><span>
 </span><span id="line-210"></span><span class="hs-keyword">data</span><span> </span><span id="UpdatePet"><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#UpdatePet"><span class="hs-identifier hs-var">UpdatePet</span></a></span></span><span> </span><span>
 </span><span id="line-211"></span><span>
 </span><span id="line-212"></span><span class="hs-comment">-- | /Body Param/ &quot;body&quot; - Pet object that needs to be added to the store</span><span>
-</span><span id="line-213"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679151972"><span class="annot"><a href="OpenAPIPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#UpdatePet"><span class="hs-identifier hs-type">UpdatePet</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a></span></span><span> </span><span>
+</span><span id="line-213"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679163357"><span class="annot"><a href="OpenAPIPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#UpdatePet"><span class="hs-identifier hs-type">UpdatePet</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a></span></span><span> </span><span>
 </span><span id="line-214"></span><span>
 </span><span id="line-215"></span><span class="hs-comment">-- | @application/xml@</span><span>
 </span><span id="line-216"></span><span class="hs-keyword">instance</span><span> </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="OpenAPIPetstore.API.Pet.html#UpdatePet"><span class="hs-identifier hs-type">UpdatePet</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier hs-type">MimeXML</span></a></span><span>
@@ -462,11 +470,12 @@ OpenAPIPetstoreRequest req contentType res accept
 </span><span id="line-232"></span><span>  </span><span class="hs-glyph">::</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="OpenAPIPetstore.API.Pet.html#UpdatePetWithForm"><span class="hs-identifier hs-type">UpdatePetWithForm</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier hs-type">MimeFormUrlEncoded</span></a></span><span class="hs-special">)</span><span>
 </span><span id="line-233"></span><span>  </span><span class="hs-glyph">=&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#PetId"><span class="hs-identifier hs-type">PetId</span></a></span><span> </span><span class="hs-comment">-- ^ &quot;petId&quot; -  ID of pet that needs to be updated</span><span>
 </span><span id="line-234"></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="OpenAPIPetstore.API.Pet.html#UpdatePetWithForm"><span class="hs-identifier hs-type">UpdatePetWithForm</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier hs-type">MimeFormUrlEncoded</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span><span>
-</span><span id="line-235"></span><span id="updatePetWithForm"><span class="annot"><span class="annottext">updatePetWithForm :: PetId
+</span><span id="line-235"></span><span id="updatePetWithForm"><span class="annot"><span class="annottext">updatePetWithForm :: Consumes UpdatePetWithForm MimeFormUrlEncoded =&gt;
+PetId
 -&gt; OpenAPIPetstoreRequest
      UpdatePetWithForm MimeFormUrlEncoded NoContent MimeNoContent
-</span><a href="OpenAPIPetstore.API.Pet.html#updatePetWithForm"><span class="hs-identifier hs-var hs-var">updatePetWithForm</span></a></span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Model.html#PetId"><span class="hs-identifier hs-type">PetId</span></a></span><span> </span><span id="local-6989586621679151967"><span class="annot"><span class="annottext">Integer
-</span><a href="#local-6989586621679151967"><span class="hs-identifier hs-var">petId</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
+</span><a href="OpenAPIPetstore.API.Pet.html#updatePetWithForm"><span class="hs-identifier hs-var hs-var">updatePetWithForm</span></a></span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Model.html#PetId"><span class="hs-identifier hs-type">PetId</span></a></span><span> </span><span id="local-6989586621679163341"><span class="annot"><span class="annottext">Integer
+</span><a href="#local-6989586621679163341"><span class="hs-identifier hs-var">petId</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
 </span><span id="line-236"></span><span>  </span><span class="annot"><span class="annottext">Method
 -&gt; [ByteString]
 -&gt; OpenAPIPetstoreRequest
@@ -480,7 +489,7 @@ Method
 </span><span class="hs-string">&quot;/pet/&quot;</span></span><span class="hs-special">,</span><span class="annot"><span class="annottext">Integer -&gt; ByteString
 forall a. ToHttpApiData a =&gt; a -&gt; ByteString
 </span><a href="OpenAPIPetstore.Core.html#toPath"><span class="hs-identifier hs-var">toPath</span></a></span><span> </span><span class="annot"><span class="annottext">Integer
-</span><a href="#local-6989586621679151967"><span class="hs-identifier hs-var">petId</span></a></span><span class="hs-special">]</span><span>
+</span><a href="#local-6989586621679163341"><span class="hs-identifier hs-var">petId</span></a></span><span class="hs-special">]</span><span>
 </span><span id="line-237"></span><span>    </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest
   UpdatePetWithForm MimeFormUrlEncoded NoContent MimeNoContent
 -&gt; Proxy AuthOAuthPetstoreAuth
@@ -492,21 +501,22 @@ OpenAPIPetstoreRequest req contentType res accept
 -&gt; Proxy authMethod
 -&gt; OpenAPIPetstoreRequest req contentType res accept
 </span><a href="OpenAPIPetstore.Core.html#_hasAuthType"><span class="hs-operator hs-var">`_hasAuthType`</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Proxy AuthOAuthPetstoreAuth
-forall k (t :: k). Proxy t
+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="OpenAPIPetstore.Model.html#AuthOAuthPetstoreAuth"><span class="hs-identifier hs-type">AuthOAuthPetstoreAuth</span></a></span><span class="hs-special">)</span><span>
 </span><span id="line-238"></span><span>
 </span><span id="line-239"></span><span class="hs-keyword">data</span><span> </span><span id="UpdatePetWithForm"><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#UpdatePetWithForm"><span class="hs-identifier hs-var">UpdatePetWithForm</span></a></span></span><span>  </span><span>
 </span><span id="line-240"></span><span>
 </span><span id="line-241"></span><span class="hs-comment">-- | /Optional Param/ &quot;name&quot; - Updated name of the pet</span><span>
-</span><span id="line-242"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679151964"><span class="annot"><a href="OpenAPIPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#UpdatePetWithForm"><span class="hs-identifier hs-type">UpdatePetWithForm</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Name2"><span class="hs-identifier hs-type">Name2</span></a></span></span><span> </span><span class="hs-keyword">where</span><span>
-</span><span id="line-243"></span><span>  </span><span id="local-6989586621679151963"><span class="annot"><span class="annottext">applyOptionalParam :: OpenAPIPetstoreRequest UpdatePetWithForm contentType res accept
+</span><span id="line-242"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679163338"><span class="annot"><a href="OpenAPIPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#UpdatePetWithForm"><span class="hs-identifier hs-type">UpdatePetWithForm</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Name2"><span class="hs-identifier hs-type">Name2</span></a></span></span><span> </span><span class="hs-keyword">where</span><span>
+</span><span id="line-243"></span><span>  </span><span id="local-6989586621679163335"><span class="annot"><span class="annottext">applyOptionalParam :: forall contentType res accept.
+OpenAPIPetstoreRequest UpdatePetWithForm contentType res accept
 -&gt; Name2
 -&gt; OpenAPIPetstoreRequest UpdatePetWithForm contentType res accept
-</span><a href="#local-6989586621679151963"><span class="hs-identifier hs-var hs-var hs-var hs-var">applyOptionalParam</span></a></span></span><span> </span><span id="local-6989586621679151962"><span class="annot"><span class="annottext">OpenAPIPetstoreRequest UpdatePetWithForm contentType res accept
-</span><a href="#local-6989586621679151962"><span class="hs-identifier hs-var">req</span></a></span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Model.html#Name2"><span class="hs-identifier hs-type">Name2</span></a></span><span> </span><span id="local-6989586621679151960"><span class="annot"><span class="annottext">Text
-</span><a href="#local-6989586621679151960"><span class="hs-identifier hs-var">xs</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
+</span><a href="#local-6989586621679163335"><span class="hs-identifier hs-var hs-var hs-var hs-var">applyOptionalParam</span></a></span></span><span> </span><span id="local-6989586621679163334"><span class="annot"><span class="annottext">OpenAPIPetstoreRequest UpdatePetWithForm contentType res accept
+</span><a href="#local-6989586621679163334"><span class="hs-identifier hs-var">req</span></a></span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Model.html#Name2"><span class="hs-identifier hs-type">Name2</span></a></span><span> </span><span id="local-6989586621679163332"><span class="annot"><span class="annottext">Text
+</span><a href="#local-6989586621679163332"><span class="hs-identifier hs-var">xs</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
 </span><span id="line-244"></span><span>    </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest UpdatePetWithForm contentType res accept
-</span><a href="#local-6989586621679151962"><span class="hs-identifier hs-var">req</span></a></span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest UpdatePetWithForm contentType res accept
+</span><a href="#local-6989586621679163334"><span class="hs-identifier hs-var">req</span></a></span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest UpdatePetWithForm contentType res accept
 -&gt; Form
 -&gt; OpenAPIPetstoreRequest UpdatePetWithForm contentType res accept
 forall req contentType res accept.
@@ -516,18 +526,19 @@ OpenAPIPetstoreRequest req contentType res accept
 forall v. ToHttpApiData v =&gt; (Method, v) -&gt; Form
 </span><a href="OpenAPIPetstore.Core.html#toForm"><span class="hs-identifier hs-var">toForm</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Method
 </span><span class="hs-string">&quot;name&quot;</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="annottext">Text
-</span><a href="#local-6989586621679151960"><span class="hs-identifier hs-var">xs</span></a></span><span class="hs-special">)</span><span>
+</span><a href="#local-6989586621679163332"><span class="hs-identifier hs-var">xs</span></a></span><span class="hs-special">)</span><span>
 </span><span id="line-245"></span><span>
 </span><span id="line-246"></span><span class="hs-comment">-- | /Optional Param/ &quot;status&quot; - Updated status of the pet</span><span>
-</span><span id="line-247"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679151955"><span class="annot"><a href="OpenAPIPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#UpdatePetWithForm"><span class="hs-identifier hs-type">UpdatePetWithForm</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#StatusText"><span class="hs-identifier hs-type">StatusText</span></a></span></span><span> </span><span class="hs-keyword">where</span><span>
-</span><span id="line-248"></span><span>  </span><span id="local-6989586621679151954"><span class="annot"><span class="annottext">applyOptionalParam :: OpenAPIPetstoreRequest UpdatePetWithForm contentType res accept
+</span><span id="line-247"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679163327"><span class="annot"><a href="OpenAPIPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#UpdatePetWithForm"><span class="hs-identifier hs-type">UpdatePetWithForm</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#StatusText"><span class="hs-identifier hs-type">StatusText</span></a></span></span><span> </span><span class="hs-keyword">where</span><span>
+</span><span id="line-248"></span><span>  </span><span id="local-6989586621679163324"><span class="annot"><span class="annottext">applyOptionalParam :: forall contentType res accept.
+OpenAPIPetstoreRequest UpdatePetWithForm contentType res accept
 -&gt; StatusText
 -&gt; OpenAPIPetstoreRequest UpdatePetWithForm contentType res accept
-</span><a href="#local-6989586621679151954"><span class="hs-identifier hs-var hs-var hs-var hs-var">applyOptionalParam</span></a></span></span><span> </span><span id="local-6989586621679151953"><span class="annot"><span class="annottext">OpenAPIPetstoreRequest UpdatePetWithForm contentType res accept
-</span><a href="#local-6989586621679151953"><span class="hs-identifier hs-var">req</span></a></span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Model.html#StatusText"><span class="hs-identifier hs-type">StatusText</span></a></span><span> </span><span id="local-6989586621679151951"><span class="annot"><span class="annottext">Text
-</span><a href="#local-6989586621679151951"><span class="hs-identifier hs-var">xs</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
+</span><a href="#local-6989586621679163324"><span class="hs-identifier hs-var hs-var hs-var hs-var">applyOptionalParam</span></a></span></span><span> </span><span id="local-6989586621679163323"><span class="annot"><span class="annottext">OpenAPIPetstoreRequest UpdatePetWithForm contentType res accept
+</span><a href="#local-6989586621679163323"><span class="hs-identifier hs-var">req</span></a></span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Model.html#StatusText"><span class="hs-identifier hs-type">StatusText</span></a></span><span> </span><span id="local-6989586621679163321"><span class="annot"><span class="annottext">Text
+</span><a href="#local-6989586621679163321"><span class="hs-identifier hs-var">xs</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
 </span><span id="line-249"></span><span>    </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest UpdatePetWithForm contentType res accept
-</span><a href="#local-6989586621679151953"><span class="hs-identifier hs-var">req</span></a></span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest UpdatePetWithForm contentType res accept
+</span><a href="#local-6989586621679163323"><span class="hs-identifier hs-var">req</span></a></span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest UpdatePetWithForm contentType res accept
 -&gt; Form
 -&gt; OpenAPIPetstoreRequest UpdatePetWithForm contentType res accept
 forall req contentType res accept.
@@ -537,7 +548,7 @@ OpenAPIPetstoreRequest req contentType res accept
 forall v. ToHttpApiData v =&gt; (Method, v) -&gt; Form
 </span><a href="OpenAPIPetstore.Core.html#toForm"><span class="hs-identifier hs-var">toForm</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Method
 </span><span class="hs-string">&quot;status&quot;</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="annottext">Text
-</span><a href="#local-6989586621679151951"><span class="hs-identifier hs-var">xs</span></a></span><span class="hs-special">)</span><span>
+</span><a href="#local-6989586621679163321"><span class="hs-identifier hs-var">xs</span></a></span><span class="hs-special">)</span><span>
 </span><span id="line-250"></span><span>
 </span><span id="line-251"></span><span class="hs-comment">-- | @application/x-www-form-urlencoded@</span><span>
 </span><span id="line-252"></span><span class="hs-keyword">instance</span><span> </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="OpenAPIPetstore.API.Pet.html#UpdatePetWithForm"><span class="hs-identifier hs-type">UpdatePetWithForm</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier hs-type">MimeFormUrlEncoded</span></a></span><span>
@@ -557,11 +568,12 @@ forall v. ToHttpApiData v =&gt; (Method, v) -&gt; Form
 </span><span id="line-266"></span><span>  </span><span class="hs-glyph">::</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="OpenAPIPetstore.API.Pet.html#UploadFile"><span class="hs-identifier hs-type">UploadFile</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 class="hs-special">)</span><span>
 </span><span id="line-267"></span><span>  </span><span class="hs-glyph">=&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#PetId"><span class="hs-identifier hs-type">PetId</span></a></span><span> </span><span class="hs-comment">-- ^ &quot;petId&quot; -  ID of pet to update</span><span>
 </span><span id="line-268"></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="OpenAPIPetstore.API.Pet.html#UploadFile"><span class="hs-identifier hs-type">UploadFile</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.Model.html#ApiResponse"><span class="hs-identifier hs-type">ApiResponse</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a></span><span>
-</span><span id="line-269"></span><span id="uploadFile"><span class="annot"><span class="annottext">uploadFile :: PetId
+</span><span id="line-269"></span><span id="uploadFile"><span class="annot"><span class="annottext">uploadFile :: Consumes UploadFile MimeMultipartFormData =&gt;
+PetId
 -&gt; OpenAPIPetstoreRequest
      UploadFile MimeMultipartFormData ApiResponse MimeJSON
-</span><a href="OpenAPIPetstore.API.Pet.html#uploadFile"><span class="hs-identifier hs-var hs-var">uploadFile</span></a></span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Model.html#PetId"><span class="hs-identifier hs-type">PetId</span></a></span><span> </span><span id="local-6989586621679151947"><span class="annot"><span class="annottext">Integer
-</span><a href="#local-6989586621679151947"><span class="hs-identifier hs-var">petId</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
+</span><a href="OpenAPIPetstore.API.Pet.html#uploadFile"><span class="hs-identifier hs-var hs-var">uploadFile</span></a></span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Model.html#PetId"><span class="hs-identifier hs-type">PetId</span></a></span><span> </span><span id="local-6989586621679163306"><span class="annot"><span class="annottext">Integer
+</span><a href="#local-6989586621679163306"><span class="hs-identifier hs-var">petId</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
 </span><span id="line-270"></span><span>  </span><span class="annot"><span class="annottext">Method
 -&gt; [ByteString]
 -&gt; OpenAPIPetstoreRequest
@@ -575,7 +587,7 @@ Method
 </span><span class="hs-string">&quot;/pet/&quot;</span></span><span class="hs-special">,</span><span class="annot"><span class="annottext">Integer -&gt; ByteString
 forall a. ToHttpApiData a =&gt; a -&gt; ByteString
 </span><a href="OpenAPIPetstore.Core.html#toPath"><span class="hs-identifier hs-var">toPath</span></a></span><span> </span><span class="annot"><span class="annottext">Integer
-</span><a href="#local-6989586621679151947"><span class="hs-identifier hs-var">petId</span></a></span><span class="hs-special">,</span><span class="annot"><span class="annottext">ByteString
+</span><a href="#local-6989586621679163306"><span class="hs-identifier hs-var">petId</span></a></span><span class="hs-special">,</span><span class="annot"><span class="annottext">ByteString
 </span><span class="hs-string">&quot;/uploadImage&quot;</span></span><span class="hs-special">]</span><span>
 </span><span id="line-271"></span><span>    </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest
   UploadFile MimeMultipartFormData ApiResponse MimeJSON
@@ -588,21 +600,22 @@ OpenAPIPetstoreRequest req contentType res accept
 -&gt; Proxy authMethod
 -&gt; OpenAPIPetstoreRequest req contentType res accept
 </span><a href="OpenAPIPetstore.Core.html#_hasAuthType"><span class="hs-operator hs-var">`_hasAuthType`</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Proxy AuthOAuthPetstoreAuth
-forall k (t :: k). Proxy t
+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="OpenAPIPetstore.Model.html#AuthOAuthPetstoreAuth"><span class="hs-identifier hs-type">AuthOAuthPetstoreAuth</span></a></span><span class="hs-special">)</span><span>
 </span><span id="line-272"></span><span>
 </span><span id="line-273"></span><span class="hs-keyword">data</span><span> </span><span id="UploadFile"><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#UploadFile"><span class="hs-identifier hs-var">UploadFile</span></a></span></span><span>  </span><span>
 </span><span id="line-274"></span><span>
 </span><span id="line-275"></span><span class="hs-comment">-- | /Optional Param/ &quot;additionalMetadata&quot; - Additional data to pass to server</span><span>
-</span><span id="line-276"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679151944"><span class="annot"><a href="OpenAPIPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#UploadFile"><span class="hs-identifier hs-type">UploadFile</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#AdditionalMetadata"><span class="hs-identifier hs-type">AdditionalMetadata</span></a></span></span><span> </span><span class="hs-keyword">where</span><span>
-</span><span id="line-277"></span><span>  </span><span id="local-6989586621679151943"><span class="annot"><span class="annottext">applyOptionalParam :: OpenAPIPetstoreRequest UploadFile contentType res accept
+</span><span id="line-276"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679163303"><span class="annot"><a href="OpenAPIPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#UploadFile"><span class="hs-identifier hs-type">UploadFile</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#AdditionalMetadata"><span class="hs-identifier hs-type">AdditionalMetadata</span></a></span></span><span> </span><span class="hs-keyword">where</span><span>
+</span><span id="line-277"></span><span>  </span><span id="local-6989586621679163296"><span class="annot"><span class="annottext">applyOptionalParam :: forall contentType res accept.
+OpenAPIPetstoreRequest UploadFile contentType res accept
 -&gt; AdditionalMetadata
 -&gt; OpenAPIPetstoreRequest UploadFile contentType res accept
-</span><a href="#local-6989586621679151943"><span class="hs-identifier hs-var hs-var hs-var hs-var">applyOptionalParam</span></a></span></span><span> </span><span id="local-6989586621679151942"><span class="annot"><span class="annottext">OpenAPIPetstoreRequest UploadFile contentType res accept
-</span><a href="#local-6989586621679151942"><span class="hs-identifier hs-var">req</span></a></span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Model.html#AdditionalMetadata"><span class="hs-identifier hs-type">AdditionalMetadata</span></a></span><span> </span><span id="local-6989586621679151940"><span class="annot"><span class="annottext">Text
-</span><a href="#local-6989586621679151940"><span class="hs-identifier hs-var">xs</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
+</span><a href="#local-6989586621679163296"><span class="hs-identifier hs-var hs-var hs-var hs-var">applyOptionalParam</span></a></span></span><span> </span><span id="local-6989586621679163295"><span class="annot"><span class="annottext">OpenAPIPetstoreRequest UploadFile contentType res accept
+</span><a href="#local-6989586621679163295"><span class="hs-identifier hs-var">req</span></a></span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Model.html#AdditionalMetadata"><span class="hs-identifier hs-type">AdditionalMetadata</span></a></span><span> </span><span id="local-6989586621679163293"><span class="annot"><span class="annottext">Text
+</span><a href="#local-6989586621679163293"><span class="hs-identifier hs-var">xs</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
 </span><span id="line-278"></span><span>    </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest UploadFile contentType res accept
-</span><a href="#local-6989586621679151942"><span class="hs-identifier hs-var">req</span></a></span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest UploadFile contentType res accept
+</span><a href="#local-6989586621679163295"><span class="hs-identifier hs-var">req</span></a></span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest UploadFile contentType res accept
 -&gt; Part -&gt; OpenAPIPetstoreRequest UploadFile contentType res accept
 forall req contentType res accept.
 OpenAPIPetstoreRequest req contentType res accept
@@ -616,18 +629,19 @@ Text -&gt; ByteString -&gt; PartM m
 forall mtype x. MimeRender mtype x =&gt; mtype -&gt; x -&gt; ByteString
 </span><a href="OpenAPIPetstore.MimeTypes.html#mimeRender%27"><span class="hs-identifier hs-var">mimeRender'</span></a></span><span> </span><span class="annot"><span class="annottext">MimeMultipartFormData
 </span><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-var">MimeMultipartFormData</span></a></span><span> </span><span class="annot"><span class="annottext">Text
-</span><a href="#local-6989586621679151940"><span class="hs-identifier hs-var">xs</span></a></span><span class="hs-special">)</span><span>
+</span><a href="#local-6989586621679163293"><span class="hs-identifier hs-var">xs</span></a></span><span class="hs-special">)</span><span>
 </span><span id="line-279"></span><span>
 </span><span id="line-280"></span><span class="hs-comment">-- | /Optional Param/ &quot;file&quot; - file to upload</span><span>
-</span><span id="line-281"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679151933"><span class="annot"><a href="OpenAPIPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#UploadFile"><span class="hs-identifier hs-type">UploadFile</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#File2"><span class="hs-identifier hs-type">File2</span></a></span></span><span> </span><span class="hs-keyword">where</span><span>
-</span><span id="line-282"></span><span>  </span><span id="local-6989586621679151932"><span class="annot"><span class="annottext">applyOptionalParam :: OpenAPIPetstoreRequest UploadFile contentType res accept
+</span><span id="line-281"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679163286"><span class="annot"><a href="OpenAPIPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#UploadFile"><span class="hs-identifier hs-type">UploadFile</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#File2"><span class="hs-identifier hs-type">File2</span></a></span></span><span> </span><span class="hs-keyword">where</span><span>
+</span><span id="line-282"></span><span>  </span><span id="local-6989586621679163284"><span class="annot"><span class="annottext">applyOptionalParam :: forall contentType res accept.
+OpenAPIPetstoreRequest UploadFile contentType res accept
 -&gt; File2
 -&gt; OpenAPIPetstoreRequest UploadFile contentType res accept
-</span><a href="#local-6989586621679151932"><span class="hs-identifier hs-var hs-var hs-var hs-var">applyOptionalParam</span></a></span></span><span> </span><span id="local-6989586621679151931"><span class="annot"><span class="annottext">OpenAPIPetstoreRequest UploadFile contentType res accept
-</span><a href="#local-6989586621679151931"><span class="hs-identifier hs-var">req</span></a></span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Model.html#File2"><span class="hs-identifier hs-type">File2</span></a></span><span> </span><span id="local-6989586621679151929"><span class="annot"><span class="annottext">FilePath
-</span><a href="#local-6989586621679151929"><span class="hs-identifier hs-var">xs</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
+</span><a href="#local-6989586621679163284"><span class="hs-identifier hs-var hs-var hs-var hs-var">applyOptionalParam</span></a></span></span><span> </span><span id="local-6989586621679163283"><span class="annot"><span class="annottext">OpenAPIPetstoreRequest UploadFile contentType res accept
+</span><a href="#local-6989586621679163283"><span class="hs-identifier hs-var">req</span></a></span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Model.html#File2"><span class="hs-identifier hs-type">File2</span></a></span><span> </span><span id="local-6989586621679163281"><span class="annot"><span class="annottext">FilePath
+</span><a href="#local-6989586621679163281"><span class="hs-identifier hs-var">xs</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
 </span><span id="line-283"></span><span>    </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest UploadFile contentType res accept
-</span><a href="#local-6989586621679151931"><span class="hs-identifier hs-var">req</span></a></span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest UploadFile contentType res accept
+</span><a href="#local-6989586621679163283"><span class="hs-identifier hs-var">req</span></a></span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest UploadFile contentType res accept
 -&gt; Part -&gt; OpenAPIPetstoreRequest UploadFile contentType res accept
 forall req contentType res accept.
 OpenAPIPetstoreRequest req contentType res accept
@@ -635,7 +649,7 @@ OpenAPIPetstoreRequest req contentType res accept
 </span><a href="OpenAPIPetstore.Core.html#_addMultiFormPart"><span class="hs-operator hs-var">`_addMultiFormPart`</span></a></span><span> </span><span class="annot"><span class="annottext">Text -&gt; FilePath -&gt; Part
 </span><span class="hs-identifier hs-var">NH.partFileSource</span></span><span> </span><span class="annot"><span class="annottext">Text
 </span><span class="hs-string">&quot;file&quot;</span></span><span> </span><span class="annot"><span class="annottext">FilePath
-</span><a href="#local-6989586621679151929"><span class="hs-identifier hs-var">xs</span></a></span><span>
+</span><a href="#local-6989586621679163281"><span class="hs-identifier hs-var">xs</span></a></span><span>
 </span><span id="line-284"></span><span>
 </span><span id="line-285"></span><span class="hs-comment">-- | @multipart/form-data@</span><span>
 </span><span id="line-286"></span><span class="hs-keyword">instance</span><span> </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="OpenAPIPetstore.API.Pet.html#UploadFile"><span class="hs-identifier hs-type">UploadFile</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>
@@ -657,16 +671,17 @@ OpenAPIPetstoreRequest req contentType res accept
 </span><span id="line-302"></span><span>  </span><span class="hs-glyph">=&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#RequiredFile"><span class="hs-identifier hs-type">RequiredFile</span></a></span><span> </span><span class="hs-comment">-- ^ &quot;requiredFile&quot; -  file to upload</span><span>
 </span><span id="line-303"></span><span>  </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#PetId"><span class="hs-identifier hs-type">PetId</span></a></span><span> </span><span class="hs-comment">-- ^ &quot;petId&quot; -  ID of pet to update</span><span>
 </span><span id="line-304"></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="OpenAPIPetstore.API.Pet.html#UploadFileWithRequiredFile"><span class="hs-identifier hs-type">UploadFileWithRequiredFile</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.Model.html#ApiResponse"><span class="hs-identifier hs-type">ApiResponse</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a></span><span>
-</span><span id="line-305"></span><span id="uploadFileWithRequiredFile"><span class="annot"><span class="annottext">uploadFileWithRequiredFile :: RequiredFile
+</span><span id="line-305"></span><span id="uploadFileWithRequiredFile"><span class="annot"><span class="annottext">uploadFileWithRequiredFile :: Consumes UploadFileWithRequiredFile MimeMultipartFormData =&gt;
+RequiredFile
 -&gt; PetId
 -&gt; OpenAPIPetstoreRequest
      UploadFileWithRequiredFile
      MimeMultipartFormData
      ApiResponse
      MimeJSON
-</span><a href="OpenAPIPetstore.API.Pet.html#uploadFileWithRequiredFile"><span class="hs-identifier hs-var hs-var">uploadFileWithRequiredFile</span></a></span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Model.html#RequiredFile"><span class="hs-identifier hs-type">RequiredFile</span></a></span><span> </span><span id="local-6989586621679151923"><span class="annot"><span class="annottext">FilePath
-</span><a href="#local-6989586621679151923"><span class="hs-identifier hs-var">requiredFile</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Model.html#PetId"><span class="hs-identifier hs-type">PetId</span></a></span><span> </span><span id="local-6989586621679151922"><span class="annot"><span class="annottext">Integer
-</span><a href="#local-6989586621679151922"><span class="hs-identifier hs-var">petId</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
+</span><a href="OpenAPIPetstore.API.Pet.html#uploadFileWithRequiredFile"><span class="hs-identifier hs-var hs-var">uploadFileWithRequiredFile</span></a></span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Model.html#RequiredFile"><span class="hs-identifier hs-type">RequiredFile</span></a></span><span> </span><span id="local-6989586621679163263"><span class="annot"><span class="annottext">FilePath
+</span><a href="#local-6989586621679163263"><span class="hs-identifier hs-var">requiredFile</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Model.html#PetId"><span class="hs-identifier hs-type">PetId</span></a></span><span> </span><span id="local-6989586621679163262"><span class="annot"><span class="annottext">Integer
+</span><a href="#local-6989586621679163262"><span class="hs-identifier hs-var">petId</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
 </span><span id="line-306"></span><span>  </span><span class="annot"><span class="annottext">Method
 -&gt; [ByteString]
 -&gt; OpenAPIPetstoreRequest
@@ -683,7 +698,7 @@ Method
 </span><span class="hs-string">&quot;/fake/&quot;</span></span><span class="hs-special">,</span><span class="annot"><span class="annottext">Integer -&gt; ByteString
 forall a. ToHttpApiData a =&gt; a -&gt; ByteString
 </span><a href="OpenAPIPetstore.Core.html#toPath"><span class="hs-identifier hs-var">toPath</span></a></span><span> </span><span class="annot"><span class="annottext">Integer
-</span><a href="#local-6989586621679151922"><span class="hs-identifier hs-var">petId</span></a></span><span class="hs-special">,</span><span class="annot"><span class="annottext">ByteString
+</span><a href="#local-6989586621679163262"><span class="hs-identifier hs-var">petId</span></a></span><span class="hs-special">,</span><span class="annot"><span class="annottext">ByteString
 </span><span class="hs-string">&quot;/uploadImageWithRequiredFile&quot;</span></span><span class="hs-special">]</span><span>
 </span><span id="line-307"></span><span>    </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest
   UploadFileWithRequiredFile
@@ -702,7 +717,7 @@ OpenAPIPetstoreRequest req contentType res accept
 -&gt; Proxy authMethod
 -&gt; OpenAPIPetstoreRequest req contentType res accept
 </span><a href="OpenAPIPetstore.Core.html#_hasAuthType"><span class="hs-operator hs-var">`_hasAuthType`</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Proxy AuthOAuthPetstoreAuth
-forall k (t :: k). Proxy t
+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="OpenAPIPetstore.Model.html#AuthOAuthPetstoreAuth"><span class="hs-identifier hs-type">AuthOAuthPetstoreAuth</span></a></span><span class="hs-special">)</span><span>
 </span><span id="line-308"></span><span>    </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest
   UploadFileWithRequiredFile
@@ -721,24 +736,25 @@ OpenAPIPetstoreRequest req contentType res accept
 </span><a href="OpenAPIPetstore.Core.html#_addMultiFormPart"><span class="hs-operator hs-var">`_addMultiFormPart`</span></a></span><span> </span><span class="annot"><span class="annottext">Text -&gt; FilePath -&gt; Part
 </span><span class="hs-identifier hs-var">NH.partFileSource</span></span><span> </span><span class="annot"><span class="annottext">Text
 </span><span class="hs-string">&quot;requiredFile&quot;</span></span><span> </span><span class="annot"><span class="annottext">FilePath
-</span><a href="#local-6989586621679151923"><span class="hs-identifier hs-var">requiredFile</span></a></span><span>
+</span><a href="#local-6989586621679163263"><span class="hs-identifier hs-var">requiredFile</span></a></span><span>
 </span><span id="line-309"></span><span>
 </span><span id="line-310"></span><span class="hs-keyword">data</span><span> </span><span id="UploadFileWithRequiredFile"><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#UploadFileWithRequiredFile"><span class="hs-identifier hs-var">UploadFileWithRequiredFile</span></a></span></span><span>  </span><span>
 </span><span id="line-311"></span><span>
 </span><span id="line-312"></span><span class="hs-comment">-- | /Optional Param/ &quot;additionalMetadata&quot; - Additional data to pass to server</span><span>
-</span><span id="line-313"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679151919"><span class="annot"><a href="OpenAPIPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#UploadFileWithRequiredFile"><span class="hs-identifier hs-type">UploadFileWithRequiredFile</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#AdditionalMetadata"><span class="hs-identifier hs-type">AdditionalMetadata</span></a></span></span><span> </span><span class="hs-keyword">where</span><span>
-</span><span id="line-314"></span><span>  </span><span id="local-6989586621679151918"><span class="annot"><span class="annottext">applyOptionalParam :: OpenAPIPetstoreRequest
+</span><span id="line-313"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679163259"><span class="annot"><a href="OpenAPIPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#UploadFileWithRequiredFile"><span class="hs-identifier hs-type">UploadFileWithRequiredFile</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#AdditionalMetadata"><span class="hs-identifier hs-type">AdditionalMetadata</span></a></span></span><span> </span><span class="hs-keyword">where</span><span>
+</span><span id="line-314"></span><span>  </span><span id="local-6989586621679163255"><span class="annot"><span class="annottext">applyOptionalParam :: forall contentType res accept.
+OpenAPIPetstoreRequest
   UploadFileWithRequiredFile contentType res accept
 -&gt; AdditionalMetadata
 -&gt; OpenAPIPetstoreRequest
      UploadFileWithRequiredFile contentType res accept
-</span><a href="#local-6989586621679151918"><span class="hs-identifier hs-var hs-var hs-var hs-var">applyOptionalParam</span></a></span></span><span> </span><span id="local-6989586621679151917"><span class="annot"><span class="annottext">OpenAPIPetstoreRequest
+</span><a href="#local-6989586621679163255"><span class="hs-identifier hs-var hs-var hs-var hs-var">applyOptionalParam</span></a></span></span><span> </span><span id="local-6989586621679163254"><span class="annot"><span class="annottext">OpenAPIPetstoreRequest
   UploadFileWithRequiredFile contentType res accept
-</span><a href="#local-6989586621679151917"><span class="hs-identifier hs-var">req</span></a></span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Model.html#AdditionalMetadata"><span class="hs-identifier hs-type">AdditionalMetadata</span></a></span><span> </span><span id="local-6989586621679151916"><span class="annot"><span class="annottext">Text
-</span><a href="#local-6989586621679151916"><span class="hs-identifier hs-var">xs</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
+</span><a href="#local-6989586621679163254"><span class="hs-identifier hs-var">req</span></a></span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Model.html#AdditionalMetadata"><span class="hs-identifier hs-type">AdditionalMetadata</span></a></span><span> </span><span id="local-6989586621679163253"><span class="annot"><span class="annottext">Text
+</span><a href="#local-6989586621679163253"><span class="hs-identifier hs-var">xs</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
 </span><span id="line-315"></span><span>    </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest
   UploadFileWithRequiredFile contentType res accept
-</span><a href="#local-6989586621679151917"><span class="hs-identifier hs-var">req</span></a></span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest
+</span><a href="#local-6989586621679163254"><span class="hs-identifier hs-var">req</span></a></span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest
   UploadFileWithRequiredFile contentType res accept
 -&gt; Part
 -&gt; OpenAPIPetstoreRequest
@@ -755,7 +771,7 @@ Text -&gt; ByteString -&gt; PartM m
 forall mtype x. MimeRender mtype x =&gt; mtype -&gt; x -&gt; ByteString
 </span><a href="OpenAPIPetstore.MimeTypes.html#mimeRender%27"><span class="hs-identifier hs-var">mimeRender'</span></a></span><span> </span><span class="annot"><span class="annottext">MimeMultipartFormData
 </span><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-var">MimeMultipartFormData</span></a></span><span> </span><span class="annot"><span class="annottext">Text
-</span><a href="#local-6989586621679151916"><span class="hs-identifier hs-var">xs</span></a></span><span class="hs-special">)</span><span>
+</span><a href="#local-6989586621679163253"><span class="hs-identifier hs-var">xs</span></a></span><span class="hs-special">)</span><span>
 </span><span id="line-316"></span><span>
 </span><span id="line-317"></span><span class="hs-comment">-- | @multipart/form-data@</span><span>
 </span><span id="line-318"></span><span class="hs-keyword">instance</span><span> </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="OpenAPIPetstore.API.Pet.html#UploadFileWithRequiredFile"><span class="hs-identifier hs-type">UploadFileWithRequiredFile</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>

samples/client/petstore/haskell-http-client/docs/src/OpenAPIPetstore.API.Store.html

@@ -71,8 +71,8 @@ Module : OpenAPIPetstore.API.Store
 </span><span id="line-71"></span><span id="deleteOrder"><span class="annot"><span class="annottext">deleteOrder :: OrderIdText
 -&gt; OpenAPIPetstoreRequest
      DeleteOrder MimeNoContent NoContent MimeNoContent
-</span><a href="OpenAPIPetstore.API.Store.html#deleteOrder"><span class="hs-identifier hs-var hs-var">deleteOrder</span></a></span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Model.html#OrderIdText"><span class="hs-identifier hs-type">OrderIdText</span></a></span><span> </span><span id="local-6989586621679151845"><span class="annot"><span class="annottext">Text
-</span><a href="#local-6989586621679151845"><span class="hs-identifier hs-var">orderId</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
+</span><a href="OpenAPIPetstore.API.Store.html#deleteOrder"><span class="hs-identifier hs-var hs-var">deleteOrder</span></a></span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Model.html#OrderIdText"><span class="hs-identifier hs-type">OrderIdText</span></a></span><span> </span><span id="local-6989586621679163161"><span class="annot"><span class="annottext">Text
+</span><a href="#local-6989586621679163161"><span class="hs-identifier hs-var">orderId</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
 </span><span id="line-72"></span><span>  </span><span class="annot"><span class="annottext">Method
 -&gt; [ByteString]
 -&gt; OpenAPIPetstoreRequest
@@ -86,7 +86,7 @@ Method
 </span><span class="hs-string">&quot;/store/order/&quot;</span></span><span class="hs-special">,</span><span class="annot"><span class="annottext">Text -&gt; ByteString
 forall a. ToHttpApiData a =&gt; a -&gt; ByteString
 </span><a href="OpenAPIPetstore.Core.html#toPath"><span class="hs-identifier hs-var">toPath</span></a></span><span> </span><span class="annot"><span class="annottext">Text
-</span><a href="#local-6989586621679151845"><span class="hs-identifier hs-var">orderId</span></a></span><span class="hs-special">]</span><span>
+</span><a href="#local-6989586621679163161"><span class="hs-identifier hs-var">orderId</span></a></span><span class="hs-special">]</span><span>
 </span><span id="line-73"></span><span>
 </span><span id="line-74"></span><span class="hs-keyword">data</span><span> </span><span id="DeleteOrder"><span class="annot"><a href="OpenAPIPetstore.API.Store.html#DeleteOrder"><span class="hs-identifier hs-var">DeleteOrder</span></a></span></span><span>  </span><span>
 </span><span id="line-75"></span><span class="hs-keyword">instance</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.Store.html#DeleteOrder"><span class="hs-identifier hs-type">DeleteOrder</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span><span>
@@ -129,7 +129,7 @@ OpenAPIPetstoreRequest req contentType res accept
 -&gt; Proxy authMethod
 -&gt; OpenAPIPetstoreRequest req contentType res accept
 </span><a href="OpenAPIPetstore.Core.html#_hasAuthType"><span class="hs-operator hs-var">`_hasAuthType`</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Proxy AuthApiKeyApiKey
-forall k (t :: k). Proxy t
+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="OpenAPIPetstore.Model.html#AuthApiKeyApiKey"><span class="hs-identifier hs-type">AuthApiKeyApiKey</span></a></span><span class="hs-special">)</span><span>
 </span><span id="line-93"></span><span>
 </span><span id="line-94"></span><span class="hs-keyword">data</span><span> </span><span id="GetInventory"><span class="annot"><a href="OpenAPIPetstore.API.Store.html#GetInventory"><span class="hs-identifier hs-var">GetInventory</span></a></span></span><span>  </span><span>
@@ -145,16 +145,17 @@ forall k (t :: k). Proxy t
 </span><span id="line-104"></span><span class="hs-comment">-- </span><span>
 </span><span id="line-105"></span><span class="hs-comment">-- For valid response try integer IDs with value &lt;= 5 or &gt; 10. Other values will generated exceptions</span><span>
 </span><span id="line-106"></span><span class="hs-comment">-- </span><span>
-</span><span id="line-107"></span><span id="local-6989586621679151836"><span class="annot"><a href="OpenAPIPetstore.API.Store.html#getOrderById"><span class="hs-identifier hs-type">getOrderById</span></a></span><span>
-</span><span id="line-108"></span><span>  </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151836"><span class="hs-identifier hs-type">accept</span></a></span><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
+</span><span id="line-107"></span><span id="local-6989586621679163209"><span class="annot"><a href="OpenAPIPetstore.API.Store.html#getOrderById"><span class="hs-identifier hs-type">getOrderById</span></a></span><span>
+</span><span id="line-108"></span><span>  </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679163209"><span class="hs-identifier hs-type">accept</span></a></span><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
 </span><span id="line-109"></span><span>  </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#OrderId"><span class="hs-identifier hs-type">OrderId</span></a></span><span> </span><span class="hs-comment">-- ^ &quot;orderId&quot; -  ID of pet that needs to be fetched</span><span>
-</span><span id="line-110"></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="OpenAPIPetstore.API.Store.html#GetOrderById"><span class="hs-identifier hs-type">GetOrderById</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Order"><span class="hs-identifier hs-type">Order</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151836"><span class="hs-identifier hs-type">accept</span></a></span></span><span>
-</span><span id="line-111"></span><span id="getOrderById"><span class="annot"><span class="annottext">getOrderById :: Accept accept
+</span><span id="line-110"></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="OpenAPIPetstore.API.Store.html#GetOrderById"><span class="hs-identifier hs-type">GetOrderById</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Order"><span class="hs-identifier hs-type">Order</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679163209"><span class="hs-identifier hs-type">accept</span></a></span></span><span>
+</span><span id="line-111"></span><span id="getOrderById"><span class="annot"><span class="annottext">getOrderById :: forall accept.
+Accept accept
 -&gt; OrderId
 -&gt; OpenAPIPetstoreRequest GetOrderById MimeNoContent Order accept
 </span><a href="OpenAPIPetstore.API.Store.html#getOrderById"><span class="hs-identifier hs-var hs-var">getOrderById</span></a></span></span><span>  </span><span class="annot"><span class="annottext">Accept accept
-</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Model.html#OrderId"><span class="hs-identifier hs-type">OrderId</span></a></span><span> </span><span id="local-6989586621679151833"><span class="annot"><span class="annottext">Integer
-</span><a href="#local-6989586621679151833"><span class="hs-identifier hs-var">orderId</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
+</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Model.html#OrderId"><span class="hs-identifier hs-type">OrderId</span></a></span><span> </span><span id="local-6989586621679163140"><span class="annot"><span class="annottext">Integer
+</span><a href="#local-6989586621679163140"><span class="hs-identifier hs-var">orderId</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
 </span><span id="line-112"></span><span>  </span><span class="annot"><span class="annottext">Method
 -&gt; [ByteString]
 -&gt; OpenAPIPetstoreRequest GetOrderById MimeNoContent Order accept
@@ -167,7 +168,7 @@ Method
 </span><span class="hs-string">&quot;/store/order/&quot;</span></span><span class="hs-special">,</span><span class="annot"><span class="annottext">Integer -&gt; ByteString
 forall a. ToHttpApiData a =&gt; a -&gt; ByteString
 </span><a href="OpenAPIPetstore.Core.html#toPath"><span class="hs-identifier hs-var">toPath</span></a></span><span> </span><span class="annot"><span class="annottext">Integer
-</span><a href="#local-6989586621679151833"><span class="hs-identifier hs-var">orderId</span></a></span><span class="hs-special">]</span><span>
+</span><a href="#local-6989586621679163140"><span class="hs-identifier hs-var">orderId</span></a></span><span class="hs-special">]</span><span>
 </span><span id="line-113"></span><span>
 </span><span id="line-114"></span><span class="hs-keyword">data</span><span> </span><span id="GetOrderById"><span class="annot"><a href="OpenAPIPetstore.API.Store.html#GetOrderById"><span class="hs-identifier hs-var">GetOrderById</span></a></span></span><span>  </span><span>
 </span><span id="line-115"></span><span class="hs-comment">-- | @application/xml@</span><span>
@@ -182,20 +183,22 @@ forall a. ToHttpApiData a =&gt; a -&gt; ByteString
 </span><span id="line-124"></span><span class="hs-comment">-- </span><span>
 </span><span id="line-125"></span><span class="hs-comment">-- Place an order for a pet</span><span>
 </span><span id="line-126"></span><span class="hs-comment">-- </span><span>
-</span><span id="line-127"></span><span id="local-6989586621679151829"><span id="local-6989586621679151830"><span class="annot"><a href="OpenAPIPetstore.API.Store.html#placeOrder"><span class="hs-identifier hs-type">placeOrder</span></a></span><span>
-</span><span id="line-128"></span><span>  </span><span class="hs-glyph">::</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="OpenAPIPetstore.API.Store.html#PlaceOrder"><span class="hs-identifier hs-type">PlaceOrder</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151830"><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-6989586621679151830"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Order"><span class="hs-identifier hs-type">Order</span></a></span><span class="hs-special">)</span><span>
-</span><span id="line-129"></span><span>  </span><span class="hs-glyph">=&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151830"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="hs-comment">-- ^ request content-type ('MimeType')</span><span>
-</span><span id="line-130"></span><span>  </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151829"><span class="hs-identifier hs-type">accept</span></a></span><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
+</span><span id="line-127"></span><span id="local-6989586621679163201"><span id="local-6989586621679163203"><span class="annot"><a href="OpenAPIPetstore.API.Store.html#placeOrder"><span class="hs-identifier hs-type">placeOrder</span></a></span><span>
+</span><span id="line-128"></span><span>  </span><span class="hs-glyph">::</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="OpenAPIPetstore.API.Store.html#PlaceOrder"><span class="hs-identifier hs-type">PlaceOrder</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679163203"><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-6989586621679163203"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Order"><span class="hs-identifier hs-type">Order</span></a></span><span class="hs-special">)</span><span>
+</span><span id="line-129"></span><span>  </span><span class="hs-glyph">=&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679163203"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="hs-comment">-- ^ request content-type ('MimeType')</span><span>
+</span><span id="line-130"></span><span>  </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679163201"><span class="hs-identifier hs-type">accept</span></a></span><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
 </span><span id="line-131"></span><span>  </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Order"><span class="hs-identifier hs-type">Order</span></a></span><span> </span><span class="hs-comment">-- ^ &quot;body&quot; -  order placed for purchasing the pet</span><span>
-</span><span id="line-132"></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="OpenAPIPetstore.API.Store.html#PlaceOrder"><span class="hs-identifier hs-type">PlaceOrder</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151830"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Order"><span class="hs-identifier hs-type">Order</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151829"><span class="hs-identifier hs-type">accept</span></a></span></span></span><span>
-</span><span id="line-133"></span><span id="placeOrder"><span class="annot"><span class="annottext">placeOrder :: ContentType contentType
+</span><span id="line-132"></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="OpenAPIPetstore.API.Store.html#PlaceOrder"><span class="hs-identifier hs-type">PlaceOrder</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679163203"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Order"><span class="hs-identifier hs-type">Order</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679163201"><span class="hs-identifier hs-type">accept</span></a></span></span></span><span>
+</span><span id="line-133"></span><span id="placeOrder"><span class="annot"><span class="annottext">placeOrder :: forall contentType accept.
+(Consumes PlaceOrder contentType, MimeRender contentType Order) =&gt;
+ContentType contentType
 -&gt; Accept accept
 -&gt; Order
 -&gt; OpenAPIPetstoreRequest PlaceOrder contentType Order accept
 </span><a href="OpenAPIPetstore.API.Store.html#placeOrder"><span class="hs-identifier hs-var hs-var">placeOrder</span></a></span></span><span> </span><span class="annot"><span class="annottext">ContentType contentType
 </span><span class="hs-identifier">_</span></span><span>  </span><span class="annot"><span class="annottext">Accept accept
-</span><span class="hs-identifier">_</span></span><span> </span><span id="local-6989586621679151827"><span class="annot"><span class="annottext">Order
-</span><a href="#local-6989586621679151827"><span class="hs-identifier hs-var">body</span></a></span></span><span> </span><span class="hs-glyph">=</span><span>
+</span><span class="hs-identifier">_</span></span><span> </span><span id="local-6989586621679163124"><span class="annot"><span class="annottext">Order
+</span><a href="#local-6989586621679163124"><span class="hs-identifier hs-var">body</span></a></span></span><span> </span><span class="hs-glyph">=</span><span>
 </span><span id="line-134"></span><span>  </span><span class="annot"><span class="annottext">Method
 -&gt; [ByteString]
 -&gt; OpenAPIPetstoreRequest PlaceOrder contentType Order accept
@@ -215,15 +218,15 @@ forall req param contentType res accept.
 OpenAPIPetstoreRequest req contentType res accept
 -&gt; param -&gt; OpenAPIPetstoreRequest req contentType res accept
 </span><a href="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-operator hs-var">`setBodyParam`</span></a></span><span> </span><span class="annot"><span class="annottext">Order
-</span><a href="#local-6989586621679151827"><span class="hs-identifier hs-var">body</span></a></span><span>
+</span><a href="#local-6989586621679163124"><span class="hs-identifier hs-var">body</span></a></span><span>
 </span><span id="line-136"></span><span>
 </span><span id="line-137"></span><span class="hs-keyword">data</span><span> </span><span id="PlaceOrder"><span class="annot"><a href="OpenAPIPetstore.API.Store.html#PlaceOrder"><span class="hs-identifier hs-var">PlaceOrder</span></a></span></span><span> </span><span>
 </span><span id="line-138"></span><span>
 </span><span id="line-139"></span><span class="hs-comment">-- | /Body Param/ &quot;body&quot; - order placed for purchasing the pet</span><span>
-</span><span id="line-140"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679151824"><span class="annot"><a href="OpenAPIPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.Store.html#PlaceOrder"><span class="hs-identifier hs-type">PlaceOrder</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Order"><span class="hs-identifier hs-type">Order</span></a></span></span><span> </span><span>
+</span><span id="line-140"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679163121"><span class="annot"><a href="OpenAPIPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.Store.html#PlaceOrder"><span class="hs-identifier hs-type">PlaceOrder</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Order"><span class="hs-identifier hs-type">Order</span></a></span></span><span> </span><span>
 </span><span id="line-141"></span><span>
 </span><span id="line-142"></span><span class="hs-comment">-- | @*/*@</span><span>
-</span><span id="line-143"></span><span id="local-6989586621679151822"><span class="hs-keyword">instance</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-6989586621679151822"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </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="OpenAPIPetstore.API.Store.html#PlaceOrder"><span class="hs-identifier hs-type">PlaceOrder</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151822"><span class="hs-identifier hs-type">mtype</span></a></span></span><span>
+</span><span id="line-143"></span><span id="local-6989586621679163190"><span class="hs-keyword">instance</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-6989586621679163190"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </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="OpenAPIPetstore.API.Store.html#PlaceOrder"><span class="hs-identifier hs-type">PlaceOrder</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679163190"><span class="hs-identifier hs-type">mtype</span></a></span></span><span>
 </span><span id="line-144"></span><span>
 </span><span id="line-145"></span><span class="hs-comment">-- | @application/xml@</span><span>
 </span><span id="line-146"></span><span class="hs-keyword">instance</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.Store.html#PlaceOrder"><span class="hs-identifier hs-type">PlaceOrder</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier hs-type">MimeXML</span></a></span><span>

samples/client/petstore/haskell-http-client/docs/src/OpenAPIPetstore.API.User.html

@@ -65,18 +65,20 @@ Module : OpenAPIPetstore.API.User
 </span><span id="line-65"></span><span class="hs-comment">-- </span><span>
 </span><span id="line-66"></span><span class="hs-comment">-- This can only be done by the logged in user.</span><span>
 </span><span id="line-67"></span><span class="hs-comment">-- </span><span>
-</span><span id="line-68"></span><span id="local-6989586621679151734"><span class="annot"><a href="OpenAPIPetstore.API.User.html#createUser"><span class="hs-identifier hs-type">createUser</span></a></span><span>
-</span><span id="line-69"></span><span>  </span><span class="hs-glyph">::</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="OpenAPIPetstore.API.User.html#CreateUser"><span class="hs-identifier hs-type">CreateUser</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151734"><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-6989586621679151734"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a></span><span class="hs-special">)</span><span>
-</span><span id="line-70"></span><span>  </span><span class="hs-glyph">=&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151734"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="hs-comment">-- ^ request content-type ('MimeType')</span><span>
+</span><span id="line-68"></span><span id="local-6989586621679163091"><span class="annot"><a href="OpenAPIPetstore.API.User.html#createUser"><span class="hs-identifier hs-type">createUser</span></a></span><span>
+</span><span id="line-69"></span><span>  </span><span class="hs-glyph">::</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="OpenAPIPetstore.API.User.html#CreateUser"><span class="hs-identifier hs-type">CreateUser</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679163091"><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-6989586621679163091"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a></span><span class="hs-special">)</span><span>
+</span><span id="line-70"></span><span>  </span><span class="hs-glyph">=&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679163091"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="hs-comment">-- ^ request content-type ('MimeType')</span><span>
 </span><span id="line-71"></span><span>  </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a></span><span> </span><span class="hs-comment">-- ^ &quot;body&quot; -  Created user object</span><span>
-</span><span id="line-72"></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="OpenAPIPetstore.API.User.html#CreateUser"><span class="hs-identifier hs-type">CreateUser</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151734"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span></span><span>
-</span><span id="line-73"></span><span id="createUser"><span class="annot"><span class="annottext">createUser :: ContentType contentType
+</span><span id="line-72"></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="OpenAPIPetstore.API.User.html#CreateUser"><span class="hs-identifier hs-type">CreateUser</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679163091"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span></span><span>
+</span><span id="line-73"></span><span id="createUser"><span class="annot"><span class="annottext">createUser :: forall contentType.
+(Consumes CreateUser contentType, MimeRender contentType User) =&gt;
+ContentType contentType
 -&gt; User
 -&gt; OpenAPIPetstoreRequest
      CreateUser contentType NoContent MimeNoContent
 </span><a href="OpenAPIPetstore.API.User.html#createUser"><span class="hs-identifier hs-var hs-var">createUser</span></a></span></span><span> </span><span class="annot"><span class="annottext">ContentType contentType
-</span><span class="hs-identifier">_</span></span><span> </span><span id="local-6989586621679151732"><span class="annot"><span class="annottext">User
-</span><a href="#local-6989586621679151732"><span class="hs-identifier hs-var">body</span></a></span></span><span> </span><span class="hs-glyph">=</span><span>
+</span><span class="hs-identifier">_</span></span><span> </span><span id="local-6989586621679162984"><span class="annot"><span class="annottext">User
+</span><a href="#local-6989586621679162984"><span class="hs-identifier hs-var">body</span></a></span></span><span> </span><span class="hs-glyph">=</span><span>
 </span><span id="line-74"></span><span>  </span><span class="annot"><span class="annottext">Method
 -&gt; [ByteString]
 -&gt; OpenAPIPetstoreRequest
@@ -99,15 +101,15 @@ forall req param contentType res accept.
 OpenAPIPetstoreRequest req contentType res accept
 -&gt; param -&gt; OpenAPIPetstoreRequest req contentType res accept
 </span><a href="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-operator hs-var">`setBodyParam`</span></a></span><span> </span><span class="annot"><span class="annottext">User
-</span><a href="#local-6989586621679151732"><span class="hs-identifier hs-var">body</span></a></span><span>
+</span><a href="#local-6989586621679162984"><span class="hs-identifier hs-var">body</span></a></span><span>
 </span><span id="line-76"></span><span>
 </span><span id="line-77"></span><span class="hs-keyword">data</span><span> </span><span id="CreateUser"><span class="annot"><a href="OpenAPIPetstore.API.User.html#CreateUser"><span class="hs-identifier hs-var">CreateUser</span></a></span></span><span> </span><span>
 </span><span id="line-78"></span><span>
 </span><span id="line-79"></span><span class="hs-comment">-- | /Body Param/ &quot;body&quot; - Created user object</span><span>
-</span><span id="line-80"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679151728"><span class="annot"><a href="OpenAPIPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#CreateUser"><span class="hs-identifier hs-type">CreateUser</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a></span></span><span> </span><span>
+</span><span id="line-80"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679162980"><span class="annot"><a href="OpenAPIPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#CreateUser"><span class="hs-identifier hs-type">CreateUser</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a></span></span><span> </span><span>
 </span><span id="line-81"></span><span>
 </span><span id="line-82"></span><span class="hs-comment">-- | @*/*@</span><span>
-</span><span id="line-83"></span><span id="local-6989586621679151726"><span class="hs-keyword">instance</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-6989586621679151726"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </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="OpenAPIPetstore.API.User.html#CreateUser"><span class="hs-identifier hs-type">CreateUser</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151726"><span class="hs-identifier hs-type">mtype</span></a></span></span><span>
+</span><span id="line-83"></span><span id="local-6989586621679163072"><span class="hs-keyword">instance</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-6989586621679163072"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </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="OpenAPIPetstore.API.User.html#CreateUser"><span class="hs-identifier hs-type">CreateUser</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679163072"><span class="hs-identifier hs-type">mtype</span></a></span></span><span>
 </span><span id="line-84"></span><span>
 </span><span id="line-85"></span><span class="hs-keyword">instance</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#CreateUser"><span class="hs-identifier hs-type">CreateUser</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span><span>
 </span><span id="line-86"></span><span>
@@ -118,18 +120,21 @@ OpenAPIPetstoreRequest req contentType res accept
 </span><span id="line-91"></span><span class="hs-comment">-- </span><span>
 </span><span id="line-92"></span><span class="hs-comment">-- Creates list of users with given input array</span><span>
 </span><span id="line-93"></span><span class="hs-comment">-- </span><span>
-</span><span id="line-94"></span><span id="local-6989586621679151721"><span class="annot"><a href="OpenAPIPetstore.API.User.html#createUsersWithArrayInput"><span class="hs-identifier hs-type">createUsersWithArrayInput</span></a></span><span>
-</span><span id="line-95"></span><span>  </span><span class="hs-glyph">::</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="OpenAPIPetstore.API.User.html#CreateUsersWithArrayInput"><span class="hs-identifier hs-type">CreateUsersWithArrayInput</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151721"><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-6989586621679151721"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Body"><span class="hs-identifier hs-type">Body</span></a></span><span class="hs-special">)</span><span>
-</span><span id="line-96"></span><span>  </span><span class="hs-glyph">=&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151721"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="hs-comment">-- ^ request content-type ('MimeType')</span><span>
+</span><span id="line-94"></span><span id="local-6989586621679163068"><span class="annot"><a href="OpenAPIPetstore.API.User.html#createUsersWithArrayInput"><span class="hs-identifier hs-type">createUsersWithArrayInput</span></a></span><span>
+</span><span id="line-95"></span><span>  </span><span class="hs-glyph">::</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="OpenAPIPetstore.API.User.html#CreateUsersWithArrayInput"><span class="hs-identifier hs-type">CreateUsersWithArrayInput</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679163068"><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-6989586621679163068"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Body"><span class="hs-identifier hs-type">Body</span></a></span><span class="hs-special">)</span><span>
+</span><span id="line-96"></span><span>  </span><span class="hs-glyph">=&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679163068"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="hs-comment">-- ^ request content-type ('MimeType')</span><span>
 </span><span id="line-97"></span><span>  </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Body"><span class="hs-identifier hs-type">Body</span></a></span><span> </span><span class="hs-comment">-- ^ &quot;body&quot; -  List of user object</span><span>
-</span><span id="line-98"></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="OpenAPIPetstore.API.User.html#CreateUsersWithArrayInput"><span class="hs-identifier hs-type">CreateUsersWithArrayInput</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151721"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span></span><span>
-</span><span id="line-99"></span><span id="createUsersWithArrayInput"><span class="annot"><span class="annottext">createUsersWithArrayInput :: ContentType contentType
+</span><span id="line-98"></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="OpenAPIPetstore.API.User.html#CreateUsersWithArrayInput"><span class="hs-identifier hs-type">CreateUsersWithArrayInput</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679163068"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span></span><span>
+</span><span id="line-99"></span><span id="createUsersWithArrayInput"><span class="annot"><span class="annottext">createUsersWithArrayInput :: forall contentType.
+(Consumes CreateUsersWithArrayInput contentType,
+ MimeRender contentType Body) =&gt;
+ContentType contentType
 -&gt; Body
 -&gt; OpenAPIPetstoreRequest
      CreateUsersWithArrayInput contentType NoContent MimeNoContent
 </span><a href="OpenAPIPetstore.API.User.html#createUsersWithArrayInput"><span class="hs-identifier hs-var hs-var">createUsersWithArrayInput</span></a></span></span><span> </span><span class="annot"><span class="annottext">ContentType contentType
-</span><span class="hs-identifier">_</span></span><span> </span><span id="local-6989586621679151719"><span class="annot"><span class="annottext">Body
-</span><a href="#local-6989586621679151719"><span class="hs-identifier hs-var">body</span></a></span></span><span> </span><span class="hs-glyph">=</span><span>
+</span><span class="hs-identifier">_</span></span><span> </span><span id="local-6989586621679162960"><span class="annot"><span class="annottext">Body
+</span><a href="#local-6989586621679162960"><span class="hs-identifier hs-var">body</span></a></span></span><span> </span><span class="hs-glyph">=</span><span>
 </span><span id="line-100"></span><span>  </span><span class="annot"><span class="annottext">Method
 -&gt; [ByteString]
 -&gt; OpenAPIPetstoreRequest
@@ -152,15 +157,15 @@ forall req param contentType res accept.
 OpenAPIPetstoreRequest req contentType res accept
 -&gt; param -&gt; OpenAPIPetstoreRequest req contentType res accept
 </span><a href="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-operator hs-var">`setBodyParam`</span></a></span><span> </span><span class="annot"><span class="annottext">Body
-</span><a href="#local-6989586621679151719"><span class="hs-identifier hs-var">body</span></a></span><span>
+</span><a href="#local-6989586621679162960"><span class="hs-identifier hs-var">body</span></a></span><span>
 </span><span id="line-102"></span><span>
 </span><span id="line-103"></span><span class="hs-keyword">data</span><span> </span><span id="CreateUsersWithArrayInput"><span class="annot"><a href="OpenAPIPetstore.API.User.html#CreateUsersWithArrayInput"><span class="hs-identifier hs-var">CreateUsersWithArrayInput</span></a></span></span><span> </span><span>
 </span><span id="line-104"></span><span>
 </span><span id="line-105"></span><span class="hs-comment">-- | /Body Param/ &quot;body&quot; - List of user object</span><span>
-</span><span id="line-106"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679151717"><span class="annot"><a href="OpenAPIPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#CreateUsersWithArrayInput"><span class="hs-identifier hs-type">CreateUsersWithArrayInput</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Body"><span class="hs-identifier hs-type">Body</span></a></span></span><span> </span><span>
+</span><span id="line-106"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679162958"><span class="annot"><a href="OpenAPIPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#CreateUsersWithArrayInput"><span class="hs-identifier hs-type">CreateUsersWithArrayInput</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Body"><span class="hs-identifier hs-type">Body</span></a></span></span><span> </span><span>
 </span><span id="line-107"></span><span>
 </span><span id="line-108"></span><span class="hs-comment">-- | @*/*@</span><span>
-</span><span id="line-109"></span><span id="local-6989586621679151716"><span class="hs-keyword">instance</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-6989586621679151716"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </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="OpenAPIPetstore.API.User.html#CreateUsersWithArrayInput"><span class="hs-identifier hs-type">CreateUsersWithArrayInput</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151716"><span class="hs-identifier hs-type">mtype</span></a></span></span><span>
+</span><span id="line-109"></span><span id="local-6989586621679163065"><span class="hs-keyword">instance</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-6989586621679163065"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </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="OpenAPIPetstore.API.User.html#CreateUsersWithArrayInput"><span class="hs-identifier hs-type">CreateUsersWithArrayInput</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679163065"><span class="hs-identifier hs-type">mtype</span></a></span></span><span>
 </span><span id="line-110"></span><span>
 </span><span id="line-111"></span><span class="hs-keyword">instance</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#CreateUsersWithArrayInput"><span class="hs-identifier hs-type">CreateUsersWithArrayInput</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span><span>
 </span><span id="line-112"></span><span>
@@ -171,18 +176,21 @@ OpenAPIPetstoreRequest req contentType res accept
 </span><span id="line-117"></span><span class="hs-comment">-- </span><span>
 </span><span id="line-118"></span><span class="hs-comment">-- Creates list of users with given input array</span><span>
 </span><span id="line-119"></span><span class="hs-comment">-- </span><span>
-</span><span id="line-120"></span><span id="local-6989586621679151713"><span class="annot"><a href="OpenAPIPetstore.API.User.html#createUsersWithListInput"><span class="hs-identifier hs-type">createUsersWithListInput</span></a></span><span>
-</span><span id="line-121"></span><span>  </span><span class="hs-glyph">::</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="OpenAPIPetstore.API.User.html#CreateUsersWithListInput"><span class="hs-identifier hs-type">CreateUsersWithListInput</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151713"><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-6989586621679151713"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Body"><span class="hs-identifier hs-type">Body</span></a></span><span class="hs-special">)</span><span>
-</span><span id="line-122"></span><span>  </span><span class="hs-glyph">=&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151713"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="hs-comment">-- ^ request content-type ('MimeType')</span><span>
+</span><span id="line-120"></span><span id="local-6989586621679163064"><span class="annot"><a href="OpenAPIPetstore.API.User.html#createUsersWithListInput"><span class="hs-identifier hs-type">createUsersWithListInput</span></a></span><span>
+</span><span id="line-121"></span><span>  </span><span class="hs-glyph">::</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="OpenAPIPetstore.API.User.html#CreateUsersWithListInput"><span class="hs-identifier hs-type">CreateUsersWithListInput</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679163064"><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-6989586621679163064"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Body"><span class="hs-identifier hs-type">Body</span></a></span><span class="hs-special">)</span><span>
+</span><span id="line-122"></span><span>  </span><span class="hs-glyph">=&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679163064"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="hs-comment">-- ^ request content-type ('MimeType')</span><span>
 </span><span id="line-123"></span><span>  </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Body"><span class="hs-identifier hs-type">Body</span></a></span><span> </span><span class="hs-comment">-- ^ &quot;body&quot; -  List of user object</span><span>
-</span><span id="line-124"></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="OpenAPIPetstore.API.User.html#CreateUsersWithListInput"><span class="hs-identifier hs-type">CreateUsersWithListInput</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151713"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span></span><span>
-</span><span id="line-125"></span><span id="createUsersWithListInput"><span class="annot"><span class="annottext">createUsersWithListInput :: ContentType contentType
+</span><span id="line-124"></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="OpenAPIPetstore.API.User.html#CreateUsersWithListInput"><span class="hs-identifier hs-type">CreateUsersWithListInput</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679163064"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span></span><span>
+</span><span id="line-125"></span><span id="createUsersWithListInput"><span class="annot"><span class="annottext">createUsersWithListInput :: forall contentType.
+(Consumes CreateUsersWithListInput contentType,
+ MimeRender contentType Body) =&gt;
+ContentType contentType
 -&gt; Body
 -&gt; OpenAPIPetstoreRequest
      CreateUsersWithListInput contentType NoContent MimeNoContent
 </span><a href="OpenAPIPetstore.API.User.html#createUsersWithListInput"><span class="hs-identifier hs-var hs-var">createUsersWithListInput</span></a></span></span><span> </span><span class="annot"><span class="annottext">ContentType contentType
-</span><span class="hs-identifier">_</span></span><span> </span><span id="local-6989586621679151711"><span class="annot"><span class="annottext">Body
-</span><a href="#local-6989586621679151711"><span class="hs-identifier hs-var">body</span></a></span></span><span> </span><span class="hs-glyph">=</span><span>
+</span><span class="hs-identifier">_</span></span><span> </span><span id="local-6989586621679162942"><span class="annot"><span class="annottext">Body
+</span><a href="#local-6989586621679162942"><span class="hs-identifier hs-var">body</span></a></span></span><span> </span><span class="hs-glyph">=</span><span>
 </span><span id="line-126"></span><span>  </span><span class="annot"><span class="annottext">Method
 -&gt; [ByteString]
 -&gt; OpenAPIPetstoreRequest
@@ -205,15 +213,15 @@ forall req param contentType res accept.
 OpenAPIPetstoreRequest req contentType res accept
 -&gt; param -&gt; OpenAPIPetstoreRequest req contentType res accept
 </span><a href="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-operator hs-var">`setBodyParam`</span></a></span><span> </span><span class="annot"><span class="annottext">Body
-</span><a href="#local-6989586621679151711"><span class="hs-identifier hs-var">body</span></a></span><span>
+</span><a href="#local-6989586621679162942"><span class="hs-identifier hs-var">body</span></a></span><span>
 </span><span id="line-128"></span><span>
 </span><span id="line-129"></span><span class="hs-keyword">data</span><span> </span><span id="CreateUsersWithListInput"><span class="annot"><a href="OpenAPIPetstore.API.User.html#CreateUsersWithListInput"><span class="hs-identifier hs-var">CreateUsersWithListInput</span></a></span></span><span> </span><span>
 </span><span id="line-130"></span><span>
 </span><span id="line-131"></span><span class="hs-comment">-- | /Body Param/ &quot;body&quot; - List of user object</span><span>
-</span><span id="line-132"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679151709"><span class="annot"><a href="OpenAPIPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#CreateUsersWithListInput"><span class="hs-identifier hs-type">CreateUsersWithListInput</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Body"><span class="hs-identifier hs-type">Body</span></a></span></span><span> </span><span>
+</span><span id="line-132"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679162940"><span class="annot"><a href="OpenAPIPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#CreateUsersWithListInput"><span class="hs-identifier hs-type">CreateUsersWithListInput</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Body"><span class="hs-identifier hs-type">Body</span></a></span></span><span> </span><span>
 </span><span id="line-133"></span><span>
 </span><span id="line-134"></span><span class="hs-comment">-- | @*/*@</span><span>
-</span><span id="line-135"></span><span id="local-6989586621679151708"><span class="hs-keyword">instance</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-6989586621679151708"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </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="OpenAPIPetstore.API.User.html#CreateUsersWithListInput"><span class="hs-identifier hs-type">CreateUsersWithListInput</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151708"><span class="hs-identifier hs-type">mtype</span></a></span></span><span>
+</span><span id="line-135"></span><span id="local-6989586621679163061"><span class="hs-keyword">instance</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-6989586621679163061"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </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="OpenAPIPetstore.API.User.html#CreateUsersWithListInput"><span class="hs-identifier hs-type">CreateUsersWithListInput</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679163061"><span class="hs-identifier hs-type">mtype</span></a></span></span><span>
 </span><span id="line-136"></span><span>
 </span><span id="line-137"></span><span class="hs-keyword">instance</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#CreateUsersWithListInput"><span class="hs-identifier hs-type">CreateUsersWithListInput</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span><span>
 </span><span id="line-138"></span><span>
@@ -232,8 +240,8 @@ OpenAPIPetstoreRequest req contentType res accept
 </span><span id="line-151"></span><span id="deleteUser"><span class="annot"><span class="annottext">deleteUser :: Username
 -&gt; OpenAPIPetstoreRequest
      DeleteUser MimeNoContent NoContent MimeNoContent
-</span><a href="OpenAPIPetstore.API.User.html#deleteUser"><span class="hs-identifier hs-var hs-var">deleteUser</span></a></span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Model.html#Username"><span class="hs-identifier hs-type">Username</span></a></span><span> </span><span id="local-6989586621679151703"><span class="annot"><span class="annottext">Text
-</span><a href="#local-6989586621679151703"><span class="hs-identifier hs-var">username</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
+</span><a href="OpenAPIPetstore.API.User.html#deleteUser"><span class="hs-identifier hs-var hs-var">deleteUser</span></a></span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Model.html#Username"><span class="hs-identifier hs-type">Username</span></a></span><span> </span><span id="local-6989586621679162930"><span class="annot"><span class="annottext">Text
+</span><a href="#local-6989586621679162930"><span class="hs-identifier hs-var">username</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
 </span><span id="line-152"></span><span>  </span><span class="annot"><span class="annottext">Method
 -&gt; [ByteString]
 -&gt; OpenAPIPetstoreRequest
@@ -247,7 +255,7 @@ Method
 </span><span class="hs-string">&quot;/user/&quot;</span></span><span class="hs-special">,</span><span class="annot"><span class="annottext">Text -&gt; ByteString
 forall a. ToHttpApiData a =&gt; a -&gt; ByteString
 </span><a href="OpenAPIPetstore.Core.html#toPath"><span class="hs-identifier hs-var">toPath</span></a></span><span> </span><span class="annot"><span class="annottext">Text
-</span><a href="#local-6989586621679151703"><span class="hs-identifier hs-var">username</span></a></span><span class="hs-special">]</span><span>
+</span><a href="#local-6989586621679162930"><span class="hs-identifier hs-var">username</span></a></span><span class="hs-special">]</span><span>
 </span><span id="line-153"></span><span>
 </span><span id="line-154"></span><span class="hs-keyword">data</span><span> </span><span id="DeleteUser"><span class="annot"><a href="OpenAPIPetstore.API.User.html#DeleteUser"><span class="hs-identifier hs-var">DeleteUser</span></a></span></span><span>  </span><span>
 </span><span id="line-155"></span><span class="hs-keyword">instance</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#DeleteUser"><span class="hs-identifier hs-type">DeleteUser</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span><span>
@@ -259,16 +267,17 @@ forall a. ToHttpApiData a =&gt; a -&gt; ByteString
 </span><span id="line-161"></span><span class="hs-comment">-- </span><span>
 </span><span id="line-162"></span><span class="hs-comment">-- Get user by user name</span><span>
 </span><span id="line-163"></span><span class="hs-comment">-- </span><span>
-</span><span id="line-164"></span><span id="local-6989586621679151700"><span class="annot"><a href="OpenAPIPetstore.API.User.html#getUserByName"><span class="hs-identifier hs-type">getUserByName</span></a></span><span>
-</span><span id="line-165"></span><span>  </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151700"><span class="hs-identifier hs-type">accept</span></a></span><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
+</span><span id="line-164"></span><span id="local-6989586621679163057"><span class="annot"><a href="OpenAPIPetstore.API.User.html#getUserByName"><span class="hs-identifier hs-type">getUserByName</span></a></span><span>
+</span><span id="line-165"></span><span>  </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679163057"><span class="hs-identifier hs-type">accept</span></a></span><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
 </span><span id="line-166"></span><span>  </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Username"><span class="hs-identifier hs-type">Username</span></a></span><span> </span><span class="hs-comment">-- ^ &quot;username&quot; -  The name that needs to be fetched. Use user1 for testing.</span><span>
-</span><span id="line-167"></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="OpenAPIPetstore.API.User.html#GetUserByName"><span class="hs-identifier hs-type">GetUserByName</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151700"><span class="hs-identifier hs-type">accept</span></a></span></span><span>
-</span><span id="line-168"></span><span id="getUserByName"><span class="annot"><span class="annottext">getUserByName :: Accept accept
+</span><span id="line-167"></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="OpenAPIPetstore.API.User.html#GetUserByName"><span class="hs-identifier hs-type">GetUserByName</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679163057"><span class="hs-identifier hs-type">accept</span></a></span></span><span>
+</span><span id="line-168"></span><span id="getUserByName"><span class="annot"><span class="annottext">getUserByName :: forall accept.
+Accept accept
 -&gt; Username
 -&gt; OpenAPIPetstoreRequest GetUserByName MimeNoContent User accept
 </span><a href="OpenAPIPetstore.API.User.html#getUserByName"><span class="hs-identifier hs-var hs-var">getUserByName</span></a></span></span><span>  </span><span class="annot"><span class="annottext">Accept accept
-</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Model.html#Username"><span class="hs-identifier hs-type">Username</span></a></span><span> </span><span id="local-6989586621679151698"><span class="annot"><span class="annottext">Text
-</span><a href="#local-6989586621679151698"><span class="hs-identifier hs-var">username</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
+</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Model.html#Username"><span class="hs-identifier hs-type">Username</span></a></span><span> </span><span id="local-6989586621679162921"><span class="annot"><span class="annottext">Text
+</span><a href="#local-6989586621679162921"><span class="hs-identifier hs-var">username</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
 </span><span id="line-169"></span><span>  </span><span class="annot"><span class="annottext">Method
 -&gt; [ByteString]
 -&gt; OpenAPIPetstoreRequest GetUserByName MimeNoContent User accept
@@ -281,7 +290,7 @@ Method
 </span><span class="hs-string">&quot;/user/&quot;</span></span><span class="hs-special">,</span><span class="annot"><span class="annottext">Text -&gt; ByteString
 forall a. ToHttpApiData a =&gt; a -&gt; ByteString
 </span><a href="OpenAPIPetstore.Core.html#toPath"><span class="hs-identifier hs-var">toPath</span></a></span><span> </span><span class="annot"><span class="annottext">Text
-</span><a href="#local-6989586621679151698"><span class="hs-identifier hs-var">username</span></a></span><span class="hs-special">]</span><span>
+</span><a href="#local-6989586621679162921"><span class="hs-identifier hs-var">username</span></a></span><span class="hs-special">]</span><span>
 </span><span id="line-170"></span><span>
 </span><span id="line-171"></span><span class="hs-keyword">data</span><span> </span><span id="GetUserByName"><span class="annot"><a href="OpenAPIPetstore.API.User.html#GetUserByName"><span class="hs-identifier hs-var">GetUserByName</span></a></span></span><span>  </span><span>
 </span><span id="line-172"></span><span class="hs-comment">-- | @application/xml@</span><span>
@@ -296,19 +305,20 @@ forall a. ToHttpApiData a =&gt; a -&gt; ByteString
 </span><span id="line-181"></span><span class="hs-comment">-- </span><span>
 </span><span id="line-182"></span><span class="hs-comment">-- Logs user into the system</span><span>
 </span><span id="line-183"></span><span class="hs-comment">-- </span><span>
-</span><span id="line-184"></span><span id="local-6989586621679151695"><span class="annot"><a href="OpenAPIPetstore.API.User.html#loginUser"><span class="hs-identifier hs-type">loginUser</span></a></span><span>
-</span><span id="line-185"></span><span>  </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151695"><span class="hs-identifier hs-type">accept</span></a></span><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
+</span><span id="line-184"></span><span id="local-6989586621679163051"><span class="annot"><a href="OpenAPIPetstore.API.User.html#loginUser"><span class="hs-identifier hs-type">loginUser</span></a></span><span>
+</span><span id="line-185"></span><span>  </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679163051"><span class="hs-identifier hs-type">accept</span></a></span><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
 </span><span id="line-186"></span><span>  </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Username"><span class="hs-identifier hs-type">Username</span></a></span><span> </span><span class="hs-comment">-- ^ &quot;username&quot; -  The user name for login</span><span>
 </span><span id="line-187"></span><span>  </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Password"><span class="hs-identifier hs-type">Password</span></a></span><span> </span><span class="hs-comment">-- ^ &quot;password&quot; -  The password for login in clear text</span><span>
-</span><span id="line-188"></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="OpenAPIPetstore.API.User.html#LoginUser"><span class="hs-identifier hs-type">LoginUser</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">Text</span></span><span> </span><span class="annot"><a href="#local-6989586621679151695"><span class="hs-identifier hs-type">accept</span></a></span></span><span>
-</span><span id="line-189"></span><span id="loginUser"><span class="annot"><span class="annottext">loginUser :: Accept accept
+</span><span id="line-188"></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="OpenAPIPetstore.API.User.html#LoginUser"><span class="hs-identifier hs-type">LoginUser</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">Text</span></span><span> </span><span class="annot"><a href="#local-6989586621679163051"><span class="hs-identifier hs-type">accept</span></a></span></span><span>
+</span><span id="line-189"></span><span id="loginUser"><span class="annot"><span class="annottext">loginUser :: forall accept.
+Accept accept
 -&gt; Username
 -&gt; Password
 -&gt; OpenAPIPetstoreRequest LoginUser MimeNoContent Text accept
 </span><a href="OpenAPIPetstore.API.User.html#loginUser"><span class="hs-identifier hs-var hs-var">loginUser</span></a></span></span><span>  </span><span class="annot"><span class="annottext">Accept accept
-</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Model.html#Username"><span class="hs-identifier hs-type">Username</span></a></span><span> </span><span id="local-6989586621679151693"><span class="annot"><span class="annottext">Text
-</span><a href="#local-6989586621679151693"><span class="hs-identifier hs-var">username</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Model.html#Password"><span class="hs-identifier hs-type">Password</span></a></span><span> </span><span id="local-6989586621679151691"><span class="annot"><span class="annottext">Text
-</span><a href="#local-6989586621679151691"><span class="hs-identifier hs-var">password</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
+</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Model.html#Username"><span class="hs-identifier hs-type">Username</span></a></span><span> </span><span id="local-6989586621679162905"><span class="annot"><span class="annottext">Text
+</span><a href="#local-6989586621679162905"><span class="hs-identifier hs-var">username</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Model.html#Password"><span class="hs-identifier hs-type">Password</span></a></span><span> </span><span id="local-6989586621679162903"><span class="annot"><span class="annottext">Text
+</span><a href="#local-6989586621679162903"><span class="hs-identifier hs-var">password</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
 </span><span id="line-190"></span><span>  </span><span class="annot"><span class="annottext">Method
 -&gt; [ByteString]
 -&gt; OpenAPIPetstoreRequest LoginUser MimeNoContent Text accept
@@ -331,7 +341,7 @@ forall a. ToHttpApiData a =&gt; (Method, Maybe a) -&gt; [QueryItem]
 </span><span class="hs-string">&quot;username&quot;</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="annottext">Text -&gt; Maybe Text
 forall a. a -&gt; Maybe a
 </span><span class="hs-identifier hs-var">Just</span></span><span> </span><span class="annot"><span class="annottext">Text
-</span><a href="#local-6989586621679151693"><span class="hs-identifier hs-var">username</span></a></span><span class="hs-special">)</span><span>
+</span><a href="#local-6989586621679162905"><span class="hs-identifier hs-var">username</span></a></span><span class="hs-special">)</span><span>
 </span><span id="line-192"></span><span>    </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest LoginUser MimeNoContent Text accept
 -&gt; [QueryItem]
 -&gt; OpenAPIPetstoreRequest LoginUser MimeNoContent Text accept
@@ -344,7 +354,7 @@ forall a. ToHttpApiData a =&gt; (Method, Maybe a) -&gt; [QueryItem]
 </span><span class="hs-string">&quot;password&quot;</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="annottext">Text -&gt; Maybe Text
 forall a. a -&gt; Maybe a
 </span><span class="hs-identifier hs-var">Just</span></span><span> </span><span class="annot"><span class="annottext">Text
-</span><a href="#local-6989586621679151691"><span class="hs-identifier hs-var">password</span></a></span><span class="hs-special">)</span><span>
+</span><a href="#local-6989586621679162903"><span class="hs-identifier hs-var">password</span></a></span><span class="hs-special">)</span><span>
 </span><span id="line-193"></span><span>
 </span><span id="line-194"></span><span class="hs-keyword">data</span><span> </span><span id="LoginUser"><span class="annot"><a href="OpenAPIPetstore.API.User.html#LoginUser"><span class="hs-identifier hs-var">LoginUser</span></a></span></span><span>  </span><span>
 </span><span id="line-195"></span><span class="hs-comment">-- | @application/xml@</span><span>
@@ -388,21 +398,23 @@ Method
 </span><span id="line-221"></span><span class="hs-comment">-- </span><span>
 </span><span id="line-222"></span><span class="hs-comment">-- This can only be done by the logged in user.</span><span>
 </span><span id="line-223"></span><span class="hs-comment">-- </span><span>
-</span><span id="line-224"></span><span id="local-6989586621679151684"><span class="annot"><a href="OpenAPIPetstore.API.User.html#updateUser"><span class="hs-identifier hs-type">updateUser</span></a></span><span>
-</span><span id="line-225"></span><span>  </span><span class="hs-glyph">::</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="OpenAPIPetstore.API.User.html#UpdateUser"><span class="hs-identifier hs-type">UpdateUser</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151684"><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-6989586621679151684"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a></span><span class="hs-special">)</span><span>
-</span><span id="line-226"></span><span>  </span><span class="hs-glyph">=&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151684"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="hs-comment">-- ^ request content-type ('MimeType')</span><span>
+</span><span id="line-224"></span><span id="local-6989586621679163039"><span class="annot"><a href="OpenAPIPetstore.API.User.html#updateUser"><span class="hs-identifier hs-type">updateUser</span></a></span><span>
+</span><span id="line-225"></span><span>  </span><span class="hs-glyph">::</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="OpenAPIPetstore.API.User.html#UpdateUser"><span class="hs-identifier hs-type">UpdateUser</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679163039"><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-6989586621679163039"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a></span><span class="hs-special">)</span><span>
+</span><span id="line-226"></span><span>  </span><span class="hs-glyph">=&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679163039"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="hs-comment">-- ^ request content-type ('MimeType')</span><span>
 </span><span id="line-227"></span><span>  </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a></span><span> </span><span class="hs-comment">-- ^ &quot;body&quot; -  Updated user object</span><span>
 </span><span id="line-228"></span><span>  </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Username"><span class="hs-identifier hs-type">Username</span></a></span><span> </span><span class="hs-comment">-- ^ &quot;username&quot; -  name that need to be deleted</span><span>
-</span><span id="line-229"></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="OpenAPIPetstore.API.User.html#UpdateUser"><span class="hs-identifier hs-type">UpdateUser</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151684"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span></span><span>
-</span><span id="line-230"></span><span id="updateUser"><span class="annot"><span class="annottext">updateUser :: ContentType contentType
+</span><span id="line-229"></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="OpenAPIPetstore.API.User.html#UpdateUser"><span class="hs-identifier hs-type">UpdateUser</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679163039"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span></span><span>
+</span><span id="line-230"></span><span id="updateUser"><span class="annot"><span class="annottext">updateUser :: forall contentType.
+(Consumes UpdateUser contentType, MimeRender contentType User) =&gt;
+ContentType contentType
 -&gt; User
 -&gt; Username
 -&gt; OpenAPIPetstoreRequest
      UpdateUser contentType NoContent MimeNoContent
 </span><a href="OpenAPIPetstore.API.User.html#updateUser"><span class="hs-identifier hs-var hs-var">updateUser</span></a></span></span><span> </span><span class="annot"><span class="annottext">ContentType contentType
-</span><span class="hs-identifier">_</span></span><span> </span><span id="local-6989586621679151682"><span class="annot"><span class="annottext">User
-</span><a href="#local-6989586621679151682"><span class="hs-identifier hs-var">body</span></a></span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Model.html#Username"><span class="hs-identifier hs-type">Username</span></a></span><span> </span><span id="local-6989586621679151681"><span class="annot"><span class="annottext">Text
-</span><a href="#local-6989586621679151681"><span class="hs-identifier hs-var">username</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
+</span><span class="hs-identifier">_</span></span><span> </span><span id="local-6989586621679162881"><span class="annot"><span class="annottext">User
+</span><a href="#local-6989586621679162881"><span class="hs-identifier hs-var">body</span></a></span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Model.html#Username"><span class="hs-identifier hs-type">Username</span></a></span><span> </span><span id="local-6989586621679162880"><span class="annot"><span class="annottext">Text
+</span><a href="#local-6989586621679162880"><span class="hs-identifier hs-var">username</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
 </span><span id="line-231"></span><span>  </span><span class="annot"><span class="annottext">Method
 -&gt; [ByteString]
 -&gt; OpenAPIPetstoreRequest
@@ -416,7 +428,7 @@ Method
 </span><span class="hs-string">&quot;/user/&quot;</span></span><span class="hs-special">,</span><span class="annot"><span class="annottext">Text -&gt; ByteString
 forall a. ToHttpApiData a =&gt; a -&gt; ByteString
 </span><a href="OpenAPIPetstore.Core.html#toPath"><span class="hs-identifier hs-var">toPath</span></a></span><span> </span><span class="annot"><span class="annottext">Text
-</span><a href="#local-6989586621679151681"><span class="hs-identifier hs-var">username</span></a></span><span class="hs-special">]</span><span>
+</span><a href="#local-6989586621679162880"><span class="hs-identifier hs-var">username</span></a></span><span class="hs-special">]</span><span>
 </span><span id="line-232"></span><span>    </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest
   UpdateUser contentType NoContent MimeNoContent
 -&gt; User
@@ -428,15 +440,15 @@ forall req param contentType res accept.
 OpenAPIPetstoreRequest req contentType res accept
 -&gt; param -&gt; OpenAPIPetstoreRequest req contentType res accept
 </span><a href="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-operator hs-var">`setBodyParam`</span></a></span><span> </span><span class="annot"><span class="annottext">User
-</span><a href="#local-6989586621679151682"><span class="hs-identifier hs-var">body</span></a></span><span>
+</span><a href="#local-6989586621679162881"><span class="hs-identifier hs-var">body</span></a></span><span>
 </span><span id="line-233"></span><span>
 </span><span id="line-234"></span><span class="hs-keyword">data</span><span> </span><span id="UpdateUser"><span class="annot"><a href="OpenAPIPetstore.API.User.html#UpdateUser"><span class="hs-identifier hs-var">UpdateUser</span></a></span></span><span> </span><span>
 </span><span id="line-235"></span><span>
 </span><span id="line-236"></span><span class="hs-comment">-- | /Body Param/ &quot;body&quot; - Updated user object</span><span>
-</span><span id="line-237"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679151679"><span class="annot"><a href="OpenAPIPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#UpdateUser"><span class="hs-identifier hs-type">UpdateUser</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a></span></span><span> </span><span>
+</span><span id="line-237"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679162878"><span class="annot"><a href="OpenAPIPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#UpdateUser"><span class="hs-identifier hs-type">UpdateUser</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a></span></span><span> </span><span>
 </span><span id="line-238"></span><span>
 </span><span id="line-239"></span><span class="hs-comment">-- | @*/*@</span><span>
-</span><span id="line-240"></span><span id="local-6989586621679151678"><span class="hs-keyword">instance</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-6989586621679151678"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </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="OpenAPIPetstore.API.User.html#UpdateUser"><span class="hs-identifier hs-type">UpdateUser</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151678"><span class="hs-identifier hs-type">mtype</span></a></span></span><span>
+</span><span id="line-240"></span><span id="local-6989586621679163036"><span class="hs-keyword">instance</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-6989586621679163036"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </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="OpenAPIPetstore.API.User.html#UpdateUser"><span class="hs-identifier hs-type">UpdateUser</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679163036"><span class="hs-identifier hs-type">mtype</span></a></span></span><span>
 </span><span id="line-241"></span><span>
 </span><span id="line-242"></span><span class="hs-keyword">instance</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#UpdateUser"><span class="hs-identifier hs-type">UpdateUser</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span><span>
 </span><span id="line-243"></span><span>

samples/client/petstore/haskell-http-client/docs/src/OpenAPIPetstore.LoggingKatip.html

@@ -34,11 +34,11 @@ Katip Logging functions
 </span><span id="line-34"></span><span class="hs-comment">-- * Type Aliases (for compatibility)</span><span>
 </span><span id="line-35"></span><span>
 </span><span id="line-36"></span><span class="hs-comment">-- | Runs a Katip logging block with the Log environment</span><span>
-</span><span id="line-37"></span><span class="hs-keyword">type</span><span> </span><span id="LogExecWithContext"><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#LogExecWithContext"><span class="hs-identifier hs-var">LogExecWithContext</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">forall</span><span> </span><span id="local-6989586621679145661"><span class="annot"><a href="#local-6989586621679145661"><span class="hs-identifier hs-type">m</span></a></span></span><span> </span><span id="local-6989586621679145660"><span class="annot"><a href="#local-6989586621679145660"><span class="hs-identifier hs-type">a</span></a></span></span><span class="hs-operator">.</span><span> </span><span class="annot"><span class="hs-identifier hs-type">P.MonadIO</span></span><span> </span><span class="annot"><a href="#local-6989586621679145661"><span class="hs-identifier hs-type">m</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span>
-</span><span id="line-38"></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="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#LogExec"><span class="hs-identifier hs-type">LogExec</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679145661"><span class="hs-identifier hs-type">m</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679145660"><span class="hs-identifier hs-type">a</span></a></span><span>
+</span><span id="line-37"></span><span class="hs-keyword">type</span><span> </span><span id="LogExecWithContext"><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#LogExecWithContext"><span class="hs-identifier hs-var">LogExecWithContext</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">forall</span><span> </span><span id="local-6989586621679151695"><span class="annot"><a href="#local-6989586621679151695"><span class="hs-identifier hs-type">m</span></a></span></span><span> </span><span id="local-6989586621679151694"><span class="annot"><a href="#local-6989586621679151694"><span class="hs-identifier hs-type">a</span></a></span></span><span class="hs-operator">.</span><span> </span><span class="annot"><span class="hs-identifier hs-type">P.MonadIO</span></span><span> </span><span class="annot"><a href="#local-6989586621679151695"><span class="hs-identifier hs-type">m</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span>
+</span><span id="line-38"></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="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#LogExec"><span class="hs-identifier hs-type">LogExec</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151695"><span class="hs-identifier hs-type">m</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151694"><span class="hs-identifier hs-type">a</span></a></span><span>
 </span><span id="line-39"></span><span>
 </span><span id="line-40"></span><span class="hs-comment">-- | A Katip logging block</span><span>
-</span><span id="line-41"></span><span class="hs-keyword">type</span><span> </span><span id="LogExec"><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#LogExec"><span class="hs-identifier hs-var">LogExec</span></a></span></span><span> </span><span id="local-6989586621679145658"><span class="annot"><a href="#local-6989586621679145658"><span class="hs-identifier hs-type">m</span></a></span></span><span> </span><span id="local-6989586621679145657"><span class="annot"><a href="#local-6989586621679145657"><span class="hs-identifier hs-type">a</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="hs-identifier hs-type">LG.KatipT</span></span><span> </span><span class="annot"><a href="#local-6989586621679145658"><span class="hs-identifier hs-type">m</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679145657"><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-6989586621679145658"><span class="hs-identifier hs-type">m</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679145657"><span class="hs-identifier hs-type">a</span></a></span><span>
+</span><span id="line-41"></span><span class="hs-keyword">type</span><span> </span><span id="LogExec"><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#LogExec"><span class="hs-identifier hs-var">LogExec</span></a></span></span><span> </span><span id="local-6989586621679151693"><span class="annot"><a href="#local-6989586621679151693"><span class="hs-identifier hs-type">m</span></a></span></span><span> </span><span id="local-6989586621679151692"><span class="annot"><a href="#local-6989586621679151692"><span class="hs-identifier hs-type">a</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="hs-identifier hs-type">LG.KatipT</span></span><span> </span><span class="annot"><a href="#local-6989586621679151693"><span class="hs-identifier hs-type">m</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151692"><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-6989586621679151693"><span class="hs-identifier hs-type">m</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151692"><span class="hs-identifier hs-type">a</span></a></span><span>
 </span><span id="line-42"></span><span>
 </span><span id="line-43"></span><span class="hs-comment">-- | A Katip Log environment</span><span>
 </span><span id="line-44"></span><span class="hs-keyword">type</span><span> </span><span id="LogContext"><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#LogContext"><span class="hs-identifier hs-var">LogContext</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="hs-identifier hs-type">LG.LogEnv</span></span><span>
@@ -58,8 +58,8 @@ Katip Logging functions
 </span><span id="line-54"></span><span>
 </span><span id="line-55"></span><span class="hs-comment">-- | Runs a Katip logging block with the Log environment</span><span>
 </span><span id="line-56"></span><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#runDefaultLogExecWithContext"><span class="hs-identifier hs-type">runDefaultLogExecWithContext</span></a></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 id="line-57"></span><span id="runDefaultLogExecWithContext"><span class="annot"><span class="annottext">runDefaultLogExecWithContext :: LogContext -&gt; LogExec m a
-</span><a href="OpenAPIPetstore.LoggingKatip.html#runDefaultLogExecWithContext"><span class="hs-identifier hs-var hs-var">runDefaultLogExecWithContext</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">LogContext -&gt; LogExec m a
+</span><span id="line-57"></span><span id="runDefaultLogExecWithContext"><span class="annot"><span class="annottext">runDefaultLogExecWithContext :: LogExecWithContext
+</span><a href="OpenAPIPetstore.LoggingKatip.html#runDefaultLogExecWithContext"><span class="hs-identifier hs-var hs-var">runDefaultLogExecWithContext</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">LogContext -&gt; KatipT m a -&gt; m a
 forall (m :: * -&gt; *) a. LogContext -&gt; KatipT m a -&gt; m a
 </span><span class="hs-identifier hs-var">LG.runKatipT</span></span><span>
 </span><span id="line-58"></span><span>
@@ -67,7 +67,7 @@ forall (m :: * -&gt; *) a. LogContext -&gt; KatipT m a -&gt; m a
 </span><span id="line-60"></span><span>
 </span><span id="line-61"></span><span class="hs-comment">-- | Runs a Katip logging block with the Log environment</span><span>
 </span><span id="line-62"></span><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#stdoutLoggingExec"><span class="hs-identifier hs-type">stdoutLoggingExec</span></a></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 id="line-63"></span><span id="stdoutLoggingExec"><span class="annot"><span class="annottext">stdoutLoggingExec :: LogContext -&gt; LogExec m a
+</span><span id="line-63"></span><span id="stdoutLoggingExec"><span class="annot"><span class="annottext">stdoutLoggingExec :: LogExecWithContext
 </span><a href="OpenAPIPetstore.LoggingKatip.html#stdoutLoggingExec"><span class="hs-identifier hs-var hs-var">stdoutLoggingExec</span></a></span></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>
@@ -75,10 +75,10 @@ LogExecWithContext
 </span><span id="line-65"></span><span class="hs-comment">-- | A Katip Log environment which targets stdout</span><span>
 </span><span id="line-66"></span><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#stdoutLoggingContext"><span class="hs-identifier hs-type">stdoutLoggingContext</span></a></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="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.LoggingKatip.html#LogContext"><span class="hs-identifier hs-type">LogContext</span></a></span><span>
 </span><span id="line-67"></span><span id="stdoutLoggingContext"><span class="annot"><span class="annottext">stdoutLoggingContext :: LogContext -&gt; IO LogContext
-</span><a href="OpenAPIPetstore.LoggingKatip.html#stdoutLoggingContext"><span class="hs-identifier hs-var hs-var">stdoutLoggingContext</span></a></span></span><span> </span><span id="local-6989586621679145648"><span class="annot"><span class="annottext">LogContext
-</span><a href="#local-6989586621679145648"><span class="hs-identifier hs-var">cxt</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
-</span><span id="line-68"></span><span>    </span><span id="local-6989586621679145647"><span class="annot"><span class="annottext">Scribe
-</span><a href="#local-6989586621679145647"><span class="hs-identifier hs-var">handleScribe</span></a></span></span><span> </span><span class="hs-glyph">&lt;-</span><span> </span><span class="annot"><span class="annottext">ColorStrategy -&gt; Handle -&gt; PermitFunc -&gt; Verbosity -&gt; IO Scribe
+</span><a href="OpenAPIPetstore.LoggingKatip.html#stdoutLoggingContext"><span class="hs-identifier hs-var hs-var">stdoutLoggingContext</span></a></span></span><span> </span><span id="local-6989586621679151680"><span class="annot"><span class="annottext">LogContext
+</span><a href="#local-6989586621679151680"><span class="hs-identifier hs-var">cxt</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
+</span><span id="line-68"></span><span>    </span><span id="local-6989586621679151679"><span class="annot"><span class="annottext">Scribe
+</span><a href="#local-6989586621679151679"><span class="hs-identifier hs-var">handleScribe</span></a></span></span><span> </span><span class="hs-glyph">&lt;-</span><span> </span><span class="annot"><span class="annottext">ColorStrategy -&gt; Handle -&gt; PermitFunc -&gt; Verbosity -&gt; IO Scribe
 </span><span class="hs-identifier hs-var">LG.mkHandleScribe</span></span><span> </span><span class="annot"><span class="annottext">ColorStrategy
 </span><span class="hs-identifier hs-var">LG.ColorIfTerminal</span></span><span> </span><span class="annot"><span class="annottext">Handle
 </span><span class="hs-identifier hs-var">IO.stdout</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Severity -&gt; Item a -&gt; IO Bool
@@ -89,15 +89,15 @@ forall (m :: * -&gt; *) a. Monad m =&gt; Severity -&gt; Item a -&gt; m Bool
 </span><span id="line-69"></span><span>    </span><span class="annot"><span class="annottext">Text -&gt; Scribe -&gt; ScribeSettings -&gt; LogContext -&gt; IO LogContext
 </span><span class="hs-identifier hs-var">LG.registerScribe</span></span><span> </span><span class="annot"><span class="annottext">Text
 </span><span class="hs-string">&quot;stdout&quot;</span></span><span> </span><span class="annot"><span class="annottext">Scribe
-</span><a href="#local-6989586621679145647"><span class="hs-identifier hs-var">handleScribe</span></a></span><span> </span><span class="annot"><span class="annottext">ScribeSettings
+</span><a href="#local-6989586621679151679"><span class="hs-identifier hs-var">handleScribe</span></a></span><span> </span><span class="annot"><span class="annottext">ScribeSettings
 </span><span class="hs-identifier hs-var">LG.defaultScribeSettings</span></span><span> </span><span class="annot"><span class="annottext">LogContext
-</span><a href="#local-6989586621679145648"><span class="hs-identifier hs-var">cxt</span></a></span><span>
+</span><a href="#local-6989586621679151680"><span class="hs-identifier hs-var">cxt</span></a></span><span>
 </span><span id="line-70"></span><span>
 </span><span id="line-71"></span><span class="hs-comment">-- * stderr logger</span><span>
 </span><span id="line-72"></span><span>
 </span><span id="line-73"></span><span class="hs-comment">-- | Runs a Katip logging block with the Log environment</span><span>
 </span><span id="line-74"></span><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#stderrLoggingExec"><span class="hs-identifier hs-type">stderrLoggingExec</span></a></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 id="line-75"></span><span id="stderrLoggingExec"><span class="annot"><span class="annottext">stderrLoggingExec :: LogContext -&gt; LogExec m a
+</span><span id="line-75"></span><span id="stderrLoggingExec"><span class="annot"><span class="annottext">stderrLoggingExec :: LogExecWithContext
 </span><a href="OpenAPIPetstore.LoggingKatip.html#stderrLoggingExec"><span class="hs-identifier hs-var hs-var">stderrLoggingExec</span></a></span></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>
@@ -105,10 +105,10 @@ LogExecWithContext
 </span><span id="line-77"></span><span class="hs-comment">-- | A Katip Log environment which targets stderr</span><span>
 </span><span id="line-78"></span><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#stderrLoggingContext"><span class="hs-identifier hs-type">stderrLoggingContext</span></a></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="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.LoggingKatip.html#LogContext"><span class="hs-identifier hs-type">LogContext</span></a></span><span>
 </span><span id="line-79"></span><span id="stderrLoggingContext"><span class="annot"><span class="annottext">stderrLoggingContext :: LogContext -&gt; IO LogContext
-</span><a href="OpenAPIPetstore.LoggingKatip.html#stderrLoggingContext"><span class="hs-identifier hs-var hs-var">stderrLoggingContext</span></a></span></span><span> </span><span id="local-6989586621679145636"><span class="annot"><span class="annottext">LogContext
-</span><a href="#local-6989586621679145636"><span class="hs-identifier hs-var">cxt</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
-</span><span id="line-80"></span><span>    </span><span id="local-6989586621679145635"><span class="annot"><span class="annottext">Scribe
-</span><a href="#local-6989586621679145635"><span class="hs-identifier hs-var">handleScribe</span></a></span></span><span> </span><span class="hs-glyph">&lt;-</span><span> </span><span class="annot"><span class="annottext">ColorStrategy -&gt; Handle -&gt; PermitFunc -&gt; Verbosity -&gt; IO Scribe
+</span><a href="OpenAPIPetstore.LoggingKatip.html#stderrLoggingContext"><span class="hs-identifier hs-var hs-var">stderrLoggingContext</span></a></span></span><span> </span><span id="local-6989586621679151665"><span class="annot"><span class="annottext">LogContext
+</span><a href="#local-6989586621679151665"><span class="hs-identifier hs-var">cxt</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
+</span><span id="line-80"></span><span>    </span><span id="local-6989586621679151664"><span class="annot"><span class="annottext">Scribe
+</span><a href="#local-6989586621679151664"><span class="hs-identifier hs-var">handleScribe</span></a></span></span><span> </span><span class="hs-glyph">&lt;-</span><span> </span><span class="annot"><span class="annottext">ColorStrategy -&gt; Handle -&gt; PermitFunc -&gt; Verbosity -&gt; IO Scribe
 </span><span class="hs-identifier hs-var">LG.mkHandleScribe</span></span><span> </span><span class="annot"><span class="annottext">ColorStrategy
 </span><span class="hs-identifier hs-var">LG.ColorIfTerminal</span></span><span> </span><span class="annot"><span class="annottext">Handle
 </span><span class="hs-identifier hs-var">IO.stderr</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Severity -&gt; Item a -&gt; IO Bool
@@ -119,21 +119,21 @@ forall (m :: * -&gt; *) a. Monad m =&gt; Severity -&gt; Item a -&gt; m Bool
 </span><span id="line-81"></span><span>    </span><span class="annot"><span class="annottext">Text -&gt; Scribe -&gt; ScribeSettings -&gt; LogContext -&gt; IO LogContext
 </span><span class="hs-identifier hs-var">LG.registerScribe</span></span><span> </span><span class="annot"><span class="annottext">Text
 </span><span class="hs-string">&quot;stderr&quot;</span></span><span> </span><span class="annot"><span class="annottext">Scribe
-</span><a href="#local-6989586621679145635"><span class="hs-identifier hs-var">handleScribe</span></a></span><span> </span><span class="annot"><span class="annottext">ScribeSettings
+</span><a href="#local-6989586621679151664"><span class="hs-identifier hs-var">handleScribe</span></a></span><span> </span><span class="annot"><span class="annottext">ScribeSettings
 </span><span class="hs-identifier hs-var">LG.defaultScribeSettings</span></span><span> </span><span class="annot"><span class="annottext">LogContext
-</span><a href="#local-6989586621679145636"><span class="hs-identifier hs-var">cxt</span></a></span><span>
+</span><a href="#local-6989586621679151665"><span class="hs-identifier hs-var">cxt</span></a></span><span>
 </span><span id="line-82"></span><span>
 </span><span id="line-83"></span><span class="hs-comment">-- * Null logger</span><span>
 </span><span id="line-84"></span><span>
 </span><span id="line-85"></span><span class="hs-comment">-- | Disables Katip logging</span><span>
 </span><span id="line-86"></span><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#runNullLogExec"><span class="hs-identifier hs-type">runNullLogExec</span></a></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 id="line-87"></span><span id="runNullLogExec"><span class="annot"><span class="annottext">runNullLogExec :: LogContext -&gt; LogExec m a
-</span><a href="OpenAPIPetstore.LoggingKatip.html#runNullLogExec"><span class="hs-identifier hs-var hs-var">runNullLogExec</span></a></span></span><span> </span><span id="local-6989586621679145632"><span class="annot"><span class="annottext">LogContext
-</span><a href="#local-6989586621679145632"><span class="hs-identifier hs-var">le</span></a></span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">LG.KatipT</span></span><span> </span><span id="local-6989586621679145630"><span class="annot"><span class="annottext">ReaderT LogContext m a
-</span><a href="#local-6989586621679145630"><span class="hs-identifier hs-var">f</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">ReaderT LogContext m a -&gt; LogContext -&gt; m a
+</span><span id="line-87"></span><span id="runNullLogExec"><span class="annot"><span class="annottext">runNullLogExec :: LogExecWithContext
+</span><a href="OpenAPIPetstore.LoggingKatip.html#runNullLogExec"><span class="hs-identifier hs-var hs-var">runNullLogExec</span></a></span></span><span> </span><span id="local-6989586621679151653"><span class="annot"><span class="annottext">LogContext
+</span><a href="#local-6989586621679151653"><span class="hs-identifier hs-var">le</span></a></span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">LG.KatipT</span></span><span> </span><span id="local-6989586621679151651"><span class="annot"><span class="annottext">ReaderT LogContext m a
+</span><a href="#local-6989586621679151651"><span class="hs-identifier hs-var">f</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">ReaderT LogContext m a -&gt; LogContext -&gt; m a
 forall r (m :: * -&gt; *) a. ReaderT r m a -&gt; r -&gt; m a
 </span><span class="hs-identifier hs-var hs-var">P.runReaderT</span></span><span> </span><span class="annot"><span class="annottext">ReaderT LogContext m a
-</span><a href="#local-6989586621679145630"><span class="hs-identifier hs-var">f</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">ASetter
+</span><a href="#local-6989586621679151651"><span class="hs-identifier hs-var">f</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">ASetter
   LogContext
   LogContext
   (Map Text ScribeHandle)
@@ -149,17 +149,19 @@ Lens' LogContext (Map Text ScribeHandle)
 </span><span class="hs-identifier hs-var">LG.logEnvScribes</span></span><span> </span><span class="annot"><span class="annottext">Map Text ScribeHandle
 forall a. Monoid a =&gt; a
 </span><span class="hs-identifier hs-var">mempty</span></span><span> </span><span class="annot"><span class="annottext">LogContext
-</span><a href="#local-6989586621679145632"><span class="hs-identifier hs-var">le</span></a></span><span class="hs-special">)</span><span>
+</span><a href="#local-6989586621679151653"><span class="hs-identifier hs-var">le</span></a></span><span class="hs-special">)</span><span>
 </span><span id="line-88"></span><span>
 </span><span id="line-89"></span><span class="hs-comment">-- * Log Msg</span><span>
 </span><span id="line-90"></span><span>
 </span><span id="line-91"></span><span class="hs-comment">-- | Log a katip message</span><span>
-</span><span id="line-92"></span><span id="local-6989586621679145670"><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#_log"><span class="hs-identifier hs-type">_log</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">Applicative</span></span><span> </span><span class="annot"><a href="#local-6989586621679145670"><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">LG.Katip</span></span><span> </span><span class="annot"><a href="#local-6989586621679145670"><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">Text</span></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#LogLevel"><span class="hs-identifier hs-type">LogLevel</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-6989586621679145670"><span class="hs-identifier hs-type">m</span></a></span><span> </span><span class="hs-special">(</span><span class="hs-special">)</span></span><span>
-</span><span id="line-93"></span><span id="_log"><span class="annot"><span class="annottext">_log :: Text -&gt; Severity -&gt; Text -&gt; m ()
-</span><a href="OpenAPIPetstore.LoggingKatip.html#_log"><span class="hs-identifier hs-var hs-var">_log</span></a></span></span><span> </span><span id="local-6989586621679145625"><span class="annot"><span class="annottext">Text
-</span><a href="#local-6989586621679145625"><span class="hs-identifier hs-var">src</span></a></span></span><span> </span><span id="local-6989586621679145624"><span class="annot"><span class="annottext">Severity
-</span><a href="#local-6989586621679145624"><span class="hs-identifier hs-var">level</span></a></span></span><span> </span><span id="local-6989586621679145623"><span class="annot"><span class="annottext">Text
-</span><a href="#local-6989586621679145623"><span class="hs-identifier hs-var">msg</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
+</span><span id="line-92"></span><span id="local-6989586621679151738"><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#_log"><span class="hs-identifier hs-type">_log</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">Applicative</span></span><span> </span><span class="annot"><a href="#local-6989586621679151738"><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">LG.Katip</span></span><span> </span><span class="annot"><a href="#local-6989586621679151738"><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">Text</span></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#LogLevel"><span class="hs-identifier hs-type">LogLevel</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-6989586621679151738"><span class="hs-identifier hs-type">m</span></a></span><span> </span><span class="hs-special">(</span><span class="hs-special">)</span></span><span>
+</span><span id="line-93"></span><span id="_log"><span class="annot"><span class="annottext">_log :: forall (m :: * -&gt; *).
+(Applicative m, Katip m) =&gt;
+Text -&gt; Severity -&gt; Text -&gt; m ()
+</span><a href="OpenAPIPetstore.LoggingKatip.html#_log"><span class="hs-identifier hs-var hs-var">_log</span></a></span></span><span> </span><span id="local-6989586621679151633"><span class="annot"><span class="annottext">Text
+</span><a href="#local-6989586621679151633"><span class="hs-identifier hs-var">src</span></a></span></span><span> </span><span id="local-6989586621679151632"><span class="annot"><span class="annottext">Severity
+</span><a href="#local-6989586621679151632"><span class="hs-identifier hs-var">level</span></a></span></span><span> </span><span id="local-6989586621679151631"><span class="annot"><span class="annottext">Text
+</span><a href="#local-6989586621679151631"><span class="hs-identifier hs-var">msg</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
 </span><span id="line-94"></span><span>  </span><span class="annot"><span class="annottext">Namespace -&gt; Severity -&gt; LogStr -&gt; m ()
 forall (m :: * -&gt; *).
 (Applicative m, Katip m) =&gt;
@@ -170,34 +172,36 @@ forall a. IsString a =&gt; String -&gt; a
 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">Text -&gt; String
 </span><span class="hs-identifier hs-var">T.unpack</span></span><span> </span><span class="annot"><span class="annottext">Text
-</span><a href="#local-6989586621679145625"><span class="hs-identifier hs-var">src</span></a></span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">Severity
-</span><a href="#local-6989586621679145624"><span class="hs-identifier hs-var">level</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Text -&gt; LogStr
+</span><a href="#local-6989586621679151633"><span class="hs-identifier hs-var">src</span></a></span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">Severity
+</span><a href="#local-6989586621679151632"><span class="hs-identifier hs-var">level</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Text -&gt; LogStr
 forall a. StringConv a Text =&gt; a -&gt; LogStr
 </span><span class="hs-identifier hs-var">LG.logStr</span></span><span> </span><span class="annot"><span class="annottext">Text
-</span><a href="#local-6989586621679145623"><span class="hs-identifier hs-var">msg</span></a></span><span class="hs-special">)</span><span>
+</span><a href="#local-6989586621679151631"><span class="hs-identifier hs-var">msg</span></a></span><span class="hs-special">)</span><span>
 </span><span id="line-95"></span><span>
 </span><span id="line-96"></span><span class="hs-comment">-- * Log Exceptions</span><span>
 </span><span id="line-97"></span><span>
 </span><span id="line-98"></span><span class="hs-comment">-- | re-throws exceptions after logging them</span><span>
-</span><span id="line-99"></span><span id="local-6989586621679145618"><span id="local-6989586621679145619"><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#logExceptions"><span class="hs-identifier hs-type">logExceptions</span></a></span><span>
-</span><span id="line-100"></span><span>  </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">LG.Katip</span></span><span> </span><span class="annot"><a href="#local-6989586621679145619"><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">E.MonadCatch</span></span><span> </span><span class="annot"><a href="#local-6989586621679145619"><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">Applicative</span></span><span> </span><span class="annot"><a href="#local-6989586621679145619"><span class="hs-identifier hs-type">m</span></a></span><span class="hs-special">)</span><span>
-</span><span id="line-101"></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-6989586621679145619"><span class="hs-identifier hs-type">m</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679145618"><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-6989586621679145619"><span class="hs-identifier hs-type">m</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679145618"><span class="hs-identifier hs-type">a</span></a></span></span></span><span>
-</span><span id="line-102"></span><span id="logExceptions"><span class="annot"><span class="annottext">logExceptions :: Text -&gt; m a -&gt; m a
-</span><a href="OpenAPIPetstore.LoggingKatip.html#logExceptions"><span class="hs-identifier hs-var hs-var">logExceptions</span></a></span></span><span> </span><span id="local-6989586621679145616"><span class="annot"><span class="annottext">Text
-</span><a href="#local-6989586621679145616"><span class="hs-identifier hs-var">src</span></a></span></span><span> </span><span class="hs-glyph">=</span><span>
+</span><span id="line-99"></span><span id="local-6989586621679151722"><span id="local-6989586621679151724"><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#logExceptions"><span class="hs-identifier hs-type">logExceptions</span></a></span><span>
+</span><span id="line-100"></span><span>  </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">LG.Katip</span></span><span> </span><span class="annot"><a href="#local-6989586621679151724"><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">E.MonadCatch</span></span><span> </span><span class="annot"><a href="#local-6989586621679151724"><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">Applicative</span></span><span> </span><span class="annot"><a href="#local-6989586621679151724"><span class="hs-identifier hs-type">m</span></a></span><span class="hs-special">)</span><span>
+</span><span id="line-101"></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-6989586621679151724"><span class="hs-identifier hs-type">m</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151722"><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-6989586621679151724"><span class="hs-identifier hs-type">m</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151722"><span class="hs-identifier hs-type">a</span></a></span></span></span><span>
+</span><span id="line-102"></span><span id="logExceptions"><span class="annot"><span class="annottext">logExceptions :: forall (m :: * -&gt; *) a.
+(Katip m, MonadCatch m, Applicative m) =&gt;
+Text -&gt; m a -&gt; m a
+</span><a href="OpenAPIPetstore.LoggingKatip.html#logExceptions"><span class="hs-identifier hs-var hs-var">logExceptions</span></a></span></span><span> </span><span id="local-6989586621679151608"><span class="annot"><span class="annottext">Text
+</span><a href="#local-6989586621679151608"><span class="hs-identifier hs-var">src</span></a></span></span><span> </span><span class="hs-glyph">=</span><span>
 </span><span id="line-103"></span><span>  </span><span class="annot"><span class="annottext">(SomeException -&gt; m a) -&gt; m a -&gt; m a
 forall (m :: * -&gt; *) e a.
 (MonadCatch m, Exception e) =&gt;
 (e -&gt; m a) -&gt; m a -&gt; m a
 </span><span class="hs-identifier hs-var">E.handle</span></span><span>
-</span><span id="line-104"></span><span>    </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span class="hs-special">(</span><span id="local-6989586621679145614"><span class="annot"><span class="annottext">SomeException
-</span><a href="#local-6989586621679145614"><span class="hs-identifier hs-var">e</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">E.SomeException</span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-keyword">do</span><span>
+</span><span id="line-104"></span><span>    </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span class="hs-special">(</span><span id="local-6989586621679151606"><span class="annot"><span class="annottext">SomeException
+</span><a href="#local-6989586621679151606"><span class="hs-identifier hs-var">e</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">E.SomeException</span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-keyword">do</span><span>
 </span><span id="line-105"></span><span>       </span><span class="annot"><span class="annottext">Text -&gt; Severity -&gt; Text -&gt; m ()
 forall (m :: * -&gt; *).
 (Applicative m, Katip m) =&gt;
 Text -&gt; Severity -&gt; Text -&gt; m ()
 </span><a href="OpenAPIPetstore.LoggingKatip.html#_log"><span class="hs-identifier hs-var">_log</span></a></span><span> </span><span class="annot"><span class="annottext">Text
-</span><a href="#local-6989586621679145616"><span class="hs-identifier hs-var">src</span></a></span><span> </span><span class="annot"><span class="annottext">Severity
+</span><a href="#local-6989586621679151608"><span class="hs-identifier hs-var">src</span></a></span><span> </span><span class="annot"><span class="annottext">Severity
 </span><span class="hs-identifier hs-var">LG.ErrorS</span></span><span> </span><span class="hs-special">(</span><span class="hs-special">(</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="annot"><span class="annottext">(String -&gt; Text)
 -&gt; (SomeException -&gt; String) -&gt; SomeException -&gt; Text
@@ -205,11 +209,11 @@ 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">SomeException -&gt; String
 forall a. Show a =&gt; a -&gt; String
 </span><span class="hs-identifier hs-var">show</span></span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">SomeException
-</span><a href="#local-6989586621679145614"><span class="hs-identifier hs-var">e</span></a></span><span class="hs-special">)</span><span>
+</span><a href="#local-6989586621679151606"><span class="hs-identifier hs-var">e</span></a></span><span class="hs-special">)</span><span>
 </span><span id="line-106"></span><span>       </span><span class="annot"><span class="annottext">SomeException -&gt; m a
 forall (m :: * -&gt; *) e a. (MonadThrow m, Exception e) =&gt; e -&gt; m a
 </span><span class="hs-identifier hs-var">E.throw</span></span><span> </span><span class="annot"><span class="annottext">SomeException
-</span><a href="#local-6989586621679145614"><span class="hs-identifier hs-var">e</span></a></span><span class="hs-special">)</span><span>
+</span><a href="#local-6989586621679151606"><span class="hs-identifier hs-var">e</span></a></span><span class="hs-special">)</span><span>
 </span><span id="line-107"></span><span>
 </span><span id="line-108"></span><span class="hs-comment">-- * Log Level</span><span>
 </span><span id="line-109"></span><span>

samples/client/petstore/haskell-http-client/docs/src/OpenAPIPetstore.MimeTypes.html

@@ -44,21 +44,21 @@ Module : OpenAPIPetstore.MimeTypes
 </span><span id="line-44"></span><span>
 </span><span id="line-45"></span><span class="hs-comment">-- * ContentType MimeType</span><span>
 </span><span id="line-46"></span><span>
-</span><span id="line-47"></span><span class="hs-keyword">data</span><span> </span><span id="ContentType"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-var">ContentType</span></a></span></span><span> </span><span id="local-6989586621679146066"><span class="annot"><a href="#local-6989586621679146066"><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.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679146066"><span class="hs-identifier hs-type">a</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span id="ContentType"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-var">ContentType</span></a></span></span><span> </span><span class="hs-special">{</span><span> </span><span id="unContentType"><span class="annot"><span class="annottext">ContentType a -&gt; a
-</span><a href="OpenAPIPetstore.MimeTypes.html#unContentType"><span class="hs-identifier hs-var hs-var">unContentType</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="#local-6989586621679146066"><span class="hs-identifier hs-type">a</span></a></span><span> </span><span class="hs-special">}</span><span>
+</span><span id="line-47"></span><span class="hs-keyword">data</span><span> </span><span id="ContentType"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-var">ContentType</span></a></span></span><span> </span><span id="local-6989586621679152381"><span class="annot"><a href="#local-6989586621679152381"><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.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679152381"><span class="hs-identifier hs-type">a</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span id="ContentType"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-var">ContentType</span></a></span></span><span> </span><span class="hs-special">{</span><span> </span><span id="unContentType"><span class="annot"><span class="annottext">forall a. ContentType a -&gt; a
+</span><a href="OpenAPIPetstore.MimeTypes.html#unContentType"><span class="hs-identifier hs-var hs-var">unContentType</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="#local-6989586621679152381"><span class="hs-identifier hs-type">a</span></a></span><span> </span><span class="hs-special">}</span><span>
 </span><span id="line-48"></span><span>
 </span><span id="line-49"></span><span class="hs-comment">-- * Accept MimeType</span><span>
 </span><span id="line-50"></span><span>
-</span><span id="line-51"></span><span class="hs-keyword">data</span><span> </span><span id="Accept"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-var">Accept</span></a></span></span><span> </span><span id="local-6989586621679146063"><span class="annot"><a href="#local-6989586621679146063"><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.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679146063"><span class="hs-identifier hs-type">a</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span id="Accept"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-var">Accept</span></a></span></span><span> </span><span class="hs-special">{</span><span> </span><span id="unAccept"><span class="annot"><span class="annottext">Accept a -&gt; a
-</span><a href="OpenAPIPetstore.MimeTypes.html#unAccept"><span class="hs-identifier hs-var hs-var">unAccept</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="#local-6989586621679146063"><span class="hs-identifier hs-type">a</span></a></span><span> </span><span class="hs-special">}</span><span>
+</span><span id="line-51"></span><span class="hs-keyword">data</span><span> </span><span id="Accept"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-var">Accept</span></a></span></span><span> </span><span id="local-6989586621679152378"><span class="annot"><a href="#local-6989586621679152378"><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.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679152378"><span class="hs-identifier hs-type">a</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span id="Accept"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-var">Accept</span></a></span></span><span> </span><span class="hs-special">{</span><span> </span><span id="unAccept"><span class="annot"><span class="annottext">forall a. Accept a -&gt; a
+</span><a href="OpenAPIPetstore.MimeTypes.html#unAccept"><span class="hs-identifier hs-var hs-var">unAccept</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="#local-6989586621679152378"><span class="hs-identifier hs-type">a</span></a></span><span> </span><span class="hs-special">}</span><span>
 </span><span id="line-52"></span><span>
 </span><span id="line-53"></span><span class="hs-comment">-- * Consumes Class</span><span>
 </span><span id="line-54"></span><span>
-</span><span id="line-55"></span><span class="hs-keyword">class</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-6989586621679146060"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span id="Consumes"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-var">Consumes</span></a></span></span><span> </span><span id="local-6989586621679146058"><span class="annot"><a href="#local-6989586621679146058"><span class="hs-identifier hs-type">req</span></a></span></span><span> </span><span id="local-6989586621679146060"><span class="annot"><a href="#local-6989586621679146060"><span class="hs-identifier hs-type">mtype</span></a></span></span><span> </span><span class="hs-keyword">where</span><span>
+</span><span id="line-55"></span><span class="hs-keyword">class</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-6989586621679152374"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span id="Consumes"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-var">Consumes</span></a></span></span><span> </span><span id="local-6989586621679152375"><span class="annot"><a href="#local-6989586621679152375"><span class="hs-identifier hs-type">req</span></a></span></span><span> </span><span id="local-6989586621679152374"><span class="annot"><a href="#local-6989586621679152374"><span class="hs-identifier hs-type">mtype</span></a></span></span><span> </span><span class="hs-keyword">where</span><span>
 </span><span id="line-56"></span><span>
 </span><span id="line-57"></span><span class="hs-comment">-- * Produces Class</span><span>
 </span><span id="line-58"></span><span>
-</span><span id="line-59"></span><span class="hs-keyword">class</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-6989586621679146057"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span id="Produces"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-var">Produces</span></a></span></span><span> </span><span id="local-6989586621679146055"><span class="annot"><a href="#local-6989586621679146055"><span class="hs-identifier hs-type">req</span></a></span></span><span> </span><span id="local-6989586621679146057"><span class="annot"><a href="#local-6989586621679146057"><span class="hs-identifier hs-type">mtype</span></a></span></span><span> </span><span class="hs-keyword">where</span><span>
+</span><span id="line-59"></span><span class="hs-keyword">class</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-6989586621679152371"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span id="Produces"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-var">Produces</span></a></span></span><span> </span><span id="local-6989586621679152372"><span class="annot"><a href="#local-6989586621679152372"><span class="hs-identifier hs-type">req</span></a></span></span><span> </span><span id="local-6989586621679152371"><span class="annot"><a href="#local-6989586621679152371"><span class="hs-identifier hs-type">mtype</span></a></span></span><span> </span><span class="hs-keyword">where</span><span>
 </span><span id="line-60"></span><span>
 </span><span id="line-61"></span><span class="hs-comment">-- * Default Mime Types</span><span>
 </span><span id="line-62"></span><span>
@@ -73,7 +73,7 @@ Module : OpenAPIPetstore.MimeTypes
 </span><span id="line-71"></span><span>
 </span><span id="line-72"></span><span class="hs-comment">-- | A type for responses without content-body.</span><span>
 </span><span id="line-73"></span><span class="hs-keyword">data</span><span> </span><span id="NoContent"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-var">NoContent</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span id="NoContent"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-var">NoContent</span></a></span></span><span>
-</span><span id="line-74"></span><span>  </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span id="local-6989586621679146040"><span id="local-6989586621679146042"><span id="local-6989586621679146044"><span class="annot"><span class="annottext">Int -&gt; NoContent -&gt; ShowS
+</span><span id="line-74"></span><span>  </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span id="local-6989586621679152183"><span id="local-6989586621679152185"><span id="local-6989586621679152187"><span class="annot"><span class="annottext">Int -&gt; NoContent -&gt; ShowS
 [NoContent] -&gt; ShowS
 NoContent -&gt; String
 (Int -&gt; NoContent -&gt; ShowS)
@@ -88,7 +88,7 @@ show :: NoContent -&gt; String
 $cshow :: NoContent -&gt; String
 showsPrec :: Int -&gt; NoContent -&gt; ShowS
 $cshowsPrec :: Int -&gt; NoContent -&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="local-6989586621679146035"><span id="local-6989586621679146037"><span class="annot"><span class="annottext">NoContent -&gt; NoContent -&gt; Bool
+</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="local-6989586621679152178"><span id="local-6989586621679152180"><span class="annot"><span class="annottext">NoContent -&gt; NoContent -&gt; Bool
 (NoContent -&gt; NoContent -&gt; Bool)
 -&gt; (NoContent -&gt; NoContent -&gt; Bool) -&gt; Eq NoContent
 forall a. (a -&gt; a -&gt; Bool) -&gt; (a -&gt; a -&gt; Bool) -&gt; Eq a
@@ -101,60 +101,60 @@ $c== :: NoContent -&gt; NoContent -&gt; Bool
 </span><span id="line-76"></span><span>
 </span><span id="line-77"></span><span class="hs-comment">-- * MimeType Class</span><span>
 </span><span id="line-78"></span><span>
-</span><span id="line-79"></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-6989586621679146134"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span id="MimeType"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-var">MimeType</span></a></span></span><span> </span><span id="local-6989586621679146134"><span class="annot"><a href="#local-6989586621679146134"><span class="hs-identifier hs-type">mtype</span></a></span></span><span>  </span><span class="hs-keyword">where</span><span>
+</span><span id="line-79"></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-6989586621679152366"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span id="MimeType"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-var">MimeType</span></a></span></span><span> </span><span id="local-6989586621679152366"><span class="annot"><a href="#local-6989586621679152366"><span class="hs-identifier hs-type">mtype</span></a></span></span><span>  </span><span class="hs-keyword">where</span><span>
 </span><span id="line-80"></span><span>  </span><span class="hs-pragma">{-# MINIMAL</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-pragma hs-type">mimeType</span></a></span><span> </span><span class="hs-pragma">|</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeTypes"><span class="hs-pragma hs-type">mimeTypes</span></a></span><span> </span><span class="hs-pragma">#-}</span><span>
 </span><span id="line-81"></span><span>
-</span><span id="line-82"></span><span>  </span><span id="mimeTypes"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeTypes"><span class="hs-identifier hs-type">mimeTypes</span></a></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-6989586621679146134"><span class="hs-identifier hs-type">mtype</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">ME.MediaType</span></span><span class="hs-special">]</span><span>
-</span><span id="line-83"></span><span>  </span><span id="local-6989586621679146031"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeTypes"><span class="hs-identifier hs-var hs-var">mimeTypes</span></a></span><span> </span><span id="local-6989586621679146030"><span class="annot"><span class="annottext">Proxy mtype
-</span><a href="#local-6989586621679146030"><span class="hs-identifier hs-var">p</span></a></span></span><span> </span><span class="hs-glyph">=</span><span>
+</span><span id="line-82"></span><span>  </span><span id="mimeTypes"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeTypes"><span class="hs-identifier hs-type">mimeTypes</span></a></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-6989586621679152366"><span class="hs-identifier hs-type">mtype</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">ME.MediaType</span></span><span class="hs-special">]</span><span>
+</span><span id="line-83"></span><span>  </span><span id="local-6989586621679152172"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeTypes"><span class="hs-identifier hs-var hs-var">mimeTypes</span></a></span><span> </span><span id="local-6989586621679152170"><span class="annot"><span class="annottext">Proxy mtype
+</span><a href="#local-6989586621679152170"><span class="hs-identifier hs-var">p</span></a></span></span><span> </span><span class="hs-glyph">=</span><span>
 </span><span id="line-84"></span><span>    </span><span class="hs-keyword">case</span><span> </span><span class="annot"><span class="annottext">Proxy mtype -&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="annot"><span class="annottext">Proxy mtype
-</span><a href="#local-6989586621679146030"><span class="hs-identifier hs-var">p</span></a></span><span> </span><span class="hs-keyword">of</span><span>
-</span><span id="line-85"></span><span>      </span><span class="annot"><span class="hs-identifier hs-type">Just</span></span><span> </span><span id="local-6989586621679146029"><span class="annot"><span class="annottext">MediaType
-</span><a href="#local-6989586621679146029"><span class="hs-identifier hs-var">x</span></a></span></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-special">[</span><span class="annot"><span class="annottext">MediaType
-</span><a href="#local-6989586621679146029"><span class="hs-identifier hs-var">x</span></a></span><span class="hs-special">]</span><span>
+</span><a href="#local-6989586621679152170"><span class="hs-identifier hs-var">p</span></a></span><span> </span><span class="hs-keyword">of</span><span>
+</span><span id="line-85"></span><span>      </span><span class="annot"><span class="hs-identifier hs-type">Just</span></span><span> </span><span id="local-6989586621679152169"><span class="annot"><span class="annottext">MediaType
+</span><a href="#local-6989586621679152169"><span class="hs-identifier hs-var">x</span></a></span></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-special">[</span><span class="annot"><span class="annottext">MediaType
+</span><a href="#local-6989586621679152169"><span class="hs-identifier hs-var">x</span></a></span><span class="hs-special">]</span><span>
 </span><span id="line-86"></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="hs-special">[</span><span class="hs-special">]</span></span><span>
 </span><span id="line-87"></span><span>
-</span><span id="line-88"></span><span>  </span><span id="mimeType"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier hs-type">mimeType</span></a></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-6989586621679146134"><span class="hs-identifier hs-type">mtype</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"><span class="hs-identifier hs-type">ME.MediaType</span></span><span>
-</span><span id="line-89"></span><span>  </span><span id="local-6989586621679146028"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier hs-var hs-var">mimeType</span></a></span><span> </span><span id="local-6989586621679146027"><span class="annot"><span class="annottext">Proxy mtype
-</span><a href="#local-6989586621679146027"><span class="hs-identifier hs-var">p</span></a></span></span><span> </span><span class="hs-glyph">=</span><span>
+</span><span id="line-88"></span><span>  </span><span id="mimeType"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier hs-type">mimeType</span></a></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-6989586621679152366"><span class="hs-identifier hs-type">mtype</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"><span class="hs-identifier hs-type">ME.MediaType</span></span><span>
+</span><span id="line-89"></span><span>  </span><span id="local-6989586621679152168"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier hs-var hs-var">mimeType</span></a></span><span> </span><span id="local-6989586621679152166"><span class="annot"><span class="annottext">Proxy mtype
+</span><a href="#local-6989586621679152166"><span class="hs-identifier hs-var">p</span></a></span></span><span> </span><span class="hs-glyph">=</span><span>
 </span><span id="line-90"></span><span>    </span><span class="hs-keyword">case</span><span> </span><span class="annot"><span class="annottext">Proxy mtype -&gt; [MediaType]
 forall mtype. MimeType mtype =&gt; Proxy mtype -&gt; [MediaType]
 </span><a href="OpenAPIPetstore.MimeTypes.html#mimeTypes"><span class="hs-identifier hs-var">mimeTypes</span></a></span><span> </span><span class="annot"><span class="annottext">Proxy mtype
-</span><a href="#local-6989586621679146027"><span class="hs-identifier hs-var">p</span></a></span><span> </span><span class="hs-keyword">of</span><span>
+</span><a href="#local-6989586621679152166"><span class="hs-identifier hs-var">p</span></a></span><span> </span><span class="hs-keyword">of</span><span>
 </span><span id="line-91"></span><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="annottext">Maybe MediaType
 forall a. Maybe a
 </span><span class="hs-identifier hs-var">Nothing</span></span><span>
-</span><span id="line-92"></span><span>      </span><span class="hs-special">(</span><span id="local-6989586621679146026"><span class="annot"><span class="annottext">MediaType
-</span><a href="#local-6989586621679146026"><span class="hs-identifier hs-var">x</span></a></span></span><span class="annot"><span class="hs-glyph hs-type">:</span></span><span class="annot"><span class="annottext">[MediaType]
+</span><span id="line-92"></span><span>      </span><span class="hs-special">(</span><span id="local-6989586621679152165"><span class="annot"><span class="annottext">MediaType
+</span><a href="#local-6989586621679152165"><span class="hs-identifier hs-var">x</span></a></span></span><span class="annot"><span class="hs-glyph hs-type">:</span></span><span class="annot"><span class="annottext">[MediaType]
 </span><span class="hs-identifier">_</span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">MediaType -&gt; Maybe MediaType
 forall a. a -&gt; Maybe a
 </span><span class="hs-identifier hs-var">Just</span></span><span> </span><span class="annot"><span class="annottext">MediaType
-</span><a href="#local-6989586621679146026"><span class="hs-identifier hs-var">x</span></a></span></span><span>
+</span><a href="#local-6989586621679152165"><span class="hs-identifier hs-var">x</span></a></span></span><span>
 </span><span id="line-93"></span><span>
-</span><span id="line-94"></span><span>  </span><span id="mimeType%27"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeType%27"><span class="hs-identifier hs-type">mimeType'</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="#local-6989586621679146134"><span class="hs-identifier hs-type">mtype</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"><span class="hs-identifier hs-type">ME.MediaType</span></span><span>
-</span><span id="line-95"></span><span>  </span><span id="local-6989586621679146024"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeType%27"><span class="hs-identifier hs-var hs-var">mimeType'</span></a></span><span> </span><span class="annot"><span class="annottext">mtype
+</span><span id="line-94"></span><span>  </span><span id="mimeType%27"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeType%27"><span class="hs-identifier hs-type">mimeType'</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="#local-6989586621679152366"><span class="hs-identifier hs-type">mtype</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"><span class="hs-identifier hs-type">ME.MediaType</span></span><span>
+</span><span id="line-95"></span><span>  </span><span id="local-6989586621679152163"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeType%27"><span class="hs-identifier hs-var hs-var">mimeType'</span></a></span><span> </span><span class="annot"><span class="annottext">mtype
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Proxy mtype -&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 mtype
-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-6989586621679146134"><span class="hs-identifier hs-type">mtype</span></a></span><span class="hs-special">)</span></span><span>
-</span><span id="line-96"></span><span>  </span><span id="mimeTypes%27"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeTypes%27"><span class="hs-identifier hs-type">mimeTypes'</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="#local-6989586621679146134"><span class="hs-identifier hs-type">mtype</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">ME.MediaType</span></span><span class="hs-special">]</span><span>
-</span><span id="line-97"></span><span>  </span><span id="local-6989586621679146021"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeTypes%27"><span class="hs-identifier hs-var hs-var">mimeTypes'</span></a></span><span> </span><span class="annot"><span class="annottext">mtype
+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-6989586621679152366"><span class="hs-identifier hs-type">mtype</span></a></span><span class="hs-special">)</span></span><span>
+</span><span id="line-96"></span><span>  </span><span id="mimeTypes%27"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeTypes%27"><span class="hs-identifier hs-type">mimeTypes'</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="#local-6989586621679152366"><span class="hs-identifier hs-type">mtype</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">ME.MediaType</span></span><span class="hs-special">]</span><span>
+</span><span id="line-97"></span><span>  </span><span id="local-6989586621679152159"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeTypes%27"><span class="hs-identifier hs-var hs-var">mimeTypes'</span></a></span><span> </span><span class="annot"><span class="annottext">mtype
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Proxy mtype -&gt; [MediaType]
 forall mtype. MimeType mtype =&gt; Proxy mtype -&gt; [MediaType]
 </span><a href="OpenAPIPetstore.MimeTypes.html#mimeTypes"><span class="hs-identifier hs-var">mimeTypes</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Proxy mtype
-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-6989586621679146134"><span class="hs-identifier hs-type">mtype</span></a></span><span class="hs-special">)</span></span><span>
+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-6989586621679152366"><span class="hs-identifier hs-type">mtype</span></a></span><span class="hs-special">)</span></span><span>
 </span><span id="line-98"></span><span>
 </span><span id="line-99"></span><span class="hs-comment">-- Default MimeType Instances</span><span>
 </span><span id="line-100"></span><span>
 </span><span id="line-101"></span><span class="hs-comment">-- | @application/json; charset=utf-8@</span><span>
-</span><span id="line-102"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679146013"><span id="local-6989586621679146015"><span id="local-6989586621679146018"><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="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
-</span><span id="line-103"></span><span>  </span><span id="local-6989586621679146011"><span class="annot"><span class="annottext">mimeType :: Proxy MimeJSON -&gt; Maybe MediaType
-</span><a href="#local-6989586621679146011"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeJSON
+</span><span id="line-102"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679152149"><span id="local-6989586621679152151"><span id="local-6989586621679152154"><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="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
+</span><span id="line-103"></span><span>  </span><span id="local-6989586621679152145"><span class="annot"><span class="annottext">mimeType :: Proxy MimeJSON -&gt; Maybe MediaType
+</span><a href="#local-6989586621679152145"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeJSON
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">MediaType -&gt; Maybe MediaType
 forall a. a -&gt; Maybe a
 </span><span class="hs-identifier hs-var">Just</span></span><span> </span><span class="annot"><span class="annottext">(MediaType -&gt; Maybe MediaType) -&gt; MediaType -&gt; Maybe MediaType
@@ -164,9 +164,9 @@ forall a. IsString a =&gt; String -&gt; a
 </span><span class="hs-identifier hs-var">P.fromString</span></span><span> </span><span class="annot"><span class="annottext">String
 </span><span class="hs-string">&quot;application/json&quot;</span></span><span>
 </span><span id="line-104"></span><span class="hs-comment">-- | @application/xml; charset=utf-8@</span><span>
-</span><span id="line-105"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679146003"><span id="local-6989586621679146005"><span id="local-6989586621679146008"><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="OpenAPIPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier hs-type">MimeXML</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
-</span><span id="line-106"></span><span>  </span><span id="local-6989586621679146002"><span class="annot"><span class="annottext">mimeType :: Proxy MimeXML -&gt; Maybe MediaType
-</span><a href="#local-6989586621679146002"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeXML
+</span><span id="line-105"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679152136"><span id="local-6989586621679152138"><span id="local-6989586621679152141"><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="OpenAPIPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier hs-type">MimeXML</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
+</span><span id="line-106"></span><span>  </span><span id="local-6989586621679152134"><span class="annot"><span class="annottext">mimeType :: Proxy MimeXML -&gt; Maybe MediaType
+</span><a href="#local-6989586621679152134"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeXML
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">MediaType -&gt; Maybe MediaType
 forall a. a -&gt; Maybe a
 </span><span class="hs-identifier hs-var">Just</span></span><span> </span><span class="annot"><span class="annottext">(MediaType -&gt; Maybe MediaType) -&gt; MediaType -&gt; Maybe MediaType
@@ -176,9 +176,9 @@ forall a. IsString a =&gt; String -&gt; a
 </span><span class="hs-identifier hs-var">P.fromString</span></span><span> </span><span class="annot"><span class="annottext">String
 </span><span class="hs-string">&quot;application/xml&quot;</span></span><span>
 </span><span id="line-107"></span><span class="hs-comment">-- | @application/x-www-form-urlencoded@</span><span>
-</span><span id="line-108"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145994"><span id="local-6989586621679145996"><span id="local-6989586621679145999"><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="OpenAPIPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier hs-type">MimeFormUrlEncoded</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
-</span><span id="line-109"></span><span>  </span><span id="local-6989586621679145993"><span class="annot"><span class="annottext">mimeType :: Proxy MimeFormUrlEncoded -&gt; Maybe MediaType
-</span><a href="#local-6989586621679145993"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeFormUrlEncoded
+</span><span id="line-108"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679152125"><span id="local-6989586621679152127"><span id="local-6989586621679152130"><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="OpenAPIPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier hs-type">MimeFormUrlEncoded</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
+</span><span id="line-109"></span><span>  </span><span id="local-6989586621679152123"><span class="annot"><span class="annottext">mimeType :: Proxy MimeFormUrlEncoded -&gt; Maybe MediaType
+</span><a href="#local-6989586621679152123"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeFormUrlEncoded
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">MediaType -&gt; Maybe MediaType
 forall a. a -&gt; Maybe a
 </span><span class="hs-identifier hs-var">Just</span></span><span> </span><span class="annot"><span class="annottext">(MediaType -&gt; Maybe MediaType) -&gt; MediaType -&gt; Maybe MediaType
@@ -188,9 +188,9 @@ forall a. IsString a =&gt; String -&gt; a
 </span><span class="hs-identifier hs-var">P.fromString</span></span><span> </span><span class="annot"><span class="annottext">String
 </span><span class="hs-string">&quot;application/x-www-form-urlencoded&quot;</span></span><span>
 </span><span id="line-110"></span><span class="hs-comment">-- | @multipart/form-data@</span><span>
-</span><span id="line-111"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145985"><span id="local-6989586621679145987"><span id="local-6989586621679145990"><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="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
-</span><span id="line-112"></span><span>  </span><span id="local-6989586621679145984"><span class="annot"><span class="annottext">mimeType :: Proxy MimeMultipartFormData -&gt; Maybe MediaType
-</span><a href="#local-6989586621679145984"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeMultipartFormData
+</span><span id="line-111"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679152114"><span id="local-6989586621679152116"><span id="local-6989586621679152119"><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="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
+</span><span id="line-112"></span><span>  </span><span id="local-6989586621679152112"><span class="annot"><span class="annottext">mimeType :: Proxy MimeMultipartFormData -&gt; Maybe MediaType
+</span><a href="#local-6989586621679152112"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</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">MediaType -&gt; Maybe MediaType
 forall a. a -&gt; Maybe a
 </span><span class="hs-identifier hs-var">Just</span></span><span> </span><span class="annot"><span class="annottext">(MediaType -&gt; Maybe MediaType) -&gt; MediaType -&gt; Maybe MediaType
@@ -200,9 +200,9 @@ forall a. IsString a =&gt; String -&gt; a
 </span><span class="hs-identifier hs-var">P.fromString</span></span><span> </span><span class="annot"><span class="annottext">String
 </span><span class="hs-string">&quot;multipart/form-data&quot;</span></span><span>
 </span><span id="line-113"></span><span class="hs-comment">-- | @text/plain; charset=utf-8@</span><span>
-</span><span id="line-114"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145976"><span id="local-6989586621679145978"><span id="local-6989586621679145981"><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="OpenAPIPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
-</span><span id="line-115"></span><span>  </span><span id="local-6989586621679145975"><span class="annot"><span class="annottext">mimeType :: Proxy MimePlainText -&gt; Maybe MediaType
-</span><a href="#local-6989586621679145975"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimePlainText
+</span><span id="line-114"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679152103"><span id="local-6989586621679152105"><span id="local-6989586621679152108"><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="OpenAPIPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
+</span><span id="line-115"></span><span>  </span><span id="local-6989586621679152101"><span class="annot"><span class="annottext">mimeType :: Proxy MimePlainText -&gt; Maybe MediaType
+</span><a href="#local-6989586621679152101"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimePlainText
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">MediaType -&gt; Maybe MediaType
 forall a. a -&gt; Maybe a
 </span><span class="hs-identifier hs-var">Just</span></span><span> </span><span class="annot"><span class="annottext">(MediaType -&gt; Maybe MediaType) -&gt; MediaType -&gt; Maybe MediaType
@@ -212,9 +212,9 @@ forall a. IsString a =&gt; String -&gt; a
 </span><span class="hs-identifier hs-var">P.fromString</span></span><span> </span><span class="annot"><span class="annottext">String
 </span><span class="hs-string">&quot;text/plain&quot;</span></span><span>
 </span><span id="line-116"></span><span class="hs-comment">-- | @application/octet-stream@</span><span>
-</span><span id="line-117"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145967"><span id="local-6989586621679145969"><span id="local-6989586621679145972"><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="OpenAPIPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
-</span><span id="line-118"></span><span>  </span><span id="local-6989586621679145966"><span class="annot"><span class="annottext">mimeType :: Proxy MimeOctetStream -&gt; Maybe MediaType
-</span><a href="#local-6989586621679145966"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeOctetStream
+</span><span id="line-117"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679152092"><span id="local-6989586621679152094"><span id="local-6989586621679152097"><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="OpenAPIPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
+</span><span id="line-118"></span><span>  </span><span id="local-6989586621679152090"><span class="annot"><span class="annottext">mimeType :: Proxy MimeOctetStream -&gt; Maybe MediaType
+</span><a href="#local-6989586621679152090"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeOctetStream
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">MediaType -&gt; Maybe MediaType
 forall a. a -&gt; Maybe a
 </span><span class="hs-identifier hs-var">Just</span></span><span> </span><span class="annot"><span class="annottext">(MediaType -&gt; Maybe MediaType) -&gt; MediaType -&gt; Maybe MediaType
@@ -224,9 +224,9 @@ forall a. IsString a =&gt; String -&gt; a
 </span><span class="hs-identifier hs-var">P.fromString</span></span><span> </span><span class="annot"><span class="annottext">String
 </span><span class="hs-string">&quot;application/octet-stream&quot;</span></span><span>
 </span><span id="line-119"></span><span class="hs-comment">-- | @&quot;*/*&quot;@</span><span>
-</span><span id="line-120"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145958"><span id="local-6989586621679145960"><span id="local-6989586621679145963"><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="OpenAPIPetstore.MimeTypes.html#MimeAny"><span class="hs-identifier hs-type">MimeAny</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
-</span><span id="line-121"></span><span>  </span><span id="local-6989586621679145957"><span class="annot"><span class="annottext">mimeType :: Proxy MimeAny -&gt; Maybe MediaType
-</span><a href="#local-6989586621679145957"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeAny
+</span><span id="line-120"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679152081"><span id="local-6989586621679152083"><span id="local-6989586621679152086"><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="OpenAPIPetstore.MimeTypes.html#MimeAny"><span class="hs-identifier hs-type">MimeAny</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
+</span><span id="line-121"></span><span>  </span><span id="local-6989586621679152079"><span class="annot"><span class="annottext">mimeType :: Proxy MimeAny -&gt; Maybe MediaType
+</span><a href="#local-6989586621679152079"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeAny
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">MediaType -&gt; Maybe MediaType
 forall a. a -&gt; Maybe a
 </span><span class="hs-identifier hs-var">Just</span></span><span> </span><span class="annot"><span class="annottext">(MediaType -&gt; Maybe MediaType) -&gt; MediaType -&gt; Maybe MediaType
@@ -235,32 +235,32 @@ forall a b. (a -&gt; b) -&gt; a -&gt; b
 forall a. IsString a =&gt; String -&gt; a
 </span><span class="hs-identifier hs-var">P.fromString</span></span><span> </span><span class="annot"><span class="annottext">String
 </span><span class="hs-string">&quot;*/*&quot;</span></span><span>
-</span><span id="line-122"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145949"><span id="local-6989586621679145951"><span id="local-6989586621679145954"><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="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
-</span><span id="line-123"></span><span>  </span><span id="local-6989586621679145948"><span class="annot"><span class="annottext">mimeType :: Proxy MimeNoContent -&gt; Maybe MediaType
-</span><a href="#local-6989586621679145948"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeNoContent
+</span><span id="line-122"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679152070"><span id="local-6989586621679152072"><span id="local-6989586621679152075"><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="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
+</span><span id="line-123"></span><span>  </span><span id="local-6989586621679152069"><span class="annot"><span class="annottext">mimeType :: Proxy MimeNoContent -&gt; Maybe MediaType
+</span><a href="#local-6989586621679152069"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeNoContent
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Maybe MediaType
 forall a. Maybe a
 </span><span class="hs-identifier hs-var">Nothing</span></span><span>
 </span><span id="line-124"></span><span>
 </span><span id="line-125"></span><span class="hs-comment">-- * MimeRender Class</span><span>
 </span><span id="line-126"></span><span>
-</span><span id="line-127"></span><span class="hs-keyword">class</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-6989586621679146115"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span id="MimeRender"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-var">MimeRender</span></a></span></span><span> </span><span id="local-6989586621679146115"><span class="annot"><a href="#local-6989586621679146115"><span class="hs-identifier hs-type">mtype</span></a></span></span><span> </span><span id="local-6989586621679146114"><span class="annot"><a href="#local-6989586621679146114"><span class="hs-identifier hs-type">x</span></a></span></span><span> </span><span class="hs-keyword">where</span><span>
-</span><span id="line-128"></span><span>    </span><span id="mimeRender"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier hs-type">mimeRender</span></a></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-6989586621679146115"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="#local-6989586621679146114"><span class="hs-identifier hs-type">x</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 id="line-129"></span><span>    </span><span id="mimeRender%27"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender%27"><span class="hs-identifier hs-type">mimeRender'</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="#local-6989586621679146115"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="#local-6989586621679146114"><span class="hs-identifier hs-type">x</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 id="line-130"></span><span>    </span><span id="local-6989586621679145945"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender%27"><span class="hs-identifier hs-var hs-var">mimeRender'</span></a></span><span> </span><span class="annot"><span class="annottext">mtype
-</span><span class="hs-identifier">_</span></span><span> </span><span id="local-6989586621679145944"><span class="annot"><span class="annottext">x
-</span><a href="#local-6989586621679145944"><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">Proxy mtype -&gt; x -&gt; ByteString
+</span><span id="line-127"></span><span class="hs-keyword">class</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-6989586621679152356"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span id="MimeRender"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-var">MimeRender</span></a></span></span><span> </span><span id="local-6989586621679152356"><span class="annot"><a href="#local-6989586621679152356"><span class="hs-identifier hs-type">mtype</span></a></span></span><span> </span><span id="local-6989586621679152355"><span class="annot"><a href="#local-6989586621679152355"><span class="hs-identifier hs-type">x</span></a></span></span><span> </span><span class="hs-keyword">where</span><span>
+</span><span id="line-128"></span><span>    </span><span id="mimeRender"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier hs-type">mimeRender</span></a></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-6989586621679152356"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="#local-6989586621679152355"><span class="hs-identifier hs-type">x</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 id="line-129"></span><span>    </span><span id="mimeRender%27"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender%27"><span class="hs-identifier hs-type">mimeRender'</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="#local-6989586621679152356"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="#local-6989586621679152355"><span class="hs-identifier hs-type">x</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 id="line-130"></span><span>    </span><span id="local-6989586621679152064"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender%27"><span class="hs-identifier hs-var hs-var">mimeRender'</span></a></span><span> </span><span class="annot"><span class="annottext">mtype
+</span><span class="hs-identifier">_</span></span><span> </span><span id="local-6989586621679152062"><span class="annot"><span class="annottext">x
+</span><a href="#local-6989586621679152062"><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">Proxy mtype -&gt; x -&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 mtype
-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-6989586621679146115"><span class="hs-identifier hs-type">mtype</span></a></span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">x
-</span><a href="#local-6989586621679145944"><span class="hs-identifier hs-var">x</span></a></span></span><span>
+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-6989586621679152356"><span class="hs-identifier hs-type">mtype</span></a></span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">x
+</span><a href="#local-6989586621679152062"><span class="hs-identifier hs-var">x</span></a></span></span><span>
 </span><span id="line-131"></span><span>
 </span><span id="line-132"></span><span>
-</span><span id="line-133"></span><span id="local-6989586621679146096"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-type">mimeRenderDefaultMultipartFormData</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-6989586621679146096"><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-6989586621679146096"><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">BL.ByteString</span></span></span><span>
-</span><span id="line-134"></span><span id="mimeRenderDefaultMultipartFormData"><span class="annot"><span class="annottext">mimeRenderDefaultMultipartFormData :: a -&gt; ByteString
+</span><span id="line-133"></span><span id="local-6989586621679152354"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-type">mimeRenderDefaultMultipartFormData</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-6989586621679152354"><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-6989586621679152354"><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">BL.ByteString</span></span></span><span>
+</span><span id="line-134"></span><span id="mimeRenderDefaultMultipartFormData"><span class="annot"><span class="annottext">mimeRenderDefaultMultipartFormData :: forall a. ToHttpApiData a =&gt; a -&gt; ByteString
 </span><a href="OpenAPIPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var hs-var">mimeRenderDefaultMultipartFormData</span></a></span></span><span> </span><span class="hs-glyph">=</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; (a -&gt; ByteString) -&gt; a -&gt; ByteString
 forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
@@ -274,27 +274,27 @@ forall a. ToHttpApiData a =&gt; a -&gt; Text
 </span><span id="line-136"></span><span class="hs-comment">-- Default MimeRender Instances</span><span>
 </span><span id="line-137"></span><span>
 </span><span id="line-138"></span><span class="hs-comment">-- | `A.encode`</span><span>
-</span><span id="line-139"></span><span id="local-6989586621679145939"><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145935"><span class="annot"><span class="hs-identifier hs-type">A.ToJSON</span></span><span> </span><span class="annot"><a href="#local-6989586621679145939"><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.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679145939"><span class="hs-identifier hs-type">a</span></a></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145933"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeJSON -&gt; a -&gt; ByteString
-</span><a href="#local-6989586621679145933"><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 MimeJSON
+</span><span id="line-139"></span><span id="local-6989586621679152346"><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679152051"><span class="annot"><span class="hs-identifier hs-type">A.ToJSON</span></span><span> </span><span class="annot"><a href="#local-6989586621679152346"><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.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679152346"><span class="hs-identifier hs-type">a</span></a></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679152048"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeJSON -&gt; a -&gt; ByteString
+</span><a href="#local-6989586621679152048"><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 MimeJSON
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">a -&gt; ByteString
 forall a. ToJSON a =&gt; a -&gt; ByteString
 </span><span class="hs-identifier hs-var">A.encode</span></span></span><span>
 </span><span id="line-140"></span><span class="hs-comment">-- | @WH.urlEncodeAsForm@</span><span>
-</span><span id="line-141"></span><span id="local-6989586621679145931"><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145927"><span class="annot"><span class="hs-identifier hs-type">WH.ToForm</span></span><span> </span><span class="annot"><a href="#local-6989586621679145931"><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.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier hs-type">MimeFormUrlEncoded</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679145931"><span class="hs-identifier hs-type">a</span></a></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145926"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeFormUrlEncoded -&gt; a -&gt; ByteString
-</span><a href="#local-6989586621679145926"><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 MimeFormUrlEncoded
+</span><span id="line-141"></span><span id="local-6989586621679152344"><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679152042"><span class="annot"><span class="hs-identifier hs-type">WH.ToForm</span></span><span> </span><span class="annot"><a href="#local-6989586621679152344"><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.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier hs-type">MimeFormUrlEncoded</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679152344"><span class="hs-identifier hs-type">a</span></a></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679152040"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeFormUrlEncoded -&gt; a -&gt; ByteString
+</span><a href="#local-6989586621679152040"><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 MimeFormUrlEncoded
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">a -&gt; ByteString
 forall a. ToForm a =&gt; a -&gt; ByteString
 </span><span class="hs-identifier hs-var">WH.urlEncodeAsForm</span></span></span><span>
 </span><span id="line-142"></span><span>
 </span><span id="line-143"></span><span class="hs-comment">-- | @P.id@</span><span>
-</span><span id="line-144"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145921"><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#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">BL.ByteString</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145920"><span class="annot"><span class="annottext">mimeRender :: Proxy MimePlainText -&gt; ByteString -&gt; ByteString
-</span><a href="#local-6989586621679145920"><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 MimePlainText
+</span><span id="line-144"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679152034"><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#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">BL.ByteString</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679152033"><span class="annot"><span class="annottext">mimeRender :: Proxy MimePlainText -&gt; ByteString -&gt; ByteString
+</span><a href="#local-6989586621679152033"><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 MimePlainText
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">ByteString -&gt; ByteString
 forall a. a -&gt; a
 </span><span class="hs-identifier hs-var">P.id</span></span><span>
 </span><span id="line-145"></span><span class="hs-comment">-- | @BL.fromStrict . T.encodeUtf8@</span><span>
-</span><span id="line-146"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145915"><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#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">T.Text</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145914"><span class="annot"><span class="annottext">mimeRender :: Proxy MimePlainText -&gt; Text -&gt; ByteString
-</span><a href="#local-6989586621679145914"><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 MimePlainText
+</span><span id="line-146"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679152027"><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#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">T.Text</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679152026"><span class="annot"><span class="annottext">mimeRender :: Proxy MimePlainText -&gt; Text -&gt; ByteString
+</span><a href="#local-6989586621679152026"><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 MimePlainText
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</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
@@ -302,20 +302,20 @@ 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-147"></span><span class="hs-comment">-- | @BCL.pack@</span><span>
-</span><span id="line-148"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145910"><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#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">String</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145909"><span class="annot"><span class="annottext">mimeRender :: Proxy MimePlainText -&gt; String -&gt; ByteString
-</span><a href="#local-6989586621679145909"><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 MimePlainText
+</span><span id="line-148"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679152021"><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#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">String</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679152020"><span class="annot"><span class="annottext">mimeRender :: Proxy MimePlainText -&gt; String -&gt; ByteString
+</span><a href="#local-6989586621679152020"><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 MimePlainText
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; ByteString
 </span><span class="hs-identifier hs-var">BCL.pack</span></span><span>
 </span><span id="line-149"></span><span>
 </span><span id="line-150"></span><span class="hs-comment">-- | @P.id@</span><span>
-</span><span id="line-151"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145904"><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#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">BL.ByteString</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145903"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeOctetStream -&gt; ByteString -&gt; ByteString
-</span><a href="#local-6989586621679145903"><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 MimeOctetStream
+</span><span id="line-151"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679152014"><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#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">BL.ByteString</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679152013"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeOctetStream -&gt; ByteString -&gt; ByteString
+</span><a href="#local-6989586621679152013"><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 MimeOctetStream
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">ByteString -&gt; ByteString
 forall a. a -&gt; a
 </span><span class="hs-identifier hs-var">P.id</span></span><span>
 </span><span id="line-152"></span><span class="hs-comment">-- | @BL.fromStrict . T.encodeUtf8@</span><span>
-</span><span id="line-153"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145899"><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#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">T.Text</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145898"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeOctetStream -&gt; Text -&gt; ByteString
-</span><a href="#local-6989586621679145898"><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 MimeOctetStream
+</span><span id="line-153"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679152008"><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#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">T.Text</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679152007"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeOctetStream -&gt; Text -&gt; ByteString
+</span><a href="#local-6989586621679152007"><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 MimeOctetStream
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</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
@@ -323,61 +323,61 @@ 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-154"></span><span class="hs-comment">-- | @BCL.pack@</span><span>
-</span><span id="line-155"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145894"><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#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">String</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145893"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeOctetStream -&gt; String -&gt; ByteString
-</span><a href="#local-6989586621679145893"><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 MimeOctetStream
+</span><span id="line-155"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679152002"><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#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">String</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679152001"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeOctetStream -&gt; String -&gt; ByteString
+</span><a href="#local-6989586621679152001"><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 MimeOctetStream
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; ByteString
 </span><span class="hs-identifier hs-var">BCL.pack</span></span><span>
 </span><span id="line-156"></span><span>
-</span><span id="line-157"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145889"><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"><span class="hs-identifier hs-type">BL.ByteString</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145888"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -&gt; ByteString -&gt; ByteString
-</span><a href="#local-6989586621679145888"><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 id="line-157"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679151996"><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"><span class="hs-identifier hs-type">BL.ByteString</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679151995"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -&gt; ByteString -&gt; ByteString
+</span><a href="#local-6989586621679151995"><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">ByteString -&gt; ByteString
 forall a. a -&gt; a
 </span><span class="hs-identifier hs-var">P.id</span></span><span>
 </span><span id="line-158"></span><span>
-</span><span id="line-159"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145884"><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"><span class="hs-identifier hs-type">Bool</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145883"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -&gt; Bool -&gt; ByteString
-</span><a href="#local-6989586621679145883"><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 id="line-159"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679151990"><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"><span class="hs-identifier hs-type">Bool</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679151987"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -&gt; Bool -&gt; ByteString
+</span><a href="#local-6989586621679151987"><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">Bool -&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-160"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145879"><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"><span class="hs-identifier hs-type">Char</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145878"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -&gt; Char -&gt; ByteString
-</span><a href="#local-6989586621679145878"><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 id="line-160"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679151982"><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"><span class="hs-identifier hs-type">Char</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679151979"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -&gt; Char -&gt; ByteString
+</span><a href="#local-6989586621679151979"><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">Char -&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-161"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145874"><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"><span class="hs-identifier hs-type">Double</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145873"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -&gt; Double -&gt; ByteString
-</span><a href="#local-6989586621679145873"><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 id="line-161"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679151974"><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"><span class="hs-identifier hs-type">Double</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679151971"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -&gt; Double -&gt; ByteString
+</span><a href="#local-6989586621679151971"><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">Double -&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-162"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145869"><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"><span class="hs-identifier hs-type">Float</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145868"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -&gt; Float -&gt; ByteString
-</span><a href="#local-6989586621679145868"><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 id="line-162"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679151966"><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"><span class="hs-identifier hs-type">Float</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679151963"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -&gt; Float -&gt; ByteString
+</span><a href="#local-6989586621679151963"><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">Float -&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-163"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145864"><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"><span class="hs-identifier hs-type">Int</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145863"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -&gt; Int -&gt; ByteString
-</span><a href="#local-6989586621679145863"><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 id="line-163"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679151958"><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"><span class="hs-identifier hs-type">Int</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679151955"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -&gt; Int -&gt; ByteString
+</span><a href="#local-6989586621679151955"><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">Int -&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-164"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145859"><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"><span class="hs-identifier hs-type">Integer</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145858"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -&gt; Integer -&gt; ByteString
-</span><a href="#local-6989586621679145858"><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 id="line-164"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679151950"><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"><span class="hs-identifier hs-type">Integer</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679151947"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -&gt; Integer -&gt; ByteString
+</span><a href="#local-6989586621679151947"><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">Integer -&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-165"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145854"><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"><span class="hs-identifier hs-type">String</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145853"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -&gt; String -&gt; ByteString
-</span><a href="#local-6989586621679145853"><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 id="line-165"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679151942"><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"><span class="hs-identifier hs-type">String</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679151939"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -&gt; String -&gt; ByteString
+</span><a href="#local-6989586621679151939"><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">String -&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-166"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145849"><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"><span class="hs-identifier hs-type">T.Text</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145848"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -&gt; Text -&gt; ByteString
-</span><a href="#local-6989586621679145848"><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 id="line-166"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679151934"><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"><span class="hs-identifier hs-type">T.Text</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679151931"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -&gt; Text -&gt; ByteString
+</span><a href="#local-6989586621679151931"><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">Text -&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-167"></span><span>
 </span><span id="line-168"></span><span class="hs-comment">-- | @P.Right . P.const NoContent@</span><span>
-</span><span id="line-169"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145844"><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#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145843"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeNoContent -&gt; NoContent -&gt; ByteString
-</span><a href="#local-6989586621679145843"><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 MimeNoContent
+</span><span id="line-169"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679151926"><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#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679151925"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeNoContent -&gt; NoContent -&gt; ByteString
+</span><a href="#local-6989586621679151925"><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 MimeNoContent
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">ByteString -&gt; NoContent -&gt; ByteString
 forall a b. a -&gt; b -&gt; a
 </span><span class="hs-identifier hs-var">P.const</span></span><span> </span><span class="annot"><span class="annottext">ByteString
@@ -386,31 +386,31 @@ forall a b. a -&gt; b -&gt; a
 </span><span id="line-171"></span><span>
 </span><span id="line-172"></span><span class="hs-comment">-- * MimeUnrender Class</span><span>
 </span><span id="line-173"></span><span>
-</span><span id="line-174"></span><span class="hs-keyword">class</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-6989586621679146093"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span id="MimeUnrender"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-var">MimeUnrender</span></a></span></span><span> </span><span id="local-6989586621679146093"><span class="annot"><a href="#local-6989586621679146093"><span class="hs-identifier hs-type">mtype</span></a></span></span><span> </span><span id="local-6989586621679146092"><span class="annot"><a href="#local-6989586621679146092"><span class="hs-identifier hs-type">o</span></a></span></span><span> </span><span class="hs-keyword">where</span><span>
-</span><span id="line-175"></span><span>    </span><span id="mimeUnrender"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier hs-type">mimeUnrender</span></a></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-6989586621679146093"><span class="hs-identifier hs-type">mtype</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"><span class="hs-identifier hs-type">P.Either</span></span><span> </span><span class="annot"><span class="hs-identifier hs-type">String</span></span><span> </span><span class="annot"><a href="#local-6989586621679146092"><span class="hs-identifier hs-type">o</span></a></span><span>
-</span><span id="line-176"></span><span>    </span><span id="mimeUnrender%27"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender%27"><span class="hs-identifier hs-type">mimeUnrender'</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="#local-6989586621679146093"><span class="hs-identifier hs-type">mtype</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"><span class="hs-identifier hs-type">P.Either</span></span><span> </span><span class="annot"><span class="hs-identifier hs-type">String</span></span><span> </span><span class="annot"><a href="#local-6989586621679146092"><span class="hs-identifier hs-type">o</span></a></span><span>
-</span><span id="line-177"></span><span>    </span><span id="local-6989586621679145838"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender%27"><span class="hs-identifier hs-var hs-var">mimeUnrender'</span></a></span><span> </span><span class="annot"><span class="annottext">mtype
-</span><span class="hs-identifier">_</span></span><span> </span><span id="local-6989586621679145837"><span class="annot"><span class="annottext">ByteString
-</span><a href="#local-6989586621679145837"><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">Proxy mtype -&gt; ByteString -&gt; Either String o
+</span><span id="line-174"></span><span class="hs-keyword">class</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-6989586621679152339"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span id="MimeUnrender"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-var">MimeUnrender</span></a></span></span><span> </span><span id="local-6989586621679152339"><span class="annot"><a href="#local-6989586621679152339"><span class="hs-identifier hs-type">mtype</span></a></span></span><span> </span><span id="local-6989586621679152338"><span class="annot"><a href="#local-6989586621679152338"><span class="hs-identifier hs-type">o</span></a></span></span><span> </span><span class="hs-keyword">where</span><span>
+</span><span id="line-175"></span><span>    </span><span id="mimeUnrender"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier hs-type">mimeUnrender</span></a></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-6989586621679152339"><span class="hs-identifier hs-type">mtype</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"><span class="hs-identifier hs-type">P.Either</span></span><span> </span><span class="annot"><span class="hs-identifier hs-type">String</span></span><span> </span><span class="annot"><a href="#local-6989586621679152338"><span class="hs-identifier hs-type">o</span></a></span><span>
+</span><span id="line-176"></span><span>    </span><span id="mimeUnrender%27"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender%27"><span class="hs-identifier hs-type">mimeUnrender'</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="#local-6989586621679152339"><span class="hs-identifier hs-type">mtype</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"><span class="hs-identifier hs-type">P.Either</span></span><span> </span><span class="annot"><span class="hs-identifier hs-type">String</span></span><span> </span><span class="annot"><a href="#local-6989586621679152338"><span class="hs-identifier hs-type">o</span></a></span><span>
+</span><span id="line-177"></span><span>    </span><span id="local-6989586621679151918"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender%27"><span class="hs-identifier hs-var hs-var">mimeUnrender'</span></a></span><span> </span><span class="annot"><span class="annottext">mtype
+</span><span class="hs-identifier">_</span></span><span> </span><span id="local-6989586621679151916"><span class="annot"><span class="annottext">ByteString
+</span><a href="#local-6989586621679151916"><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">Proxy mtype -&gt; ByteString -&gt; Either String o
 forall mtype o.
 MimeUnrender mtype o =&gt;
 Proxy mtype -&gt; ByteString -&gt; Either String o
 </span><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier hs-var">mimeUnrender</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Proxy mtype
-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-6989586621679146093"><span class="hs-identifier hs-type">mtype</span></a></span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">ByteString
-</span><a href="#local-6989586621679145837"><span class="hs-identifier hs-var">x</span></a></span></span><span>
+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-6989586621679152339"><span class="hs-identifier hs-type">mtype</span></a></span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">ByteString
+</span><a href="#local-6989586621679151916"><span class="hs-identifier hs-var">x</span></a></span></span><span>
 </span><span id="line-178"></span><span>
 </span><span id="line-179"></span><span class="hs-comment">-- Default MimeUnrender Instances</span><span>
 </span><span id="line-180"></span><span>
 </span><span id="line-181"></span><span class="hs-comment">-- | @A.eitherDecode@</span><span>
-</span><span id="line-182"></span><span id="local-6989586621679145836"><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145832"><span class="annot"><span class="hs-identifier hs-type">A.FromJSON</span></span><span> </span><span class="annot"><a href="#local-6989586621679145836"><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.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679145836"><span class="hs-identifier hs-type">a</span></a></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145830"><span class="annot"><span class="annottext">mimeUnrender :: Proxy MimeJSON -&gt; ByteString -&gt; Either String a
-</span><a href="#local-6989586621679145830"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeUnrender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeJSON
+</span><span id="line-182"></span><span id="local-6989586621679152337"><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679151911"><span class="annot"><span class="hs-identifier hs-type">A.FromJSON</span></span><span> </span><span class="annot"><a href="#local-6989586621679152337"><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.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679152337"><span class="hs-identifier hs-type">a</span></a></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679151908"><span class="annot"><span class="annottext">mimeUnrender :: Proxy MimeJSON -&gt; ByteString -&gt; Either String a
+</span><a href="#local-6989586621679151908"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeUnrender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeJSON
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">ByteString -&gt; Either String a
 forall a. FromJSON a =&gt; ByteString -&gt; Either String a
 </span><span class="hs-identifier hs-var">A.eitherDecode</span></span></span><span>
 </span><span id="line-183"></span><span class="hs-comment">-- | @P.left T.unpack . WH.urlDecodeAsForm@</span><span>
-</span><span id="line-184"></span><span id="local-6989586621679145828"><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145824"><span class="annot"><span class="hs-identifier hs-type">WH.FromForm</span></span><span> </span><span class="annot"><a href="#local-6989586621679145828"><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.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier hs-type">MimeFormUrlEncoded</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679145828"><span class="hs-identifier hs-type">a</span></a></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145823"><span class="annot"><span class="annottext">mimeUnrender :: Proxy MimeFormUrlEncoded -&gt; ByteString -&gt; Either String a
-</span><a href="#local-6989586621679145823"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeUnrender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeFormUrlEncoded
+</span><span id="line-184"></span><span id="local-6989586621679152335"><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679151902"><span class="annot"><span class="hs-identifier hs-type">WH.FromForm</span></span><span> </span><span class="annot"><a href="#local-6989586621679152335"><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.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier hs-type">MimeFormUrlEncoded</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679152335"><span class="hs-identifier hs-type">a</span></a></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679151898"><span class="annot"><span class="annottext">mimeUnrender :: Proxy MimeFormUrlEncoded -&gt; ByteString -&gt; Either String a
+</span><a href="#local-6989586621679151898"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeUnrender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeFormUrlEncoded
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">(Text -&gt; String) -&gt; Either Text a -&gt; Either String a
 forall (a :: * -&gt; * -&gt; *) b c d.
 ArrowChoice a =&gt;
@@ -424,8 +424,8 @@ forall a. FromForm a =&gt; ByteString -&gt; Either Text a
 </span><span class="hs-identifier hs-var">WH.urlDecodeAsForm</span></span></span><span>
 </span><span id="line-185"></span><span class="hs-comment">-- | @P.Right . P.id@</span><span>
 </span><span id="line-186"></span><span>
-</span><span id="line-187"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145817"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">BL.ByteString</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145816"><span class="annot"><span class="annottext">mimeUnrender :: Proxy MimePlainText -&gt; ByteString -&gt; Either String ByteString
-</span><a href="#local-6989586621679145816"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeUnrender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimePlainText
+</span><span id="line-187"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679151891"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">BL.ByteString</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679151890"><span class="annot"><span class="annottext">mimeUnrender :: Proxy MimePlainText -&gt; ByteString -&gt; Either String ByteString
+</span><a href="#local-6989586621679151890"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeUnrender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimePlainText
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">ByteString -&gt; Either String ByteString
 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">(ByteString -&gt; Either String ByteString)
@@ -437,8 +437,8 @@ forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
 forall a. a -&gt; a
 </span><span class="hs-identifier hs-var">P.id</span></span><span>
 </span><span id="line-188"></span><span class="hs-comment">-- | @P.left P.show . TL.decodeUtf8'@</span><span>
-</span><span id="line-189"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145812"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">T.Text</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145811"><span class="annot"><span class="annottext">mimeUnrender :: Proxy MimePlainText -&gt; ByteString -&gt; Either String Text
-</span><a href="#local-6989586621679145811"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeUnrender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimePlainText
+</span><span id="line-189"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679151885"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">T.Text</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679151881"><span class="annot"><span class="annottext">mimeUnrender :: Proxy MimePlainText -&gt; ByteString -&gt; Either String Text
+</span><a href="#local-6989586621679151881"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeUnrender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimePlainText
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">(UnicodeException -&gt; String)
 -&gt; Either UnicodeException Text -&gt; Either String Text
 forall (a :: * -&gt; * -&gt; *) b c d.
@@ -460,8 +460,8 @@ 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 id="line-190"></span><span class="hs-comment">-- | @P.Right . BCL.unpack@</span><span>
-</span><span id="line-191"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145804"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">String</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145803"><span class="annot"><span class="annottext">mimeUnrender :: Proxy MimePlainText -&gt; ByteString -&gt; Either String String
-</span><a href="#local-6989586621679145803"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeUnrender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimePlainText
+</span><span id="line-191"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679151873"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">String</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679151872"><span class="annot"><span class="annottext">mimeUnrender :: Proxy MimePlainText -&gt; ByteString -&gt; Either String String
+</span><a href="#local-6989586621679151872"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeUnrender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimePlainText
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; Either String String
 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">(String -&gt; Either String String)
@@ -471,8 +471,8 @@ forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
 </span><span class="hs-identifier hs-var">BCL.unpack</span></span><span>
 </span><span id="line-192"></span><span>
 </span><span id="line-193"></span><span class="hs-comment">-- | @P.Right . P.id@</span><span>
-</span><span id="line-194"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145798"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">BL.ByteString</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145797"><span class="annot"><span class="annottext">mimeUnrender :: Proxy MimeOctetStream -&gt; ByteString -&gt; Either String ByteString
-</span><a href="#local-6989586621679145797"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeUnrender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeOctetStream
+</span><span id="line-194"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679151866"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">BL.ByteString</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679151865"><span class="annot"><span class="annottext">mimeUnrender :: Proxy MimeOctetStream -&gt; ByteString -&gt; Either String ByteString
+</span><a href="#local-6989586621679151865"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeUnrender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeOctetStream
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">ByteString -&gt; Either String ByteString
 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">(ByteString -&gt; Either String ByteString)
@@ -484,8 +484,8 @@ forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
 forall a. a -&gt; a
 </span><span class="hs-identifier hs-var">P.id</span></span><span>
 </span><span id="line-195"></span><span class="hs-comment">-- | @P.left P.show . T.decodeUtf8' . BL.toStrict@</span><span>
-</span><span id="line-196"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145793"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">T.Text</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145792"><span class="annot"><span class="annottext">mimeUnrender :: Proxy MimeOctetStream -&gt; ByteString -&gt; Either String Text
-</span><a href="#local-6989586621679145792"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeUnrender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeOctetStream
+</span><span id="line-196"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679151860"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">T.Text</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679151857"><span class="annot"><span class="annottext">mimeUnrender :: Proxy MimeOctetStream -&gt; ByteString -&gt; Either String Text
+</span><a href="#local-6989586621679151857"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeUnrender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeOctetStream
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">(UnicodeException -&gt; String)
 -&gt; Either UnicodeException Text -&gt; Either String Text
 forall (a :: * -&gt; * -&gt; *) b c d.
@@ -507,8 +507,8 @@ 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 id="line-197"></span><span class="hs-comment">-- | @P.Right . BCL.unpack@</span><span>
-</span><span id="line-198"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145788"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">String</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145787"><span class="annot"><span class="annottext">mimeUnrender :: Proxy MimeOctetStream -&gt; ByteString -&gt; Either String String
-</span><a href="#local-6989586621679145787"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeUnrender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeOctetStream
+</span><span id="line-198"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679151852"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">String</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679151851"><span class="annot"><span class="annottext">mimeUnrender :: Proxy MimeOctetStream -&gt; ByteString -&gt; Either String String
+</span><a href="#local-6989586621679151851"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeUnrender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeOctetStream
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; Either String String
 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">(String -&gt; Either String String)
@@ -518,8 +518,8 @@ forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
 </span><span class="hs-identifier hs-var">BCL.unpack</span></span><span>
 </span><span id="line-199"></span><span>
 </span><span id="line-200"></span><span class="hs-comment">-- | @P.Right . P.const NoContent@</span><span>
-</span><span id="line-201"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145783"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145782"><span class="annot"><span class="annottext">mimeUnrender :: Proxy MimeNoContent -&gt; ByteString -&gt; Either String NoContent
-</span><a href="#local-6989586621679145782"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeUnrender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeNoContent
+</span><span id="line-201"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679151846"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679151845"><span class="annot"><span class="annottext">mimeUnrender :: Proxy MimeNoContent -&gt; ByteString -&gt; Either String NoContent
+</span><a href="#local-6989586621679151845"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeUnrender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeNoContent
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">NoContent -&gt; Either String NoContent
 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">(NoContent -&gt; Either String NoContent)
@@ -540,9 +540,9 @@ forall a b. a -&gt; b -&gt; a
 </span><span id="line-208"></span><span class="hs-keyword">data</span><span> </span><span id="MimeXmlCharsetutf16"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeXmlCharsetutf16"><span class="hs-identifier hs-var">MimeXmlCharsetutf16</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span id="MimeXmlCharsetutf16"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeXmlCharsetutf16"><span class="hs-identifier hs-var">MimeXmlCharsetutf16</span></a></span></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-209"></span><span>
 </span><span id="line-210"></span><span class="hs-comment">-- | @application/xml; charset=utf-16@</span><span>
-</span><span id="line-211"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145773"><span id="local-6989586621679145775"><span id="local-6989586621679145778"><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="OpenAPIPetstore.MimeTypes.html#MimeXmlCharsetutf16"><span class="hs-identifier hs-type">MimeXmlCharsetutf16</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
-</span><span id="line-212"></span><span>  </span><span id="local-6989586621679145772"><span class="annot"><span class="annottext">mimeType :: Proxy MimeXmlCharsetutf16 -&gt; Maybe MediaType
-</span><a href="#local-6989586621679145772"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeXmlCharsetutf16
+</span><span id="line-211"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679151835"><span id="local-6989586621679151837"><span id="local-6989586621679151840"><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="OpenAPIPetstore.MimeTypes.html#MimeXmlCharsetutf16"><span class="hs-identifier hs-type">MimeXmlCharsetutf16</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
+</span><span id="line-212"></span><span>  </span><span id="local-6989586621679151833"><span class="annot"><span class="annottext">mimeType :: Proxy MimeXmlCharsetutf16 -&gt; Maybe MediaType
+</span><a href="#local-6989586621679151833"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeXmlCharsetutf16
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">MediaType -&gt; Maybe MediaType
 forall a. a -&gt; Maybe a
 </span><span class="hs-identifier hs-var">Just</span></span><span> </span><span class="annot"><span class="annottext">(MediaType -&gt; Maybe MediaType) -&gt; MediaType -&gt; Maybe MediaType
@@ -559,9 +559,9 @@ forall a. IsString a =&gt; String -&gt; a
 </span><span id="line-218"></span><span class="hs-keyword">data</span><span> </span><span id="MimeXmlCharsetutf8"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeXmlCharsetutf8"><span class="hs-identifier hs-var">MimeXmlCharsetutf8</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span id="MimeXmlCharsetutf8"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeXmlCharsetutf8"><span class="hs-identifier hs-var">MimeXmlCharsetutf8</span></a></span></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-219"></span><span>
 </span><span id="line-220"></span><span class="hs-comment">-- | @application/xml; charset=utf-8@</span><span>
-</span><span id="line-221"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145763"><span id="local-6989586621679145765"><span id="local-6989586621679145768"><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="OpenAPIPetstore.MimeTypes.html#MimeXmlCharsetutf8"><span class="hs-identifier hs-type">MimeXmlCharsetutf8</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
-</span><span id="line-222"></span><span>  </span><span id="local-6989586621679145762"><span class="annot"><span class="annottext">mimeType :: Proxy MimeXmlCharsetutf8 -&gt; Maybe MediaType
-</span><a href="#local-6989586621679145762"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeXmlCharsetutf8
+</span><span id="line-221"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679151823"><span id="local-6989586621679151825"><span id="local-6989586621679151828"><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="OpenAPIPetstore.MimeTypes.html#MimeXmlCharsetutf8"><span class="hs-identifier hs-type">MimeXmlCharsetutf8</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
+</span><span id="line-222"></span><span>  </span><span id="local-6989586621679151821"><span class="annot"><span class="annottext">mimeType :: Proxy MimeXmlCharsetutf8 -&gt; Maybe MediaType
+</span><a href="#local-6989586621679151821"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeXmlCharsetutf8
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">MediaType -&gt; Maybe MediaType
 forall a. a -&gt; Maybe a
 </span><span class="hs-identifier hs-var">Just</span></span><span> </span><span class="annot"><span class="annottext">(MediaType -&gt; Maybe MediaType) -&gt; MediaType -&gt; Maybe MediaType
@@ -578,9 +578,9 @@ forall a. IsString a =&gt; String -&gt; a
 </span><span id="line-228"></span><span class="hs-keyword">data</span><span> </span><span id="MimeTextXml"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeTextXml"><span class="hs-identifier hs-var">MimeTextXml</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span id="MimeTextXml"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeTextXml"><span class="hs-identifier hs-var">MimeTextXml</span></a></span></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-229"></span><span>
 </span><span id="line-230"></span><span class="hs-comment">-- | @text/xml@</span><span>
-</span><span id="line-231"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145753"><span id="local-6989586621679145755"><span id="local-6989586621679145758"><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="OpenAPIPetstore.MimeTypes.html#MimeTextXml"><span class="hs-identifier hs-type">MimeTextXml</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
-</span><span id="line-232"></span><span>  </span><span id="local-6989586621679145752"><span class="annot"><span class="annottext">mimeType :: Proxy MimeTextXml -&gt; Maybe MediaType
-</span><a href="#local-6989586621679145752"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeTextXml
+</span><span id="line-231"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679151811"><span id="local-6989586621679151813"><span id="local-6989586621679151816"><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="OpenAPIPetstore.MimeTypes.html#MimeTextXml"><span class="hs-identifier hs-type">MimeTextXml</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
+</span><span id="line-232"></span><span>  </span><span id="local-6989586621679151809"><span class="annot"><span class="annottext">mimeType :: Proxy MimeTextXml -&gt; Maybe MediaType
+</span><a href="#local-6989586621679151809"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeTextXml
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">MediaType -&gt; Maybe MediaType
 forall a. a -&gt; Maybe a
 </span><span class="hs-identifier hs-var">Just</span></span><span> </span><span class="annot"><span class="annottext">(MediaType -&gt; Maybe MediaType) -&gt; MediaType -&gt; Maybe MediaType
@@ -597,9 +597,9 @@ forall a. IsString a =&gt; String -&gt; a
 </span><span id="line-238"></span><span class="hs-keyword">data</span><span> </span><span id="MimeTextXmlCharsetutf16"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeTextXmlCharsetutf16"><span class="hs-identifier hs-var">MimeTextXmlCharsetutf16</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span id="MimeTextXmlCharsetutf16"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeTextXmlCharsetutf16"><span class="hs-identifier hs-var">MimeTextXmlCharsetutf16</span></a></span></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-239"></span><span>
 </span><span id="line-240"></span><span class="hs-comment">-- | @text/xml; charset=utf-16@</span><span>
-</span><span id="line-241"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145743"><span id="local-6989586621679145745"><span id="local-6989586621679145748"><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="OpenAPIPetstore.MimeTypes.html#MimeTextXmlCharsetutf16"><span class="hs-identifier hs-type">MimeTextXmlCharsetutf16</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
-</span><span id="line-242"></span><span>  </span><span id="local-6989586621679145742"><span class="annot"><span class="annottext">mimeType :: Proxy MimeTextXmlCharsetutf16 -&gt; Maybe MediaType
-</span><a href="#local-6989586621679145742"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeTextXmlCharsetutf16
+</span><span id="line-241"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679151799"><span id="local-6989586621679151801"><span id="local-6989586621679151804"><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="OpenAPIPetstore.MimeTypes.html#MimeTextXmlCharsetutf16"><span class="hs-identifier hs-type">MimeTextXmlCharsetutf16</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
+</span><span id="line-242"></span><span>  </span><span id="local-6989586621679151797"><span class="annot"><span class="annottext">mimeType :: Proxy MimeTextXmlCharsetutf16 -&gt; Maybe MediaType
+</span><a href="#local-6989586621679151797"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeTextXmlCharsetutf16
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">MediaType -&gt; Maybe MediaType
 forall a. a -&gt; Maybe a
 </span><span class="hs-identifier hs-var">Just</span></span><span> </span><span class="annot"><span class="annottext">(MediaType -&gt; Maybe MediaType) -&gt; MediaType -&gt; Maybe MediaType
@@ -616,9 +616,9 @@ forall a. IsString a =&gt; String -&gt; a
 </span><span id="line-248"></span><span class="hs-keyword">data</span><span> </span><span id="MimeTextXmlCharsetutf8"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeTextXmlCharsetutf8"><span class="hs-identifier hs-var">MimeTextXmlCharsetutf8</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span id="MimeTextXmlCharsetutf8"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeTextXmlCharsetutf8"><span class="hs-identifier hs-var">MimeTextXmlCharsetutf8</span></a></span></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-249"></span><span>
 </span><span id="line-250"></span><span class="hs-comment">-- | @text/xml; charset=utf-8@</span><span>
-</span><span id="line-251"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145733"><span id="local-6989586621679145735"><span id="local-6989586621679145738"><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="OpenAPIPetstore.MimeTypes.html#MimeTextXmlCharsetutf8"><span class="hs-identifier hs-type">MimeTextXmlCharsetutf8</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
-</span><span id="line-252"></span><span>  </span><span id="local-6989586621679145732"><span class="annot"><span class="annottext">mimeType :: Proxy MimeTextXmlCharsetutf8 -&gt; Maybe MediaType
-</span><a href="#local-6989586621679145732"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeTextXmlCharsetutf8
+</span><span id="line-251"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679151787"><span id="local-6989586621679151789"><span id="local-6989586621679151792"><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="OpenAPIPetstore.MimeTypes.html#MimeTextXmlCharsetutf8"><span class="hs-identifier hs-type">MimeTextXmlCharsetutf8</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
+</span><span id="line-252"></span><span>  </span><span id="local-6989586621679151785"><span class="annot"><span class="annottext">mimeType :: Proxy MimeTextXmlCharsetutf8 -&gt; Maybe MediaType
+</span><a href="#local-6989586621679151785"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeTextXmlCharsetutf8
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">MediaType -&gt; Maybe MediaType
 forall a. a -&gt; Maybe a
 </span><span class="hs-identifier hs-var">Just</span></span><span> </span><span class="annot"><span class="annottext">(MediaType -&gt; Maybe MediaType) -&gt; MediaType -&gt; Maybe MediaType

samples/client/petstore/haskell-http-client/docs/src/Paths_openapi_petstore.html

@@ -1,21 +1,22 @@
 <!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 class="hs-pragma">{-# LANGUAGE CPP #-}</span><span>
 </span><span id="line-2"></span><span class="hs-pragma">{-# LANGUAGE NoRebindableSyntax #-}</span><span>
 </span><span id="line-3"></span><span class="hs-pragma">{-# OPTIONS_GHC -fno-warn-missing-import-lists #-}</span><span>
-</span><span id="line-4"></span><span class="hs-keyword">module</span><span> </span><span class="hs-identifier">Paths_openapi_petstore</span><span> </span><span class="hs-special">(</span><span>
-</span><span id="line-5"></span><span>    </span><span class="annot"><a href="Paths_openapi_petstore.html#version"><span class="hs-identifier">version</span></a></span><span class="hs-special">,</span><span>
-</span><span id="line-6"></span><span>    </span><span class="annot"><a href="Paths_openapi_petstore.html#getBinDir"><span class="hs-identifier">getBinDir</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="Paths_openapi_petstore.html#getLibDir"><span class="hs-identifier">getLibDir</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="Paths_openapi_petstore.html#getDynLibDir"><span class="hs-identifier">getDynLibDir</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="Paths_openapi_petstore.html#getDataDir"><span class="hs-identifier">getDataDir</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="Paths_openapi_petstore.html#getLibexecDir"><span class="hs-identifier">getLibexecDir</span></a></span><span class="hs-special">,</span><span>
-</span><span id="line-7"></span><span>    </span><span class="annot"><a href="Paths_openapi_petstore.html#getDataFileName"><span class="hs-identifier">getDataFileName</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="Paths_openapi_petstore.html#getSysconfDir"><span class="hs-identifier">getSysconfDir</span></a></span><span>
-</span><span id="line-8"></span><span>  </span><span class="hs-special">)</span><span> </span><span class="hs-keyword">where</span><span>
-</span><span id="line-9"></span><span>
-</span><span id="line-10"></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</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">Exception</span></span><span>
-</span><span id="line-11"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><span class="hs-identifier">Data.Version</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier">Version</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-12"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><span class="hs-identifier">System.Environment</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier">getEnv</span></span><span class="hs-special">)</span><span>
-</span><span id="line-13"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><span class="hs-identifier">Prelude</span></span><span class="hs-cpp">
+</span><span id="line-4"></span><span class="hs-pragma">{-# OPTIONS_GHC -Wno-missing-safe-haskell-mode #-}</span><span>
+</span><span id="line-5"></span><span class="hs-keyword">module</span><span> </span><span class="hs-identifier">Paths_openapi_petstore</span><span> </span><span class="hs-special">(</span><span>
+</span><span id="line-6"></span><span>    </span><span class="annot"><a href="Paths_openapi_petstore.html#version"><span class="hs-identifier">version</span></a></span><span class="hs-special">,</span><span>
+</span><span id="line-7"></span><span>    </span><span class="annot"><a href="Paths_openapi_petstore.html#getBinDir"><span class="hs-identifier">getBinDir</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="Paths_openapi_petstore.html#getLibDir"><span class="hs-identifier">getLibDir</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="Paths_openapi_petstore.html#getDynLibDir"><span class="hs-identifier">getDynLibDir</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="Paths_openapi_petstore.html#getDataDir"><span class="hs-identifier">getDataDir</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="Paths_openapi_petstore.html#getLibexecDir"><span class="hs-identifier">getLibexecDir</span></a></span><span class="hs-special">,</span><span>
+</span><span id="line-8"></span><span>    </span><span class="annot"><a href="Paths_openapi_petstore.html#getDataFileName"><span class="hs-identifier">getDataFileName</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="Paths_openapi_petstore.html#getSysconfDir"><span class="hs-identifier">getSysconfDir</span></a></span><span>
+</span><span id="line-9"></span><span>  </span><span class="hs-special">)</span><span> </span><span class="hs-keyword">where</span><span>
+</span><span id="line-10"></span><span>
+</span><span id="line-11"></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</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">Exception</span></span><span>
+</span><span id="line-12"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><span class="hs-identifier">Data.Version</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier">Version</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-13"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><span class="hs-identifier">System.Environment</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier">getEnv</span></span><span class="hs-special">)</span><span>
+</span><span id="line-14"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><span class="hs-identifier">Prelude</span></span><span class="hs-cpp">
 
 #if defined(VERSION_base)
 </span><span class="hs-cpp">
 #if MIN_VERSION_base(4,0,0)
-</span><span id="local-6989586621679155428"><span class="annot"><a href="Paths_openapi_petstore.html#catchIO"><span class="hs-identifier hs-type">catchIO</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="#local-6989586621679155428"><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">Exception.IOException</span></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="#local-6989586621679155428"><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">IO</span></span><span> </span><span class="annot"><a href="#local-6989586621679155428"><span class="hs-identifier hs-type">a</span></a></span></span><span class="hs-cpp">
+</span><span id="local-6989586621679167509"><span class="annot"><a href="Paths_openapi_petstore.html#catchIO"><span class="hs-identifier hs-type">catchIO</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="#local-6989586621679167509"><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">Exception.IOException</span></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="#local-6989586621679167509"><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">IO</span></span><span> </span><span class="annot"><a href="#local-6989586621679167509"><span class="hs-identifier hs-type">a</span></a></span></span><span class="hs-cpp">
 #else
 </span><span class="hs-identifier">catchIO</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier">IO</span><span> </span><span class="hs-identifier">a</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-special">(</span><span class="hs-identifier">Exception.Exception</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier">IO</span><span> </span><span class="hs-identifier">a</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier">IO</span><span> </span><span class="hs-identifier">a</span><span class="hs-cpp">
 #endif
@@ -23,42 +24,42 @@
 #else
 </span><span class="hs-identifier">catchIO</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier">IO</span><span> </span><span class="hs-identifier">a</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-special">(</span><span class="hs-identifier">Exception.IOException</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier">IO</span><span> </span><span class="hs-identifier">a</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier">IO</span><span> </span><span class="hs-identifier">a</span><span class="hs-cpp">
 #endif
-</span><span id="catchIO"><span class="annot"><span class="annottext">catchIO :: IO a -&gt; (IOException -&gt; IO a) -&gt; IO a
+</span><span id="catchIO"><span class="annot"><span class="annottext">catchIO :: forall a. IO a -&gt; (IOException -&gt; IO a) -&gt; IO a
 </span><a href="Paths_openapi_petstore.html#catchIO"><span class="hs-identifier hs-var hs-var">catchIO</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">IO a -&gt; (IOException -&gt; IO a) -&gt; IO a
 forall e a. Exception e =&gt; IO a -&gt; (e -&gt; IO a) -&gt; IO a
 </span><span class="hs-identifier hs-var">Exception.catch</span></span><span>
-</span><span id="line-27"></span><span>
-</span><span id="line-28"></span><span class="annot"><a href="Paths_openapi_petstore.html#version"><span class="hs-identifier hs-type">version</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">Version</span></span><span>
-</span><span id="line-29"></span><span id="version"><span class="annot"><span class="annottext">version :: Version
+</span><span id="line-28"></span><span>
+</span><span id="line-29"></span><span class="annot"><a href="Paths_openapi_petstore.html#version"><span class="hs-identifier hs-type">version</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">Version</span></span><span>
+</span><span id="line-30"></span><span id="version"><span class="annot"><span class="annottext">version :: Version
 </span><a href="Paths_openapi_petstore.html#version"><span class="hs-identifier hs-var hs-var">version</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">[Int] -&gt; [String] -&gt; Version
 </span><span class="hs-identifier hs-var">Version</span></span><span> </span><span class="hs-special">[</span><span class="annot"><span class="annottext">Int
 </span><span class="hs-number">0</span></span><span class="hs-special">,</span><span class="annot"><span class="annottext">Int
 </span><span class="hs-number">1</span></span><span class="hs-special">,</span><span class="annot"><span class="annottext">Int
 </span><span class="hs-number">0</span></span><span class="hs-special">,</span><span class="annot"><span class="annottext">Int
 </span><span class="hs-number">0</span></span><span class="hs-special">]</span><span> </span><span class="hs-special">[</span><span class="hs-special">]</span><span>
-</span><span id="line-30"></span><span class="annot"><a href="Paths_openapi_petstore.html#bindir"><span class="hs-identifier hs-type">bindir</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="Paths_openapi_petstore.html#libdir"><span class="hs-identifier hs-type">libdir</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="Paths_openapi_petstore.html#dynlibdir"><span class="hs-identifier hs-type">dynlibdir</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="Paths_openapi_petstore.html#datadir"><span class="hs-identifier hs-type">datadir</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="Paths_openapi_petstore.html#libexecdir"><span class="hs-identifier hs-type">libexecdir</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="Paths_openapi_petstore.html#sysconfdir"><span class="hs-identifier hs-type">sysconfdir</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">FilePath</span></span><span>
-</span><span id="line-31"></span><span>
-</span><span id="line-32"></span><span id="bindir"><span class="annot"><span class="annottext">bindir :: String
+</span><span id="line-31"></span><span class="annot"><a href="Paths_openapi_petstore.html#bindir"><span class="hs-identifier hs-type">bindir</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="Paths_openapi_petstore.html#libdir"><span class="hs-identifier hs-type">libdir</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="Paths_openapi_petstore.html#dynlibdir"><span class="hs-identifier hs-type">dynlibdir</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="Paths_openapi_petstore.html#datadir"><span class="hs-identifier hs-type">datadir</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="Paths_openapi_petstore.html#libexecdir"><span class="hs-identifier hs-type">libexecdir</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="Paths_openapi_petstore.html#sysconfdir"><span class="hs-identifier hs-type">sysconfdir</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">FilePath</span></span><span>
+</span><span id="line-32"></span><span>
+</span><span id="line-33"></span><span id="bindir"><span class="annot"><span class="annottext">bindir :: String
 </span><a href="Paths_openapi_petstore.html#bindir"><span class="hs-identifier hs-var hs-var">bindir</span></a></span></span><span>     </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
-</span><span class="hs-string">&quot;/home/jon/fs/git/openapi-generator/samples/client/petstore/haskell-http-client/.stack-work/install/x86_64-linux-tinfo6/c2d06f167ed22c3aeac6ab338dd025e6d4619b0164253f553a46d24aab5989bd/8.10.7/bin&quot;</span></span><span>
-</span><span id="line-33"></span><span id="libdir"><span class="annot"><span class="annottext">libdir :: String
+</span><span class="hs-string">&quot;/home/jon/fs/git/openapi-generator/samples/client/petstore/haskell-http-client/.stack-work/install/x86_64-linux-tinfo6/2f9e8e6d6a0225b440573e2ade8cf024ba1ae60293b2eb0dca9acdb6bef1c3d4/9.0.2/bin&quot;</span></span><span>
+</span><span id="line-34"></span><span id="libdir"><span class="annot"><span class="annottext">libdir :: String
 </span><a href="Paths_openapi_petstore.html#libdir"><span class="hs-identifier hs-var hs-var">libdir</span></a></span></span><span>     </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
-</span><span class="hs-string">&quot;/home/jon/fs/git/openapi-generator/samples/client/petstore/haskell-http-client/.stack-work/install/x86_64-linux-tinfo6/c2d06f167ed22c3aeac6ab338dd025e6d4619b0164253f553a46d24aab5989bd/8.10.7/lib/x86_64-linux-ghc-8.10.7/openapi-petstore-0.1.0.0-KK0a84V9cgE7ifsb9ACXB1&quot;</span></span><span>
-</span><span id="line-34"></span><span id="dynlibdir"><span class="annot"><span class="annottext">dynlibdir :: String
+</span><span class="hs-string">&quot;/home/jon/fs/git/openapi-generator/samples/client/petstore/haskell-http-client/.stack-work/install/x86_64-linux-tinfo6/2f9e8e6d6a0225b440573e2ade8cf024ba1ae60293b2eb0dca9acdb6bef1c3d4/9.0.2/lib/x86_64-linux-ghc-9.0.2/openapi-petstore-0.1.0.0-LfIoi9irso0DTsv4QrcEur&quot;</span></span><span>
+</span><span id="line-35"></span><span id="dynlibdir"><span class="annot"><span class="annottext">dynlibdir :: String
 </span><a href="Paths_openapi_petstore.html#dynlibdir"><span class="hs-identifier hs-var hs-var">dynlibdir</span></a></span></span><span>  </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
-</span><span class="hs-string">&quot;/home/jon/fs/git/openapi-generator/samples/client/petstore/haskell-http-client/.stack-work/install/x86_64-linux-tinfo6/c2d06f167ed22c3aeac6ab338dd025e6d4619b0164253f553a46d24aab5989bd/8.10.7/lib/x86_64-linux-ghc-8.10.7&quot;</span></span><span>
-</span><span id="line-35"></span><span id="datadir"><span class="annot"><span class="annottext">datadir :: String
+</span><span class="hs-string">&quot;/home/jon/fs/git/openapi-generator/samples/client/petstore/haskell-http-client/.stack-work/install/x86_64-linux-tinfo6/2f9e8e6d6a0225b440573e2ade8cf024ba1ae60293b2eb0dca9acdb6bef1c3d4/9.0.2/lib/x86_64-linux-ghc-9.0.2&quot;</span></span><span>
+</span><span id="line-36"></span><span id="datadir"><span class="annot"><span class="annottext">datadir :: String
 </span><a href="Paths_openapi_petstore.html#datadir"><span class="hs-identifier hs-var hs-var">datadir</span></a></span></span><span>    </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
-</span><span class="hs-string">&quot;/home/jon/fs/git/openapi-generator/samples/client/petstore/haskell-http-client/.stack-work/install/x86_64-linux-tinfo6/c2d06f167ed22c3aeac6ab338dd025e6d4619b0164253f553a46d24aab5989bd/8.10.7/share/x86_64-linux-ghc-8.10.7/openapi-petstore-0.1.0.0&quot;</span></span><span>
-</span><span id="line-36"></span><span id="libexecdir"><span class="annot"><span class="annottext">libexecdir :: String
+</span><span class="hs-string">&quot;/home/jon/fs/git/openapi-generator/samples/client/petstore/haskell-http-client/.stack-work/install/x86_64-linux-tinfo6/2f9e8e6d6a0225b440573e2ade8cf024ba1ae60293b2eb0dca9acdb6bef1c3d4/9.0.2/share/x86_64-linux-ghc-9.0.2/openapi-petstore-0.1.0.0&quot;</span></span><span>
+</span><span id="line-37"></span><span id="libexecdir"><span class="annot"><span class="annottext">libexecdir :: String
 </span><a href="Paths_openapi_petstore.html#libexecdir"><span class="hs-identifier hs-var hs-var">libexecdir</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
-</span><span class="hs-string">&quot;/home/jon/fs/git/openapi-generator/samples/client/petstore/haskell-http-client/.stack-work/install/x86_64-linux-tinfo6/c2d06f167ed22c3aeac6ab338dd025e6d4619b0164253f553a46d24aab5989bd/8.10.7/libexec/x86_64-linux-ghc-8.10.7/openapi-petstore-0.1.0.0&quot;</span></span><span>
-</span><span id="line-37"></span><span id="sysconfdir"><span class="annot"><span class="annottext">sysconfdir :: String
+</span><span class="hs-string">&quot;/home/jon/fs/git/openapi-generator/samples/client/petstore/haskell-http-client/.stack-work/install/x86_64-linux-tinfo6/2f9e8e6d6a0225b440573e2ade8cf024ba1ae60293b2eb0dca9acdb6bef1c3d4/9.0.2/libexec/x86_64-linux-ghc-9.0.2/openapi-petstore-0.1.0.0&quot;</span></span><span>
+</span><span id="line-38"></span><span id="sysconfdir"><span class="annot"><span class="annottext">sysconfdir :: String
 </span><a href="Paths_openapi_petstore.html#sysconfdir"><span class="hs-identifier hs-var hs-var">sysconfdir</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
-</span><span class="hs-string">&quot;/home/jon/fs/git/openapi-generator/samples/client/petstore/haskell-http-client/.stack-work/install/x86_64-linux-tinfo6/c2d06f167ed22c3aeac6ab338dd025e6d4619b0164253f553a46d24aab5989bd/8.10.7/etc&quot;</span></span><span>
-</span><span id="line-38"></span><span>
-</span><span id="line-39"></span><span class="annot"><a href="Paths_openapi_petstore.html#getBinDir"><span class="hs-identifier hs-type">getBinDir</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="Paths_openapi_petstore.html#getLibDir"><span class="hs-identifier hs-type">getLibDir</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="Paths_openapi_petstore.html#getDynLibDir"><span class="hs-identifier hs-type">getDynLibDir</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="Paths_openapi_petstore.html#getDataDir"><span class="hs-identifier hs-type">getDataDir</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="Paths_openapi_petstore.html#getLibexecDir"><span class="hs-identifier hs-type">getLibexecDir</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="Paths_openapi_petstore.html#getSysconfDir"><span class="hs-identifier hs-type">getSysconfDir</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"><span class="hs-identifier hs-type">FilePath</span></span><span>
-</span><span id="line-40"></span><span id="getBinDir"><span class="annot"><span class="annottext">getBinDir :: IO String
+</span><span class="hs-string">&quot;/home/jon/fs/git/openapi-generator/samples/client/petstore/haskell-http-client/.stack-work/install/x86_64-linux-tinfo6/2f9e8e6d6a0225b440573e2ade8cf024ba1ae60293b2eb0dca9acdb6bef1c3d4/9.0.2/etc&quot;</span></span><span>
+</span><span id="line-39"></span><span>
+</span><span id="line-40"></span><span class="annot"><a href="Paths_openapi_petstore.html#getBinDir"><span class="hs-identifier hs-type">getBinDir</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="Paths_openapi_petstore.html#getLibDir"><span class="hs-identifier hs-type">getLibDir</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="Paths_openapi_petstore.html#getDynLibDir"><span class="hs-identifier hs-type">getDynLibDir</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="Paths_openapi_petstore.html#getDataDir"><span class="hs-identifier hs-type">getDataDir</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="Paths_openapi_petstore.html#getLibexecDir"><span class="hs-identifier hs-type">getLibexecDir</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="Paths_openapi_petstore.html#getSysconfDir"><span class="hs-identifier hs-type">getSysconfDir</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"><span class="hs-identifier hs-type">FilePath</span></span><span>
+</span><span id="line-41"></span><span id="getBinDir"><span class="annot"><span class="annottext">getBinDir :: IO String
 </span><a href="Paths_openapi_petstore.html#getBinDir"><span class="hs-identifier hs-var hs-var">getBinDir</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">IO String -&gt; (IOException -&gt; IO String) -&gt; IO String
 forall a. IO a -&gt; (IOException -&gt; IO a) -&gt; IO a
 </span><a href="Paths_openapi_petstore.html#catchIO"><span class="hs-identifier hs-var">catchIO</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">String -&gt; IO String
@@ -68,7 +69,7 @@ forall a. IO a -&gt; (IOException -&gt; IO 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">String
 </span><a href="Paths_openapi_petstore.html#bindir"><span class="hs-identifier hs-var">bindir</span></a></span><span class="hs-special">)</span><span>
-</span><span id="line-41"></span><span id="getLibDir"><span class="annot"><span class="annottext">getLibDir :: IO String
+</span><span id="line-42"></span><span id="getLibDir"><span class="annot"><span class="annottext">getLibDir :: IO String
 </span><a href="Paths_openapi_petstore.html#getLibDir"><span class="hs-identifier hs-var hs-var">getLibDir</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">IO String -&gt; (IOException -&gt; IO String) -&gt; IO String
 forall a. IO a -&gt; (IOException -&gt; IO a) -&gt; IO a
 </span><a href="Paths_openapi_petstore.html#catchIO"><span class="hs-identifier hs-var">catchIO</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">String -&gt; IO String
@@ -78,7 +79,7 @@ forall a. IO a -&gt; (IOException -&gt; IO 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">String
 </span><a href="Paths_openapi_petstore.html#libdir"><span class="hs-identifier hs-var">libdir</span></a></span><span class="hs-special">)</span><span>
-</span><span id="line-42"></span><span id="getDynLibDir"><span class="annot"><span class="annottext">getDynLibDir :: IO String
+</span><span id="line-43"></span><span id="getDynLibDir"><span class="annot"><span class="annottext">getDynLibDir :: IO String
 </span><a href="Paths_openapi_petstore.html#getDynLibDir"><span class="hs-identifier hs-var hs-var">getDynLibDir</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">IO String -&gt; (IOException -&gt; IO String) -&gt; IO String
 forall a. IO a -&gt; (IOException -&gt; IO a) -&gt; IO a
 </span><a href="Paths_openapi_petstore.html#catchIO"><span class="hs-identifier hs-var">catchIO</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">String -&gt; IO String
@@ -88,7 +89,7 @@ forall a. IO a -&gt; (IOException -&gt; IO 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">String
 </span><a href="Paths_openapi_petstore.html#dynlibdir"><span class="hs-identifier hs-var">dynlibdir</span></a></span><span class="hs-special">)</span><span>
-</span><span id="line-43"></span><span id="getDataDir"><span class="annot"><span class="annottext">getDataDir :: IO String
+</span><span id="line-44"></span><span id="getDataDir"><span class="annot"><span class="annottext">getDataDir :: IO String
 </span><a href="Paths_openapi_petstore.html#getDataDir"><span class="hs-identifier hs-var hs-var">getDataDir</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">IO String -&gt; (IOException -&gt; IO String) -&gt; IO String
 forall a. IO a -&gt; (IOException -&gt; IO a) -&gt; IO a
 </span><a href="Paths_openapi_petstore.html#catchIO"><span class="hs-identifier hs-var">catchIO</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">String -&gt; IO String
@@ -98,7 +99,7 @@ forall a. IO a -&gt; (IOException -&gt; IO 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">String
 </span><a href="Paths_openapi_petstore.html#datadir"><span class="hs-identifier hs-var">datadir</span></a></span><span class="hs-special">)</span><span>
-</span><span id="line-44"></span><span id="getLibexecDir"><span class="annot"><span class="annottext">getLibexecDir :: IO String
+</span><span id="line-45"></span><span id="getLibexecDir"><span class="annot"><span class="annottext">getLibexecDir :: IO String
 </span><a href="Paths_openapi_petstore.html#getLibexecDir"><span class="hs-identifier hs-var hs-var">getLibexecDir</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">IO String -&gt; (IOException -&gt; IO String) -&gt; IO String
 forall a. IO a -&gt; (IOException -&gt; IO a) -&gt; IO a
 </span><a href="Paths_openapi_petstore.html#catchIO"><span class="hs-identifier hs-var">catchIO</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">String -&gt; IO String
@@ -108,7 +109,7 @@ forall a. IO a -&gt; (IOException -&gt; IO 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">String
 </span><a href="Paths_openapi_petstore.html#libexecdir"><span class="hs-identifier hs-var">libexecdir</span></a></span><span class="hs-special">)</span><span>
-</span><span id="line-45"></span><span id="getSysconfDir"><span class="annot"><span class="annottext">getSysconfDir :: IO String
+</span><span id="line-46"></span><span id="getSysconfDir"><span class="annot"><span class="annottext">getSysconfDir :: IO String
 </span><a href="Paths_openapi_petstore.html#getSysconfDir"><span class="hs-identifier hs-var hs-var">getSysconfDir</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">IO String -&gt; (IOException -&gt; IO String) -&gt; IO String
 forall a. IO a -&gt; (IOException -&gt; IO a) -&gt; IO a
 </span><a href="Paths_openapi_petstore.html#catchIO"><span class="hs-identifier hs-var">catchIO</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">String -&gt; IO String
@@ -118,22 +119,22 @@ forall a. IO a -&gt; (IOException -&gt; IO 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">String
 </span><a href="Paths_openapi_petstore.html#sysconfdir"><span class="hs-identifier hs-var">sysconfdir</span></a></span><span class="hs-special">)</span><span>
-</span><span id="line-46"></span><span>
-</span><span id="line-47"></span><span class="annot"><a href="Paths_openapi_petstore.html#getDataFileName"><span class="hs-identifier hs-type">getDataFileName</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">FilePath</span></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"><span class="hs-identifier hs-type">FilePath</span></span><span>
-</span><span id="line-48"></span><span id="getDataFileName"><span class="annot"><span class="annottext">getDataFileName :: String -&gt; IO String
-</span><a href="Paths_openapi_petstore.html#getDataFileName"><span class="hs-identifier hs-var hs-var">getDataFileName</span></a></span></span><span> </span><span id="local-6989586621679155405"><span class="annot"><span class="annottext">String
-</span><a href="#local-6989586621679155405"><span class="hs-identifier hs-var">name</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
-</span><span id="line-49"></span><span>  </span><span id="local-6989586621679155404"><span class="annot"><span class="annottext">String
-</span><a href="#local-6989586621679155404"><span class="hs-identifier hs-var">dir</span></a></span></span><span> </span><span class="hs-glyph">&lt;-</span><span> </span><span class="annot"><span class="annottext">IO String
+</span><span id="line-47"></span><span>
+</span><span id="line-48"></span><span class="annot"><a href="Paths_openapi_petstore.html#getDataFileName"><span class="hs-identifier hs-type">getDataFileName</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">FilePath</span></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"><span class="hs-identifier hs-type">FilePath</span></span><span>
+</span><span id="line-49"></span><span id="getDataFileName"><span class="annot"><span class="annottext">getDataFileName :: String -&gt; IO String
+</span><a href="Paths_openapi_petstore.html#getDataFileName"><span class="hs-identifier hs-var hs-var">getDataFileName</span></a></span></span><span> </span><span id="local-6989586621679167468"><span class="annot"><span class="annottext">String
+</span><a href="#local-6989586621679167468"><span class="hs-identifier hs-var">name</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
+</span><span id="line-50"></span><span>  </span><span id="local-6989586621679167467"><span class="annot"><span class="annottext">String
+</span><a href="#local-6989586621679167467"><span class="hs-identifier hs-var">dir</span></a></span></span><span> </span><span class="hs-glyph">&lt;-</span><span> </span><span class="annot"><span class="annottext">IO String
 </span><a href="Paths_openapi_petstore.html#getDataDir"><span class="hs-identifier hs-var">getDataDir</span></a></span><span>
-</span><span id="line-50"></span><span>  </span><span class="annot"><span class="annottext">String -&gt; IO String
+</span><span id="line-51"></span><span>  </span><span class="annot"><span class="annottext">String -&gt; IO String
 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="hs-special">(</span><span class="annot"><span class="annottext">String
-</span><a href="#local-6989586621679155404"><span class="hs-identifier hs-var">dir</span></a></span><span> </span><span class="annot"><span class="annottext">String -&gt; String -&gt; String
+</span><a href="#local-6989586621679167467"><span class="hs-identifier hs-var">dir</span></a></span><span> </span><span class="annot"><span class="annottext">String -&gt; String -&gt; String
 forall a. [a] -&gt; [a] -&gt; [a]
 </span><span class="hs-operator hs-var">++</span></span><span> </span><span class="annot"><span class="annottext">String
 </span><span class="hs-string">&quot;/&quot;</span></span><span> </span><span class="annot"><span class="annottext">String -&gt; String -&gt; String
 forall a. [a] -&gt; [a] -&gt; [a]
 </span><span class="hs-operator hs-var">++</span></span><span> </span><span class="annot"><span class="annottext">String
-</span><a href="#local-6989586621679155405"><span class="hs-identifier hs-var">name</span></a></span><span class="hs-special">)</span><span>
-</span><span id="line-51"></span></pre></body></html>
+</span><a href="#local-6989586621679167468"><span class="hs-identifier hs-var">name</span></a></span><span class="hs-special">)</span><span>
+</span><span id="line-52"></span></pre></body></html>