[haskell-http-client] - update deps (#16041)

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

@@ -8,9 +8,9 @@
    Generated by OpenAPI Generator (https://openapi-generator.tech)
 -}</span><span>
 </span><span id="line-10"></span><span>
-</span><span id="line-11"></span><span class="hs-comment">{-|
+</span><span id="line-11"></span><span class="annot"><span class="hs-comment">{-|
 Module : OpenAPIPetstore.API.AnotherFake
--}</span><span>
+-}</span></span><span>
 </span><span id="line-14"></span><span>
 </span><span id="line-15"></span><span class="hs-pragma">{-# LANGUAGE FlexibleContexts #-}</span><span>
 </span><span id="line-16"></span><span class="hs-pragma">{-# LANGUAGE FlexibleInstances #-}</span><span>
@@ -52,12 +52,12 @@ Module : OpenAPIPetstore.API.AnotherFake
 </span><span id="line-52"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><span class="hs-identifier">Prelude</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-operator">(==)</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-operator">(/=)</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-operator">($)</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-operator">(.)</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-operator">(&lt;$&gt;)</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-operator">(&lt;*&gt;)</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-operator">(&gt;&gt;=)</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Maybe</span></span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Bool</span></span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Char</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Double</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">FilePath</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Float</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Int</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Integer</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">String</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">fmap</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">undefined</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">mempty</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">maybe</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">pure</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Monad</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Applicative</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Functor</span></span><span class="hs-special">)</span><span>
 </span><span id="line-53"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Prelude</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">P</span></span><span>
 </span><span id="line-54"></span><span>
-</span><span id="line-55"></span><span class="hs-comment">-- * Operations</span><span>
+</span><span id="line-55"></span><span class="annot"><span class="hs-comment">-- * Operations</span></span><span>
 </span><span id="line-56"></span><span>
 </span><span id="line-57"></span><span>
-</span><span id="line-58"></span><span class="hs-comment">-- ** AnotherFake</span><span>
+</span><span id="line-58"></span><span class="annot"><span class="hs-comment">-- ** AnotherFake</span></span><span>
 </span><span id="line-59"></span><span>
-</span><span id="line-60"></span><span class="hs-comment">-- *** op123testSpecialTags</span><span>
+</span><span id="line-60"></span><span class="annot"><span class="hs-comment">-- *** op123testSpecialTags</span></span><span>
 </span><span id="line-61"></span><span>
 </span><span id="line-62"></span><span class="hs-comment">-- | @PATCH \/another-fake\/dummy@</span><span>
 </span><span id="line-63"></span><span class="hs-comment">-- </span><span>
@@ -67,15 +67,15 @@ Module : OpenAPIPetstore.API.AnotherFake
 </span><span id="line-67"></span><span class="hs-comment">-- </span><span>
 </span><span id="line-68"></span><span class="annot"><a href="OpenAPIPetstore.API.AnotherFake.html#op123testSpecialTags"><span class="hs-identifier hs-type">op123testSpecialTags</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.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-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="annot"><span class="hs-comment">-- ^ &quot;body&quot; -  client model</span></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 :: (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-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><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-6989586621679167294"><span class="annot"><span class="annottext">Client
+</span><a href="#local-6989586621679167294"><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
@@ -97,18 +97,25 @@ forall req param contentType res accept.
  MimeRender contentType param) =&gt;
 OpenAPIPetstoreRequest req contentType res accept
 -&gt; param -&gt; OpenAPIPetstoreRequest req contentType res accept
+forall contentType res accept.
+(Consumes Op123testSpecialTags contentType,
+ MimeRender contentType Client) =&gt;
+OpenAPIPetstoreRequest Op123testSpecialTags contentType res accept
+-&gt; Client
+-&gt; OpenAPIPetstoreRequest
+     Op123testSpecialTags 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-6989586621679164599"><span class="hs-identifier hs-var">body</span></a></span><span>
+</span><a href="#local-6989586621679167294"><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-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-78"></span><span class="annot"><span class="hs-comment">-- | /Body Param/ &quot;body&quot; - client model</span></span><span>
+</span><span id="line-79"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679167298"><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-81"></span><span class="annot"><span class="hs-comment">-- | @application/json@</span></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>
 </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-84"></span><span class="annot"><span class="hs-comment">-- | @application/json@</span></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.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 id="line-86"></span><span>
 </span><span id="line-87"></span></pre></body></html>

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

@@ -8,9 +8,9 @@
    Generated by OpenAPI Generator (https://openapi-generator.tech)
 -}</span><span>
 </span><span id="line-10"></span><span>
-</span><span id="line-11"></span><span class="hs-comment">{-|
+</span><span id="line-11"></span><span class="annot"><span class="hs-comment">{-|
 Module : OpenAPIPetstore.API.FakeClassnameTags123
--}</span><span>
+-}</span></span><span>
 </span><span id="line-14"></span><span>
 </span><span id="line-15"></span><span class="hs-pragma">{-# LANGUAGE FlexibleContexts #-}</span><span>
 </span><span id="line-16"></span><span class="hs-pragma">{-# LANGUAGE FlexibleInstances #-}</span><span>
@@ -52,12 +52,12 @@ Module : OpenAPIPetstore.API.FakeClassnameTags123
 </span><span id="line-52"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><span class="hs-identifier">Prelude</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-operator">(==)</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-operator">(/=)</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-operator">($)</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-operator">(.)</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-operator">(&lt;$&gt;)</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-operator">(&lt;*&gt;)</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-operator">(&gt;&gt;=)</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Maybe</span></span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Bool</span></span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Char</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Double</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">FilePath</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Float</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Int</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Integer</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">String</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">fmap</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">undefined</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">mempty</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">maybe</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">pure</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Monad</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Applicative</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Functor</span></span><span class="hs-special">)</span><span>
 </span><span id="line-53"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Prelude</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">P</span></span><span>
 </span><span id="line-54"></span><span>
-</span><span id="line-55"></span><span class="hs-comment">-- * Operations</span><span>
+</span><span id="line-55"></span><span class="annot"><span class="hs-comment">-- * Operations</span></span><span>
 </span><span id="line-56"></span><span>
 </span><span id="line-57"></span><span>
-</span><span id="line-58"></span><span class="hs-comment">-- ** FakeClassnameTags123</span><span>
+</span><span id="line-58"></span><span class="annot"><span class="hs-comment">-- ** FakeClassnameTags123</span></span><span>
 </span><span id="line-59"></span><span>
-</span><span id="line-60"></span><span class="hs-comment">-- *** testClassname</span><span>
+</span><span id="line-60"></span><span class="annot"><span class="hs-comment">-- *** testClassname</span></span><span>
 </span><span id="line-61"></span><span>
 </span><span id="line-62"></span><span class="hs-comment">-- | @PATCH \/fake_classname_test@</span><span>
 </span><span id="line-63"></span><span class="hs-comment">-- </span><span>
@@ -69,13 +69,13 @@ Module : OpenAPIPetstore.API.FakeClassnameTags123
 </span><span id="line-69"></span><span class="hs-comment">-- </span><span>
 </span><span id="line-70"></span><span class="annot"><a href="OpenAPIPetstore.API.FakeClassnameTags123.html#testClassname"><span class="hs-identifier hs-type">testClassname</span></a></span><span>
 </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-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="annot"><span class="hs-comment">-- ^ &quot;body&quot; -  client model</span></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 :: (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-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><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-6989586621679166361"><span class="annot"><span class="annottext">Client
+</span><a href="#local-6989586621679166361"><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
@@ -105,18 +105,24 @@ forall req param contentType res accept.
  MimeRender contentType param) =&gt;
 OpenAPIPetstoreRequest req contentType res accept
 -&gt; param -&gt; OpenAPIPetstoreRequest req contentType res accept
+forall contentType res accept.
+(Consumes TestClassname contentType,
+ MimeRender contentType Client) =&gt;
+OpenAPIPetstoreRequest TestClassname contentType res accept
+-&gt; Client
+-&gt; OpenAPIPetstoreRequest TestClassname 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-6989586621679163660"><span class="hs-identifier hs-var">body</span></a></span><span>
+</span><a href="#local-6989586621679166361"><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-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-81"></span><span class="annot"><span class="hs-comment">-- | /Body Param/ &quot;body&quot; - client model</span></span><span>
+</span><span id="line-82"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679166367"><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-84"></span><span class="annot"><span class="hs-comment">-- | @application/json@</span></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>
 </span><span id="line-86"></span><span>
-</span><span id="line-87"></span><span class="hs-comment">-- | @application/json@</span><span>
+</span><span id="line-87"></span><span class="annot"><span class="hs-comment">-- | @application/json@</span></span><span>
 </span><span id="line-88"></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.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 id="line-89"></span><span>
 </span><span id="line-90"></span></pre></body></html>

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

@@ -8,9 +8,9 @@
    Generated by OpenAPI Generator (https://openapi-generator.tech)
 -}</span><span>
 </span><span id="line-10"></span><span>
-</span><span id="line-11"></span><span class="hs-comment">{-|
+</span><span id="line-11"></span><span class="annot"><span class="hs-comment">{-|
 Module : OpenAPIPetstore.API.Pet
--}</span><span>
+-}</span></span><span>
 </span><span id="line-14"></span><span>
 </span><span id="line-15"></span><span class="hs-pragma">{-# LANGUAGE FlexibleContexts #-}</span><span>
 </span><span id="line-16"></span><span class="hs-pragma">{-# LANGUAGE FlexibleInstances #-}</span><span>
@@ -52,12 +52,12 @@ Module : OpenAPIPetstore.API.Pet
 </span><span id="line-52"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><span class="hs-identifier">Prelude</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-operator">(==)</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-operator">(/=)</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-operator">($)</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-operator">(.)</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-operator">(&lt;$&gt;)</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-operator">(&lt;*&gt;)</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-operator">(&gt;&gt;=)</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Maybe</span></span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Bool</span></span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Char</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Double</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">FilePath</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Float</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Int</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Integer</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">String</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">fmap</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">undefined</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">mempty</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">maybe</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">pure</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Monad</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Applicative</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Functor</span></span><span class="hs-special">)</span><span>
 </span><span id="line-53"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Prelude</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">P</span></span><span>
 </span><span id="line-54"></span><span>
-</span><span id="line-55"></span><span class="hs-comment">-- * Operations</span><span>
+</span><span id="line-55"></span><span class="annot"><span class="hs-comment">-- * Operations</span></span><span>
 </span><span id="line-56"></span><span>
 </span><span id="line-57"></span><span>
-</span><span id="line-58"></span><span class="hs-comment">-- ** Pet</span><span>
+</span><span id="line-58"></span><span class="annot"><span class="hs-comment">-- ** Pet</span></span><span>
 </span><span id="line-59"></span><span>
-</span><span id="line-60"></span><span class="hs-comment">-- *** addPet</span><span>
+</span><span id="line-60"></span><span class="annot"><span class="hs-comment">-- *** addPet</span></span><span>
 </span><span id="line-61"></span><span>
 </span><span id="line-62"></span><span class="hs-comment">-- | @POST \/pet@</span><span>
 </span><span id="line-63"></span><span class="hs-comment">-- </span><span>
@@ -65,11 +65,11 @@ 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-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-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-68"></span><span id="local-6989586621679165908"><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-6989586621679165908"><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-6989586621679165908"><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-6989586621679165908"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><span class="hs-comment">-- ^ request content-type ('MimeType')</span></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="annot"><span class="hs-comment">-- ^ &quot;body&quot; -  Pet object that needs to be added to the store</span></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-6989586621679165908"><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
@@ -77,8 +77,8 @@ ContentType contentType
 -&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-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 class="hs-identifier">_</span></span><span> </span><span id="local-6989586621679166064"><span class="annot"><span class="annottext">Pet
+</span><a href="#local-6989586621679166064"><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
@@ -111,23 +111,27 @@ forall req param contentType res accept.
  MimeRender contentType param) =&gt;
 OpenAPIPetstoreRequest req contentType res accept
 -&gt; param -&gt; OpenAPIPetstoreRequest req contentType res accept
+forall contentType res accept.
+(Consumes AddPet contentType, MimeRender contentType Pet) =&gt;
+OpenAPIPetstoreRequest AddPet contentType res accept
+-&gt; Pet -&gt; OpenAPIPetstoreRequest AddPet 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-6989586621679163459"><span class="hs-identifier hs-var">body</span></a></span><span>
+</span><a href="#local-6989586621679166064"><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-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-80"></span><span class="annot"><span class="hs-comment">-- | /Body Param/ &quot;body&quot; - Pet object that needs to be added to the store</span></span><span>
+</span><span id="line-81"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679166070"><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-83"></span><span class="annot"><span class="hs-comment">-- | @application/xml@</span></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>
-</span><span id="line-85"></span><span class="hs-comment">-- | @application/json@</span><span>
+</span><span id="line-85"></span><span class="annot"><span class="hs-comment">-- | @application/json@</span></span><span>
 </span><span id="line-86"></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#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a></span><span>
 </span><span id="line-87"></span><span>
 </span><span id="line-88"></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#AddPet"><span class="hs-identifier hs-type">AddPet</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-89"></span><span>
 </span><span id="line-90"></span><span>
-</span><span id="line-91"></span><span class="hs-comment">-- *** deletePet</span><span>
+</span><span id="line-91"></span><span class="annot"><span class="hs-comment">-- *** deletePet</span></span><span>
 </span><span id="line-92"></span><span>
 </span><span id="line-93"></span><span class="hs-comment">-- | @DELETE \/pet\/{petId}@</span><span>
 </span><span id="line-94"></span><span class="hs-comment">-- </span><span>
@@ -136,13 +140,13 @@ OpenAPIPetstoreRequest req contentType res accept
 </span><span id="line-97"></span><span class="hs-comment">-- AuthMethod: 'AuthOAuthPetstoreAuth'</span><span>
 </span><span id="line-98"></span><span class="hs-comment">-- </span><span>
 </span><span id="line-99"></span><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#deletePet"><span class="hs-identifier hs-type">deletePet</span></a></span><span>
-</span><span id="line-100"></span><span>  </span><span class="hs-glyph">::</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; -  Pet id to delete</span><span>
+</span><span id="line-100"></span><span>  </span><span class="hs-glyph">::</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="annot"><span class="hs-comment">-- ^ &quot;petId&quot; -  Pet id to delete</span></span><span>
 </span><span id="line-101"></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#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 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-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-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><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-6989586621679166093"><span class="annot"><span class="annottext">Integer
+</span><a href="#local-6989586621679166093"><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
@@ -156,7 +160,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-6989586621679163435"><span class="hs-identifier hs-var">petId</span></a></span><span class="hs-special">]</span><span>
+</span><a href="#local-6989586621679166093"><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
@@ -172,16 +176,16 @@ 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-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.
+</span><span id="line-107"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679166097"><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-6989586621679166107"><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-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><a href="#local-6989586621679166107"><span class="hs-identifier hs-var hs-var hs-var hs-var">applyOptionalParam</span></a></span></span><span> </span><span id="local-6989586621679166109"><span class="annot"><span class="annottext">OpenAPIPetstoreRequest DeletePet contentType res accept
+</span><a href="#local-6989586621679166109"><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-6989586621679166111"><span class="annot"><span class="annottext">Text
+</span><a href="#local-6989586621679166111"><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-6989586621679163421"><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-6989586621679166109"><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.
@@ -191,11 +195,11 @@ 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-6989586621679163419"><span class="hs-identifier hs-var">xs</span></a></span><span class="hs-special">)</span><span>
+</span><a href="#local-6989586621679166111"><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>
-</span><span id="line-113"></span><span class="hs-comment">-- *** findPetsByStatus</span><span>
+</span><span id="line-113"></span><span class="annot"><span class="hs-comment">-- *** findPetsByStatus</span></span><span>
 </span><span id="line-114"></span><span>
 </span><span id="line-115"></span><span class="hs-comment">-- | @GET \/pet\/findByStatus@</span><span>
 </span><span id="line-116"></span><span class="hs-comment">-- </span><span>
@@ -205,18 +209,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-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-6989586621679163568"><span class="hs-identifier hs-type">accept</span></a></span></span><span>
+</span><span id="line-123"></span><span id="local-6989586621679165968"><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-6989586621679165968"><span class="hs-identifier hs-type">accept</span></a></span><span> </span><span class="annot"><span class="hs-comment">-- ^ request accept ('MimeType')</span></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="annot"><span class="hs-comment">-- ^ &quot;status&quot; -  Status values that need to be considered for filter</span></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-6989586621679165968"><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-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 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-6989586621679166125"><span class="annot"><span class="annottext">[E'Status2]
+</span><a href="#local-6989586621679166125"><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
@@ -256,16 +260,16 @@ 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-6989586621679163405"><span class="hs-identifier hs-var">status</span></a></span><span class="hs-special">)</span><span>
+</span><a href="#local-6989586621679166125"><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>
+</span><span id="line-133"></span><span class="annot"><span class="hs-comment">-- | @application/xml@</span></span><span>
 </span><span id="line-134"></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#FindPetsByStatus"><span class="hs-identifier hs-type">FindPetsByStatus</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 id="line-135"></span><span class="hs-comment">-- | @application/json@</span><span>
+</span><span id="line-135"></span><span class="annot"><span class="hs-comment">-- | @application/json@</span></span><span>
 </span><span id="line-136"></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#FindPetsByStatus"><span class="hs-identifier hs-type">FindPetsByStatus</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-137"></span><span>
 </span><span id="line-138"></span><span>
-</span><span id="line-139"></span><span class="hs-comment">-- *** findPetsByTags</span><span>
+</span><span id="line-139"></span><span class="annot"><span class="hs-comment">-- *** findPetsByTags</span></span><span>
 </span><span id="line-140"></span><span>
 </span><span id="line-141"></span><span class="hs-comment">-- | @GET \/pet\/findByTags@</span><span>
 </span><span id="line-142"></span><span class="hs-comment">-- </span><span>
@@ -275,17 +279,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-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-6989586621679163554"><span class="hs-identifier hs-type">accept</span></a></span></span><span>
+</span><span id="line-149"></span><span id="local-6989586621679165982"><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-6989586621679165982"><span class="hs-identifier hs-type">accept</span></a></span><span> </span><span class="annot"><span class="hs-comment">-- ^ request accept ('MimeType')</span></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="annot"><span class="hs-comment">-- ^ &quot;tags&quot; -  Tags to filter by</span></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-6989586621679165982"><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-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 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-6989586621679166142"><span class="annot"><span class="annottext">[Text]
+</span><a href="#local-6989586621679166142"><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
@@ -322,18 +326,18 @@ 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-6989586621679163388"><span class="hs-identifier hs-var">tags</span></a></span><span class="hs-special">)</span><span>
+</span><a href="#local-6989586621679166142"><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>
 </span><span id="line-160"></span><span class="hs-keyword">data</span><span> </span><span id="FindPetsByTags"><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#FindPetsByTags"><span class="hs-identifier hs-var">FindPetsByTags</span></a></span></span><span>  </span><span>
-</span><span id="line-161"></span><span class="hs-comment">-- | @application/xml@</span><span>
+</span><span id="line-161"></span><span class="annot"><span class="hs-comment">-- | @application/xml@</span></span><span>
 </span><span id="line-162"></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#FindPetsByTags"><span class="hs-identifier hs-type">FindPetsByTags</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 id="line-163"></span><span class="hs-comment">-- | @application/json@</span><span>
+</span><span id="line-163"></span><span class="annot"><span class="hs-comment">-- | @application/json@</span></span><span>
 </span><span id="line-164"></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#FindPetsByTags"><span class="hs-identifier hs-type">FindPetsByTags</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-165"></span><span>
 </span><span id="line-166"></span><span>
-</span><span id="line-167"></span><span class="hs-comment">-- *** getPetById</span><span>
+</span><span id="line-167"></span><span class="annot"><span class="hs-comment">-- *** getPetById</span></span><span>
 </span><span id="line-168"></span><span>
 </span><span id="line-169"></span><span class="hs-comment">-- | @GET \/pet\/{petId}@</span><span>
 </span><span id="line-170"></span><span class="hs-comment">-- </span><span>
@@ -343,17 +347,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-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-6989586621679163550"><span class="hs-identifier hs-type">accept</span></a></span></span><span>
+</span><span id="line-177"></span><span id="local-6989586621679165986"><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-6989586621679165986"><span class="hs-identifier hs-type">accept</span></a></span><span> </span><span class="annot"><span class="hs-comment">-- ^ request accept ('MimeType')</span></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="annot"><span class="hs-comment">-- ^ &quot;petId&quot; -  ID of pet to return</span></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-6989586621679165986"><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-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 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-6989586621679166156"><span class="annot"><span class="annottext">Integer
+</span><a href="#local-6989586621679166156"><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
@@ -366,7 +370,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-6989586621679163375"><span class="hs-identifier hs-var">petId</span></a></span><span class="hs-special">]</span><span>
+</span><a href="#local-6989586621679166156"><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
@@ -380,13 +384,13 @@ 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>
-</span><span id="line-186"></span><span class="hs-comment">-- | @application/xml@</span><span>
+</span><span id="line-186"></span><span class="annot"><span class="hs-comment">-- | @application/xml@</span></span><span>
 </span><span id="line-187"></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#GetPetById"><span class="hs-identifier hs-type">GetPetById</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 id="line-188"></span><span class="hs-comment">-- | @application/json@</span><span>
+</span><span id="line-188"></span><span class="annot"><span class="hs-comment">-- | @application/json@</span></span><span>
 </span><span id="line-189"></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#GetPetById"><span class="hs-identifier hs-type">GetPetById</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-190"></span><span>
 </span><span id="line-191"></span><span>
-</span><span id="line-192"></span><span class="hs-comment">-- *** updatePet</span><span>
+</span><span id="line-192"></span><span class="annot"><span class="hs-comment">-- *** updatePet</span></span><span>
 </span><span id="line-193"></span><span>
 </span><span id="line-194"></span><span class="hs-comment">-- | @PUT \/pet@</span><span>
 </span><span id="line-195"></span><span class="hs-comment">-- </span><span>
@@ -394,11 +398,11 @@ 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-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-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-200"></span><span id="local-6989586621679165991"><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-6989586621679165991"><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-6989586621679165991"><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-6989586621679165991"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><span class="hs-comment">-- ^ request content-type ('MimeType')</span></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="annot"><span class="hs-comment">-- ^ &quot;body&quot; -  Pet object that needs to be added to the store</span></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-6989586621679165991"><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
@@ -406,8 +410,8 @@ ContentType contentType
 -&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-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 class="hs-identifier">_</span></span><span> </span><span id="local-6989586621679166173"><span class="annot"><span class="annottext">Pet
+</span><a href="#local-6989586621679166173"><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
@@ -442,23 +446,27 @@ forall req param contentType res accept.
  MimeRender contentType param) =&gt;
 OpenAPIPetstoreRequest req contentType res accept
 -&gt; param -&gt; OpenAPIPetstoreRequest req contentType res accept
+forall contentType res accept.
+(Consumes UpdatePet contentType, MimeRender contentType Pet) =&gt;
+OpenAPIPetstoreRequest UpdatePet contentType res accept
+-&gt; Pet -&gt; OpenAPIPetstoreRequest UpdatePet 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-6989586621679163359"><span class="hs-identifier hs-var">body</span></a></span><span>
+</span><a href="#local-6989586621679166173"><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-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-212"></span><span class="annot"><span class="hs-comment">-- | /Body Param/ &quot;body&quot; - Pet object that needs to be added to the store</span></span><span>
+</span><span id="line-213"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679166175"><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-215"></span><span class="annot"><span class="hs-comment">-- | @application/xml@</span></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>
-</span><span id="line-217"></span><span class="hs-comment">-- | @application/json@</span><span>
+</span><span id="line-217"></span><span class="annot"><span class="hs-comment">-- | @application/json@</span></span><span>
 </span><span id="line-218"></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#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a></span><span>
 </span><span id="line-219"></span><span>
 </span><span id="line-220"></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#UpdatePet"><span class="hs-identifier hs-type">UpdatePet</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-221"></span><span>
 </span><span id="line-222"></span><span>
-</span><span id="line-223"></span><span class="hs-comment">-- *** updatePetWithForm</span><span>
+</span><span id="line-223"></span><span class="annot"><span class="hs-comment">-- *** updatePetWithForm</span></span><span>
 </span><span id="line-224"></span><span>
 </span><span id="line-225"></span><span class="hs-comment">-- | @POST \/pet\/{petId}@</span><span>
 </span><span id="line-226"></span><span class="hs-comment">-- </span><span>
@@ -468,14 +476,14 @@ OpenAPIPetstoreRequest req contentType res accept
 </span><span id="line-230"></span><span class="hs-comment">-- </span><span>
 </span><span id="line-231"></span><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#updatePetWithForm"><span class="hs-identifier hs-type">updatePetWithForm</span></a></span><span>
 </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-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="annot"><span class="hs-comment">-- ^ &quot;petId&quot; -  ID of pet that needs to be updated</span></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 :: 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-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><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-6989586621679166196"><span class="annot"><span class="annottext">Integer
+</span><a href="#local-6989586621679166196"><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
@@ -489,7 +497,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-6989586621679163341"><span class="hs-identifier hs-var">petId</span></a></span><span class="hs-special">]</span><span>
+</span><a href="#local-6989586621679166196"><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
@@ -506,17 +514,17 @@ forall {k} (t :: k). Proxy t
 </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-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.
+</span><span id="line-241"></span><span class="annot"><span class="hs-comment">-- | /Optional Param/ &quot;name&quot; - Updated name of the pet</span></span><span>
+</span><span id="line-242"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679166199"><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-6989586621679166204"><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-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><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-6989586621679166205"><span class="annot"><span class="annottext">OpenAPIPetstoreRequest UpdatePetWithForm contentType res accept
+</span><a href="#local-6989586621679166205"><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-6989586621679166207"><span class="annot"><span class="annottext">Text
+</span><a href="#local-6989586621679166207"><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-6989586621679163334"><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-6989586621679166205"><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.
@@ -526,19 +534,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-6989586621679163332"><span class="hs-identifier hs-var">xs</span></a></span><span class="hs-special">)</span><span>
+</span><a href="#local-6989586621679166207"><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-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.
+</span><span id="line-246"></span><span class="annot"><span class="hs-comment">-- | /Optional Param/ &quot;status&quot; - Updated status of the pet</span></span><span>
+</span><span id="line-247"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679166212"><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-6989586621679166217"><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-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><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-6989586621679166218"><span class="annot"><span class="annottext">OpenAPIPetstoreRequest UpdatePetWithForm contentType res accept
+</span><a href="#local-6989586621679166218"><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-6989586621679166220"><span class="annot"><span class="annottext">Text
+</span><a href="#local-6989586621679166220"><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-6989586621679163323"><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-6989586621679166218"><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.
@@ -548,15 +556,15 @@ 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-6989586621679163321"><span class="hs-identifier hs-var">xs</span></a></span><span class="hs-special">)</span><span>
+</span><a href="#local-6989586621679166220"><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-251"></span><span class="annot"><span class="hs-comment">-- | @application/x-www-form-urlencoded@</span></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>
 </span><span id="line-253"></span><span>
 </span><span id="line-254"></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#UpdatePetWithForm"><span class="hs-identifier hs-type">UpdatePetWithForm</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-255"></span><span>
 </span><span id="line-256"></span><span>
-</span><span id="line-257"></span><span class="hs-comment">-- *** uploadFile</span><span>
+</span><span id="line-257"></span><span class="annot"><span class="hs-comment">-- *** uploadFile</span></span><span>
 </span><span id="line-258"></span><span>
 </span><span id="line-259"></span><span class="hs-comment">-- | @POST \/pet\/{petId}\/uploadImage@</span><span>
 </span><span id="line-260"></span><span class="hs-comment">-- </span><span>
@@ -566,14 +574,14 @@ forall v. ToHttpApiData v =&gt; (Method, v) -&gt; Form
 </span><span id="line-264"></span><span class="hs-comment">-- </span><span>
 </span><span id="line-265"></span><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#uploadFile"><span class="hs-identifier hs-type">uploadFile</span></a></span><span>
 </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-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="annot"><span class="hs-comment">-- ^ &quot;petId&quot; -  ID of pet to update</span></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 :: 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-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><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-6989586621679166235"><span class="annot"><span class="annottext">Integer
+</span><a href="#local-6989586621679166235"><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
@@ -587,7 +595,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-6989586621679163306"><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-6989586621679166235"><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
@@ -605,17 +613,17 @@ forall {k} (t :: k). Proxy t
 </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-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.
+</span><span id="line-275"></span><span class="annot"><span class="hs-comment">-- | /Optional Param/ &quot;additionalMetadata&quot; - Additional data to pass to server</span></span><span>
+</span><span id="line-276"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679166238"><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-6989586621679166247"><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-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><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-6989586621679166248"><span class="annot"><span class="annottext">OpenAPIPetstoreRequest UploadFile contentType res accept
+</span><a href="#local-6989586621679166248"><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-6989586621679166250"><span class="annot"><span class="annottext">Text
+</span><a href="#local-6989586621679166250"><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-6989586621679163295"><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-6989586621679166248"><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
@@ -629,19 +637,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-6989586621679163293"><span class="hs-identifier hs-var">xs</span></a></span><span class="hs-special">)</span><span>
+</span><a href="#local-6989586621679166250"><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-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.
+</span><span id="line-280"></span><span class="annot"><span class="hs-comment">-- | /Optional Param/ &quot;file&quot; - file to upload</span></span><span>
+</span><span id="line-281"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679166257"><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-6989586621679166261"><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-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><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-6989586621679166262"><span class="annot"><span class="annottext">OpenAPIPetstoreRequest UploadFile contentType res accept
+</span><a href="#local-6989586621679166262"><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-6989586621679166264"><span class="annot"><span class="annottext">FilePath
+</span><a href="#local-6989586621679166264"><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-6989586621679163283"><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-6989586621679166262"><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
@@ -649,16 +657,16 @@ 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-6989586621679163281"><span class="hs-identifier hs-var">xs</span></a></span><span>
+</span><a href="#local-6989586621679166264"><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-285"></span><span class="annot"><span class="hs-comment">-- | @multipart/form-data@</span></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>
 </span><span id="line-287"></span><span>
-</span><span id="line-288"></span><span class="hs-comment">-- | @application/json@</span><span>
+</span><span id="line-288"></span><span class="annot"><span class="hs-comment">-- | @application/json@</span></span><span>
 </span><span id="line-289"></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#UploadFile"><span class="hs-identifier hs-type">UploadFile</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-290"></span><span>
 </span><span id="line-291"></span><span>
-</span><span id="line-292"></span><span class="hs-comment">-- *** uploadFileWithRequiredFile</span><span>
+</span><span id="line-292"></span><span class="annot"><span class="hs-comment">-- *** uploadFileWithRequiredFile</span></span><span>
 </span><span id="line-293"></span><span>
 </span><span id="line-294"></span><span class="hs-comment">-- | @POST \/fake\/{petId}\/uploadImageWithRequiredFile@</span><span>
 </span><span id="line-295"></span><span class="hs-comment">-- </span><span>
@@ -668,8 +676,8 @@ OpenAPIPetstoreRequest req contentType res accept
 </span><span id="line-299"></span><span class="hs-comment">-- </span><span>
 </span><span id="line-300"></span><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#uploadFileWithRequiredFile"><span class="hs-identifier hs-type">uploadFileWithRequiredFile</span></a></span><span>
 </span><span id="line-301"></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#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 class="hs-special">)</span><span>
-</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-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="annot"><span class="hs-comment">-- ^ &quot;requiredFile&quot; -  file to upload</span></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="annot"><span class="hs-comment">-- ^ &quot;petId&quot; -  ID of pet to update</span></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 :: Consumes UploadFileWithRequiredFile MimeMultipartFormData =&gt;
 RequiredFile
@@ -679,9 +687,9 @@ RequiredFile
      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-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><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-6989586621679166282"><span class="annot"><span class="annottext">FilePath
+</span><a href="#local-6989586621679166282"><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-6989586621679166283"><span class="annot"><span class="annottext">Integer
+</span><a href="#local-6989586621679166283"><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
@@ -698,7 +706,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-6989586621679163262"><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-6989586621679166283"><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
@@ -736,25 +744,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-6989586621679163263"><span class="hs-identifier hs-var">requiredFile</span></a></span><span>
+</span><a href="#local-6989586621679166282"><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-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.
+</span><span id="line-312"></span><span class="annot"><span class="hs-comment">-- | /Optional Param/ &quot;additionalMetadata&quot; - Additional data to pass to server</span></span><span>
+</span><span id="line-313"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679166286"><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-6989586621679166292"><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-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
+</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-6989586621679166293"><span class="annot"><span class="annottext">OpenAPIPetstoreRequest
   UploadFileWithRequiredFile contentType res accept
-</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><a href="#local-6989586621679166293"><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-6989586621679166294"><span class="annot"><span class="annottext">Text
+</span><a href="#local-6989586621679166294"><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-6989586621679163254"><span class="hs-identifier hs-var">req</span></a></span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest
+</span><a href="#local-6989586621679166293"><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
@@ -771,12 +779,12 @@ 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-6989586621679163253"><span class="hs-identifier hs-var">xs</span></a></span><span class="hs-special">)</span><span>
+</span><a href="#local-6989586621679166294"><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-317"></span><span class="annot"><span class="hs-comment">-- | @multipart/form-data@</span></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>
 </span><span id="line-319"></span><span>
-</span><span id="line-320"></span><span class="hs-comment">-- | @application/json@</span><span>
+</span><span id="line-320"></span><span class="annot"><span class="hs-comment">-- | @application/json@</span></span><span>
 </span><span id="line-321"></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#UploadFileWithRequiredFile"><span class="hs-identifier hs-type">UploadFileWithRequiredFile</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-322"></span><span>
 </span><span id="line-323"></span></pre></body></html>

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

@@ -8,9 +8,9 @@
    Generated by OpenAPI Generator (https://openapi-generator.tech)
 -}</span><span>
 </span><span id="line-10"></span><span>
-</span><span id="line-11"></span><span class="hs-comment">{-|
+</span><span id="line-11"></span><span class="annot"><span class="hs-comment">{-|
 Module : OpenAPIPetstore.API.Store
--}</span><span>
+-}</span></span><span>
 </span><span id="line-14"></span><span>
 </span><span id="line-15"></span><span class="hs-pragma">{-# LANGUAGE FlexibleContexts #-}</span><span>
 </span><span id="line-16"></span><span class="hs-pragma">{-# LANGUAGE FlexibleInstances #-}</span><span>
@@ -52,12 +52,12 @@ Module : OpenAPIPetstore.API.Store
 </span><span id="line-52"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><span class="hs-identifier">Prelude</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-operator">(==)</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-operator">(/=)</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-operator">($)</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-operator">(.)</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-operator">(&lt;$&gt;)</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-operator">(&lt;*&gt;)</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-operator">(&gt;&gt;=)</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Maybe</span></span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Bool</span></span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Char</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Double</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">FilePath</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Float</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Int</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Integer</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">String</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">fmap</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">undefined</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">mempty</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">maybe</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">pure</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Monad</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Applicative</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Functor</span></span><span class="hs-special">)</span><span>
 </span><span id="line-53"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Prelude</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">P</span></span><span>
 </span><span id="line-54"></span><span>
-</span><span id="line-55"></span><span class="hs-comment">-- * Operations</span><span>
+</span><span id="line-55"></span><span class="annot"><span class="hs-comment">-- * Operations</span></span><span>
 </span><span id="line-56"></span><span>
 </span><span id="line-57"></span><span>
-</span><span id="line-58"></span><span class="hs-comment">-- ** Store</span><span>
+</span><span id="line-58"></span><span class="annot"><span class="hs-comment">-- ** Store</span></span><span>
 </span><span id="line-59"></span><span>
-</span><span id="line-60"></span><span class="hs-comment">-- *** deleteOrder</span><span>
+</span><span id="line-60"></span><span class="annot"><span class="hs-comment">-- *** deleteOrder</span></span><span>
 </span><span id="line-61"></span><span>
 </span><span id="line-62"></span><span class="hs-comment">-- | @DELETE \/store\/order\/{order_id}@</span><span>
 </span><span id="line-63"></span><span class="hs-comment">-- </span><span>
@@ -66,13 +66,13 @@ Module : OpenAPIPetstore.API.Store
 </span><span id="line-66"></span><span class="hs-comment">-- For valid response try integer IDs with value &lt; 1000. Anything above 1000 or nonintegers will generate API errors</span><span>
 </span><span id="line-67"></span><span class="hs-comment">-- </span><span>
 </span><span id="line-68"></span><span class="annot"><a href="OpenAPIPetstore.API.Store.html#deleteOrder"><span class="hs-identifier hs-type">deleteOrder</span></a></span><span>
-</span><span id="line-69"></span><span>  </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#OrderIdText"><span class="hs-identifier hs-type">OrderIdText</span></a></span><span> </span><span class="hs-comment">-- ^ &quot;orderId&quot; -  ID of the order that needs to be deleted</span><span>
+</span><span id="line-69"></span><span>  </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#OrderIdText"><span class="hs-identifier hs-type">OrderIdText</span></a></span><span> </span><span class="annot"><span class="hs-comment">-- ^ &quot;orderId&quot; -  ID of the order that needs to be deleted</span></span><span>
 </span><span id="line-70"></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#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> </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-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-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><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-6989586621679165842"><span class="annot"><span class="annottext">Text
+</span><a href="#local-6989586621679165842"><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,13 +86,13 @@ 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-6989586621679163161"><span class="hs-identifier hs-var">orderId</span></a></span><span class="hs-special">]</span><span>
+</span><a href="#local-6989586621679165842"><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>
 </span><span id="line-76"></span><span>
 </span><span id="line-77"></span><span>
-</span><span id="line-78"></span><span class="hs-comment">-- *** getInventory</span><span>
+</span><span id="line-78"></span><span class="annot"><span class="hs-comment">-- *** getInventory</span></span><span>
 </span><span id="line-79"></span><span>
 </span><span id="line-80"></span><span class="hs-comment">-- | @GET \/store\/inventory@</span><span>
 </span><span id="line-81"></span><span class="hs-comment">-- </span><span>
@@ -133,11 +133,11 @@ 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>
-</span><span id="line-95"></span><span class="hs-comment">-- | @application/json@</span><span>
+</span><span id="line-95"></span><span class="annot"><span class="hs-comment">-- | @application/json@</span></span><span>
 </span><span id="line-96"></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#GetInventory"><span class="hs-identifier hs-type">GetInventory</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-97"></span><span>
 </span><span id="line-98"></span><span>
-</span><span id="line-99"></span><span class="hs-comment">-- *** getOrderById</span><span>
+</span><span id="line-99"></span><span class="annot"><span class="hs-comment">-- *** getOrderById</span></span><span>
 </span><span id="line-100"></span><span>
 </span><span id="line-101"></span><span class="hs-comment">-- | @GET \/store\/order\/{order_id}@</span><span>
 </span><span id="line-102"></span><span class="hs-comment">-- </span><span>
@@ -145,17 +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 generate exceptions</span><span>
 </span><span id="line-106"></span><span class="hs-comment">-- </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-6989586621679163209"><span class="hs-identifier hs-type">accept</span></a></span></span><span>
+</span><span id="line-107"></span><span id="local-6989586621679165794"><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-6989586621679165794"><span class="hs-identifier hs-type">accept</span></a></span><span> </span><span class="annot"><span class="hs-comment">-- ^ request accept ('MimeType')</span></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="annot"><span class="hs-comment">-- ^ &quot;orderId&quot; -  ID of pet that needs to be fetched</span></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-6989586621679165794"><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-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 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-6989586621679165864"><span class="annot"><span class="annottext">Integer
+</span><a href="#local-6989586621679165864"><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
@@ -168,27 +168,27 @@ 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-6989586621679163140"><span class="hs-identifier hs-var">orderId</span></a></span><span class="hs-special">]</span><span>
+</span><a href="#local-6989586621679165864"><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>
+</span><span id="line-115"></span><span class="annot"><span class="hs-comment">-- | @application/xml@</span></span><span>
 </span><span id="line-116"></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#GetOrderById"><span class="hs-identifier hs-type">GetOrderById</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 id="line-117"></span><span class="hs-comment">-- | @application/json@</span><span>
+</span><span id="line-117"></span><span class="annot"><span class="hs-comment">-- | @application/json@</span></span><span>
 </span><span id="line-118"></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#GetOrderById"><span class="hs-identifier hs-type">GetOrderById</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-119"></span><span>
 </span><span id="line-120"></span><span>
-</span><span id="line-121"></span><span class="hs-comment">-- *** placeOrder</span><span>
+</span><span id="line-121"></span><span class="annot"><span class="hs-comment">-- *** placeOrder</span></span><span>
 </span><span id="line-122"></span><span>
 </span><span id="line-123"></span><span class="hs-comment">-- | @POST \/store\/order@</span><span>
 </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-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-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-127"></span><span id="local-6989586621679165802"><span id="local-6989586621679165806"><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-6989586621679165802"><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-6989586621679165802"><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-6989586621679165802"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><span class="hs-comment">-- ^ request content-type ('MimeType')</span></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-6989586621679165806"><span class="hs-identifier hs-type">accept</span></a></span><span> </span><span class="annot"><span class="hs-comment">-- ^ request accept ('MimeType')</span></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="annot"><span class="hs-comment">-- ^ &quot;body&quot; -  order placed for purchasing the pet</span></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-6989586621679165802"><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-6989586621679165806"><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
@@ -197,8 +197,8 @@ ContentType contentType
 -&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-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 class="hs-identifier">_</span></span><span> </span><span id="local-6989586621679165881"><span class="annot"><span class="annottext">Order
+</span><a href="#local-6989586621679165881"><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
@@ -217,20 +217,25 @@ forall req param contentType res accept.
  MimeRender contentType param) =&gt;
 OpenAPIPetstoreRequest req contentType res accept
 -&gt; param -&gt; OpenAPIPetstoreRequest req contentType res accept
+forall contentType res accept.
+(Consumes PlaceOrder contentType, MimeRender contentType Order) =&gt;
+OpenAPIPetstoreRequest PlaceOrder contentType res accept
+-&gt; Order
+-&gt; OpenAPIPetstoreRequest PlaceOrder 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-6989586621679163124"><span class="hs-identifier hs-var">body</span></a></span><span>
+</span><a href="#local-6989586621679165881"><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-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-139"></span><span class="annot"><span class="hs-comment">-- | /Body Param/ &quot;body&quot; - order placed for purchasing the pet</span></span><span>
+</span><span id="line-140"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679165884"><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-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-142"></span><span class="annot"><span class="hs-comment">-- | @*/*@</span></span><span>
+</span><span id="line-143"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679165819"><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-6989586621679165819"><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-6989586621679165819"><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-145"></span><span class="annot"><span class="hs-comment">-- | @application/xml@</span></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>
-</span><span id="line-147"></span><span class="hs-comment">-- | @application/json@</span><span>
+</span><span id="line-147"></span><span class="annot"><span class="hs-comment">-- | @application/json@</span></span><span>
 </span><span id="line-148"></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#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a></span><span>
 </span><span id="line-149"></span><span>
 </span><span id="line-150"></span></pre></body></html>

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

@@ -8,9 +8,9 @@
    Generated by OpenAPI Generator (https://openapi-generator.tech)
 -}</span><span>
 </span><span id="line-10"></span><span>
-</span><span id="line-11"></span><span class="hs-comment">{-|
+</span><span id="line-11"></span><span class="annot"><span class="hs-comment">{-|
 Module : OpenAPIPetstore.API.User
--}</span><span>
+-}</span></span><span>
 </span><span id="line-14"></span><span>
 </span><span id="line-15"></span><span class="hs-pragma">{-# LANGUAGE FlexibleContexts #-}</span><span>
 </span><span id="line-16"></span><span class="hs-pragma">{-# LANGUAGE FlexibleInstances #-}</span><span>
@@ -52,12 +52,12 @@ Module : OpenAPIPetstore.API.User
 </span><span id="line-52"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><span class="hs-identifier">Prelude</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-operator">(==)</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-operator">(/=)</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-operator">($)</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-operator">(.)</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-operator">(&lt;$&gt;)</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-operator">(&lt;*&gt;)</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-operator">(&gt;&gt;=)</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Maybe</span></span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Bool</span></span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Char</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Double</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">FilePath</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Float</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Int</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Integer</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">String</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">fmap</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">undefined</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">mempty</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">maybe</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">pure</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Monad</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Applicative</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Functor</span></span><span class="hs-special">)</span><span>
 </span><span id="line-53"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Prelude</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">P</span></span><span>
 </span><span id="line-54"></span><span>
-</span><span id="line-55"></span><span class="hs-comment">-- * Operations</span><span>
+</span><span id="line-55"></span><span class="annot"><span class="hs-comment">-- * Operations</span></span><span>
 </span><span id="line-56"></span><span>
 </span><span id="line-57"></span><span>
-</span><span id="line-58"></span><span class="hs-comment">-- ** User</span><span>
+</span><span id="line-58"></span><span class="annot"><span class="hs-comment">-- ** User</span></span><span>
 </span><span id="line-59"></span><span>
-</span><span id="line-60"></span><span class="hs-comment">-- *** createUser</span><span>
+</span><span id="line-60"></span><span class="annot"><span class="hs-comment">-- *** createUser</span></span><span>
 </span><span id="line-61"></span><span>
 </span><span id="line-62"></span><span class="hs-comment">-- | @POST \/user@</span><span>
 </span><span id="line-63"></span><span class="hs-comment">-- </span><span>
@@ -65,11 +65,11 @@ 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-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-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-68"></span><span id="local-6989586621679165530"><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-6989586621679165530"><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-6989586621679165530"><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-6989586621679165530"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><span class="hs-comment">-- ^ request content-type ('MimeType')</span></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="annot"><span class="hs-comment">-- ^ &quot;body&quot; -  Created user object</span></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-6989586621679165530"><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
@@ -77,8 +77,8 @@ ContentType contentType
 -&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-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 class="hs-identifier">_</span></span><span> </span><span id="local-6989586621679165626"><span class="annot"><span class="annottext">User
+</span><a href="#local-6989586621679165626"><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
@@ -100,31 +100,35 @@ forall req param contentType res accept.
  MimeRender contentType param) =&gt;
 OpenAPIPetstoreRequest req contentType res accept
 -&gt; param -&gt; OpenAPIPetstoreRequest req contentType res accept
+forall contentType res accept.
+(Consumes CreateUser contentType, MimeRender contentType User) =&gt;
+OpenAPIPetstoreRequest CreateUser contentType res accept
+-&gt; User -&gt; OpenAPIPetstoreRequest CreateUser 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-6989586621679162984"><span class="hs-identifier hs-var">body</span></a></span><span>
+</span><a href="#local-6989586621679165626"><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-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-79"></span><span class="annot"><span class="hs-comment">-- | /Body Param/ &quot;body&quot; - Created user object</span></span><span>
+</span><span id="line-80"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679165630"><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-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-82"></span><span class="annot"><span class="hs-comment">-- | @*/*@</span></span><span>
+</span><span id="line-83"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679165554"><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-6989586621679165554"><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-6989586621679165554"><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>
 </span><span id="line-87"></span><span>
-</span><span id="line-88"></span><span class="hs-comment">-- *** createUsersWithArrayInput</span><span>
+</span><span id="line-88"></span><span class="annot"><span class="hs-comment">-- *** createUsersWithArrayInput</span></span><span>
 </span><span id="line-89"></span><span>
 </span><span id="line-90"></span><span class="hs-comment">-- | @POST \/user\/createWithArray@</span><span>
 </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-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-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-94"></span><span id="local-6989586621679165559"><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-6989586621679165559"><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-6989586621679165559"><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-6989586621679165559"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><span class="hs-comment">-- ^ request content-type ('MimeType')</span></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="annot"><span class="hs-comment">-- ^ &quot;body&quot; -  List of user object</span></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-6989586621679165559"><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;
@@ -133,8 +137,8 @@ ContentType contentType
 -&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-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 class="hs-identifier">_</span></span><span> </span><span id="local-6989586621679165656"><span class="annot"><span class="annottext">Body
+</span><a href="#local-6989586621679165656"><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
@@ -156,31 +160,39 @@ forall req param contentType res accept.
  MimeRender contentType param) =&gt;
 OpenAPIPetstoreRequest req contentType res accept
 -&gt; param -&gt; OpenAPIPetstoreRequest req contentType res accept
+forall contentType res accept.
+(Consumes CreateUsersWithArrayInput contentType,
+ MimeRender contentType Body) =&gt;
+OpenAPIPetstoreRequest
+  CreateUsersWithArrayInput contentType res accept
+-&gt; Body
+-&gt; OpenAPIPetstoreRequest
+     CreateUsersWithArrayInput 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-6989586621679162960"><span class="hs-identifier hs-var">body</span></a></span><span>
+</span><a href="#local-6989586621679165656"><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-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-105"></span><span class="annot"><span class="hs-comment">-- | /Body Param/ &quot;body&quot; - List of user object</span></span><span>
+</span><span id="line-106"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679165658"><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-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-108"></span><span class="annot"><span class="hs-comment">-- | @*/*@</span></span><span>
+</span><span id="line-109"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679165564"><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-6989586621679165564"><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-6989586621679165564"><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>
 </span><span id="line-113"></span><span>
-</span><span id="line-114"></span><span class="hs-comment">-- *** createUsersWithListInput</span><span>
+</span><span id="line-114"></span><span class="annot"><span class="hs-comment">-- *** createUsersWithListInput</span></span><span>
 </span><span id="line-115"></span><span>
 </span><span id="line-116"></span><span class="hs-comment">-- | @POST \/user\/createWithList@</span><span>
 </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-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-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-120"></span><span id="local-6989586621679165566"><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-6989586621679165566"><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-6989586621679165566"><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-6989586621679165566"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><span class="hs-comment">-- ^ request content-type ('MimeType')</span></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="annot"><span class="hs-comment">-- ^ &quot;body&quot; -  List of user object</span></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-6989586621679165566"><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;
@@ -189,8 +201,8 @@ ContentType contentType
 -&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-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 class="hs-identifier">_</span></span><span> </span><span id="local-6989586621679165680"><span class="annot"><span class="annottext">Body
+</span><a href="#local-6989586621679165680"><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
@@ -212,21 +224,29 @@ forall req param contentType res accept.
  MimeRender contentType param) =&gt;
 OpenAPIPetstoreRequest req contentType res accept
 -&gt; param -&gt; OpenAPIPetstoreRequest req contentType res accept
+forall contentType res accept.
+(Consumes CreateUsersWithListInput contentType,
+ MimeRender contentType Body) =&gt;
+OpenAPIPetstoreRequest
+  CreateUsersWithListInput contentType res accept
+-&gt; Body
+-&gt; OpenAPIPetstoreRequest
+     CreateUsersWithListInput 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-6989586621679162942"><span class="hs-identifier hs-var">body</span></a></span><span>
+</span><a href="#local-6989586621679165680"><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-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-131"></span><span class="annot"><span class="hs-comment">-- | /Body Param/ &quot;body&quot; - List of user object</span></span><span>
+</span><span id="line-132"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679165682"><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-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-134"></span><span class="annot"><span class="hs-comment">-- | @*/*@</span></span><span>
+</span><span id="line-135"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679165570"><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-6989586621679165570"><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-6989586621679165570"><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>
 </span><span id="line-139"></span><span>
-</span><span id="line-140"></span><span class="hs-comment">-- *** deleteUser</span><span>
+</span><span id="line-140"></span><span class="annot"><span class="hs-comment">-- *** deleteUser</span></span><span>
 </span><span id="line-141"></span><span>
 </span><span id="line-142"></span><span class="hs-comment">-- | @DELETE \/user\/{username}@</span><span>
 </span><span id="line-143"></span><span class="hs-comment">-- </span><span>
@@ -235,13 +255,13 @@ OpenAPIPetstoreRequest req contentType res accept
 </span><span id="line-146"></span><span class="hs-comment">-- This can only be done by the logged in user.</span><span>
 </span><span id="line-147"></span><span class="hs-comment">-- </span><span>
 </span><span id="line-148"></span><span class="annot"><a href="OpenAPIPetstore.API.User.html#deleteUser"><span class="hs-identifier hs-type">deleteUser</span></a></span><span>
-</span><span id="line-149"></span><span>  </span><span class="hs-glyph">::</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 deleted</span><span>
+</span><span id="line-149"></span><span>  </span><span class="hs-glyph">::</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="annot"><span class="hs-comment">-- ^ &quot;username&quot; -  The name that needs to be deleted</span></span><span>
 </span><span id="line-150"></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#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> </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-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-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><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-6989586621679165697"><span class="annot"><span class="annottext">Text
+</span><a href="#local-6989586621679165697"><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
@@ -255,29 +275,29 @@ 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-6989586621679162930"><span class="hs-identifier hs-var">username</span></a></span><span class="hs-special">]</span><span>
+</span><a href="#local-6989586621679165697"><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>
 </span><span id="line-156"></span><span>
 </span><span id="line-157"></span><span>
-</span><span id="line-158"></span><span class="hs-comment">-- *** getUserByName</span><span>
+</span><span id="line-158"></span><span class="annot"><span class="hs-comment">-- *** getUserByName</span></span><span>
 </span><span id="line-159"></span><span>
 </span><span id="line-160"></span><span class="hs-comment">-- | @GET \/user\/{username}@</span><span>
 </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-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-6989586621679163057"><span class="hs-identifier hs-type">accept</span></a></span></span><span>
+</span><span id="line-164"></span><span id="local-6989586621679165574"><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-6989586621679165574"><span class="hs-identifier hs-type">accept</span></a></span><span> </span><span class="annot"><span class="hs-comment">-- ^ request accept ('MimeType')</span></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="annot"><span class="hs-comment">-- ^ &quot;username&quot; -  The name that needs to be fetched. Use user1 for testing.</span></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-6989586621679165574"><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-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 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-6989586621679165706"><span class="annot"><span class="annottext">Text
+</span><a href="#local-6989586621679165706"><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
@@ -290,35 +310,35 @@ 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-6989586621679162921"><span class="hs-identifier hs-var">username</span></a></span><span class="hs-special">]</span><span>
+</span><a href="#local-6989586621679165706"><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>
+</span><span id="line-172"></span><span class="annot"><span class="hs-comment">-- | @application/xml@</span></span><span>
 </span><span id="line-173"></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#GetUserByName"><span class="hs-identifier hs-type">GetUserByName</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 id="line-174"></span><span class="hs-comment">-- | @application/json@</span><span>
+</span><span id="line-174"></span><span class="annot"><span class="hs-comment">-- | @application/json@</span></span><span>
 </span><span id="line-175"></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#GetUserByName"><span class="hs-identifier hs-type">GetUserByName</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-176"></span><span>
 </span><span id="line-177"></span><span>
-</span><span id="line-178"></span><span class="hs-comment">-- *** loginUser</span><span>
+</span><span id="line-178"></span><span class="annot"><span class="hs-comment">-- *** loginUser</span></span><span>
 </span><span id="line-179"></span><span>
 </span><span id="line-180"></span><span class="hs-comment">-- | @GET \/user\/login@</span><span>
 </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-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-6989586621679163051"><span class="hs-identifier hs-type">accept</span></a></span></span><span>
+</span><span id="line-184"></span><span id="local-6989586621679165580"><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-6989586621679165580"><span class="hs-identifier hs-type">accept</span></a></span><span> </span><span class="annot"><span class="hs-comment">-- ^ request accept ('MimeType')</span></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="annot"><span class="hs-comment">-- ^ &quot;username&quot; -  The user name for login</span></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="annot"><span class="hs-comment">-- ^ &quot;password&quot; -  The password for login in clear text</span></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-6989586621679165580"><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-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 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-6989586621679165722"><span class="annot"><span class="annottext">Text
+</span><a href="#local-6989586621679165722"><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-6989586621679165724"><span class="annot"><span class="annottext">Text
+</span><a href="#local-6989586621679165724"><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
@@ -341,7 +361,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-6989586621679162905"><span class="hs-identifier hs-var">username</span></a></span><span class="hs-special">)</span><span>
+</span><a href="#local-6989586621679165722"><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
@@ -354,16 +374,16 @@ 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-6989586621679162903"><span class="hs-identifier hs-var">password</span></a></span><span class="hs-special">)</span><span>
+</span><a href="#local-6989586621679165724"><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>
+</span><span id="line-195"></span><span class="annot"><span class="hs-comment">-- | @application/xml@</span></span><span>
 </span><span id="line-196"></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#LoginUser"><span class="hs-identifier hs-type">LoginUser</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 id="line-197"></span><span class="hs-comment">-- | @application/json@</span><span>
+</span><span id="line-197"></span><span class="annot"><span class="hs-comment">-- | @application/json@</span></span><span>
 </span><span id="line-198"></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#LoginUser"><span class="hs-identifier hs-type">LoginUser</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-199"></span><span>
 </span><span id="line-200"></span><span>
-</span><span id="line-201"></span><span class="hs-comment">-- *** logoutUser</span><span>
+</span><span id="line-201"></span><span class="annot"><span class="hs-comment">-- *** logoutUser</span></span><span>
 </span><span id="line-202"></span><span>
 </span><span id="line-203"></span><span class="hs-comment">-- | @GET \/user\/logout@</span><span>
 </span><span id="line-204"></span><span class="hs-comment">-- </span><span>
@@ -390,7 +410,7 @@ Method
 </span><span id="line-213"></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#LogoutUser"><span class="hs-identifier hs-type">LogoutUser</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-214"></span><span>
 </span><span id="line-215"></span><span>
-</span><span id="line-216"></span><span class="hs-comment">-- *** updateUser</span><span>
+</span><span id="line-216"></span><span class="annot"><span class="hs-comment">-- *** updateUser</span></span><span>
 </span><span id="line-217"></span><span>
 </span><span id="line-218"></span><span class="hs-comment">-- | @PUT \/user\/{username}@</span><span>
 </span><span id="line-219"></span><span class="hs-comment">-- </span><span>
@@ -398,12 +418,12 @@ 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-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-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-224"></span><span id="local-6989586621679165593"><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-6989586621679165593"><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-6989586621679165593"><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-6989586621679165593"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><span class="hs-comment">-- ^ request content-type ('MimeType')</span></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="annot"><span class="hs-comment">-- ^ &quot;body&quot; -  Updated user object</span></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="annot"><span class="hs-comment">-- ^ &quot;username&quot; -  name that need to be deleted</span></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-6989586621679165593"><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
@@ -412,9 +432,9 @@ ContentType contentType
 -&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-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 class="hs-identifier">_</span></span><span> </span><span id="local-6989586621679165747"><span class="annot"><span class="annottext">User
+</span><a href="#local-6989586621679165747"><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-6989586621679165748"><span class="annot"><span class="annottext">Text
+</span><a href="#local-6989586621679165748"><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
@@ -428,7 +448,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-6989586621679162880"><span class="hs-identifier hs-var">username</span></a></span><span class="hs-special">]</span><span>
+</span><a href="#local-6989586621679165748"><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
@@ -439,16 +459,20 @@ forall req param contentType res accept.
  MimeRender contentType param) =&gt;
 OpenAPIPetstoreRequest req contentType res accept
 -&gt; param -&gt; OpenAPIPetstoreRequest req contentType res accept
+forall contentType res accept.
+(Consumes UpdateUser contentType, MimeRender contentType User) =&gt;
+OpenAPIPetstoreRequest UpdateUser contentType res accept
+-&gt; User -&gt; OpenAPIPetstoreRequest UpdateUser 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-6989586621679162881"><span class="hs-identifier hs-var">body</span></a></span><span>
+</span><a href="#local-6989586621679165747"><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-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-236"></span><span class="annot"><span class="hs-comment">-- | /Body Param/ &quot;body&quot; - Updated user object</span></span><span>
+</span><span id="line-237"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679165750"><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-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-239"></span><span class="annot"><span class="hs-comment">-- | @*/*@</span></span><span>
+</span><span id="line-240"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679165597"><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-6989586621679165597"><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-6989586621679165597"><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.API.html

@@ -8,9 +8,9 @@
    Generated by OpenAPI Generator (https://openapi-generator.tech)
 -}</span><span>
 </span><span id="line-10"></span><span>
-</span><span id="line-11"></span><span class="hs-comment">{-|
+</span><span id="line-11"></span><span class="annot"><span class="hs-comment">{-|
 Module : OpenAPIPetstore.API
--}</span><span>
+-}</span></span><span>
 </span><span id="line-14"></span><span>
 </span><span id="line-15"></span><span class="hs-keyword">module</span><span> </span><span class="hs-identifier">OpenAPIPetstore.API</span><span>
 </span><span id="line-16"></span><span>  </span><span class="hs-special">(</span><span> </span><span class="hs-keyword">module</span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.AnotherFake.html"><span class="hs-identifier">OpenAPIPetstore.API.AnotherFake</span></a></span><span>

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

@@ -8,10 +8,10 @@
    Generated by OpenAPI Generator (https://openapi-generator.tech)
 -}</span><span>
 </span><span id="line-10"></span><span>
-</span><span id="line-11"></span><span class="hs-comment">{-|
+</span><span id="line-11"></span><span class="annot"><span class="hs-comment">{-|
 Module : OpenAPIPetstore.Logging
 Logging functions
--}</span><span>
+-}</span></span><span>
 </span><span id="line-15"></span><span class="hs-pragma">{-# LANGUAGE CPP #-}</span><span class="hs-cpp">
 
 #ifdef USE_KATIP

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

@@ -8,10 +8,10 @@
    Generated by OpenAPI Generator (https://openapi-generator.tech)
 -}</span><span>
 </span><span id="line-10"></span><span>
-</span><span id="line-11"></span><span class="hs-comment">{-|
+</span><span id="line-11"></span><span class="annot"><span class="hs-comment">{-|
 Module : OpenAPIPetstore.LoggingKatip
 Katip Logging functions
--}</span><span>
+-}</span></span><span>
 </span><span id="line-15"></span><span>
 </span><span id="line-16"></span><span class="hs-pragma">{-# LANGUAGE OverloadedStrings #-}</span><span>
 </span><span id="line-17"></span><span class="hs-pragma">{-# LANGUAGE RankNTypes #-}</span><span>
@@ -31,24 +31,24 @@ Katip Logging functions
 </span><span id="line-31"></span><span>
 </span><span id="line-32"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Katip</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">LG</span></span><span>
 </span><span id="line-33"></span><span>
-</span><span id="line-34"></span><span class="hs-comment">-- * Type Aliases (for compatibility)</span><span>
+</span><span id="line-34"></span><span class="annot"><span class="hs-comment">-- * Type Aliases (for compatibility)</span></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-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-36"></span><span class="annot"><span class="hs-comment">-- | Runs a Katip logging block with the Log environment</span></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-6989586621679154251"><span class="annot"><a href="#local-6989586621679154251"><span class="hs-identifier hs-type">m</span></a></span></span><span> </span><span id="local-6989586621679154252"><span class="annot"><a href="#local-6989586621679154252"><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-6989586621679154251"><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-6989586621679154251"><span class="hs-identifier hs-type">m</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679154252"><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-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-40"></span><span class="annot"><span class="hs-comment">-- | A Katip logging block</span></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-6989586621679154253"><span class="annot"><a href="#local-6989586621679154253"><span class="hs-identifier hs-type">m</span></a></span></span><span> </span><span id="local-6989586621679154254"><span class="annot"><a href="#local-6989586621679154254"><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-6989586621679154253"><span class="hs-identifier hs-type">m</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679154254"><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-6989586621679154253"><span class="hs-identifier hs-type">m</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679154254"><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-43"></span><span class="annot"><span class="hs-comment">-- | A Katip Log environment</span></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>
 </span><span id="line-45"></span><span>
-</span><span id="line-46"></span><span class="hs-comment">-- | A Katip Log severity</span><span>
+</span><span id="line-46"></span><span class="annot"><span class="hs-comment">-- | A Katip Log severity</span></span><span>
 </span><span id="line-47"></span><span class="hs-keyword">type</span><span> </span><span id="LogLevel"><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#LogLevel"><span class="hs-identifier hs-var">LogLevel</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="hs-identifier hs-type">LG.Severity</span></span><span>
 </span><span id="line-48"></span><span>
-</span><span id="line-49"></span><span class="hs-comment">-- * default logger</span><span>
+</span><span id="line-49"></span><span class="annot"><span class="hs-comment">-- * default logger</span></span><span>
 </span><span id="line-50"></span><span>
-</span><span id="line-51"></span><span class="hs-comment">-- | the default log environment</span><span>
+</span><span id="line-51"></span><span class="annot"><span class="hs-comment">-- | the default log environment</span></span><span>
 </span><span id="line-52"></span><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#initLogContext"><span class="hs-identifier hs-type">initLogContext</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">IO</span></span><span> </span><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#LogContext"><span class="hs-identifier hs-type">LogContext</span></a></span><span>
 </span><span id="line-53"></span><span id="initLogContext"><span class="annot"><span class="annottext">initLogContext :: IO LogContext
 </span><a href="OpenAPIPetstore.LoggingKatip.html#initLogContext"><span class="hs-identifier hs-var hs-var">initLogContext</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Namespace -&gt; Environment -&gt; IO LogContext
@@ -56,29 +56,29 @@ Katip Logging functions
 </span><span class="hs-string">&quot;OpenAPIPetstore&quot;</span></span><span> </span><span class="annot"><span class="annottext">Environment
 </span><span class="hs-string">&quot;dev&quot;</span></span><span>
 </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-55"></span><span class="annot"><span class="hs-comment">-- | Runs a Katip logging block with the Log environment</span></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 :: 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>
-</span><span id="line-59"></span><span class="hs-comment">-- * stdout logger</span><span>
+</span><span id="line-59"></span><span class="annot"><span class="hs-comment">-- * stdout logger</span></span><span>
 </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-61"></span><span class="annot"><span class="hs-comment">-- | Runs a Katip logging block with the Log environment</span></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 :: 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>
 </span><span id="line-64"></span><span>
-</span><span id="line-65"></span><span class="hs-comment">-- | A Katip Log environment which targets stdout</span><span>
+</span><span id="line-65"></span><span class="annot"><span class="hs-comment">-- | A Katip Log environment which targets stdout</span></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-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><a href="OpenAPIPetstore.LoggingKatip.html#stdoutLoggingContext"><span class="hs-identifier hs-var hs-var">stdoutLoggingContext</span></a></span></span><span> </span><span id="local-6989586621679154266"><span class="annot"><span class="annottext">LogContext
+</span><a href="#local-6989586621679154266"><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-6989586621679154267"><span class="annot"><span class="annottext">Scribe
+</span><a href="#local-6989586621679154267"><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,26 +89,26 @@ 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-6989586621679151679"><span class="hs-identifier hs-var">handleScribe</span></a></span><span> </span><span class="annot"><span class="annottext">ScribeSettings
+</span><a href="#local-6989586621679154267"><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-6989586621679151680"><span class="hs-identifier hs-var">cxt</span></a></span><span>
+</span><a href="#local-6989586621679154266"><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-71"></span><span class="annot"><span class="hs-comment">-- * stderr logger</span></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-73"></span><span class="annot"><span class="hs-comment">-- | Runs a Katip logging block with the Log environment</span></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 :: 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>
 </span><span id="line-76"></span><span>
-</span><span id="line-77"></span><span class="hs-comment">-- | A Katip Log environment which targets stderr</span><span>
+</span><span id="line-77"></span><span class="annot"><span class="hs-comment">-- | A Katip Log environment which targets stderr</span></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-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><a href="OpenAPIPetstore.LoggingKatip.html#stderrLoggingContext"><span class="hs-identifier hs-var hs-var">stderrLoggingContext</span></a></span></span><span> </span><span id="local-6989586621679154281"><span class="annot"><span class="annottext">LogContext
+</span><a href="#local-6989586621679154281"><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-6989586621679154282"><span class="annot"><span class="annottext">Scribe
+</span><a href="#local-6989586621679154282"><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-6989586621679151664"><span class="hs-identifier hs-var">handleScribe</span></a></span><span> </span><span class="annot"><span class="annottext">ScribeSettings
+</span><a href="#local-6989586621679154282"><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-6989586621679151665"><span class="hs-identifier hs-var">cxt</span></a></span><span>
+</span><a href="#local-6989586621679154281"><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-83"></span><span class="annot"><span class="hs-comment">-- * Null logger</span></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-85"></span><span class="annot"><span class="hs-comment">-- | Disables Katip logging</span></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 :: 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
+</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-6989586621679154293"><span class="annot"><span class="annottext">LogContext
+</span><a href="#local-6989586621679154293"><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-6989586621679154295"><span class="annot"><span class="annottext">ReaderT LogContext m a
+</span><a href="#local-6989586621679154295"><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-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
+</span><span class="hs-identifier hs-var">P.runReaderT</span></span><span> </span><span class="annot"><span class="annottext">ReaderT LogContext m a
+</span><a href="#local-6989586621679154295"><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,19 +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-6989586621679151653"><span class="hs-identifier hs-var">le</span></a></span><span class="hs-special">)</span><span>
+</span><a href="#local-6989586621679154293"><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-89"></span><span class="annot"><span class="hs-comment">-- * Log Msg</span></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-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-91"></span><span class="annot"><span class="hs-comment">-- | Log a katip message</span></span><span>
+</span><span id="line-92"></span><span id="local-6989586621679154209"><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-6989586621679154209"><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-6989586621679154209"><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-6989586621679154209"><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><a href="OpenAPIPetstore.LoggingKatip.html#_log"><span class="hs-identifier hs-var hs-var">_log</span></a></span></span><span> </span><span id="local-6989586621679154307"><span class="annot"><span class="annottext">Text
+</span><a href="#local-6989586621679154307"><span class="hs-identifier hs-var">src</span></a></span></span><span> </span><span id="local-6989586621679154308"><span class="annot"><span class="annottext">Severity
+</span><a href="#local-6989586621679154308"><span class="hs-identifier hs-var">level</span></a></span></span><span> </span><span id="local-6989586621679154309"><span class="annot"><span class="annottext">Text
+</span><a href="#local-6989586621679154309"><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;
@@ -172,36 +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-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
+</span><a href="#local-6989586621679154307"><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-6989586621679154308"><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-6989586621679151631"><span class="hs-identifier hs-var">msg</span></a></span><span class="hs-special">)</span><span>
+</span><a href="#local-6989586621679154309"><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-96"></span><span class="annot"><span class="hs-comment">-- * Log Exceptions</span></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-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-98"></span><span class="annot"><span class="hs-comment">-- | re-throws exceptions after logging them</span></span><span>
+</span><span id="line-99"></span><span id="local-6989586621679154220"><span id="local-6989586621679154222"><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-6989586621679154220"><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-6989586621679154220"><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-6989586621679154220"><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-6989586621679154220"><span class="hs-identifier hs-type">m</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679154222"><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-6989586621679154220"><span class="hs-identifier hs-type">m</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679154222"><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><a href="OpenAPIPetstore.LoggingKatip.html#logExceptions"><span class="hs-identifier hs-var hs-var">logExceptions</span></a></span></span><span> </span><span id="local-6989586621679154333"><span class="annot"><span class="annottext">Text
+</span><a href="#local-6989586621679154333"><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-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-104"></span><span>    </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span class="hs-special">(</span><span id="local-6989586621679154335"><span class="annot"><span class="annottext">SomeException
+</span><a href="#local-6989586621679154335"><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-6989586621679151608"><span class="hs-identifier hs-var">src</span></a></span><span> </span><span class="annot"><span class="annottext">Severity
+</span><a href="#local-6989586621679154333"><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
@@ -209,13 +209,13 @@ 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-6989586621679151606"><span class="hs-identifier hs-var">e</span></a></span><span class="hs-special">)</span><span>
+</span><a href="#local-6989586621679154335"><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-6989586621679151606"><span class="hs-identifier hs-var">e</span></a></span><span class="hs-special">)</span><span>
+</span><a href="#local-6989586621679154335"><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-108"></span><span class="annot"><span class="hs-comment">-- * Log Level</span></span><span>
 </span><span id="line-109"></span><span>
 </span><span id="line-110"></span><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#levelInfo"><span class="hs-identifier hs-type">levelInfo</span></a></span><span> </span><span class="hs-glyph">::</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 id="line-111"></span><span id="levelInfo"><span class="annot"><span class="annottext">levelInfo :: Severity

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

@@ -8,9 +8,9 @@
    Generated by OpenAPI Generator (https://openapi-generator.tech)
 -}</span><span>
 </span><span id="line-10"></span><span>
-</span><span id="line-11"></span><span class="hs-comment">{-|
+</span><span id="line-11"></span><span class="annot"><span class="hs-comment">{-|
 Module : OpenAPIPetstore.MimeTypes
--}</span><span>
+-}</span></span><span>
 </span><span id="line-14"></span><span>
 </span><span id="line-15"></span><span class="hs-pragma">{-# LANGUAGE ConstraintKinds #-}</span><span>
 </span><span id="line-16"></span><span class="hs-pragma">{-# LANGUAGE ExistentialQuantification #-}</span><span>
@@ -42,25 +42,25 @@ Module : OpenAPIPetstore.MimeTypes
 </span><span id="line-42"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><span class="hs-identifier">Prelude</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-operator">($)</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-operator">(.)</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-operator">(&lt;$&gt;)</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-operator">(&lt;*&gt;)</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Maybe</span></span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Bool</span></span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Char</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Double</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">FilePath</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Float</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Int</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Integer</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">String</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">fmap</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">undefined</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">mempty</span></span><span class="hs-special">)</span><span>
 </span><span id="line-43"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Prelude</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">P</span></span><span>
 </span><span id="line-44"></span><span>
-</span><span id="line-45"></span><span class="hs-comment">-- * ContentType MimeType</span><span>
+</span><span id="line-45"></span><span class="annot"><span class="hs-comment">-- * ContentType MimeType</span></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-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-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-6989586621679154361"><span class="annot"><a href="#local-6989586621679154361"><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-6989586621679154361"><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-6989586621679154361"><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-49"></span><span class="annot"><span class="hs-comment">-- * Accept MimeType</span></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-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-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-6989586621679154365"><span class="annot"><a href="#local-6989586621679154365"><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-6989586621679154365"><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-6989586621679154365"><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-53"></span><span class="annot"><span class="hs-comment">-- * Consumes Class</span></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-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-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-6989586621679154369"><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-6989586621679154368"><span class="annot"><a href="#local-6989586621679154368"><span class="hs-identifier hs-type">req</span></a></span></span><span> </span><span id="local-6989586621679154369"><span class="annot"><a href="#local-6989586621679154369"><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-57"></span><span class="annot"><span class="hs-comment">-- * Produces Class</span></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-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-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-6989586621679154372"><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-6989586621679154371"><span class="annot"><a href="#local-6989586621679154371"><span class="hs-identifier hs-type">req</span></a></span></span><span> </span><span id="local-6989586621679154372"><span class="annot"><a href="#local-6989586621679154372"><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-61"></span><span class="annot"><span class="hs-comment">-- * Default Mime Types</span></span><span>
 </span><span id="line-62"></span><span>
 </span><span id="line-63"></span><span class="hs-keyword">data</span><span> </span><span id="MimeJSON"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-var">MimeJSON</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span id="MimeJSON"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-var">MimeJSON</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-64"></span><span class="hs-keyword">data</span><span> </span><span id="MimeXML"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier hs-var">MimeXML</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span id="MimeXML"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier hs-var">MimeXML</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>
@@ -71,9 +71,9 @@ Module : OpenAPIPetstore.MimeTypes
 </span><span id="line-69"></span><span class="hs-keyword">data</span><span> </span><span id="MimeNoContent"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-var">MimeNoContent</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span id="MimeNoContent"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-var">MimeNoContent</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-70"></span><span class="hs-keyword">data</span><span> </span><span id="MimeAny"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeAny"><span class="hs-identifier hs-var">MimeAny</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span id="MimeAny"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeAny"><span class="hs-identifier hs-var">MimeAny</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-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-72"></span><span class="annot"><span class="hs-comment">-- | A type for responses without content-body.</span></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-6989586621679152183"><span id="local-6989586621679152185"><span id="local-6989586621679152187"><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-6989586621679154467"><span id="local-6989586621679154469"><span id="local-6989586621679154473"><span class="annot"><span class="annottext">Int -&gt; NoContent -&gt; ShowS
 [NoContent] -&gt; ShowS
 NoContent -&gt; String
 (Int -&gt; NoContent -&gt; ShowS)
@@ -82,79 +82,79 @@ NoContent -&gt; String
 -&gt; Show NoContent
 forall a.
 (Int -&gt; a -&gt; ShowS) -&gt; (a -&gt; String) -&gt; ([a] -&gt; ShowS) -&gt; Show a
-showList :: [NoContent] -&gt; ShowS
-$cshowList :: [NoContent] -&gt; ShowS
-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-6989586621679152178"><span id="local-6989586621679152180"><span class="annot"><span class="annottext">NoContent -&gt; NoContent -&gt; Bool
+showsPrec :: Int -&gt; NoContent -&gt; ShowS
+$cshow :: NoContent -&gt; String
+show :: NoContent -&gt; String
+$cshowList :: [NoContent] -&gt; ShowS
+showList :: [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-6989586621679154477"><span id="local-6989586621679154479"><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
-/= :: NoContent -&gt; NoContent -&gt; Bool
-$c/= :: NoContent -&gt; NoContent -&gt; Bool
-== :: NoContent -&gt; NoContent -&gt; Bool
 $c== :: NoContent -&gt; NoContent -&gt; Bool
+== :: NoContent -&gt; NoContent -&gt; Bool
+$c/= :: NoContent -&gt; NoContent -&gt; Bool
+/= :: NoContent -&gt; NoContent -&gt; Bool
 </span><span class="hs-identifier hs-var hs-var hs-var hs-var hs-var hs-var">P.Eq</span></span></span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-identifier hs-type">P.Typeable</span></span><span class="hs-special">)</span><span>
 </span><span id="line-75"></span><span>
 </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-77"></span><span class="annot"><span class="hs-comment">-- * MimeType Class</span></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-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-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-6989586621679154378"><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-6989586621679154378"><span class="annot"><a href="#local-6989586621679154378"><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-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-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-6989586621679154378"><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-6989586621679154487"><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-6989586621679154489"><span class="annot"><span class="annottext">Proxy mtype
+</span><a href="#local-6989586621679154489"><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-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><a href="#local-6989586621679154489"><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-6989586621679154490"><span class="annot"><span class="annottext">MediaType
+</span><a href="#local-6989586621679154490"><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-6989586621679154490"><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-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-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-6989586621679154378"><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-6989586621679154491"><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-6989586621679154493"><span class="annot"><span class="annottext">Proxy mtype
+</span><a href="#local-6989586621679154493"><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-6989586621679152166"><span class="hs-identifier hs-var">p</span></a></span><span> </span><span class="hs-keyword">of</span><span>
+</span><a href="#local-6989586621679154493"><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-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 id="line-92"></span><span>      </span><span class="hs-special">(</span><span id="local-6989586621679154494"><span class="annot"><span class="annottext">MediaType
+</span><a href="#local-6989586621679154494"><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-6989586621679152165"><span class="hs-identifier hs-var">x</span></a></span></span><span>
+</span><a href="#local-6989586621679154494"><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-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 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-6989586621679154378"><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-6989586621679154496"><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-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 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-6989586621679154378"><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-6989586621679154378"><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-6989586621679154500"><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-6989586621679152366"><span class="hs-identifier hs-type">mtype</span></a></span><span class="hs-special">)</span></span><span>
+</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-6989586621679154378"><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-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 id="line-101"></span><span class="annot"><span class="hs-comment">-- | @application/json; charset=utf-8@</span></span><span>
+</span><span id="line-102"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154505"><span id="local-6989586621679154510"><span id="local-6989586621679154513"><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-6989586621679154518"><span class="annot"><span class="annottext">mimeType :: Proxy MimeJSON -&gt; Maybe MediaType
+</span><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><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
@@ -163,10 +163,10 @@ 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;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-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 id="line-104"></span><span class="annot"><span class="hs-comment">-- | @application/xml; charset=utf-8@</span></span><span>
+</span><span id="line-105"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154522"><span id="local-6989586621679154527"><span id="local-6989586621679154530"><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-6989586621679154533"><span class="annot"><span class="annottext">mimeType :: Proxy MimeXML -&gt; Maybe MediaType
+</span><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><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
@@ -175,10 +175,10 @@ 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;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-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 id="line-107"></span><span class="annot"><span class="hs-comment">-- | @application/x-www-form-urlencoded@</span></span><span>
+</span><span id="line-108"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154537"><span id="local-6989586621679154542"><span id="local-6989586621679154545"><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-6989586621679154548"><span class="annot"><span class="annottext">mimeType :: Proxy MimeFormUrlEncoded -&gt; Maybe MediaType
+</span><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><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
@@ -187,10 +187,10 @@ 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;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-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 id="line-110"></span><span class="annot"><span class="hs-comment">-- | @multipart/form-data@</span></span><span>
+</span><span id="line-111"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154552"><span id="local-6989586621679154557"><span id="local-6989586621679154560"><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-6989586621679154563"><span class="annot"><span class="annottext">mimeType :: Proxy MimeMultipartFormData -&gt; Maybe MediaType
+</span><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><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
@@ -199,10 +199,10 @@ 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;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-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 id="line-113"></span><span class="annot"><span class="hs-comment">-- | @text/plain; charset=utf-8@</span></span><span>
+</span><span id="line-114"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154567"><span id="local-6989586621679154572"><span id="local-6989586621679154575"><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-6989586621679154578"><span class="annot"><span class="annottext">mimeType :: Proxy MimePlainText -&gt; Maybe MediaType
+</span><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><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
@@ -211,10 +211,10 @@ 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;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-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 id="line-116"></span><span class="annot"><span class="hs-comment">-- | @application/octet-stream@</span></span><span>
+</span><span id="line-117"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154582"><span id="local-6989586621679154587"><span id="local-6989586621679154590"><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-6989586621679154593"><span class="annot"><span class="annottext">mimeType :: Proxy MimeOctetStream -&gt; Maybe MediaType
+</span><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><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
@@ -223,10 +223,10 @@ 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;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-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 id="line-119"></span><span class="annot"><span class="hs-comment">-- | @&quot;*/*&quot;@</span></span><span>
+</span><span id="line-120"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154597"><span id="local-6989586621679154602"><span id="local-6989586621679154605"><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-6989586621679154608"><span class="annot"><span class="annottext">mimeType :: Proxy MimeAny -&gt; Maybe MediaType
+</span><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><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,31 +235,31 @@ 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-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 id="line-122"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154612"><span id="local-6989586621679154617"><span id="local-6989586621679154620"><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-6989586621679154622"><span class="annot"><span class="annottext">mimeType :: Proxy MimeNoContent -&gt; Maybe MediaType
+</span><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><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-125"></span><span class="annot"><span class="hs-comment">-- * MimeRender Class</span></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-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
+</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-6989586621679154396"><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-6989586621679154396"><span class="annot"><a href="#local-6989586621679154396"><span class="hs-identifier hs-type">mtype</span></a></span></span><span> </span><span id="local-6989586621679154397"><span class="annot"><a href="#local-6989586621679154397"><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-6989586621679154396"><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-6989586621679154397"><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-6989586621679154396"><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-6989586621679154397"><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-6989586621679154627"><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-6989586621679154629"><span class="annot"><span class="annottext">x
+</span><a href="#local-6989586621679154629"><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-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 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-6989586621679154396"><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-6989586621679154629"><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-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-133"></span><span id="local-6989586621679154400"><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-6989586621679154400"><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-6989586621679154400"><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
@@ -273,145 +273,146 @@ forall a. ToHttpApiData a =&gt; a -&gt; Text
 </span><span id="line-135"></span><span>
 </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-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 id="line-138"></span><span class="annot"><span class="hs-comment">-- | `A.encode`</span></span><span>
+</span><span id="line-139"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154411"><span id="local-6989586621679154642"><span class="annot"><span class="hs-identifier hs-type">A.ToJSON</span></span><span> </span><span class="annot"><a href="#local-6989586621679154411"><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-6989586621679154411"><span class="hs-identifier hs-type">a</span></a></span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679154647"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeJSON -&gt; a -&gt; ByteString
+</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy 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-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 hs-var">A.encode</span></span><span>
+</span><span id="line-140"></span><span class="annot"><span class="hs-comment">-- | @WH.urlEncodeAsForm@</span></span><span>
+</span><span id="line-141"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154415"><span id="local-6989586621679154653"><span class="annot"><span class="hs-identifier hs-type">WH.ToForm</span></span><span> </span><span class="annot"><a href="#local-6989586621679154415"><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-6989586621679154415"><span class="hs-identifier hs-type">a</span></a></span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679154657"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeFormUrlEncoded -&gt; a -&gt; ByteString
+</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy 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 class="hs-identifier hs-var">WH.urlEncodeAsForm</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-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 id="line-143"></span><span class="annot"><span class="hs-comment">-- | @P.id@</span></span><span>
+</span><span id="line-144"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154663"><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-6989586621679154666"><span class="annot"><span class="annottext">mimeRender :: Proxy MimePlainText -&gt; ByteString -&gt; ByteString
+</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy 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-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 id="line-145"></span><span class="annot"><span class="hs-comment">-- | @BL.fromStrict . T.encodeUtf8@</span></span><span>
+</span><span id="line-146"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154672"><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-6989586621679154675"><span class="annot"><span class="annottext">mimeRender :: Proxy MimePlainText -&gt; Text -&gt; ByteString
+</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy 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
 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-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 id="line-147"></span><span class="annot"><span class="hs-comment">-- | @BCL.pack@</span></span><span>
+</span><span id="line-148"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154680"><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-6989586621679154683"><span class="annot"><span class="annottext">mimeRender :: Proxy MimePlainText -&gt; String -&gt; ByteString
+</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy 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-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 id="line-150"></span><span class="annot"><span class="hs-comment">-- | @P.id@</span></span><span>
+</span><span id="line-151"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154689"><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-6989586621679154692"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeOctetStream -&gt; ByteString -&gt; ByteString
+</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy 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-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 id="line-152"></span><span class="annot"><span class="hs-comment">-- | @BL.fromStrict . T.encodeUtf8@</span></span><span>
+</span><span id="line-153"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154697"><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-6989586621679154700"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeOctetStream -&gt; Text -&gt; ByteString
+</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy 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
 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-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 id="line-154"></span><span class="annot"><span class="hs-comment">-- | @BCL.pack@</span></span><span>
+</span><span id="line-155"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154705"><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-6989586621679154708"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeOctetStream -&gt; String -&gt; ByteString
+</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy 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-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 id="line-157"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154713"><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-6989586621679154716"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -&gt; ByteString -&gt; ByteString
+</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeMultipartFormData
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">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-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 id="line-159"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154721"><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-6989586621679154726"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -&gt; Bool -&gt; ByteString
+</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeMultipartFormData
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">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-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 id="line-160"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154731"><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-6989586621679154736"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -&gt; Char -&gt; ByteString
+</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeMultipartFormData
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">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-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 id="line-161"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154741"><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-6989586621679154746"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -&gt; Double -&gt; ByteString
+</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeMultipartFormData
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">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-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 id="line-162"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154751"><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-6989586621679154756"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -&gt; Float -&gt; ByteString
+</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeMultipartFormData
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">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-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 id="line-163"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154761"><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-6989586621679154766"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -&gt; Int -&gt; ByteString
+</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeMultipartFormData
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">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-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 id="line-164"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154771"><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-6989586621679154776"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -&gt; Integer -&gt; ByteString
+</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeMultipartFormData
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">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-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 id="line-165"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154781"><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-6989586621679154786"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -&gt; String -&gt; ByteString
+</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeMultipartFormData
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">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-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 id="line-166"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154791"><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-6989586621679154796"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -&gt; Text -&gt; ByteString
+</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeMultipartFormData
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">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-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 id="line-168"></span><span class="annot"><span class="hs-comment">-- | @P.Right . P.const NoContent@</span></span><span>
+</span><span id="line-169"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154801"><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-6989586621679154804"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeNoContent -&gt; NoContent -&gt; ByteString
+</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy 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
 </span><span class="hs-identifier hs-var">BCL.empty</span></span><span>
 </span><span id="line-170"></span><span>
 </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-172"></span><span class="annot"><span class="hs-comment">-- * MimeUnrender Class</span></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-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
+</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-6989586621679154420"><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-6989586621679154420"><span class="annot"><a href="#local-6989586621679154420"><span class="hs-identifier hs-type">mtype</span></a></span></span><span> </span><span id="local-6989586621679154421"><span class="annot"><a href="#local-6989586621679154421"><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-6989586621679154420"><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-6989586621679154421"><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-6989586621679154420"><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-6989586621679154421"><span class="hs-identifier hs-type">o</span></a></span><span>
+</span><span id="line-177"></span><span>    </span><span id="local-6989586621679154811"><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-6989586621679154813"><span class="annot"><span class="annottext">ByteString
+</span><a href="#local-6989586621679154813"><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-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 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-6989586621679154420"><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-6989586621679154813"><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-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 id="line-181"></span><span class="annot"><span class="hs-comment">-- | @A.eitherDecode@</span></span><span>
+</span><span id="line-182"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154425"><span id="local-6989586621679154819"><span class="annot"><span class="hs-identifier hs-type">A.FromJSON</span></span><span> </span><span class="annot"><a href="#local-6989586621679154425"><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-6989586621679154425"><span class="hs-identifier hs-type">a</span></a></span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679154824"><span class="annot"><span class="annottext">mimeUnrender :: Proxy MimeJSON -&gt; ByteString -&gt; Either String a
+</span><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender"><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-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 hs-var">A.eitherDecode</span></span><span>
+</span><span id="line-183"></span><span class="annot"><span class="hs-comment">-- | @P.left T.unpack . WH.urlDecodeAsForm@</span></span><span>
+</span><span id="line-184"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154429"><span id="local-6989586621679154831"><span class="annot"><span class="hs-identifier hs-type">WH.FromForm</span></span><span> </span><span class="annot"><a href="#local-6989586621679154429"><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-6989586621679154429"><span class="hs-identifier hs-type">a</span></a></span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679154837"><span class="annot"><span class="annottext">mimeUnrender :: Proxy MimeFormUrlEncoded -&gt; ByteString -&gt; Either String a
+</span><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender"><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 b c d. (b -&gt; c) -&gt; Either b d -&gt; Either c d
 forall (a :: * -&gt; * -&gt; *) b c d.
 ArrowChoice a =&gt;
 a b c -&gt; a (Either b d) (Either c d)
@@ -421,11 +422,11 @@ a b c -&gt; a (Either b d) (Either c d)
 forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
 </span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">ByteString -&gt; Either Text a
 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 class="hs-identifier hs-var">WH.urlDecodeAsForm</span></span><span>
+</span><span id="line-185"></span><span class="annot"><span class="hs-comment">-- | @P.Right . P.id@</span></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-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 id="line-187"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154844"><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-6989586621679154847"><span class="annot"><span class="annottext">mimeUnrender :: Proxy MimePlainText -&gt; ByteString -&gt; Either String ByteString
+</span><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender"><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)
@@ -436,11 +437,12 @@ 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
 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-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 id="line-188"></span><span class="annot"><span class="hs-comment">-- | @P.left P.show . TL.decodeUtf8'@</span></span><span>
+</span><span id="line-189"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154852"><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-6989586621679154858"><span class="annot"><span class="annottext">mimeUnrender :: Proxy MimePlainText -&gt; ByteString -&gt; Either String Text
+</span><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender"><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 b c d. (b -&gt; c) -&gt; Either b d -&gt; Either c d
 forall (a :: * -&gt; * -&gt; *) b c d.
 ArrowChoice a =&gt;
 a b c -&gt; a (Either b d) (Either c d)
@@ -459,9 +461,9 @@ forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
 forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
 </span><span class="hs-operator hs-var">.</span></span><span> </span><span class="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-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 id="line-190"></span><span class="annot"><span class="hs-comment">-- | @P.Right . BCL.unpack@</span></span><span>
+</span><span id="line-191"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154866"><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-6989586621679154869"><span class="annot"><span class="annottext">mimeUnrender :: Proxy MimePlainText -&gt; ByteString -&gt; Either String String
+</span><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender"><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)
@@ -470,9 +472,9 @@ 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; String
 </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-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 id="line-193"></span><span class="annot"><span class="hs-comment">-- | @P.Right . P.id@</span></span><span>
+</span><span id="line-194"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154875"><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-6989586621679154878"><span class="annot"><span class="annottext">mimeUnrender :: Proxy MimeOctetStream -&gt; ByteString -&gt; Either String ByteString
+</span><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender"><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)
@@ -483,11 +485,12 @@ 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
 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-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 id="line-195"></span><span class="annot"><span class="hs-comment">-- | @P.left P.show . T.decodeUtf8' . BL.toStrict@</span></span><span>
+</span><span id="line-196"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154883"><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-6989586621679154888"><span class="annot"><span class="annottext">mimeUnrender :: Proxy MimeOctetStream -&gt; ByteString -&gt; Either String Text
+</span><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender"><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 b c d. (b -&gt; c) -&gt; Either b d -&gt; Either c d
 forall (a :: * -&gt; * -&gt; *) b c d.
 ArrowChoice a =&gt;
 a b c -&gt; a (Either b d) (Either c d)
@@ -506,9 +509,9 @@ forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
 forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
 </span><span class="hs-operator hs-var">.</span></span><span> </span><span class="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-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 id="line-197"></span><span class="annot"><span class="hs-comment">-- | @P.Right . BCL.unpack@</span></span><span>
+</span><span id="line-198"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154893"><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-6989586621679154896"><span class="annot"><span class="annottext">mimeUnrender :: Proxy MimeOctetStream -&gt; ByteString -&gt; Either String String
+</span><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender"><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)
@@ -517,9 +520,9 @@ 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; String
 </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-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 id="line-200"></span><span class="annot"><span class="hs-comment">-- | @P.Right . P.const NoContent@</span></span><span>
+</span><span id="line-201"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154901"><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-6989586621679154904"><span class="annot"><span class="annottext">mimeUnrender :: Proxy MimeNoContent -&gt; ByteString -&gt; Either String NoContent
+</span><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender"><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)
@@ -533,16 +536,16 @@ forall a b. a -&gt; b -&gt; a
 </span><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-var">NoContent</span></a></span><span>
 </span><span id="line-202"></span><span>
 </span><span id="line-203"></span><span>
-</span><span id="line-204"></span><span class="hs-comment">-- * Custom Mime Types</span><span>
+</span><span id="line-204"></span><span class="annot"><span class="hs-comment">-- * Custom Mime Types</span></span><span>
 </span><span id="line-205"></span><span>
-</span><span id="line-206"></span><span class="hs-comment">-- ** MimeXmlCharsetutf16</span><span>
+</span><span id="line-206"></span><span class="annot"><span class="hs-comment">-- ** MimeXmlCharsetutf16</span></span><span>
 </span><span id="line-207"></span><span>
 </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-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 id="line-210"></span><span class="annot"><span class="hs-comment">-- | @application/xml; charset=utf-16@</span></span><span>
+</span><span id="line-211"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154909"><span id="local-6989586621679154914"><span id="local-6989586621679154917"><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-6989586621679154920"><span class="annot"><span class="annottext">mimeType :: Proxy MimeXmlCharsetutf16 -&gt; Maybe MediaType
+</span><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><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
@@ -554,14 +557,14 @@ forall a. IsString a =&gt; String -&gt; a
 </span><span id="line-213"></span><span class="hs-comment">-- instance MimeRender MimeXmlCharsetutf16 T.Text where mimeRender _ = undefined</span><span>
 </span><span id="line-214"></span><span class="hs-comment">-- instance MimeUnrender MimeXmlCharsetutf16 T.Text where mimeUnrender _ = undefined</span><span>
 </span><span id="line-215"></span><span>
-</span><span id="line-216"></span><span class="hs-comment">-- ** MimeXmlCharsetutf8</span><span>
+</span><span id="line-216"></span><span class="annot"><span class="hs-comment">-- ** MimeXmlCharsetutf8</span></span><span>
 </span><span id="line-217"></span><span>
 </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-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 id="line-220"></span><span class="annot"><span class="hs-comment">-- | @application/xml; charset=utf-8@</span></span><span>
+</span><span id="line-221"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154925"><span id="local-6989586621679154930"><span id="local-6989586621679154933"><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-6989586621679154936"><span class="annot"><span class="annottext">mimeType :: Proxy MimeXmlCharsetutf8 -&gt; Maybe MediaType
+</span><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><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
@@ -573,14 +576,14 @@ forall a. IsString a =&gt; String -&gt; a
 </span><span id="line-223"></span><span class="hs-comment">-- instance MimeRender MimeXmlCharsetutf8 T.Text where mimeRender _ = undefined</span><span>
 </span><span id="line-224"></span><span class="hs-comment">-- instance MimeUnrender MimeXmlCharsetutf8 T.Text where mimeUnrender _ = undefined</span><span>
 </span><span id="line-225"></span><span>
-</span><span id="line-226"></span><span class="hs-comment">-- ** MimeTextXml</span><span>
+</span><span id="line-226"></span><span class="annot"><span class="hs-comment">-- ** MimeTextXml</span></span><span>
 </span><span id="line-227"></span><span>
 </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-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 id="line-230"></span><span class="annot"><span class="hs-comment">-- | @text/xml@</span></span><span>
+</span><span id="line-231"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154941"><span id="local-6989586621679154946"><span id="local-6989586621679154949"><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-6989586621679154952"><span class="annot"><span class="annottext">mimeType :: Proxy MimeTextXml -&gt; Maybe MediaType
+</span><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><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
@@ -592,14 +595,14 @@ forall a. IsString a =&gt; String -&gt; a
 </span><span id="line-233"></span><span class="hs-comment">-- instance MimeRender MimeTextXml T.Text where mimeRender _ = undefined</span><span>
 </span><span id="line-234"></span><span class="hs-comment">-- instance MimeUnrender MimeTextXml T.Text where mimeUnrender _ = undefined</span><span>
 </span><span id="line-235"></span><span>
-</span><span id="line-236"></span><span class="hs-comment">-- ** MimeTextXmlCharsetutf16</span><span>
+</span><span id="line-236"></span><span class="annot"><span class="hs-comment">-- ** MimeTextXmlCharsetutf16</span></span><span>
 </span><span id="line-237"></span><span>
 </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-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 id="line-240"></span><span class="annot"><span class="hs-comment">-- | @text/xml; charset=utf-16@</span></span><span>
+</span><span id="line-241"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154957"><span id="local-6989586621679154962"><span id="local-6989586621679154965"><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-6989586621679154968"><span class="annot"><span class="annottext">mimeType :: Proxy MimeTextXmlCharsetutf16 -&gt; Maybe MediaType
+</span><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><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
@@ -611,14 +614,14 @@ forall a. IsString a =&gt; String -&gt; a
 </span><span id="line-243"></span><span class="hs-comment">-- instance MimeRender MimeTextXmlCharsetutf16 T.Text where mimeRender _ = undefined</span><span>
 </span><span id="line-244"></span><span class="hs-comment">-- instance MimeUnrender MimeTextXmlCharsetutf16 T.Text where mimeUnrender _ = undefined</span><span>
 </span><span id="line-245"></span><span>
-</span><span id="line-246"></span><span class="hs-comment">-- ** MimeTextXmlCharsetutf8</span><span>
+</span><span id="line-246"></span><span class="annot"><span class="hs-comment">-- ** MimeTextXmlCharsetutf8</span></span><span>
 </span><span id="line-247"></span><span>
 </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-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 id="line-250"></span><span class="annot"><span class="hs-comment">-- | @text/xml; charset=utf-8@</span></span><span>
+</span><span id="line-251"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154973"><span id="local-6989586621679154978"><span id="local-6989586621679154981"><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-6989586621679154984"><span class="annot"><span class="annottext">mimeType :: Proxy MimeTextXmlCharsetutf8 -&gt; Maybe MediaType
+</span><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><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/OpenAPIPetstore.html

@@ -8,9 +8,9 @@
    Generated by OpenAPI Generator (https://openapi-generator.tech)
 -}</span><span>
 </span><span id="line-10"></span><span>
-</span><span id="line-11"></span><span class="hs-comment">{-|
+</span><span id="line-11"></span><span class="annot"><span class="hs-comment">{-|
 Module : OpenAPIPetstore
--}</span><span>
+-}</span></span><span>
 </span><span id="line-14"></span><span>
 </span><span id="line-15"></span><span class="hs-keyword">module</span><span> </span><span class="hs-identifier">OpenAPIPetstore</span><span>
 </span><span id="line-16"></span><span>  </span><span class="hs-special">(</span><span>  </span><span class="hs-keyword">module</span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.html"><span class="hs-identifier">OpenAPIPetstore.API</span></a></span><span>

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

@@ -1,22 +1,25 @@
 <!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-pragma">{-# OPTIONS_GHC -Wno-missing-safe-haskell-mode #-}</span><span>
+</span><span id="line-4"></span><span class="hs-pragma">{-# OPTIONS_GHC -w #-}</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">
+</span><span id="line-11"></span><span>
+</span><span id="line-12"></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-13"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.List</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">List</span></span><span>
+</span><span id="line-14"></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-15"></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-16"></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-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">
+</span><span id="local-6989586621679171130"><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-6989586621679171130"><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-6989586621679171130"><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-6989586621679171130"><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
@@ -28,113 +31,172 @@
 </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-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><span id="line-31"></span><span>
+</span><span id="line-32"></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-33"></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-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/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/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/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/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/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/2f9e8e6d6a0225b440573e2ade8cf024ba1ae60293b2eb0dca9acdb6bef1c3d4/9.0.2/etc&quot;</span></span><span>
+</span><span id="line-34"></span><span>
+</span><span id="line-35"></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-36"></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-6989586621679171171"><span class="annot"><span class="annottext">String
+</span><a href="#local-6989586621679171171"><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-37"></span><span>  </span><span id="local-6989586621679171172"><span class="annot"><span class="annottext">String
+</span><a href="#local-6989586621679171172"><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-38"></span><span>  </span><span class="annot"><span class="annottext">String -&gt; IO String
+forall a. a -&gt; IO a
+forall (m :: * -&gt; *) a. Monad m =&gt; a -&gt; m a
+</span><span class="hs-identifier hs-var">return</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">String
+</span><a href="#local-6989586621679171172"><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="Paths_openapi_petstore.html#joinFileName"><span class="hs-operator hs-var">`joinFileName`</span></a></span><span> </span><span class="annot"><span class="annottext">String
+</span><a href="#local-6989586621679171171"><span class="hs-identifier hs-var">name</span></a></span><span class="hs-special">)</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
+</span><span id="line-41"></span><span>
+</span><span id="line-42"></span><span>
+</span><span id="line-43"></span><span>
+</span><span id="line-44"></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-45"></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/86de22758d19d22e98fea9acfb600194ce9ad9a3ce19a581161d1bf31c4ac035/9.4.5/bin&quot;</span></span><span>
+</span><span id="line-46"></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/86de22758d19d22e98fea9acfb600194ce9ad9a3ce19a581161d1bf31c4ac035/9.4.5/lib/x86_64-linux-ghc-9.4.5/openapi-petstore-0.1.0.0-CXAPG0SOw20QY3Hna0VsF&quot;</span></span><span>
+</span><span id="line-47"></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/86de22758d19d22e98fea9acfb600194ce9ad9a3ce19a581161d1bf31c4ac035/9.4.5/lib/x86_64-linux-ghc-9.4.5&quot;</span></span><span>
+</span><span id="line-48"></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/86de22758d19d22e98fea9acfb600194ce9ad9a3ce19a581161d1bf31c4ac035/9.4.5/share/x86_64-linux-ghc-9.4.5/openapi-petstore-0.1.0.0&quot;</span></span><span>
+</span><span id="line-49"></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/86de22758d19d22e98fea9acfb600194ce9ad9a3ce19a581161d1bf31c4ac035/9.4.5/libexec/x86_64-linux-ghc-9.4.5/openapi-petstore-0.1.0.0&quot;</span></span><span>
+</span><span id="line-50"></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/86de22758d19d22e98fea9acfb600194ce9ad9a3ce19a581161d1bf31c4ac035/9.4.5/etc&quot;</span></span><span>
+</span><span id="line-51"></span><span>
+</span><span id="line-52"></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
 </span><span class="hs-identifier hs-var">getEnv</span></span><span> </span><span class="annot"><span class="annottext">String
-</span><span class="hs-string">&quot;openapi_petstore_bindir&quot;</span></span><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span class="annot"><span class="annottext">IOException
+</span><span class="hs-string">&quot;openapi_petstore_bindir&quot;</span></span><span class="hs-special">)</span><span>     </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span class="annot"><span class="annottext">IOException
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">String -&gt; IO String
+forall a. a -&gt; IO a
 forall (m :: * -&gt; *) a. Monad m =&gt; a -&gt; m a
 </span><span class="hs-identifier hs-var">return</span></span><span> </span><span class="annot"><span class="annottext">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-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
+</span><span id="line-53"></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
 </span><span class="hs-identifier hs-var">getEnv</span></span><span> </span><span class="annot"><span class="annottext">String
-</span><span class="hs-string">&quot;openapi_petstore_libdir&quot;</span></span><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span class="annot"><span class="annottext">IOException
+</span><span class="hs-string">&quot;openapi_petstore_libdir&quot;</span></span><span class="hs-special">)</span><span>     </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span class="annot"><span class="annottext">IOException
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">String -&gt; IO String
+forall a. a -&gt; IO a
 forall (m :: * -&gt; *) a. Monad m =&gt; a -&gt; m a
 </span><span class="hs-identifier hs-var">return</span></span><span> </span><span class="annot"><span class="annottext">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-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
+</span><span id="line-54"></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
 </span><span class="hs-identifier hs-var">getEnv</span></span><span> </span><span class="annot"><span class="annottext">String
-</span><span class="hs-string">&quot;openapi_petstore_dynlibdir&quot;</span></span><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span class="annot"><span class="annottext">IOException
+</span><span class="hs-string">&quot;openapi_petstore_dynlibdir&quot;</span></span><span class="hs-special">)</span><span>  </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span class="annot"><span class="annottext">IOException
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">String -&gt; IO String
+forall a. a -&gt; IO a
 forall (m :: * -&gt; *) a. Monad m =&gt; a -&gt; m a
 </span><span class="hs-identifier hs-var">return</span></span><span> </span><span class="annot"><span class="annottext">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-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
+</span><span id="line-55"></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
 </span><span class="hs-identifier hs-var">getEnv</span></span><span> </span><span class="annot"><span class="annottext">String
-</span><span class="hs-string">&quot;openapi_petstore_datadir&quot;</span></span><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span class="annot"><span class="annottext">IOException
+</span><span class="hs-string">&quot;openapi_petstore_datadir&quot;</span></span><span class="hs-special">)</span><span>    </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span class="annot"><span class="annottext">IOException
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">String -&gt; IO String
+forall a. a -&gt; IO a
 forall (m :: * -&gt; *) a. Monad m =&gt; a -&gt; m a
 </span><span class="hs-identifier hs-var">return</span></span><span> </span><span class="annot"><span class="annottext">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-45"></span><span id="getLibexecDir"><span class="annot"><span class="annottext">getLibexecDir :: IO String
+</span><span id="line-56"></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
 </span><span class="hs-identifier hs-var">getEnv</span></span><span> </span><span class="annot"><span class="annottext">String
 </span><span class="hs-string">&quot;openapi_petstore_libexecdir&quot;</span></span><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span class="annot"><span class="annottext">IOException
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">String -&gt; IO String
+forall a. a -&gt; IO a
 forall (m :: * -&gt; *) a. Monad m =&gt; a -&gt; m a
 </span><span class="hs-identifier hs-var">return</span></span><span> </span><span class="annot"><span class="annottext">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-46"></span><span id="getSysconfDir"><span class="annot"><span class="annottext">getSysconfDir :: IO String
+</span><span id="line-57"></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
 </span><span class="hs-identifier hs-var">getEnv</span></span><span> </span><span class="annot"><span class="annottext">String
 </span><span class="hs-string">&quot;openapi_petstore_sysconfdir&quot;</span></span><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span class="annot"><span class="annottext">IOException
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">String -&gt; IO String
+forall a. a -&gt; IO a
 forall (m :: * -&gt; *) a. Monad m =&gt; a -&gt; m a
 </span><span class="hs-identifier hs-var">return</span></span><span> </span><span class="annot"><span class="annottext">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-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-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-6989586621679167467"><span class="hs-identifier hs-var">dir</span></a></span><span> </span><span class="annot"><span class="annottext">String -&gt; String -&gt; String
+</span><span id="line-58"></span><span>
+</span><span id="line-59"></span><span>
+</span><span id="line-60"></span><span>
+</span><span id="line-61"></span><span>
+</span><span id="line-62"></span><span class="annot"><a href="Paths_openapi_petstore.html#joinFileName"><span class="hs-identifier hs-type">joinFileName</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">String</span></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="hs-identifier hs-type">String</span></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="hs-identifier hs-type">FilePath</span></span><span>
+</span><span id="line-63"></span><span id="joinFileName"><span class="annot"><span class="annottext">joinFileName :: String -&gt; String -&gt; String
+</span><a href="Paths_openapi_petstore.html#joinFileName"><span class="hs-identifier hs-var hs-var">joinFileName</span></a></span></span><span> </span><span class="annot"><span class="annottext">String
+</span><span class="hs-string">&quot;&quot;</span></span><span>  </span><span id="local-6989586621679171180"><span class="annot"><span class="annottext">String
+</span><a href="#local-6989586621679171180"><span class="hs-identifier hs-var">fname</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
+</span><a href="#local-6989586621679171180"><span class="hs-identifier hs-var">fname</span></a></span><span>
+</span><span id="line-64"></span><span class="annot"><a href="Paths_openapi_petstore.html#joinFileName"><span class="hs-identifier hs-var">joinFileName</span></a></span><span> </span><span class="annot"><span class="annottext">String
+</span><span class="hs-string">&quot;.&quot;</span></span><span> </span><span id="local-6989586621679171181"><span class="annot"><span class="annottext">String
+</span><a href="#local-6989586621679171181"><span class="hs-identifier hs-var">fname</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
+</span><a href="#local-6989586621679171181"><span class="hs-identifier hs-var">fname</span></a></span><span>
+</span><span id="line-65"></span><span class="annot"><a href="Paths_openapi_petstore.html#joinFileName"><span class="hs-identifier hs-var">joinFileName</span></a></span><span> </span><span id="local-6989586621679171182"><span class="annot"><span class="annottext">String
+</span><a href="#local-6989586621679171182"><span class="hs-identifier hs-var">dir</span></a></span></span><span> </span><span class="annot"><span class="annottext">String
+</span><span class="hs-string">&quot;&quot;</span></span><span>    </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
+</span><a href="#local-6989586621679171182"><span class="hs-identifier hs-var">dir</span></a></span><span>
+</span><span id="line-66"></span><span class="annot"><a href="Paths_openapi_petstore.html#joinFileName"><span class="hs-identifier hs-var">joinFileName</span></a></span><span> </span><span id="local-6989586621679171183"><span class="annot"><span class="annottext">String
+</span><a href="#local-6989586621679171183"><span class="hs-identifier hs-var">dir</span></a></span></span><span> </span><span id="local-6989586621679171184"><span class="annot"><span class="annottext">String
+</span><a href="#local-6989586621679171184"><span class="hs-identifier hs-var">fname</span></a></span></span><span>
+</span><span id="line-67"></span><span>  </span><span class="hs-glyph">|</span><span> </span><span class="annot"><span class="annottext">Char -&gt; Bool
+</span><a href="Paths_openapi_petstore.html#isPathSeparator"><span class="hs-identifier hs-var">isPathSeparator</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">String -&gt; Char
+forall a. HasCallStack =&gt; [a] -&gt; a
+</span><span class="hs-identifier hs-var">List.last</span></span><span> </span><span class="annot"><span class="annottext">String
+</span><a href="#local-6989586621679171183"><span class="hs-identifier hs-var">dir</span></a></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
+</span><a href="#local-6989586621679171183"><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
+</span><a href="#local-6989586621679171184"><span class="hs-identifier hs-var">fname</span></a></span><span>
+</span><span id="line-68"></span><span>  </span><span class="hs-glyph">|</span><span> </span><span class="annot"><span class="annottext">Bool
+</span><span class="hs-identifier hs-var">otherwise</span></span><span>                       </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
+</span><a href="#local-6989586621679171183"><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><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>
+</span><span class="hs-operator hs-var">++</span></span><span> </span><span class="annot"><span class="annottext">Char
+</span><a href="Paths_openapi_petstore.html#pathSeparator"><span class="hs-identifier hs-var">pathSeparator</span></a></span><span> </span><span class="annot"><span class="annottext">Char -&gt; String -&gt; String
+forall a. a -&gt; [a] -&gt; [a]
+</span><span class="hs-glyph hs-var">:</span></span><span> </span><span class="annot"><span class="annottext">String
+</span><a href="#local-6989586621679171184"><span class="hs-identifier hs-var">fname</span></a></span><span>
+</span><span id="line-69"></span><span>
+</span><span id="line-70"></span><span class="annot"><a href="Paths_openapi_petstore.html#pathSeparator"><span class="hs-identifier hs-type">pathSeparator</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">Char</span></span><span>
+</span><span id="line-71"></span><span id="pathSeparator"><span class="annot"><span class="annottext">pathSeparator :: Char
+</span><a href="Paths_openapi_petstore.html#pathSeparator"><span class="hs-identifier hs-var hs-var">pathSeparator</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Char
+</span><span class="hs-char">'/'</span></span><span>
+</span><span id="line-72"></span><span>
+</span><span id="line-73"></span><span class="annot"><a href="Paths_openapi_petstore.html#isPathSeparator"><span class="hs-identifier hs-type">isPathSeparator</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">Char</span></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="hs-identifier hs-type">Bool</span></span><span>
+</span><span id="line-74"></span><span id="isPathSeparator"><span class="annot"><span class="annottext">isPathSeparator :: Char -&gt; Bool
+</span><a href="Paths_openapi_petstore.html#isPathSeparator"><span class="hs-identifier hs-var hs-var">isPathSeparator</span></a></span></span><span> </span><span id="local-6989586621679171188"><span class="annot"><span class="annottext">Char
+</span><a href="#local-6989586621679171188"><span class="hs-identifier hs-var">c</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Char
+</span><a href="#local-6989586621679171188"><span class="hs-identifier hs-var">c</span></a></span><span> </span><span class="annot"><span class="annottext">Char -&gt; Char -&gt; Bool
+forall a. Eq a =&gt; a -&gt; a -&gt; Bool
+</span><span class="hs-operator hs-var">==</span></span><span> </span><span class="annot"><span class="annottext">Char
+</span><span class="hs-char">'/'</span></span><span>
+</span><span id="line-75"></span></pre></body></html>