[haskell-http-client] add ability to choose additional characters in querystring which should not be encoded (e.g. "+" or ":") (fixes #3459) (#10424)

CI/.drone.yml

@@ -48,7 +48,7 @@ steps:
   - dune build --build-dir=./_build
 # test haskell client
 - name: haskell-client-test
-  image: haskell:8.6.5
+  image: haskell:8.10.4
   commands:
   - (cd samples/client/petstore/haskell-http-client/ && stack --allow-different-user --install-ghc --no-haddock-deps haddock --fast && stack --allow-different-user test --fast)
 # test erlang client and server

bin/configs/haskell-http-client.yaml

@@ -2,3 +2,5 @@ generatorName: haskell-http-client
 outputDir: samples/client/petstore/haskell-http-client
 inputSpec: modules/openapi-generator/src/test/resources/2_0/petstore-with-fake-endpoints-models-for-testing.yaml
 templateDir: modules/openapi-generator/src/main/resources/haskell-http-client
+additionalProperties:
+    queryExtraUnreserved: ''

docs/generators/haskell-http-client.md

@@ -30,6 +30,7 @@ These options may be applied as additional-properties (cli) or configOptions (pl
 |legacyDiscriminatorBehavior|Set to false for generators with better support for discriminators. (Python, Java, Go, PowerShell, C#have this enabled by default).|<dl><dt>**true**</dt><dd>The mapping in the discriminator includes descendent schemas that allOf inherit from self and the discriminator mapping schemas in the OAS document.</dd><dt>**false**</dt><dd>The mapping in the discriminator includes any descendent schemas that allOf inherit from self, any oneOf schemas, any anyOf schemas, any x-discriminator-values, and the discriminator mapping schemas in the OAS document AND Codegen validates that oneOf and anyOf schemas contain the required discriminator and throws an error if the discriminator is missing.</dd></dl>|true|
 |modelDeriving|Additional classes to include in the deriving() clause of Models| |null|
 |prependFormOrBodyParameters|Add form or body parameters to the beginning of the parameter list.| |false|
+|queryExtraUnreserved|Configures additional querystring characters which must not be URI encoded, e.g. '+' or ':'| |null|
 |requestType|Set the name of the type used to generate requests| |null|
 |sortModelPropertiesByRequiredFlag|Sort model properties to place required parameters before optional parameters.| |true|
 |sortParamsByRequiredFlag|Sort method arguments to place required parameters before optional parameters.| |true|

modules/openapi-generator/src/main/java/org/openapitools/codegen/languages/HaskellHttpClientCodegen.java

@@ -51,6 +51,7 @@ public class HaskellHttpClientCodegen extends DefaultCodegen implements CodegenC
     protected String defaultDateFormat = "%Y-%m-%d";
     protected String defaultCabalVersion = "0.1.0.0";
     protected String modulePath = null;
+    protected String defaultQueryExtraUnreserved = null;
 
     protected Boolean useKatip = true;
     protected Boolean allowNonUniqueOperationIds = false;
@@ -74,6 +75,7 @@ public class HaskellHttpClientCodegen extends DefaultCodegen implements CodegenC
     public static final String PROP_GENERATE_MODEL_CONSTRUCTORS = "generateModelConstructors";
     public static final String PROP_INLINE_MIME_TYPES = "inlineMimeTypes";
     public static final String PROP_MODEL_DERIVING = "modelDeriving";
+    public static final String PROP_QUERY_EXTRA_UNRESERVED = "queryExtraUnreserved";
     public static final String PROP_REQUEST_TYPE = "requestType";
     public static final String PROP_STRICT_FIELDS = "strictFields";
     public static final String PROP_USE_KATIP = "useKatip";
@@ -125,6 +127,7 @@ public class HaskellHttpClientCodegen extends DefaultCodegen implements CodegenC
     static final String X_MEDIA_IS_JSON = "x-mediaIsJson";
     static final String X_MEDIA_IS_WILDCARD = "x-mediaIsWildcard";
     static final String X_STRICT_FIELDS = "x-strictFields";
+    static final String X_PROP_QUERY_EXTRA_UNRESERVED = "x-queryExtraUnreserved";
     static final String X_ALL_UNIQUE_IMPORT_PATHS = "x-allUniqueImportPaths";
     static final String X_USE_KATIP = "x-useKatip";
     static final String X_ALLOW_NONUNIQUE_OPERATION_IDS = "x-allowNonUniqueOperationIds";
@@ -308,6 +311,7 @@ public class HaskellHttpClientCodegen extends DefaultCodegen implements CodegenC
         cliOptions.add(CliOption.newString(PROP_DATETIME_FORMAT, "format string used to parse/render a datetime"));
         cliOptions.add(CliOption.newString(PROP_DATETIME_PARSE_FORMAT, "overrides the format string used to parse a datetime"));
         cliOptions.add(CliOption.newString(PROP_DATE_FORMAT, "format string used to parse/render a date").defaultValue(defaultDateFormat));
+        cliOptions.add(CliOption.newString(PROP_QUERY_EXTRA_UNRESERVED, "Configures additional querystring characters which must not be URI encoded, e.g. '+' or ':'"));
 
         cliOptions.add(CliOption.newString(PROP_CUSTOM_TEST_INSTANCE_MODULE, "test module used to provide typeclass instances for types not known by the generator"));
 
@@ -371,6 +375,10 @@ public class HaskellHttpClientCodegen extends DefaultCodegen implements CodegenC
         setStringProp(PROP_CABAL_VERSION, value);
     }
 
+    public void setQueryExtraUnreserved(String value) {
+        additionalProperties.put(X_PROP_QUERY_EXTRA_UNRESERVED, value);
+    }
+
     public void setBaseModule(String value) {
         setStringProp(PROP_BASE_MODULE, value);
     }
@@ -505,6 +513,11 @@ public class HaskellHttpClientCodegen extends DefaultCodegen implements CodegenC
         } else {
             setCabalVersion(defaultCabalVersion);
         }
+        if (additionalProperties.containsKey(PROP_QUERY_EXTRA_UNRESERVED)) {
+            setQueryExtraUnreserved(additionalProperties.get(PROP_QUERY_EXTRA_UNRESERVED).toString());
+        } else {
+            setQueryExtraUnreserved(defaultQueryExtraUnreserved);
+        }
         if (additionalProperties.containsKey(PROP_BASE_MODULE)) {
             setBaseModule(additionalProperties.get(PROP_BASE_MODULE).toString());
         }

modules/openapi-generator/src/main/resources/haskell-http-client/Client.mustache

@@ -23,6 +23,7 @@ import qualified Control.Exception.Safe as E
 import qualified Control.Monad.IO.Class as P
 import qualified Control.Monad as P
 import qualified Data.Aeson.Types as A
+import qualified Data.ByteString as B
 import qualified Data.ByteString.Char8 as BC
 import qualified Data.ByteString.Lazy as BL
 import qualified Data.ByteString.Lazy.Char8 as BCL
@@ -170,13 +171,18 @@ _toInitRequest config req0  =
         (configValidateAuthMethods config && (not . null . rAuthTypes) req1)
         (E.throw $ AuthMethodException $ "AuthMethod not configured: " <> (show . head . rAuthTypes) req1)
     let req2 = req1 & _setContentTypeHeader & _setAcceptHeader
-        reqHeaders = ("User-Agent", WH.toHeader (configUserAgent config)) : paramsHeaders (rParams req2)
-        reqQuery = NH.renderQuery True (paramsQuery (rParams req2))
-        pReq = parsedReq { NH.method = (rMethod req2)
+        params = rParams req2
+        reqHeaders = ("User-Agent", WH.toHeader (configUserAgent config)) : paramsHeaders params
+        reqQuery = let query = paramsQuery params
+                       queryExtraUnreserved = configQueryExtraUnreserved config
+                   in if B.null queryExtraUnreserved
+                        then NH.renderQuery True query
+                        else NH.renderQueryPartialEscape True (toPartialEscapeQuery queryExtraUnreserved query)
+        pReq = parsedReq { NH.method = rMethod req2
                         , NH.requestHeaders = reqHeaders
                         , NH.queryString = reqQuery
                         }
-    outReq <- case paramsBody (rParams req2) of
+    outReq <- case paramsBody params of
         ParamBodyNone -> pure (pReq { NH.requestBody = mempty })
         ParamBodyB bs -> pure (pReq { NH.requestBody = NH.RequestBodyBS bs })
         ParamBodyBL bl -> pure (pReq { NH.requestBody = NH.RequestBodyLBS bl })

modules/openapi-generator/src/main/resources/haskell-http-client/Core.mustache

@@ -58,7 +58,7 @@ import Data.Function ((&))
 import Data.Foldable(foldlM)
 import Data.Monoid ((<>))
 import Data.Text (Text)
-import Prelude (($), (.), (<$>), (<*>), Maybe(..), Bool(..), Char, String, fmap, mempty, pure, return, show, IO, Monad, Functor)
+import Prelude (($), (.), (&&), (<$>), (<*>), Maybe(..), Bool(..), Char, String, fmap, mempty, pure, return, show, IO, Monad, Functor, maybe)
 
 -- * {{configType}}
 
@@ -70,6 +70,7 @@ data {{configType}} = {{configType}}
   , configLogContext :: LogContext -- ^ Configures the logger
   , configAuthMethods :: [AnyAuthMethod] -- ^ List of configured auth methods
   , configValidateAuthMethods :: Bool -- ^ throw exceptions if auth methods are not configured
+  , configQueryExtraUnreserved :: B.ByteString -- ^ Configures additional querystring characters which must not be URI encoded, e.g. '+' or ':' 
   }
 
 -- | display the config
@@ -100,6 +101,7 @@ newConfig = do
         , configLogContext = logCxt
         , configAuthMethods = []
         , configValidateAuthMethods = True
+        , configQueryExtraUnreserved = "{{x-queryExtraUnreserved}}"
         }
 
 -- | updates config use AuthMethod on matching requests
@@ -327,6 +329,16 @@ toQuery :: WH.ToHttpApiData a => (BC.ByteString, Maybe a) -> [NH.QueryItem]
 toQuery x = [(fmap . fmap) toQueryParam x]
   where toQueryParam = T.encodeUtf8 . WH.toQueryParam
 
+toPartialEscapeQuery :: B.ByteString -> NH.Query -> NH.PartialEscapeQuery
+toPartialEscapeQuery extraUnreserved query = fmap (\(k, v) -> (k, maybe [] go v)) query
+  where go :: B.ByteString -> [NH.EscapeItem]
+        go v = v & B.groupBy (\a b -> a `B.notElem` extraUnreserved && b `B.notElem` extraUnreserved)
+                 & fmap (\xs -> if B.null xs then NH.QN xs
+                                  else if B.head xs `B.elem` extraUnreserved
+                                          then NH.QN xs -- Not Encoded
+                                          else NH.QE xs -- Encoded
+                        )
+
 -- *** OpenAPI `CollectionFormat` Utils
 
 -- | Determines the format of the array if type array is used.

modules/openapi-generator/src/main/resources/haskell-http-client/README.mustache

@@ -55,7 +55,7 @@ These options allow some customization of the code generation process.
 **haskell-http-client additional properties:**
 
 | OPTION                          | DESCRIPTION                                                                                                                   | DEFAULT  | ACTUAL                                |
-| ------------------------------- | ----------------------------------------------------------------------------------------------------------------------------- | -------- | ------------------------------------- |
+|---------------------------------|-------------------------------------------------------------------------------------------------------------------------------|----------|---------------------------------------|
 | allowFromJsonNulls              | allow JSON Null during model decoding from JSON                                                                               | true     | {{{allowFromJsonNulls}}}              |
 | allowNonUniqueOperationIds      | allow *different* API modules to contain the same operationId. Each API must be imported qualified                            | false    | {{{x-allowNonUniqueOperationIds}}}    |
 | allowToJsonNulls                | allow emitting JSON Null during model encoding to JSON                                                                        | false    | {{{allowToJsonNulls}}}                |
@@ -76,6 +76,7 @@ These options allow some customization of the code generation process.
 | requestType                     | Set the name of the type used to generate requests                                                                            |          | {{{requestType}}}                     |
 | strictFields                    | Add strictness annotations to all model fields                                                                                | true     | {{{x-strictFields}}}                  |
 | useKatip                        | Sets the default value for the UseKatip cabal flag. If true, the katip package provides logging instead of monad-logger       | true     | {{{x-useKatip}}}                      |
+| queryExtraUnreserved            | Configures additional querystring characters which must not be URI encoded, e.g. '+' or ':'                                   |          | {{{x-queryExtraUnreserved}}}          |
 
 [1]: https://www.stackage.org/haddock/lts-9.0/iso8601-time-0.1.4/Data-Time-ISO8601.html#v:formatISO8601Millis
 

modules/openapi-generator/src/main/resources/haskell-http-client/stack.mustache

@@ -1,4 +1,4 @@
-resolver: lts-18.10
+resolver: lts-18.6
 build:
   haddock-arguments:
     haddock-args:

samples/client/petstore/haskell-http-client/README.md

@@ -55,7 +55,7 @@ These options allow some customization of the code generation process.
 **haskell-http-client additional properties:**
 
 | OPTION                          | DESCRIPTION                                                                                                                   | DEFAULT  | ACTUAL                                |
-| ------------------------------- | ----------------------------------------------------------------------------------------------------------------------------- | -------- | ------------------------------------- |
+|---------------------------------|-------------------------------------------------------------------------------------------------------------------------------|----------|---------------------------------------|
 | allowFromJsonNulls              | allow JSON Null during model decoding from JSON                                                                               | true     | true              |
 | allowNonUniqueOperationIds      | allow *different* API modules to contain the same operationId. Each API must be imported qualified                            | false    | false    |
 | allowToJsonNulls                | allow emitting JSON Null during model encoding to JSON                                                                        | false    | false                |
@@ -76,6 +76,7 @@ These options allow some customization of the code generation process.
 | requestType                     | Set the name of the type used to generate requests                                                                            |          | OpenAPIPetstoreRequest                     |
 | strictFields                    | Add strictness annotations to all model fields                                                                                | true     | true                  |
 | useKatip                        | Sets the default value for the UseKatip cabal flag. If true, the katip package provides logging instead of monad-logger       | true     | true                      |
+| queryExtraUnreserved            | Configures additional querystring characters which must not be URI encoded, e.g. '+' or ':'                                   |          |           |
 
 [1]: https://www.stackage.org/haddock/lts-9.0/iso8601-time-0.1.4/Data-Time-ISO8601.html#v:formatISO8601Millis
 

samples/client/petstore/haskell-http-client/docs/openapi-petstore.txt

@@ -162,7 +162,7 @@ instance OpenAPIPetstore.MimeTypes.MimeType OpenAPIPetstore.MimeTypes.MimeNoCont
 module OpenAPIPetstore.Core
 
 data OpenAPIPetstoreConfig
-OpenAPIPetstoreConfig :: ByteString -> Text -> LogExecWithContext -> LogContext -> [AnyAuthMethod] -> Bool -> OpenAPIPetstoreConfig
+OpenAPIPetstoreConfig :: ByteString -> Text -> LogExecWithContext -> LogContext -> [AnyAuthMethod] -> Bool -> ByteString -> OpenAPIPetstoreConfig
 
 -- | host supplied in the Request
 [configHost] :: OpenAPIPetstoreConfig -> ByteString
@@ -182,6 +182,10 @@ OpenAPIPetstoreConfig :: ByteString -> Text -> LogExecWithContext -> LogContext
 -- | throw exceptions if auth methods are not configured
 [configValidateAuthMethods] :: OpenAPIPetstoreConfig -> Bool
 
+-- | Configures additional querystring characters which must not be URI
+--   encoded, e.g. <tt>+</tt> or <tt>:</tt>
+[configQueryExtraUnreserved] :: OpenAPIPetstoreConfig -> ByteString
+
 -- | constructs a default OpenAPIPetstoreConfig
 --   
 --   configHost:
@@ -301,6 +305,7 @@ toPath :: ToHttpApiData a => a -> ByteString
 toHeader :: ToHttpApiData a => (HeaderName, a) -> [Header]
 toForm :: ToHttpApiData v => (ByteString, v) -> Form
 toQuery :: ToHttpApiData a => (ByteString, Maybe a) -> [QueryItem]
+toPartialEscapeQuery :: ByteString -> Query -> PartialEscapeQuery
 
 -- | Determines the format of the array if type array is used.
 data CollectionFormat

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

@@ -72,8 +72,8 @@ Module : OpenAPIPetstore.API.AnotherFake
 </span><span id="line-72"></span><span id="op123testSpecialTags"><span class="annot"><span class="annottext">op123testSpecialTags :: 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-6989586621679152751"><span class="annot"><span class="annottext">Client
-</span><a href="#local-6989586621679152751"><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-6989586621679152869"><span class="annot"><span class="annottext">Client
+</span><a href="#local-6989586621679152869"><span class="hs-identifier hs-var">body</span></a></span></span><span> </span><span class="hs-glyph">=</span><span>
 </span><span id="line-73"></span><span>  </span><span class="annot"><span class="annottext">Method
 -&gt; [ByteString]
 -&gt; OpenAPIPetstoreRequest
@@ -96,12 +96,12 @@ forall req param contentType res accept.
 OpenAPIPetstoreRequest req contentType res accept
 -&gt; param -&gt; OpenAPIPetstoreRequest req contentType res accept
 </span><a href="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-operator hs-var">`setBodyParam`</span></a></span><span> </span><span class="annot"><span class="annottext">Client
-</span><a href="#local-6989586621679152751"><span class="hs-identifier hs-var">body</span></a></span><span>
+</span><a href="#local-6989586621679152869"><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-6989586621679152747"><span class="annot"><a href="OpenAPIPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.AnotherFake.html#Op123testSpecialTags"><span class="hs-identifier hs-type">Op123testSpecialTags</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Client"><span class="hs-identifier hs-type">Client</span></a></span></span><span> </span><span>
+</span><span id="line-79"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679152865"><span class="annot"><a href="OpenAPIPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.AnotherFake.html#Op123testSpecialTags"><span class="hs-identifier hs-type">Op123testSpecialTags</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Client"><span class="hs-identifier hs-type">Client</span></a></span></span><span> </span><span>
 </span><span id="line-80"></span><span>
 </span><span id="line-81"></span><span class="hs-comment">-- | @application/json@</span><span>
 </span><span id="line-82"></span><span class="hs-keyword">instance</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.AnotherFake.html#Op123testSpecialTags"><span class="hs-identifier hs-type">Op123testSpecialTags</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a></span><span>

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

@@ -73,8 +73,8 @@ Module : OpenAPIPetstore.API.FakeClassnameTags123
 </span><span id="line-73"></span><span>  </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.FakeClassnameTags123.html#TestClassname"><span class="hs-identifier hs-type">TestClassname</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Client"><span class="hs-identifier hs-type">Client</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a></span><span>
 </span><span id="line-74"></span><span id="testClassname"><span class="annot"><span class="annottext">testClassname :: Client
 -&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-6989586621679152079"><span class="annot"><span class="annottext">Client
-</span><a href="#local-6989586621679152079"><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-6989586621679152197"><span class="annot"><span class="annottext">Client
+</span><a href="#local-6989586621679152197"><span class="hs-identifier hs-var">body</span></a></span></span><span> </span><span class="hs-glyph">=</span><span>
 </span><span id="line-75"></span><span>  </span><span class="annot"><span class="annottext">Method
 -&gt; [ByteString]
 -&gt; OpenAPIPetstoreRequest TestClassname MimeJSON Client MimeJSON
@@ -105,12 +105,12 @@ forall req param contentType res accept.
 OpenAPIPetstoreRequest req contentType res accept
 -&gt; param -&gt; OpenAPIPetstoreRequest req contentType res accept
 </span><a href="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-operator hs-var">`setBodyParam`</span></a></span><span> </span><span class="annot"><span class="annottext">Client
-</span><a href="#local-6989586621679152079"><span class="hs-identifier hs-var">body</span></a></span><span>
+</span><a href="#local-6989586621679152197"><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-6989586621679152073"><span class="annot"><a href="OpenAPIPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.FakeClassnameTags123.html#TestClassname"><span class="hs-identifier hs-type">TestClassname</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Client"><span class="hs-identifier hs-type">Client</span></a></span></span><span> </span><span>
+</span><span id="line-82"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679152191"><span class="annot"><a href="OpenAPIPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.FakeClassnameTags123.html#TestClassname"><span class="hs-identifier hs-type">TestClassname</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Client"><span class="hs-identifier hs-type">Client</span></a></span></span><span> </span><span>
 </span><span id="line-83"></span><span>
 </span><span id="line-84"></span><span class="hs-comment">-- | @application/json@</span><span>
 </span><span id="line-85"></span><span class="hs-keyword">instance</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.FakeClassnameTags123.html#TestClassname"><span class="hs-identifier hs-type">TestClassname</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a></span><span>

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

@@ -65,18 +65,18 @@ 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-6989586621679151909"><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-6989586621679151909"><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-6989586621679151909"><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-6989586621679151909"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="hs-comment">-- ^ request content-type ('MimeType')</span><span>
+</span><span id="line-68"></span><span id="local-6989586621679152027"><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#addPet"><span class="hs-identifier hs-type">addPet</span></a></span><span>
+</span><span id="line-69"></span><span>  </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#AddPet"><span class="hs-identifier hs-type">AddPet</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679152027"><span class="hs-identifier hs-type">contentType</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679152027"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a></span><span class="hs-special">)</span><span>
+</span><span id="line-70"></span><span>  </span><span class="hs-glyph">=&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679152027"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="hs-comment">-- ^ request content-type ('MimeType')</span><span>
 </span><span id="line-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-6989586621679151909"><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-72"></span><span>  </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#AddPet"><span class="hs-identifier hs-type">AddPet</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679152027"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span></span><span>
 </span><span id="line-73"></span><span id="addPet"><span class="annot"><span class="annottext">addPet :: ContentType contentType
 -&gt; Pet
 -&gt; OpenAPIPetstoreRequest
      AddPet contentType NoContent MimeNoContent
 </span><a href="OpenAPIPetstore.API.Pet.html#addPet"><span class="hs-identifier hs-var hs-var">addPet</span></a></span></span><span> </span><span class="annot"><span class="annottext">ContentType contentType
-</span><span class="hs-identifier">_</span></span><span> </span><span id="local-6989586621679151907"><span class="annot"><span class="annottext">Pet
-</span><a href="#local-6989586621679151907"><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-6989586621679152025"><span class="annot"><span class="annottext">Pet
+</span><a href="#local-6989586621679152025"><span class="hs-identifier hs-var">body</span></a></span></span><span> </span><span class="hs-glyph">=</span><span>
 </span><span id="line-74"></span><span>  </span><span class="annot"><span class="annottext">Method
 -&gt; [ByteString]
 -&gt; OpenAPIPetstoreRequest
@@ -110,12 +110,12 @@ forall req param contentType res accept.
 OpenAPIPetstoreRequest req contentType res accept
 -&gt; param -&gt; OpenAPIPetstoreRequest req contentType res accept
 </span><a href="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-operator hs-var">`setBodyParam`</span></a></span><span> </span><span class="annot"><span class="annottext">Pet
-</span><a href="#local-6989586621679151907"><span class="hs-identifier hs-var">body</span></a></span><span>
+</span><a href="#local-6989586621679152025"><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-6989586621679151901"><span class="annot"><a href="OpenAPIPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#AddPet"><span class="hs-identifier hs-type">AddPet</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a></span></span><span> </span><span>
+</span><span id="line-81"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679152019"><span class="annot"><a href="OpenAPIPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#AddPet"><span class="hs-identifier hs-type">AddPet</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a></span></span><span> </span><span>
 </span><span id="line-82"></span><span>
 </span><span id="line-83"></span><span class="hs-comment">-- | @application/xml@</span><span>
 </span><span id="line-84"></span><span class="hs-keyword">instance</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#AddPet"><span class="hs-identifier hs-type">AddPet</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier hs-type">MimeXML</span></a></span><span>
@@ -139,8 +139,8 @@ OpenAPIPetstoreRequest req contentType res accept
 </span><span id="line-102"></span><span id="deletePet"><span class="annot"><span class="annottext">deletePet :: PetId
 -&gt; OpenAPIPetstoreRequest
      DeletePet MimeNoContent NoContent MimeNoContent
-</span><a href="OpenAPIPetstore.API.Pet.html#deletePet"><span class="hs-identifier hs-var hs-var">deletePet</span></a></span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Model.html#PetId"><span class="hs-identifier hs-type">PetId</span></a></span><span> </span><span id="local-6989586621679151892"><span class="annot"><span class="annottext">Integer
-</span><a href="#local-6989586621679151892"><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-6989586621679152010"><span class="annot"><span class="annottext">Integer
+</span><a href="#local-6989586621679152010"><span class="hs-identifier hs-var">petId</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
 </span><span id="line-103"></span><span>  </span><span class="annot"><span class="annottext">Method
 -&gt; [ByteString]
 -&gt; OpenAPIPetstoreRequest
@@ -154,7 +154,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-6989586621679151892"><span class="hs-identifier hs-var">petId</span></a></span><span class="hs-special">]</span><span>
+</span><a href="#local-6989586621679152010"><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
@@ -170,15 +170,15 @@ 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-6989586621679151888"><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-6989586621679151886"><span class="annot"><span class="annottext">applyOptionalParam :: OpenAPIPetstoreRequest DeletePet contentType res accept
+</span><span id="line-107"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679152006"><span class="annot"><a href="OpenAPIPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#DeletePet"><span class="hs-identifier hs-type">DeletePet</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#ApiKey"><span class="hs-identifier hs-type">ApiKey</span></a></span></span><span> </span><span class="hs-keyword">where</span><span>
+</span><span id="line-108"></span><span>  </span><span id="local-6989586621679152004"><span class="annot"><span class="annottext">applyOptionalParam :: OpenAPIPetstoreRequest DeletePet contentType res accept
 -&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-6989586621679151884"><span class="annot"><span class="annottext">OpenAPIPetstoreRequest DeletePet contentType res accept
-</span><a href="#local-6989586621679151884"><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-6989586621679151882"><span class="annot"><span class="annottext">Text
-</span><a href="#local-6989586621679151882"><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-6989586621679152002"><span class="annot"><span class="annottext">OpenAPIPetstoreRequest DeletePet contentType res accept
+</span><a href="#local-6989586621679152002"><span class="hs-identifier hs-var">req</span></a></span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Model.html#ApiKey"><span class="hs-identifier hs-type">ApiKey</span></a></span><span> </span><span id="local-6989586621679152000"><span class="annot"><span class="annottext">Text
+</span><a href="#local-6989586621679152000"><span class="hs-identifier hs-var">xs</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
 </span><span id="line-109"></span><span>    </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest DeletePet contentType res accept
-</span><a href="#local-6989586621679151884"><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-6989586621679152002"><span class="hs-identifier hs-var">req</span></a></span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest DeletePet contentType res accept
 -&gt; [Header]
 -&gt; OpenAPIPetstoreRequest DeletePet contentType res accept
 forall req contentType res accept.
@@ -188,7 +188,7 @@ OpenAPIPetstoreRequest req contentType res accept
 forall a. ToHttpApiData a =&gt; (HeaderName, a) -&gt; [Header]
 </span><a href="OpenAPIPetstore.Core.html#toHeader"><span class="hs-identifier hs-var">toHeader</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">HeaderName
 </span><span class="hs-string">&quot;api_key&quot;</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="annottext">Text
-</span><a href="#local-6989586621679151882"><span class="hs-identifier hs-var">xs</span></a></span><span class="hs-special">)</span><span>
+</span><a href="#local-6989586621679152000"><span class="hs-identifier hs-var">xs</span></a></span><span class="hs-special">)</span><span>
 </span><span id="line-110"></span><span class="hs-keyword">instance</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#DeletePet"><span class="hs-identifier hs-type">DeletePet</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span><span>
 </span><span id="line-111"></span><span>
 </span><span id="line-112"></span><span>
@@ -202,17 +202,17 @@ 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-6989586621679151878"><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-6989586621679151878"><span class="hs-identifier hs-type">accept</span></a></span><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
+</span><span id="line-123"></span><span id="local-6989586621679151996"><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#findPetsByStatus"><span class="hs-identifier hs-type">findPetsByStatus</span></a></span><span>
+</span><span id="line-124"></span><span>  </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151996"><span class="hs-identifier hs-type">accept</span></a></span><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
 </span><span id="line-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-6989586621679151878"><span class="hs-identifier hs-type">accept</span></a></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-6989586621679151996"><span class="hs-identifier hs-type">accept</span></a></span></span><span>
 </span><span id="line-127"></span><span id="findPetsByStatus"><span class="annot"><span class="annottext">findPetsByStatus :: Accept accept
 -&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-6989586621679151875"><span class="annot"><span class="annottext">[E'Status2]
-</span><a href="#local-6989586621679151875"><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-6989586621679151993"><span class="annot"><span class="annottext">[E'Status2]
+</span><a href="#local-6989586621679151993"><span class="hs-identifier hs-var">status</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
 </span><span id="line-128"></span><span>  </span><span class="annot"><span class="annottext">Method
 -&gt; [ByteString]
 -&gt; OpenAPIPetstoreRequest
@@ -252,7 +252,7 @@ CollectionFormat -&gt; (Method, Maybe [a]) -&gt; [QueryItem]
 </span><span class="hs-string">&quot;status&quot;</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="annottext">[E'Status2] -&gt; Maybe [E'Status2]
 forall a. a -&gt; Maybe a
 </span><span class="hs-identifier hs-var">Just</span></span><span> </span><span class="annot"><span class="annottext">[E'Status2]
-</span><a href="#local-6989586621679151875"><span class="hs-identifier hs-var">status</span></a></span><span class="hs-special">)</span><span>
+</span><a href="#local-6989586621679151993"><span class="hs-identifier hs-var">status</span></a></span><span class="hs-special">)</span><span>
 </span><span id="line-131"></span><span>
 </span><span id="line-132"></span><span class="hs-keyword">data</span><span> </span><span id="FindPetsByStatus"><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#FindPetsByStatus"><span class="hs-identifier hs-var">FindPetsByStatus</span></a></span></span><span>  </span><span>
 </span><span id="line-133"></span><span class="hs-comment">-- | @application/xml@</span><span>
@@ -271,16 +271,16 @@ 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-6989586621679151869"><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-6989586621679151869"><span class="hs-identifier hs-type">accept</span></a></span><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
+</span><span id="line-149"></span><span id="local-6989586621679151987"><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#findPetsByTags"><span class="hs-identifier hs-type">findPetsByTags</span></a></span><span>
+</span><span id="line-150"></span><span>  </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151987"><span class="hs-identifier hs-type">accept</span></a></span><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
 </span><span id="line-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-6989586621679151869"><span class="hs-identifier hs-type">accept</span></a></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-6989586621679151987"><span class="hs-identifier hs-type">accept</span></a></span></span><span>
 </span><span id="line-153"></span><span id="findPetsByTags"><span class="annot"><span class="annottext">findPetsByTags :: Accept accept
 -&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-6989586621679151866"><span class="annot"><span class="annottext">[Text]
-</span><a href="#local-6989586621679151866"><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-6989586621679151984"><span class="annot"><span class="annottext">[Text]
+</span><a href="#local-6989586621679151984"><span class="hs-identifier hs-var">tags</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
 </span><span id="line-154"></span><span>  </span><span class="annot"><span class="annottext">Method
 -&gt; [ByteString]
 -&gt; OpenAPIPetstoreRequest FindPetsByTags MimeNoContent [Pet] accept
@@ -317,7 +317,7 @@ CollectionFormat -&gt; (Method, Maybe [a]) -&gt; [QueryItem]
 </span><span class="hs-string">&quot;tags&quot;</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="annottext">[Text] -&gt; Maybe [Text]
 forall a. a -&gt; Maybe a
 </span><span class="hs-identifier hs-var">Just</span></span><span> </span><span class="annot"><span class="annottext">[Text]
-</span><a href="#local-6989586621679151866"><span class="hs-identifier hs-var">tags</span></a></span><span class="hs-special">)</span><span>
+</span><a href="#local-6989586621679151984"><span class="hs-identifier hs-var">tags</span></a></span><span class="hs-special">)</span><span>
 </span><span id="line-157"></span><span>
 </span><span id="line-158"></span><span class="hs-pragma">{-# DEPRECATED</span><span> </span><span class="hs-pragma">findPetsByTags</span><span> </span><span class="hs-pragma">&quot;&quot;</span><span> </span><span class="hs-pragma">#-}</span><span>
 </span><span id="line-159"></span><span>
@@ -338,16 +338,16 @@ 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-6989586621679151863"><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-6989586621679151863"><span class="hs-identifier hs-type">accept</span></a></span><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
+</span><span id="line-177"></span><span id="local-6989586621679151981"><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#getPetById"><span class="hs-identifier hs-type">getPetById</span></a></span><span>
+</span><span id="line-178"></span><span>  </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151981"><span class="hs-identifier hs-type">accept</span></a></span><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
 </span><span id="line-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-6989586621679151863"><span class="hs-identifier hs-type">accept</span></a></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-6989586621679151981"><span class="hs-identifier hs-type">accept</span></a></span></span><span>
 </span><span id="line-181"></span><span id="getPetById"><span class="annot"><span class="annottext">getPetById :: Accept accept
 -&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-6989586621679151861"><span class="annot"><span class="annottext">Integer
-</span><a href="#local-6989586621679151861"><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-6989586621679151979"><span class="annot"><span class="annottext">Integer
+</span><a href="#local-6989586621679151979"><span class="hs-identifier hs-var">petId</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
 </span><span id="line-182"></span><span>  </span><span class="annot"><span class="annottext">Method
 -&gt; [ByteString]
 -&gt; OpenAPIPetstoreRequest GetPetById MimeNoContent Pet accept
@@ -360,7 +360,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-6989586621679151861"><span class="hs-identifier hs-var">petId</span></a></span><span class="hs-special">]</span><span>
+</span><a href="#local-6989586621679151979"><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
@@ -388,18 +388,18 @@ 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-6989586621679151858"><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-6989586621679151858"><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-6989586621679151858"><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-6989586621679151858"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="hs-comment">-- ^ request content-type ('MimeType')</span><span>
+</span><span id="line-200"></span><span id="local-6989586621679151976"><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#updatePet"><span class="hs-identifier hs-type">updatePet</span></a></span><span>
+</span><span id="line-201"></span><span>  </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#UpdatePet"><span class="hs-identifier hs-type">UpdatePet</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151976"><span class="hs-identifier hs-type">contentType</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151976"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a></span><span class="hs-special">)</span><span>
+</span><span id="line-202"></span><span>  </span><span class="hs-glyph">=&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151976"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="hs-comment">-- ^ request content-type ('MimeType')</span><span>
 </span><span id="line-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-6989586621679151858"><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-204"></span><span>  </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#UpdatePet"><span class="hs-identifier hs-type">UpdatePet</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151976"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span></span><span>
 </span><span id="line-205"></span><span id="updatePet"><span class="annot"><span class="annottext">updatePet :: ContentType contentType
 -&gt; Pet
 -&gt; OpenAPIPetstoreRequest
      UpdatePet contentType NoContent MimeNoContent
 </span><a href="OpenAPIPetstore.API.Pet.html#updatePet"><span class="hs-identifier hs-var hs-var">updatePet</span></a></span></span><span> </span><span class="annot"><span class="annottext">ContentType contentType
-</span><span class="hs-identifier">_</span></span><span> </span><span id="local-6989586621679151856"><span class="annot"><span class="annottext">Pet
-</span><a href="#local-6989586621679151856"><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-6989586621679151974"><span class="annot"><span class="annottext">Pet
+</span><a href="#local-6989586621679151974"><span class="hs-identifier hs-var">body</span></a></span></span><span> </span><span class="hs-glyph">=</span><span>
 </span><span id="line-206"></span><span>  </span><span class="annot"><span class="annottext">Method
 -&gt; [ByteString]
 -&gt; OpenAPIPetstoreRequest
@@ -435,12 +435,12 @@ forall req param contentType res accept.
 OpenAPIPetstoreRequest req contentType res accept
 -&gt; param -&gt; OpenAPIPetstoreRequest req contentType res accept
 </span><a href="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-operator hs-var">`setBodyParam`</span></a></span><span> </span><span class="annot"><span class="annottext">Pet
-</span><a href="#local-6989586621679151856"><span class="hs-identifier hs-var">body</span></a></span><span>
+</span><a href="#local-6989586621679151974"><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-6989586621679151854"><span class="annot"><a href="OpenAPIPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#UpdatePet"><span class="hs-identifier hs-type">UpdatePet</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a></span></span><span> </span><span>
+</span><span id="line-213"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679151972"><span class="annot"><a href="OpenAPIPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#UpdatePet"><span class="hs-identifier hs-type">UpdatePet</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a></span></span><span> </span><span>
 </span><span id="line-214"></span><span>
 </span><span id="line-215"></span><span class="hs-comment">-- | @application/xml@</span><span>
 </span><span id="line-216"></span><span class="hs-keyword">instance</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#UpdatePet"><span class="hs-identifier hs-type">UpdatePet</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier hs-type">MimeXML</span></a></span><span>
@@ -465,8 +465,8 @@ OpenAPIPetstoreRequest req contentType res accept
 </span><span id="line-235"></span><span id="updatePetWithForm"><span class="annot"><span class="annottext">updatePetWithForm :: 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-6989586621679151849"><span class="annot"><span class="annottext">Integer
-</span><a href="#local-6989586621679151849"><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-6989586621679151967"><span class="annot"><span class="annottext">Integer
+</span><a href="#local-6989586621679151967"><span class="hs-identifier hs-var">petId</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
 </span><span id="line-236"></span><span>  </span><span class="annot"><span class="annottext">Method
 -&gt; [ByteString]
 -&gt; OpenAPIPetstoreRequest
@@ -480,7 +480,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-6989586621679151849"><span class="hs-identifier hs-var">petId</span></a></span><span class="hs-special">]</span><span>
+</span><a href="#local-6989586621679151967"><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
@@ -498,15 +498,15 @@ forall k (t :: k). Proxy t
 </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-6989586621679151846"><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-6989586621679151845"><span class="annot"><span class="annottext">applyOptionalParam :: OpenAPIPetstoreRequest UpdatePetWithForm contentType res accept
+</span><span id="line-242"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679151964"><span class="annot"><a href="OpenAPIPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#UpdatePetWithForm"><span class="hs-identifier hs-type">UpdatePetWithForm</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Name2"><span class="hs-identifier hs-type">Name2</span></a></span></span><span> </span><span class="hs-keyword">where</span><span>
+</span><span id="line-243"></span><span>  </span><span id="local-6989586621679151963"><span class="annot"><span class="annottext">applyOptionalParam :: OpenAPIPetstoreRequest UpdatePetWithForm contentType res accept
 -&gt; Name2
 -&gt; OpenAPIPetstoreRequest UpdatePetWithForm contentType res accept
-</span><a href="#local-6989586621679151845"><span class="hs-identifier hs-var hs-var hs-var hs-var">applyOptionalParam</span></a></span></span><span> </span><span id="local-6989586621679151844"><span class="annot"><span class="annottext">OpenAPIPetstoreRequest UpdatePetWithForm contentType res accept
-</span><a href="#local-6989586621679151844"><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-6989586621679151842"><span class="annot"><span class="annottext">Text
-</span><a href="#local-6989586621679151842"><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-6989586621679151963"><span class="hs-identifier hs-var hs-var hs-var hs-var">applyOptionalParam</span></a></span></span><span> </span><span id="local-6989586621679151962"><span class="annot"><span class="annottext">OpenAPIPetstoreRequest UpdatePetWithForm contentType res accept
+</span><a href="#local-6989586621679151962"><span class="hs-identifier hs-var">req</span></a></span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Model.html#Name2"><span class="hs-identifier hs-type">Name2</span></a></span><span> </span><span id="local-6989586621679151960"><span class="annot"><span class="annottext">Text
+</span><a href="#local-6989586621679151960"><span class="hs-identifier hs-var">xs</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
 </span><span id="line-244"></span><span>    </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest UpdatePetWithForm contentType res accept
-</span><a href="#local-6989586621679151844"><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-6989586621679151962"><span class="hs-identifier hs-var">req</span></a></span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest UpdatePetWithForm contentType res accept
 -&gt; Form
 -&gt; OpenAPIPetstoreRequest UpdatePetWithForm contentType res accept
 forall req contentType res accept.
@@ -516,18 +516,18 @@ 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-6989586621679151842"><span class="hs-identifier hs-var">xs</span></a></span><span class="hs-special">)</span><span>
+</span><a href="#local-6989586621679151960"><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-6989586621679151837"><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-6989586621679151836"><span class="annot"><span class="annottext">applyOptionalParam :: OpenAPIPetstoreRequest UpdatePetWithForm contentType res accept
+</span><span id="line-247"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679151955"><span class="annot"><a href="OpenAPIPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#UpdatePetWithForm"><span class="hs-identifier hs-type">UpdatePetWithForm</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#StatusText"><span class="hs-identifier hs-type">StatusText</span></a></span></span><span> </span><span class="hs-keyword">where</span><span>
+</span><span id="line-248"></span><span>  </span><span id="local-6989586621679151954"><span class="annot"><span class="annottext">applyOptionalParam :: OpenAPIPetstoreRequest UpdatePetWithForm contentType res accept
 -&gt; StatusText
 -&gt; OpenAPIPetstoreRequest UpdatePetWithForm contentType res accept
-</span><a href="#local-6989586621679151836"><span class="hs-identifier hs-var hs-var hs-var hs-var">applyOptionalParam</span></a></span></span><span> </span><span id="local-6989586621679151835"><span class="annot"><span class="annottext">OpenAPIPetstoreRequest UpdatePetWithForm contentType res accept
-</span><a href="#local-6989586621679151835"><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-6989586621679151833"><span class="annot"><span class="annottext">Text
-</span><a href="#local-6989586621679151833"><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-6989586621679151954"><span class="hs-identifier hs-var hs-var hs-var hs-var">applyOptionalParam</span></a></span></span><span> </span><span id="local-6989586621679151953"><span class="annot"><span class="annottext">OpenAPIPetstoreRequest UpdatePetWithForm contentType res accept
+</span><a href="#local-6989586621679151953"><span class="hs-identifier hs-var">req</span></a></span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Model.html#StatusText"><span class="hs-identifier hs-type">StatusText</span></a></span><span> </span><span id="local-6989586621679151951"><span class="annot"><span class="annottext">Text
+</span><a href="#local-6989586621679151951"><span class="hs-identifier hs-var">xs</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
 </span><span id="line-249"></span><span>    </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest UpdatePetWithForm contentType res accept
-</span><a href="#local-6989586621679151835"><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-6989586621679151953"><span class="hs-identifier hs-var">req</span></a></span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest UpdatePetWithForm contentType res accept
 -&gt; Form
 -&gt; OpenAPIPetstoreRequest UpdatePetWithForm contentType res accept
 forall req contentType res accept.
@@ -537,7 +537,7 @@ OpenAPIPetstoreRequest req contentType res accept
 forall v. ToHttpApiData v =&gt; (Method, v) -&gt; Form
 </span><a href="OpenAPIPetstore.Core.html#toForm"><span class="hs-identifier hs-var">toForm</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Method
 </span><span class="hs-string">&quot;status&quot;</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="annottext">Text
-</span><a href="#local-6989586621679151833"><span class="hs-identifier hs-var">xs</span></a></span><span class="hs-special">)</span><span>
+</span><a href="#local-6989586621679151951"><span class="hs-identifier hs-var">xs</span></a></span><span class="hs-special">)</span><span>
 </span><span id="line-250"></span><span>
 </span><span id="line-251"></span><span class="hs-comment">-- | @application/x-www-form-urlencoded@</span><span>
 </span><span id="line-252"></span><span class="hs-keyword">instance</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#UpdatePetWithForm"><span class="hs-identifier hs-type">UpdatePetWithForm</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier hs-type">MimeFormUrlEncoded</span></a></span><span>
@@ -560,8 +560,8 @@ forall v. ToHttpApiData v =&gt; (Method, v) -&gt; Form
 </span><span id="line-269"></span><span id="uploadFile"><span class="annot"><span class="annottext">uploadFile :: 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-6989586621679151829"><span class="annot"><span class="annottext">Integer
-</span><a href="#local-6989586621679151829"><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-6989586621679151947"><span class="annot"><span class="annottext">Integer
+</span><a href="#local-6989586621679151947"><span class="hs-identifier hs-var">petId</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
 </span><span id="line-270"></span><span>  </span><span class="annot"><span class="annottext">Method
 -&gt; [ByteString]
 -&gt; OpenAPIPetstoreRequest
@@ -575,7 +575,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-6989586621679151829"><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-6989586621679151947"><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
@@ -594,15 +594,15 @@ forall k (t :: k). Proxy t
 </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-6989586621679151826"><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-6989586621679151825"><span class="annot"><span class="annottext">applyOptionalParam :: OpenAPIPetstoreRequest UploadFile contentType res accept
+</span><span id="line-276"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679151944"><span class="annot"><a href="OpenAPIPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#UploadFile"><span class="hs-identifier hs-type">UploadFile</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#AdditionalMetadata"><span class="hs-identifier hs-type">AdditionalMetadata</span></a></span></span><span> </span><span class="hs-keyword">where</span><span>
+</span><span id="line-277"></span><span>  </span><span id="local-6989586621679151943"><span class="annot"><span class="annottext">applyOptionalParam :: OpenAPIPetstoreRequest UploadFile contentType res accept
 -&gt; AdditionalMetadata
 -&gt; OpenAPIPetstoreRequest UploadFile contentType res accept
-</span><a href="#local-6989586621679151825"><span class="hs-identifier hs-var hs-var hs-var hs-var">applyOptionalParam</span></a></span></span><span> </span><span id="local-6989586621679151824"><span class="annot"><span class="annottext">OpenAPIPetstoreRequest UploadFile contentType res accept
-</span><a href="#local-6989586621679151824"><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-6989586621679151822"><span class="annot"><span class="annottext">Text
-</span><a href="#local-6989586621679151822"><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-6989586621679151943"><span class="hs-identifier hs-var hs-var hs-var hs-var">applyOptionalParam</span></a></span></span><span> </span><span id="local-6989586621679151942"><span class="annot"><span class="annottext">OpenAPIPetstoreRequest UploadFile contentType res accept
+</span><a href="#local-6989586621679151942"><span class="hs-identifier hs-var">req</span></a></span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Model.html#AdditionalMetadata"><span class="hs-identifier hs-type">AdditionalMetadata</span></a></span><span> </span><span id="local-6989586621679151940"><span class="annot"><span class="annottext">Text
+</span><a href="#local-6989586621679151940"><span class="hs-identifier hs-var">xs</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
 </span><span id="line-278"></span><span>    </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest UploadFile contentType res accept
-</span><a href="#local-6989586621679151824"><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-6989586621679151942"><span class="hs-identifier hs-var">req</span></a></span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest UploadFile contentType res accept
 -&gt; Part -&gt; OpenAPIPetstoreRequest UploadFile contentType res accept
 forall req contentType res accept.
 OpenAPIPetstoreRequest req contentType res accept
@@ -616,18 +616,18 @@ 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-6989586621679151822"><span class="hs-identifier hs-var">xs</span></a></span><span class="hs-special">)</span><span>
+</span><a href="#local-6989586621679151940"><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-6989586621679151815"><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-6989586621679151814"><span class="annot"><span class="annottext">applyOptionalParam :: OpenAPIPetstoreRequest UploadFile contentType res accept
+</span><span id="line-281"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679151933"><span class="annot"><a href="OpenAPIPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#UploadFile"><span class="hs-identifier hs-type">UploadFile</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#File2"><span class="hs-identifier hs-type">File2</span></a></span></span><span> </span><span class="hs-keyword">where</span><span>
+</span><span id="line-282"></span><span>  </span><span id="local-6989586621679151932"><span class="annot"><span class="annottext">applyOptionalParam :: OpenAPIPetstoreRequest UploadFile contentType res accept
 -&gt; File2
 -&gt; OpenAPIPetstoreRequest UploadFile contentType res accept
-</span><a href="#local-6989586621679151814"><span class="hs-identifier hs-var hs-var hs-var hs-var">applyOptionalParam</span></a></span></span><span> </span><span id="local-6989586621679151813"><span class="annot"><span class="annottext">OpenAPIPetstoreRequest UploadFile contentType res accept
-</span><a href="#local-6989586621679151813"><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-6989586621679151811"><span class="annot"><span class="annottext">FilePath
-</span><a href="#local-6989586621679151811"><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-6989586621679151932"><span class="hs-identifier hs-var hs-var hs-var hs-var">applyOptionalParam</span></a></span></span><span> </span><span id="local-6989586621679151931"><span class="annot"><span class="annottext">OpenAPIPetstoreRequest UploadFile contentType res accept
+</span><a href="#local-6989586621679151931"><span class="hs-identifier hs-var">req</span></a></span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Model.html#File2"><span class="hs-identifier hs-type">File2</span></a></span><span> </span><span id="local-6989586621679151929"><span class="annot"><span class="annottext">FilePath
+</span><a href="#local-6989586621679151929"><span class="hs-identifier hs-var">xs</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
 </span><span id="line-283"></span><span>    </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest UploadFile contentType res accept
-</span><a href="#local-6989586621679151813"><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-6989586621679151931"><span class="hs-identifier hs-var">req</span></a></span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest UploadFile contentType res accept
 -&gt; Part -&gt; OpenAPIPetstoreRequest UploadFile contentType res accept
 forall req contentType res accept.
 OpenAPIPetstoreRequest req contentType res accept
@@ -635,7 +635,7 @@ OpenAPIPetstoreRequest req contentType res accept
 </span><a href="OpenAPIPetstore.Core.html#_addMultiFormPart"><span class="hs-operator hs-var">`_addMultiFormPart`</span></a></span><span> </span><span class="annot"><span class="annottext">Text -&gt; FilePath -&gt; Part
 </span><span class="hs-identifier hs-var">NH.partFileSource</span></span><span> </span><span class="annot"><span class="annottext">Text
 </span><span class="hs-string">&quot;file&quot;</span></span><span> </span><span class="annot"><span class="annottext">FilePath
-</span><a href="#local-6989586621679151811"><span class="hs-identifier hs-var">xs</span></a></span><span>
+</span><a href="#local-6989586621679151929"><span class="hs-identifier hs-var">xs</span></a></span><span>
 </span><span id="line-284"></span><span>
 </span><span id="line-285"></span><span class="hs-comment">-- | @multipart/form-data@</span><span>
 </span><span id="line-286"></span><span class="hs-keyword">instance</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#UploadFile"><span class="hs-identifier hs-type">UploadFile</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a></span><span>
@@ -664,9 +664,9 @@ OpenAPIPetstoreRequest req contentType res accept
      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-6989586621679151805"><span class="annot"><span class="annottext">FilePath
-</span><a href="#local-6989586621679151805"><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-6989586621679151804"><span class="annot"><span class="annottext">Integer
-</span><a href="#local-6989586621679151804"><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-6989586621679151923"><span class="annot"><span class="annottext">FilePath
+</span><a href="#local-6989586621679151923"><span class="hs-identifier hs-var">requiredFile</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Model.html#PetId"><span class="hs-identifier hs-type">PetId</span></a></span><span> </span><span id="local-6989586621679151922"><span class="annot"><span class="annottext">Integer
+</span><a href="#local-6989586621679151922"><span class="hs-identifier hs-var">petId</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
 </span><span id="line-306"></span><span>  </span><span class="annot"><span class="annottext">Method
 -&gt; [ByteString]
 -&gt; OpenAPIPetstoreRequest
@@ -683,7 +683,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-6989586621679151804"><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-6989586621679151922"><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
@@ -721,24 +721,24 @@ 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-6989586621679151805"><span class="hs-identifier hs-var">requiredFile</span></a></span><span>
+</span><a href="#local-6989586621679151923"><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-6989586621679151801"><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-6989586621679151800"><span class="annot"><span class="annottext">applyOptionalParam :: OpenAPIPetstoreRequest
+</span><span id="line-313"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679151919"><span class="annot"><a href="OpenAPIPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#UploadFileWithRequiredFile"><span class="hs-identifier hs-type">UploadFileWithRequiredFile</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#AdditionalMetadata"><span class="hs-identifier hs-type">AdditionalMetadata</span></a></span></span><span> </span><span class="hs-keyword">where</span><span>
+</span><span id="line-314"></span><span>  </span><span id="local-6989586621679151918"><span class="annot"><span class="annottext">applyOptionalParam :: OpenAPIPetstoreRequest
   UploadFileWithRequiredFile contentType res accept
 -&gt; AdditionalMetadata
 -&gt; OpenAPIPetstoreRequest
      UploadFileWithRequiredFile contentType res accept
-</span><a href="#local-6989586621679151800"><span class="hs-identifier hs-var hs-var hs-var hs-var">applyOptionalParam</span></a></span></span><span> </span><span id="local-6989586621679151799"><span class="annot"><span class="annottext">OpenAPIPetstoreRequest
+</span><a href="#local-6989586621679151918"><span class="hs-identifier hs-var hs-var hs-var hs-var">applyOptionalParam</span></a></span></span><span> </span><span id="local-6989586621679151917"><span class="annot"><span class="annottext">OpenAPIPetstoreRequest
   UploadFileWithRequiredFile contentType res accept
-</span><a href="#local-6989586621679151799"><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-6989586621679151798"><span class="annot"><span class="annottext">Text
-</span><a href="#local-6989586621679151798"><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-6989586621679151917"><span class="hs-identifier hs-var">req</span></a></span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Model.html#AdditionalMetadata"><span class="hs-identifier hs-type">AdditionalMetadata</span></a></span><span> </span><span id="local-6989586621679151916"><span class="annot"><span class="annottext">Text
+</span><a href="#local-6989586621679151916"><span class="hs-identifier hs-var">xs</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
 </span><span id="line-315"></span><span>    </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest
   UploadFileWithRequiredFile contentType res accept
-</span><a href="#local-6989586621679151799"><span class="hs-identifier hs-var">req</span></a></span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest
+</span><a href="#local-6989586621679151917"><span class="hs-identifier hs-var">req</span></a></span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest
   UploadFileWithRequiredFile contentType res accept
 -&gt; Part
 -&gt; OpenAPIPetstoreRequest
@@ -755,7 +755,7 @@ Text -&gt; ByteString -&gt; PartM m
 forall mtype x. MimeRender mtype x =&gt; mtype -&gt; x -&gt; ByteString
 </span><a href="OpenAPIPetstore.MimeTypes.html#mimeRender%27"><span class="hs-identifier hs-var">mimeRender'</span></a></span><span> </span><span class="annot"><span class="annottext">MimeMultipartFormData
 </span><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-var">MimeMultipartFormData</span></a></span><span> </span><span class="annot"><span class="annottext">Text
-</span><a href="#local-6989586621679151798"><span class="hs-identifier hs-var">xs</span></a></span><span class="hs-special">)</span><span>
+</span><a href="#local-6989586621679151916"><span class="hs-identifier hs-var">xs</span></a></span><span class="hs-special">)</span><span>
 </span><span id="line-316"></span><span>
 </span><span id="line-317"></span><span class="hs-comment">-- | @multipart/form-data@</span><span>
 </span><span id="line-318"></span><span class="hs-keyword">instance</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.Pet.html#UploadFileWithRequiredFile"><span class="hs-identifier hs-type">UploadFileWithRequiredFile</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a></span><span>

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

@@ -71,8 +71,8 @@ Module : OpenAPIPetstore.API.Store
 </span><span id="line-71"></span><span id="deleteOrder"><span class="annot"><span class="annottext">deleteOrder :: OrderIdText
 -&gt; OpenAPIPetstoreRequest
      DeleteOrder MimeNoContent NoContent MimeNoContent
-</span><a href="OpenAPIPetstore.API.Store.html#deleteOrder"><span class="hs-identifier hs-var hs-var">deleteOrder</span></a></span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Model.html#OrderIdText"><span class="hs-identifier hs-type">OrderIdText</span></a></span><span> </span><span id="local-6989586621679151727"><span class="annot"><span class="annottext">Text
-</span><a href="#local-6989586621679151727"><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-6989586621679151845"><span class="annot"><span class="annottext">Text
+</span><a href="#local-6989586621679151845"><span class="hs-identifier hs-var">orderId</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
 </span><span id="line-72"></span><span>  </span><span class="annot"><span class="annottext">Method
 -&gt; [ByteString]
 -&gt; OpenAPIPetstoreRequest
@@ -86,7 +86,7 @@ Method
 </span><span class="hs-string">&quot;/store/order/&quot;</span></span><span class="hs-special">,</span><span class="annot"><span class="annottext">Text -&gt; ByteString
 forall a. ToHttpApiData a =&gt; a -&gt; ByteString
 </span><a href="OpenAPIPetstore.Core.html#toPath"><span class="hs-identifier hs-var">toPath</span></a></span><span> </span><span class="annot"><span class="annottext">Text
-</span><a href="#local-6989586621679151727"><span class="hs-identifier hs-var">orderId</span></a></span><span class="hs-special">]</span><span>
+</span><a href="#local-6989586621679151845"><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>
@@ -145,16 +145,16 @@ forall k (t :: k). Proxy t
 </span><span id="line-104"></span><span class="hs-comment">-- </span><span>
 </span><span id="line-105"></span><span class="hs-comment">-- For valid response try integer IDs with value &lt;= 5 or &gt; 10. Other values will generated exceptions</span><span>
 </span><span id="line-106"></span><span class="hs-comment">-- </span><span>
-</span><span id="line-107"></span><span id="local-6989586621679151718"><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-6989586621679151718"><span class="hs-identifier hs-type">accept</span></a></span><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
+</span><span id="line-107"></span><span id="local-6989586621679151836"><span class="annot"><a href="OpenAPIPetstore.API.Store.html#getOrderById"><span class="hs-identifier hs-type">getOrderById</span></a></span><span>
+</span><span id="line-108"></span><span>  </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151836"><span class="hs-identifier hs-type">accept</span></a></span><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
 </span><span id="line-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-6989586621679151718"><span class="hs-identifier hs-type">accept</span></a></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-6989586621679151836"><span class="hs-identifier hs-type">accept</span></a></span></span><span>
 </span><span id="line-111"></span><span id="getOrderById"><span class="annot"><span class="annottext">getOrderById :: Accept accept
 -&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-6989586621679151715"><span class="annot"><span class="annottext">Integer
-</span><a href="#local-6989586621679151715"><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-6989586621679151833"><span class="annot"><span class="annottext">Integer
+</span><a href="#local-6989586621679151833"><span class="hs-identifier hs-var">orderId</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
 </span><span id="line-112"></span><span>  </span><span class="annot"><span class="annottext">Method
 -&gt; [ByteString]
 -&gt; OpenAPIPetstoreRequest GetOrderById MimeNoContent Order accept
@@ -167,7 +167,7 @@ Method
 </span><span class="hs-string">&quot;/store/order/&quot;</span></span><span class="hs-special">,</span><span class="annot"><span class="annottext">Integer -&gt; ByteString
 forall a. ToHttpApiData a =&gt; a -&gt; ByteString
 </span><a href="OpenAPIPetstore.Core.html#toPath"><span class="hs-identifier hs-var">toPath</span></a></span><span> </span><span class="annot"><span class="annottext">Integer
-</span><a href="#local-6989586621679151715"><span class="hs-identifier hs-var">orderId</span></a></span><span class="hs-special">]</span><span>
+</span><a href="#local-6989586621679151833"><span class="hs-identifier hs-var">orderId</span></a></span><span class="hs-special">]</span><span>
 </span><span id="line-113"></span><span>
 </span><span id="line-114"></span><span class="hs-keyword">data</span><span> </span><span id="GetOrderById"><span class="annot"><a href="OpenAPIPetstore.API.Store.html#GetOrderById"><span class="hs-identifier hs-var">GetOrderById</span></a></span></span><span>  </span><span>
 </span><span id="line-115"></span><span class="hs-comment">-- | @application/xml@</span><span>
@@ -182,20 +182,20 @@ forall a. ToHttpApiData a =&gt; a -&gt; ByteString
 </span><span id="line-124"></span><span class="hs-comment">-- </span><span>
 </span><span id="line-125"></span><span class="hs-comment">-- Place an order for a pet</span><span>
 </span><span id="line-126"></span><span class="hs-comment">-- </span><span>
-</span><span id="line-127"></span><span id="local-6989586621679151711"><span id="local-6989586621679151712"><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-6989586621679151712"><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-6989586621679151712"><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-6989586621679151712"><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-6989586621679151711"><span class="hs-identifier hs-type">accept</span></a></span><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
+</span><span id="line-127"></span><span id="local-6989586621679151829"><span id="local-6989586621679151830"><span class="annot"><a href="OpenAPIPetstore.API.Store.html#placeOrder"><span class="hs-identifier hs-type">placeOrder</span></a></span><span>
+</span><span id="line-128"></span><span>  </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.Store.html#PlaceOrder"><span class="hs-identifier hs-type">PlaceOrder</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151830"><span class="hs-identifier hs-type">contentType</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151830"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Order"><span class="hs-identifier hs-type">Order</span></a></span><span class="hs-special">)</span><span>
+</span><span id="line-129"></span><span>  </span><span class="hs-glyph">=&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151830"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="hs-comment">-- ^ request content-type ('MimeType')</span><span>
+</span><span id="line-130"></span><span>  </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151829"><span class="hs-identifier hs-type">accept</span></a></span><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
 </span><span id="line-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-6989586621679151712"><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-6989586621679151711"><span class="hs-identifier hs-type">accept</span></a></span></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-6989586621679151830"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Order"><span class="hs-identifier hs-type">Order</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151829"><span class="hs-identifier hs-type">accept</span></a></span></span></span><span>
 </span><span id="line-133"></span><span id="placeOrder"><span class="annot"><span class="annottext">placeOrder :: ContentType contentType
 -&gt; Accept accept
 -&gt; Order
 -&gt; OpenAPIPetstoreRequest PlaceOrder contentType Order accept
 </span><a href="OpenAPIPetstore.API.Store.html#placeOrder"><span class="hs-identifier hs-var hs-var">placeOrder</span></a></span></span><span> </span><span class="annot"><span class="annottext">ContentType contentType
 </span><span class="hs-identifier">_</span></span><span>  </span><span class="annot"><span class="annottext">Accept accept
-</span><span class="hs-identifier">_</span></span><span> </span><span id="local-6989586621679151709"><span class="annot"><span class="annottext">Order
-</span><a href="#local-6989586621679151709"><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-6989586621679151827"><span class="annot"><span class="annottext">Order
+</span><a href="#local-6989586621679151827"><span class="hs-identifier hs-var">body</span></a></span></span><span> </span><span class="hs-glyph">=</span><span>
 </span><span id="line-134"></span><span>  </span><span class="annot"><span class="annottext">Method
 -&gt; [ByteString]
 -&gt; OpenAPIPetstoreRequest PlaceOrder contentType Order accept
@@ -215,15 +215,15 @@ forall req param contentType res accept.
 OpenAPIPetstoreRequest req contentType res accept
 -&gt; param -&gt; OpenAPIPetstoreRequest req contentType res accept
 </span><a href="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-operator hs-var">`setBodyParam`</span></a></span><span> </span><span class="annot"><span class="annottext">Order
-</span><a href="#local-6989586621679151709"><span class="hs-identifier hs-var">body</span></a></span><span>
+</span><a href="#local-6989586621679151827"><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-6989586621679151706"><span class="annot"><a href="OpenAPIPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.Store.html#PlaceOrder"><span class="hs-identifier hs-type">PlaceOrder</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Order"><span class="hs-identifier hs-type">Order</span></a></span></span><span> </span><span>
+</span><span id="line-140"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679151824"><span class="annot"><a href="OpenAPIPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.Store.html#PlaceOrder"><span class="hs-identifier hs-type">PlaceOrder</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Order"><span class="hs-identifier hs-type">Order</span></a></span></span><span> </span><span>
 </span><span id="line-141"></span><span>
 </span><span id="line-142"></span><span class="hs-comment">-- | @*/*@</span><span>
-</span><span id="line-143"></span><span id="local-6989586621679151704"><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-6989586621679151704"><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-6989586621679151704"><span class="hs-identifier hs-type">mtype</span></a></span></span><span>
+</span><span id="line-143"></span><span id="local-6989586621679151822"><span class="hs-keyword">instance</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151822"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.Store.html#PlaceOrder"><span class="hs-identifier hs-type">PlaceOrder</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151822"><span class="hs-identifier hs-type">mtype</span></a></span></span><span>
 </span><span id="line-144"></span><span>
 </span><span id="line-145"></span><span class="hs-comment">-- | @application/xml@</span><span>
 </span><span id="line-146"></span><span class="hs-keyword">instance</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.Store.html#PlaceOrder"><span class="hs-identifier hs-type">PlaceOrder</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier hs-type">MimeXML</span></a></span><span>

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

@@ -65,18 +65,18 @@ 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-6989586621679151616"><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-6989586621679151616"><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-6989586621679151616"><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-6989586621679151616"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="hs-comment">-- ^ request content-type ('MimeType')</span><span>
+</span><span id="line-68"></span><span id="local-6989586621679151734"><span class="annot"><a href="OpenAPIPetstore.API.User.html#createUser"><span class="hs-identifier hs-type">createUser</span></a></span><span>
+</span><span id="line-69"></span><span>  </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#CreateUser"><span class="hs-identifier hs-type">CreateUser</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151734"><span class="hs-identifier hs-type">contentType</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151734"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a></span><span class="hs-special">)</span><span>
+</span><span id="line-70"></span><span>  </span><span class="hs-glyph">=&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151734"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="hs-comment">-- ^ request content-type ('MimeType')</span><span>
 </span><span id="line-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-6989586621679151616"><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-72"></span><span>  </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#CreateUser"><span class="hs-identifier hs-type">CreateUser</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151734"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span></span><span>
 </span><span id="line-73"></span><span id="createUser"><span class="annot"><span class="annottext">createUser :: ContentType contentType
 -&gt; User
 -&gt; OpenAPIPetstoreRequest
      CreateUser contentType NoContent MimeNoContent
 </span><a href="OpenAPIPetstore.API.User.html#createUser"><span class="hs-identifier hs-var hs-var">createUser</span></a></span></span><span> </span><span class="annot"><span class="annottext">ContentType contentType
-</span><span class="hs-identifier">_</span></span><span> </span><span id="local-6989586621679151614"><span class="annot"><span class="annottext">User
-</span><a href="#local-6989586621679151614"><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-6989586621679151732"><span class="annot"><span class="annottext">User
+</span><a href="#local-6989586621679151732"><span class="hs-identifier hs-var">body</span></a></span></span><span> </span><span class="hs-glyph">=</span><span>
 </span><span id="line-74"></span><span>  </span><span class="annot"><span class="annottext">Method
 -&gt; [ByteString]
 -&gt; OpenAPIPetstoreRequest
@@ -99,15 +99,15 @@ forall req param contentType res accept.
 OpenAPIPetstoreRequest req contentType res accept
 -&gt; param -&gt; OpenAPIPetstoreRequest req contentType res accept
 </span><a href="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-operator hs-var">`setBodyParam`</span></a></span><span> </span><span class="annot"><span class="annottext">User
-</span><a href="#local-6989586621679151614"><span class="hs-identifier hs-var">body</span></a></span><span>
+</span><a href="#local-6989586621679151732"><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-6989586621679151610"><span class="annot"><a href="OpenAPIPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#CreateUser"><span class="hs-identifier hs-type">CreateUser</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a></span></span><span> </span><span>
+</span><span id="line-80"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679151728"><span class="annot"><a href="OpenAPIPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#CreateUser"><span class="hs-identifier hs-type">CreateUser</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a></span></span><span> </span><span>
 </span><span id="line-81"></span><span>
 </span><span id="line-82"></span><span class="hs-comment">-- | @*/*@</span><span>
-</span><span id="line-83"></span><span id="local-6989586621679151608"><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-6989586621679151608"><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-6989586621679151608"><span class="hs-identifier hs-type">mtype</span></a></span></span><span>
+</span><span id="line-83"></span><span id="local-6989586621679151726"><span class="hs-keyword">instance</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151726"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#CreateUser"><span class="hs-identifier hs-type">CreateUser</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151726"><span class="hs-identifier hs-type">mtype</span></a></span></span><span>
 </span><span id="line-84"></span><span>
 </span><span id="line-85"></span><span class="hs-keyword">instance</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#CreateUser"><span class="hs-identifier hs-type">CreateUser</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span><span>
 </span><span id="line-86"></span><span>
@@ -118,18 +118,18 @@ OpenAPIPetstoreRequest req contentType res accept
 </span><span id="line-91"></span><span class="hs-comment">-- </span><span>
 </span><span id="line-92"></span><span class="hs-comment">-- Creates list of users with given input array</span><span>
 </span><span id="line-93"></span><span class="hs-comment">-- </span><span>
-</span><span id="line-94"></span><span id="local-6989586621679151603"><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-6989586621679151603"><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-6989586621679151603"><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-6989586621679151603"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="hs-comment">-- ^ request content-type ('MimeType')</span><span>
+</span><span id="line-94"></span><span id="local-6989586621679151721"><span class="annot"><a href="OpenAPIPetstore.API.User.html#createUsersWithArrayInput"><span class="hs-identifier hs-type">createUsersWithArrayInput</span></a></span><span>
+</span><span id="line-95"></span><span>  </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#CreateUsersWithArrayInput"><span class="hs-identifier hs-type">CreateUsersWithArrayInput</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151721"><span class="hs-identifier hs-type">contentType</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151721"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Body"><span class="hs-identifier hs-type">Body</span></a></span><span class="hs-special">)</span><span>
+</span><span id="line-96"></span><span>  </span><span class="hs-glyph">=&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151721"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="hs-comment">-- ^ request content-type ('MimeType')</span><span>
 </span><span id="line-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-6989586621679151603"><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-98"></span><span>  </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#CreateUsersWithArrayInput"><span class="hs-identifier hs-type">CreateUsersWithArrayInput</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151721"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span></span><span>
 </span><span id="line-99"></span><span id="createUsersWithArrayInput"><span class="annot"><span class="annottext">createUsersWithArrayInput :: ContentType contentType
 -&gt; Body
 -&gt; OpenAPIPetstoreRequest
      CreateUsersWithArrayInput contentType NoContent MimeNoContent
 </span><a href="OpenAPIPetstore.API.User.html#createUsersWithArrayInput"><span class="hs-identifier hs-var hs-var">createUsersWithArrayInput</span></a></span></span><span> </span><span class="annot"><span class="annottext">ContentType contentType
-</span><span class="hs-identifier">_</span></span><span> </span><span id="local-6989586621679151601"><span class="annot"><span class="annottext">Body
-</span><a href="#local-6989586621679151601"><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-6989586621679151719"><span class="annot"><span class="annottext">Body
+</span><a href="#local-6989586621679151719"><span class="hs-identifier hs-var">body</span></a></span></span><span> </span><span class="hs-glyph">=</span><span>
 </span><span id="line-100"></span><span>  </span><span class="annot"><span class="annottext">Method
 -&gt; [ByteString]
 -&gt; OpenAPIPetstoreRequest
@@ -152,15 +152,15 @@ forall req param contentType res accept.
 OpenAPIPetstoreRequest req contentType res accept
 -&gt; param -&gt; OpenAPIPetstoreRequest req contentType res accept
 </span><a href="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-operator hs-var">`setBodyParam`</span></a></span><span> </span><span class="annot"><span class="annottext">Body
-</span><a href="#local-6989586621679151601"><span class="hs-identifier hs-var">body</span></a></span><span>
+</span><a href="#local-6989586621679151719"><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-6989586621679151599"><span class="annot"><a href="OpenAPIPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#CreateUsersWithArrayInput"><span class="hs-identifier hs-type">CreateUsersWithArrayInput</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Body"><span class="hs-identifier hs-type">Body</span></a></span></span><span> </span><span>
+</span><span id="line-106"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679151717"><span class="annot"><a href="OpenAPIPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#CreateUsersWithArrayInput"><span class="hs-identifier hs-type">CreateUsersWithArrayInput</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Body"><span class="hs-identifier hs-type">Body</span></a></span></span><span> </span><span>
 </span><span id="line-107"></span><span>
 </span><span id="line-108"></span><span class="hs-comment">-- | @*/*@</span><span>
-</span><span id="line-109"></span><span id="local-6989586621679151598"><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-6989586621679151598"><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-6989586621679151598"><span class="hs-identifier hs-type">mtype</span></a></span></span><span>
+</span><span id="line-109"></span><span id="local-6989586621679151716"><span class="hs-keyword">instance</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151716"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#CreateUsersWithArrayInput"><span class="hs-identifier hs-type">CreateUsersWithArrayInput</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151716"><span class="hs-identifier hs-type">mtype</span></a></span></span><span>
 </span><span id="line-110"></span><span>
 </span><span id="line-111"></span><span class="hs-keyword">instance</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#CreateUsersWithArrayInput"><span class="hs-identifier hs-type">CreateUsersWithArrayInput</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span><span>
 </span><span id="line-112"></span><span>
@@ -171,18 +171,18 @@ OpenAPIPetstoreRequest req contentType res accept
 </span><span id="line-117"></span><span class="hs-comment">-- </span><span>
 </span><span id="line-118"></span><span class="hs-comment">-- Creates list of users with given input array</span><span>
 </span><span id="line-119"></span><span class="hs-comment">-- </span><span>
-</span><span id="line-120"></span><span id="local-6989586621679151595"><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-6989586621679151595"><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-6989586621679151595"><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-6989586621679151595"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="hs-comment">-- ^ request content-type ('MimeType')</span><span>
+</span><span id="line-120"></span><span id="local-6989586621679151713"><span class="annot"><a href="OpenAPIPetstore.API.User.html#createUsersWithListInput"><span class="hs-identifier hs-type">createUsersWithListInput</span></a></span><span>
+</span><span id="line-121"></span><span>  </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#CreateUsersWithListInput"><span class="hs-identifier hs-type">CreateUsersWithListInput</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151713"><span class="hs-identifier hs-type">contentType</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151713"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Body"><span class="hs-identifier hs-type">Body</span></a></span><span class="hs-special">)</span><span>
+</span><span id="line-122"></span><span>  </span><span class="hs-glyph">=&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151713"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="hs-comment">-- ^ request content-type ('MimeType')</span><span>
 </span><span id="line-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-6989586621679151595"><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-124"></span><span>  </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#CreateUsersWithListInput"><span class="hs-identifier hs-type">CreateUsersWithListInput</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151713"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span></span><span>
 </span><span id="line-125"></span><span id="createUsersWithListInput"><span class="annot"><span class="annottext">createUsersWithListInput :: ContentType contentType
 -&gt; Body
 -&gt; OpenAPIPetstoreRequest
      CreateUsersWithListInput contentType NoContent MimeNoContent
 </span><a href="OpenAPIPetstore.API.User.html#createUsersWithListInput"><span class="hs-identifier hs-var hs-var">createUsersWithListInput</span></a></span></span><span> </span><span class="annot"><span class="annottext">ContentType contentType
-</span><span class="hs-identifier">_</span></span><span> </span><span id="local-6989586621679151593"><span class="annot"><span class="annottext">Body
-</span><a href="#local-6989586621679151593"><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-6989586621679151711"><span class="annot"><span class="annottext">Body
+</span><a href="#local-6989586621679151711"><span class="hs-identifier hs-var">body</span></a></span></span><span> </span><span class="hs-glyph">=</span><span>
 </span><span id="line-126"></span><span>  </span><span class="annot"><span class="annottext">Method
 -&gt; [ByteString]
 -&gt; OpenAPIPetstoreRequest
@@ -205,15 +205,15 @@ forall req param contentType res accept.
 OpenAPIPetstoreRequest req contentType res accept
 -&gt; param -&gt; OpenAPIPetstoreRequest req contentType res accept
 </span><a href="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-operator hs-var">`setBodyParam`</span></a></span><span> </span><span class="annot"><span class="annottext">Body
-</span><a href="#local-6989586621679151593"><span class="hs-identifier hs-var">body</span></a></span><span>
+</span><a href="#local-6989586621679151711"><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-6989586621679151591"><span class="annot"><a href="OpenAPIPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#CreateUsersWithListInput"><span class="hs-identifier hs-type">CreateUsersWithListInput</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Body"><span class="hs-identifier hs-type">Body</span></a></span></span><span> </span><span>
+</span><span id="line-132"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679151709"><span class="annot"><a href="OpenAPIPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#CreateUsersWithListInput"><span class="hs-identifier hs-type">CreateUsersWithListInput</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Body"><span class="hs-identifier hs-type">Body</span></a></span></span><span> </span><span>
 </span><span id="line-133"></span><span>
 </span><span id="line-134"></span><span class="hs-comment">-- | @*/*@</span><span>
-</span><span id="line-135"></span><span id="local-6989586621679151590"><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-6989586621679151590"><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-6989586621679151590"><span class="hs-identifier hs-type">mtype</span></a></span></span><span>
+</span><span id="line-135"></span><span id="local-6989586621679151708"><span class="hs-keyword">instance</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151708"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#CreateUsersWithListInput"><span class="hs-identifier hs-type">CreateUsersWithListInput</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151708"><span class="hs-identifier hs-type">mtype</span></a></span></span><span>
 </span><span id="line-136"></span><span>
 </span><span id="line-137"></span><span class="hs-keyword">instance</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#CreateUsersWithListInput"><span class="hs-identifier hs-type">CreateUsersWithListInput</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span><span>
 </span><span id="line-138"></span><span>
@@ -232,8 +232,8 @@ OpenAPIPetstoreRequest req contentType res accept
 </span><span id="line-151"></span><span id="deleteUser"><span class="annot"><span class="annottext">deleteUser :: Username
 -&gt; OpenAPIPetstoreRequest
      DeleteUser MimeNoContent NoContent MimeNoContent
-</span><a href="OpenAPIPetstore.API.User.html#deleteUser"><span class="hs-identifier hs-var hs-var">deleteUser</span></a></span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Model.html#Username"><span class="hs-identifier hs-type">Username</span></a></span><span> </span><span id="local-6989586621679151585"><span class="annot"><span class="annottext">Text
-</span><a href="#local-6989586621679151585"><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-6989586621679151703"><span class="annot"><span class="annottext">Text
+</span><a href="#local-6989586621679151703"><span class="hs-identifier hs-var">username</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
 </span><span id="line-152"></span><span>  </span><span class="annot"><span class="annottext">Method
 -&gt; [ByteString]
 -&gt; OpenAPIPetstoreRequest
@@ -247,7 +247,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-6989586621679151585"><span class="hs-identifier hs-var">username</span></a></span><span class="hs-special">]</span><span>
+</span><a href="#local-6989586621679151703"><span class="hs-identifier hs-var">username</span></a></span><span class="hs-special">]</span><span>
 </span><span id="line-153"></span><span>
 </span><span id="line-154"></span><span class="hs-keyword">data</span><span> </span><span id="DeleteUser"><span class="annot"><a href="OpenAPIPetstore.API.User.html#DeleteUser"><span class="hs-identifier hs-var">DeleteUser</span></a></span></span><span>  </span><span>
 </span><span id="line-155"></span><span class="hs-keyword">instance</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#DeleteUser"><span class="hs-identifier hs-type">DeleteUser</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span><span>
@@ -259,16 +259,16 @@ forall a. ToHttpApiData a =&gt; a -&gt; ByteString
 </span><span id="line-161"></span><span class="hs-comment">-- </span><span>
 </span><span id="line-162"></span><span class="hs-comment">-- Get user by user name</span><span>
 </span><span id="line-163"></span><span class="hs-comment">-- </span><span>
-</span><span id="line-164"></span><span id="local-6989586621679151582"><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-6989586621679151582"><span class="hs-identifier hs-type">accept</span></a></span><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
+</span><span id="line-164"></span><span id="local-6989586621679151700"><span class="annot"><a href="OpenAPIPetstore.API.User.html#getUserByName"><span class="hs-identifier hs-type">getUserByName</span></a></span><span>
+</span><span id="line-165"></span><span>  </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151700"><span class="hs-identifier hs-type">accept</span></a></span><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
 </span><span id="line-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-6989586621679151582"><span class="hs-identifier hs-type">accept</span></a></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-6989586621679151700"><span class="hs-identifier hs-type">accept</span></a></span></span><span>
 </span><span id="line-168"></span><span id="getUserByName"><span class="annot"><span class="annottext">getUserByName :: Accept accept
 -&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-6989586621679151580"><span class="annot"><span class="annottext">Text
-</span><a href="#local-6989586621679151580"><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-6989586621679151698"><span class="annot"><span class="annottext">Text
+</span><a href="#local-6989586621679151698"><span class="hs-identifier hs-var">username</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
 </span><span id="line-169"></span><span>  </span><span class="annot"><span class="annottext">Method
 -&gt; [ByteString]
 -&gt; OpenAPIPetstoreRequest GetUserByName MimeNoContent User accept
@@ -281,7 +281,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-6989586621679151580"><span class="hs-identifier hs-var">username</span></a></span><span class="hs-special">]</span><span>
+</span><a href="#local-6989586621679151698"><span class="hs-identifier hs-var">username</span></a></span><span class="hs-special">]</span><span>
 </span><span id="line-170"></span><span>
 </span><span id="line-171"></span><span class="hs-keyword">data</span><span> </span><span id="GetUserByName"><span class="annot"><a href="OpenAPIPetstore.API.User.html#GetUserByName"><span class="hs-identifier hs-var">GetUserByName</span></a></span></span><span>  </span><span>
 </span><span id="line-172"></span><span class="hs-comment">-- | @application/xml@</span><span>
@@ -296,19 +296,19 @@ forall a. ToHttpApiData a =&gt; a -&gt; ByteString
 </span><span id="line-181"></span><span class="hs-comment">-- </span><span>
 </span><span id="line-182"></span><span class="hs-comment">-- Logs user into the system</span><span>
 </span><span id="line-183"></span><span class="hs-comment">-- </span><span>
-</span><span id="line-184"></span><span id="local-6989586621679151577"><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-6989586621679151577"><span class="hs-identifier hs-type">accept</span></a></span><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
+</span><span id="line-184"></span><span id="local-6989586621679151695"><span class="annot"><a href="OpenAPIPetstore.API.User.html#loginUser"><span class="hs-identifier hs-type">loginUser</span></a></span><span>
+</span><span id="line-185"></span><span>  </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151695"><span class="hs-identifier hs-type">accept</span></a></span><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
 </span><span id="line-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-6989586621679151577"><span class="hs-identifier hs-type">accept</span></a></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-6989586621679151695"><span class="hs-identifier hs-type">accept</span></a></span></span><span>
 </span><span id="line-189"></span><span id="loginUser"><span class="annot"><span class="annottext">loginUser :: Accept accept
 -&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-6989586621679151575"><span class="annot"><span class="annottext">Text
-</span><a href="#local-6989586621679151575"><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-6989586621679151573"><span class="annot"><span class="annottext">Text
-</span><a href="#local-6989586621679151573"><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-6989586621679151693"><span class="annot"><span class="annottext">Text
+</span><a href="#local-6989586621679151693"><span class="hs-identifier hs-var">username</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Model.html#Password"><span class="hs-identifier hs-type">Password</span></a></span><span> </span><span id="local-6989586621679151691"><span class="annot"><span class="annottext">Text
+</span><a href="#local-6989586621679151691"><span class="hs-identifier hs-var">password</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
 </span><span id="line-190"></span><span>  </span><span class="annot"><span class="annottext">Method
 -&gt; [ByteString]
 -&gt; OpenAPIPetstoreRequest LoginUser MimeNoContent Text accept
@@ -331,7 +331,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-6989586621679151575"><span class="hs-identifier hs-var">username</span></a></span><span class="hs-special">)</span><span>
+</span><a href="#local-6989586621679151693"><span class="hs-identifier hs-var">username</span></a></span><span class="hs-special">)</span><span>
 </span><span id="line-192"></span><span>    </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest LoginUser MimeNoContent Text accept
 -&gt; [QueryItem]
 -&gt; OpenAPIPetstoreRequest LoginUser MimeNoContent Text accept
@@ -344,7 +344,7 @@ forall a. ToHttpApiData a =&gt; (Method, Maybe a) -&gt; [QueryItem]
 </span><span class="hs-string">&quot;password&quot;</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="annottext">Text -&gt; Maybe Text
 forall a. a -&gt; Maybe a
 </span><span class="hs-identifier hs-var">Just</span></span><span> </span><span class="annot"><span class="annottext">Text
-</span><a href="#local-6989586621679151573"><span class="hs-identifier hs-var">password</span></a></span><span class="hs-special">)</span><span>
+</span><a href="#local-6989586621679151691"><span class="hs-identifier hs-var">password</span></a></span><span class="hs-special">)</span><span>
 </span><span id="line-193"></span><span>
 </span><span id="line-194"></span><span class="hs-keyword">data</span><span> </span><span id="LoginUser"><span class="annot"><a href="OpenAPIPetstore.API.User.html#LoginUser"><span class="hs-identifier hs-var">LoginUser</span></a></span></span><span>  </span><span>
 </span><span id="line-195"></span><span class="hs-comment">-- | @application/xml@</span><span>
@@ -388,21 +388,21 @@ 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-6989586621679151566"><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-6989586621679151566"><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-6989586621679151566"><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-6989586621679151566"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="hs-comment">-- ^ request content-type ('MimeType')</span><span>
+</span><span id="line-224"></span><span id="local-6989586621679151684"><span class="annot"><a href="OpenAPIPetstore.API.User.html#updateUser"><span class="hs-identifier hs-type">updateUser</span></a></span><span>
+</span><span id="line-225"></span><span>  </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#UpdateUser"><span class="hs-identifier hs-type">UpdateUser</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151684"><span class="hs-identifier hs-type">contentType</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151684"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a></span><span class="hs-special">)</span><span>
+</span><span id="line-226"></span><span>  </span><span class="hs-glyph">=&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151684"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="hs-comment">-- ^ request content-type ('MimeType')</span><span>
 </span><span id="line-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-6989586621679151566"><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-229"></span><span>  </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#UpdateUser"><span class="hs-identifier hs-type">UpdateUser</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151684"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span></span><span>
 </span><span id="line-230"></span><span id="updateUser"><span class="annot"><span class="annottext">updateUser :: ContentType contentType
 -&gt; User
 -&gt; Username
 -&gt; OpenAPIPetstoreRequest
      UpdateUser contentType NoContent MimeNoContent
 </span><a href="OpenAPIPetstore.API.User.html#updateUser"><span class="hs-identifier hs-var hs-var">updateUser</span></a></span></span><span> </span><span class="annot"><span class="annottext">ContentType contentType
-</span><span class="hs-identifier">_</span></span><span> </span><span id="local-6989586621679151564"><span class="annot"><span class="annottext">User
-</span><a href="#local-6989586621679151564"><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-6989586621679151563"><span class="annot"><span class="annottext">Text
-</span><a href="#local-6989586621679151563"><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-6989586621679151682"><span class="annot"><span class="annottext">User
+</span><a href="#local-6989586621679151682"><span class="hs-identifier hs-var">body</span></a></span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Model.html#Username"><span class="hs-identifier hs-type">Username</span></a></span><span> </span><span id="local-6989586621679151681"><span class="annot"><span class="annottext">Text
+</span><a href="#local-6989586621679151681"><span class="hs-identifier hs-var">username</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
 </span><span id="line-231"></span><span>  </span><span class="annot"><span class="annottext">Method
 -&gt; [ByteString]
 -&gt; OpenAPIPetstoreRequest
@@ -416,7 +416,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-6989586621679151563"><span class="hs-identifier hs-var">username</span></a></span><span class="hs-special">]</span><span>
+</span><a href="#local-6989586621679151681"><span class="hs-identifier hs-var">username</span></a></span><span class="hs-special">]</span><span>
 </span><span id="line-232"></span><span>    </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest
   UpdateUser contentType NoContent MimeNoContent
 -&gt; User
@@ -428,15 +428,15 @@ forall req param contentType res accept.
 OpenAPIPetstoreRequest req contentType res accept
 -&gt; param -&gt; OpenAPIPetstoreRequest req contentType res accept
 </span><a href="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-operator hs-var">`setBodyParam`</span></a></span><span> </span><span class="annot"><span class="annottext">User
-</span><a href="#local-6989586621679151564"><span class="hs-identifier hs-var">body</span></a></span><span>
+</span><a href="#local-6989586621679151682"><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-6989586621679151561"><span class="annot"><a href="OpenAPIPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#UpdateUser"><span class="hs-identifier hs-type">UpdateUser</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a></span></span><span> </span><span>
+</span><span id="line-237"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679151679"><span class="annot"><a href="OpenAPIPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#UpdateUser"><span class="hs-identifier hs-type">UpdateUser</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a></span></span><span> </span><span>
 </span><span id="line-238"></span><span>
 </span><span id="line-239"></span><span class="hs-comment">-- | @*/*@</span><span>
-</span><span id="line-240"></span><span id="local-6989586621679151560"><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-6989586621679151560"><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-6989586621679151560"><span class="hs-identifier hs-type">mtype</span></a></span></span><span>
+</span><span id="line-240"></span><span id="local-6989586621679151678"><span class="hs-keyword">instance</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151678"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#UpdateUser"><span class="hs-identifier hs-type">UpdateUser</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151678"><span class="hs-identifier hs-type">mtype</span></a></span></span><span>
 </span><span id="line-241"></span><span>
 </span><span id="line-242"></span><span class="hs-keyword">instance</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#UpdateUser"><span class="hs-identifier hs-type">UpdateUser</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span><span>
 </span><span id="line-243"></span><span>

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

@@ -34,11 +34,11 @@ Katip Logging functions
 </span><span id="line-34"></span><span class="hs-comment">-- * Type Aliases (for compatibility)</span><span>
 </span><span id="line-35"></span><span>
 </span><span id="line-36"></span><span class="hs-comment">-- | Runs a Katip logging block with the Log environment</span><span>
-</span><span id="line-37"></span><span class="hs-keyword">type</span><span> </span><span id="LogExecWithContext"><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#LogExecWithContext"><span class="hs-identifier hs-var">LogExecWithContext</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">forall</span><span> </span><span id="local-6989586621679145572"><span class="annot"><a href="#local-6989586621679145572"><span class="hs-identifier hs-type">m</span></a></span></span><span> </span><span id="local-6989586621679145571"><span class="annot"><a href="#local-6989586621679145571"><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-6989586621679145572"><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-6989586621679145572"><span class="hs-identifier hs-type">m</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679145571"><span class="hs-identifier hs-type">a</span></a></span><span>
+</span><span id="line-37"></span><span class="hs-keyword">type</span><span> </span><span id="LogExecWithContext"><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#LogExecWithContext"><span class="hs-identifier hs-var">LogExecWithContext</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">forall</span><span> </span><span id="local-6989586621679145661"><span class="annot"><a href="#local-6989586621679145661"><span class="hs-identifier hs-type">m</span></a></span></span><span> </span><span id="local-6989586621679145660"><span class="annot"><a href="#local-6989586621679145660"><span class="hs-identifier hs-type">a</span></a></span></span><span class="hs-operator">.</span><span> </span><span class="annot"><span class="hs-identifier hs-type">P.MonadIO</span></span><span> </span><span class="annot"><a href="#local-6989586621679145661"><span class="hs-identifier hs-type">m</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span>
+</span><span id="line-38"></span><span>                                      </span><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#LogContext"><span class="hs-identifier hs-type">LogContext</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#LogExec"><span class="hs-identifier hs-type">LogExec</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679145661"><span class="hs-identifier hs-type">m</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679145660"><span class="hs-identifier hs-type">a</span></a></span><span>
 </span><span id="line-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-6989586621679145569"><span class="annot"><a href="#local-6989586621679145569"><span class="hs-identifier hs-type">m</span></a></span></span><span> </span><span id="local-6989586621679145568"><span class="annot"><a href="#local-6989586621679145568"><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-6989586621679145569"><span class="hs-identifier hs-type">m</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679145568"><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-6989586621679145569"><span class="hs-identifier hs-type">m</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679145568"><span class="hs-identifier hs-type">a</span></a></span><span>
+</span><span id="line-41"></span><span class="hs-keyword">type</span><span> </span><span id="LogExec"><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#LogExec"><span class="hs-identifier hs-var">LogExec</span></a></span></span><span> </span><span id="local-6989586621679145658"><span class="annot"><a href="#local-6989586621679145658"><span class="hs-identifier hs-type">m</span></a></span></span><span> </span><span id="local-6989586621679145657"><span class="annot"><a href="#local-6989586621679145657"><span class="hs-identifier hs-type">a</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="hs-identifier hs-type">LG.KatipT</span></span><span> </span><span class="annot"><a href="#local-6989586621679145658"><span class="hs-identifier hs-type">m</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679145657"><span class="hs-identifier hs-type">a</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="#local-6989586621679145658"><span class="hs-identifier hs-type">m</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679145657"><span class="hs-identifier hs-type">a</span></a></span><span>
 </span><span id="line-42"></span><span>
 </span><span id="line-43"></span><span class="hs-comment">-- | A Katip Log environment</span><span>
 </span><span id="line-44"></span><span class="hs-keyword">type</span><span> </span><span id="LogContext"><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#LogContext"><span class="hs-identifier hs-var">LogContext</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="hs-identifier hs-type">LG.LogEnv</span></span><span>
@@ -75,10 +75,10 @@ LogExecWithContext
 </span><span id="line-65"></span><span class="hs-comment">-- | A Katip Log environment which targets stdout</span><span>
 </span><span id="line-66"></span><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#stdoutLoggingContext"><span class="hs-identifier hs-type">stdoutLoggingContext</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#LogContext"><span class="hs-identifier hs-type">LogContext</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="hs-identifier hs-type">IO</span></span><span> </span><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#LogContext"><span class="hs-identifier hs-type">LogContext</span></a></span><span>
 </span><span id="line-67"></span><span id="stdoutLoggingContext"><span class="annot"><span class="annottext">stdoutLoggingContext :: LogContext -&gt; IO LogContext
-</span><a href="OpenAPIPetstore.LoggingKatip.html#stdoutLoggingContext"><span class="hs-identifier hs-var hs-var">stdoutLoggingContext</span></a></span></span><span> </span><span id="local-6989586621679145559"><span class="annot"><span class="annottext">LogContext
-</span><a href="#local-6989586621679145559"><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-6989586621679145558"><span class="annot"><span class="annottext">Scribe
-</span><a href="#local-6989586621679145558"><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-6989586621679145648"><span class="annot"><span class="annottext">LogContext
+</span><a href="#local-6989586621679145648"><span class="hs-identifier hs-var">cxt</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
+</span><span id="line-68"></span><span>    </span><span id="local-6989586621679145647"><span class="annot"><span class="annottext">Scribe
+</span><a href="#local-6989586621679145647"><span class="hs-identifier hs-var">handleScribe</span></a></span></span><span> </span><span class="hs-glyph">&lt;-</span><span> </span><span class="annot"><span class="annottext">ColorStrategy -&gt; Handle -&gt; PermitFunc -&gt; Verbosity -&gt; IO Scribe
 </span><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,9 +89,9 @@ 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-6989586621679145558"><span class="hs-identifier hs-var">handleScribe</span></a></span><span> </span><span class="annot"><span class="annottext">ScribeSettings
+</span><a href="#local-6989586621679145647"><span class="hs-identifier hs-var">handleScribe</span></a></span><span> </span><span class="annot"><span class="annottext">ScribeSettings
 </span><span class="hs-identifier hs-var">LG.defaultScribeSettings</span></span><span> </span><span class="annot"><span class="annottext">LogContext
-</span><a href="#local-6989586621679145559"><span class="hs-identifier hs-var">cxt</span></a></span><span>
+</span><a href="#local-6989586621679145648"><span class="hs-identifier hs-var">cxt</span></a></span><span>
 </span><span id="line-70"></span><span>
 </span><span id="line-71"></span><span class="hs-comment">-- * stderr logger</span><span>
 </span><span id="line-72"></span><span>
@@ -105,10 +105,10 @@ LogExecWithContext
 </span><span id="line-77"></span><span class="hs-comment">-- | A Katip Log environment which targets stderr</span><span>
 </span><span id="line-78"></span><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#stderrLoggingContext"><span class="hs-identifier hs-type">stderrLoggingContext</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#LogContext"><span class="hs-identifier hs-type">LogContext</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="hs-identifier hs-type">IO</span></span><span> </span><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#LogContext"><span class="hs-identifier hs-type">LogContext</span></a></span><span>
 </span><span id="line-79"></span><span id="stderrLoggingContext"><span class="annot"><span class="annottext">stderrLoggingContext :: LogContext -&gt; IO LogContext
-</span><a href="OpenAPIPetstore.LoggingKatip.html#stderrLoggingContext"><span class="hs-identifier hs-var hs-var">stderrLoggingContext</span></a></span></span><span> </span><span id="local-6989586621679145547"><span class="annot"><span class="annottext">LogContext
-</span><a href="#local-6989586621679145547"><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-6989586621679145546"><span class="annot"><span class="annottext">Scribe
-</span><a href="#local-6989586621679145546"><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-6989586621679145636"><span class="annot"><span class="annottext">LogContext
+</span><a href="#local-6989586621679145636"><span class="hs-identifier hs-var">cxt</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
+</span><span id="line-80"></span><span>    </span><span id="local-6989586621679145635"><span class="annot"><span class="annottext">Scribe
+</span><a href="#local-6989586621679145635"><span class="hs-identifier hs-var">handleScribe</span></a></span></span><span> </span><span class="hs-glyph">&lt;-</span><span> </span><span class="annot"><span class="annottext">ColorStrategy -&gt; Handle -&gt; PermitFunc -&gt; Verbosity -&gt; IO Scribe
 </span><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-6989586621679145546"><span class="hs-identifier hs-var">handleScribe</span></a></span><span> </span><span class="annot"><span class="annottext">ScribeSettings
+</span><a href="#local-6989586621679145635"><span class="hs-identifier hs-var">handleScribe</span></a></span><span> </span><span class="annot"><span class="annottext">ScribeSettings
 </span><span class="hs-identifier hs-var">LG.defaultScribeSettings</span></span><span> </span><span class="annot"><span class="annottext">LogContext
-</span><a href="#local-6989586621679145547"><span class="hs-identifier hs-var">cxt</span></a></span><span>
+</span><a href="#local-6989586621679145636"><span class="hs-identifier hs-var">cxt</span></a></span><span>
 </span><span id="line-82"></span><span>
 </span><span id="line-83"></span><span class="hs-comment">-- * Null logger</span><span>
 </span><span id="line-84"></span><span>
 </span><span id="line-85"></span><span class="hs-comment">-- | Disables Katip logging</span><span>
 </span><span id="line-86"></span><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#runNullLogExec"><span class="hs-identifier hs-type">runNullLogExec</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#LogExecWithContext"><span class="hs-identifier hs-type">LogExecWithContext</span></a></span><span>
 </span><span id="line-87"></span><span id="runNullLogExec"><span class="annot"><span class="annottext">runNullLogExec :: LogContext -&gt; LogExec m a
-</span><a href="OpenAPIPetstore.LoggingKatip.html#runNullLogExec"><span class="hs-identifier hs-var hs-var">runNullLogExec</span></a></span></span><span> </span><span id="local-6989586621679145543"><span class="annot"><span class="annottext">LogContext
-</span><a href="#local-6989586621679145543"><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-6989586621679145541"><span class="annot"><span class="annottext">ReaderT LogContext m a
-</span><a href="#local-6989586621679145541"><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-6989586621679145632"><span class="annot"><span class="annottext">LogContext
+</span><a href="#local-6989586621679145632"><span class="hs-identifier hs-var">le</span></a></span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">LG.KatipT</span></span><span> </span><span id="local-6989586621679145630"><span class="annot"><span class="annottext">ReaderT LogContext m a
+</span><a href="#local-6989586621679145630"><span class="hs-identifier hs-var">f</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">ReaderT LogContext m a -&gt; LogContext -&gt; m a
 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-6989586621679145541"><span class="hs-identifier hs-var">f</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">ASetter
+</span><a href="#local-6989586621679145630"><span class="hs-identifier hs-var">f</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">ASetter
   LogContext
   LogContext
   (Map Text ScribeHandle)
@@ -149,17 +149,17 @@ 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-6989586621679145543"><span class="hs-identifier hs-var">le</span></a></span><span class="hs-special">)</span><span>
+</span><a href="#local-6989586621679145632"><span class="hs-identifier hs-var">le</span></a></span><span class="hs-special">)</span><span>
 </span><span id="line-88"></span><span>
 </span><span id="line-89"></span><span class="hs-comment">-- * Log Msg</span><span>
 </span><span id="line-90"></span><span>
 </span><span id="line-91"></span><span class="hs-comment">-- | Log a katip message</span><span>
-</span><span id="line-92"></span><span id="local-6989586621679145581"><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-6989586621679145581"><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-6989586621679145581"><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-6989586621679145581"><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-92"></span><span id="local-6989586621679145670"><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#_log"><span class="hs-identifier hs-type">_log</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">Applicative</span></span><span> </span><span class="annot"><a href="#local-6989586621679145670"><span class="hs-identifier hs-type">m</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-identifier hs-type">LG.Katip</span></span><span> </span><span class="annot"><a href="#local-6989586621679145670"><span class="hs-identifier hs-type">m</span></a></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span class="annot"><span class="hs-identifier hs-type">Text</span></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#LogLevel"><span class="hs-identifier hs-type">LogLevel</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="hs-identifier hs-type">Text</span></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="#local-6989586621679145670"><span class="hs-identifier hs-type">m</span></a></span><span> </span><span class="hs-special">(</span><span class="hs-special">)</span></span><span>
 </span><span id="line-93"></span><span id="_log"><span class="annot"><span class="annottext">_log :: Text -&gt; Severity -&gt; Text -&gt; m ()
-</span><a href="OpenAPIPetstore.LoggingKatip.html#_log"><span class="hs-identifier hs-var hs-var">_log</span></a></span></span><span> </span><span id="local-6989586621679145536"><span class="annot"><span class="annottext">Text
-</span><a href="#local-6989586621679145536"><span class="hs-identifier hs-var">src</span></a></span></span><span> </span><span id="local-6989586621679145535"><span class="annot"><span class="annottext">Severity
-</span><a href="#local-6989586621679145535"><span class="hs-identifier hs-var">level</span></a></span></span><span> </span><span id="local-6989586621679145534"><span class="annot"><span class="annottext">Text
-</span><a href="#local-6989586621679145534"><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-6989586621679145625"><span class="annot"><span class="annottext">Text
+</span><a href="#local-6989586621679145625"><span class="hs-identifier hs-var">src</span></a></span></span><span> </span><span id="local-6989586621679145624"><span class="annot"><span class="annottext">Severity
+</span><a href="#local-6989586621679145624"><span class="hs-identifier hs-var">level</span></a></span></span><span> </span><span id="local-6989586621679145623"><span class="annot"><span class="annottext">Text
+</span><a href="#local-6989586621679145623"><span class="hs-identifier hs-var">msg</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
 </span><span id="line-94"></span><span>  </span><span class="annot"><span class="annottext">Namespace -&gt; Severity -&gt; LogStr -&gt; m ()
 forall (m :: * -&gt; *).
 (Applicative m, Katip m) =&gt;
@@ -170,34 +170,34 @@ 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-6989586621679145536"><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-6989586621679145535"><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-6989586621679145625"><span class="hs-identifier hs-var">src</span></a></span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">Severity
+</span><a href="#local-6989586621679145624"><span class="hs-identifier hs-var">level</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Text -&gt; LogStr
 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-6989586621679145534"><span class="hs-identifier hs-var">msg</span></a></span><span class="hs-special">)</span><span>
+</span><a href="#local-6989586621679145623"><span class="hs-identifier hs-var">msg</span></a></span><span class="hs-special">)</span><span>
 </span><span id="line-95"></span><span>
 </span><span id="line-96"></span><span class="hs-comment">-- * Log Exceptions</span><span>
 </span><span id="line-97"></span><span>
 </span><span id="line-98"></span><span class="hs-comment">-- | re-throws exceptions after logging them</span><span>
-</span><span id="line-99"></span><span id="local-6989586621679145529"><span id="local-6989586621679145530"><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-6989586621679145530"><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-6989586621679145530"><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-6989586621679145530"><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-6989586621679145530"><span class="hs-identifier hs-type">m</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679145529"><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-6989586621679145530"><span class="hs-identifier hs-type">m</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679145529"><span class="hs-identifier hs-type">a</span></a></span></span></span><span>
+</span><span id="line-99"></span><span id="local-6989586621679145618"><span id="local-6989586621679145619"><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#logExceptions"><span class="hs-identifier hs-type">logExceptions</span></a></span><span>
+</span><span id="line-100"></span><span>  </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">LG.Katip</span></span><span> </span><span class="annot"><a href="#local-6989586621679145619"><span class="hs-identifier hs-type">m</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-identifier hs-type">E.MonadCatch</span></span><span> </span><span class="annot"><a href="#local-6989586621679145619"><span class="hs-identifier hs-type">m</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-identifier hs-type">Applicative</span></span><span> </span><span class="annot"><a href="#local-6989586621679145619"><span class="hs-identifier hs-type">m</span></a></span><span class="hs-special">)</span><span>
+</span><span id="line-101"></span><span>  </span><span class="hs-glyph">=&gt;</span><span> </span><span class="annot"><span class="hs-identifier hs-type">Text</span></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="#local-6989586621679145619"><span class="hs-identifier hs-type">m</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679145618"><span class="hs-identifier hs-type">a</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="#local-6989586621679145619"><span class="hs-identifier hs-type">m</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679145618"><span class="hs-identifier hs-type">a</span></a></span></span></span><span>
 </span><span id="line-102"></span><span id="logExceptions"><span class="annot"><span class="annottext">logExceptions :: Text -&gt; m a -&gt; m a
-</span><a href="OpenAPIPetstore.LoggingKatip.html#logExceptions"><span class="hs-identifier hs-var hs-var">logExceptions</span></a></span></span><span> </span><span id="local-6989586621679145527"><span class="annot"><span class="annottext">Text
-</span><a href="#local-6989586621679145527"><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-6989586621679145616"><span class="annot"><span class="annottext">Text
+</span><a href="#local-6989586621679145616"><span class="hs-identifier hs-var">src</span></a></span></span><span> </span><span class="hs-glyph">=</span><span>
 </span><span id="line-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-6989586621679145525"><span class="annot"><span class="annottext">SomeException
-</span><a href="#local-6989586621679145525"><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-6989586621679145614"><span class="annot"><span class="annottext">SomeException
+</span><a href="#local-6989586621679145614"><span class="hs-identifier hs-var">e</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">E.SomeException</span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-keyword">do</span><span>
 </span><span id="line-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-6989586621679145527"><span class="hs-identifier hs-var">src</span></a></span><span> </span><span class="annot"><span class="annottext">Severity
+</span><a href="#local-6989586621679145616"><span class="hs-identifier hs-var">src</span></a></span><span> </span><span class="annot"><span class="annottext">Severity
 </span><span class="hs-identifier hs-var">LG.ErrorS</span></span><span> </span><span class="hs-special">(</span><span class="hs-special">(</span><span class="annot"><span class="annottext">String -&gt; Text
 </span><span class="hs-identifier hs-var">T.pack</span></span><span> </span><span class="annot"><span class="annottext">(String -&gt; Text)
 -&gt; (SomeException -&gt; String) -&gt; SomeException -&gt; Text
@@ -205,11 +205,11 @@ forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
 </span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">SomeException -&gt; String
 forall a. Show a =&gt; a -&gt; String
 </span><span class="hs-identifier hs-var">show</span></span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">SomeException
-</span><a href="#local-6989586621679145525"><span class="hs-identifier hs-var">e</span></a></span><span class="hs-special">)</span><span>
+</span><a href="#local-6989586621679145614"><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-6989586621679145525"><span class="hs-identifier hs-var">e</span></a></span><span class="hs-special">)</span><span>
+</span><a href="#local-6989586621679145614"><span class="hs-identifier hs-var">e</span></a></span><span class="hs-special">)</span><span>
 </span><span id="line-107"></span><span>
 </span><span id="line-108"></span><span class="hs-comment">-- * Log Level</span><span>
 </span><span id="line-109"></span><span>

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

@@ -44,21 +44,21 @@ Module : OpenAPIPetstore.MimeTypes
 </span><span id="line-44"></span><span>
 </span><span id="line-45"></span><span class="hs-comment">-- * ContentType MimeType</span><span>
 </span><span id="line-46"></span><span>
-</span><span id="line-47"></span><span class="hs-keyword">data</span><span> </span><span id="ContentType"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-var">ContentType</span></a></span></span><span> </span><span id="local-6989586621679145977"><span class="annot"><a href="#local-6989586621679145977"><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-6989586621679145977"><span class="hs-identifier hs-type">a</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span id="ContentType"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-var">ContentType</span></a></span></span><span> </span><span class="hs-special">{</span><span> </span><span id="unContentType"><span class="annot"><span class="annottext">ContentType a -&gt; a
-</span><a href="OpenAPIPetstore.MimeTypes.html#unContentType"><span class="hs-identifier hs-var hs-var">unContentType</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="#local-6989586621679145977"><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-6989586621679146066"><span class="annot"><a href="#local-6989586621679146066"><span class="hs-identifier hs-type">a</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679146066"><span class="hs-identifier hs-type">a</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span id="ContentType"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-var">ContentType</span></a></span></span><span> </span><span class="hs-special">{</span><span> </span><span id="unContentType"><span class="annot"><span class="annottext">ContentType a -&gt; a
+</span><a href="OpenAPIPetstore.MimeTypes.html#unContentType"><span class="hs-identifier hs-var hs-var">unContentType</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="#local-6989586621679146066"><span class="hs-identifier hs-type">a</span></a></span><span> </span><span class="hs-special">}</span><span>
 </span><span id="line-48"></span><span>
 </span><span id="line-49"></span><span class="hs-comment">-- * Accept MimeType</span><span>
 </span><span id="line-50"></span><span>
-</span><span id="line-51"></span><span class="hs-keyword">data</span><span> </span><span id="Accept"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-var">Accept</span></a></span></span><span> </span><span id="local-6989586621679145974"><span class="annot"><a href="#local-6989586621679145974"><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-6989586621679145974"><span class="hs-identifier hs-type">a</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span id="Accept"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-var">Accept</span></a></span></span><span> </span><span class="hs-special">{</span><span> </span><span id="unAccept"><span class="annot"><span class="annottext">Accept a -&gt; a
-</span><a href="OpenAPIPetstore.MimeTypes.html#unAccept"><span class="hs-identifier hs-var hs-var">unAccept</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="#local-6989586621679145974"><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-6989586621679146063"><span class="annot"><a href="#local-6989586621679146063"><span class="hs-identifier hs-type">a</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679146063"><span class="hs-identifier hs-type">a</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span id="Accept"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-var">Accept</span></a></span></span><span> </span><span class="hs-special">{</span><span> </span><span id="unAccept"><span class="annot"><span class="annottext">Accept a -&gt; a
+</span><a href="OpenAPIPetstore.MimeTypes.html#unAccept"><span class="hs-identifier hs-var hs-var">unAccept</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="#local-6989586621679146063"><span class="hs-identifier hs-type">a</span></a></span><span> </span><span class="hs-special">}</span><span>
 </span><span id="line-52"></span><span>
 </span><span id="line-53"></span><span class="hs-comment">-- * Consumes Class</span><span>
 </span><span id="line-54"></span><span>
-</span><span id="line-55"></span><span class="hs-keyword">class</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679145971"><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-6989586621679145969"><span class="annot"><a href="#local-6989586621679145969"><span class="hs-identifier hs-type">req</span></a></span></span><span> </span><span id="local-6989586621679145971"><span class="annot"><a href="#local-6989586621679145971"><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-6989586621679146060"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span id="Consumes"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-var">Consumes</span></a></span></span><span> </span><span id="local-6989586621679146058"><span class="annot"><a href="#local-6989586621679146058"><span class="hs-identifier hs-type">req</span></a></span></span><span> </span><span id="local-6989586621679146060"><span class="annot"><a href="#local-6989586621679146060"><span class="hs-identifier hs-type">mtype</span></a></span></span><span> </span><span class="hs-keyword">where</span><span>
 </span><span id="line-56"></span><span>
 </span><span id="line-57"></span><span class="hs-comment">-- * Produces Class</span><span>
 </span><span id="line-58"></span><span>
-</span><span id="line-59"></span><span class="hs-keyword">class</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679145968"><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-6989586621679145966"><span class="annot"><a href="#local-6989586621679145966"><span class="hs-identifier hs-type">req</span></a></span></span><span> </span><span id="local-6989586621679145968"><span class="annot"><a href="#local-6989586621679145968"><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-6989586621679146057"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span id="Produces"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-var">Produces</span></a></span></span><span> </span><span id="local-6989586621679146055"><span class="annot"><a href="#local-6989586621679146055"><span class="hs-identifier hs-type">req</span></a></span></span><span> </span><span id="local-6989586621679146057"><span class="annot"><a href="#local-6989586621679146057"><span class="hs-identifier hs-type">mtype</span></a></span></span><span> </span><span class="hs-keyword">where</span><span>
 </span><span id="line-60"></span><span>
 </span><span id="line-61"></span><span class="hs-comment">-- * Default Mime Types</span><span>
 </span><span id="line-62"></span><span>
@@ -73,7 +73,7 @@ Module : OpenAPIPetstore.MimeTypes
 </span><span id="line-71"></span><span>
 </span><span id="line-72"></span><span class="hs-comment">-- | A type for responses without content-body.</span><span>
 </span><span id="line-73"></span><span class="hs-keyword">data</span><span> </span><span id="NoContent"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-var">NoContent</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span id="NoContent"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-var">NoContent</span></a></span></span><span>
-</span><span id="line-74"></span><span>  </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span id="local-6989586621679145951"><span id="local-6989586621679145953"><span id="local-6989586621679145955"><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-6989586621679146040"><span id="local-6989586621679146042"><span id="local-6989586621679146044"><span class="annot"><span class="annottext">Int -&gt; NoContent -&gt; ShowS
 [NoContent] -&gt; ShowS
 NoContent -&gt; String
 (Int -&gt; NoContent -&gt; ShowS)
@@ -88,7 +88,7 @@ show :: NoContent -&gt; String
 $cshow :: NoContent -&gt; String
 showsPrec :: Int -&gt; NoContent -&gt; ShowS
 $cshowsPrec :: Int -&gt; NoContent -&gt; ShowS
-</span><span class="hs-identifier hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var">P.Show</span></span></span></span></span><span class="hs-special">,</span><span> </span><span id="local-6989586621679145946"><span id="local-6989586621679145948"><span class="annot"><span class="annottext">NoContent -&gt; NoContent -&gt; Bool
+</span><span class="hs-identifier hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var">P.Show</span></span></span></span></span><span class="hs-special">,</span><span> </span><span id="local-6989586621679146035"><span id="local-6989586621679146037"><span class="annot"><span class="annottext">NoContent -&gt; NoContent -&gt; Bool
 (NoContent -&gt; NoContent -&gt; Bool)
 -&gt; (NoContent -&gt; NoContent -&gt; Bool) -&gt; Eq NoContent
 forall a. (a -&gt; a -&gt; Bool) -&gt; (a -&gt; a -&gt; Bool) -&gt; Eq a
@@ -101,60 +101,60 @@ $c== :: NoContent -&gt; NoContent -&gt; Bool
 </span><span id="line-76"></span><span>
 </span><span id="line-77"></span><span class="hs-comment">-- * MimeType Class</span><span>
 </span><span id="line-78"></span><span>
-</span><span id="line-79"></span><span class="hs-keyword">class</span><span> </span><span class="annot"><span class="hs-identifier hs-type">P.Typeable</span></span><span> </span><span class="annot"><a href="#local-6989586621679146045"><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-6989586621679146045"><span class="annot"><a href="#local-6989586621679146045"><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-6989586621679146134"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span id="MimeType"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-var">MimeType</span></a></span></span><span> </span><span id="local-6989586621679146134"><span class="annot"><a href="#local-6989586621679146134"><span class="hs-identifier hs-type">mtype</span></a></span></span><span>  </span><span class="hs-keyword">where</span><span>
 </span><span id="line-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-6989586621679146045"><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-6989586621679145942"><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-6989586621679145941"><span class="annot"><span class="annottext">Proxy mtype
-</span><a href="#local-6989586621679145941"><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-6989586621679146134"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-special">[</span><span class="annot"><span class="hs-identifier hs-type">ME.MediaType</span></span><span class="hs-special">]</span><span>
+</span><span id="line-83"></span><span>  </span><span id="local-6989586621679146031"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeTypes"><span class="hs-identifier hs-var hs-var">mimeTypes</span></a></span><span> </span><span id="local-6989586621679146030"><span class="annot"><span class="annottext">Proxy mtype
+</span><a href="#local-6989586621679146030"><span class="hs-identifier hs-var">p</span></a></span></span><span> </span><span class="hs-glyph">=</span><span>
 </span><span id="line-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-6989586621679145941"><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-6989586621679145940"><span class="annot"><span class="annottext">MediaType
-</span><a href="#local-6989586621679145940"><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-6989586621679145940"><span class="hs-identifier hs-var">x</span></a></span><span class="hs-special">]</span><span>
+</span><a href="#local-6989586621679146030"><span class="hs-identifier hs-var">p</span></a></span><span> </span><span class="hs-keyword">of</span><span>
+</span><span id="line-85"></span><span>      </span><span class="annot"><span class="hs-identifier hs-type">Just</span></span><span> </span><span id="local-6989586621679146029"><span class="annot"><span class="annottext">MediaType
+</span><a href="#local-6989586621679146029"><span class="hs-identifier hs-var">x</span></a></span></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-special">[</span><span class="annot"><span class="annottext">MediaType
+</span><a href="#local-6989586621679146029"><span class="hs-identifier hs-var">x</span></a></span><span class="hs-special">]</span><span>
 </span><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-6989586621679146045"><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-6989586621679145939"><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-6989586621679145938"><span class="annot"><span class="annottext">Proxy mtype
-</span><a href="#local-6989586621679145938"><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-6989586621679146134"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="hs-identifier hs-type">Maybe</span></span><span> </span><span class="annot"><span class="hs-identifier hs-type">ME.MediaType</span></span><span>
+</span><span id="line-89"></span><span>  </span><span id="local-6989586621679146028"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier hs-var hs-var">mimeType</span></a></span><span> </span><span id="local-6989586621679146027"><span class="annot"><span class="annottext">Proxy mtype
+</span><a href="#local-6989586621679146027"><span class="hs-identifier hs-var">p</span></a></span></span><span> </span><span class="hs-glyph">=</span><span>
 </span><span id="line-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-6989586621679145938"><span class="hs-identifier hs-var">p</span></a></span><span> </span><span class="hs-keyword">of</span><span>
+</span><a href="#local-6989586621679146027"><span class="hs-identifier hs-var">p</span></a></span><span> </span><span class="hs-keyword">of</span><span>
 </span><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-6989586621679145937"><span class="annot"><span class="annottext">MediaType
-</span><a href="#local-6989586621679145937"><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-6989586621679146026"><span class="annot"><span class="annottext">MediaType
+</span><a href="#local-6989586621679146026"><span class="hs-identifier hs-var">x</span></a></span></span><span class="annot"><span class="hs-glyph hs-type">:</span></span><span class="annot"><span class="annottext">[MediaType]
 </span><span 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-6989586621679145937"><span class="hs-identifier hs-var">x</span></a></span></span><span>
+</span><a href="#local-6989586621679146026"><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-6989586621679146045"><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-6989586621679145935"><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-6989586621679146134"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="hs-identifier hs-type">Maybe</span></span><span> </span><span class="annot"><span class="hs-identifier hs-type">ME.MediaType</span></span><span>
+</span><span id="line-95"></span><span>  </span><span id="local-6989586621679146024"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeType%27"><span class="hs-identifier hs-var hs-var">mimeType'</span></a></span><span> </span><span class="annot"><span class="annottext">mtype
 </span><span 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-6989586621679146045"><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-6989586621679146045"><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-6989586621679145932"><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-6989586621679146134"><span class="hs-identifier hs-type">mtype</span></a></span><span class="hs-special">)</span></span><span>
+</span><span id="line-96"></span><span>  </span><span id="mimeTypes%27"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeTypes%27"><span class="hs-identifier hs-type">mimeTypes'</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="#local-6989586621679146134"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-special">[</span><span class="annot"><span class="hs-identifier hs-type">ME.MediaType</span></span><span class="hs-special">]</span><span>
+</span><span id="line-97"></span><span>  </span><span id="local-6989586621679146021"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeTypes%27"><span class="hs-identifier hs-var hs-var">mimeTypes'</span></a></span><span> </span><span class="annot"><span class="annottext">mtype
 </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-6989586621679146045"><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-6989586621679146134"><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-6989586621679145924"><span id="local-6989586621679145926"><span id="local-6989586621679145929"><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-6989586621679145922"><span class="annot"><span class="annottext">mimeType :: Proxy MimeJSON -&gt; Maybe MediaType
-</span><a href="#local-6989586621679145922"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeJSON
+</span><span id="line-102"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679146013"><span id="local-6989586621679146015"><span id="local-6989586621679146018"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
+</span><span id="line-103"></span><span>  </span><span id="local-6989586621679146011"><span class="annot"><span class="annottext">mimeType :: Proxy MimeJSON -&gt; Maybe MediaType
+</span><a href="#local-6989586621679146011"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeJSON
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">MediaType -&gt; Maybe MediaType
 forall a. a -&gt; Maybe a
 </span><span class="hs-identifier hs-var">Just</span></span><span> </span><span class="annot"><span class="annottext">(MediaType -&gt; Maybe MediaType) -&gt; MediaType -&gt; Maybe MediaType
@@ -164,9 +164,9 @@ forall a. IsString a =&gt; String -&gt; a
 </span><span class="hs-identifier hs-var">P.fromString</span></span><span> </span><span class="annot"><span class="annottext">String
 </span><span class="hs-string">&quot;application/json&quot;</span></span><span>
 </span><span id="line-104"></span><span class="hs-comment">-- | @application/xml; charset=utf-8@</span><span>
-</span><span id="line-105"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145914"><span id="local-6989586621679145916"><span id="local-6989586621679145919"><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-6989586621679145913"><span class="annot"><span class="annottext">mimeType :: Proxy MimeXML -&gt; Maybe MediaType
-</span><a href="#local-6989586621679145913"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeXML
+</span><span id="line-105"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679146003"><span id="local-6989586621679146005"><span id="local-6989586621679146008"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier hs-type">MimeXML</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
+</span><span id="line-106"></span><span>  </span><span id="local-6989586621679146002"><span class="annot"><span class="annottext">mimeType :: Proxy MimeXML -&gt; Maybe MediaType
+</span><a href="#local-6989586621679146002"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeXML
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">MediaType -&gt; Maybe MediaType
 forall a. a -&gt; Maybe a
 </span><span class="hs-identifier hs-var">Just</span></span><span> </span><span class="annot"><span class="annottext">(MediaType -&gt; Maybe MediaType) -&gt; MediaType -&gt; Maybe MediaType
@@ -176,9 +176,9 @@ forall a. IsString a =&gt; String -&gt; a
 </span><span class="hs-identifier hs-var">P.fromString</span></span><span> </span><span class="annot"><span class="annottext">String
 </span><span class="hs-string">&quot;application/xml&quot;</span></span><span>
 </span><span id="line-107"></span><span class="hs-comment">-- | @application/x-www-form-urlencoded@</span><span>
-</span><span id="line-108"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145905"><span id="local-6989586621679145907"><span id="local-6989586621679145910"><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-6989586621679145904"><span class="annot"><span class="annottext">mimeType :: Proxy MimeFormUrlEncoded -&gt; Maybe MediaType
-</span><a href="#local-6989586621679145904"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeFormUrlEncoded
+</span><span id="line-108"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145994"><span id="local-6989586621679145996"><span id="local-6989586621679145999"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier hs-type">MimeFormUrlEncoded</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
+</span><span id="line-109"></span><span>  </span><span id="local-6989586621679145993"><span class="annot"><span class="annottext">mimeType :: Proxy MimeFormUrlEncoded -&gt; Maybe MediaType
+</span><a href="#local-6989586621679145993"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeFormUrlEncoded
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">MediaType -&gt; Maybe MediaType
 forall a. a -&gt; Maybe a
 </span><span class="hs-identifier hs-var">Just</span></span><span> </span><span class="annot"><span class="annottext">(MediaType -&gt; Maybe MediaType) -&gt; MediaType -&gt; Maybe MediaType
@@ -188,9 +188,9 @@ forall a. IsString a =&gt; String -&gt; a
 </span><span class="hs-identifier hs-var">P.fromString</span></span><span> </span><span class="annot"><span class="annottext">String
 </span><span class="hs-string">&quot;application/x-www-form-urlencoded&quot;</span></span><span>
 </span><span id="line-110"></span><span class="hs-comment">-- | @multipart/form-data@</span><span>
-</span><span id="line-111"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145896"><span id="local-6989586621679145898"><span id="local-6989586621679145901"><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-6989586621679145895"><span class="annot"><span class="annottext">mimeType :: Proxy MimeMultipartFormData -&gt; Maybe MediaType
-</span><a href="#local-6989586621679145895"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeMultipartFormData
+</span><span id="line-111"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145985"><span id="local-6989586621679145987"><span id="local-6989586621679145990"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
+</span><span id="line-112"></span><span>  </span><span id="local-6989586621679145984"><span class="annot"><span class="annottext">mimeType :: Proxy MimeMultipartFormData -&gt; Maybe MediaType
+</span><a href="#local-6989586621679145984"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeMultipartFormData
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">MediaType -&gt; Maybe MediaType
 forall a. a -&gt; Maybe a
 </span><span class="hs-identifier hs-var">Just</span></span><span> </span><span class="annot"><span class="annottext">(MediaType -&gt; Maybe MediaType) -&gt; MediaType -&gt; Maybe MediaType
@@ -200,9 +200,9 @@ forall a. IsString a =&gt; String -&gt; a
 </span><span class="hs-identifier hs-var">P.fromString</span></span><span> </span><span class="annot"><span class="annottext">String
 </span><span class="hs-string">&quot;multipart/form-data&quot;</span></span><span>
 </span><span id="line-113"></span><span class="hs-comment">-- | @text/plain; charset=utf-8@</span><span>
-</span><span id="line-114"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145887"><span id="local-6989586621679145889"><span id="local-6989586621679145892"><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-6989586621679145886"><span class="annot"><span class="annottext">mimeType :: Proxy MimePlainText -&gt; Maybe MediaType
-</span><a href="#local-6989586621679145886"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimePlainText
+</span><span id="line-114"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145976"><span id="local-6989586621679145978"><span id="local-6989586621679145981"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
+</span><span id="line-115"></span><span>  </span><span id="local-6989586621679145975"><span class="annot"><span class="annottext">mimeType :: Proxy MimePlainText -&gt; Maybe MediaType
+</span><a href="#local-6989586621679145975"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimePlainText
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">MediaType -&gt; Maybe MediaType
 forall a. a -&gt; Maybe a
 </span><span class="hs-identifier hs-var">Just</span></span><span> </span><span class="annot"><span class="annottext">(MediaType -&gt; Maybe MediaType) -&gt; MediaType -&gt; Maybe MediaType
@@ -212,9 +212,9 @@ forall a. IsString a =&gt; String -&gt; a
 </span><span class="hs-identifier hs-var">P.fromString</span></span><span> </span><span class="annot"><span class="annottext">String
 </span><span class="hs-string">&quot;text/plain&quot;</span></span><span>
 </span><span id="line-116"></span><span class="hs-comment">-- | @application/octet-stream@</span><span>
-</span><span id="line-117"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145878"><span id="local-6989586621679145880"><span id="local-6989586621679145883"><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-6989586621679145877"><span class="annot"><span class="annottext">mimeType :: Proxy MimeOctetStream -&gt; Maybe MediaType
-</span><a href="#local-6989586621679145877"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeOctetStream
+</span><span id="line-117"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145967"><span id="local-6989586621679145969"><span id="local-6989586621679145972"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
+</span><span id="line-118"></span><span>  </span><span id="local-6989586621679145966"><span class="annot"><span class="annottext">mimeType :: Proxy MimeOctetStream -&gt; Maybe MediaType
+</span><a href="#local-6989586621679145966"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeOctetStream
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">MediaType -&gt; Maybe MediaType
 forall a. a -&gt; Maybe a
 </span><span class="hs-identifier hs-var">Just</span></span><span> </span><span class="annot"><span class="annottext">(MediaType -&gt; Maybe MediaType) -&gt; MediaType -&gt; Maybe MediaType
@@ -224,9 +224,9 @@ forall a. IsString a =&gt; String -&gt; a
 </span><span class="hs-identifier hs-var">P.fromString</span></span><span> </span><span class="annot"><span class="annottext">String
 </span><span class="hs-string">&quot;application/octet-stream&quot;</span></span><span>
 </span><span id="line-119"></span><span class="hs-comment">-- | @&quot;*/*&quot;@</span><span>
-</span><span id="line-120"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145869"><span id="local-6989586621679145871"><span id="local-6989586621679145874"><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-6989586621679145868"><span class="annot"><span class="annottext">mimeType :: Proxy MimeAny -&gt; Maybe MediaType
-</span><a href="#local-6989586621679145868"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeAny
+</span><span id="line-120"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145958"><span id="local-6989586621679145960"><span id="local-6989586621679145963"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeAny"><span class="hs-identifier hs-type">MimeAny</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
+</span><span id="line-121"></span><span>  </span><span id="local-6989586621679145957"><span class="annot"><span class="annottext">mimeType :: Proxy MimeAny -&gt; Maybe MediaType
+</span><a href="#local-6989586621679145957"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeAny
 </span><span 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-6989586621679145860"><span id="local-6989586621679145862"><span id="local-6989586621679145865"><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-6989586621679145859"><span class="annot"><span class="annottext">mimeType :: Proxy MimeNoContent -&gt; Maybe MediaType
-</span><a href="#local-6989586621679145859"><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-6989586621679145949"><span id="local-6989586621679145951"><span id="local-6989586621679145954"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
+</span><span id="line-123"></span><span>  </span><span id="local-6989586621679145948"><span class="annot"><span class="annottext">mimeType :: Proxy MimeNoContent -&gt; Maybe MediaType
+</span><a href="#local-6989586621679145948"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeNoContent
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Maybe MediaType
 forall a. Maybe a
 </span><span class="hs-identifier hs-var">Nothing</span></span><span>
 </span><span id="line-124"></span><span>
 </span><span id="line-125"></span><span class="hs-comment">-- * MimeRender Class</span><span>
 </span><span id="line-126"></span><span>
-</span><span id="line-127"></span><span class="hs-keyword">class</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679146026"><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-6989586621679146026"><span class="annot"><a href="#local-6989586621679146026"><span class="hs-identifier hs-type">mtype</span></a></span></span><span> </span><span id="local-6989586621679146025"><span class="annot"><a href="#local-6989586621679146025"><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-6989586621679146026"><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-6989586621679146025"><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-6989586621679146026"><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-6989586621679146025"><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-6989586621679145856"><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-6989586621679145855"><span class="annot"><span class="annottext">x
-</span><a href="#local-6989586621679145855"><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-6989586621679146115"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span id="MimeRender"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-var">MimeRender</span></a></span></span><span> </span><span id="local-6989586621679146115"><span class="annot"><a href="#local-6989586621679146115"><span class="hs-identifier hs-type">mtype</span></a></span></span><span> </span><span id="local-6989586621679146114"><span class="annot"><a href="#local-6989586621679146114"><span class="hs-identifier hs-type">x</span></a></span></span><span> </span><span class="hs-keyword">where</span><span>
+</span><span id="line-128"></span><span>    </span><span id="mimeRender"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier hs-type">mimeRender</span></a></span></span><span>  </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">P.Proxy</span></span><span> </span><span class="annot"><a href="#local-6989586621679146115"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="#local-6989586621679146114"><span class="hs-identifier hs-type">x</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="hs-identifier hs-type">BL.ByteString</span></span><span>
+</span><span id="line-129"></span><span>    </span><span id="mimeRender%27"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender%27"><span class="hs-identifier hs-type">mimeRender'</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="#local-6989586621679146115"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="#local-6989586621679146114"><span class="hs-identifier hs-type">x</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="hs-identifier hs-type">BL.ByteString</span></span><span>
+</span><span id="line-130"></span><span>    </span><span id="local-6989586621679145945"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender%27"><span class="hs-identifier hs-var hs-var">mimeRender'</span></a></span><span> </span><span class="annot"><span class="annottext">mtype
+</span><span class="hs-identifier">_</span></span><span> </span><span id="local-6989586621679145944"><span class="annot"><span class="annottext">x
+</span><a href="#local-6989586621679145944"><span class="hs-identifier hs-var">x</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Proxy mtype -&gt; x -&gt; ByteString
 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-6989586621679146026"><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-6989586621679145855"><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-6989586621679146115"><span class="hs-identifier hs-type">mtype</span></a></span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">x
+</span><a href="#local-6989586621679145944"><span class="hs-identifier hs-var">x</span></a></span></span><span>
 </span><span id="line-131"></span><span>
 </span><span id="line-132"></span><span>
-</span><span id="line-133"></span><span id="local-6989586621679146007"><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-6989586621679146007"><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-6989586621679146007"><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-6989586621679146096"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-type">mimeRenderDefaultMultipartFormData</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">WH.ToHttpApiData</span></span><span> </span><span class="annot"><a href="#local-6989586621679146096"><span class="hs-identifier hs-type">a</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span class="annot"><a href="#local-6989586621679146096"><span class="hs-identifier hs-type">a</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="hs-identifier hs-type">BL.ByteString</span></span></span><span>
 </span><span id="line-134"></span><span id="mimeRenderDefaultMultipartFormData"><span class="annot"><span class="annottext">mimeRenderDefaultMultipartFormData :: a -&gt; ByteString
 </span><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
@@ -274,27 +274,27 @@ forall a. ToHttpApiData a =&gt; a -&gt; Text
 </span><span id="line-136"></span><span class="hs-comment">-- Default MimeRender Instances</span><span>
 </span><span id="line-137"></span><span>
 </span><span id="line-138"></span><span class="hs-comment">-- | `A.encode`</span><span>
-</span><span id="line-139"></span><span id="local-6989586621679145850"><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145846"><span class="annot"><span class="hs-identifier hs-type">A.ToJSON</span></span><span> </span><span class="annot"><a href="#local-6989586621679145850"><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-6989586621679145850"><span class="hs-identifier hs-type">a</span></a></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145844"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeJSON -&gt; a -&gt; ByteString
-</span><a href="#local-6989586621679145844"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeJSON
+</span><span id="line-139"></span><span id="local-6989586621679145939"><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145935"><span class="annot"><span class="hs-identifier hs-type">A.ToJSON</span></span><span> </span><span class="annot"><a href="#local-6989586621679145939"><span class="hs-identifier hs-type">a</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679145939"><span class="hs-identifier hs-type">a</span></a></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145933"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeJSON -&gt; a -&gt; ByteString
+</span><a href="#local-6989586621679145933"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeJSON
 </span><span 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-6989586621679145842"><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145838"><span class="annot"><span class="hs-identifier hs-type">WH.ToForm</span></span><span> </span><span class="annot"><a href="#local-6989586621679145842"><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-6989586621679145842"><span class="hs-identifier hs-type">a</span></a></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145837"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeFormUrlEncoded -&gt; a -&gt; ByteString
-</span><a href="#local-6989586621679145837"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeFormUrlEncoded
+</span><span id="line-141"></span><span id="local-6989586621679145931"><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145927"><span class="annot"><span class="hs-identifier hs-type">WH.ToForm</span></span><span> </span><span class="annot"><a href="#local-6989586621679145931"><span class="hs-identifier hs-type">a</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier hs-type">MimeFormUrlEncoded</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679145931"><span class="hs-identifier hs-type">a</span></a></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145926"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeFormUrlEncoded -&gt; a -&gt; ByteString
+</span><a href="#local-6989586621679145926"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeFormUrlEncoded
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">a -&gt; ByteString
 forall a. ToForm a =&gt; a -&gt; ByteString
 </span><span class="hs-identifier hs-var">WH.urlEncodeAsForm</span></span></span><span>
 </span><span id="line-142"></span><span>
 </span><span id="line-143"></span><span class="hs-comment">-- | @P.id@</span><span>
-</span><span id="line-144"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145832"><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-6989586621679145831"><span class="annot"><span class="annottext">mimeRender :: Proxy MimePlainText -&gt; ByteString -&gt; ByteString
-</span><a href="#local-6989586621679145831"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimePlainText
+</span><span id="line-144"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145921"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">BL.ByteString</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145920"><span class="annot"><span class="annottext">mimeRender :: Proxy MimePlainText -&gt; ByteString -&gt; ByteString
+</span><a href="#local-6989586621679145920"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimePlainText
 </span><span 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-6989586621679145826"><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-6989586621679145825"><span class="annot"><span class="annottext">mimeRender :: Proxy MimePlainText -&gt; Text -&gt; ByteString
-</span><a href="#local-6989586621679145825"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimePlainText
+</span><span id="line-146"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145915"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">T.Text</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145914"><span class="annot"><span class="annottext">mimeRender :: Proxy MimePlainText -&gt; Text -&gt; ByteString
+</span><a href="#local-6989586621679145914"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimePlainText
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">ByteString -&gt; ByteString
 </span><span class="hs-identifier hs-var">BL.fromStrict</span></span><span> </span><span class="annot"><span class="annottext">(ByteString -&gt; ByteString)
 -&gt; (Text -&gt; ByteString) -&gt; Text -&gt; ByteString
@@ -302,20 +302,20 @@ forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
 </span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">Text -&gt; ByteString
 </span><span class="hs-identifier hs-var">T.encodeUtf8</span></span><span>
 </span><span id="line-147"></span><span class="hs-comment">-- | @BCL.pack@</span><span>
-</span><span id="line-148"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145821"><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-6989586621679145820"><span class="annot"><span class="annottext">mimeRender :: Proxy MimePlainText -&gt; String -&gt; ByteString
-</span><a href="#local-6989586621679145820"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimePlainText
+</span><span id="line-148"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145910"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">String</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145909"><span class="annot"><span class="annottext">mimeRender :: Proxy MimePlainText -&gt; String -&gt; ByteString
+</span><a href="#local-6989586621679145909"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimePlainText
 </span><span 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-6989586621679145815"><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-6989586621679145814"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeOctetStream -&gt; ByteString -&gt; ByteString
-</span><a href="#local-6989586621679145814"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeOctetStream
+</span><span id="line-151"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145904"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">BL.ByteString</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145903"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeOctetStream -&gt; ByteString -&gt; ByteString
+</span><a href="#local-6989586621679145903"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeOctetStream
 </span><span 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-6989586621679145810"><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-6989586621679145809"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeOctetStream -&gt; Text -&gt; ByteString
-</span><a href="#local-6989586621679145809"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeOctetStream
+</span><span id="line-153"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145899"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">T.Text</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145898"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeOctetStream -&gt; Text -&gt; ByteString
+</span><a href="#local-6989586621679145898"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeOctetStream
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">ByteString -&gt; ByteString
 </span><span class="hs-identifier hs-var">BL.fromStrict</span></span><span> </span><span class="annot"><span class="annottext">(ByteString -&gt; ByteString)
 -&gt; (Text -&gt; ByteString) -&gt; Text -&gt; ByteString
@@ -323,61 +323,61 @@ forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
 </span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">Text -&gt; ByteString
 </span><span class="hs-identifier hs-var">T.encodeUtf8</span></span><span>
 </span><span id="line-154"></span><span class="hs-comment">-- | @BCL.pack@</span><span>
-</span><span id="line-155"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145805"><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-6989586621679145804"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeOctetStream -&gt; String -&gt; ByteString
-</span><a href="#local-6989586621679145804"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeOctetStream
+</span><span id="line-155"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145894"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">String</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145893"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeOctetStream -&gt; String -&gt; ByteString
+</span><a href="#local-6989586621679145893"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeOctetStream
 </span><span 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-6989586621679145800"><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-6989586621679145799"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -&gt; ByteString -&gt; ByteString
-</span><a href="#local-6989586621679145799"><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-6989586621679145889"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">BL.ByteString</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145888"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -&gt; ByteString -&gt; ByteString
+</span><a href="#local-6989586621679145888"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeMultipartFormData
 </span><span 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-6989586621679145795"><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-6989586621679145794"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -&gt; Bool -&gt; ByteString
-</span><a href="#local-6989586621679145794"><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-6989586621679145884"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">Bool</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145883"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -&gt; Bool -&gt; ByteString
+</span><a href="#local-6989586621679145883"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeMultipartFormData
 </span><span 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-6989586621679145790"><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-6989586621679145789"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -&gt; Char -&gt; ByteString
-</span><a href="#local-6989586621679145789"><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-6989586621679145879"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">Char</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145878"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -&gt; Char -&gt; ByteString
+</span><a href="#local-6989586621679145878"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeMultipartFormData
 </span><span 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-6989586621679145785"><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-6989586621679145784"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -&gt; Double -&gt; ByteString
-</span><a href="#local-6989586621679145784"><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-6989586621679145874"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">Double</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145873"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -&gt; Double -&gt; ByteString
+</span><a href="#local-6989586621679145873"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeMultipartFormData
 </span><span 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-6989586621679145780"><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-6989586621679145779"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -&gt; Float -&gt; ByteString
-</span><a href="#local-6989586621679145779"><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-6989586621679145869"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">Float</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145868"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -&gt; Float -&gt; ByteString
+</span><a href="#local-6989586621679145868"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeMultipartFormData
 </span><span 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-6989586621679145775"><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-6989586621679145774"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -&gt; Int -&gt; ByteString
-</span><a href="#local-6989586621679145774"><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-6989586621679145864"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">Int</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145863"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -&gt; Int -&gt; ByteString
+</span><a href="#local-6989586621679145863"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeMultipartFormData
 </span><span 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-6989586621679145770"><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-6989586621679145769"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -&gt; Integer -&gt; ByteString
-</span><a href="#local-6989586621679145769"><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-6989586621679145859"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">Integer</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145858"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -&gt; Integer -&gt; ByteString
+</span><a href="#local-6989586621679145858"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeMultipartFormData
 </span><span 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-6989586621679145765"><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-6989586621679145764"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -&gt; String -&gt; ByteString
-</span><a href="#local-6989586621679145764"><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-6989586621679145854"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">String</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145853"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -&gt; String -&gt; ByteString
+</span><a href="#local-6989586621679145853"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeMultipartFormData
 </span><span 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-6989586621679145760"><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-6989586621679145759"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -&gt; Text -&gt; ByteString
-</span><a href="#local-6989586621679145759"><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-6989586621679145849"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">T.Text</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145848"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -&gt; Text -&gt; ByteString
+</span><a href="#local-6989586621679145848"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeMultipartFormData
 </span><span 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-6989586621679145755"><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-6989586621679145754"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeNoContent -&gt; NoContent -&gt; ByteString
-</span><a href="#local-6989586621679145754"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeNoContent
+</span><span id="line-169"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145844"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145843"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeNoContent -&gt; NoContent -&gt; ByteString
+</span><a href="#local-6989586621679145843"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeNoContent
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">ByteString -&gt; NoContent -&gt; ByteString
 forall a b. a -&gt; b -&gt; a
 </span><span class="hs-identifier hs-var">P.const</span></span><span> </span><span class="annot"><span class="annottext">ByteString
@@ -386,31 +386,31 @@ forall a b. a -&gt; b -&gt; a
 </span><span id="line-171"></span><span>
 </span><span id="line-172"></span><span class="hs-comment">-- * MimeUnrender Class</span><span>
 </span><span id="line-173"></span><span>
-</span><span id="line-174"></span><span class="hs-keyword">class</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679146004"><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-6989586621679146004"><span class="annot"><a href="#local-6989586621679146004"><span class="hs-identifier hs-type">mtype</span></a></span></span><span> </span><span id="local-6989586621679146003"><span class="annot"><a href="#local-6989586621679146003"><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-6989586621679146004"><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-6989586621679146003"><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-6989586621679146004"><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-6989586621679146003"><span class="hs-identifier hs-type">o</span></a></span><span>
-</span><span id="line-177"></span><span>    </span><span id="local-6989586621679145749"><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-6989586621679145748"><span class="annot"><span class="annottext">ByteString
-</span><a href="#local-6989586621679145748"><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-6989586621679146093"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span id="MimeUnrender"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-var">MimeUnrender</span></a></span></span><span> </span><span id="local-6989586621679146093"><span class="annot"><a href="#local-6989586621679146093"><span class="hs-identifier hs-type">mtype</span></a></span></span><span> </span><span id="local-6989586621679146092"><span class="annot"><a href="#local-6989586621679146092"><span class="hs-identifier hs-type">o</span></a></span></span><span> </span><span class="hs-keyword">where</span><span>
+</span><span id="line-175"></span><span>    </span><span id="mimeUnrender"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier hs-type">mimeUnrender</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">P.Proxy</span></span><span> </span><span class="annot"><a href="#local-6989586621679146093"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="hs-identifier hs-type">BL.ByteString</span></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="hs-identifier hs-type">P.Either</span></span><span> </span><span class="annot"><span class="hs-identifier hs-type">String</span></span><span> </span><span class="annot"><a href="#local-6989586621679146092"><span class="hs-identifier hs-type">o</span></a></span><span>
+</span><span id="line-176"></span><span>    </span><span id="mimeUnrender%27"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender%27"><span class="hs-identifier hs-type">mimeUnrender'</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="#local-6989586621679146093"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="hs-identifier hs-type">BL.ByteString</span></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="hs-identifier hs-type">P.Either</span></span><span> </span><span class="annot"><span class="hs-identifier hs-type">String</span></span><span> </span><span class="annot"><a href="#local-6989586621679146092"><span class="hs-identifier hs-type">o</span></a></span><span>
+</span><span id="line-177"></span><span>    </span><span id="local-6989586621679145838"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender%27"><span class="hs-identifier hs-var hs-var">mimeUnrender'</span></a></span><span> </span><span class="annot"><span class="annottext">mtype
+</span><span class="hs-identifier">_</span></span><span> </span><span id="local-6989586621679145837"><span class="annot"><span class="annottext">ByteString
+</span><a href="#local-6989586621679145837"><span class="hs-identifier hs-var">x</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Proxy mtype -&gt; ByteString -&gt; Either String o
 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-6989586621679146004"><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-6989586621679145748"><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-6989586621679146093"><span class="hs-identifier hs-type">mtype</span></a></span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">ByteString
+</span><a href="#local-6989586621679145837"><span class="hs-identifier hs-var">x</span></a></span></span><span>
 </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-6989586621679145747"><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145743"><span class="annot"><span class="hs-identifier hs-type">A.FromJSON</span></span><span> </span><span class="annot"><a href="#local-6989586621679145747"><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-6989586621679145747"><span class="hs-identifier hs-type">a</span></a></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145741"><span class="annot"><span class="annottext">mimeUnrender :: Proxy MimeJSON -&gt; ByteString -&gt; Either String a
-</span><a href="#local-6989586621679145741"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeUnrender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeJSON
+</span><span id="line-182"></span><span id="local-6989586621679145836"><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145832"><span class="annot"><span class="hs-identifier hs-type">A.FromJSON</span></span><span> </span><span class="annot"><a href="#local-6989586621679145836"><span class="hs-identifier hs-type">a</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679145836"><span class="hs-identifier hs-type">a</span></a></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145830"><span class="annot"><span class="annottext">mimeUnrender :: Proxy MimeJSON -&gt; ByteString -&gt; Either String a
+</span><a href="#local-6989586621679145830"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeUnrender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeJSON
 </span><span 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-6989586621679145739"><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145735"><span class="annot"><span class="hs-identifier hs-type">WH.FromForm</span></span><span> </span><span class="annot"><a href="#local-6989586621679145739"><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-6989586621679145739"><span class="hs-identifier hs-type">a</span></a></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145734"><span class="annot"><span class="annottext">mimeUnrender :: Proxy MimeFormUrlEncoded -&gt; ByteString -&gt; Either String a
-</span><a href="#local-6989586621679145734"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeUnrender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeFormUrlEncoded
+</span><span id="line-184"></span><span id="local-6989586621679145828"><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145824"><span class="annot"><span class="hs-identifier hs-type">WH.FromForm</span></span><span> </span><span class="annot"><a href="#local-6989586621679145828"><span class="hs-identifier hs-type">a</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier hs-type">MimeFormUrlEncoded</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679145828"><span class="hs-identifier hs-type">a</span></a></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145823"><span class="annot"><span class="annottext">mimeUnrender :: Proxy MimeFormUrlEncoded -&gt; ByteString -&gt; Either String a
+</span><a href="#local-6989586621679145823"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeUnrender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeFormUrlEncoded
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">(Text -&gt; String) -&gt; Either Text a -&gt; Either String a
 forall (a :: * -&gt; * -&gt; *) b c d.
 ArrowChoice a =&gt;
@@ -424,8 +424,8 @@ forall a. FromForm a =&gt; ByteString -&gt; Either Text a
 </span><span class="hs-identifier hs-var">WH.urlDecodeAsForm</span></span></span><span>
 </span><span id="line-185"></span><span class="hs-comment">-- | @P.Right . P.id@</span><span>
 </span><span id="line-186"></span><span>
-</span><span id="line-187"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145728"><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-6989586621679145727"><span class="annot"><span class="annottext">mimeUnrender :: Proxy MimePlainText -&gt; ByteString -&gt; Either String ByteString
-</span><a href="#local-6989586621679145727"><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-6989586621679145817"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">BL.ByteString</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145816"><span class="annot"><span class="annottext">mimeUnrender :: Proxy MimePlainText -&gt; ByteString -&gt; Either String ByteString
+</span><a href="#local-6989586621679145816"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeUnrender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimePlainText
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">ByteString -&gt; Either String ByteString
 forall a b. b -&gt; Either a b
 </span><span class="hs-identifier hs-var">P.Right</span></span><span> </span><span class="annot"><span class="annottext">(ByteString -&gt; Either String ByteString)
@@ -437,8 +437,8 @@ forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
 forall a. a -&gt; a
 </span><span class="hs-identifier hs-var">P.id</span></span><span>
 </span><span id="line-188"></span><span class="hs-comment">-- | @P.left P.show . TL.decodeUtf8'@</span><span>
-</span><span id="line-189"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145723"><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-6989586621679145722"><span class="annot"><span class="annottext">mimeUnrender :: Proxy MimePlainText -&gt; ByteString -&gt; Either String Text
-</span><a href="#local-6989586621679145722"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeUnrender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimePlainText
+</span><span id="line-189"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145812"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">T.Text</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145811"><span class="annot"><span class="annottext">mimeUnrender :: Proxy MimePlainText -&gt; ByteString -&gt; Either String Text
+</span><a href="#local-6989586621679145811"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeUnrender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimePlainText
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">(UnicodeException -&gt; String)
 -&gt; Either UnicodeException Text -&gt; Either String Text
 forall (a :: * -&gt; * -&gt; *) b c d.
@@ -460,8 +460,8 @@ forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
 </span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">ByteString -&gt; ByteString
 </span><span class="hs-identifier hs-var">BL.toStrict</span></span><span>
 </span><span id="line-190"></span><span class="hs-comment">-- | @P.Right . BCL.unpack@</span><span>
-</span><span id="line-191"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145715"><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-6989586621679145714"><span class="annot"><span class="annottext">mimeUnrender :: Proxy MimePlainText -&gt; ByteString -&gt; Either String String
-</span><a href="#local-6989586621679145714"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeUnrender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimePlainText
+</span><span id="line-191"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145804"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">String</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145803"><span class="annot"><span class="annottext">mimeUnrender :: Proxy MimePlainText -&gt; ByteString -&gt; Either String String
+</span><a href="#local-6989586621679145803"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeUnrender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimePlainText
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; Either String String
 forall a b. b -&gt; Either a b
 </span><span class="hs-identifier hs-var">P.Right</span></span><span> </span><span class="annot"><span class="annottext">(String -&gt; Either String String)
@@ -471,8 +471,8 @@ forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
 </span><span class="hs-identifier hs-var">BCL.unpack</span></span><span>
 </span><span id="line-192"></span><span>
 </span><span id="line-193"></span><span class="hs-comment">-- | @P.Right . P.id@</span><span>
-</span><span id="line-194"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145709"><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-6989586621679145708"><span class="annot"><span class="annottext">mimeUnrender :: Proxy MimeOctetStream -&gt; ByteString -&gt; Either String ByteString
-</span><a href="#local-6989586621679145708"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeUnrender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeOctetStream
+</span><span id="line-194"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145798"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">BL.ByteString</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145797"><span class="annot"><span class="annottext">mimeUnrender :: Proxy MimeOctetStream -&gt; ByteString -&gt; Either String ByteString
+</span><a href="#local-6989586621679145797"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeUnrender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeOctetStream
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">ByteString -&gt; Either String ByteString
 forall a b. b -&gt; Either a b
 </span><span class="hs-identifier hs-var">P.Right</span></span><span> </span><span class="annot"><span class="annottext">(ByteString -&gt; Either String ByteString)
@@ -484,8 +484,8 @@ forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
 forall a. a -&gt; a
 </span><span class="hs-identifier hs-var">P.id</span></span><span>
 </span><span id="line-195"></span><span class="hs-comment">-- | @P.left P.show . T.decodeUtf8' . BL.toStrict@</span><span>
-</span><span id="line-196"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145704"><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-6989586621679145703"><span class="annot"><span class="annottext">mimeUnrender :: Proxy MimeOctetStream -&gt; ByteString -&gt; Either String Text
-</span><a href="#local-6989586621679145703"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeUnrender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeOctetStream
+</span><span id="line-196"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145793"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">T.Text</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145792"><span class="annot"><span class="annottext">mimeUnrender :: Proxy MimeOctetStream -&gt; ByteString -&gt; Either String Text
+</span><a href="#local-6989586621679145792"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeUnrender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeOctetStream
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">(UnicodeException -&gt; String)
 -&gt; Either UnicodeException Text -&gt; Either String Text
 forall (a :: * -&gt; * -&gt; *) b c d.
@@ -507,8 +507,8 @@ forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
 </span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">ByteString -&gt; ByteString
 </span><span class="hs-identifier hs-var">BL.toStrict</span></span><span>
 </span><span id="line-197"></span><span class="hs-comment">-- | @P.Right . BCL.unpack@</span><span>
-</span><span id="line-198"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145699"><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-6989586621679145698"><span class="annot"><span class="annottext">mimeUnrender :: Proxy MimeOctetStream -&gt; ByteString -&gt; Either String String
-</span><a href="#local-6989586621679145698"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeUnrender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeOctetStream
+</span><span id="line-198"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145788"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">String</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145787"><span class="annot"><span class="annottext">mimeUnrender :: Proxy MimeOctetStream -&gt; ByteString -&gt; Either String String
+</span><a href="#local-6989586621679145787"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeUnrender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeOctetStream
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; Either String String
 forall a b. b -&gt; Either a b
 </span><span class="hs-identifier hs-var">P.Right</span></span><span> </span><span class="annot"><span class="annottext">(String -&gt; Either String String)
@@ -518,8 +518,8 @@ forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
 </span><span class="hs-identifier hs-var">BCL.unpack</span></span><span>
 </span><span id="line-199"></span><span>
 </span><span id="line-200"></span><span class="hs-comment">-- | @P.Right . P.const NoContent@</span><span>
-</span><span id="line-201"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145694"><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-6989586621679145693"><span class="annot"><span class="annottext">mimeUnrender :: Proxy MimeNoContent -&gt; ByteString -&gt; Either String NoContent
-</span><a href="#local-6989586621679145693"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeUnrender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeNoContent
+</span><span id="line-201"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145783"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145782"><span class="annot"><span class="annottext">mimeUnrender :: Proxy MimeNoContent -&gt; ByteString -&gt; Either String NoContent
+</span><a href="#local-6989586621679145782"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeUnrender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeNoContent
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">NoContent -&gt; Either String NoContent
 forall a b. b -&gt; Either a b
 </span><span class="hs-identifier hs-var">P.Right</span></span><span> </span><span class="annot"><span class="annottext">(NoContent -&gt; Either String NoContent)
@@ -540,9 +540,9 @@ forall a b. a -&gt; b -&gt; a
 </span><span id="line-208"></span><span class="hs-keyword">data</span><span> </span><span id="MimeXmlCharsetutf16"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeXmlCharsetutf16"><span class="hs-identifier hs-var">MimeXmlCharsetutf16</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span id="MimeXmlCharsetutf16"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeXmlCharsetutf16"><span class="hs-identifier hs-var">MimeXmlCharsetutf16</span></a></span></span><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">P.Typeable</span></span><span class="hs-special">)</span><span>
 </span><span id="line-209"></span><span>
 </span><span id="line-210"></span><span class="hs-comment">-- | @application/xml; charset=utf-16@</span><span>
-</span><span id="line-211"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145684"><span id="local-6989586621679145686"><span id="local-6989586621679145689"><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-6989586621679145683"><span class="annot"><span class="annottext">mimeType :: Proxy MimeXmlCharsetutf16 -&gt; Maybe MediaType
-</span><a href="#local-6989586621679145683"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeXmlCharsetutf16
+</span><span id="line-211"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145773"><span id="local-6989586621679145775"><span id="local-6989586621679145778"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeXmlCharsetutf16"><span class="hs-identifier hs-type">MimeXmlCharsetutf16</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
+</span><span id="line-212"></span><span>  </span><span id="local-6989586621679145772"><span class="annot"><span class="annottext">mimeType :: Proxy MimeXmlCharsetutf16 -&gt; Maybe MediaType
+</span><a href="#local-6989586621679145772"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeXmlCharsetutf16
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">MediaType -&gt; Maybe MediaType
 forall a. a -&gt; Maybe a
 </span><span class="hs-identifier hs-var">Just</span></span><span> </span><span class="annot"><span class="annottext">(MediaType -&gt; Maybe MediaType) -&gt; MediaType -&gt; Maybe MediaType
@@ -559,9 +559,9 @@ forall a. IsString a =&gt; String -&gt; a
 </span><span id="line-218"></span><span class="hs-keyword">data</span><span> </span><span id="MimeXmlCharsetutf8"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeXmlCharsetutf8"><span class="hs-identifier hs-var">MimeXmlCharsetutf8</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span id="MimeXmlCharsetutf8"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeXmlCharsetutf8"><span class="hs-identifier hs-var">MimeXmlCharsetutf8</span></a></span></span><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">P.Typeable</span></span><span class="hs-special">)</span><span>
 </span><span id="line-219"></span><span>
 </span><span id="line-220"></span><span class="hs-comment">-- | @application/xml; charset=utf-8@</span><span>
-</span><span id="line-221"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145674"><span id="local-6989586621679145676"><span id="local-6989586621679145679"><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-6989586621679145673"><span class="annot"><span class="annottext">mimeType :: Proxy MimeXmlCharsetutf8 -&gt; Maybe MediaType
-</span><a href="#local-6989586621679145673"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeXmlCharsetutf8
+</span><span id="line-221"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145763"><span id="local-6989586621679145765"><span id="local-6989586621679145768"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeXmlCharsetutf8"><span class="hs-identifier hs-type">MimeXmlCharsetutf8</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
+</span><span id="line-222"></span><span>  </span><span id="local-6989586621679145762"><span class="annot"><span class="annottext">mimeType :: Proxy MimeXmlCharsetutf8 -&gt; Maybe MediaType
+</span><a href="#local-6989586621679145762"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeXmlCharsetutf8
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">MediaType -&gt; Maybe MediaType
 forall a. a -&gt; Maybe a
 </span><span class="hs-identifier hs-var">Just</span></span><span> </span><span class="annot"><span class="annottext">(MediaType -&gt; Maybe MediaType) -&gt; MediaType -&gt; Maybe MediaType
@@ -578,9 +578,9 @@ forall a. IsString a =&gt; String -&gt; a
 </span><span id="line-228"></span><span class="hs-keyword">data</span><span> </span><span id="MimeTextXml"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeTextXml"><span class="hs-identifier hs-var">MimeTextXml</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span id="MimeTextXml"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeTextXml"><span class="hs-identifier hs-var">MimeTextXml</span></a></span></span><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">P.Typeable</span></span><span class="hs-special">)</span><span>
 </span><span id="line-229"></span><span>
 </span><span id="line-230"></span><span class="hs-comment">-- | @text/xml@</span><span>
-</span><span id="line-231"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145664"><span id="local-6989586621679145666"><span id="local-6989586621679145669"><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-6989586621679145663"><span class="annot"><span class="annottext">mimeType :: Proxy MimeTextXml -&gt; Maybe MediaType
-</span><a href="#local-6989586621679145663"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeTextXml
+</span><span id="line-231"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145753"><span id="local-6989586621679145755"><span id="local-6989586621679145758"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeTextXml"><span class="hs-identifier hs-type">MimeTextXml</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
+</span><span id="line-232"></span><span>  </span><span id="local-6989586621679145752"><span class="annot"><span class="annottext">mimeType :: Proxy MimeTextXml -&gt; Maybe MediaType
+</span><a href="#local-6989586621679145752"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeTextXml
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">MediaType -&gt; Maybe MediaType
 forall a. a -&gt; Maybe a
 </span><span class="hs-identifier hs-var">Just</span></span><span> </span><span class="annot"><span class="annottext">(MediaType -&gt; Maybe MediaType) -&gt; MediaType -&gt; Maybe MediaType
@@ -597,9 +597,9 @@ forall a. IsString a =&gt; String -&gt; a
 </span><span id="line-238"></span><span class="hs-keyword">data</span><span> </span><span id="MimeTextXmlCharsetutf16"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeTextXmlCharsetutf16"><span class="hs-identifier hs-var">MimeTextXmlCharsetutf16</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span id="MimeTextXmlCharsetutf16"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeTextXmlCharsetutf16"><span class="hs-identifier hs-var">MimeTextXmlCharsetutf16</span></a></span></span><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">P.Typeable</span></span><span class="hs-special">)</span><span>
 </span><span id="line-239"></span><span>
 </span><span id="line-240"></span><span class="hs-comment">-- | @text/xml; charset=utf-16@</span><span>
-</span><span id="line-241"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145654"><span id="local-6989586621679145656"><span id="local-6989586621679145659"><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-6989586621679145653"><span class="annot"><span class="annottext">mimeType :: Proxy MimeTextXmlCharsetutf16 -&gt; Maybe MediaType
-</span><a href="#local-6989586621679145653"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeTextXmlCharsetutf16
+</span><span id="line-241"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145743"><span id="local-6989586621679145745"><span id="local-6989586621679145748"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeTextXmlCharsetutf16"><span class="hs-identifier hs-type">MimeTextXmlCharsetutf16</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
+</span><span id="line-242"></span><span>  </span><span id="local-6989586621679145742"><span class="annot"><span class="annottext">mimeType :: Proxy MimeTextXmlCharsetutf16 -&gt; Maybe MediaType
+</span><a href="#local-6989586621679145742"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeTextXmlCharsetutf16
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">MediaType -&gt; Maybe MediaType
 forall a. a -&gt; Maybe a
 </span><span class="hs-identifier hs-var">Just</span></span><span> </span><span class="annot"><span class="annottext">(MediaType -&gt; Maybe MediaType) -&gt; MediaType -&gt; Maybe MediaType
@@ -616,9 +616,9 @@ forall a. IsString a =&gt; String -&gt; a
 </span><span id="line-248"></span><span class="hs-keyword">data</span><span> </span><span id="MimeTextXmlCharsetutf8"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeTextXmlCharsetutf8"><span class="hs-identifier hs-var">MimeTextXmlCharsetutf8</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span id="MimeTextXmlCharsetutf8"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeTextXmlCharsetutf8"><span class="hs-identifier hs-var">MimeTextXmlCharsetutf8</span></a></span></span><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">P.Typeable</span></span><span class="hs-special">)</span><span>
 </span><span id="line-249"></span><span>
 </span><span id="line-250"></span><span class="hs-comment">-- | @text/xml; charset=utf-8@</span><span>
-</span><span id="line-251"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145644"><span id="local-6989586621679145646"><span id="local-6989586621679145649"><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-6989586621679145643"><span class="annot"><span class="annottext">mimeType :: Proxy MimeTextXmlCharsetutf8 -&gt; Maybe MediaType
-</span><a href="#local-6989586621679145643"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeTextXmlCharsetutf8
+</span><span id="line-251"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145733"><span id="local-6989586621679145735"><span id="local-6989586621679145738"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeTextXmlCharsetutf8"><span class="hs-identifier hs-type">MimeTextXmlCharsetutf8</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
+</span><span id="line-252"></span><span>  </span><span id="local-6989586621679145732"><span class="annot"><span class="annottext">mimeType :: Proxy MimeTextXmlCharsetutf8 -&gt; Maybe MediaType
+</span><a href="#local-6989586621679145732"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeTextXmlCharsetutf8
 </span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">MediaType -&gt; Maybe MediaType
 forall a. a -&gt; Maybe a
 </span><span class="hs-identifier hs-var">Just</span></span><span> </span><span class="annot"><span class="annottext">(MediaType -&gt; Maybe MediaType) -&gt; MediaType -&gt; Maybe MediaType

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

@@ -15,7 +15,7 @@
 #if defined(VERSION_base)
 </span><span class="hs-cpp">
 #if MIN_VERSION_base(4,0,0)
-</span><span id="local-6989586621679155310"><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-6989586621679155310"><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-6989586621679155310"><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-6989586621679155310"><span class="hs-identifier hs-type">a</span></a></span></span><span class="hs-cpp">
+</span><span id="local-6989586621679155428"><span class="annot"><a href="Paths_openapi_petstore.html#catchIO"><span class="hs-identifier hs-type">catchIO</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">IO</span></span><span> </span><span class="annot"><a href="#local-6989586621679155428"><span class="hs-identifier hs-type">a</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">Exception.IOException</span></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="hs-identifier hs-type">IO</span></span><span> </span><span class="annot"><a href="#local-6989586621679155428"><span class="hs-identifier hs-type">a</span></a></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="hs-identifier hs-type">IO</span></span><span> </span><span class="annot"><a href="#local-6989586621679155428"><span class="hs-identifier hs-type">a</span></a></span></span><span class="hs-cpp">
 #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
@@ -121,19 +121,19 @@ forall (m :: * -&gt; *) a. Monad m =&gt; a -&gt; m a
 </span><span id="line-46"></span><span>
 </span><span id="line-47"></span><span class="annot"><a href="Paths_openapi_petstore.html#getDataFileName"><span class="hs-identifier hs-type">getDataFileName</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">FilePath</span></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="hs-identifier hs-type">IO</span></span><span> </span><span class="annot"><span class="hs-identifier hs-type">FilePath</span></span><span>
 </span><span id="line-48"></span><span id="getDataFileName"><span class="annot"><span class="annottext">getDataFileName :: String -&gt; IO String
-</span><a href="Paths_openapi_petstore.html#getDataFileName"><span class="hs-identifier hs-var hs-var">getDataFileName</span></a></span></span><span> </span><span id="local-6989586621679155287"><span class="annot"><span class="annottext">String
-</span><a href="#local-6989586621679155287"><span class="hs-identifier hs-var">name</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
-</span><span id="line-49"></span><span>  </span><span id="local-6989586621679155286"><span class="annot"><span class="annottext">String
-</span><a href="#local-6989586621679155286"><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#getDataFileName"><span class="hs-identifier hs-var hs-var">getDataFileName</span></a></span></span><span> </span><span id="local-6989586621679155405"><span class="annot"><span class="annottext">String
+</span><a href="#local-6989586621679155405"><span class="hs-identifier hs-var">name</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
+</span><span id="line-49"></span><span>  </span><span id="local-6989586621679155404"><span class="annot"><span class="annottext">String
+</span><a href="#local-6989586621679155404"><span class="hs-identifier hs-var">dir</span></a></span></span><span> </span><span class="hs-glyph">&lt;-</span><span> </span><span class="annot"><span class="annottext">IO String
 </span><a href="Paths_openapi_petstore.html#getDataDir"><span class="hs-identifier hs-var">getDataDir</span></a></span><span>
 </span><span id="line-50"></span><span>  </span><span class="annot"><span class="annottext">String -&gt; IO String
 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-6989586621679155286"><span class="hs-identifier hs-var">dir</span></a></span><span> </span><span class="annot"><span class="annottext">String -&gt; String -&gt; String
+</span><a href="#local-6989586621679155404"><span class="hs-identifier hs-var">dir</span></a></span><span> </span><span class="annot"><span class="annottext">String -&gt; String -&gt; String
 forall a. [a] -&gt; [a] -&gt; [a]
 </span><span class="hs-operator hs-var">++</span></span><span> </span><span class="annot"><span class="annottext">String
 </span><span class="hs-string">&quot;/&quot;</span></span><span> </span><span class="annot"><span class="annottext">String -&gt; String -&gt; String
 forall a. [a] -&gt; [a] -&gt; [a]
 </span><span class="hs-operator hs-var">++</span></span><span> </span><span class="annot"><span class="annottext">String
-</span><a href="#local-6989586621679155287"><span class="hs-identifier hs-var">name</span></a></span><span class="hs-special">)</span><span>
+</span><a href="#local-6989586621679155405"><span class="hs-identifier hs-var">name</span></a></span><span class="hs-special">)</span><span>
 </span><span id="line-51"></span></pre></body></html>

samples/client/petstore/haskell-http-client/lib/OpenAPIPetstore/Client.hs

@@ -32,6 +32,7 @@ import qualified Control.Exception.Safe as E
 import qualified Control.Monad.IO.Class as P
 import qualified Control.Monad as P
 import qualified Data.Aeson.Types as A
+import qualified Data.ByteString as B
 import qualified Data.ByteString.Char8 as BC
 import qualified Data.ByteString.Lazy as BL
 import qualified Data.ByteString.Lazy.Char8 as BCL
@@ -179,13 +180,18 @@ _toInitRequest config req0  =
         (configValidateAuthMethods config && (not . null . rAuthTypes) req1)
         (E.throw $ AuthMethodException $ "AuthMethod not configured: " <> (show . head . rAuthTypes) req1)
     let req2 = req1 & _setContentTypeHeader & _setAcceptHeader
-        reqHeaders = ("User-Agent", WH.toHeader (configUserAgent config)) : paramsHeaders (rParams req2)
-        reqQuery = NH.renderQuery True (paramsQuery (rParams req2))
-        pReq = parsedReq { NH.method = (rMethod req2)
+        params = rParams req2
+        reqHeaders = ("User-Agent", WH.toHeader (configUserAgent config)) : paramsHeaders params
+        reqQuery = let query = paramsQuery params
+                       queryExtraUnreserved = configQueryExtraUnreserved config
+                   in if B.null queryExtraUnreserved
+                        then NH.renderQuery True query
+                        else NH.renderQueryPartialEscape True (toPartialEscapeQuery queryExtraUnreserved query)
+        pReq = parsedReq { NH.method = rMethod req2
                         , NH.requestHeaders = reqHeaders
                         , NH.queryString = reqQuery
                         }
-    outReq <- case paramsBody (rParams req2) of
+    outReq <- case paramsBody params of
         ParamBodyNone -> pure (pReq { NH.requestBody = mempty })
         ParamBodyB bs -> pure (pReq { NH.requestBody = NH.RequestBodyBS bs })
         ParamBodyBL bl -> pure (pReq { NH.requestBody = NH.RequestBodyLBS bl })

samples/client/petstore/haskell-http-client/lib/OpenAPIPetstore/Core.hs

@@ -67,7 +67,7 @@ import Data.Function ((&))
 import Data.Foldable(foldlM)
 import Data.Monoid ((<>))
 import Data.Text (Text)
-import Prelude (($), (.), (<$>), (<*>), Maybe(..), Bool(..), Char, String, fmap, mempty, pure, return, show, IO, Monad, Functor)
+import Prelude (($), (.), (&&), (<$>), (<*>), Maybe(..), Bool(..), Char, String, fmap, mempty, pure, return, show, IO, Monad, Functor, maybe)
 
 -- * OpenAPIPetstoreConfig
 
@@ -79,6 +79,7 @@ data OpenAPIPetstoreConfig = OpenAPIPetstoreConfig
   , configLogContext :: LogContext -- ^ Configures the logger
   , configAuthMethods :: [AnyAuthMethod] -- ^ List of configured auth methods
   , configValidateAuthMethods :: Bool -- ^ throw exceptions if auth methods are not configured
+  , configQueryExtraUnreserved :: B.ByteString -- ^ Configures additional querystring characters which must not be URI encoded, e.g. '+' or ':' 
   }
 
 -- | display the config
@@ -109,6 +110,7 @@ newConfig = do
         , configLogContext = logCxt
         , configAuthMethods = []
         , configValidateAuthMethods = True
+        , configQueryExtraUnreserved = ""
         }
 
 -- | updates config use AuthMethod on matching requests
@@ -336,6 +338,16 @@ toQuery :: WH.ToHttpApiData a => (BC.ByteString, Maybe a) -> [NH.QueryItem]
 toQuery x = [(fmap . fmap) toQueryParam x]
   where toQueryParam = T.encodeUtf8 . WH.toQueryParam
 
+toPartialEscapeQuery :: B.ByteString -> NH.Query -> NH.PartialEscapeQuery
+toPartialEscapeQuery extraUnreserved query = fmap (\(k, v) -> (k, maybe [] go v)) query
+  where go :: B.ByteString -> [NH.EscapeItem]
+        go v = v & B.groupBy (\a b -> a `B.notElem` extraUnreserved && b `B.notElem` extraUnreserved)
+                 & fmap (\xs -> if B.null xs then NH.QN xs
+                                  else if B.head xs `B.elem` extraUnreserved
+                                          then NH.QN xs -- Not Encoded
+                                          else NH.QE xs -- Encoded
+                        )
+
 -- *** OpenAPI `CollectionFormat` Utils
 
 -- | Determines the format of the array if type array is used.

samples/client/petstore/haskell-http-client/stack.yaml

@@ -1,4 +1,4 @@
-resolver: lts-18.10
+resolver: lts-18.6
 build:
   haddock-arguments:
     haddock-args: