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

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

   OpenAPI Version: 3.0.1
   OpenAPI Petstore API version: 1.0.0
   Generated by OpenAPI Generator (https://openapi-generator.tech)
-}</span><span>
</span><span id="line-10"></span><span>
</span><span id="line-11"></span><span class="annot"><span class="hs-comment">{-|
Module : OpenAPIPetstore.MimeTypes
-}</span></span><span>
</span><span id="line-14"></span><span>
</span><span id="line-15"></span><span class="hs-pragma">{-# LANGUAGE ConstraintKinds #-}</span><span>
</span><span id="line-16"></span><span class="hs-pragma">{-# LANGUAGE ExistentialQuantification #-}</span><span>
</span><span id="line-17"></span><span class="hs-pragma">{-# LANGUAGE FlexibleContexts #-}</span><span>
</span><span id="line-18"></span><span class="hs-pragma">{-# LANGUAGE FlexibleInstances #-}</span><span>
</span><span id="line-19"></span><span class="hs-pragma">{-# LANGUAGE MultiParamTypeClasses #-}</span><span>
</span><span id="line-20"></span><span class="hs-pragma">{-# LANGUAGE OverloadedStrings #-}</span><span>
</span><span id="line-21"></span><span class="hs-pragma">{-# LANGUAGE ScopedTypeVariables #-}</span><span>
</span><span id="line-22"></span><span class="hs-pragma">{-# OPTIONS_GHC -fno-warn-unused-binds -fno-warn-unused-imports #-}</span><span>
</span><span id="line-23"></span><span>
</span><span id="line-24"></span><span class="hs-keyword">module</span><span> </span><span class="hs-identifier">OpenAPIPetstore.MimeTypes</span><span> </span><span class="hs-keyword">where</span><span>
</span><span id="line-25"></span><span>
</span><span id="line-26"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Control.Arrow</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">P</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier">left</span></span><span class="hs-special">)</span><span>
</span><span id="line-27"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Aeson</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">A</span></span><span>
</span><span id="line-28"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.ByteString</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">B</span></span><span>
</span><span id="line-29"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.ByteString.Builder</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">BB</span></span><span>
</span><span id="line-30"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.ByteString.Char8</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">BC</span></span><span>
</span><span id="line-31"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.ByteString.Lazy</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">BL</span></span><span>
</span><span id="line-32"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.ByteString.Lazy.Char8</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">BCL</span></span><span>
</span><span id="line-33"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Data</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">P</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier">Typeable</span></span><span class="hs-special">)</span><span>
</span><span id="line-34"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Proxy</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">P</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier">Proxy</span></span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span class="hs-special">)</span><span>
</span><span id="line-35"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.String</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">P</span></span><span>
</span><span id="line-36"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Text</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">T</span></span><span>
</span><span id="line-37"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Text.Encoding</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">T</span></span><span>
</span><span id="line-38"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Network.HTTP.Media</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">ME</span></span><span>
</span><span id="line-39"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Web.FormUrlEncoded</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">WH</span></span><span>
</span><span id="line-40"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Web.HttpApiData</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">WH</span></span><span>
</span><span id="line-41"></span><span>
</span><span id="line-42"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><span class="hs-identifier">Prelude</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-operator">($)</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-operator">(.)</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-operator">(&lt;$&gt;)</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-operator">(&lt;*&gt;)</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Maybe</span></span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Bool</span></span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Char</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Double</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">FilePath</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Float</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Int</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Integer</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">String</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">fmap</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">undefined</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">mempty</span></span><span class="hs-special">)</span><span>
</span><span id="line-43"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Prelude</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">P</span></span><span>
</span><span id="line-44"></span><span>
</span><span id="line-45"></span><span class="annot"><span class="hs-comment">-- * ContentType MimeType</span></span><span>
</span><span id="line-46"></span><span>
</span><span id="line-47"></span><span class="hs-keyword">data</span><span> </span><span id="ContentType"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-var">ContentType</span></a></span></span><span> </span><span id="local-6989586621679154361"><span class="annot"><a href="#local-6989586621679154361"><span class="hs-identifier hs-type">a</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679154361"><span class="hs-identifier hs-type">a</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span id="ContentType"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-var">ContentType</span></a></span></span><span> </span><span class="hs-special">{</span><span> </span><span id="unContentType"><span class="annot"><span class="annottext">forall a. ContentType a -&gt; a
</span><a href="OpenAPIPetstore.MimeTypes.html#unContentType"><span class="hs-identifier hs-var hs-var">unContentType</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="#local-6989586621679154361"><span class="hs-identifier hs-type">a</span></a></span><span> </span><span class="hs-special">}</span><span>
</span><span id="line-48"></span><span>
</span><span id="line-49"></span><span class="annot"><span class="hs-comment">-- * Accept MimeType</span></span><span>
</span><span id="line-50"></span><span>
</span><span id="line-51"></span><span class="hs-keyword">data</span><span> </span><span id="Accept"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-var">Accept</span></a></span></span><span> </span><span id="local-6989586621679154365"><span class="annot"><a href="#local-6989586621679154365"><span class="hs-identifier hs-type">a</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679154365"><span class="hs-identifier hs-type">a</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span id="Accept"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-var">Accept</span></a></span></span><span> </span><span class="hs-special">{</span><span> </span><span id="unAccept"><span class="annot"><span class="annottext">forall a. Accept a -&gt; a
</span><a href="OpenAPIPetstore.MimeTypes.html#unAccept"><span class="hs-identifier hs-var hs-var">unAccept</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="#local-6989586621679154365"><span class="hs-identifier hs-type">a</span></a></span><span> </span><span class="hs-special">}</span><span>
</span><span id="line-52"></span><span>
</span><span id="line-53"></span><span class="annot"><span class="hs-comment">-- * Consumes Class</span></span><span>
</span><span id="line-54"></span><span>
</span><span id="line-55"></span><span class="hs-keyword">class</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679154369"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span id="Consumes"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-var">Consumes</span></a></span></span><span> </span><span id="local-6989586621679154368"><span class="annot"><a href="#local-6989586621679154368"><span class="hs-identifier hs-type">req</span></a></span></span><span> </span><span id="local-6989586621679154369"><span class="annot"><a href="#local-6989586621679154369"><span class="hs-identifier hs-type">mtype</span></a></span></span><span> </span><span class="hs-keyword">where</span><span>
</span><span id="line-56"></span><span>
</span><span id="line-57"></span><span class="annot"><span class="hs-comment">-- * Produces Class</span></span><span>
</span><span id="line-58"></span><span>
</span><span id="line-59"></span><span class="hs-keyword">class</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679154372"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span id="Produces"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-var">Produces</span></a></span></span><span> </span><span id="local-6989586621679154371"><span class="annot"><a href="#local-6989586621679154371"><span class="hs-identifier hs-type">req</span></a></span></span><span> </span><span id="local-6989586621679154372"><span class="annot"><a href="#local-6989586621679154372"><span class="hs-identifier hs-type">mtype</span></a></span></span><span> </span><span class="hs-keyword">where</span><span>
</span><span id="line-60"></span><span>
</span><span id="line-61"></span><span class="annot"><span class="hs-comment">-- * Default Mime Types</span></span><span>
</span><span id="line-62"></span><span>
</span><span id="line-63"></span><span class="hs-keyword">data</span><span> </span><span id="MimeJSON"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-var">MimeJSON</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span id="MimeJSON"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-var">MimeJSON</span></a></span></span><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">P.Typeable</span></span><span class="hs-special">)</span><span>
</span><span id="line-64"></span><span class="hs-keyword">data</span><span> </span><span id="MimeXML"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier hs-var">MimeXML</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span id="MimeXML"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier hs-var">MimeXML</span></a></span></span><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">P.Typeable</span></span><span class="hs-special">)</span><span>
</span><span id="line-65"></span><span class="hs-keyword">data</span><span> </span><span id="MimePlainText"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-var">MimePlainText</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span id="MimePlainText"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-var">MimePlainText</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-66"></span><span class="hs-keyword">data</span><span> </span><span id="MimeFormUrlEncoded"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier hs-var">MimeFormUrlEncoded</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span id="MimeFormUrlEncoded"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier hs-var">MimeFormUrlEncoded</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-67"></span><span class="hs-keyword">data</span><span> </span><span id="MimeMultipartFormData"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-var">MimeMultipartFormData</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span id="MimeMultipartFormData"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-var">MimeMultipartFormData</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-68"></span><span class="hs-keyword">data</span><span> </span><span id="MimeOctetStream"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-var">MimeOctetStream</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span id="MimeOctetStream"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-var">MimeOctetStream</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-69"></span><span class="hs-keyword">data</span><span> </span><span id="MimeNoContent"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-var">MimeNoContent</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span id="MimeNoContent"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-var">MimeNoContent</span></a></span></span><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">P.Typeable</span></span><span class="hs-special">)</span><span>
</span><span id="line-70"></span><span class="hs-keyword">data</span><span> </span><span id="MimeAny"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeAny"><span class="hs-identifier hs-var">MimeAny</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span id="MimeAny"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeAny"><span class="hs-identifier hs-var">MimeAny</span></a></span></span><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">P.Typeable</span></span><span class="hs-special">)</span><span>
</span><span id="line-71"></span><span>
</span><span id="line-72"></span><span class="annot"><span class="hs-comment">-- | A type for responses without content-body.</span></span><span>
</span><span id="line-73"></span><span class="hs-keyword">data</span><span> </span><span id="NoContent"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-var">NoContent</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span id="NoContent"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-var">NoContent</span></a></span></span><span>
</span><span id="line-74"></span><span>  </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span id="local-6989586621679154467"><span id="local-6989586621679154469"><span id="local-6989586621679154473"><span class="annot"><span class="annottext">Int -&gt; NoContent -&gt; ShowS
[NoContent] -&gt; ShowS
NoContent -&gt; String
(Int -&gt; NoContent -&gt; ShowS)
-&gt; (NoContent -&gt; String)
-&gt; ([NoContent] -&gt; ShowS)
-&gt; Show NoContent
forall a.
(Int -&gt; a -&gt; ShowS) -&gt; (a -&gt; String) -&gt; ([a] -&gt; ShowS) -&gt; Show a
$cshowsPrec :: Int -&gt; NoContent -&gt; ShowS
showsPrec :: Int -&gt; NoContent -&gt; ShowS
$cshow :: NoContent -&gt; String
show :: NoContent -&gt; String
$cshowList :: [NoContent] -&gt; ShowS
showList :: [NoContent] -&gt; ShowS
</span><span class="hs-identifier hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var">P.Show</span></span></span></span></span><span class="hs-special">,</span><span> </span><span id="local-6989586621679154477"><span id="local-6989586621679154479"><span class="annot"><span class="annottext">NoContent -&gt; NoContent -&gt; Bool
(NoContent -&gt; NoContent -&gt; Bool)
-&gt; (NoContent -&gt; NoContent -&gt; Bool) -&gt; Eq NoContent
forall a. (a -&gt; a -&gt; Bool) -&gt; (a -&gt; a -&gt; Bool) -&gt; Eq a
$c== :: NoContent -&gt; NoContent -&gt; Bool
== :: NoContent -&gt; NoContent -&gt; Bool
$c/= :: NoContent -&gt; NoContent -&gt; Bool
/= :: NoContent -&gt; NoContent -&gt; Bool
</span><span class="hs-identifier hs-var hs-var hs-var hs-var hs-var hs-var">P.Eq</span></span></span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-identifier hs-type">P.Typeable</span></span><span class="hs-special">)</span><span>
</span><span id="line-75"></span><span>
</span><span id="line-76"></span><span>
</span><span id="line-77"></span><span class="annot"><span class="hs-comment">-- * MimeType Class</span></span><span>
</span><span id="line-78"></span><span>
</span><span id="line-79"></span><span class="hs-keyword">class</span><span> </span><span class="annot"><span class="hs-identifier hs-type">P.Typeable</span></span><span> </span><span class="annot"><a href="#local-6989586621679154378"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span id="MimeType"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-var">MimeType</span></a></span></span><span> </span><span id="local-6989586621679154378"><span class="annot"><a href="#local-6989586621679154378"><span class="hs-identifier hs-type">mtype</span></a></span></span><span>  </span><span class="hs-keyword">where</span><span>
</span><span id="line-80"></span><span>  </span><span class="hs-pragma">{-# MINIMAL</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-pragma hs-type">mimeType</span></a></span><span> </span><span class="hs-pragma">|</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeTypes"><span class="hs-pragma hs-type">mimeTypes</span></a></span><span> </span><span class="hs-pragma">#-}</span><span>
</span><span id="line-81"></span><span>
</span><span id="line-82"></span><span>  </span><span id="mimeTypes"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeTypes"><span class="hs-identifier hs-type">mimeTypes</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">P.Proxy</span></span><span> </span><span class="annot"><a href="#local-6989586621679154378"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-special">[</span><span class="annot"><span class="hs-identifier hs-type">ME.MediaType</span></span><span class="hs-special">]</span><span>
</span><span id="line-83"></span><span>  </span><span id="local-6989586621679154487"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeTypes"><span class="hs-identifier hs-var hs-var">mimeTypes</span></a></span><span> </span><span id="local-6989586621679154489"><span class="annot"><span class="annottext">Proxy mtype
</span><a href="#local-6989586621679154489"><span class="hs-identifier hs-var">p</span></a></span></span><span> </span><span class="hs-glyph">=</span><span>
</span><span id="line-84"></span><span>    </span><span class="hs-keyword">case</span><span> </span><span class="annot"><span class="annottext">Proxy mtype -&gt; Maybe MediaType
forall mtype. MimeType mtype =&gt; Proxy mtype -&gt; Maybe MediaType
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier hs-var">mimeType</span></a></span><span> </span><span class="annot"><span class="annottext">Proxy mtype
</span><a href="#local-6989586621679154489"><span class="hs-identifier hs-var">p</span></a></span><span> </span><span class="hs-keyword">of</span><span>
</span><span id="line-85"></span><span>      </span><span class="annot"><span class="hs-identifier hs-type">Just</span></span><span> </span><span id="local-6989586621679154490"><span class="annot"><span class="annottext">MediaType
</span><a href="#local-6989586621679154490"><span class="hs-identifier hs-var">x</span></a></span></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-special">[</span><span class="annot"><span class="annottext">MediaType
</span><a href="#local-6989586621679154490"><span class="hs-identifier hs-var">x</span></a></span><span class="hs-special">]</span><span>
</span><span id="line-86"></span><span>      </span><span class="annot"><span class="annottext">Maybe MediaType
</span><span class="hs-identifier hs-var">Nothing</span></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-special">[</span><span class="hs-special">]</span></span><span>
</span><span id="line-87"></span><span>
</span><span id="line-88"></span><span>  </span><span id="mimeType"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier hs-type">mimeType</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">P.Proxy</span></span><span> </span><span class="annot"><a href="#local-6989586621679154378"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="hs-identifier hs-type">Maybe</span></span><span> </span><span class="annot"><span class="hs-identifier hs-type">ME.MediaType</span></span><span>
</span><span id="line-89"></span><span>  </span><span id="local-6989586621679154491"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier hs-var hs-var">mimeType</span></a></span><span> </span><span id="local-6989586621679154493"><span class="annot"><span class="annottext">Proxy mtype
</span><a href="#local-6989586621679154493"><span class="hs-identifier hs-var">p</span></a></span></span><span> </span><span class="hs-glyph">=</span><span>
</span><span id="line-90"></span><span>    </span><span class="hs-keyword">case</span><span> </span><span class="annot"><span class="annottext">Proxy mtype -&gt; [MediaType]
forall mtype. MimeType mtype =&gt; Proxy mtype -&gt; [MediaType]
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeTypes"><span class="hs-identifier hs-var">mimeTypes</span></a></span><span> </span><span class="annot"><span class="annottext">Proxy mtype
</span><a href="#local-6989586621679154493"><span class="hs-identifier hs-var">p</span></a></span><span> </span><span class="hs-keyword">of</span><span>
</span><span id="line-91"></span><span>      </span><span class="hs-special">[</span><span class="hs-special">]</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">Maybe MediaType
forall a. Maybe a
</span><span class="hs-identifier hs-var">Nothing</span></span><span>
</span><span id="line-92"></span><span>      </span><span class="hs-special">(</span><span id="local-6989586621679154494"><span class="annot"><span class="annottext">MediaType
</span><a href="#local-6989586621679154494"><span class="hs-identifier hs-var">x</span></a></span></span><span class="annot"><span class="hs-glyph hs-type">:</span></span><span class="annot"><span class="annottext">[MediaType]
</span><span class="hs-identifier">_</span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="annottext">MediaType -&gt; Maybe MediaType
forall a. a -&gt; Maybe a
</span><span class="hs-identifier hs-var">Just</span></span><span> </span><span class="annot"><span class="annottext">MediaType
</span><a href="#local-6989586621679154494"><span class="hs-identifier hs-var">x</span></a></span></span><span>
</span><span id="line-93"></span><span>
</span><span id="line-94"></span><span>  </span><span id="mimeType%27"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeType%27"><span class="hs-identifier hs-type">mimeType'</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="#local-6989586621679154378"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="hs-identifier hs-type">Maybe</span></span><span> </span><span class="annot"><span class="hs-identifier hs-type">ME.MediaType</span></span><span>
</span><span id="line-95"></span><span>  </span><span id="local-6989586621679154496"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeType%27"><span class="hs-identifier hs-var hs-var">mimeType'</span></a></span><span> </span><span class="annot"><span class="annottext">mtype
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Proxy mtype -&gt; Maybe MediaType
forall mtype. MimeType mtype =&gt; Proxy mtype -&gt; Maybe MediaType
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier hs-var">mimeType</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Proxy mtype
forall {k} (t :: k). Proxy t
</span><span class="hs-identifier hs-var">P.Proxy</span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">P.Proxy</span></span><span> </span><span class="annot"><a href="#local-6989586621679154378"><span class="hs-identifier hs-type">mtype</span></a></span><span class="hs-special">)</span></span><span>
</span><span id="line-96"></span><span>  </span><span id="mimeTypes%27"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeTypes%27"><span class="hs-identifier hs-type">mimeTypes'</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="#local-6989586621679154378"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-special">[</span><span class="annot"><span class="hs-identifier hs-type">ME.MediaType</span></span><span class="hs-special">]</span><span>
</span><span id="line-97"></span><span>  </span><span id="local-6989586621679154500"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeTypes%27"><span class="hs-identifier hs-var hs-var">mimeTypes'</span></a></span><span> </span><span class="annot"><span class="annottext">mtype
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Proxy mtype -&gt; [MediaType]
forall mtype. MimeType mtype =&gt; Proxy mtype -&gt; [MediaType]
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeTypes"><span class="hs-identifier hs-var">mimeTypes</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Proxy mtype
forall {k} (t :: k). Proxy t
</span><span class="hs-identifier hs-var">P.Proxy</span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">P.Proxy</span></span><span> </span><span class="annot"><a href="#local-6989586621679154378"><span class="hs-identifier hs-type">mtype</span></a></span><span class="hs-special">)</span></span><span>
</span><span id="line-98"></span><span>
</span><span id="line-99"></span><span class="hs-comment">-- Default MimeType Instances</span><span>
</span><span id="line-100"></span><span>
</span><span id="line-101"></span><span class="annot"><span class="hs-comment">-- | @application/json; charset=utf-8@</span></span><span>
</span><span id="line-102"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154505"><span id="local-6989586621679154510"><span id="local-6989586621679154513"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
</span><span id="line-103"></span><span>  </span><span id="local-6989586621679154518"><span class="annot"><span class="annottext">mimeType :: Proxy MimeJSON -&gt; Maybe MediaType
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeJSON
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">MediaType -&gt; Maybe MediaType
forall a. a -&gt; Maybe a
</span><span class="hs-identifier hs-var">Just</span></span><span> </span><span class="annot"><span class="annottext">(MediaType -&gt; Maybe MediaType) -&gt; MediaType -&gt; Maybe MediaType
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">String -&gt; MediaType
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="annot"><span class="hs-comment">-- | @application/xml; charset=utf-8@</span></span><span>
</span><span id="line-105"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154522"><span id="local-6989586621679154527"><span id="local-6989586621679154530"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier hs-type">MimeXML</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
</span><span id="line-106"></span><span>  </span><span id="local-6989586621679154533"><span class="annot"><span class="annottext">mimeType :: Proxy MimeXML -&gt; Maybe MediaType
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeXML
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">MediaType -&gt; Maybe MediaType
forall a. a -&gt; Maybe a
</span><span class="hs-identifier hs-var">Just</span></span><span> </span><span class="annot"><span class="annottext">(MediaType -&gt; Maybe MediaType) -&gt; MediaType -&gt; Maybe MediaType
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">String -&gt; MediaType
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="annot"><span class="hs-comment">-- | @application/x-www-form-urlencoded@</span></span><span>
</span><span id="line-108"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154537"><span id="local-6989586621679154542"><span id="local-6989586621679154545"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier hs-type">MimeFormUrlEncoded</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
</span><span id="line-109"></span><span>  </span><span id="local-6989586621679154548"><span class="annot"><span class="annottext">mimeType :: Proxy MimeFormUrlEncoded -&gt; Maybe MediaType
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeFormUrlEncoded
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">MediaType -&gt; Maybe MediaType
forall a. a -&gt; Maybe a
</span><span class="hs-identifier hs-var">Just</span></span><span> </span><span class="annot"><span class="annottext">(MediaType -&gt; Maybe MediaType) -&gt; MediaType -&gt; Maybe MediaType
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">String -&gt; MediaType
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="annot"><span class="hs-comment">-- | @multipart/form-data@</span></span><span>
</span><span id="line-111"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154552"><span id="local-6989586621679154557"><span id="local-6989586621679154560"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
</span><span id="line-112"></span><span>  </span><span id="local-6989586621679154563"><span class="annot"><span class="annottext">mimeType :: Proxy MimeMultipartFormData -&gt; Maybe MediaType
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeMultipartFormData
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">MediaType -&gt; Maybe MediaType
forall a. a -&gt; Maybe a
</span><span class="hs-identifier hs-var">Just</span></span><span> </span><span class="annot"><span class="annottext">(MediaType -&gt; Maybe MediaType) -&gt; MediaType -&gt; Maybe MediaType
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">String -&gt; MediaType
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="annot"><span class="hs-comment">-- | @text/plain; charset=utf-8@</span></span><span>
</span><span id="line-114"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154567"><span id="local-6989586621679154572"><span id="local-6989586621679154575"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
</span><span id="line-115"></span><span>  </span><span id="local-6989586621679154578"><span class="annot"><span class="annottext">mimeType :: Proxy MimePlainText -&gt; Maybe MediaType
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimePlainText
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">MediaType -&gt; Maybe MediaType
forall a. a -&gt; Maybe a
</span><span class="hs-identifier hs-var">Just</span></span><span> </span><span class="annot"><span class="annottext">(MediaType -&gt; Maybe MediaType) -&gt; MediaType -&gt; Maybe MediaType
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">String -&gt; MediaType
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="annot"><span class="hs-comment">-- | @application/octet-stream@</span></span><span>
</span><span id="line-117"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154582"><span id="local-6989586621679154587"><span id="local-6989586621679154590"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
</span><span id="line-118"></span><span>  </span><span id="local-6989586621679154593"><span class="annot"><span class="annottext">mimeType :: Proxy MimeOctetStream -&gt; Maybe MediaType
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeOctetStream
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">MediaType -&gt; Maybe MediaType
forall a. a -&gt; Maybe a
</span><span class="hs-identifier hs-var">Just</span></span><span> </span><span class="annot"><span class="annottext">(MediaType -&gt; Maybe MediaType) -&gt; MediaType -&gt; Maybe MediaType
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">String -&gt; MediaType
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="annot"><span class="hs-comment">-- | @&quot;*/*&quot;@</span></span><span>
</span><span id="line-120"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154597"><span id="local-6989586621679154602"><span id="local-6989586621679154605"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeAny"><span class="hs-identifier hs-type">MimeAny</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
</span><span id="line-121"></span><span>  </span><span id="local-6989586621679154608"><span class="annot"><span class="annottext">mimeType :: Proxy MimeAny -&gt; Maybe MediaType
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeAny
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">MediaType -&gt; Maybe MediaType
forall a. a -&gt; Maybe a
</span><span class="hs-identifier hs-var">Just</span></span><span> </span><span class="annot"><span class="annottext">(MediaType -&gt; Maybe MediaType) -&gt; MediaType -&gt; Maybe MediaType
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">String -&gt; MediaType
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-6989586621679154612"><span id="local-6989586621679154617"><span id="local-6989586621679154620"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
</span><span id="line-123"></span><span>  </span><span id="local-6989586621679154622"><span class="annot"><span class="annottext">mimeType :: Proxy MimeNoContent -&gt; Maybe MediaType
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeNoContent
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Maybe MediaType
forall a. Maybe a
</span><span class="hs-identifier hs-var">Nothing</span></span><span>
</span><span id="line-124"></span><span>
</span><span id="line-125"></span><span class="annot"><span class="hs-comment">-- * MimeRender Class</span></span><span>
</span><span id="line-126"></span><span>
</span><span id="line-127"></span><span class="hs-keyword">class</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679154396"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span id="MimeRender"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-var">MimeRender</span></a></span></span><span> </span><span id="local-6989586621679154396"><span class="annot"><a href="#local-6989586621679154396"><span class="hs-identifier hs-type">mtype</span></a></span></span><span> </span><span id="local-6989586621679154397"><span class="annot"><a href="#local-6989586621679154397"><span class="hs-identifier hs-type">x</span></a></span></span><span> </span><span class="hs-keyword">where</span><span>
</span><span id="line-128"></span><span>    </span><span id="mimeRender"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier hs-type">mimeRender</span></a></span></span><span>  </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">P.Proxy</span></span><span> </span><span class="annot"><a href="#local-6989586621679154396"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="#local-6989586621679154397"><span class="hs-identifier hs-type">x</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="hs-identifier hs-type">BL.ByteString</span></span><span>
</span><span id="line-129"></span><span>    </span><span id="mimeRender%27"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender%27"><span class="hs-identifier hs-type">mimeRender'</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="#local-6989586621679154396"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><a href="#local-6989586621679154397"><span class="hs-identifier hs-type">x</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="hs-identifier hs-type">BL.ByteString</span></span><span>
</span><span id="line-130"></span><span>    </span><span id="local-6989586621679154627"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender%27"><span class="hs-identifier hs-var hs-var">mimeRender'</span></a></span><span> </span><span class="annot"><span class="annottext">mtype
</span><span class="hs-identifier">_</span></span><span> </span><span id="local-6989586621679154629"><span class="annot"><span class="annottext">x
</span><a href="#local-6989586621679154629"><span class="hs-identifier hs-var">x</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Proxy mtype -&gt; x -&gt; ByteString
forall mtype x.
MimeRender mtype x =&gt;
Proxy mtype -&gt; x -&gt; ByteString
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier hs-var">mimeRender</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Proxy mtype
forall {k} (t :: k). Proxy t
</span><span class="hs-identifier hs-var">P.Proxy</span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">P.Proxy</span></span><span> </span><span class="annot"><a href="#local-6989586621679154396"><span class="hs-identifier hs-type">mtype</span></a></span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">x
</span><a href="#local-6989586621679154629"><span class="hs-identifier hs-var">x</span></a></span></span><span>
</span><span id="line-131"></span><span>
</span><span id="line-132"></span><span>
</span><span id="line-133"></span><span id="local-6989586621679154400"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-type">mimeRenderDefaultMultipartFormData</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">WH.ToHttpApiData</span></span><span> </span><span class="annot"><a href="#local-6989586621679154400"><span class="hs-identifier hs-type">a</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span class="annot"><a href="#local-6989586621679154400"><span class="hs-identifier hs-type">a</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="hs-identifier hs-type">BL.ByteString</span></span></span><span>
</span><span id="line-134"></span><span id="mimeRenderDefaultMultipartFormData"><span class="annot"><span class="annottext">mimeRenderDefaultMultipartFormData :: forall a. ToHttpApiData a =&gt; a -&gt; ByteString
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var hs-var">mimeRenderDefaultMultipartFormData</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">ByteString -&gt; ByteString
</span><span class="hs-identifier hs-var">BL.fromStrict</span></span><span> </span><span class="annot"><span class="annottext">(ByteString -&gt; ByteString) -&gt; (a -&gt; ByteString) -&gt; a -&gt; ByteString
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 class="annot"><span class="annottext">(Text -&gt; ByteString) -&gt; (a -&gt; Text) -&gt; a -&gt; ByteString
forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">a -&gt; Text
forall a. ToHttpApiData a =&gt; a -&gt; Text
</span><span class="hs-identifier hs-var">WH.toQueryParam</span></span><span>
</span><span id="line-135"></span><span>
</span><span id="line-136"></span><span class="hs-comment">-- Default MimeRender Instances</span><span>
</span><span id="line-137"></span><span>
</span><span id="line-138"></span><span class="annot"><span class="hs-comment">-- | `A.encode`</span></span><span>
</span><span id="line-139"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154411"><span id="local-6989586621679154642"><span class="annot"><span class="hs-identifier hs-type">A.ToJSON</span></span><span> </span><span class="annot"><a href="#local-6989586621679154411"><span class="hs-identifier hs-type">a</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679154411"><span class="hs-identifier hs-type">a</span></a></span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679154647"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeJSON -&gt; a -&gt; ByteString
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeJSON
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">a -&gt; ByteString
forall a. ToJSON a =&gt; a -&gt; ByteString
</span><span class="hs-identifier hs-var">A.encode</span></span><span>
</span><span id="line-140"></span><span class="annot"><span class="hs-comment">-- | @WH.urlEncodeAsForm@</span></span><span>
</span><span id="line-141"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154415"><span id="local-6989586621679154653"><span class="annot"><span class="hs-identifier hs-type">WH.ToForm</span></span><span> </span><span class="annot"><a href="#local-6989586621679154415"><span class="hs-identifier hs-type">a</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier hs-type">MimeFormUrlEncoded</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679154415"><span class="hs-identifier hs-type">a</span></a></span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679154657"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeFormUrlEncoded -&gt; a -&gt; ByteString
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeFormUrlEncoded
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">a -&gt; ByteString
forall a. ToForm a =&gt; a -&gt; ByteString
</span><span class="hs-identifier hs-var">WH.urlEncodeAsForm</span></span><span>
</span><span id="line-142"></span><span>
</span><span id="line-143"></span><span class="annot"><span class="hs-comment">-- | @P.id@</span></span><span>
</span><span id="line-144"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154663"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">BL.ByteString</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679154666"><span class="annot"><span class="annottext">mimeRender :: Proxy MimePlainText -&gt; ByteString -&gt; ByteString
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimePlainText
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">ByteString -&gt; ByteString
forall a. a -&gt; a
</span><span class="hs-identifier hs-var">P.id</span></span><span>
</span><span id="line-145"></span><span class="annot"><span class="hs-comment">-- | @BL.fromStrict . T.encodeUtf8@</span></span><span>
</span><span id="line-146"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154672"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">T.Text</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679154675"><span class="annot"><span class="annottext">mimeRender :: Proxy MimePlainText -&gt; Text -&gt; ByteString
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimePlainText
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">ByteString -&gt; ByteString
</span><span class="hs-identifier hs-var">BL.fromStrict</span></span><span> </span><span class="annot"><span class="annottext">(ByteString -&gt; ByteString)
-&gt; (Text -&gt; ByteString) -&gt; Text -&gt; ByteString
forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">Text -&gt; ByteString
</span><span class="hs-identifier hs-var">T.encodeUtf8</span></span><span>
</span><span id="line-147"></span><span class="annot"><span class="hs-comment">-- | @BCL.pack@</span></span><span>
</span><span id="line-148"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154680"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">String</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679154683"><span class="annot"><span class="annottext">mimeRender :: Proxy MimePlainText -&gt; String -&gt; ByteString
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimePlainText
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; ByteString
</span><span class="hs-identifier hs-var">BCL.pack</span></span><span>
</span><span id="line-149"></span><span>
</span><span id="line-150"></span><span class="annot"><span class="hs-comment">-- | @P.id@</span></span><span>
</span><span id="line-151"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154689"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">BL.ByteString</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679154692"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeOctetStream -&gt; ByteString -&gt; ByteString
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeOctetStream
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">ByteString -&gt; ByteString
forall a. a -&gt; a
</span><span class="hs-identifier hs-var">P.id</span></span><span>
</span><span id="line-152"></span><span class="annot"><span class="hs-comment">-- | @BL.fromStrict . T.encodeUtf8@</span></span><span>
</span><span id="line-153"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154697"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">T.Text</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679154700"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeOctetStream -&gt; Text -&gt; ByteString
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeOctetStream
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">ByteString -&gt; ByteString
</span><span class="hs-identifier hs-var">BL.fromStrict</span></span><span> </span><span class="annot"><span class="annottext">(ByteString -&gt; ByteString)
-&gt; (Text -&gt; ByteString) -&gt; Text -&gt; ByteString
forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">Text -&gt; ByteString
</span><span class="hs-identifier hs-var">T.encodeUtf8</span></span><span>
</span><span id="line-154"></span><span class="annot"><span class="hs-comment">-- | @BCL.pack@</span></span><span>
</span><span id="line-155"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154705"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">String</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679154708"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeOctetStream -&gt; String -&gt; ByteString
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeOctetStream
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; ByteString
</span><span class="hs-identifier hs-var">BCL.pack</span></span><span>
</span><span id="line-156"></span><span>
</span><span id="line-157"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154713"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">BL.ByteString</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679154716"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -&gt; ByteString -&gt; ByteString
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeMultipartFormData
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">ByteString -&gt; ByteString
forall a. a -&gt; a
</span><span class="hs-identifier hs-var">P.id</span></span><span>
</span><span id="line-158"></span><span>
</span><span id="line-159"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154721"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">Bool</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679154726"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -&gt; Bool -&gt; ByteString
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeMultipartFormData
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Bool -&gt; ByteString
forall a. ToHttpApiData a =&gt; a -&gt; ByteString
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a></span><span>
</span><span id="line-160"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154731"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">Char</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679154736"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -&gt; Char -&gt; ByteString
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeMultipartFormData
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Char -&gt; ByteString
forall a. ToHttpApiData a =&gt; a -&gt; ByteString
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a></span><span>
</span><span id="line-161"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154741"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">Double</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679154746"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -&gt; Double -&gt; ByteString
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeMultipartFormData
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Double -&gt; ByteString
forall a. ToHttpApiData a =&gt; a -&gt; ByteString
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a></span><span>
</span><span id="line-162"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154751"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">Float</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679154756"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -&gt; Float -&gt; ByteString
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeMultipartFormData
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Float -&gt; ByteString
forall a. ToHttpApiData a =&gt; a -&gt; ByteString
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a></span><span>
</span><span id="line-163"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154761"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">Int</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679154766"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -&gt; Int -&gt; ByteString
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeMultipartFormData
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Int -&gt; ByteString
forall a. ToHttpApiData a =&gt; a -&gt; ByteString
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a></span><span>
</span><span id="line-164"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154771"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">Integer</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679154776"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -&gt; Integer -&gt; ByteString
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeMultipartFormData
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Integer -&gt; ByteString
forall a. ToHttpApiData a =&gt; a -&gt; ByteString
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a></span><span>
</span><span id="line-165"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154781"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">String</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679154786"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -&gt; String -&gt; ByteString
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeMultipartFormData
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; ByteString
forall a. ToHttpApiData a =&gt; a -&gt; ByteString
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a></span><span>
</span><span id="line-166"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154791"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">T.Text</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679154796"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -&gt; Text -&gt; ByteString
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeMultipartFormData
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Text -&gt; ByteString
forall a. ToHttpApiData a =&gt; a -&gt; ByteString
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a></span><span>
</span><span id="line-167"></span><span>
</span><span id="line-168"></span><span class="annot"><span class="hs-comment">-- | @P.Right . P.const NoContent@</span></span><span>
</span><span id="line-169"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154801"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679154804"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeNoContent -&gt; NoContent -&gt; ByteString
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeNoContent
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">ByteString -&gt; NoContent -&gt; ByteString
forall a b. a -&gt; b -&gt; a
</span><span class="hs-identifier hs-var">P.const</span></span><span> </span><span class="annot"><span class="annottext">ByteString
</span><span class="hs-identifier hs-var">BCL.empty</span></span><span>
</span><span id="line-170"></span><span>
</span><span id="line-171"></span><span>
</span><span id="line-172"></span><span class="annot"><span class="hs-comment">-- * MimeUnrender Class</span></span><span>
</span><span id="line-173"></span><span>
</span><span id="line-174"></span><span class="hs-keyword">class</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679154420"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span id="MimeUnrender"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-var">MimeUnrender</span></a></span></span><span> </span><span id="local-6989586621679154420"><span class="annot"><a href="#local-6989586621679154420"><span class="hs-identifier hs-type">mtype</span></a></span></span><span> </span><span id="local-6989586621679154421"><span class="annot"><a href="#local-6989586621679154421"><span class="hs-identifier hs-type">o</span></a></span></span><span> </span><span class="hs-keyword">where</span><span>
</span><span id="line-175"></span><span>    </span><span id="mimeUnrender"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier hs-type">mimeUnrender</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">P.Proxy</span></span><span> </span><span class="annot"><a href="#local-6989586621679154420"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="hs-identifier hs-type">BL.ByteString</span></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="hs-identifier hs-type">P.Either</span></span><span> </span><span class="annot"><span class="hs-identifier hs-type">String</span></span><span> </span><span class="annot"><a href="#local-6989586621679154421"><span class="hs-identifier hs-type">o</span></a></span><span>
</span><span id="line-176"></span><span>    </span><span id="mimeUnrender%27"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender%27"><span class="hs-identifier hs-type">mimeUnrender'</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="#local-6989586621679154420"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="hs-identifier hs-type">BL.ByteString</span></span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="annot"><span class="hs-identifier hs-type">P.Either</span></span><span> </span><span class="annot"><span class="hs-identifier hs-type">String</span></span><span> </span><span class="annot"><a href="#local-6989586621679154421"><span class="hs-identifier hs-type">o</span></a></span><span>
</span><span id="line-177"></span><span>    </span><span id="local-6989586621679154811"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender%27"><span class="hs-identifier hs-var hs-var">mimeUnrender'</span></a></span><span> </span><span class="annot"><span class="annottext">mtype
</span><span class="hs-identifier">_</span></span><span> </span><span id="local-6989586621679154813"><span class="annot"><span class="annottext">ByteString
</span><a href="#local-6989586621679154813"><span class="hs-identifier hs-var">x</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Proxy mtype -&gt; ByteString -&gt; Either String o
forall mtype o.
MimeUnrender mtype o =&gt;
Proxy mtype -&gt; ByteString -&gt; Either String o
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier hs-var">mimeUnrender</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Proxy mtype
forall {k} (t :: k). Proxy t
</span><span class="hs-identifier hs-var">P.Proxy</span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">P.Proxy</span></span><span> </span><span class="annot"><a href="#local-6989586621679154420"><span class="hs-identifier hs-type">mtype</span></a></span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">ByteString
</span><a href="#local-6989586621679154813"><span class="hs-identifier hs-var">x</span></a></span></span><span>
</span><span id="line-178"></span><span>
</span><span id="line-179"></span><span class="hs-comment">-- Default MimeUnrender Instances</span><span>
</span><span id="line-180"></span><span>
</span><span id="line-181"></span><span class="annot"><span class="hs-comment">-- | @A.eitherDecode@</span></span><span>
</span><span id="line-182"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154425"><span id="local-6989586621679154819"><span class="annot"><span class="hs-identifier hs-type">A.FromJSON</span></span><span> </span><span class="annot"><a href="#local-6989586621679154425"><span class="hs-identifier hs-type">a</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679154425"><span class="hs-identifier hs-type">a</span></a></span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679154824"><span class="annot"><span class="annottext">mimeUnrender :: Proxy MimeJSON -&gt; ByteString -&gt; Either String a
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeUnrender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeJSON
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">ByteString -&gt; Either String a
forall a. FromJSON a =&gt; ByteString -&gt; Either String a
</span><span class="hs-identifier hs-var">A.eitherDecode</span></span><span>
</span><span id="line-183"></span><span class="annot"><span class="hs-comment">-- | @P.left T.unpack . WH.urlDecodeAsForm@</span></span><span>
</span><span id="line-184"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154429"><span id="local-6989586621679154831"><span class="annot"><span class="hs-identifier hs-type">WH.FromForm</span></span><span> </span><span class="annot"><a href="#local-6989586621679154429"><span class="hs-identifier hs-type">a</span></a></span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier hs-type">MimeFormUrlEncoded</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679154429"><span class="hs-identifier hs-type">a</span></a></span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679154837"><span class="annot"><span class="annottext">mimeUnrender :: Proxy MimeFormUrlEncoded -&gt; ByteString -&gt; Either String a
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeUnrender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeFormUrlEncoded
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">(Text -&gt; String) -&gt; Either Text a -&gt; Either String a
forall b c d. (b -&gt; c) -&gt; Either b d -&gt; Either c d
forall (a :: * -&gt; * -&gt; *) b c d.
ArrowChoice a =&gt;
a b c -&gt; a (Either b d) (Either c d)
</span><span class="hs-identifier hs-var">P.left</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">(Either Text a -&gt; Either String a)
-&gt; (ByteString -&gt; Either Text a) -&gt; ByteString -&gt; Either String a
forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">ByteString -&gt; Either Text a
forall a. FromForm a =&gt; ByteString -&gt; Either Text a
</span><span class="hs-identifier hs-var">WH.urlDecodeAsForm</span></span><span>
</span><span id="line-185"></span><span class="annot"><span class="hs-comment">-- | @P.Right . P.id@</span></span><span>
</span><span id="line-186"></span><span>
</span><span id="line-187"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154844"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">BL.ByteString</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679154847"><span class="annot"><span class="annottext">mimeUnrender :: Proxy MimePlainText -&gt; ByteString -&gt; Either String ByteString
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeUnrender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimePlainText
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">ByteString -&gt; Either String ByteString
forall a b. b -&gt; Either a b
</span><span class="hs-identifier hs-var">P.Right</span></span><span> </span><span class="annot"><span class="annottext">(ByteString -&gt; Either String ByteString)
-&gt; (ByteString -&gt; ByteString)
-&gt; ByteString
-&gt; Either String ByteString
forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">ByteString -&gt; ByteString
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="annot"><span class="hs-comment">-- | @P.left P.show . TL.decodeUtf8'@</span></span><span>
</span><span id="line-189"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154852"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">T.Text</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679154858"><span class="annot"><span class="annottext">mimeUnrender :: Proxy MimePlainText -&gt; ByteString -&gt; Either String Text
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeUnrender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimePlainText
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">(UnicodeException -&gt; String)
-&gt; Either UnicodeException Text -&gt; Either String Text
forall b c d. (b -&gt; c) -&gt; Either b d -&gt; Either c d
forall (a :: * -&gt; * -&gt; *) b c d.
ArrowChoice a =&gt;
a b c -&gt; a (Either b d) (Either c d)
</span><span class="hs-identifier hs-var">P.left</span></span><span> </span><span class="annot"><span class="annottext">UnicodeException -&gt; String
forall a. Show a =&gt; a -&gt; String
</span><span class="hs-identifier hs-var">P.show</span></span><span> </span><span class="annot"><span class="annottext">(Either UnicodeException Text -&gt; Either String Text)
-&gt; (ByteString -&gt; Either UnicodeException Text)
-&gt; ByteString
-&gt; Either String Text
forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">ByteString -&gt; Either UnicodeException Text
</span><span class="hs-identifier hs-var">T.decodeUtf8'</span></span><span> </span><span class="annot"><span class="annottext">(ByteString -&gt; Either UnicodeException Text)
-&gt; (ByteString -&gt; ByteString)
-&gt; ByteString
-&gt; Either UnicodeException Text
forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">ByteString -&gt; ByteString
</span><span class="hs-identifier hs-var">BL.toStrict</span></span><span>
</span><span id="line-190"></span><span class="annot"><span class="hs-comment">-- | @P.Right . BCL.unpack@</span></span><span>
</span><span id="line-191"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154866"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">String</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679154869"><span class="annot"><span class="annottext">mimeUnrender :: Proxy MimePlainText -&gt; ByteString -&gt; Either String String
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeUnrender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimePlainText
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; Either String String
forall a b. b -&gt; Either a b
</span><span class="hs-identifier hs-var">P.Right</span></span><span> </span><span class="annot"><span class="annottext">(String -&gt; Either String String)
-&gt; (ByteString -&gt; String) -&gt; ByteString -&gt; Either String String
forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">ByteString -&gt; String
</span><span class="hs-identifier hs-var">BCL.unpack</span></span><span>
</span><span id="line-192"></span><span>
</span><span id="line-193"></span><span class="annot"><span class="hs-comment">-- | @P.Right . P.id@</span></span><span>
</span><span id="line-194"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154875"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">BL.ByteString</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679154878"><span class="annot"><span class="annottext">mimeUnrender :: Proxy MimeOctetStream -&gt; ByteString -&gt; Either String ByteString
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeUnrender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeOctetStream
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">ByteString -&gt; Either String ByteString
forall a b. b -&gt; Either a b
</span><span class="hs-identifier hs-var">P.Right</span></span><span> </span><span class="annot"><span class="annottext">(ByteString -&gt; Either String ByteString)
-&gt; (ByteString -&gt; ByteString)
-&gt; ByteString
-&gt; Either String ByteString
forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">ByteString -&gt; ByteString
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="annot"><span class="hs-comment">-- | @P.left P.show . T.decodeUtf8' . BL.toStrict@</span></span><span>
</span><span id="line-196"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154883"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">T.Text</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679154888"><span class="annot"><span class="annottext">mimeUnrender :: Proxy MimeOctetStream -&gt; ByteString -&gt; Either String Text
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeUnrender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeOctetStream
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">(UnicodeException -&gt; String)
-&gt; Either UnicodeException Text -&gt; Either String Text
forall b c d. (b -&gt; c) -&gt; Either b d -&gt; Either c d
forall (a :: * -&gt; * -&gt; *) b c d.
ArrowChoice a =&gt;
a b c -&gt; a (Either b d) (Either c d)
</span><span class="hs-identifier hs-var">P.left</span></span><span> </span><span class="annot"><span class="annottext">UnicodeException -&gt; String
forall a. Show a =&gt; a -&gt; String
</span><span class="hs-identifier hs-var">P.show</span></span><span> </span><span class="annot"><span class="annottext">(Either UnicodeException Text -&gt; Either String Text)
-&gt; (ByteString -&gt; Either UnicodeException Text)
-&gt; ByteString
-&gt; Either String Text
forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">ByteString -&gt; Either UnicodeException Text
</span><span class="hs-identifier hs-var">T.decodeUtf8'</span></span><span> </span><span class="annot"><span class="annottext">(ByteString -&gt; Either UnicodeException Text)
-&gt; (ByteString -&gt; ByteString)
-&gt; ByteString
-&gt; Either UnicodeException Text
forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">ByteString -&gt; ByteString
</span><span class="hs-identifier hs-var">BL.toStrict</span></span><span>
</span><span id="line-197"></span><span class="annot"><span class="hs-comment">-- | @P.Right . BCL.unpack@</span></span><span>
</span><span id="line-198"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154893"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">String</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679154896"><span class="annot"><span class="annottext">mimeUnrender :: Proxy MimeOctetStream -&gt; ByteString -&gt; Either String String
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeUnrender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeOctetStream
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -&gt; Either String String
forall a b. b -&gt; Either a b
</span><span class="hs-identifier hs-var">P.Right</span></span><span> </span><span class="annot"><span class="annottext">(String -&gt; Either String String)
-&gt; (ByteString -&gt; String) -&gt; ByteString -&gt; Either String String
forall b c a. (b -&gt; c) -&gt; (a -&gt; b) -&gt; a -&gt; c
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">ByteString -&gt; String
</span><span class="hs-identifier hs-var">BCL.unpack</span></span><span>
</span><span id="line-199"></span><span>
</span><span id="line-200"></span><span class="annot"><span class="hs-comment">-- | @P.Right . P.const NoContent@</span></span><span>
</span><span id="line-201"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154901"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679154904"><span class="annot"><span class="annottext">mimeUnrender :: Proxy MimeNoContent -&gt; ByteString -&gt; Either String NoContent
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeUnrender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeNoContent
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">NoContent -&gt; Either String NoContent
forall a b. b -&gt; Either a b
</span><span class="hs-identifier hs-var">P.Right</span></span><span> </span><span class="annot"><span class="annottext">(NoContent -&gt; Either String NoContent)
-&gt; (ByteString -&gt; NoContent)
-&gt; ByteString
-&gt; Either String NoContent
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">NoContent -&gt; ByteString -&gt; NoContent
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">NoContent
</span><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-var">NoContent</span></a></span><span>
</span><span id="line-202"></span><span>
</span><span id="line-203"></span><span>
</span><span id="line-204"></span><span class="annot"><span class="hs-comment">-- * Custom Mime Types</span></span><span>
</span><span id="line-205"></span><span>
</span><span id="line-206"></span><span class="annot"><span class="hs-comment">-- ** MimeXmlCharsetutf16</span></span><span>
</span><span id="line-207"></span><span>
</span><span id="line-208"></span><span class="hs-keyword">data</span><span> </span><span id="MimeXmlCharsetutf16"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeXmlCharsetutf16"><span class="hs-identifier hs-var">MimeXmlCharsetutf16</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span id="MimeXmlCharsetutf16"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeXmlCharsetutf16"><span class="hs-identifier hs-var">MimeXmlCharsetutf16</span></a></span></span><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">P.Typeable</span></span><span class="hs-special">)</span><span>
</span><span id="line-209"></span><span>
</span><span id="line-210"></span><span class="annot"><span class="hs-comment">-- | @application/xml; charset=utf-16@</span></span><span>
</span><span id="line-211"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154909"><span id="local-6989586621679154914"><span id="local-6989586621679154917"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeXmlCharsetutf16"><span class="hs-identifier hs-type">MimeXmlCharsetutf16</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
</span><span id="line-212"></span><span>  </span><span id="local-6989586621679154920"><span class="annot"><span class="annottext">mimeType :: Proxy MimeXmlCharsetutf16 -&gt; Maybe MediaType
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeXmlCharsetutf16
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">MediaType -&gt; Maybe MediaType
forall a. a -&gt; Maybe a
</span><span class="hs-identifier hs-var">Just</span></span><span> </span><span class="annot"><span class="annottext">(MediaType -&gt; Maybe MediaType) -&gt; MediaType -&gt; Maybe MediaType
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">String -&gt; MediaType
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; charset=utf-16&quot;</span></span><span>
</span><span id="line-213"></span><span class="hs-comment">-- instance MimeRender MimeXmlCharsetutf16 T.Text where mimeRender _ = undefined</span><span>
</span><span id="line-214"></span><span class="hs-comment">-- instance MimeUnrender MimeXmlCharsetutf16 T.Text where mimeUnrender _ = undefined</span><span>
</span><span id="line-215"></span><span>
</span><span id="line-216"></span><span class="annot"><span class="hs-comment">-- ** MimeXmlCharsetutf8</span></span><span>
</span><span id="line-217"></span><span>
</span><span id="line-218"></span><span class="hs-keyword">data</span><span> </span><span id="MimeXmlCharsetutf8"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeXmlCharsetutf8"><span class="hs-identifier hs-var">MimeXmlCharsetutf8</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span id="MimeXmlCharsetutf8"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeXmlCharsetutf8"><span class="hs-identifier hs-var">MimeXmlCharsetutf8</span></a></span></span><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">P.Typeable</span></span><span class="hs-special">)</span><span>
</span><span id="line-219"></span><span>
</span><span id="line-220"></span><span class="annot"><span class="hs-comment">-- | @application/xml; charset=utf-8@</span></span><span>
</span><span id="line-221"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154925"><span id="local-6989586621679154930"><span id="local-6989586621679154933"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeXmlCharsetutf8"><span class="hs-identifier hs-type">MimeXmlCharsetutf8</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
</span><span id="line-222"></span><span>  </span><span id="local-6989586621679154936"><span class="annot"><span class="annottext">mimeType :: Proxy MimeXmlCharsetutf8 -&gt; Maybe MediaType
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeXmlCharsetutf8
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">MediaType -&gt; Maybe MediaType
forall a. a -&gt; Maybe a
</span><span class="hs-identifier hs-var">Just</span></span><span> </span><span class="annot"><span class="annottext">(MediaType -&gt; Maybe MediaType) -&gt; MediaType -&gt; Maybe MediaType
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">String -&gt; MediaType
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; charset=utf-8&quot;</span></span><span>
</span><span id="line-223"></span><span class="hs-comment">-- instance MimeRender MimeXmlCharsetutf8 T.Text where mimeRender _ = undefined</span><span>
</span><span id="line-224"></span><span class="hs-comment">-- instance MimeUnrender MimeXmlCharsetutf8 T.Text where mimeUnrender _ = undefined</span><span>
</span><span id="line-225"></span><span>
</span><span id="line-226"></span><span class="annot"><span class="hs-comment">-- ** MimeTextXml</span></span><span>
</span><span id="line-227"></span><span>
</span><span id="line-228"></span><span class="hs-keyword">data</span><span> </span><span id="MimeTextXml"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeTextXml"><span class="hs-identifier hs-var">MimeTextXml</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span id="MimeTextXml"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeTextXml"><span class="hs-identifier hs-var">MimeTextXml</span></a></span></span><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">P.Typeable</span></span><span class="hs-special">)</span><span>
</span><span id="line-229"></span><span>
</span><span id="line-230"></span><span class="annot"><span class="hs-comment">-- | @text/xml@</span></span><span>
</span><span id="line-231"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154941"><span id="local-6989586621679154946"><span id="local-6989586621679154949"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeTextXml"><span class="hs-identifier hs-type">MimeTextXml</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
</span><span id="line-232"></span><span>  </span><span id="local-6989586621679154952"><span class="annot"><span class="annottext">mimeType :: Proxy MimeTextXml -&gt; Maybe MediaType
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeTextXml
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">MediaType -&gt; Maybe MediaType
forall a. a -&gt; Maybe a
</span><span class="hs-identifier hs-var">Just</span></span><span> </span><span class="annot"><span class="annottext">(MediaType -&gt; Maybe MediaType) -&gt; MediaType -&gt; Maybe MediaType
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">String -&gt; MediaType
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/xml&quot;</span></span><span>
</span><span id="line-233"></span><span class="hs-comment">-- instance MimeRender MimeTextXml T.Text where mimeRender _ = undefined</span><span>
</span><span id="line-234"></span><span class="hs-comment">-- instance MimeUnrender MimeTextXml T.Text where mimeUnrender _ = undefined</span><span>
</span><span id="line-235"></span><span>
</span><span id="line-236"></span><span class="annot"><span class="hs-comment">-- ** MimeTextXmlCharsetutf16</span></span><span>
</span><span id="line-237"></span><span>
</span><span id="line-238"></span><span class="hs-keyword">data</span><span> </span><span id="MimeTextXmlCharsetutf16"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeTextXmlCharsetutf16"><span class="hs-identifier hs-var">MimeTextXmlCharsetutf16</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span id="MimeTextXmlCharsetutf16"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeTextXmlCharsetutf16"><span class="hs-identifier hs-var">MimeTextXmlCharsetutf16</span></a></span></span><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">P.Typeable</span></span><span class="hs-special">)</span><span>
</span><span id="line-239"></span><span>
</span><span id="line-240"></span><span class="annot"><span class="hs-comment">-- | @text/xml; charset=utf-16@</span></span><span>
</span><span id="line-241"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154957"><span id="local-6989586621679154962"><span id="local-6989586621679154965"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeTextXmlCharsetutf16"><span class="hs-identifier hs-type">MimeTextXmlCharsetutf16</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
</span><span id="line-242"></span><span>  </span><span id="local-6989586621679154968"><span class="annot"><span class="annottext">mimeType :: Proxy MimeTextXmlCharsetutf16 -&gt; Maybe MediaType
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeTextXmlCharsetutf16
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">MediaType -&gt; Maybe MediaType
forall a. a -&gt; Maybe a
</span><span class="hs-identifier hs-var">Just</span></span><span> </span><span class="annot"><span class="annottext">(MediaType -&gt; Maybe MediaType) -&gt; MediaType -&gt; Maybe MediaType
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">String -&gt; MediaType
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/xml; charset=utf-16&quot;</span></span><span>
</span><span id="line-243"></span><span class="hs-comment">-- instance MimeRender MimeTextXmlCharsetutf16 T.Text where mimeRender _ = undefined</span><span>
</span><span id="line-244"></span><span class="hs-comment">-- instance MimeUnrender MimeTextXmlCharsetutf16 T.Text where mimeUnrender _ = undefined</span><span>
</span><span id="line-245"></span><span>
</span><span id="line-246"></span><span class="annot"><span class="hs-comment">-- ** MimeTextXmlCharsetutf8</span></span><span>
</span><span id="line-247"></span><span>
</span><span id="line-248"></span><span class="hs-keyword">data</span><span> </span><span id="MimeTextXmlCharsetutf8"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeTextXmlCharsetutf8"><span class="hs-identifier hs-var">MimeTextXmlCharsetutf8</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span id="MimeTextXmlCharsetutf8"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeTextXmlCharsetutf8"><span class="hs-identifier hs-var">MimeTextXmlCharsetutf8</span></a></span></span><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">P.Typeable</span></span><span class="hs-special">)</span><span>
</span><span id="line-249"></span><span>
</span><span id="line-250"></span><span class="annot"><span class="hs-comment">-- | @text/xml; charset=utf-8@</span></span><span>
</span><span id="line-251"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679154973"><span id="local-6989586621679154978"><span id="local-6989586621679154981"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeTextXmlCharsetutf8"><span class="hs-identifier hs-type">MimeTextXmlCharsetutf8</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
</span><span id="line-252"></span><span>  </span><span id="local-6989586621679154984"><span class="annot"><span class="annottext">mimeType :: Proxy MimeTextXmlCharsetutf8 -&gt; Maybe MediaType
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeTextXmlCharsetutf8
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">MediaType -&gt; Maybe MediaType
forall a. a -&gt; Maybe a
</span><span class="hs-identifier hs-var">Just</span></span><span> </span><span class="annot"><span class="annottext">(MediaType -&gt; Maybe MediaType) -&gt; MediaType -&gt; Maybe MediaType
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">String -&gt; MediaType
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/xml; charset=utf-8&quot;</span></span><span>
</span><span id="line-253"></span><span class="hs-comment">-- instance MimeRender MimeTextXmlCharsetutf8 T.Text where mimeRender _ = undefined</span><span>
</span><span id="line-254"></span><span class="hs-comment">-- instance MimeUnrender MimeTextXmlCharsetutf8 T.Text where mimeUnrender _ = undefined</span><span>
</span><span id="line-255"></span><span>
</span><span id="line-256"></span></pre></body></html>