[haskell-http-client] fixes for fake-endpoints (#6597)

* fix compile errors / sanitization for petstore-with-fake-endpoints-models-for-testing.yaml
* correct mimetype logic
* add makefile
This commit is contained in:
Jon Schoning 2017-10-01 05:18:46 -05:00 committed by wing328
parent c32281cd02
commit 8bd7d3912b
59 changed files with 6972 additions and 2013 deletions

View File

@ -26,7 +26,8 @@ fi
# if you've executed sbt assembly previously it will use that instead. # if you've executed sbt assembly previously it will use that instead.
export JAVA_OPTS="${JAVA_OPTS} -XX:MaxPermSize=256M -Xmx1024M -DloggerPath=conf/log4j.properties" export JAVA_OPTS="${JAVA_OPTS} -XX:MaxPermSize=256M -Xmx1024M -DloggerPath=conf/log4j.properties"
ags="$@ generate -t modules/swagger-codegen/src/main/resources/haskell-http-client -i modules/swagger-codegen/src/test/resources/2_0/petstore.yaml -l haskell-http-client -o samples/client/petstore/haskell-http-client"
echo "java ${JAVA_OPTS} -jar ${executable} ${ags}" args="$@ generate -t modules/swagger-codegen/src/main/resources/haskell-http-client -i modules/swagger-codegen/src/test/resources/2_0/petstore-with-fake-endpoints-models-for-testing.yaml -l haskell-http-client -o samples/client/petstore/haskell-http-client"
java $JAVA_OPTS -jar $executable $ags
echo "java ${JAVA_OPTS} -jar ${executable} ${args}"
java $JAVA_OPTS -jar $executable $args

View File

@ -5,7 +5,6 @@ import io.swagger.models.Model;
import io.swagger.models.ModelImpl; import io.swagger.models.ModelImpl;
import io.swagger.models.Operation; import io.swagger.models.Operation;
import io.swagger.models.Swagger; import io.swagger.models.Swagger;
import io.swagger.models.parameters.Parameter;
import io.swagger.models.properties.ArrayProperty; import io.swagger.models.properties.ArrayProperty;
import io.swagger.models.properties.MapProperty; import io.swagger.models.properties.MapProperty;
import io.swagger.models.properties.Property; import io.swagger.models.properties.Property;
@ -26,12 +25,10 @@ import io.swagger.util.Json;
import java.io.IOException; import java.io.IOException;
import java.io.File; import java.io.File;
import org.apache.commons.lang3.ArrayUtils;
import org.apache.commons.lang3.StringUtils; import org.apache.commons.lang3.StringUtils;
import org.apache.commons.lang3.text.WordUtils; import org.apache.commons.lang3.text.WordUtils;
import java.util.regex.Matcher; import java.util.regex.Matcher;
import java.util.regex.Pattern;
public class HaskellHttpClientCodegen extends DefaultCodegen implements CodegenConfig { public class HaskellHttpClientCodegen extends DefaultCodegen implements CodegenConfig {
@ -65,6 +62,7 @@ public class HaskellHttpClientCodegen extends DefaultCodegen implements CodegenC
static final String MEDIA_TYPE = "mediaType"; static final String MEDIA_TYPE = "mediaType";
static final String MEDIA_DATA_TYPE = "x-mediaDataType"; static final String MEDIA_DATA_TYPE = "x-mediaDataType";
static final String MEDIA_IS_JSON = "x-mediaIsJson";
protected Map<String, CodegenParameter> uniqueOptionalParamsByName = new HashMap<String, CodegenParameter>(); protected Map<String, CodegenParameter> uniqueOptionalParamsByName = new HashMap<String, CodegenParameter>();
@ -86,6 +84,8 @@ public class HaskellHttpClientCodegen extends DefaultCodegen implements CodegenC
} }
final private static Pattern JSON_MIME_PATTERN = Pattern.compile("(?i)application/.*json(;.*)?");
public HaskellHttpClientCodegen() { public HaskellHttpClientCodegen() {
super(); super();
@ -120,7 +120,7 @@ public class HaskellHttpClientCodegen extends DefaultCodegen implements CodegenC
"instance", "let", "in", "instance", "let", "in",
"mdo", "module", "newtype", "mdo", "module", "newtype",
"proc", "qualified", "rec", "proc", "qualified", "rec",
"type", "where" "type", "where", "pure", "return"
) )
); );
@ -150,30 +150,33 @@ public class HaskellHttpClientCodegen extends DefaultCodegen implements CodegenC
"Char", "Char",
"Double", "Double",
"List", "List",
"FilePath" "FilePath",
"Text"
) )
); );
typeMapping.clear(); typeMapping.clear();
// typeMapping.put("array", "List"); // prim
typeMapping.put("set", "Set");
typeMapping.put("boolean", "Bool"); typeMapping.put("boolean", "Bool");
typeMapping.put("string", "Text");
typeMapping.put("int", "Int"); typeMapping.put("int", "Int");
typeMapping.put("long", "Integer"); typeMapping.put("long", "Integer");
typeMapping.put("short", "Int"); typeMapping.put("short", "Int");
typeMapping.put("char", "Char"); typeMapping.put("char", "Char");
typeMapping.put("float", "Float"); typeMapping.put("float", "Float");
typeMapping.put("double", "Double"); typeMapping.put("double", "Double");
typeMapping.put("Date", "Day");
typeMapping.put("DateTime", "UTCTime");
typeMapping.put("file", "FilePath");
typeMapping.put("number", "Double"); typeMapping.put("number", "Double");
typeMapping.put("integer", "Int"); typeMapping.put("integer", "Int");
typeMapping.put("any", "Value"); typeMapping.put("file", "FilePath");
// lib
typeMapping.put("string", "Text");
typeMapping.put("UUID", "Text"); typeMapping.put("UUID", "Text");
typeMapping.put("binary", "ByteString"); typeMapping.put("any", "A.Value");
typeMapping.put("ByteArray", "ByteString"); typeMapping.put("set", "Set.Set");
// newtype
typeMapping.put("binary", "Binary");
typeMapping.put("ByteArray", "ByteArray");
typeMapping.put("date", "Date");
typeMapping.put("DateTime", "DateTime");
knownMimeDataTypes.put("application/json", "MimeJSON"); knownMimeDataTypes.put("application/json", "MimeJSON");
knownMimeDataTypes.put("application/xml", "MimeXML"); knownMimeDataTypes.put("application/xml", "MimeXML");
@ -181,6 +184,7 @@ public class HaskellHttpClientCodegen extends DefaultCodegen implements CodegenC
knownMimeDataTypes.put("application/octet-stream", "MimeOctetStream"); knownMimeDataTypes.put("application/octet-stream", "MimeOctetStream");
knownMimeDataTypes.put("multipart/form-data", "MimeMultipartFormData"); knownMimeDataTypes.put("multipart/form-data", "MimeMultipartFormData");
knownMimeDataTypes.put("text/plain", "MimePlainText"); knownMimeDataTypes.put("text/plain", "MimePlainText");
knownMimeDataTypes.put("*/*", "MimeAny");
importMapping.clear(); importMapping.clear();
importMapping.put("Map", "qualified Data.Map as Map"); importMapping.put("Map", "qualified Data.Map as Map");
@ -203,8 +207,6 @@ public class HaskellHttpClientCodegen extends DefaultCodegen implements CodegenC
cliOptions.add(CliOption.newBoolean(CodegenConstants.HIDE_GENERATION_TIMESTAMP, "hides the timestamp when files were generated").defaultValue(Boolean.TRUE.toString())); cliOptions.add(CliOption.newBoolean(CodegenConstants.HIDE_GENERATION_TIMESTAMP, "hides the timestamp when files were generated").defaultValue(Boolean.TRUE.toString()));
// cliOptions.add(new CliOption(MODEL_IMPORTS, "Additional imports in the Models file"));
// cliOptions.add(new CliOption(MODEL_EXTENSIONS, "Additional extensions in the Models file"));
} }
public void setAllowFromJsonNulls(Boolean value) { public void setAllowFromJsonNulls(Boolean value) {
@ -332,17 +334,6 @@ public class HaskellHttpClientCodegen extends DefaultCodegen implements CodegenC
} }
// @Override
// public String apiFileFolder() {
// String apiName = (String)additionalProperties.get("title");
// return outputFolder + File.separator + "lib/" + apiName;
// }
// @Override
// public String modelFileFolder() {
// String apiName = (String)additionalProperties.get("title");
// return outputFolder + File.separator + "lib/" + apiName;
// }
@Override @Override
public void preprocessSwagger(Swagger swagger) { public void preprocessSwagger(Swagger swagger) {
// From the title, compute a reasonable name for the package and the API // From the title, compute a reasonable name for the package and the API
@ -407,19 +398,6 @@ public class HaskellHttpClientCodegen extends DefaultCodegen implements CodegenC
additionalProperties.put("configType", apiName + "Config"); additionalProperties.put("configType", apiName + "Config");
additionalProperties.put("swaggerVersion", swagger.getSwagger()); additionalProperties.put("swaggerVersion", swagger.getSwagger());
// prepend '
// List<Map<String, Object>> replacements = new ArrayList<>();
// Object[] replacementChars = specialCharReplacements.keySet().toArray();
// for (int i = 0; i < replacementChars.length; i++) {
// String c = (String) replacementChars[i];
// Map<String, Object> o = new HashMap<>();
// o.put("char", c);
// o.put("replacement", "'" + specialCharReplacements.get(c));
// o.put("hasMore", i != replacementChars.length - 1);
// replacements.add(o);
// }
// additionalProperties.put("specialCharReplacements", replacements);
//copy input swagger to output folder //copy input swagger to output folder
try { try {
String swaggerJson = Json.pretty(swagger); String swaggerJson = Json.pretty(swagger);
@ -441,9 +419,9 @@ public class HaskellHttpClientCodegen extends DefaultCodegen implements CodegenC
} else if (p instanceof MapProperty) { } else if (p instanceof MapProperty) {
MapProperty mp = (MapProperty) p; MapProperty mp = (MapProperty) p;
Property inner = mp.getAdditionalProperties(); Property inner = mp.getAdditionalProperties();
return "Map.Map String " + getTypeDeclaration(inner); return "(Map.Map String " + getTypeDeclaration(inner) + ")";
} }
return fixModelChars(super.getTypeDeclaration(p)); return super.getTypeDeclaration(p);
} }
@Override @Override
@ -451,17 +429,16 @@ public class HaskellHttpClientCodegen extends DefaultCodegen implements CodegenC
String swaggerType = super.getSwaggerType(p); String swaggerType = super.getSwaggerType(p);
String type = null; String type = null;
if (typeMapping.containsKey(swaggerType)) { if (typeMapping.containsKey(swaggerType)) {
type = typeMapping.get(swaggerType); return typeMapping.get(swaggerType);
if (languageSpecificPrimitives.contains(type)) } else if (languageSpecificPrimitives.contains(type)) {
return toModelName(type); return type;
} else if (swaggerType == "object") { } else if (swaggerType == "object") {
type = "Value"; return "A.Value";
} else if (typeMapping.containsValue(swaggerType)) { // } else if (typeMapping.containsValue(swaggerType)) {
type = swaggerType + "_"; // return toModelName(swaggerType) + "_";
} else { } else {
type = swaggerType; return toModelName(swaggerType);
} }
return toModelName(type);
} }
@Override @Override
@ -479,8 +456,6 @@ public class HaskellHttpClientCodegen extends DefaultCodegen implements CodegenC
} else if (p instanceof ArrayProperty) { } else if (p instanceof ArrayProperty) {
ArrayProperty ap = (ArrayProperty) p; ArrayProperty ap = (ArrayProperty) p;
String inner = getSwaggerType(ap.getItems()); String inner = getSwaggerType(ap.getItems());
// Return only the inner type; the wrapping with QueryList is done
// somewhere else, where we have access to the collection format.
return inner; return inner;
} else { } else {
return null; return null;
@ -493,12 +468,12 @@ public class HaskellHttpClientCodegen extends DefaultCodegen implements CodegenC
op.vendorExtensions.put("x-baseOperationId", op.operationId); op.vendorExtensions.put("x-baseOperationId", op.operationId);
op.vendorExtensions.put("x-haddockPath", String.format("%s %s", op.httpMethod, op.path.replace("/", "\\/"))); op.vendorExtensions.put("x-haddockPath", String.format("%s %s", op.httpMethod, op.path.replace("/", "\\/")));
op.operationId = toHsVarName(op.operationId); op.operationId = toVarName(op.operationId);
op.vendorExtensions.put("x-operationType", toHsTypeName(op.operationId)); op.vendorExtensions.put("x-operationType", toTypeName("Op", op.operationId));
op.vendorExtensions.put("x-hasBodyOrFormParam", op.getHasBodyParam() || op.getHasFormParams()); op.vendorExtensions.put("x-hasBodyOrFormParam", op.getHasBodyParam() || op.getHasFormParams());
for (CodegenParameter param : op.allParams) { for (CodegenParameter param : op.allParams) {
param.vendorExtensions.put("x-operationType", capitalize(op.operationId)); param.vendorExtensions.put("x-operationType", WordUtils.capitalize(op.operationId));
param.vendorExtensions.put("x-isBodyOrFormParam", param.isBodyParam || param.isFormParam); param.vendorExtensions.put("x-isBodyOrFormParam", param.isBodyParam || param.isFormParam);
if (!StringUtils.isBlank(param.collectionFormat)) { if (!StringUtils.isBlank(param.collectionFormat)) {
param.vendorExtensions.put("x-collectionFormat", mapCollectionFormat(param.collectionFormat)); param.vendorExtensions.put("x-collectionFormat", mapCollectionFormat(param.collectionFormat));
@ -506,7 +481,7 @@ public class HaskellHttpClientCodegen extends DefaultCodegen implements CodegenC
if (!param.required) { if (!param.required) {
op.vendorExtensions.put("x-hasOptionalParams", true); op.vendorExtensions.put("x-hasOptionalParams", true);
String paramNameType = capitalize(param.paramName); String paramNameType = toTypeName("Param", param.paramName);
if (uniqueOptionalParamsByName.containsKey(paramNameType)) { if (uniqueOptionalParamsByName.containsKey(paramNameType)) {
CodegenParameter lastParam = this.uniqueOptionalParamsByName.get(paramNameType); CodegenParameter lastParam = this.uniqueOptionalParamsByName.get(paramNameType);
@ -532,7 +507,6 @@ public class HaskellHttpClientCodegen extends DefaultCodegen implements CodegenC
if (op.getHasPathParams()) { if (op.getHasPathParams()) {
String remainingPath = op.path; String remainingPath = op.path;
for (CodegenParameter param : op.pathParams) { for (CodegenParameter param : op.pathParams) {
param.paramName = toHsVarName(param.paramName);
String[] pieces = remainingPath.split("\\{" + param.baseName + "\\}"); String[] pieces = remainingPath.split("\\{" + param.baseName + "\\}");
if (pieces.length == 0) if (pieces.length == 0)
throw new RuntimeException("paramName {" + param.baseName + "} not in path " + op.path); throw new RuntimeException("paramName {" + param.baseName + "} not in path " + op.path);
@ -571,7 +545,7 @@ public class HaskellHttpClientCodegen extends DefaultCodegen implements CodegenC
for (Map<String, String> m : op.consumes) { for (Map<String, String> m : op.consumes) {
processMediaType(op,m); processMediaType(op,m);
} }
if (isMultipart(op.consumes)) { if (isMultipartOperation(op.consumes)) {
op.isMultipart = Boolean.TRUE; op.isMultipart = Boolean.TRUE;
} }
} }
@ -645,19 +619,14 @@ public class HaskellHttpClientCodegen extends DefaultCodegen implements CodegenC
public CodegenModel fromModel(String name, Model mod, Map<String, Model> allDefinitions) { public CodegenModel fromModel(String name, Model mod, Map<String, Model> allDefinitions) {
CodegenModel model = super.fromModel(name, mod, allDefinitions); CodegenModel model = super.fromModel(name, mod, allDefinitions);
// Clean up the class name to remove invalid characters
model.classname = fixModelChars(model.classname);
if (typeMapping.containsValue(model.classname)) {
model.classname += "_";
}
while (uniqueOptionalParamsByName.containsKey(model.classname)) { while (uniqueOptionalParamsByName.containsKey(model.classname)) {
model.classname = generateNextName(model.classname); model.classname = generateNextName(model.classname);
} }
// From the model name, compute the prefix for the fields. // From the model name, compute the prefix for the fields.
String prefix = camelize(model.classname, true); String prefix = WordUtils.uncapitalize(model.classname);
for (CodegenProperty prop : model.vars) { for (CodegenProperty prop : model.vars) {
prop.name = toVarName(prefix + camelize(fixOperatorChars(prop.name))); prop.name = toVarName(prefix, prop.name);
} }
//String dataOrNewtype = "data"; //String dataOrNewtype = "data";
@ -666,25 +635,10 @@ public class HaskellHttpClientCodegen extends DefaultCodegen implements CodegenC
return model; return model;
} }
// Create newtypes for things with non-object types
// String modelType = ((ModelImpl) mod).getType();
// if(modelType != "object" && typeMapping.containsKey(modelType)) {
// String newtype = typeMapping.get(modelType);
// model.vendorExtensions.put("x-customNewtype", newtype);
// }
modelNames.put(model.classname, model); modelNames.put(model.classname, model);
return model; return model;
} }
@Override
public CodegenParameter fromParameter(Parameter param, Set<String> imports) {
CodegenParameter p = super.fromParameter(param, imports);
p.paramName = toHsVarName(p.baseName);
p.dataType = fixModelChars(p.dataType);
return p;
}
@Override @Override
public String escapeReservedWord(String name) { public String escapeReservedWord(String name) {
if (this.reservedWordsMappings().containsKey(name)) { if (this.reservedWordsMappings().containsKey(name)) {
@ -693,13 +647,6 @@ public class HaskellHttpClientCodegen extends DefaultCodegen implements CodegenC
return "_" + name; return "_" + name;
} }
@Override
public String toModelFilename(String name) {
// should be the same as the model name
return toModelName(name);
}
@Override @Override
public String escapeQuotationMark(String input) { public String escapeQuotationMark(String input) {
// remove " to avoid code injection // remove " to avoid code injection
@ -726,17 +673,11 @@ public class HaskellHttpClientCodegen extends DefaultCodegen implements CodegenC
if(StringUtils.isBlank(mediaType)) return; if(StringUtils.isBlank(mediaType)) return;
String[] mediaTypeParts = mediaType.split("/",2);
if(mediaTypeParts.length > 1) {
m.put("x-mediaMainType", mediaTypeParts[0]);
m.put("x-mediaSubType", mediaTypeParts[1]);
} else {
m.put("x-mediaMainType", mediaTypeParts[0]);
m.put("x-mediaSubType", "");
}
String mimeType = getMimeDataType(mediaType); String mimeType = getMimeDataType(mediaType);
m.put(MEDIA_DATA_TYPE, mimeType); m.put(MEDIA_DATA_TYPE, mimeType);
if (isJsonMimeType(mediaType)) {
m.put(MEDIA_IS_JSON, "true");
}
allMimeTypes.put(mediaType, m); allMimeTypes.put(mediaType, m);
if(!knownMimeDataTypes.containsKey(mediaType) && !unknownMimeTypes.contains(m)) { if(!knownMimeDataTypes.containsKey(mediaType) && !unknownMimeTypes.contains(m)) {
@ -796,64 +737,9 @@ public class HaskellHttpClientCodegen extends DefaultCodegen implements CodegenC
return knownMimeDataTypes.get(mimeType); return knownMimeDataTypes.get(mimeType);
} }
String shortenedName = mimeType.replaceFirst("application/",""); String shortenedName = mimeType.replaceFirst("application/","");
return "Mime" + toHsTypeName(shortenedName); return "Mime" + toTypeName("", shortenedName);
} }
private String toHsVarName(String paramName) {
return toVarName(camelize(fixOperatorChars(fixModelChars(paramName)), true));
}
private String toHsTypeName(String paramName) {
return toHsTypeName(paramName, "");
}
private String toHsTypeName(String paramName, String modelCharReplacement) {
return camelize(fixOperatorChars(fixModelChars(paramName, modelCharReplacement)), false);
}
private String fixOperatorChars(String string) {
if(string == null) return null;
StringBuilder sb = new StringBuilder();
String name = string;
//Check if it is a reserved word, in which case the underscore is added when property name is generated.
if (string.startsWith("_")) {
if (reservedWords.contains(string.substring(1, string.length()))) {
name = string.substring(1, string.length());
} else if (reservedWordsMappings.containsValue(string)) {
name = LEADING_UNDERSCORE.matcher(string).replaceFirst("");
}
}
// prepend '
for (char c : name.toCharArray()) {
String cString = String.valueOf(c);
if (specialCharReplacements.containsKey(cString)) {
// sb.append("'");
sb.append(specialCharReplacements.get(cString));
} else {
sb.append(c);
}
}
return sb.toString();
}
// Remove characters from a string that do not belong in a model classname
private String fixModelChars(String string, String replacement) {
if(string == null) return null;
return string.replace(".", replacement).replace("-", replacement);
}
private String fixModelChars(String string) {
return fixModelChars(string, "");
}
private String capitalize(String word) {
if(word == null) return null;
if (word.length() > 0) {
word = word.substring(0, 1).toUpperCase() + word.substring(1);
}
return word;
}
private static String generateNextName(String name) { private static String generateNextName(String name) {
Pattern pattern = Pattern.compile("\\d+\\z"); Pattern pattern = Pattern.compile("\\d+\\z");
Matcher matcher = pattern.matcher(name); Matcher matcher = pattern.matcher(name);
@ -865,7 +751,7 @@ public class HaskellHttpClientCodegen extends DefaultCodegen implements CodegenC
return name + "2"; return name + "2";
} }
} }
private static boolean isMultipart(List<Map<String, String>> consumes) { private static boolean isMultipartOperation(List<Map<String, String>> consumes) {
for(Map<String, String> consume : consumes) { for(Map<String, String> consume : consumes) {
if (consume != null) { if (consume != null) {
if ("multipart/form-data".equals(consume.get(MEDIA_TYPE))) { if ("multipart/form-data".equals(consume.get(MEDIA_TYPE))) {
@ -875,12 +761,58 @@ public class HaskellHttpClientCodegen extends DefaultCodegen implements CodegenC
} }
return false; return false;
} }
@Override
// private boolean isModelledType(CodegenParameter param) { public String toVarName(String name) {
// return isModelledType(param.baseType == null ? param.dataType : param.baseType); return toVarName("", name);
// } }
// public String toVarName(String prefix, String name) {
// private boolean isModelledType(String typeName) { Boolean hasPrefix = !StringUtils.isBlank(prefix);
// return !languageSpecificPrimitives.contains(typeName) && !typeMapping.values().contains(typeName); name = underscore(sanitizeName(name.replaceAll("-", "_")));
// } name = camelize(name, !hasPrefix);
if(hasPrefix) {
return prefix + name;
} else {
if (name.matches("^\\d.*"))
name = escapeReservedWord(name);
if (isReservedWord(name))
name = escapeReservedWord(name);
return name;
}
}
@Override
public String toParamName(String name) {
return toVarName(name);
}
@Override
public String toModelName(String name) {
return toTypeName("Model", name);
}
@Override
public String toModelFilename(String name) {
return toTypeName("Model", name);
}
public String toTypeName(String prefix, String name) {
name = camelize(underscore(sanitizeName(name)));
if(StringUtils.isBlank(prefix)) return name;
if (isReservedWord(name)) {
name = prefix + name;
}
if (name.matches("^\\d.*")) {
name = prefix + name; // e.g. 200Response => Model200Response (after camelize)
}
if (languageSpecificPrimitives.contains(name)) {
name = prefix + name;
}
if (typeMapping.containsValue(name)) {
name = prefix + name;
}
return name;
}
static boolean isJsonMimeType(String mime) {
return mime != null && JSON_MIME_PATTERN.matcher(mime).matches();
}
} }

View File

@ -22,14 +22,11 @@ import {{title}}.MimeTypes
import {{title}}.Lens import {{title}}.Lens
import qualified Data.Aeson as A import qualified Data.Aeson as A
import Data.Aeson (Value)
import qualified Data.Time as TI import qualified Data.Time as TI
import Data.Time (UTCTime)
import qualified Data.ByteString as B import qualified Data.ByteString as B
import qualified Data.ByteString.Lazy as BL import qualified Data.ByteString.Lazy as BL
import Data.ByteString.Lazy (ByteString)
import qualified Data.ByteString.Builder as BB import qualified Data.ByteString.Builder as BB
import qualified Data.ByteString.Char8 as BC import qualified Data.ByteString.Char8 as BC
import qualified Data.ByteString.Lazy.Char8 as BCL import qualified Data.ByteString.Lazy.Char8 as BCL
@ -45,6 +42,7 @@ import qualified Data.CaseInsensitive as CI
import qualified Data.Data as P (Typeable) import qualified Data.Data as P (Typeable)
import qualified Data.Foldable as P import qualified Data.Foldable as P
import qualified Data.Map as Map import qualified Data.Map as Map
import qualified Data.Set as Set
import qualified Data.Maybe as P import qualified Data.Maybe as P
import qualified Data.Proxy as P (Proxy(..)) import qualified Data.Proxy as P (Proxy(..))
import qualified Data.Text as T import qualified Data.Text as T
@ -58,7 +56,6 @@ import qualified Lens.Micro as L
import Data.Monoid ((<>)) import Data.Monoid ((<>))
import Data.Function ((&)) import Data.Function ((&))
import Data.Set (Set)
import Data.Text (Text) import Data.Text (Text)
import GHC.Base ((<|>)) import GHC.Base ((<|>))

View File

@ -81,7 +81,7 @@ instance Show {{configType}} where
newConfig :: IO {{configType}} newConfig :: IO {{configType}}
newConfig = do newConfig = do
logCxt <- initLogContext logCxt <- initLogContext
return $ SwaggerPetstoreConfig return $ {{configType}}
{ configHost = "{{{basePath}}}" { configHost = "{{{basePath}}}"
, configUserAgent = "{{#httpUserAgent}}{{{.}}}{{/httpUserAgent}}{{^httpUserAgent}}{{{artifactId}}}/{{{artifactVersion}}}{{/httpUserAgent}}" , configUserAgent = "{{#httpUserAgent}}{{{.}}}{{/httpUserAgent}}{{^httpUserAgent}}{{{artifactId}}}/{{{artifactVersion}}}{{/httpUserAgent}}"
, configLogExecWithContext = runDefaultLogExecWithContext , configLogExecWithContext = runDefaultLogExecWithContext

View File

@ -10,17 +10,14 @@ Module : {{title}}.Lens
module {{title}}.Lens where module {{title}}.Lens where
import Data.Text (Text)
import qualified Data.Aeson as A import qualified Data.Aeson as A
import Data.Aeson (Value) import qualified Data.ByteString.Lazy as BL
import qualified Data.ByteString as B
import Data.ByteString.Lazy (ByteString)
import qualified Data.Data as P (Data, Typeable) import qualified Data.Data as P (Data, Typeable)
import qualified Data.Map as Map import qualified Data.Map as Map
import qualified Data.Set as Set
import qualified Data.Time as TI import qualified Data.Time as TI
import Data.Time (UTCTime)
import Data.Text (Text)
import Prelude (($), (.),(<$>),(<*>),(=<<),Maybe(..),Bool(..),Char,Double,FilePath,Float,Int,Integer,String,fmap,undefined,mempty,maybe,pure,Monad,Applicative,Functor) import Prelude (($), (.),(<$>),(<*>),(=<<),Maybe(..),Bool(..),Char,Double,FilePath,Float,Int,Integer,String,fmap,undefined,mempty,maybe,pure,Monad,Applicative,Functor)
import qualified Prelude as P import qualified Prelude as P

View File

@ -13,6 +13,7 @@ Module : {{title}}.MimeTypes
module {{title}}.MimeTypes where module {{title}}.MimeTypes where
import {{title}}.Model as M
import qualified Data.Aeson as A import qualified Data.Aeson as A
@ -22,13 +23,16 @@ import qualified Data.ByteString.Builder as BB
import qualified Data.ByteString.Char8 as BC import qualified Data.ByteString.Char8 as BC
import qualified Data.ByteString.Lazy.Char8 as BCL import qualified Data.ByteString.Lazy.Char8 as BCL
import qualified Network.HTTP.Media as ME import qualified Network.HTTP.Media as ME
import qualified Web.FormUrlEncoded as WH import qualified Web.FormUrlEncoded as WH
import qualified Web.HttpApiData as WH
import qualified Data.Data as P (Typeable) import qualified Data.Data as P (Typeable)
import qualified Data.Proxy as P (Proxy(..)) import qualified Data.Proxy as P (Proxy(..))
import qualified Data.Text as T import qualified Data.Text as T
import qualified Data.String as P
import qualified Data.Text.Encoding as T import qualified Data.Text.Encoding as T
import qualified Control.Arrow as P (left) import qualified Control.Arrow as P (left)
@ -50,6 +54,7 @@ data MimeFormUrlEncoded = MimeFormUrlEncoded deriving (P.Typeable)
data MimeMultipartFormData = MimeMultipartFormData deriving (P.Typeable) data MimeMultipartFormData = MimeMultipartFormData deriving (P.Typeable)
data MimeOctetStream = MimeOctetStream deriving (P.Typeable) data MimeOctetStream = MimeOctetStream deriving (P.Typeable)
data MimeNoContent = MimeNoContent deriving (P.Typeable) data MimeNoContent = MimeNoContent deriving (P.Typeable)
data MimeAny = MimeAny deriving (P.Typeable)
{{#x-unknownMimeTypes}}data {{{x-mediaDataType}}} = {{{x-mediaDataType}}} deriving (P.Typeable) {{#x-unknownMimeTypes}}data {{{x-mediaDataType}}} = {{{x-mediaDataType}}} deriving (P.Typeable)
{{/x-unknownMimeTypes}} {{/x-unknownMimeTypes}}
@ -78,37 +83,36 @@ class P.Typeable mtype => MimeType mtype where
-- ** MimeType Instances -- ** MimeType Instances
-- | @application/json@ -- | @application/json; charset=utf-8@
instance MimeType MimeJSON where instance MimeType MimeJSON where
mimeTypes _ = mimeType _ = Just $ P.fromString "application/json"
[ "application" ME.// "json" ME./: ("charset", "utf-8") -- | @application/xml; charset=utf-8@
, "application" ME.// "json"
]
-- | @application/xml@
instance MimeType MimeXML where instance MimeType MimeXML where
mimeType _ = Just $ "application" ME.// "xml" mimeType _ = Just $ P.fromString "application/xml"
-- | @application/x-www-form-urlencoded@ -- | @application/x-www-form-urlencoded@
instance MimeType MimeFormUrlEncoded where instance MimeType MimeFormUrlEncoded where
mimeType _ = Just $ "application" ME.// "x-www-form-urlencoded" mimeType _ = Just $ P.fromString "application/x-www-form-urlencoded"
-- | @multipart/form-data@ -- | @multipart/form-data@
instance MimeType MimeMultipartFormData where instance MimeType MimeMultipartFormData where
mimeType _ = Just $ "multipart" ME.// "form-data" mimeType _ = Just $ P.fromString "multipart/form-data"
-- | @text/plain; charset=utf-8@ -- | @text/plain; charset=utf-8@
instance MimeType MimePlainText where instance MimeType MimePlainText where
mimeType _ = Just $ "text" ME.// "plain" ME./: ("charset", "utf-8") mimeType _ = Just $ P.fromString "text/plain"
-- | @application/octet-stream@
instance MimeType MimeOctetStream where instance MimeType MimeOctetStream where
mimeType _ = Just $ "application" ME.// "octet-stream" mimeType _ = Just $ P.fromString "application/octet-stream"
-- | @"*/*"@
instance MimeType MimeAny where
mimeType _ = Just $ P.fromString "*/*"
instance MimeType MimeNoContent where instance MimeType MimeNoContent where
mimeType _ = Nothing mimeType _ = Nothing
{{#x-unknownMimeTypes}} {{#x-unknownMimeTypes}}
-- | @{{{mediaType}}}@ -- | @{{{mediaType}}}@
instance MimeType {{{x-mediaDataType}}} where instance MimeType {{{x-mediaDataType}}} where
mimeType _ = Just $ "{{{x-mediaMainType}}}" ME.// "{{{x-mediaSubType}}}" mimeType _ = Just $ P.fromString "{{{mediaType}}}"{{#x-mediaIsJson}}
instance A.ToJSON a => MimeRender {{{x-mediaDataType}}} a where mimeRender _ = A.encode
instance A.FromJSON a => MimeUnrender {{{x-mediaDataType}}} a where mimeUnrender _ = A.eitherDecode{{/x-mediaIsJson}}
{{/x-unknownMimeTypes}} {{/x-unknownMimeTypes}}
@ -141,12 +145,23 @@ instance MimeRender MimeOctetStream T.Text where mimeRender _ = BL.fromStrict .
-- | @BCL.pack@ -- | @BCL.pack@
instance MimeRender MimeOctetStream String where mimeRender _ = BCL.pack instance MimeRender MimeOctetStream String where mimeRender _ = BCL.pack
-- | @P.id@
instance MimeRender MimeMultipartFormData BL.ByteString where mimeRender _ = P.id instance MimeRender MimeMultipartFormData BL.ByteString where mimeRender _ = P.id
-- | @BL.fromStrict . T.encodeUtf8@ instance MimeRender MimeMultipartFormData Binary where mimeRender _ = unBinary
instance MimeRender MimeMultipartFormData T.Text where mimeRender _ = BL.fromStrict . T.encodeUtf8
-- | @BCL.pack@ instance MimeRender MimeMultipartFormData ByteArray where mimeRender _ = mimeRenderDefaultMultipartFormData
instance MimeRender MimeMultipartFormData String where mimeRender _ = BCL.pack instance MimeRender MimeMultipartFormData Bool where mimeRender _ = mimeRenderDefaultMultipartFormData
instance MimeRender MimeMultipartFormData Char where mimeRender _ = mimeRenderDefaultMultipartFormData
instance MimeRender MimeMultipartFormData Date where mimeRender _ = mimeRenderDefaultMultipartFormData
instance MimeRender MimeMultipartFormData DateTime where mimeRender _ = mimeRenderDefaultMultipartFormData
instance MimeRender MimeMultipartFormData Double where mimeRender _ = mimeRenderDefaultMultipartFormData
instance MimeRender MimeMultipartFormData Float where mimeRender _ = mimeRenderDefaultMultipartFormData
instance MimeRender MimeMultipartFormData Int where mimeRender _ = mimeRenderDefaultMultipartFormData
instance MimeRender MimeMultipartFormData Integer where mimeRender _ = mimeRenderDefaultMultipartFormData
instance MimeRender MimeMultipartFormData String where mimeRender _ = mimeRenderDefaultMultipartFormData
instance MimeRender MimeMultipartFormData T.Text where mimeRender _ = mimeRenderDefaultMultipartFormData
mimeRenderDefaultMultipartFormData :: WH.ToHttpApiData a => a -> BL.ByteString
mimeRenderDefaultMultipartFormData = BL.fromStrict . T.encodeUtf8 . WH.toQueryParam
-- | @P.Right . P.const NoContent@ -- | @P.Right . P.const NoContent@
instance MimeRender MimeNoContent NoContent where mimeRender _ = P.const BCL.empty instance MimeRender MimeNoContent NoContent where mimeRender _ = P.const BCL.empty

View File

@ -17,24 +17,28 @@ Module : {{title}}.Model
module {{title}}.Model where module {{title}}.Model where
import Data.Aeson ((.:),(.:!),(.:?),(.=)) import Data.Aeson ((.:),(.:!),(.:?),(.=))
import Data.Text (Text)
import Data.Aeson (Value)
import Data.ByteString.Lazy (ByteString)
import qualified Data.Aeson as A import qualified Data.Aeson as A
import qualified Data.ByteString as B import qualified Data.ByteString as B
import qualified Data.ByteString.Lazy as BL
import qualified Data.ByteString.Base64.Lazy as BL64
import qualified Data.Data as P (Data, Typeable) import qualified Data.Data as P (Data, Typeable)
import qualified Data.HashMap.Lazy as HM import qualified Data.HashMap.Lazy as HM
import qualified Data.Map as Map import qualified Data.Map as Map
import qualified Data.Set as Set
import qualified Data.Maybe as P import qualified Data.Maybe as P
import qualified Data.Foldable as P import qualified Data.Foldable as P
import qualified Web.FormUrlEncoded as WH import qualified Web.FormUrlEncoded as WH
import qualified Web.HttpApiData as WH import qualified Web.HttpApiData as WH
import qualified Control.DeepSeq as NF
import qualified Data.Ix as P
import qualified Data.Text as T
import qualified Data.Text.Encoding as T
import qualified Control.Arrow as P (left)
import Data.Text (Text)
import qualified Data.Time as TI import qualified Data.Time as TI
import qualified Data.Time.ISO8601 as TI import qualified Data.Time.ISO8601 as TI
import Data.Time (UTCTime)
import Control.Applicative ((<|>)) import Control.Applicative ((<|>))
import Control.Applicative (Alternative) import Control.Applicative (Alternative)
@ -55,7 +59,6 @@ import qualified Prelude as P
-- {{{.}}} -- {{{.}}}
-- {{/title}}{{#description}} -- {{/title}}{{#description}}
-- {{{.}}}{{/description}} -- {{{.}}}{{/description}}
{{^vendorExtensions.x-customNewtype}}
data {{classname}} = {{classname}} data {{classname}} = {{classname}}
{ {{#vars}}{{name}} :: {{#x-strictFields}}!({{/x-strictFields}}{{^required}}Maybe {{/required}}{{datatype}}{{#x-strictFields}}){{/x-strictFields}} -- ^ {{#required}}/Required/ {{/required}}{{#readOnly}}/ReadOnly/ {{/readOnly}}"{{baseName}}"{{#description}} - {{description}}{{/description}}{{#hasMore}} { {{#vars}}{{name}} :: {{#x-strictFields}}!({{/x-strictFields}}{{^required}}Maybe {{/required}}{{datatype}}{{#x-strictFields}}){{/x-strictFields}} -- ^ {{#required}}/Required/ {{/required}}{{#readOnly}}/ReadOnly/ {{/readOnly}}"{{baseName}}"{{#description}} - {{description}}{{/description}}{{#hasMore}}
, {{/hasMore}}{{/vars}} , {{/hasMore}}{{/vars}}
@ -63,28 +66,28 @@ data {{classname}} = {{classname}}
instance A.FromJSON {{classname}} where instance A.FromJSON {{classname}} where
parseJSON = A.withObject "{{classname}}" $ \o -> parseJSON = A.withObject "{{classname}}" $ \o ->
{{classname}} {{^hasVars}}pure {{/hasVars}}{{classname}}
<$>{{#vars}} (o {{#required}}.: {{/required}}{{^required}}{{^allowFromJsonNulls}}.:!{{/allowFromJsonNulls}}{{#allowFromJsonNulls}}.:?{{/allowFromJsonNulls}}{{/required}} "{{baseName}}"{{#isDateTime}} >>={{^required}} P.mapM{{/required}} _readDateTime{{/isDateTime}}{{#isDate}} >>={{^required}} P.mapM{{/required}} _readDate{{/isDate}}){{#hasMore}} {{#hasVars}}<$>{{/hasVars}}{{#vars}} (o {{#required}}.: {{/required}}{{^required}}{{^allowFromJsonNulls}}.:!{{/allowFromJsonNulls}}{{#allowFromJsonNulls}}.:?{{/allowFromJsonNulls}}{{/required}} "{{baseName}}"){{#hasMore}}
<*>{{/hasMore}}{{/vars}} <*>{{/hasMore}}{{/vars}}
instance A.ToJSON {{classname}} where instance A.ToJSON {{classname}} where
toJSON {{classname}} {..} = toJSON {{classname}} {{#hasVars}}{..}{{/hasVars}} =
{{^allowToJsonNulls}}_omitNulls{{/allowToJsonNulls}}{{#allowToJsonNulls}}A.object{{/allowToJsonNulls}} {{^allowToJsonNulls}}_omitNulls{{/allowToJsonNulls}}{{#allowToJsonNulls}}A.object{{/allowToJsonNulls}}
[ {{#vars}}"{{baseName}}" .= {{#isDateTime}}{{^required}}P.fmap {{/required}}_showDateTime{{/isDateTime}}{{#isDate}}{{^required}}P.fmap {{/required}}_showDate{{/isDate}} {{name}}{{#hasMore}} [ {{#vars}}"{{baseName}}" .= {{name}}{{#hasMore}}
, {{/hasMore}}{{/vars}} , {{/hasMore}}{{/vars}}
] ]
{{#vendorExtensions.x-hasMimeFormUrlEncoded}} {{#vendorExtensions.x-hasMimeFormUrlEncoded}}
instance WH.FromForm {{classname}} where instance WH.FromForm {{classname}} where
fromForm f = fromForm f =
{{classname}} {{^hasVars}}pure {{/hasVars}}{{classname}}
<$>{{#vars}} ({{#required}}WH.parseUnique {{/required}}{{^required}}WH.parseMaybe {{/required}}"{{baseName}}" f{{#isDateTime}} >>={{^required}} P.mapM{{/required}} _readDateTime{{/isDateTime}}{{#isDate}} >>={{^required}} P.mapM{{/required}} _readDate{{/isDate}}){{#hasMore}} {{#hasVars}}<$>{{/hasVars}}{{#vars}} ({{#required}}WH.parseUnique {{/required}}{{^required}}WH.parseMaybe {{/required}}"{{baseName}}" f){{#hasMore}}
<*>{{/hasMore}}{{/vars}} <*>{{/hasMore}}{{/vars}}
instance WH.ToForm {{classname}} where instance WH.ToForm {{classname}} where
toForm {{classname}} {..} = toForm {{classname}} {{#hasVars}}{..}{{/hasVars}} =
WH.Form $ HM.fromList $ P.catMaybes $ WH.Form $ HM.fromList $ P.catMaybes $
[ {{#vars}}_toFormItem "{{baseName}}" ({{#required}}Just $ {{/required}}{{#isDateTime}}{{^required}}P.fmap {{/required}}_showDateTime {{/isDateTime}}{{#isDate}}{{^required}}P.fmap {{/required}}_showDate {{/isDate}}{{name}}){{#hasMore}} [ {{#vars}}_toFormItem "{{baseName}}" ({{#required}}Just {{/required}}{{name}}){{#hasMore}}
, {{/hasMore}}{{/vars}} , {{/hasMore}}{{/vars}}
] ]
{{/vendorExtensions.x-hasMimeFormUrlEncoded}} {{/vendorExtensions.x-hasMimeFormUrlEncoded}}
@ -101,12 +104,6 @@ mk{{classname}} {{#requiredVars}}{{name}} {{/requiredVars}}=
} }
{{/generateModelConstructors}} {{/generateModelConstructors}}
{{/vendorExtensions.x-customNewtype}}
{{#vendorExtensions.x-customNewtype}}
newtype {{classname}} = {{classname}} {{vendorExtensions.x-customNewtype}} deriving (P.Show, P.Eq, P.Data, P.Typeable, P.Generic, A.FromJSON, A.ToJSON)
{-# WARNING {{classname}} "untested/unimlemented behavior" #-}
{{/vendorExtensions.x-customNewtype}}
{{/model}} {{/model}}
{{/models}} {{/models}}
@ -135,6 +132,19 @@ _memptyToNothing x = x
-- * DateTime Formatting -- * DateTime Formatting
newtype DateTime = DateTime { unDateTime :: TI.UTCTime }
deriving (P.Eq,P.Data,P.Ord,P.Typeable,NF.NFData,TI.ParseTime,TI.FormatTime)
instance A.FromJSON DateTime where
parseJSON = A.withText "DateTime" (_readDateTime . T.unpack)
instance A.ToJSON DateTime where
toJSON (DateTime t) = A.toJSON (_showDateTime t)
instance WH.FromHttpApiData DateTime where
parseUrlPiece = P.left T.pack . _readDateTime . T.unpack
instance WH.ToHttpApiData DateTime where
toUrlPiece (DateTime t) = T.pack (_showDateTime t)
instance P.Show DateTime where
show (DateTime t) = _showDateTime t
-- | @{{^dateTimeFormat}}_parseISO8601{{/dateTimeFormat}}{{#dateTimeFormat}}TI.parseTimeM True TI.defaultTimeLocale "{{{dateTimeFormat}}}"{{/dateTimeFormat}}@ -- | @{{^dateTimeFormat}}_parseISO8601{{/dateTimeFormat}}{{#dateTimeFormat}}TI.parseTimeM True TI.defaultTimeLocale "{{{dateTimeFormat}}}"{{/dateTimeFormat}}@
_readDateTime :: (TI.ParseTime t, Monad m, {{^dateTimeFormat}}Alternative m{{/dateTimeFormat}}) => String -> m t _readDateTime :: (TI.ParseTime t, Monad m, {{^dateTimeFormat}}Alternative m{{/dateTimeFormat}}) => String -> m t
_readDateTime = _readDateTime =
@ -142,7 +152,7 @@ _readDateTime =
{-# INLINE _readDateTime #-} {-# INLINE _readDateTime #-}
-- | @{{^dateTimeFormat}}TI.formatISO8601Millis{{/dateTimeFormat}}{{#dateTimeFormat}}TI.formatTime TI.defaultTimeLocale "{{{dateTimeFormat}}}"{{/dateTimeFormat}}@ -- | @{{^dateTimeFormat}}TI.formatISO8601Millis{{/dateTimeFormat}}{{#dateTimeFormat}}TI.formatTime TI.defaultTimeLocale "{{{dateTimeFormat}}}"{{/dateTimeFormat}}@
_showDateTime :: ({{^dateTimeFormat}}t ~ UTCTime, {{/dateTimeFormat}}TI.FormatTime t) => t -> String _showDateTime :: ({{^dateTimeFormat}}t ~ TI.UTCTime, {{/dateTimeFormat}}TI.FormatTime t) => t -> String
_showDateTime = _showDateTime =
{{^dateTimeFormat}}TI.formatISO8601Millis{{/dateTimeFormat}}{{#dateTimeFormat}}TI.formatTime TI.defaultTimeLocale "{{{dateTimeFormat}}}"{{/dateTimeFormat}} {{^dateTimeFormat}}TI.formatISO8601Millis{{/dateTimeFormat}}{{#dateTimeFormat}}TI.formatTime TI.defaultTimeLocale "{{{dateTimeFormat}}}"{{/dateTimeFormat}}
{-# INLINE _showDateTime #-} {-# INLINE _showDateTime #-}
@ -156,6 +166,19 @@ _parseISO8601 t =
-- * Date Formatting -- * Date Formatting
newtype Date = Date { unDate :: TI.Day }
deriving (P.Enum,P.Eq,P.Data,P.Ord,P.Ix,NF.NFData,TI.ParseTime,TI.FormatTime)
instance A.FromJSON Date where
parseJSON = A.withText "Date" (_readDate . T.unpack)
instance A.ToJSON Date where
toJSON (Date t) = A.toJSON (_showDate t)
instance WH.FromHttpApiData Date where
parseUrlPiece = P.left T.pack . _readDate . T.unpack
instance WH.ToHttpApiData Date where
toUrlPiece (Date t) = T.pack (_showDate t)
instance P.Show Date where
show (Date t) = _showDate t
-- | @TI.parseTimeM True TI.defaultTimeLocale "{{{dateFormat}}}"@ -- | @TI.parseTimeM True TI.defaultTimeLocale "{{{dateFormat}}}"@
_readDate :: (TI.ParseTime t, Monad m) => String -> m t _readDate :: (TI.ParseTime t, Monad m) => String -> m t
_readDate = _readDate =
@ -167,3 +190,54 @@ _showDate :: TI.FormatTime t => t -> String
_showDate = _showDate =
TI.formatTime TI.defaultTimeLocale "{{{dateFormat}}}" TI.formatTime TI.defaultTimeLocale "{{{dateFormat}}}"
{-# INLINE _showDate #-} {-# INLINE _showDate #-}
-- * Byte/Binary Formatting
-- | base64 encoded characters
newtype ByteArray = ByteArray { unByteArray :: BL.ByteString }
deriving (P.Eq,P.Data,P.Ord,P.Typeable,NF.NFData)
instance A.FromJSON ByteArray where
parseJSON = A.withText "ByteArray" _readByteArray
instance A.ToJSON ByteArray where
toJSON = A.toJSON . _showByteArray
instance WH.FromHttpApiData ByteArray where
parseUrlPiece = P.left T.pack . _readByteArray
instance WH.ToHttpApiData ByteArray where
toUrlPiece = _showByteArray
instance P.Show ByteArray where
show = T.unpack . _showByteArray
-- | read base64 encoded characters
_readByteArray :: Monad m => Text -> m ByteArray
_readByteArray = P.either P.fail (pure . ByteArray) . BL64.decode . BL.fromStrict . T.encodeUtf8
{-# INLINE _readByteArray #-}
-- | show base64 encoded characters
_showByteArray :: ByteArray -> Text
_showByteArray = T.decodeUtf8 . BL.toStrict . BL64.encode . unByteArray
{-# INLINE _showByteArray #-}
-- | any sequence of octets
newtype Binary = Binary { unBinary :: BL.ByteString }
deriving (P.Eq,P.Data,P.Ord,P.Typeable,NF.NFData)
instance A.FromJSON Binary where
parseJSON = A.withText "Binary" _readBinaryBase64
instance A.ToJSON Binary where
toJSON = A.toJSON . _showBinaryBase64
instance WH.FromHttpApiData Binary where
parseUrlPiece = P.left T.pack . _readBinaryBase64
instance WH.ToHttpApiData Binary where
toUrlPiece = _showBinaryBase64
instance P.Show Binary where
show = T.unpack . _showBinaryBase64
_readBinaryBase64 :: Monad m => Text -> m Binary
_readBinaryBase64 = P.either P.fail (pure . Binary) . BL64.decode . BL.fromStrict . T.encodeUtf8
{-# INLINE _readBinaryBase64 #-}
_showBinaryBase64 :: Binary -> Text
_showBinaryBase64 = T.decodeUtf8 . BL.toStrict . BL64.encode . unBinary
{-# INLINE _showBinaryBase64 #-}

View File

@ -44,6 +44,7 @@ library
, unordered-containers , unordered-containers
, aeson >=1.0 && <2.0 , aeson >=1.0 && <2.0
, bytestring >=0.10.0 && <0.11 , bytestring >=0.10.0 && <0.11
, base64-bytestring >1.0 && <2.0
, containers >=0.5.0.0 && <0.6 , containers >=0.5.0.0 && <0.6
, http-types >=0.8 && <0.10 , http-types >=0.8 && <0.10
, http-client >=0.5 && <0.6 , http-client >=0.5 && <0.6
@ -61,6 +62,7 @@ library
, safe-exceptions <0.2 , safe-exceptions <0.2
, case-insensitive , case-insensitive
, microlens >= 0.4.3 && <0.5 , microlens >= 0.4.3 && <0.5
, deepseq >= 1.4 && <1.6
exposed-modules: exposed-modules:
{{title}} {{title}}
{{title}}.API {{title}}.API

View File

@ -5,11 +5,11 @@ module Instances where
import Data.Text (Text, pack) import Data.Text (Text, pack)
import Data.Char (isSpace) import Data.Char (isSpace)
import Data.List (sort) import Data.List (sort)
import Data.Time.Calendar (Day(..)) import qualified Data.Time as TI
import Data.Time.Clock (UTCTime(..), secondsToDiffTime)
import Test.QuickCheck import Test.QuickCheck
import qualified Data.HashMap.Strict as HM import qualified Data.HashMap.Strict as HM
import qualified Data.Set as Set import qualified Data.Set as Set
import qualified Data.ByteString.Lazy as BL
import ApproxEq import ApproxEq
import {{title}}.Model import {{title}}.Model
@ -17,13 +17,33 @@ import {{title}}.Model
instance Arbitrary Text where instance Arbitrary Text where
arbitrary = pack <$> arbitrary arbitrary = pack <$> arbitrary
instance Arbitrary Day where instance Arbitrary TI.Day where
arbitrary = ModifiedJulianDay . (2000 +) <$> arbitrary arbitrary = TI.ModifiedJulianDay . (2000 +) <$> arbitrary
shrink = (ModifiedJulianDay <$>) . shrink . toModifiedJulianDay shrink = (TI.ModifiedJulianDay <$>) . shrink . TI.toModifiedJulianDay
instance Arbitrary UTCTime where instance Arbitrary TI.UTCTime where
arbitrary = arbitrary =
UTCTime <$> arbitrary <*> (secondsToDiffTime <$> choose (0, 86401)) TI.UTCTime <$> arbitrary <*> (TI.secondsToDiffTime <$> choose (0, 86401))
instance Arbitrary BL.ByteString where
arbitrary = BL.pack <$> arbitrary
shrink xs = BL.pack <$> shrink (BL.unpack xs)
instance Arbitrary ByteArray where
arbitrary = ByteArray <$> arbitrary
shrink (ByteArray xs) = ByteArray <$> shrink xs
instance Arbitrary Binary where
arbitrary = Binary <$> arbitrary
shrink (Binary xs) = Binary <$> shrink xs
instance Arbitrary DateTime where
arbitrary = DateTime <$> arbitrary
shrink (DateTime xs) = DateTime <$> shrink xs
instance Arbitrary Date where
arbitrary = Date <$> arbitrary
shrink (Date xs) = Date <$> shrink xs
-- | Checks if a given list has no duplicates in _O(n log n)_. -- | Checks if a given list has no duplicates in _O(n log n)_.
hasNoDups hasNoDups
@ -37,7 +57,7 @@ hasNoDups = go Set.empty
, Set.size s' > Set.size s = go s' xs , Set.size s' > Set.size s = go s' xs
| otherwise = False | otherwise = False
instance ApproxEq Day where instance ApproxEq TI.Day where
(=~) = (==) (=~) = (==)
-- * Models -- * Models
@ -46,8 +66,8 @@ instance ApproxEq Day where
{{#model}} {{#model}}
instance Arbitrary {{classname}} where instance Arbitrary {{classname}} where
arbitrary = arbitrary =
{{classname}} {{^hasVars}}pure {{/hasVars}}{{classname}}
<$> {{#vars}}arbitrary -- {{name}} :: {{^required}}Maybe {{/required}}{{datatype}} {{#hasVars}} <$>{{/hasVars}} {{#vars}}arbitrary -- {{name}} :: {{^required}}Maybe {{/required}}{{datatype}}
{{#hasMore}} <*> {{/hasMore}}{{/vars}} {{#hasMore}} <*> {{/hasMore}}{{/vars}}
{{/model}} {{/model}}

View File

@ -0,0 +1,10 @@
STACKCMD := stack --install-ghc
.PHONY: all clean build test test-integration build-example build-integration
all: clean build test build-example build-integration
clean: ; (rm -Rf ./.stack-work ./example-app/.stack-work ./tests-integration/.stack-work);
build: ; ($(STACKCMD) haddock);
test: ; ($(STACKCMD) test);
build-example: build ; (cd ./example-app; $(STACKCMD) build);
# a test-only project may exit with ExitFailure, despite building successfully
build-integration: build ; (cd ./tests-integration; $(STACKCMD) build --no-run-tests);
test-integration: build-integration ; (cd ./tests-integration; $(STACKCMD) test);

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

View File

@ -1,4 +1,4 @@
<!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><meta http-equiv="Content-Type" content="text/html; charset=UTF-8" /><title>swagger-petstore-0.1.0.0: Auto-generated swagger-petstore API Client (Index - -)</title><link href="ocean.css" rel="stylesheet" type="text/css" title="Ocean" /><script src="haddock-util.js" type="text/javascript"></script><script src="https://cdn.mathjax.org/mathjax/latest/MathJax.js?config=TeX-AMS-MML_HTMLorMML" type="text/javascript"></script><script type="text/javascript">//<![CDATA[ <!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><meta http-equiv="Content-Type" content="text/html; charset=UTF-8" /><title>swagger-petstore-0.1.0.0: Auto-generated swagger-petstore API Client (Index - -)</title><link href="ocean.css" rel="stylesheet" type="text/css" title="Ocean" /><script src="haddock-util.js" type="text/javascript"></script><script src="https://cdn.mathjax.org/mathjax/latest/MathJax.js?config=TeX-AMS-MML_HTMLorMML" type="text/javascript"></script><script type="text/javascript">//<![CDATA[
window.onload = function () {pageLoad();}; window.onload = function () {pageLoad();};
//]]> //]]>
</script></head><body><div id="package-header"><ul class="links" id="page-menu"><li><a href="index.html">Contents</a></li><li><a href="doc-index.html">Index</a></li></ul><p class="caption">swagger-petstore-0.1.0.0: Auto-generated swagger-petstore API Client</p></div><div id="content"><div id="alphabet"><ul><li><a href="doc-index-A.html">A</a></li><li><a href="doc-index-C.html">C</a></li><li><a href="doc-index-D.html">D</a></li><li><a href="doc-index-F.html">F</a></li><li><a href="doc-index-G.html">G</a></li><li><a href="doc-index-H.html">H</a></li><li><a href="doc-index-I.html">I</a></li><li><a href="doc-index-L.html">L</a></li><li><a href="doc-index-M.html">M</a></li><li><a href="doc-index-N.html">N</a></li><li><a href="doc-index-O.html">O</a></li><li><a href="doc-index-P.html">P</a></li><li><a href="doc-index-R.html">R</a></li><li><a href="doc-index-S.html">S</a></li><li><a href="doc-index-T.html">T</a></li><li><a href="doc-index-U.html">U</a></li><li><a href="doc-index-W.html">W</a></li><li><a href="doc-index-45.html">-</a></li><li><a href="doc-index-95.html">_</a></li><li><a href="doc-index-All.html">All</a></li></ul></div><div id="index"><p class="caption">Index - -</p><table><tr><td class="src">-&amp;-</td><td class="module"><a href="SwaggerPetstore-API.html#v:-45--38--45-">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr></table></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.17.3</p></div></body></html> </script></head><body><div id="package-header"><ul class="links" id="page-menu"><li><a href="index.html">Contents</a></li><li><a href="doc-index.html">Index</a></li></ul><p class="caption">swagger-petstore-0.1.0.0: Auto-generated swagger-petstore API Client</p></div><div id="content"><div id="alphabet"><ul><li><a href="doc-index-A.html">A</a></li><li><a href="doc-index-B.html">B</a></li><li><a href="doc-index-C.html">C</a></li><li><a href="doc-index-D.html">D</a></li><li><a href="doc-index-E.html">E</a></li><li><a href="doc-index-F.html">F</a></li><li><a href="doc-index-G.html">G</a></li><li><a href="doc-index-H.html">H</a></li><li><a href="doc-index-I.html">I</a></li><li><a href="doc-index-L.html">L</a></li><li><a href="doc-index-M.html">M</a></li><li><a href="doc-index-N.html">N</a></li><li><a href="doc-index-O.html">O</a></li><li><a href="doc-index-P.html">P</a></li><li><a href="doc-index-R.html">R</a></li><li><a href="doc-index-S.html">S</a></li><li><a href="doc-index-T.html">T</a></li><li><a href="doc-index-U.html">U</a></li><li><a href="doc-index-W.html">W</a></li><li><a href="doc-index-45.html">-</a></li><li><a href="doc-index-95.html">_</a></li><li><a href="doc-index-All.html">All</a></li></ul></div><div id="index"><p class="caption">Index - -</p><table><tr><td class="src">-&amp;-</td><td class="module"><a href="SwaggerPetstore-API.html#v:-45--38--45-">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr></table></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.17.3</p></div></body></html>

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

View File

@ -1,4 +1,4 @@
<!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><meta http-equiv="Content-Type" content="text/html; charset=UTF-8" /><title>swagger-petstore-0.1.0.0: Auto-generated swagger-petstore API Client (Index - G)</title><link href="ocean.css" rel="stylesheet" type="text/css" title="Ocean" /><script src="haddock-util.js" type="text/javascript"></script><script src="https://cdn.mathjax.org/mathjax/latest/MathJax.js?config=TeX-AMS-MML_HTMLorMML" type="text/javascript"></script><script type="text/javascript">//<![CDATA[ <!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><meta http-equiv="Content-Type" content="text/html; charset=UTF-8" /><title>swagger-petstore-0.1.0.0: Auto-generated swagger-petstore API Client (Index - G)</title><link href="ocean.css" rel="stylesheet" type="text/css" title="Ocean" /><script src="haddock-util.js" type="text/javascript"></script><script src="https://cdn.mathjax.org/mathjax/latest/MathJax.js?config=TeX-AMS-MML_HTMLorMML" type="text/javascript"></script><script type="text/javascript">//<![CDATA[
window.onload = function () {pageLoad();}; window.onload = function () {pageLoad();};
//]]> //]]>
</script></head><body><div id="package-header"><ul class="links" id="page-menu"><li><a href="index.html">Contents</a></li><li><a href="doc-index.html">Index</a></li></ul><p class="caption">swagger-petstore-0.1.0.0: Auto-generated swagger-petstore API Client</p></div><div id="content"><div id="alphabet"><ul><li><a href="doc-index-A.html">A</a></li><li><a href="doc-index-C.html">C</a></li><li><a href="doc-index-D.html">D</a></li><li><a href="doc-index-F.html">F</a></li><li><a href="doc-index-G.html">G</a></li><li><a href="doc-index-H.html">H</a></li><li><a href="doc-index-I.html">I</a></li><li><a href="doc-index-L.html">L</a></li><li><a href="doc-index-M.html">M</a></li><li><a href="doc-index-N.html">N</a></li><li><a href="doc-index-O.html">O</a></li><li><a href="doc-index-P.html">P</a></li><li><a href="doc-index-R.html">R</a></li><li><a href="doc-index-S.html">S</a></li><li><a href="doc-index-T.html">T</a></li><li><a href="doc-index-U.html">U</a></li><li><a href="doc-index-W.html">W</a></li><li><a href="doc-index-45.html">-</a></li><li><a href="doc-index-95.html">_</a></li><li><a href="doc-index-All.html">All</a></li></ul></div><div id="index"><p class="caption">Index - G</p><table><tr><td class="src">GetInventory</td><td class="module"><a href="SwaggerPetstore-API.html#t:GetInventory">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">getInventory</td><td class="module"><a href="SwaggerPetstore-API.html#v:getInventory">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">GetOrderById</td><td class="module"><a href="SwaggerPetstore-API.html#t:GetOrderById">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">getOrderById</td><td class="module"><a href="SwaggerPetstore-API.html#v:getOrderById">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">GetPetById</td><td class="module"><a href="SwaggerPetstore-API.html#t:GetPetById">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">getPetById</td><td class="module"><a href="SwaggerPetstore-API.html#v:getPetById">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">GetUserByName</td><td class="module"><a href="SwaggerPetstore-API.html#t:GetUserByName">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">getUserByName</td><td class="module"><a href="SwaggerPetstore-API.html#v:getUserByName">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr></table></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.17.3</p></div></body></html> </script></head><body><div id="package-header"><ul class="links" id="page-menu"><li><a href="index.html">Contents</a></li><li><a href="doc-index.html">Index</a></li></ul><p class="caption">swagger-petstore-0.1.0.0: Auto-generated swagger-petstore API Client</p></div><div id="content"><div id="alphabet"><ul><li><a href="doc-index-A.html">A</a></li><li><a href="doc-index-B.html">B</a></li><li><a href="doc-index-C.html">C</a></li><li><a href="doc-index-D.html">D</a></li><li><a href="doc-index-E.html">E</a></li><li><a href="doc-index-F.html">F</a></li><li><a href="doc-index-G.html">G</a></li><li><a href="doc-index-H.html">H</a></li><li><a href="doc-index-I.html">I</a></li><li><a href="doc-index-L.html">L</a></li><li><a href="doc-index-M.html">M</a></li><li><a href="doc-index-N.html">N</a></li><li><a href="doc-index-O.html">O</a></li><li><a href="doc-index-P.html">P</a></li><li><a href="doc-index-R.html">R</a></li><li><a href="doc-index-S.html">S</a></li><li><a href="doc-index-T.html">T</a></li><li><a href="doc-index-U.html">U</a></li><li><a href="doc-index-W.html">W</a></li><li><a href="doc-index-45.html">-</a></li><li><a href="doc-index-95.html">_</a></li><li><a href="doc-index-All.html">All</a></li></ul></div><div id="index"><p class="caption">Index - G</p><table><tr><td class="src">GetInventory</td><td class="module"><a href="SwaggerPetstore-API.html#t:GetInventory">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">getInventory</td><td class="module"><a href="SwaggerPetstore-API.html#v:getInventory">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">GetOrderById</td><td class="module"><a href="SwaggerPetstore-API.html#t:GetOrderById">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">getOrderById</td><td class="module"><a href="SwaggerPetstore-API.html#v:getOrderById">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">GetPetById</td><td class="module"><a href="SwaggerPetstore-API.html#t:GetPetById">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">getPetById</td><td class="module"><a href="SwaggerPetstore-API.html#v:getPetById">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">GetUserByName</td><td class="module"><a href="SwaggerPetstore-API.html#t:GetUserByName">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">getUserByName</td><td class="module"><a href="SwaggerPetstore-API.html#v:getUserByName">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr></table></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.17.3</p></div></body></html>

View File

@ -1,4 +1,4 @@
<!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><meta http-equiv="Content-Type" content="text/html; charset=UTF-8" /><title>swagger-petstore-0.1.0.0: Auto-generated swagger-petstore API Client (Index - H)</title><link href="ocean.css" rel="stylesheet" type="text/css" title="Ocean" /><script src="haddock-util.js" type="text/javascript"></script><script src="https://cdn.mathjax.org/mathjax/latest/MathJax.js?config=TeX-AMS-MML_HTMLorMML" type="text/javascript"></script><script type="text/javascript">//<![CDATA[ <!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><meta http-equiv="Content-Type" content="text/html; charset=UTF-8" /><title>swagger-petstore-0.1.0.0: Auto-generated swagger-petstore API Client (Index - H)</title><link href="ocean.css" rel="stylesheet" type="text/css" title="Ocean" /><script src="haddock-util.js" type="text/javascript"></script><script src="https://cdn.mathjax.org/mathjax/latest/MathJax.js?config=TeX-AMS-MML_HTMLorMML" type="text/javascript"></script><script type="text/javascript">//<![CDATA[
window.onload = function () {pageLoad();}; window.onload = function () {pageLoad();};
//]]> //]]>
</script></head><body><div id="package-header"><ul class="links" id="page-menu"><li><a href="index.html">Contents</a></li><li><a href="doc-index.html">Index</a></li></ul><p class="caption">swagger-petstore-0.1.0.0: Auto-generated swagger-petstore API Client</p></div><div id="content"><div id="alphabet"><ul><li><a href="doc-index-A.html">A</a></li><li><a href="doc-index-C.html">C</a></li><li><a href="doc-index-D.html">D</a></li><li><a href="doc-index-F.html">F</a></li><li><a href="doc-index-G.html">G</a></li><li><a href="doc-index-H.html">H</a></li><li><a href="doc-index-I.html">I</a></li><li><a href="doc-index-L.html">L</a></li><li><a href="doc-index-M.html">M</a></li><li><a href="doc-index-N.html">N</a></li><li><a href="doc-index-O.html">O</a></li><li><a href="doc-index-P.html">P</a></li><li><a href="doc-index-R.html">R</a></li><li><a href="doc-index-S.html">S</a></li><li><a href="doc-index-T.html">T</a></li><li><a href="doc-index-U.html">U</a></li><li><a href="doc-index-W.html">W</a></li><li><a href="doc-index-45.html">-</a></li><li><a href="doc-index-95.html">_</a></li><li><a href="doc-index-All.html">All</a></li></ul></div><div id="index"><p class="caption">Index - H</p><table><tr><td class="src">HasBodyParam</td><td class="module"><a href="SwaggerPetstore-API.html#t:HasBodyParam">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">HasOptionalParam</td><td class="module"><a href="SwaggerPetstore-API.html#t:HasOptionalParam">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr></table></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.17.3</p></div></body></html> </script></head><body><div id="package-header"><ul class="links" id="page-menu"><li><a href="index.html">Contents</a></li><li><a href="doc-index.html">Index</a></li></ul><p class="caption">swagger-petstore-0.1.0.0: Auto-generated swagger-petstore API Client</p></div><div id="content"><div id="alphabet"><ul><li><a href="doc-index-A.html">A</a></li><li><a href="doc-index-B.html">B</a></li><li><a href="doc-index-C.html">C</a></li><li><a href="doc-index-D.html">D</a></li><li><a href="doc-index-E.html">E</a></li><li><a href="doc-index-F.html">F</a></li><li><a href="doc-index-G.html">G</a></li><li><a href="doc-index-H.html">H</a></li><li><a href="doc-index-I.html">I</a></li><li><a href="doc-index-L.html">L</a></li><li><a href="doc-index-M.html">M</a></li><li><a href="doc-index-N.html">N</a></li><li><a href="doc-index-O.html">O</a></li><li><a href="doc-index-P.html">P</a></li><li><a href="doc-index-R.html">R</a></li><li><a href="doc-index-S.html">S</a></li><li><a href="doc-index-T.html">T</a></li><li><a href="doc-index-U.html">U</a></li><li><a href="doc-index-W.html">W</a></li><li><a href="doc-index-45.html">-</a></li><li><a href="doc-index-95.html">_</a></li><li><a href="doc-index-All.html">All</a></li></ul></div><div id="index"><p class="caption">Index - H</p><table><tr><td class="src">HasBodyParam</td><td class="module"><a href="SwaggerPetstore-API.html#t:HasBodyParam">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">HasOnlyReadOnly</td><td>&nbsp;</td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="SwaggerPetstore-Model.html#t:HasOnlyReadOnly">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="SwaggerPetstore-Model.html#v:HasOnlyReadOnly">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="src">hasOnlyReadOnlyBar</td><td class="module"><a href="SwaggerPetstore-Model.html#v:hasOnlyReadOnlyBar">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="src">hasOnlyReadOnlyBarL</td><td class="module"><a href="SwaggerPetstore-Lens.html#v:hasOnlyReadOnlyBarL">SwaggerPetstore.Lens</a>, SwaggerPetstore</td></tr><tr><td class="src">hasOnlyReadOnlyFoo</td><td class="module"><a href="SwaggerPetstore-Model.html#v:hasOnlyReadOnlyFoo">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="src">hasOnlyReadOnlyFooL</td><td class="module"><a href="SwaggerPetstore-Lens.html#v:hasOnlyReadOnlyFooL">SwaggerPetstore.Lens</a>, SwaggerPetstore</td></tr><tr><td class="src">HasOptionalParam</td><td class="module"><a href="SwaggerPetstore-API.html#t:HasOptionalParam">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr></table></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.17.3</p></div></body></html>

View File

@ -1,4 +1,4 @@
<!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><meta http-equiv="Content-Type" content="text/html; charset=UTF-8" /><title>swagger-petstore-0.1.0.0: Auto-generated swagger-petstore API Client (Index - I)</title><link href="ocean.css" rel="stylesheet" type="text/css" title="Ocean" /><script src="haddock-util.js" type="text/javascript"></script><script src="https://cdn.mathjax.org/mathjax/latest/MathJax.js?config=TeX-AMS-MML_HTMLorMML" type="text/javascript"></script><script type="text/javascript">//<![CDATA[ <!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><meta http-equiv="Content-Type" content="text/html; charset=UTF-8" /><title>swagger-petstore-0.1.0.0: Auto-generated swagger-petstore API Client (Index - I)</title><link href="ocean.css" rel="stylesheet" type="text/css" title="Ocean" /><script src="haddock-util.js" type="text/javascript"></script><script src="https://cdn.mathjax.org/mathjax/latest/MathJax.js?config=TeX-AMS-MML_HTMLorMML" type="text/javascript"></script><script type="text/javascript">//<![CDATA[
window.onload = function () {pageLoad();}; window.onload = function () {pageLoad();};
//]]> //]]>
</script></head><body><div id="package-header"><ul class="links" id="page-menu"><li><a href="index.html">Contents</a></li><li><a href="doc-index.html">Index</a></li></ul><p class="caption">swagger-petstore-0.1.0.0: Auto-generated swagger-petstore API Client</p></div><div id="content"><div id="alphabet"><ul><li><a href="doc-index-A.html">A</a></li><li><a href="doc-index-C.html">C</a></li><li><a href="doc-index-D.html">D</a></li><li><a href="doc-index-F.html">F</a></li><li><a href="doc-index-G.html">G</a></li><li><a href="doc-index-H.html">H</a></li><li><a href="doc-index-I.html">I</a></li><li><a href="doc-index-L.html">L</a></li><li><a href="doc-index-M.html">M</a></li><li><a href="doc-index-N.html">N</a></li><li><a href="doc-index-O.html">O</a></li><li><a href="doc-index-P.html">P</a></li><li><a href="doc-index-R.html">R</a></li><li><a href="doc-index-S.html">S</a></li><li><a href="doc-index-T.html">T</a></li><li><a href="doc-index-U.html">U</a></li><li><a href="doc-index-W.html">W</a></li><li><a href="doc-index-45.html">-</a></li><li><a href="doc-index-95.html">_</a></li><li><a href="doc-index-All.html">All</a></li></ul></div><div id="index"><p class="caption">Index - I</p><table><tr><td class="src">initLogContext</td><td class="module"><a href="SwaggerPetstore-Logging.html#v:initLogContext">SwaggerPetstore.Logging</a>, SwaggerPetstore</td></tr><tr><td class="src">InitRequest</td><td>&nbsp;</td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="SwaggerPetstore-Client.html#t:InitRequest">SwaggerPetstore.Client</a>, SwaggerPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="SwaggerPetstore-Client.html#v:InitRequest">SwaggerPetstore.Client</a>, SwaggerPetstore</td></tr></table></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.17.3</p></div></body></html> </script></head><body><div id="package-header"><ul class="links" id="page-menu"><li><a href="index.html">Contents</a></li><li><a href="doc-index.html">Index</a></li></ul><p class="caption">swagger-petstore-0.1.0.0: Auto-generated swagger-petstore API Client</p></div><div id="content"><div id="alphabet"><ul><li><a href="doc-index-A.html">A</a></li><li><a href="doc-index-B.html">B</a></li><li><a href="doc-index-C.html">C</a></li><li><a href="doc-index-D.html">D</a></li><li><a href="doc-index-E.html">E</a></li><li><a href="doc-index-F.html">F</a></li><li><a href="doc-index-G.html">G</a></li><li><a href="doc-index-H.html">H</a></li><li><a href="doc-index-I.html">I</a></li><li><a href="doc-index-L.html">L</a></li><li><a href="doc-index-M.html">M</a></li><li><a href="doc-index-N.html">N</a></li><li><a href="doc-index-O.html">O</a></li><li><a href="doc-index-P.html">P</a></li><li><a href="doc-index-R.html">R</a></li><li><a href="doc-index-S.html">S</a></li><li><a href="doc-index-T.html">T</a></li><li><a href="doc-index-U.html">U</a></li><li><a href="doc-index-W.html">W</a></li><li><a href="doc-index-45.html">-</a></li><li><a href="doc-index-95.html">_</a></li><li><a href="doc-index-All.html">All</a></li></ul></div><div id="index"><p class="caption">Index - I</p><table><tr><td class="src">initLogContext</td><td class="module"><a href="SwaggerPetstore-Logging.html#v:initLogContext">SwaggerPetstore.Logging</a>, SwaggerPetstore</td></tr><tr><td class="src">InitRequest</td><td>&nbsp;</td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="SwaggerPetstore-Client.html#t:InitRequest">SwaggerPetstore.Client</a>, SwaggerPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="SwaggerPetstore-Client.html#v:InitRequest">SwaggerPetstore.Client</a>, SwaggerPetstore</td></tr><tr><td class="src">Int32</td><td>&nbsp;</td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="SwaggerPetstore-API.html#t:Int32">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="SwaggerPetstore-API.html#v:Int32">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">Int64</td><td>&nbsp;</td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="SwaggerPetstore-API.html#t:Int64">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="SwaggerPetstore-API.html#v:Int64">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr></table></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.17.3</p></div></body></html>

View File

@ -1,4 +1,4 @@
<!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><meta http-equiv="Content-Type" content="text/html; charset=UTF-8" /><title>swagger-petstore-0.1.0.0: Auto-generated swagger-petstore API Client (Index - L)</title><link href="ocean.css" rel="stylesheet" type="text/css" title="Ocean" /><script src="haddock-util.js" type="text/javascript"></script><script src="https://cdn.mathjax.org/mathjax/latest/MathJax.js?config=TeX-AMS-MML_HTMLorMML" type="text/javascript"></script><script type="text/javascript">//<![CDATA[ <!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><meta http-equiv="Content-Type" content="text/html; charset=UTF-8" /><title>swagger-petstore-0.1.0.0: Auto-generated swagger-petstore API Client (Index - L)</title><link href="ocean.css" rel="stylesheet" type="text/css" title="Ocean" /><script src="haddock-util.js" type="text/javascript"></script><script src="https://cdn.mathjax.org/mathjax/latest/MathJax.js?config=TeX-AMS-MML_HTMLorMML" type="text/javascript"></script><script type="text/javascript">//<![CDATA[
window.onload = function () {pageLoad();}; window.onload = function () {pageLoad();};
//]]> //]]>
</script></head><body><div id="package-header"><ul class="links" id="page-menu"><li><a href="index.html">Contents</a></li><li><a href="doc-index.html">Index</a></li></ul><p class="caption">swagger-petstore-0.1.0.0: Auto-generated swagger-petstore API Client</p></div><div id="content"><div id="alphabet"><ul><li><a href="doc-index-A.html">A</a></li><li><a href="doc-index-C.html">C</a></li><li><a href="doc-index-D.html">D</a></li><li><a href="doc-index-F.html">F</a></li><li><a href="doc-index-G.html">G</a></li><li><a href="doc-index-H.html">H</a></li><li><a href="doc-index-I.html">I</a></li><li><a href="doc-index-L.html">L</a></li><li><a href="doc-index-M.html">M</a></li><li><a href="doc-index-N.html">N</a></li><li><a href="doc-index-O.html">O</a></li><li><a href="doc-index-P.html">P</a></li><li><a href="doc-index-R.html">R</a></li><li><a href="doc-index-S.html">S</a></li><li><a href="doc-index-T.html">T</a></li><li><a href="doc-index-U.html">U</a></li><li><a href="doc-index-W.html">W</a></li><li><a href="doc-index-45.html">-</a></li><li><a href="doc-index-95.html">_</a></li><li><a href="doc-index-All.html">All</a></li></ul></div><div id="index"><p class="caption">Index - L</p><table><tr><td class="src">Lens_</td><td class="module"><a href="SwaggerPetstore-Lens.html#t:Lens_">SwaggerPetstore.Lens</a>, SwaggerPetstore</td></tr><tr><td class="src">Lens_'</td><td class="module"><a href="SwaggerPetstore-Lens.html#t:Lens_-39-">SwaggerPetstore.Lens</a>, SwaggerPetstore</td></tr><tr><td class="src">levelDebug</td><td class="module"><a href="SwaggerPetstore-Logging.html#v:levelDebug">SwaggerPetstore.Logging</a>, SwaggerPetstore</td></tr><tr><td class="src">levelError</td><td class="module"><a href="SwaggerPetstore-Logging.html#v:levelError">SwaggerPetstore.Logging</a>, SwaggerPetstore</td></tr><tr><td class="src">levelInfo</td><td class="module"><a href="SwaggerPetstore-Logging.html#v:levelInfo">SwaggerPetstore.Logging</a>, SwaggerPetstore</td></tr><tr><td class="src">LogContext</td><td class="module"><a href="SwaggerPetstore-Logging.html#t:LogContext">SwaggerPetstore.Logging</a>, SwaggerPetstore</td></tr><tr><td class="src">logExceptions</td><td class="module"><a href="SwaggerPetstore-Logging.html#v:logExceptions">SwaggerPetstore.Logging</a>, SwaggerPetstore</td></tr><tr><td class="src">LogExec</td><td class="module"><a href="SwaggerPetstore-Logging.html#t:LogExec">SwaggerPetstore.Logging</a>, SwaggerPetstore</td></tr><tr><td class="src">LogExecWithContext</td><td class="module"><a href="SwaggerPetstore-Logging.html#t:LogExecWithContext">SwaggerPetstore.Logging</a>, SwaggerPetstore</td></tr><tr><td class="src">LoginUser</td><td class="module"><a href="SwaggerPetstore-API.html#t:LoginUser">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">loginUser</td><td class="module"><a href="SwaggerPetstore-API.html#v:loginUser">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">LogLevel</td><td class="module"><a href="SwaggerPetstore-Logging.html#t:LogLevel">SwaggerPetstore.Logging</a>, SwaggerPetstore</td></tr><tr><td class="src">LogoutUser</td><td class="module"><a href="SwaggerPetstore-API.html#t:LogoutUser">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">logoutUser</td><td class="module"><a href="SwaggerPetstore-API.html#v:logoutUser">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr></table></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.17.3</p></div></body></html> </script></head><body><div id="package-header"><ul class="links" id="page-menu"><li><a href="index.html">Contents</a></li><li><a href="doc-index.html">Index</a></li></ul><p class="caption">swagger-petstore-0.1.0.0: Auto-generated swagger-petstore API Client</p></div><div id="content"><div id="alphabet"><ul><li><a href="doc-index-A.html">A</a></li><li><a href="doc-index-B.html">B</a></li><li><a href="doc-index-C.html">C</a></li><li><a href="doc-index-D.html">D</a></li><li><a href="doc-index-E.html">E</a></li><li><a href="doc-index-F.html">F</a></li><li><a href="doc-index-G.html">G</a></li><li><a href="doc-index-H.html">H</a></li><li><a href="doc-index-I.html">I</a></li><li><a href="doc-index-L.html">L</a></li><li><a href="doc-index-M.html">M</a></li><li><a href="doc-index-N.html">N</a></li><li><a href="doc-index-O.html">O</a></li><li><a href="doc-index-P.html">P</a></li><li><a href="doc-index-R.html">R</a></li><li><a href="doc-index-S.html">S</a></li><li><a href="doc-index-T.html">T</a></li><li><a href="doc-index-U.html">U</a></li><li><a href="doc-index-W.html">W</a></li><li><a href="doc-index-45.html">-</a></li><li><a href="doc-index-95.html">_</a></li><li><a href="doc-index-All.html">All</a></li></ul></div><div id="index"><p class="caption">Index - L</p><table><tr><td class="src">Lens_</td><td class="module"><a href="SwaggerPetstore-Lens.html#t:Lens_">SwaggerPetstore.Lens</a>, SwaggerPetstore</td></tr><tr><td class="src">Lens_'</td><td class="module"><a href="SwaggerPetstore-Lens.html#t:Lens_-39-">SwaggerPetstore.Lens</a>, SwaggerPetstore</td></tr><tr><td class="src">levelDebug</td><td class="module"><a href="SwaggerPetstore-Logging.html#v:levelDebug">SwaggerPetstore.Logging</a>, SwaggerPetstore</td></tr><tr><td class="src">levelError</td><td class="module"><a href="SwaggerPetstore-Logging.html#v:levelError">SwaggerPetstore.Logging</a>, SwaggerPetstore</td></tr><tr><td class="src">levelInfo</td><td class="module"><a href="SwaggerPetstore-Logging.html#v:levelInfo">SwaggerPetstore.Logging</a>, SwaggerPetstore</td></tr><tr><td class="src">LogContext</td><td class="module"><a href="SwaggerPetstore-Logging.html#t:LogContext">SwaggerPetstore.Logging</a>, SwaggerPetstore</td></tr><tr><td class="src">logExceptions</td><td class="module"><a href="SwaggerPetstore-Logging.html#v:logExceptions">SwaggerPetstore.Logging</a>, SwaggerPetstore</td></tr><tr><td class="src">LogExec</td><td class="module"><a href="SwaggerPetstore-Logging.html#t:LogExec">SwaggerPetstore.Logging</a>, SwaggerPetstore</td></tr><tr><td class="src">LogExecWithContext</td><td class="module"><a href="SwaggerPetstore-Logging.html#t:LogExecWithContext">SwaggerPetstore.Logging</a>, SwaggerPetstore</td></tr><tr><td class="src">LoginUser</td><td class="module"><a href="SwaggerPetstore-API.html#t:LoginUser">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">loginUser</td><td class="module"><a href="SwaggerPetstore-API.html#v:loginUser">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">LogLevel</td><td class="module"><a href="SwaggerPetstore-Logging.html#t:LogLevel">SwaggerPetstore.Logging</a>, SwaggerPetstore</td></tr><tr><td class="src">LogoutUser</td><td class="module"><a href="SwaggerPetstore-API.html#t:LogoutUser">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">logoutUser</td><td class="module"><a href="SwaggerPetstore-API.html#v:logoutUser">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr></table></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.17.3</p></div></body></html>

File diff suppressed because one or more lines are too long

View File

@ -1,4 +1,4 @@
<!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><meta http-equiv="Content-Type" content="text/html; charset=UTF-8" /><title>swagger-petstore-0.1.0.0: Auto-generated swagger-petstore API Client (Index - N)</title><link href="ocean.css" rel="stylesheet" type="text/css" title="Ocean" /><script src="haddock-util.js" type="text/javascript"></script><script src="https://cdn.mathjax.org/mathjax/latest/MathJax.js?config=TeX-AMS-MML_HTMLorMML" type="text/javascript"></script><script type="text/javascript">//<![CDATA[ <!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><meta http-equiv="Content-Type" content="text/html; charset=UTF-8" /><title>swagger-petstore-0.1.0.0: Auto-generated swagger-petstore API Client (Index - N)</title><link href="ocean.css" rel="stylesheet" type="text/css" title="Ocean" /><script src="haddock-util.js" type="text/javascript"></script><script src="https://cdn.mathjax.org/mathjax/latest/MathJax.js?config=TeX-AMS-MML_HTMLorMML" type="text/javascript"></script><script type="text/javascript">//<![CDATA[
window.onload = function () {pageLoad();}; window.onload = function () {pageLoad();};
//]]> //]]>
</script></head><body><div id="package-header"><ul class="links" id="page-menu"><li><a href="index.html">Contents</a></li><li><a href="doc-index.html">Index</a></li></ul><p class="caption">swagger-petstore-0.1.0.0: Auto-generated swagger-petstore API Client</p></div><div id="content"><div id="alphabet"><ul><li><a href="doc-index-A.html">A</a></li><li><a href="doc-index-C.html">C</a></li><li><a href="doc-index-D.html">D</a></li><li><a href="doc-index-F.html">F</a></li><li><a href="doc-index-G.html">G</a></li><li><a href="doc-index-H.html">H</a></li><li><a href="doc-index-I.html">I</a></li><li><a href="doc-index-L.html">L</a></li><li><a href="doc-index-M.html">M</a></li><li><a href="doc-index-N.html">N</a></li><li><a href="doc-index-O.html">O</a></li><li><a href="doc-index-P.html">P</a></li><li><a href="doc-index-R.html">R</a></li><li><a href="doc-index-S.html">S</a></li><li><a href="doc-index-T.html">T</a></li><li><a href="doc-index-U.html">U</a></li><li><a href="doc-index-W.html">W</a></li><li><a href="doc-index-45.html">-</a></li><li><a href="doc-index-95.html">_</a></li><li><a href="doc-index-All.html">All</a></li></ul></div><div id="index"><p class="caption">Index - N</p><table><tr><td class="src">Name</td><td>&nbsp;</td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="SwaggerPetstore-API.html#t:Name">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="SwaggerPetstore-API.html#v:Name">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">newConfig</td><td class="module"><a href="SwaggerPetstore-Client.html#v:newConfig">SwaggerPetstore.Client</a>, SwaggerPetstore</td></tr><tr><td class="src">NoContent</td><td>&nbsp;</td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="SwaggerPetstore-MimeTypes.html#t:NoContent">SwaggerPetstore.MimeTypes</a>, SwaggerPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="SwaggerPetstore-MimeTypes.html#v:NoContent">SwaggerPetstore.MimeTypes</a>, SwaggerPetstore</td></tr></table></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.17.3</p></div></body></html> </script></head><body><div id="package-header"><ul class="links" id="page-menu"><li><a href="index.html">Contents</a></li><li><a href="doc-index.html">Index</a></li></ul><p class="caption">swagger-petstore-0.1.0.0: Auto-generated swagger-petstore API Client</p></div><div id="content"><div id="alphabet"><ul><li><a href="doc-index-A.html">A</a></li><li><a href="doc-index-B.html">B</a></li><li><a href="doc-index-C.html">C</a></li><li><a href="doc-index-D.html">D</a></li><li><a href="doc-index-E.html">E</a></li><li><a href="doc-index-F.html">F</a></li><li><a href="doc-index-G.html">G</a></li><li><a href="doc-index-H.html">H</a></li><li><a href="doc-index-I.html">I</a></li><li><a href="doc-index-L.html">L</a></li><li><a href="doc-index-M.html">M</a></li><li><a href="doc-index-N.html">N</a></li><li><a href="doc-index-O.html">O</a></li><li><a href="doc-index-P.html">P</a></li><li><a href="doc-index-R.html">R</a></li><li><a href="doc-index-S.html">S</a></li><li><a href="doc-index-T.html">T</a></li><li><a href="doc-index-U.html">U</a></li><li><a href="doc-index-W.html">W</a></li><li><a href="doc-index-45.html">-</a></li><li><a href="doc-index-95.html">_</a></li><li><a href="doc-index-All.html">All</a></li></ul></div><div id="index"><p class="caption">Index - N</p><table><tr><td class="src">Name</td><td>&nbsp;</td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="SwaggerPetstore-Model.html#t:Name">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="SwaggerPetstore-Model.html#v:Name">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="src">name123Number</td><td class="module"><a href="SwaggerPetstore-Model.html#v:name123Number">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="src">name123NumberL</td><td class="module"><a href="SwaggerPetstore-Lens.html#v:name123NumberL">SwaggerPetstore.Lens</a>, SwaggerPetstore</td></tr><tr><td class="src">Name2</td><td>&nbsp;</td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="SwaggerPetstore-API.html#t:Name2">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="SwaggerPetstore-API.html#v:Name2">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">nameName</td><td class="module"><a href="SwaggerPetstore-Model.html#v:nameName">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="src">nameNameL</td><td class="module"><a href="SwaggerPetstore-Lens.html#v:nameNameL">SwaggerPetstore.Lens</a>, SwaggerPetstore</td></tr><tr><td class="src">nameProperty</td><td class="module"><a href="SwaggerPetstore-Model.html#v:nameProperty">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="src">namePropertyL</td><td class="module"><a href="SwaggerPetstore-Lens.html#v:namePropertyL">SwaggerPetstore.Lens</a>, SwaggerPetstore</td></tr><tr><td class="src">nameSnakeCase</td><td class="module"><a href="SwaggerPetstore-Model.html#v:nameSnakeCase">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="src">nameSnakeCaseL</td><td class="module"><a href="SwaggerPetstore-Lens.html#v:nameSnakeCaseL">SwaggerPetstore.Lens</a>, SwaggerPetstore</td></tr><tr><td class="src">newConfig</td><td class="module"><a href="SwaggerPetstore-Client.html#v:newConfig">SwaggerPetstore.Client</a>, SwaggerPetstore</td></tr><tr><td class="src">NoContent</td><td>&nbsp;</td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="SwaggerPetstore-MimeTypes.html#t:NoContent">SwaggerPetstore.MimeTypes</a>, SwaggerPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="SwaggerPetstore-MimeTypes.html#v:NoContent">SwaggerPetstore.MimeTypes</a>, SwaggerPetstore</td></tr><tr><td class="src">NumberOnly</td><td>&nbsp;</td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="SwaggerPetstore-Model.html#t:NumberOnly">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="SwaggerPetstore-Model.html#v:NumberOnly">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="src">numberOnlyJustNumber</td><td class="module"><a href="SwaggerPetstore-Model.html#v:numberOnlyJustNumber">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="src">numberOnlyJustNumberL</td><td class="module"><a href="SwaggerPetstore-Lens.html#v:numberOnlyJustNumberL">SwaggerPetstore.Lens</a>, SwaggerPetstore</td></tr></table></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.17.3</p></div></body></html>

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

View File

@ -1,4 +1,4 @@
<!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><meta http-equiv="Content-Type" content="text/html; charset=UTF-8" /><title>swagger-petstore-0.1.0.0: Auto-generated swagger-petstore API Client (Index - R)</title><link href="ocean.css" rel="stylesheet" type="text/css" title="Ocean" /><script src="haddock-util.js" type="text/javascript"></script><script src="https://cdn.mathjax.org/mathjax/latest/MathJax.js?config=TeX-AMS-MML_HTMLorMML" type="text/javascript"></script><script type="text/javascript">//<![CDATA[ <!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><meta http-equiv="Content-Type" content="text/html; charset=UTF-8" /><title>swagger-petstore-0.1.0.0: Auto-generated swagger-petstore API Client (Index - R)</title><link href="ocean.css" rel="stylesheet" type="text/css" title="Ocean" /><script src="haddock-util.js" type="text/javascript"></script><script src="https://cdn.mathjax.org/mathjax/latest/MathJax.js?config=TeX-AMS-MML_HTMLorMML" type="text/javascript"></script><script type="text/javascript">//<![CDATA[
window.onload = function () {pageLoad();}; window.onload = function () {pageLoad();};
//]]> //]]>
</script></head><body><div id="package-header"><ul class="links" id="page-menu"><li><a href="index.html">Contents</a></li><li><a href="doc-index.html">Index</a></li></ul><p class="caption">swagger-petstore-0.1.0.0: Auto-generated swagger-petstore API Client</p></div><div id="content"><div id="alphabet"><ul><li><a href="doc-index-A.html">A</a></li><li><a href="doc-index-C.html">C</a></li><li><a href="doc-index-D.html">D</a></li><li><a href="doc-index-F.html">F</a></li><li><a href="doc-index-G.html">G</a></li><li><a href="doc-index-H.html">H</a></li><li><a href="doc-index-I.html">I</a></li><li><a href="doc-index-L.html">L</a></li><li><a href="doc-index-M.html">M</a></li><li><a href="doc-index-N.html">N</a></li><li><a href="doc-index-O.html">O</a></li><li><a href="doc-index-P.html">P</a></li><li><a href="doc-index-R.html">R</a></li><li><a href="doc-index-S.html">S</a></li><li><a href="doc-index-T.html">T</a></li><li><a href="doc-index-U.html">U</a></li><li><a href="doc-index-W.html">W</a></li><li><a href="doc-index-45.html">-</a></li><li><a href="doc-index-95.html">_</a></li><li><a href="doc-index-All.html">All</a></li></ul></div><div id="index"><p class="caption">Index - R</p><table><tr><td class="src">removeHeader</td><td class="module"><a href="SwaggerPetstore-API.html#v:removeHeader">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">rMethod</td><td class="module"><a href="SwaggerPetstore-API.html#v:rMethod">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">rMethodL</td><td class="module"><a href="SwaggerPetstore-API.html#v:rMethodL">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">rParams</td><td class="module"><a href="SwaggerPetstore-API.html#v:rParams">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">rParamsL</td><td class="module"><a href="SwaggerPetstore-API.html#v:rParamsL">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">runConfigLog</td><td class="module"><a href="SwaggerPetstore-Client.html#v:runConfigLog">SwaggerPetstore.Client</a>, SwaggerPetstore</td></tr><tr><td class="src">runConfigLogWithExceptions</td><td class="module"><a href="SwaggerPetstore-Client.html#v:runConfigLogWithExceptions">SwaggerPetstore.Client</a>, SwaggerPetstore</td></tr><tr><td class="src">runDefaultLogExecWithContext</td><td class="module"><a href="SwaggerPetstore-Logging.html#v:runDefaultLogExecWithContext">SwaggerPetstore.Logging</a>, SwaggerPetstore</td></tr><tr><td class="src">runNullLogExec</td><td class="module"><a href="SwaggerPetstore-Logging.html#v:runNullLogExec">SwaggerPetstore.Logging</a>, SwaggerPetstore</td></tr><tr><td class="src">rUrlPath</td><td class="module"><a href="SwaggerPetstore-API.html#v:rUrlPath">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">rUrlPathL</td><td class="module"><a href="SwaggerPetstore-API.html#v:rUrlPathL">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr></table></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.17.3</p></div></body></html> </script></head><body><div id="package-header"><ul class="links" id="page-menu"><li><a href="index.html">Contents</a></li><li><a href="doc-index.html">Index</a></li></ul><p class="caption">swagger-petstore-0.1.0.0: Auto-generated swagger-petstore API Client</p></div><div id="content"><div id="alphabet"><ul><li><a href="doc-index-A.html">A</a></li><li><a href="doc-index-B.html">B</a></li><li><a href="doc-index-C.html">C</a></li><li><a href="doc-index-D.html">D</a></li><li><a href="doc-index-E.html">E</a></li><li><a href="doc-index-F.html">F</a></li><li><a href="doc-index-G.html">G</a></li><li><a href="doc-index-H.html">H</a></li><li><a href="doc-index-I.html">I</a></li><li><a href="doc-index-L.html">L</a></li><li><a href="doc-index-M.html">M</a></li><li><a href="doc-index-N.html">N</a></li><li><a href="doc-index-O.html">O</a></li><li><a href="doc-index-P.html">P</a></li><li><a href="doc-index-R.html">R</a></li><li><a href="doc-index-S.html">S</a></li><li><a href="doc-index-T.html">T</a></li><li><a href="doc-index-U.html">U</a></li><li><a href="doc-index-W.html">W</a></li><li><a href="doc-index-45.html">-</a></li><li><a href="doc-index-95.html">_</a></li><li><a href="doc-index-All.html">All</a></li></ul></div><div id="index"><p class="caption">Index - R</p><table><tr><td class="src">ReadOnlyFirst</td><td>&nbsp;</td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="SwaggerPetstore-Model.html#t:ReadOnlyFirst">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="SwaggerPetstore-Model.html#v:ReadOnlyFirst">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="src">readOnlyFirstBar</td><td class="module"><a href="SwaggerPetstore-Model.html#v:readOnlyFirstBar">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="src">readOnlyFirstBarL</td><td class="module"><a href="SwaggerPetstore-Lens.html#v:readOnlyFirstBarL">SwaggerPetstore.Lens</a>, SwaggerPetstore</td></tr><tr><td class="src">readOnlyFirstBaz</td><td class="module"><a href="SwaggerPetstore-Model.html#v:readOnlyFirstBaz">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="src">readOnlyFirstBazL</td><td class="module"><a href="SwaggerPetstore-Lens.html#v:readOnlyFirstBazL">SwaggerPetstore.Lens</a>, SwaggerPetstore</td></tr><tr><td class="src">removeHeader</td><td class="module"><a href="SwaggerPetstore-API.html#v:removeHeader">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">rMethod</td><td class="module"><a href="SwaggerPetstore-API.html#v:rMethod">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">rMethodL</td><td class="module"><a href="SwaggerPetstore-API.html#v:rMethodL">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">rParams</td><td class="module"><a href="SwaggerPetstore-API.html#v:rParams">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">rParamsL</td><td class="module"><a href="SwaggerPetstore-API.html#v:rParamsL">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">runConfigLog</td><td class="module"><a href="SwaggerPetstore-Client.html#v:runConfigLog">SwaggerPetstore.Client</a>, SwaggerPetstore</td></tr><tr><td class="src">runConfigLogWithExceptions</td><td class="module"><a href="SwaggerPetstore-Client.html#v:runConfigLogWithExceptions">SwaggerPetstore.Client</a>, SwaggerPetstore</td></tr><tr><td class="src">runDefaultLogExecWithContext</td><td class="module"><a href="SwaggerPetstore-Logging.html#v:runDefaultLogExecWithContext">SwaggerPetstore.Logging</a>, SwaggerPetstore</td></tr><tr><td class="src">runNullLogExec</td><td class="module"><a href="SwaggerPetstore-Logging.html#v:runNullLogExec">SwaggerPetstore.Logging</a>, SwaggerPetstore</td></tr><tr><td class="src">rUrlPath</td><td class="module"><a href="SwaggerPetstore-API.html#v:rUrlPath">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">rUrlPathL</td><td class="module"><a href="SwaggerPetstore-API.html#v:rUrlPathL">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr></table></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.17.3</p></div></body></html>

View File

@ -1,4 +1,4 @@
<!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><meta http-equiv="Content-Type" content="text/html; charset=UTF-8" /><title>swagger-petstore-0.1.0.0: Auto-generated swagger-petstore API Client (Index - S)</title><link href="ocean.css" rel="stylesheet" type="text/css" title="Ocean" /><script src="haddock-util.js" type="text/javascript"></script><script src="https://cdn.mathjax.org/mathjax/latest/MathJax.js?config=TeX-AMS-MML_HTMLorMML" type="text/javascript"></script><script type="text/javascript">//<![CDATA[ <!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><meta http-equiv="Content-Type" content="text/html; charset=UTF-8" /><title>swagger-petstore-0.1.0.0: Auto-generated swagger-petstore API Client (Index - S)</title><link href="ocean.css" rel="stylesheet" type="text/css" title="Ocean" /><script src="haddock-util.js" type="text/javascript"></script><script src="https://cdn.mathjax.org/mathjax/latest/MathJax.js?config=TeX-AMS-MML_HTMLorMML" type="text/javascript"></script><script type="text/javascript">//<![CDATA[
window.onload = function () {pageLoad();}; window.onload = function () {pageLoad();};
//]]> //]]>
</script></head><body><div id="package-header"><ul class="links" id="page-menu"><li><a href="index.html">Contents</a></li><li><a href="doc-index.html">Index</a></li></ul><p class="caption">swagger-petstore-0.1.0.0: Auto-generated swagger-petstore API Client</p></div><div id="content"><div id="alphabet"><ul><li><a href="doc-index-A.html">A</a></li><li><a href="doc-index-C.html">C</a></li><li><a href="doc-index-D.html">D</a></li><li><a href="doc-index-F.html">F</a></li><li><a href="doc-index-G.html">G</a></li><li><a href="doc-index-H.html">H</a></li><li><a href="doc-index-I.html">I</a></li><li><a href="doc-index-L.html">L</a></li><li><a href="doc-index-M.html">M</a></li><li><a href="doc-index-N.html">N</a></li><li><a href="doc-index-O.html">O</a></li><li><a href="doc-index-P.html">P</a></li><li><a href="doc-index-R.html">R</a></li><li><a href="doc-index-S.html">S</a></li><li><a href="doc-index-T.html">T</a></li><li><a href="doc-index-U.html">U</a></li><li><a href="doc-index-W.html">W</a></li><li><a href="doc-index-45.html">-</a></li><li><a href="doc-index-95.html">_</a></li><li><a href="doc-index-All.html">All</a></li></ul></div><div id="index"><p class="caption">Index - S</p><table><tr><td class="src">setBodyParam</td><td class="module"><a href="SwaggerPetstore-API.html#v:setBodyParam">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">setHeader</td><td class="module"><a href="SwaggerPetstore-API.html#v:setHeader">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">SpaceSeparated</td><td class="module"><a href="SwaggerPetstore-API.html#v:SpaceSeparated">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">Status</td><td>&nbsp;</td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="SwaggerPetstore-API.html#t:Status">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="SwaggerPetstore-API.html#v:Status">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">stderrLoggingContext</td><td class="module"><a href="SwaggerPetstore-Logging.html#v:stderrLoggingContext">SwaggerPetstore.Logging</a>, SwaggerPetstore</td></tr><tr><td class="src">stderrLoggingExec</td><td class="module"><a href="SwaggerPetstore-Logging.html#v:stderrLoggingExec">SwaggerPetstore.Logging</a>, SwaggerPetstore</td></tr><tr><td class="src">stdoutLoggingContext</td><td class="module"><a href="SwaggerPetstore-Logging.html#v:stdoutLoggingContext">SwaggerPetstore.Logging</a>, SwaggerPetstore</td></tr><tr><td class="src">stdoutLoggingExec</td><td class="module"><a href="SwaggerPetstore-Logging.html#v:stdoutLoggingExec">SwaggerPetstore.Logging</a>, SwaggerPetstore</td></tr><tr><td class="src">SwaggerPetstoreConfig</td><td>&nbsp;</td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="SwaggerPetstore-Client.html#t:SwaggerPetstoreConfig">SwaggerPetstore.Client</a>, SwaggerPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="SwaggerPetstore-Client.html#v:SwaggerPetstoreConfig">SwaggerPetstore.Client</a>, SwaggerPetstore</td></tr><tr><td class="src">SwaggerPetstoreRequest</td><td>&nbsp;</td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="SwaggerPetstore-API.html#t:SwaggerPetstoreRequest">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="SwaggerPetstore-API.html#v:SwaggerPetstoreRequest">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr></table></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.17.3</p></div></body></html> </script></head><body><div id="package-header"><ul class="links" id="page-menu"><li><a href="index.html">Contents</a></li><li><a href="doc-index.html">Index</a></li></ul><p class="caption">swagger-petstore-0.1.0.0: Auto-generated swagger-petstore API Client</p></div><div id="content"><div id="alphabet"><ul><li><a href="doc-index-A.html">A</a></li><li><a href="doc-index-B.html">B</a></li><li><a href="doc-index-C.html">C</a></li><li><a href="doc-index-D.html">D</a></li><li><a href="doc-index-E.html">E</a></li><li><a href="doc-index-F.html">F</a></li><li><a href="doc-index-G.html">G</a></li><li><a href="doc-index-H.html">H</a></li><li><a href="doc-index-I.html">I</a></li><li><a href="doc-index-L.html">L</a></li><li><a href="doc-index-M.html">M</a></li><li><a href="doc-index-N.html">N</a></li><li><a href="doc-index-O.html">O</a></li><li><a href="doc-index-P.html">P</a></li><li><a href="doc-index-R.html">R</a></li><li><a href="doc-index-S.html">S</a></li><li><a href="doc-index-T.html">T</a></li><li><a href="doc-index-U.html">U</a></li><li><a href="doc-index-W.html">W</a></li><li><a href="doc-index-45.html">-</a></li><li><a href="doc-index-95.html">_</a></li><li><a href="doc-index-All.html">All</a></li></ul></div><div id="index"><p class="caption">Index - S</p><table><tr><td class="src">setBodyParam</td><td class="module"><a href="SwaggerPetstore-API.html#v:setBodyParam">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">setHeader</td><td class="module"><a href="SwaggerPetstore-API.html#v:setHeader">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">SpaceSeparated</td><td class="module"><a href="SwaggerPetstore-API.html#v:SpaceSeparated">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">SpecialModelName</td><td>&nbsp;</td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="SwaggerPetstore-Model.html#t:SpecialModelName">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="SwaggerPetstore-Model.html#v:SpecialModelName">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="src">specialModelNameSpecialPropertyName</td><td class="module"><a href="SwaggerPetstore-Model.html#v:specialModelNameSpecialPropertyName">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="src">specialModelNameSpecialPropertyNameL</td><td class="module"><a href="SwaggerPetstore-Lens.html#v:specialModelNameSpecialPropertyNameL">SwaggerPetstore.Lens</a>, SwaggerPetstore</td></tr><tr><td class="src">Status</td><td>&nbsp;</td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="SwaggerPetstore-API.html#t:Status">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="SwaggerPetstore-API.html#v:Status">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">stderrLoggingContext</td><td class="module"><a href="SwaggerPetstore-Logging.html#v:stderrLoggingContext">SwaggerPetstore.Logging</a>, SwaggerPetstore</td></tr><tr><td class="src">stderrLoggingExec</td><td class="module"><a href="SwaggerPetstore-Logging.html#v:stderrLoggingExec">SwaggerPetstore.Logging</a>, SwaggerPetstore</td></tr><tr><td class="src">stdoutLoggingContext</td><td class="module"><a href="SwaggerPetstore-Logging.html#v:stdoutLoggingContext">SwaggerPetstore.Logging</a>, SwaggerPetstore</td></tr><tr><td class="src">stdoutLoggingExec</td><td class="module"><a href="SwaggerPetstore-Logging.html#v:stdoutLoggingExec">SwaggerPetstore.Logging</a>, SwaggerPetstore</td></tr><tr><td class="src">SwaggerPetstoreConfig</td><td>&nbsp;</td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="SwaggerPetstore-Client.html#t:SwaggerPetstoreConfig">SwaggerPetstore.Client</a>, SwaggerPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="SwaggerPetstore-Client.html#v:SwaggerPetstoreConfig">SwaggerPetstore.Client</a>, SwaggerPetstore</td></tr><tr><td class="src">SwaggerPetstoreRequest</td><td>&nbsp;</td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="SwaggerPetstore-API.html#t:SwaggerPetstoreRequest">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="SwaggerPetstore-API.html#v:SwaggerPetstoreRequest">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr></table></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.17.3</p></div></body></html>

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

View File

@ -1,4 +1,4 @@
<!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><meta http-equiv="Content-Type" content="text/html; charset=UTF-8" /><title>swagger-petstore-0.1.0.0: Auto-generated swagger-petstore API Client (Index - W)</title><link href="ocean.css" rel="stylesheet" type="text/css" title="Ocean" /><script src="haddock-util.js" type="text/javascript"></script><script src="https://cdn.mathjax.org/mathjax/latest/MathJax.js?config=TeX-AMS-MML_HTMLorMML" type="text/javascript"></script><script type="text/javascript">//<![CDATA[ <!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><meta http-equiv="Content-Type" content="text/html; charset=UTF-8" /><title>swagger-petstore-0.1.0.0: Auto-generated swagger-petstore API Client (Index - W)</title><link href="ocean.css" rel="stylesheet" type="text/css" title="Ocean" /><script src="haddock-util.js" type="text/javascript"></script><script src="https://cdn.mathjax.org/mathjax/latest/MathJax.js?config=TeX-AMS-MML_HTMLorMML" type="text/javascript"></script><script type="text/javascript">//<![CDATA[
window.onload = function () {pageLoad();}; window.onload = function () {pageLoad();};
//]]> //]]>
</script></head><body><div id="package-header"><ul class="links" id="page-menu"><li><a href="index.html">Contents</a></li><li><a href="doc-index.html">Index</a></li></ul><p class="caption">swagger-petstore-0.1.0.0: Auto-generated swagger-petstore API Client</p></div><div id="content"><div id="alphabet"><ul><li><a href="doc-index-A.html">A</a></li><li><a href="doc-index-C.html">C</a></li><li><a href="doc-index-D.html">D</a></li><li><a href="doc-index-F.html">F</a></li><li><a href="doc-index-G.html">G</a></li><li><a href="doc-index-H.html">H</a></li><li><a href="doc-index-I.html">I</a></li><li><a href="doc-index-L.html">L</a></li><li><a href="doc-index-M.html">M</a></li><li><a href="doc-index-N.html">N</a></li><li><a href="doc-index-O.html">O</a></li><li><a href="doc-index-P.html">P</a></li><li><a href="doc-index-R.html">R</a></li><li><a href="doc-index-S.html">S</a></li><li><a href="doc-index-T.html">T</a></li><li><a href="doc-index-U.html">U</a></li><li><a href="doc-index-W.html">W</a></li><li><a href="doc-index-45.html">-</a></li><li><a href="doc-index-95.html">_</a></li><li><a href="doc-index-All.html">All</a></li></ul></div><div id="index"><p class="caption">Index - W</p><table><tr><td class="src">withNoLogging</td><td class="module"><a href="SwaggerPetstore-Client.html#v:withNoLogging">SwaggerPetstore.Client</a>, SwaggerPetstore</td></tr><tr><td class="src">withStderrLogging</td><td class="module"><a href="SwaggerPetstore-Client.html#v:withStderrLogging">SwaggerPetstore.Client</a>, SwaggerPetstore</td></tr><tr><td class="src">withStdoutLogging</td><td class="module"><a href="SwaggerPetstore-Client.html#v:withStdoutLogging">SwaggerPetstore.Client</a>, SwaggerPetstore</td></tr></table></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.17.3</p></div></body></html> </script></head><body><div id="package-header"><ul class="links" id="page-menu"><li><a href="index.html">Contents</a></li><li><a href="doc-index.html">Index</a></li></ul><p class="caption">swagger-petstore-0.1.0.0: Auto-generated swagger-petstore API Client</p></div><div id="content"><div id="alphabet"><ul><li><a href="doc-index-A.html">A</a></li><li><a href="doc-index-B.html">B</a></li><li><a href="doc-index-C.html">C</a></li><li><a href="doc-index-D.html">D</a></li><li><a href="doc-index-E.html">E</a></li><li><a href="doc-index-F.html">F</a></li><li><a href="doc-index-G.html">G</a></li><li><a href="doc-index-H.html">H</a></li><li><a href="doc-index-I.html">I</a></li><li><a href="doc-index-L.html">L</a></li><li><a href="doc-index-M.html">M</a></li><li><a href="doc-index-N.html">N</a></li><li><a href="doc-index-O.html">O</a></li><li><a href="doc-index-P.html">P</a></li><li><a href="doc-index-R.html">R</a></li><li><a href="doc-index-S.html">S</a></li><li><a href="doc-index-T.html">T</a></li><li><a href="doc-index-U.html">U</a></li><li><a href="doc-index-W.html">W</a></li><li><a href="doc-index-45.html">-</a></li><li><a href="doc-index-95.html">_</a></li><li><a href="doc-index-All.html">All</a></li></ul></div><div id="index"><p class="caption">Index - W</p><table><tr><td class="src">withNoLogging</td><td class="module"><a href="SwaggerPetstore-Client.html#v:withNoLogging">SwaggerPetstore.Client</a>, SwaggerPetstore</td></tr><tr><td class="src">withStderrLogging</td><td class="module"><a href="SwaggerPetstore-Client.html#v:withStderrLogging">SwaggerPetstore.Client</a>, SwaggerPetstore</td></tr><tr><td class="src">withStdoutLogging</td><td class="module"><a href="SwaggerPetstore-Client.html#v:withStdoutLogging">SwaggerPetstore.Client</a>, SwaggerPetstore</td></tr></table></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.17.3</p></div></body></html>

View File

@ -1,4 +1,4 @@
<!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><meta http-equiv="Content-Type" content="text/html; charset=UTF-8" /><title>swagger-petstore-0.1.0.0: Auto-generated swagger-petstore API Client (Index)</title><link href="ocean.css" rel="stylesheet" type="text/css" title="Ocean" /><script src="haddock-util.js" type="text/javascript"></script><script src="https://cdn.mathjax.org/mathjax/latest/MathJax.js?config=TeX-AMS-MML_HTMLorMML" type="text/javascript"></script><script type="text/javascript">//<![CDATA[ <!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><meta http-equiv="Content-Type" content="text/html; charset=UTF-8" /><title>swagger-petstore-0.1.0.0: Auto-generated swagger-petstore API Client (Index)</title><link href="ocean.css" rel="stylesheet" type="text/css" title="Ocean" /><script src="haddock-util.js" type="text/javascript"></script><script src="https://cdn.mathjax.org/mathjax/latest/MathJax.js?config=TeX-AMS-MML_HTMLorMML" type="text/javascript"></script><script type="text/javascript">//<![CDATA[
window.onload = function () {pageLoad();}; window.onload = function () {pageLoad();};
//]]> //]]>
</script></head><body><div id="package-header"><ul class="links" id="page-menu"><li><a href="index.html">Contents</a></li><li><a href="doc-index.html">Index</a></li></ul><p class="caption">swagger-petstore-0.1.0.0: Auto-generated swagger-petstore API Client</p></div><div id="content"><div id="alphabet"><ul><li><a href="doc-index-A.html">A</a></li><li><a href="doc-index-C.html">C</a></li><li><a href="doc-index-D.html">D</a></li><li><a href="doc-index-F.html">F</a></li><li><a href="doc-index-G.html">G</a></li><li><a href="doc-index-H.html">H</a></li><li><a href="doc-index-I.html">I</a></li><li><a href="doc-index-L.html">L</a></li><li><a href="doc-index-M.html">M</a></li><li><a href="doc-index-N.html">N</a></li><li><a href="doc-index-O.html">O</a></li><li><a href="doc-index-P.html">P</a></li><li><a href="doc-index-R.html">R</a></li><li><a href="doc-index-S.html">S</a></li><li><a href="doc-index-T.html">T</a></li><li><a href="doc-index-U.html">U</a></li><li><a href="doc-index-W.html">W</a></li><li><a href="doc-index-45.html">-</a></li><li><a href="doc-index-95.html">_</a></li><li><a href="doc-index-All.html">All</a></li></ul></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.17.3</p></div></body></html> </script></head><body><div id="package-header"><ul class="links" id="page-menu"><li><a href="index.html">Contents</a></li><li><a href="doc-index.html">Index</a></li></ul><p class="caption">swagger-petstore-0.1.0.0: Auto-generated swagger-petstore API Client</p></div><div id="content"><div id="alphabet"><ul><li><a href="doc-index-A.html">A</a></li><li><a href="doc-index-B.html">B</a></li><li><a href="doc-index-C.html">C</a></li><li><a href="doc-index-D.html">D</a></li><li><a href="doc-index-E.html">E</a></li><li><a href="doc-index-F.html">F</a></li><li><a href="doc-index-G.html">G</a></li><li><a href="doc-index-H.html">H</a></li><li><a href="doc-index-I.html">I</a></li><li><a href="doc-index-L.html">L</a></li><li><a href="doc-index-M.html">M</a></li><li><a href="doc-index-N.html">N</a></li><li><a href="doc-index-O.html">O</a></li><li><a href="doc-index-P.html">P</a></li><li><a href="doc-index-R.html">R</a></li><li><a href="doc-index-S.html">S</a></li><li><a href="doc-index-T.html">T</a></li><li><a href="doc-index-U.html">U</a></li><li><a href="doc-index-W.html">W</a></li><li><a href="doc-index-45.html">-</a></li><li><a href="doc-index-95.html">_</a></li><li><a href="doc-index-All.html">All</a></li></ul></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.17.3</p></div></body></html>

View File

@ -2,5 +2,4 @@
window.onload = function () {pageLoad();}; window.onload = function () {pageLoad();};
//]]> //]]>
</script></head><body><div id="package-header"><ul class="links" id="page-menu"><li><a href="index.html">Contents</a></li><li><a href="doc-index.html">Index</a></li></ul><p class="caption">swagger-petstore-0.1.0.0: Auto-generated swagger-petstore API Client</p></div><div id="content"><div id="description"><h1>swagger-petstore-0.1.0.0: Auto-generated swagger-petstore API Client</h1><div class="doc"><p>. </script></head><body><div id="package-header"><ul class="links" id="page-menu"><li><a href="index.html">Contents</a></li><li><a href="doc-index.html">Index</a></li></ul><p class="caption">swagger-petstore-0.1.0.0: Auto-generated swagger-petstore API Client</p></div><div id="content"><div id="description"><h1>swagger-petstore-0.1.0.0: Auto-generated swagger-petstore API Client</h1><div class="doc"><p>.
Client library for calling the swagger-petstore API based on http-client. Client library for calling the swagger-petstore API based on http-client.</p><p>host: petstore.swagger.io:80</p><p>base path: <a href="http://petstore.swagger.io:80/v2">http://petstore.swagger.io:80/v2</a></p><p>apiVersion: 0.0.1</p><p>swagger version: 2.0</p><p>OpenAPI-Specification: <a href="https://github.com/OAI/OpenAPI-Specification/blob/master/versions/2.0.md">https://github.com/OAI/OpenAPI-Specification/blob/master/versions/2.0.md</a></p></div></div><div id="module-list"><p class="caption">Modules</p><ul><li><span class="module"><span id="control.n.1" class="collapser" onclick="toggleSection('n.1')">&nbsp;</span><a href="SwaggerPetstore.html">SwaggerPetstore</a></span><ul id="section.n.1" class="show"><li><span class="module"><a href="SwaggerPetstore-API.html">SwaggerPetstore.API</a></span></li><li><span class="module"><a href="SwaggerPetstore-Client.html">SwaggerPetstore.Client</a></span></li><li><span class="module"><a href="SwaggerPetstore-Lens.html">SwaggerPetstore.Lens</a></span></li><li><span class="module"><a href="SwaggerPetstore-Logging.html">SwaggerPetstore.Logging</a></span></li><li><span class="module"><a href="SwaggerPetstore-MimeTypes.html">SwaggerPetstore.MimeTypes</a></span></li><li><span class="module"><a href="SwaggerPetstore-Model.html">SwaggerPetstore.Model</a></span></li></ul></li></ul></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.17.3</p></div></body></html>
host: petstore.swagger.io</p><p>base path: <a href="http://petstore.swagger.io/v2">http://petstore.swagger.io/v2</a></p><p>apiVersion: 0.0.1</p><p>swagger version: 2.0</p><p>OpenAPI-Specification: <a href="https://github.com/OAI/OpenAPI-Specification/blob/master/versions/2.0.md">https://github.com/OAI/OpenAPI-Specification/blob/master/versions/2.0.md</a></p></div></div><div id="module-list"><p class="caption">Modules</p><ul><li><span class="module"><span id="control.n.1" class="collapser" onclick="toggleSection('n.1')">&nbsp;</span><a href="SwaggerPetstore.html">SwaggerPetstore</a></span><ul id="section.n.1" class="show"><li><span class="module"><a href="SwaggerPetstore-API.html">SwaggerPetstore.API</a></span></li><li><span class="module"><a href="SwaggerPetstore-Client.html">SwaggerPetstore.Client</a></span></li><li><span class="module"><a href="SwaggerPetstore-Lens.html">SwaggerPetstore.Lens</a></span></li><li><span class="module"><a href="SwaggerPetstore-Logging.html">SwaggerPetstore.Logging</a></span></li><li><span class="module"><a href="SwaggerPetstore-MimeTypes.html">SwaggerPetstore.MimeTypes</a></span></li><li><span class="module"><a href="SwaggerPetstore-Model.html">SwaggerPetstore.Model</a></span></li></ul></li></ul></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.17.3</p></div></body></html>

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

View File

@ -1,4 +1,4 @@
<!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><meta http-equiv="Content-Type" content="text/html; charset=UTF-8" /><title>SwaggerPetstore.MimeTypes</title><link href="ocean.css" rel="stylesheet" type="text/css" title="Ocean" /><script src="haddock-util.js" type="text/javascript"></script><script src="https://cdn.mathjax.org/mathjax/latest/MathJax.js?config=TeX-AMS-MML_HTMLorMML" type="text/javascript"></script><script type="text/javascript">//<![CDATA[ <!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><meta http-equiv="Content-Type" content="text/html; charset=UTF-8" /><title>SwaggerPetstore.MimeTypes</title><link href="ocean.css" rel="stylesheet" type="text/css" title="Ocean" /><script src="haddock-util.js" type="text/javascript"></script><script src="https://cdn.mathjax.org/mathjax/latest/MathJax.js?config=TeX-AMS-MML_HTMLorMML" type="text/javascript"></script><script type="text/javascript">//<![CDATA[
window.onload = function () {pageLoad();}; window.onload = function () {pageLoad();};
//]]> //]]>
</script></head><body id="mini"><div id="module-header"><p class="caption">SwaggerPetstore.MimeTypes</p></div><div id="interface"><h1>Content Negotiation</h1><div class="top"><p class="src"><span class="keyword">data</span> <a href="SwaggerPetstore-MimeTypes.html#t:NoContent" target="main">NoContent</a></p></div><h2>Mime Types</h2><div class="top"><p class="src"><span class="keyword">data</span> <a href="SwaggerPetstore-MimeTypes.html#t:MimeJSON" target="main">MimeJSON</a></p></div><div class="top"><p class="src"><span class="keyword">data</span> <a href="SwaggerPetstore-MimeTypes.html#t:MimeXML" target="main">MimeXML</a></p></div><div class="top"><p class="src"><span class="keyword">data</span> <a href="SwaggerPetstore-MimeTypes.html#t:MimePlainText" target="main">MimePlainText</a></p></div><div class="top"><p class="src"><span class="keyword">data</span> <a href="SwaggerPetstore-MimeTypes.html#t:MimeFormUrlEncoded" target="main">MimeFormUrlEncoded</a></p></div><div class="top"><p class="src"><span class="keyword">data</span> <a href="SwaggerPetstore-MimeTypes.html#t:MimeMultipartFormData" target="main">MimeMultipartFormData</a></p></div><div class="top"><p class="src"><span class="keyword">data</span> <a href="SwaggerPetstore-MimeTypes.html#t:MimeOctetStream" target="main">MimeOctetStream</a></p></div><div class="top"><p class="src"><span class="keyword">data</span> <a href="SwaggerPetstore-MimeTypes.html#t:MimeNoContent" target="main">MimeNoContent</a></p></div><h2>MimeType Class</h2><div class="top"><p class="src"><span class="keyword">class</span> <a href="SwaggerPetstore-MimeTypes.html#t:MimeType" target="main">MimeType</a> mtype</p></div><h2>MimeType Instances</h2><h2>MimeRender Class</h2><div class="top"><p class="src"><span class="keyword">class</span> <a href="SwaggerPetstore-MimeTypes.html#t:MimeRender" target="main">MimeRender</a> mtype x</p></div><h2>MimeRender Instances</h2><h2>MimeUnrender Class</h2><div class="top"><p class="src"><span class="keyword">class</span> <a href="SwaggerPetstore-MimeTypes.html#t:MimeUnrender" target="main">MimeUnrender</a> mtype o</p></div><h2>MimeUnrender Instances</h2><h2>Request Consumes</h2><div class="top"><p class="src"><span class="keyword">class</span> <a href="SwaggerPetstore-MimeTypes.html#t:Consumes" target="main">Consumes</a> req mtype</p></div><h2>Request Produces</h2><div class="top"><p class="src"><span class="keyword">class</span> <a href="SwaggerPetstore-MimeTypes.html#t:Produces" target="main">Produces</a> req mtype</p></div></div></body></html> </script></head><body id="mini"><div id="module-header"><p class="caption">SwaggerPetstore.MimeTypes</p></div><div id="interface"><h1>Content Negotiation</h1><div class="top"><p class="src"><span class="keyword">data</span> <a href="SwaggerPetstore-MimeTypes.html#t:NoContent" target="main">NoContent</a></p></div><h2>Mime Types</h2><div class="top"><p class="src"><span class="keyword">data</span> <a href="SwaggerPetstore-MimeTypes.html#t:MimeJSON" target="main">MimeJSON</a></p></div><div class="top"><p class="src"><span class="keyword">data</span> <a href="SwaggerPetstore-MimeTypes.html#t:MimeXML" target="main">MimeXML</a></p></div><div class="top"><p class="src"><span class="keyword">data</span> <a href="SwaggerPetstore-MimeTypes.html#t:MimePlainText" target="main">MimePlainText</a></p></div><div class="top"><p class="src"><span class="keyword">data</span> <a href="SwaggerPetstore-MimeTypes.html#t:MimeFormUrlEncoded" target="main">MimeFormUrlEncoded</a></p></div><div class="top"><p class="src"><span class="keyword">data</span> <a href="SwaggerPetstore-MimeTypes.html#t:MimeMultipartFormData" target="main">MimeMultipartFormData</a></p></div><div class="top"><p class="src"><span class="keyword">data</span> <a href="SwaggerPetstore-MimeTypes.html#t:MimeOctetStream" target="main">MimeOctetStream</a></p></div><div class="top"><p class="src"><span class="keyword">data</span> <a href="SwaggerPetstore-MimeTypes.html#t:MimeNoContent" target="main">MimeNoContent</a></p></div><div class="top"><p class="src"><span class="keyword">data</span> <a href="SwaggerPetstore-MimeTypes.html#t:MimeAny" target="main">MimeAny</a></p></div><div class="top"><p class="src"><span class="keyword">data</span> <a href="SwaggerPetstore-MimeTypes.html#t:MimeXmlCharsetutf8" target="main">MimeXmlCharsetutf8</a></p></div><div class="top"><p class="src"><span class="keyword">data</span> <a href="SwaggerPetstore-MimeTypes.html#t:MimeJsonCharsetutf8" target="main">MimeJsonCharsetutf8</a></p></div><h2>MimeType Class</h2><div class="top"><p class="src"><span class="keyword">class</span> <a href="SwaggerPetstore-MimeTypes.html#t:MimeType" target="main">MimeType</a> mtype</p></div><h2>MimeType Instances</h2><h2>MimeRender Class</h2><div class="top"><p class="src"><span class="keyword">class</span> <a href="SwaggerPetstore-MimeTypes.html#t:MimeRender" target="main">MimeRender</a> mtype x</p></div><h2>MimeRender Instances</h2><div class="top"><p class="src"><a href="SwaggerPetstore-MimeTypes.html#v:mimeRenderDefaultMultipartFormData" target="main">mimeRenderDefaultMultipartFormData</a></p></div><h2>MimeUnrender Class</h2><div class="top"><p class="src"><span class="keyword">class</span> <a href="SwaggerPetstore-MimeTypes.html#t:MimeUnrender" target="main">MimeUnrender</a> mtype o</p></div><h2>MimeUnrender Instances</h2><h2>Request Consumes</h2><div class="top"><p class="src"><span class="keyword">class</span> <a href="SwaggerPetstore-MimeTypes.html#t:Consumes" target="main">Consumes</a> req mtype</p></div><h2>Request Produces</h2><div class="top"><p class="src"><span class="keyword">class</span> <a href="SwaggerPetstore-MimeTypes.html#t:Produces" target="main">Produces</a> req mtype</p></div></div></body></html>

File diff suppressed because one or more lines are too long

View File

@ -15,7 +15,7 @@
</span><a name="line-15"></a><span class="hs-cpp">#if defined(VERSION_base)</span><span> </span><a name="line-15"></a><span class="hs-cpp">#if defined(VERSION_base)</span><span>
</span><a name="line-16"></a><span> </span><a name="line-16"></a><span>
</span><a name="line-17"></a><span class="hs-cpp">#if MIN_VERSION_base(4,0,0)</span><span> </span><a name="line-17"></a><span class="hs-cpp">#if MIN_VERSION_base(4,0,0)</span><span>
</span><a name="line-18"></a><span class="hs-identifier">catchIO</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><a href="#local-6989586621679151882"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Exception</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">IOException</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><a href="#local-6989586621679151882"><span class="hs-identifier hs-type">a</span></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><a href="#local-6989586621679151882"><span class="hs-identifier hs-type">a</span></a><span> </span><a name="line-18"></a><span class="hs-identifier">catchIO</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><a href="#local-6989586621679168393"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Exception</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">IOException</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><a href="#local-6989586621679168393"><span class="hs-identifier hs-type">a</span></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><a href="#local-6989586621679168393"><span class="hs-identifier hs-type">a</span></a><span>
</span><a name="line-19"></a><span class="hs-cpp">#else</span><span> </span><a name="line-19"></a><span class="hs-cpp">#else</span><span>
</span><a name="line-20"></a><span class="hs-identifier">catchIO</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier">IO</span><span> </span><span class="hs-identifier">a</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-special">(</span><span class="hs-identifier">Exception</span><span class="hs-operator">.</span><span class="hs-identifier">Exception</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier">IO</span><span> </span><span class="hs-identifier">a</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier">IO</span><span> </span><span class="hs-identifier">a</span><span> </span><a name="line-20"></a><span class="hs-identifier">catchIO</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier">IO</span><span> </span><span class="hs-identifier">a</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-special">(</span><span class="hs-identifier">Exception</span><span class="hs-operator">.</span><span class="hs-identifier">Exception</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier">IO</span><span> </span><span class="hs-identifier">a</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier">IO</span><span> </span><span class="hs-identifier">a</span><span>
</span><a name="line-21"></a><span class="hs-cpp">#endif</span><span> </span><a name="line-21"></a><span class="hs-cpp">#endif</span><span>
@ -30,7 +30,7 @@
</span><a name="line-30"></a><span class="hs-identifier">bindir</span><span class="hs-special">,</span><span> </span><span class="hs-identifier">libdir</span><span class="hs-special">,</span><span> </span><span class="hs-identifier">dynlibdir</span><span class="hs-special">,</span><span> </span><span class="hs-identifier">datadir</span><span class="hs-special">,</span><span> </span><span class="hs-identifier">libexecdir</span><span class="hs-special">,</span><span> </span><span class="hs-identifier">sysconfdir</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">FilePath</span><span> </span><a name="line-30"></a><span class="hs-identifier">bindir</span><span class="hs-special">,</span><span> </span><span class="hs-identifier">libdir</span><span class="hs-special">,</span><span> </span><span class="hs-identifier">dynlibdir</span><span class="hs-special">,</span><span> </span><span class="hs-identifier">datadir</span><span class="hs-special">,</span><span> </span><span class="hs-identifier">libexecdir</span><span class="hs-special">,</span><span> </span><span class="hs-identifier">sysconfdir</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">FilePath</span><span>
</span><a name="line-31"></a><span> </span><a name="line-31"></a><span>
</span><a name="line-32"></a><a name="bindir"><a href="Paths_swagger_petstore.html#bindir"><span class="hs-identifier">bindir</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-string">&quot;/home/jon/fs/git/swagger-codegen/samples/client/petstore/haskell-http-client/.stack-work/install/x86_64-linux-nopie/lts-9.0/8.0.2/bin&quot;</span><span> </span><a name="line-32"></a><a name="bindir"><a href="Paths_swagger_petstore.html#bindir"><span class="hs-identifier">bindir</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-string">&quot;/home/jon/fs/git/swagger-codegen/samples/client/petstore/haskell-http-client/.stack-work/install/x86_64-linux-nopie/lts-9.0/8.0.2/bin&quot;</span><span>
</span><a name="line-33"></a><a name="libdir"><a href="Paths_swagger_petstore.html#libdir"><span class="hs-identifier">libdir</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-string">&quot;/home/jon/fs/git/swagger-codegen/samples/client/petstore/haskell-http-client/.stack-work/install/x86_64-linux-nopie/lts-9.0/8.0.2/lib/x86_64-linux-ghc-8.0.2/swagger-petstore-0.1.0.0-Kuz5nG0AYvXTOw4CQ9HS&quot;</span><span> </span><a name="line-33"></a><a name="libdir"><a href="Paths_swagger_petstore.html#libdir"><span class="hs-identifier">libdir</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-string">&quot;/home/jon/fs/git/swagger-codegen/samples/client/petstore/haskell-http-client/.stack-work/install/x86_64-linux-nopie/lts-9.0/8.0.2/lib/x86_64-linux-ghc-8.0.2/swagger-petstore-0.1.0.0-6vvnt0nNbFQ21xc4iZiS7J&quot;</span><span>
</span><a name="line-34"></a><a name="dynlibdir"><a href="Paths_swagger_petstore.html#dynlibdir"><span class="hs-identifier">dynlibdir</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-string">&quot;/home/jon/fs/git/swagger-codegen/samples/client/petstore/haskell-http-client/.stack-work/install/x86_64-linux-nopie/lts-9.0/8.0.2/lib/x86_64-linux-ghc-8.0.2&quot;</span><span> </span><a name="line-34"></a><a name="dynlibdir"><a href="Paths_swagger_petstore.html#dynlibdir"><span class="hs-identifier">dynlibdir</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-string">&quot;/home/jon/fs/git/swagger-codegen/samples/client/petstore/haskell-http-client/.stack-work/install/x86_64-linux-nopie/lts-9.0/8.0.2/lib/x86_64-linux-ghc-8.0.2&quot;</span><span>
</span><a name="line-35"></a><a name="datadir"><a href="Paths_swagger_petstore.html#datadir"><span class="hs-identifier">datadir</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-string">&quot;/home/jon/fs/git/swagger-codegen/samples/client/petstore/haskell-http-client/.stack-work/install/x86_64-linux-nopie/lts-9.0/8.0.2/share/x86_64-linux-ghc-8.0.2/swagger-petstore-0.1.0.0&quot;</span><span> </span><a name="line-35"></a><a name="datadir"><a href="Paths_swagger_petstore.html#datadir"><span class="hs-identifier">datadir</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-string">&quot;/home/jon/fs/git/swagger-codegen/samples/client/petstore/haskell-http-client/.stack-work/install/x86_64-linux-nopie/lts-9.0/8.0.2/share/x86_64-linux-ghc-8.0.2/swagger-petstore-0.1.0.0&quot;</span><span>
</span><a name="line-36"></a><a name="libexecdir"><a href="Paths_swagger_petstore.html#libexecdir"><span class="hs-identifier">libexecdir</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-string">&quot;/home/jon/fs/git/swagger-codegen/samples/client/petstore/haskell-http-client/.stack-work/install/x86_64-linux-nopie/lts-9.0/8.0.2/libexec&quot;</span><span> </span><a name="line-36"></a><a name="libexecdir"><a href="Paths_swagger_petstore.html#libexecdir"><span class="hs-identifier">libexecdir</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-string">&quot;/home/jon/fs/git/swagger-codegen/samples/client/petstore/haskell-http-client/.stack-work/install/x86_64-linux-nopie/lts-9.0/8.0.2/libexec&quot;</span><span>
@ -45,7 +45,7 @@
</span><a name="line-45"></a><a name="getSysconfDir"><a href="Paths_swagger_petstore.html#getSysconfDir"><span class="hs-identifier">getSysconfDir</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="Paths_swagger_petstore.html#catchIO"><span class="hs-identifier hs-var">catchIO</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">getEnv</span><span> </span><span class="hs-string">&quot;swagger_petstore_sysconfdir&quot;</span><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-var">return</span><span> </span><a href="Paths_swagger_petstore.html#sysconfdir"><span class="hs-identifier hs-var">sysconfdir</span></a><span class="hs-special">)</span><span> </span><a name="line-45"></a><a name="getSysconfDir"><a href="Paths_swagger_petstore.html#getSysconfDir"><span class="hs-identifier">getSysconfDir</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="Paths_swagger_petstore.html#catchIO"><span class="hs-identifier hs-var">catchIO</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">getEnv</span><span> </span><span class="hs-string">&quot;swagger_petstore_sysconfdir&quot;</span><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-var">return</span><span> </span><a href="Paths_swagger_petstore.html#sysconfdir"><span class="hs-identifier hs-var">sysconfdir</span></a><span class="hs-special">)</span><span>
</span><a name="line-46"></a><span> </span><a name="line-46"></a><span>
</span><a name="line-47"></a><span class="hs-identifier">getDataFileName</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">FilePath</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><span class="hs-identifier hs-type">FilePath</span><span> </span><a name="line-47"></a><span class="hs-identifier">getDataFileName</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">FilePath</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><span class="hs-identifier hs-type">FilePath</span><span>
</span><a name="line-48"></a><a name="getDataFileName"><a href="Paths_swagger_petstore.html#getDataFileName"><span class="hs-identifier">getDataFileName</span></a></a><span> </span><a name="local-6989586621679152208"><a href="#local-6989586621679152208"><span class="hs-identifier">name</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span> </span><a name="line-48"></a><a name="getDataFileName"><a href="Paths_swagger_petstore.html#getDataFileName"><span class="hs-identifier">getDataFileName</span></a></a><span> </span><a name="local-6989586621679168719"><a href="#local-6989586621679168719"><span class="hs-identifier">name</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
</span><a name="line-49"></a><span> </span><a name="local-6989586621679152209"><a href="#local-6989586621679152209"><span class="hs-identifier">dir</span></a></a><span> </span><span class="hs-glyph">&lt;-</span><span> </span><a href="Paths_swagger_petstore.html#getDataDir"><span class="hs-identifier hs-var">getDataDir</span></a><span> </span><a name="line-49"></a><span> </span><a name="local-6989586621679168720"><a href="#local-6989586621679168720"><span class="hs-identifier">dir</span></a></a><span> </span><span class="hs-glyph">&lt;-</span><span> </span><a href="Paths_swagger_petstore.html#getDataDir"><span class="hs-identifier hs-var">getDataDir</span></a><span>
</span><a name="line-50"></a><span> </span><span class="hs-identifier hs-var">return</span><span> </span><span class="hs-special">(</span><a href="#local-6989586621679152209"><span class="hs-identifier hs-var">dir</span></a><span> </span><span class="hs-operator hs-var">++</span><span> </span><span class="hs-string">&quot;/&quot;</span><span> </span><span class="hs-operator hs-var">++</span><span> </span><a href="#local-6989586621679152208"><span class="hs-identifier hs-var">name</span></a><span class="hs-special">)</span><span> </span><a name="line-50"></a><span> </span><span class="hs-identifier hs-var">return</span><span> </span><span class="hs-special">(</span><a href="#local-6989586621679168720"><span class="hs-identifier hs-var">dir</span></a><span> </span><span class="hs-operator hs-var">++</span><span> </span><span class="hs-string">&quot;/&quot;</span><span> </span><span class="hs-operator hs-var">++</span><span> </span><a href="#local-6989586621679168719"><span class="hs-identifier hs-var">name</span></a><span class="hs-special">)</span><span>
</span><a name="line-51"></a></pre></body></html> </span><a name="line-51"></a></pre></body></html>

View File

@ -62,17 +62,17 @@ Module : SwaggerPetstore.Client
</span><a name="line-62"></a><span> </span><a name="line-62"></a><span>
</span><a name="line-63"></a><span class="hs-comment">-- | display the config</span><span> </span><a name="line-63"></a><span class="hs-comment">-- | display the config</span><span>
</span><a name="line-64"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">Show</span><span> </span><a href="SwaggerPetstore.Client.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="line-64"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">Show</span><span> </span><a href="SwaggerPetstore.Client.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-keyword">where</span><span>
</span><a name="line-65"></a><span> </span><a name="local-8214565720323792830"><span class="hs-identifier">show</span></a><span> </span><a name="local-6989586621679142662"><a href="#local-6989586621679142662"><span class="hs-identifier">c</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a name="line-65"></a><span> </span><a name="local-8214565720323792830"><span class="hs-identifier">show</span></a><span> </span><a name="local-6989586621679159198"><a href="#local-6989586621679159198"><span class="hs-identifier">c</span></a></a><span> </span><span class="hs-glyph">=</span><span>
</span><a name="line-66"></a><span> </span><span class="hs-identifier hs-var">T</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">printf</span><span> </span><a name="line-66"></a><span> </span><span class="hs-identifier hs-var">T</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">printf</span><span>
</span><a name="line-67"></a><span> </span><span class="hs-string">&quot;{ configHost = %v, configUserAgent = %v, ..}&quot;</span><span> </span><a name="line-67"></a><span> </span><span class="hs-string">&quot;{ configHost = %v, configUserAgent = %v, ..}&quot;</span><span>
</span><a name="line-68"></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">show</span><span> </span><span class="hs-special">(</span><span class="hs-identifier">configHost</span><span> </span><a href="#local-6989586621679142662"><span class="hs-identifier hs-var">c</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span> </span><a name="line-68"></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">show</span><span> </span><span class="hs-special">(</span><span class="hs-identifier">configHost</span><span> </span><a href="#local-6989586621679159198"><span class="hs-identifier hs-var">c</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span>
</span><a name="line-69"></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">show</span><span> </span><span class="hs-special">(</span><span class="hs-identifier">configUserAgent</span><span> </span><a href="#local-6989586621679142662"><span class="hs-identifier hs-var">c</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span> </span><a name="line-69"></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">show</span><span> </span><span class="hs-special">(</span><span class="hs-identifier">configUserAgent</span><span> </span><a href="#local-6989586621679159198"><span class="hs-identifier hs-var">c</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span>
</span><a name="line-70"></a><span> </span><a name="line-70"></a><span>
</span><a name="line-71"></a><span class="hs-comment">-- | constructs a default SwaggerPetstoreConfig</span><span> </span><a name="line-71"></a><span class="hs-comment">-- | constructs a default SwaggerPetstoreConfig</span><span>
</span><a name="line-72"></a><span class="hs-comment">--</span><span> </span><a name="line-72"></a><span class="hs-comment">--</span><span>
</span><a name="line-73"></a><span class="hs-comment">-- configHost:</span><span> </span><a name="line-73"></a><span class="hs-comment">-- configHost:</span><span>
</span><a name="line-74"></a><span class="hs-comment">--</span><span> </span><a name="line-74"></a><span class="hs-comment">--</span><span>
</span><a name="line-75"></a><span class="hs-comment">-- @http://petstore.swagger.io/v2@</span><span> </span><a name="line-75"></a><span class="hs-comment">-- @http://petstore.swagger.io:80/v2@</span><span>
</span><a name="line-76"></a><span class="hs-comment">--</span><span> </span><a name="line-76"></a><span class="hs-comment">--</span><span>
</span><a name="line-77"></a><span class="hs-comment">-- configUserAgent:</span><span> </span><a name="line-77"></a><span class="hs-comment">-- configUserAgent:</span><span>
</span><a name="line-78"></a><span class="hs-comment">--</span><span> </span><a name="line-78"></a><span class="hs-comment">--</span><span>
@ -80,27 +80,27 @@ Module : SwaggerPetstore.Client
</span><a name="line-80"></a><span class="hs-comment">--</span><span> </span><a name="line-80"></a><span class="hs-comment">--</span><span>
</span><a name="line-81"></a><span class="hs-identifier">newConfig</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><a href="SwaggerPetstore.Client.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><a name="line-81"></a><span class="hs-identifier">newConfig</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><a href="SwaggerPetstore.Client.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span>
</span><a name="line-82"></a><a name="newConfig"><a href="SwaggerPetstore.Client.html#newConfig"><span class="hs-identifier">newConfig</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span> </span><a name="line-82"></a><a name="newConfig"><a href="SwaggerPetstore.Client.html#newConfig"><span class="hs-identifier">newConfig</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
</span><a name="line-83"></a><span> </span><a name="local-6989586621679142174"><a href="#local-6989586621679142174"><span class="hs-identifier">logCxt</span></a></a><span> </span><span class="hs-glyph">&lt;-</span><span> </span><a href="SwaggerPetstore.Logging.html#initLogContext"><span class="hs-identifier hs-var">initLogContext</span></a><span> </span><a name="line-83"></a><span> </span><a name="local-6989586621679158710"><a href="#local-6989586621679158710"><span class="hs-identifier">logCxt</span></a></a><span> </span><span class="hs-glyph">&lt;-</span><span> </span><a href="SwaggerPetstore.Logging.html#initLogContext"><span class="hs-identifier hs-var">initLogContext</span></a><span>
</span><a name="line-84"></a><span> </span><span class="hs-identifier hs-var">return</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><a href="SwaggerPetstore.Client.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-var">SwaggerPetstoreConfig</span></a><span> </span><a name="line-84"></a><span> </span><span class="hs-identifier hs-var">return</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><a href="SwaggerPetstore.Client.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-var">SwaggerPetstoreConfig</span></a><span>
</span><a name="line-85"></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">configHost</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-string">&quot;http://petstore.swagger.io/v2&quot;</span><span> </span><a name="line-85"></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">configHost</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-string">&quot;http://petstore.swagger.io:80/v2&quot;</span><span>
</span><a name="line-86"></a><span> </span><span class="hs-special">,</span><span> </span><span class="hs-identifier">configUserAgent</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-string">&quot;swagger-haskell-http-client/1.0.0&quot;</span><span> </span><a name="line-86"></a><span> </span><span class="hs-special">,</span><span> </span><span class="hs-identifier">configUserAgent</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-string">&quot;swagger-haskell-http-client/1.0.0&quot;</span><span>
</span><a name="line-87"></a><span> </span><span class="hs-special">,</span><span> </span><span class="hs-identifier">configLogExecWithContext</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Logging.html#runDefaultLogExecWithContext"><span class="hs-identifier hs-var">runDefaultLogExecWithContext</span></a><span> </span><a name="line-87"></a><span> </span><span class="hs-special">,</span><span> </span><span class="hs-identifier">configLogExecWithContext</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Logging.html#runDefaultLogExecWithContext"><span class="hs-identifier hs-var">runDefaultLogExecWithContext</span></a><span>
</span><a name="line-88"></a><span> </span><span class="hs-special">,</span><span> </span><span class="hs-identifier">configLogContext</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679142174"><span class="hs-identifier hs-var">logCxt</span></a><span> </span><a name="line-88"></a><span> </span><span class="hs-special">,</span><span> </span><span class="hs-identifier">configLogContext</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679158710"><span class="hs-identifier hs-var">logCxt</span></a><span>
</span><a name="line-89"></a><span> </span><span class="hs-special">}</span><span> </span><span> </span><a name="line-89"></a><span> </span><span class="hs-special">}</span><span> </span><span>
</span><a name="line-90"></a><span> </span><a name="line-90"></a><span>
</span><a name="line-91"></a><span class="hs-identifier">withStdoutLogging</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Client.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><a href="SwaggerPetstore.Client.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><a name="line-91"></a><span class="hs-identifier">withStdoutLogging</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Client.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><a href="SwaggerPetstore.Client.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span>
</span><a name="line-92"></a><a name="withStdoutLogging"><a href="SwaggerPetstore.Client.html#withStdoutLogging"><span class="hs-identifier">withStdoutLogging</span></a></a><span> </span><a name="local-6989586621679142175"><a href="#local-6989586621679142175"><span class="hs-identifier">p</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span> </span><a name="line-92"></a><a name="withStdoutLogging"><a href="SwaggerPetstore.Client.html#withStdoutLogging"><span class="hs-identifier">withStdoutLogging</span></a></a><span> </span><a name="local-6989586621679158711"><a href="#local-6989586621679158711"><span class="hs-identifier">p</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
</span><a name="line-93"></a><span> </span><a name="local-6989586621679142176"><a href="#local-6989586621679142176"><span class="hs-identifier">logCxt</span></a></a><span> </span><span class="hs-glyph">&lt;-</span><span> </span><a href="SwaggerPetstore.Logging.html#stdoutLoggingContext"><span class="hs-identifier hs-var">stdoutLoggingContext</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier">configLogContext</span><span> </span><a href="#local-6989586621679142175"><span class="hs-identifier hs-var">p</span></a><span class="hs-special">)</span><span> </span><a name="line-93"></a><span> </span><a name="local-6989586621679158712"><a href="#local-6989586621679158712"><span class="hs-identifier">logCxt</span></a></a><span> </span><span class="hs-glyph">&lt;-</span><span> </span><a href="SwaggerPetstore.Logging.html#stdoutLoggingContext"><span class="hs-identifier hs-var">stdoutLoggingContext</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier">configLogContext</span><span> </span><a href="#local-6989586621679158711"><span class="hs-identifier hs-var">p</span></a><span class="hs-special">)</span><span>
</span><a name="line-94"></a><span> </span><span class="hs-identifier hs-var">return</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><a href="#local-6989586621679142175"><span class="hs-identifier hs-var">p</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">configLogExecWithContext</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Logging.html#stdoutLoggingExec"><span class="hs-identifier hs-var">stdoutLoggingExec</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier">configLogContext</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679142176"><span class="hs-identifier hs-var">logCxt</span></a><span> </span><span class="hs-special">}</span><span> </span><a name="line-94"></a><span> </span><span class="hs-identifier hs-var">return</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><a href="#local-6989586621679158711"><span class="hs-identifier hs-var">p</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">configLogExecWithContext</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Logging.html#stdoutLoggingExec"><span class="hs-identifier hs-var">stdoutLoggingExec</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier">configLogContext</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679158712"><span class="hs-identifier hs-var">logCxt</span></a><span> </span><span class="hs-special">}</span><span>
</span><a name="line-95"></a><span> </span><a name="line-95"></a><span>
</span><a name="line-96"></a><span class="hs-identifier">withStderrLogging</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Client.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><a href="SwaggerPetstore.Client.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><a name="line-96"></a><span class="hs-identifier">withStderrLogging</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Client.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><a href="SwaggerPetstore.Client.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span>
</span><a name="line-97"></a><a name="withStderrLogging"><a href="SwaggerPetstore.Client.html#withStderrLogging"><span class="hs-identifier">withStderrLogging</span></a></a><span> </span><a name="local-6989586621679142177"><a href="#local-6989586621679142177"><span class="hs-identifier">p</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span> </span><a name="line-97"></a><a name="withStderrLogging"><a href="SwaggerPetstore.Client.html#withStderrLogging"><span class="hs-identifier">withStderrLogging</span></a></a><span> </span><a name="local-6989586621679158713"><a href="#local-6989586621679158713"><span class="hs-identifier">p</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
</span><a name="line-98"></a><span> </span><a name="local-6989586621679142178"><a href="#local-6989586621679142178"><span class="hs-identifier">logCxt</span></a></a><span> </span><span class="hs-glyph">&lt;-</span><span> </span><a href="SwaggerPetstore.Logging.html#stderrLoggingContext"><span class="hs-identifier hs-var">stderrLoggingContext</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier">configLogContext</span><span> </span><a href="#local-6989586621679142177"><span class="hs-identifier hs-var">p</span></a><span class="hs-special">)</span><span> </span><a name="line-98"></a><span> </span><a name="local-6989586621679158714"><a href="#local-6989586621679158714"><span class="hs-identifier">logCxt</span></a></a><span> </span><span class="hs-glyph">&lt;-</span><span> </span><a href="SwaggerPetstore.Logging.html#stderrLoggingContext"><span class="hs-identifier hs-var">stderrLoggingContext</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier">configLogContext</span><span> </span><a href="#local-6989586621679158713"><span class="hs-identifier hs-var">p</span></a><span class="hs-special">)</span><span>
</span><a name="line-99"></a><span> </span><span class="hs-identifier hs-var">return</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><a href="#local-6989586621679142177"><span class="hs-identifier hs-var">p</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">configLogExecWithContext</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Logging.html#stderrLoggingExec"><span class="hs-identifier hs-var">stderrLoggingExec</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier">configLogContext</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679142178"><span class="hs-identifier hs-var">logCxt</span></a><span> </span><span class="hs-special">}</span><span> </span><a name="line-99"></a><span> </span><span class="hs-identifier hs-var">return</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><a href="#local-6989586621679158713"><span class="hs-identifier hs-var">p</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">configLogExecWithContext</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Logging.html#stderrLoggingExec"><span class="hs-identifier hs-var">stderrLoggingExec</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier">configLogContext</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679158714"><span class="hs-identifier hs-var">logCxt</span></a><span> </span><span class="hs-special">}</span><span>
</span><a name="line-100"></a><span> </span><a name="line-100"></a><span>
</span><a name="line-101"></a><span class="hs-comment">-- | updates the config to disable logging</span><span> </span><a name="line-101"></a><span class="hs-comment">-- | updates the config to disable logging</span><span>
</span><a name="line-102"></a><span class="hs-identifier">withNoLogging</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Client.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Client.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><a name="line-102"></a><span class="hs-identifier">withNoLogging</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Client.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Client.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span>
</span><a name="line-103"></a><a name="withNoLogging"><a href="SwaggerPetstore.Client.html#withNoLogging"><span class="hs-identifier">withNoLogging</span></a></a><span> </span><a name="local-6989586621679142179"><a href="#local-6989586621679142179"><span class="hs-identifier">p</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679142179"><span class="hs-identifier hs-var">p</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">configLogExecWithContext</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Logging.html#runNullLogExec"><span class="hs-identifier hs-var">runNullLogExec</span></a><span class="hs-special">}</span><span> </span><a name="line-103"></a><a name="withNoLogging"><a href="SwaggerPetstore.Client.html#withNoLogging"><span class="hs-identifier">withNoLogging</span></a></a><span> </span><a name="local-6989586621679158715"><a href="#local-6989586621679158715"><span class="hs-identifier">p</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679158715"><span class="hs-identifier hs-var">p</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">configLogExecWithContext</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Logging.html#runNullLogExec"><span class="hs-identifier hs-var">runNullLogExec</span></a><span class="hs-special">}</span><span>
</span><a name="line-104"></a><span> </span><a name="line-104"></a><span>
</span><a name="line-105"></a><span class="hs-comment">-- * Dispatch</span><span> </span><a name="line-105"></a><span class="hs-comment">-- * Dispatch</span><span>
</span><a name="line-106"></a><span> </span><a name="line-106"></a><span>
@ -108,21 +108,21 @@ Module : SwaggerPetstore.Client
</span><a name="line-108"></a><span> </span><a name="line-108"></a><span>
</span><a name="line-109"></a><span class="hs-comment">-- | send a request returning the raw http response</span><span> </span><a name="line-109"></a><span class="hs-comment">-- | send a request returning the raw http response</span><span>
</span><a name="line-110"></a><span class="hs-identifier">dispatchLbs</span><span> </span><a name="line-110"></a><span class="hs-identifier">dispatchLbs</span><span>
</span><a name="line-111"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="#local-6989586621679142170"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679142171"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">,</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679142172"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span> </span><a name="line-111"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="#local-6989586621679158706"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679158707"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">,</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679158708"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span>
</span><a name="line-112"></a><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Manager</span><span> </span><span class="hs-comment">-- ^ http-client Connection manager</span><span> </span><a name="line-112"></a><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Manager</span><span> </span><span class="hs-comment">-- ^ http-client Connection manager</span><span>
</span><a name="line-113"></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Client.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-comment">-- ^ config</span><span> </span><a name="line-113"></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Client.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-comment">-- ^ config</span><span>
</span><a name="line-114"></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679142170"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679142172"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679142173"><span class="hs-identifier hs-type">res</span></a><span> </span><span class="hs-comment">-- ^ request</span><span> </span><a name="line-114"></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679158706"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679158708"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679158709"><span class="hs-identifier hs-type">res</span></a><span> </span><span class="hs-comment">-- ^ request</span><span>
</span><a name="line-115"></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="#local-6989586621679142171"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ &quot;accept&quot; 'MimeType'</span><span> </span><a name="line-115"></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="#local-6989586621679158707"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ &quot;accept&quot; 'MimeType'</span><span>
</span><a name="line-116"></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Response</span><span> </span><span class="hs-identifier hs-type">BCL</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span class="hs-special">)</span><span> </span><span class="hs-comment">-- ^ response</span><span> </span><a name="line-116"></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Response</span><span> </span><span class="hs-identifier hs-type">BCL</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span class="hs-special">)</span><span> </span><span class="hs-comment">-- ^ response</span><span>
</span><a name="line-117"></a><a name="dispatchLbs"><a href="SwaggerPetstore.Client.html#dispatchLbs"><span class="hs-identifier">dispatchLbs</span></a></a><span> </span><a name="local-6989586621679142180"><a href="#local-6989586621679142180"><span class="hs-identifier">manager</span></a></a><span> </span><a name="local-6989586621679142181"><a href="#local-6989586621679142181"><span class="hs-identifier">config</span></a></a><span> </span><a name="local-6989586621679142182"><a href="#local-6989586621679142182"><span class="hs-identifier">request</span></a></a><span> </span><a name="local-6989586621679142183"><a href="#local-6989586621679142183"><span class="hs-identifier">accept</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span> </span><a name="line-117"></a><a name="dispatchLbs"><a href="SwaggerPetstore.Client.html#dispatchLbs"><span class="hs-identifier">dispatchLbs</span></a></a><span> </span><a name="local-6989586621679158716"><a href="#local-6989586621679158716"><span class="hs-identifier">manager</span></a></a><span> </span><a name="local-6989586621679158717"><a href="#local-6989586621679158717"><span class="hs-identifier">config</span></a></a><span> </span><a name="local-6989586621679158718"><a href="#local-6989586621679158718"><span class="hs-identifier">request</span></a></a><span> </span><a name="local-6989586621679158719"><a href="#local-6989586621679158719"><span class="hs-identifier">accept</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
</span><a name="line-118"></a><span> </span><a name="local-6989586621679142184"><a href="#local-6989586621679142184"><span class="hs-identifier">initReq</span></a></a><span> </span><span class="hs-glyph">&lt;-</span><span> </span><a href="SwaggerPetstore.Client.html#_toInitRequest"><span class="hs-identifier hs-var">_toInitRequest</span></a><span> </span><a href="#local-6989586621679142181"><span class="hs-identifier hs-var">config</span></a><span> </span><a href="#local-6989586621679142182"><span class="hs-identifier hs-var">request</span></a><span> </span><a href="#local-6989586621679142183"><span class="hs-identifier hs-var">accept</span></a><span> </span><span> </span><a name="line-118"></a><span> </span><a name="local-6989586621679158720"><a href="#local-6989586621679158720"><span class="hs-identifier">initReq</span></a></a><span> </span><span class="hs-glyph">&lt;-</span><span> </span><a href="SwaggerPetstore.Client.html#_toInitRequest"><span class="hs-identifier hs-var">_toInitRequest</span></a><span> </span><a href="#local-6989586621679158717"><span class="hs-identifier hs-var">config</span></a><span> </span><a href="#local-6989586621679158718"><span class="hs-identifier hs-var">request</span></a><span> </span><a href="#local-6989586621679158719"><span class="hs-identifier hs-var">accept</span></a><span> </span><span>
</span><a name="line-119"></a><span> </span><a href="SwaggerPetstore.Client.html#dispatchInitUnsafe"><span class="hs-identifier hs-var">dispatchInitUnsafe</span></a><span> </span><a href="#local-6989586621679142180"><span class="hs-identifier hs-var">manager</span></a><span> </span><a href="#local-6989586621679142181"><span class="hs-identifier hs-var">config</span></a><span> </span><a href="#local-6989586621679142184"><span class="hs-identifier hs-var">initReq</span></a><span> </span><a name="line-119"></a><span> </span><a href="SwaggerPetstore.Client.html#dispatchInitUnsafe"><span class="hs-identifier hs-var">dispatchInitUnsafe</span></a><span> </span><a href="#local-6989586621679158716"><span class="hs-identifier hs-var">manager</span></a><span> </span><a href="#local-6989586621679158717"><span class="hs-identifier hs-var">config</span></a><span> </span><a href="#local-6989586621679158720"><span class="hs-identifier hs-var">initReq</span></a><span>
</span><a name="line-120"></a><span> </span><a name="line-120"></a><span>
</span><a name="line-121"></a><span class="hs-comment">-- ** Mime</span><span> </span><a name="line-121"></a><span class="hs-comment">-- ** Mime</span><span>
</span><a name="line-122"></a><span> </span><a name="line-122"></a><span>
</span><a name="line-123"></a><span class="hs-comment">-- | pair of decoded http body and http response</span><span> </span><a name="line-123"></a><span class="hs-comment">-- | pair of decoded http body and http response</span><span>
</span><a name="line-124"></a><span class="hs-keyword">data</span><span> </span><a name="MimeResult"><a href="SwaggerPetstore.Client.html#MimeResult"><span class="hs-identifier">MimeResult</span></a></a><span> </span><a name="local-6989586621679142138"><a href="#local-6989586621679142138"><span class="hs-identifier">res</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a name="line-124"></a><span class="hs-keyword">data</span><span> </span><a name="MimeResult"><a href="SwaggerPetstore.Client.html#MimeResult"><span class="hs-identifier">MimeResult</span></a></a><span> </span><a name="local-6989586621679158674"><a href="#local-6989586621679158674"><span class="hs-identifier">res</span></a></a><span> </span><span class="hs-glyph">=</span><span>
</span><a name="line-125"></a><span> </span><a name="MimeResult"><a href="SwaggerPetstore.Client.html#MimeResult"><span class="hs-identifier">MimeResult</span></a></a><span> </span><span class="hs-special">{</span><span> </span><a name="mimeResult"><a href="SwaggerPetstore.Client.html#mimeResult"><span class="hs-identifier">mimeResult</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">Either</span><span> </span><a href="SwaggerPetstore.Client.html#MimeError"><span class="hs-identifier hs-type">MimeError</span></a><span> </span><a href="#local-6989586621679142138"><span class="hs-identifier hs-type">res</span></a><span> </span><span class="hs-comment">-- ^ decoded http body</span><span> </span><a name="line-125"></a><span> </span><a name="MimeResult"><a href="SwaggerPetstore.Client.html#MimeResult"><span class="hs-identifier">MimeResult</span></a></a><span> </span><span class="hs-special">{</span><span> </span><a name="mimeResult"><a href="SwaggerPetstore.Client.html#mimeResult"><span class="hs-identifier">mimeResult</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">Either</span><span> </span><a href="SwaggerPetstore.Client.html#MimeError"><span class="hs-identifier hs-type">MimeError</span></a><span> </span><a href="#local-6989586621679158674"><span class="hs-identifier hs-type">res</span></a><span> </span><span class="hs-comment">-- ^ decoded http body</span><span>
</span><a name="line-126"></a><span> </span><span class="hs-special">,</span><span> </span><a name="mimeResultResponse"><a href="SwaggerPetstore.Client.html#mimeResultResponse"><span class="hs-identifier">mimeResultResponse</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Response</span><span> </span><span class="hs-identifier hs-type">BCL</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span> </span><span class="hs-comment">-- ^ http response </span><span> </span><a name="line-126"></a><span> </span><span class="hs-special">,</span><span> </span><a name="mimeResultResponse"><a href="SwaggerPetstore.Client.html#mimeResultResponse"><span class="hs-identifier">mimeResultResponse</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Response</span><span> </span><span class="hs-identifier hs-type">BCL</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span> </span><span class="hs-comment">-- ^ http response </span><span>
</span><a name="line-127"></a><span> </span><span class="hs-special">}</span><span> </span><a name="line-127"></a><span> </span><span class="hs-special">}</span><span>
</span><a name="line-128"></a><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Show</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">Functor</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">Foldable</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">Traversable</span><span class="hs-special">)</span><span> </span><a name="line-128"></a><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Show</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">Functor</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">Foldable</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">Traversable</span><span class="hs-special">)</span><span>
@ -136,130 +136,130 @@ Module : SwaggerPetstore.Client
</span><a name="line-136"></a><span> </span><a name="line-136"></a><span>
</span><a name="line-137"></a><span class="hs-comment">-- | send a request returning the 'MimeResult'</span><span> </span><a name="line-137"></a><span class="hs-comment">-- | send a request returning the 'MimeResult'</span><span>
</span><a name="line-138"></a><span class="hs-identifier">dispatchMime</span><span> </span><a name="line-138"></a><span class="hs-identifier">dispatchMime</span><span>
</span><a name="line-139"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="#local-6989586621679142166"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679142167"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">,</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="#local-6989586621679142167"><span class="hs-identifier hs-type">accept</span></a><span> </span><a href="#local-6989586621679142168"><span class="hs-identifier hs-type">res</span></a><span class="hs-special">,</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679142169"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span> </span><a name="line-139"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="#local-6989586621679158702"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679158703"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">,</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="#local-6989586621679158703"><span class="hs-identifier hs-type">accept</span></a><span> </span><a href="#local-6989586621679158704"><span class="hs-identifier hs-type">res</span></a><span class="hs-special">,</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679158705"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span>
</span><a name="line-140"></a><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Manager</span><span> </span><span class="hs-comment">-- ^ http-client Connection manager</span><span> </span><a name="line-140"></a><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Manager</span><span> </span><span class="hs-comment">-- ^ http-client Connection manager</span><span>
</span><a name="line-141"></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Client.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-comment">-- ^ config</span><span> </span><a name="line-141"></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Client.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-comment">-- ^ config</span><span>
</span><a name="line-142"></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679142166"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679142169"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679142168"><span class="hs-identifier hs-type">res</span></a><span> </span><span class="hs-comment">-- ^ request</span><span> </span><a name="line-142"></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679158702"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679158705"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679158704"><span class="hs-identifier hs-type">res</span></a><span> </span><span class="hs-comment">-- ^ request</span><span>
</span><a name="line-143"></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="#local-6989586621679142167"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ &quot;accept&quot; 'MimeType'</span><span> </span><a name="line-143"></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="#local-6989586621679158703"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ &quot;accept&quot; 'MimeType'</span><span>
</span><a name="line-144"></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Client.html#MimeResult"><span class="hs-identifier hs-type">MimeResult</span></a><span> </span><a href="#local-6989586621679142168"><span class="hs-identifier hs-type">res</span></a><span class="hs-special">)</span><span> </span><span class="hs-comment">-- ^ response</span><span> </span><a name="line-144"></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Client.html#MimeResult"><span class="hs-identifier hs-type">MimeResult</span></a><span> </span><a href="#local-6989586621679158704"><span class="hs-identifier hs-type">res</span></a><span class="hs-special">)</span><span> </span><span class="hs-comment">-- ^ response</span><span>
</span><a name="line-145"></a><a name="dispatchMime"><a href="SwaggerPetstore.Client.html#dispatchMime"><span class="hs-identifier">dispatchMime</span></a></a><span> </span><a name="local-6989586621679142185"><a href="#local-6989586621679142185"><span class="hs-identifier">manager</span></a></a><span> </span><a name="local-6989586621679142186"><a href="#local-6989586621679142186"><span class="hs-identifier">config</span></a></a><span> </span><a name="local-6989586621679142187"><a href="#local-6989586621679142187"><span class="hs-identifier">request</span></a></a><span> </span><a name="local-6989586621679142188"><a href="#local-6989586621679142188"><span class="hs-identifier">accept</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span> </span><a name="line-145"></a><a name="dispatchMime"><a href="SwaggerPetstore.Client.html#dispatchMime"><span class="hs-identifier">dispatchMime</span></a></a><span> </span><a name="local-6989586621679158721"><a href="#local-6989586621679158721"><span class="hs-identifier">manager</span></a></a><span> </span><a name="local-6989586621679158722"><a href="#local-6989586621679158722"><span class="hs-identifier">config</span></a></a><span> </span><a name="local-6989586621679158723"><a href="#local-6989586621679158723"><span class="hs-identifier">request</span></a></a><span> </span><a name="local-6989586621679158724"><a href="#local-6989586621679158724"><span class="hs-identifier">accept</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
</span><a name="line-146"></a><span> </span><a name="local-6989586621679142189"><a href="#local-6989586621679142189"><span class="hs-identifier">httpResponse</span></a></a><span> </span><span class="hs-glyph">&lt;-</span><span> </span><a href="SwaggerPetstore.Client.html#dispatchLbs"><span class="hs-identifier hs-var">dispatchLbs</span></a><span> </span><a href="#local-6989586621679142185"><span class="hs-identifier hs-var">manager</span></a><span> </span><a href="#local-6989586621679142186"><span class="hs-identifier hs-var">config</span></a><span> </span><a href="#local-6989586621679142187"><span class="hs-identifier hs-var">request</span></a><span> </span><a href="#local-6989586621679142188"><span class="hs-identifier hs-var">accept</span></a><span> </span><a name="line-146"></a><span> </span><a name="local-6989586621679158725"><a href="#local-6989586621679158725"><span class="hs-identifier">httpResponse</span></a></a><span> </span><span class="hs-glyph">&lt;-</span><span> </span><a href="SwaggerPetstore.Client.html#dispatchLbs"><span class="hs-identifier hs-var">dispatchLbs</span></a><span> </span><a href="#local-6989586621679158721"><span class="hs-identifier hs-var">manager</span></a><span> </span><a href="#local-6989586621679158722"><span class="hs-identifier hs-var">config</span></a><span> </span><a href="#local-6989586621679158723"><span class="hs-identifier hs-var">request</span></a><span> </span><a href="#local-6989586621679158724"><span class="hs-identifier hs-var">accept</span></a><span>
</span><a name="line-147"></a><span> </span><a name="local-6989586621679142192"><a href="#local-6989586621679142192"><span class="hs-identifier">parsedResult</span></a></a><span> </span><span class="hs-glyph">&lt;-</span><span> </span><a name="line-147"></a><span> </span><a name="local-6989586621679158728"><a href="#local-6989586621679158728"><span class="hs-identifier">parsedResult</span></a></a><span> </span><span class="hs-glyph">&lt;-</span><span>
</span><a name="line-148"></a><span> </span><a href="SwaggerPetstore.Client.html#runConfigLogWithExceptions"><span class="hs-identifier hs-var">runConfigLogWithExceptions</span></a><span> </span><span class="hs-string">&quot;Client&quot;</span><span> </span><a href="#local-6989586621679142186"><span class="hs-identifier hs-var">config</span></a><span> </span><span class="hs-operator hs-var">$</span><span> </span><a name="line-148"></a><span> </span><a href="SwaggerPetstore.Client.html#runConfigLogWithExceptions"><span class="hs-identifier hs-var">runConfigLogWithExceptions</span></a><span> </span><span class="hs-string">&quot;Client&quot;</span><span> </span><a href="#local-6989586621679158722"><span class="hs-identifier hs-var">config</span></a><span> </span><span class="hs-operator hs-var">$</span><span>
</span><a name="line-149"></a><span> </span><span class="hs-keyword">do</span><span> </span><span class="hs-keyword">case</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#mimeUnrender%27"><span class="hs-identifier hs-var">mimeUnrender'</span></a><span> </span><a href="#local-6989586621679142188"><span class="hs-identifier hs-var">accept</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier">NH</span><span class="hs-operator">.</span><span class="hs-identifier">responseBody</span><span> </span><a href="#local-6989586621679142189"><span class="hs-identifier hs-var">httpResponse</span></a><span class="hs-special">)</span><span> </span><span class="hs-keyword">of</span><span> </span><a name="line-149"></a><span> </span><span class="hs-keyword">do</span><span> </span><span class="hs-keyword">case</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#mimeUnrender%27"><span class="hs-identifier hs-var">mimeUnrender'</span></a><span> </span><a href="#local-6989586621679158724"><span class="hs-identifier hs-var">accept</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier">NH</span><span class="hs-operator">.</span><span class="hs-identifier">responseBody</span><span> </span><a href="#local-6989586621679158725"><span class="hs-identifier hs-var">httpResponse</span></a><span class="hs-special">)</span><span> </span><span class="hs-keyword">of</span><span>
</span><a name="line-150"></a><span> </span><span class="hs-identifier hs-var">Left</span><span> </span><a name="local-6989586621679142190"><a href="#local-6989586621679142190"><span class="hs-identifier">s</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-keyword">do</span><span> </span><a name="line-150"></a><span> </span><span class="hs-identifier hs-var">Left</span><span> </span><a name="local-6989586621679158726"><a href="#local-6989586621679158726"><span class="hs-identifier">s</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-keyword">do</span><span>
</span><a name="line-151"></a><span> </span><a href="SwaggerPetstore.Logging.html#_log"><span class="hs-identifier hs-var">_log</span></a><span> </span><span class="hs-string">&quot;Client&quot;</span><span> </span><a href="SwaggerPetstore.Logging.html#levelError"><span class="hs-identifier hs-var">levelError</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">T</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">pack</span><span> </span><a href="#local-6989586621679142190"><span class="hs-identifier hs-var">s</span></a><span class="hs-special">)</span><span> </span><a name="line-151"></a><span> </span><a href="SwaggerPetstore.Logging.html#_log"><span class="hs-identifier hs-var">_log</span></a><span> </span><span class="hs-string">&quot;Client&quot;</span><span> </span><a href="SwaggerPetstore.Logging.html#levelError"><span class="hs-identifier hs-var">levelError</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">T</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">pack</span><span> </span><a href="#local-6989586621679158726"><span class="hs-identifier hs-var">s</span></a><span class="hs-special">)</span><span>
</span><a name="line-152"></a><span> </span><span class="hs-identifier hs-var">pure</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">Left</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Client.html#MimeError"><span class="hs-identifier hs-var">MimeError</span></a><span> </span><a href="#local-6989586621679142190"><span class="hs-identifier hs-var">s</span></a><span> </span><a href="#local-6989586621679142189"><span class="hs-identifier hs-var">httpResponse</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span> </span><a name="line-152"></a><span> </span><span class="hs-identifier hs-var">pure</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">Left</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Client.html#MimeError"><span class="hs-identifier hs-var">MimeError</span></a><span> </span><a href="#local-6989586621679158726"><span class="hs-identifier hs-var">s</span></a><span> </span><a href="#local-6989586621679158725"><span class="hs-identifier hs-var">httpResponse</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span>
</span><a name="line-153"></a><span> </span><span class="hs-identifier hs-var">Right</span><span> </span><a name="local-6989586621679142191"><a href="#local-6989586621679142191"><span class="hs-identifier">r</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-var">pure</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">Right</span><span> </span><a href="#local-6989586621679142191"><span class="hs-identifier hs-var">r</span></a><span class="hs-special">)</span><span> </span><a name="line-153"></a><span> </span><span class="hs-identifier hs-var">Right</span><span> </span><a name="local-6989586621679158727"><a href="#local-6989586621679158727"><span class="hs-identifier">r</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-var">pure</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">Right</span><span> </span><a href="#local-6989586621679158727"><span class="hs-identifier hs-var">r</span></a><span class="hs-special">)</span><span>
</span><a name="line-154"></a><span> </span><span class="hs-identifier hs-var">return</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Client.html#MimeResult"><span class="hs-identifier hs-var">MimeResult</span></a><span> </span><a href="#local-6989586621679142192"><span class="hs-identifier hs-var">parsedResult</span></a><span> </span><a href="#local-6989586621679142189"><span class="hs-identifier hs-var">httpResponse</span></a><span class="hs-special">)</span><span> </span><a name="line-154"></a><span> </span><span class="hs-identifier hs-var">return</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Client.html#MimeResult"><span class="hs-identifier hs-var">MimeResult</span></a><span> </span><a href="#local-6989586621679158728"><span class="hs-identifier hs-var">parsedResult</span></a><span> </span><a href="#local-6989586621679158725"><span class="hs-identifier hs-var">httpResponse</span></a><span class="hs-special">)</span><span>
</span><a name="line-155"></a><span> </span><a name="line-155"></a><span>
</span><a name="line-156"></a><span class="hs-comment">-- | like 'dispatchMime', but only returns the decoded http body</span><span> </span><a name="line-156"></a><span class="hs-comment">-- | like 'dispatchMime', but only returns the decoded http body</span><span>
</span><a name="line-157"></a><span class="hs-identifier">dispatchMime'</span><span> </span><a name="line-157"></a><span class="hs-identifier">dispatchMime'</span><span>
</span><a name="line-158"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="#local-6989586621679142162"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679142163"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">,</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="#local-6989586621679142163"><span class="hs-identifier hs-type">accept</span></a><span> </span><a href="#local-6989586621679142164"><span class="hs-identifier hs-type">res</span></a><span class="hs-special">,</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679142165"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span> </span><a name="line-158"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="#local-6989586621679158698"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679158699"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">,</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="#local-6989586621679158699"><span class="hs-identifier hs-type">accept</span></a><span> </span><a href="#local-6989586621679158700"><span class="hs-identifier hs-type">res</span></a><span class="hs-special">,</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679158701"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span>
</span><a name="line-159"></a><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Manager</span><span> </span><span class="hs-comment">-- ^ http-client Connection manager</span><span> </span><a name="line-159"></a><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Manager</span><span> </span><span class="hs-comment">-- ^ http-client Connection manager</span><span>
</span><a name="line-160"></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Client.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-comment">-- ^ config</span><span> </span><a name="line-160"></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Client.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-comment">-- ^ config</span><span>
</span><a name="line-161"></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679142162"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679142165"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679142164"><span class="hs-identifier hs-type">res</span></a><span> </span><span class="hs-comment">-- ^ request</span><span> </span><a name="line-161"></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679158698"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679158701"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679158700"><span class="hs-identifier hs-type">res</span></a><span> </span><span class="hs-comment">-- ^ request</span><span>
</span><a name="line-162"></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="#local-6989586621679142163"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ &quot;accept&quot; 'MimeType'</span><span> </span><a name="line-162"></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="#local-6989586621679158699"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ &quot;accept&quot; 'MimeType'</span><span>
</span><a name="line-163"></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Either</span><span> </span><a href="SwaggerPetstore.Client.html#MimeError"><span class="hs-identifier hs-type">MimeError</span></a><span> </span><a href="#local-6989586621679142164"><span class="hs-identifier hs-type">res</span></a><span class="hs-special">)</span><span> </span><span class="hs-comment">-- ^ response</span><span> </span><a name="line-163"></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Either</span><span> </span><a href="SwaggerPetstore.Client.html#MimeError"><span class="hs-identifier hs-type">MimeError</span></a><span> </span><a href="#local-6989586621679158700"><span class="hs-identifier hs-type">res</span></a><span class="hs-special">)</span><span> </span><span class="hs-comment">-- ^ response</span><span>
</span><a name="line-164"></a><a name="dispatchMime%27"><a href="SwaggerPetstore.Client.html#dispatchMime%27"><span class="hs-identifier">dispatchMime'</span></a></a><span> </span><a name="local-6989586621679142193"><a href="#local-6989586621679142193"><span class="hs-identifier">manager</span></a></a><span> </span><a name="local-6989586621679142194"><a href="#local-6989586621679142194"><span class="hs-identifier">config</span></a></a><span> </span><a name="local-6989586621679142195"><a href="#local-6989586621679142195"><span class="hs-identifier">request</span></a></a><span> </span><a name="local-6989586621679142196"><a href="#local-6989586621679142196"><span class="hs-identifier">accept</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span> </span><a name="line-164"></a><a name="dispatchMime%27"><a href="SwaggerPetstore.Client.html#dispatchMime%27"><span class="hs-identifier">dispatchMime'</span></a></a><span> </span><a name="local-6989586621679158729"><a href="#local-6989586621679158729"><span class="hs-identifier">manager</span></a></a><span> </span><a name="local-6989586621679158730"><a href="#local-6989586621679158730"><span class="hs-identifier">config</span></a></a><span> </span><a name="local-6989586621679158731"><a href="#local-6989586621679158731"><span class="hs-identifier">request</span></a></a><span> </span><a name="local-6989586621679158732"><a href="#local-6989586621679158732"><span class="hs-identifier">accept</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
</span><a name="line-165"></a><span> </span><a href="SwaggerPetstore.Client.html#MimeResult"><span class="hs-identifier hs-var">MimeResult</span></a><span> </span><a name="local-6989586621679142197"><a href="#local-6989586621679142197"><span class="hs-identifier">parsedResult</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">&lt;-</span><span> </span><a href="SwaggerPetstore.Client.html#dispatchMime"><span class="hs-identifier hs-var">dispatchMime</span></a><span> </span><a href="#local-6989586621679142193"><span class="hs-identifier hs-var">manager</span></a><span> </span><a href="#local-6989586621679142194"><span class="hs-identifier hs-var">config</span></a><span> </span><a href="#local-6989586621679142195"><span class="hs-identifier hs-var">request</span></a><span> </span><a href="#local-6989586621679142196"><span class="hs-identifier hs-var">accept</span></a><span> </span><span> </span><a name="line-165"></a><span> </span><a href="SwaggerPetstore.Client.html#MimeResult"><span class="hs-identifier hs-var">MimeResult</span></a><span> </span><a name="local-6989586621679158733"><a href="#local-6989586621679158733"><span class="hs-identifier">parsedResult</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">&lt;-</span><span> </span><a href="SwaggerPetstore.Client.html#dispatchMime"><span class="hs-identifier hs-var">dispatchMime</span></a><span> </span><a href="#local-6989586621679158729"><span class="hs-identifier hs-var">manager</span></a><span> </span><a href="#local-6989586621679158730"><span class="hs-identifier hs-var">config</span></a><span> </span><a href="#local-6989586621679158731"><span class="hs-identifier hs-var">request</span></a><span> </span><a href="#local-6989586621679158732"><span class="hs-identifier hs-var">accept</span></a><span> </span><span>
</span><a name="line-166"></a><span> </span><span class="hs-identifier hs-var">return</span><span> </span><a href="#local-6989586621679142197"><span class="hs-identifier hs-var">parsedResult</span></a><span> </span><a name="line-166"></a><span> </span><span class="hs-identifier hs-var">return</span><span> </span><a href="#local-6989586621679158733"><span class="hs-identifier hs-var">parsedResult</span></a><span>
</span><a name="line-167"></a><span> </span><a name="line-167"></a><span>
</span><a name="line-168"></a><span class="hs-comment">-- ** Unsafe</span><span> </span><a name="line-168"></a><span class="hs-comment">-- ** Unsafe</span><span>
</span><a name="line-169"></a><span> </span><a name="line-169"></a><span>
</span><a name="line-170"></a><span class="hs-comment">-- | like 'dispatchReqLbs', but does not validate the operation is a 'Producer' of the &quot;accept&quot; 'MimeType'. (Useful if the server's response is undocumented)</span><span> </span><a name="line-170"></a><span class="hs-comment">-- | like 'dispatchReqLbs', but does not validate the operation is a 'Producer' of the &quot;accept&quot; 'MimeType'. (Useful if the server's response is undocumented)</span><span>
</span><a name="line-171"></a><span class="hs-identifier">dispatchLbsUnsafe</span><span> </span><a name="line-171"></a><span class="hs-identifier">dispatchLbsUnsafe</span><span>
</span><a name="line-172"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679142158"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">,</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679142159"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span> </span><a name="line-172"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679158694"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">,</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679158695"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span>
</span><a name="line-173"></a><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Manager</span><span> </span><span class="hs-comment">-- ^ http-client Connection manager</span><span> </span><a name="line-173"></a><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Manager</span><span> </span><span class="hs-comment">-- ^ http-client Connection manager</span><span>
</span><a name="line-174"></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Client.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-comment">-- ^ config</span><span> </span><a name="line-174"></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Client.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-comment">-- ^ config</span><span>
</span><a name="line-175"></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679142160"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679142159"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679142161"><span class="hs-identifier hs-type">res</span></a><span> </span><span class="hs-comment">-- ^ request</span><span> </span><a name="line-175"></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679158696"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679158695"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679158697"><span class="hs-identifier hs-type">res</span></a><span> </span><span class="hs-comment">-- ^ request</span><span>
</span><a name="line-176"></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="#local-6989586621679142158"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ &quot;accept&quot; 'MimeType'</span><span> </span><a name="line-176"></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="#local-6989586621679158694"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ &quot;accept&quot; 'MimeType'</span><span>
</span><a name="line-177"></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Response</span><span> </span><span class="hs-identifier hs-type">BCL</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span class="hs-special">)</span><span> </span><span class="hs-comment">-- ^ response</span><span> </span><a name="line-177"></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Response</span><span> </span><span class="hs-identifier hs-type">BCL</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span class="hs-special">)</span><span> </span><span class="hs-comment">-- ^ response</span><span>
</span><a name="line-178"></a><a name="dispatchLbsUnsafe"><a href="SwaggerPetstore.Client.html#dispatchLbsUnsafe"><span class="hs-identifier">dispatchLbsUnsafe</span></a></a><span> </span><a name="local-6989586621679142198"><a href="#local-6989586621679142198"><span class="hs-identifier">manager</span></a></a><span> </span><a name="local-6989586621679142199"><a href="#local-6989586621679142199"><span class="hs-identifier">config</span></a></a><span> </span><a name="local-6989586621679142200"><a href="#local-6989586621679142200"><span class="hs-identifier">request</span></a></a><span> </span><a name="local-6989586621679142201"><a href="#local-6989586621679142201"><span class="hs-identifier">accept</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span> </span><a name="line-178"></a><a name="dispatchLbsUnsafe"><a href="SwaggerPetstore.Client.html#dispatchLbsUnsafe"><span class="hs-identifier">dispatchLbsUnsafe</span></a></a><span> </span><a name="local-6989586621679158734"><a href="#local-6989586621679158734"><span class="hs-identifier">manager</span></a></a><span> </span><a name="local-6989586621679158735"><a href="#local-6989586621679158735"><span class="hs-identifier">config</span></a></a><span> </span><a name="local-6989586621679158736"><a href="#local-6989586621679158736"><span class="hs-identifier">request</span></a></a><span> </span><a name="local-6989586621679158737"><a href="#local-6989586621679158737"><span class="hs-identifier">accept</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
</span><a name="line-179"></a><span> </span><a name="local-6989586621679142202"><a href="#local-6989586621679142202"><span class="hs-identifier">initReq</span></a></a><span> </span><span class="hs-glyph">&lt;-</span><span> </span><a href="SwaggerPetstore.Client.html#_toInitRequest"><span class="hs-identifier hs-var">_toInitRequest</span></a><span> </span><a href="#local-6989586621679142199"><span class="hs-identifier hs-var">config</span></a><span> </span><a href="#local-6989586621679142200"><span class="hs-identifier hs-var">request</span></a><span> </span><a href="#local-6989586621679142201"><span class="hs-identifier hs-var">accept</span></a><span> </span><a name="line-179"></a><span> </span><a name="local-6989586621679158738"><a href="#local-6989586621679158738"><span class="hs-identifier">initReq</span></a></a><span> </span><span class="hs-glyph">&lt;-</span><span> </span><a href="SwaggerPetstore.Client.html#_toInitRequest"><span class="hs-identifier hs-var">_toInitRequest</span></a><span> </span><a href="#local-6989586621679158735"><span class="hs-identifier hs-var">config</span></a><span> </span><a href="#local-6989586621679158736"><span class="hs-identifier hs-var">request</span></a><span> </span><a href="#local-6989586621679158737"><span class="hs-identifier hs-var">accept</span></a><span>
</span><a name="line-180"></a><span> </span><a href="SwaggerPetstore.Client.html#dispatchInitUnsafe"><span class="hs-identifier hs-var">dispatchInitUnsafe</span></a><span> </span><a href="#local-6989586621679142198"><span class="hs-identifier hs-var">manager</span></a><span> </span><a href="#local-6989586621679142199"><span class="hs-identifier hs-var">config</span></a><span> </span><a href="#local-6989586621679142202"><span class="hs-identifier hs-var">initReq</span></a><span> </span><a name="line-180"></a><span> </span><a href="SwaggerPetstore.Client.html#dispatchInitUnsafe"><span class="hs-identifier hs-var">dispatchInitUnsafe</span></a><span> </span><a href="#local-6989586621679158734"><span class="hs-identifier hs-var">manager</span></a><span> </span><a href="#local-6989586621679158735"><span class="hs-identifier hs-var">config</span></a><span> </span><a href="#local-6989586621679158738"><span class="hs-identifier hs-var">initReq</span></a><span>
</span><a name="line-181"></a><span> </span><a name="line-181"></a><span>
</span><a name="line-182"></a><span class="hs-comment">-- | dispatch an InitRequest</span><span> </span><a name="line-182"></a><span class="hs-comment">-- | dispatch an InitRequest</span><span>
</span><a name="line-183"></a><span class="hs-identifier">dispatchInitUnsafe</span><span> </span><a name="line-183"></a><span class="hs-identifier">dispatchInitUnsafe</span><span>
</span><a name="line-184"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Manager</span><span> </span><span class="hs-comment">-- ^ http-client Connection manager</span><span> </span><a name="line-184"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Manager</span><span> </span><span class="hs-comment">-- ^ http-client Connection manager</span><span>
</span><a name="line-185"></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Client.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-comment">-- ^ config</span><span> </span><a name="line-185"></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Client.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-comment">-- ^ config</span><span>
</span><a name="line-186"></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Client.html#InitRequest"><span class="hs-identifier hs-type">InitRequest</span></a><span> </span><a href="#local-6989586621679142154"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679142155"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679142156"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679142157"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ init request</span><span> </span><a name="line-186"></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Client.html#InitRequest"><span class="hs-identifier hs-type">InitRequest</span></a><span> </span><a href="#local-6989586621679158690"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679158691"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679158692"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679158693"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ init request</span><span>
</span><a name="line-187"></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Response</span><span> </span><span class="hs-identifier hs-type">BCL</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span class="hs-special">)</span><span> </span><span class="hs-comment">-- ^ response</span><span> </span><a name="line-187"></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Response</span><span> </span><span class="hs-identifier hs-type">BCL</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span class="hs-special">)</span><span> </span><span class="hs-comment">-- ^ response</span><span>
</span><a name="line-188"></a><a name="dispatchInitUnsafe"><a href="SwaggerPetstore.Client.html#dispatchInitUnsafe"><span class="hs-identifier">dispatchInitUnsafe</span></a></a><span> </span><a name="local-6989586621679142203"><a href="#local-6989586621679142203"><span class="hs-identifier">manager</span></a></a><span> </span><a name="local-6989586621679142204"><a href="#local-6989586621679142204"><span class="hs-identifier">config</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Client.html#InitRequest"><span class="hs-identifier hs-var">InitRequest</span></a><span> </span><a name="local-6989586621679142205"><a href="#local-6989586621679142205"><span class="hs-identifier">req</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span> </span><a name="line-188"></a><a name="dispatchInitUnsafe"><a href="SwaggerPetstore.Client.html#dispatchInitUnsafe"><span class="hs-identifier">dispatchInitUnsafe</span></a></a><span> </span><a name="local-6989586621679158739"><a href="#local-6989586621679158739"><span class="hs-identifier">manager</span></a></a><span> </span><a name="local-6989586621679158740"><a href="#local-6989586621679158740"><span class="hs-identifier">config</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Client.html#InitRequest"><span class="hs-identifier hs-var">InitRequest</span></a><span> </span><a name="local-6989586621679158741"><a href="#local-6989586621679158741"><span class="hs-identifier">req</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
</span><a name="line-189"></a><span> </span><a href="SwaggerPetstore.Client.html#runConfigLogWithExceptions"><span class="hs-identifier hs-var">runConfigLogWithExceptions</span></a><span> </span><a href="#local-6989586621679142206"><span class="hs-identifier hs-var">src</span></a><span> </span><a href="#local-6989586621679142204"><span class="hs-identifier hs-var">config</span></a><span> </span><span class="hs-operator hs-var">$</span><span> </span><a name="line-189"></a><span> </span><a href="SwaggerPetstore.Client.html#runConfigLogWithExceptions"><span class="hs-identifier hs-var">runConfigLogWithExceptions</span></a><span> </span><a href="#local-6989586621679158742"><span class="hs-identifier hs-var">src</span></a><span> </span><a href="#local-6989586621679158740"><span class="hs-identifier hs-var">config</span></a><span> </span><span class="hs-operator hs-var">$</span><span>
</span><a name="line-190"></a><span> </span><span class="hs-keyword">do</span><span> </span><a href="SwaggerPetstore.Logging.html#_log"><span class="hs-identifier hs-var">_log</span></a><span> </span><a href="#local-6989586621679142206"><span class="hs-identifier hs-var">src</span></a><span> </span><a href="SwaggerPetstore.Logging.html#levelInfo"><span class="hs-identifier hs-var">levelInfo</span></a><span> </span><a href="#local-6989586621679142208"><span class="hs-identifier hs-var">requestLogMsg</span></a><span> </span><a name="line-190"></a><span> </span><span class="hs-keyword">do</span><span> </span><a href="SwaggerPetstore.Logging.html#_log"><span class="hs-identifier hs-var">_log</span></a><span> </span><a href="#local-6989586621679158742"><span class="hs-identifier hs-var">src</span></a><span> </span><a href="SwaggerPetstore.Logging.html#levelInfo"><span class="hs-identifier hs-var">levelInfo</span></a><span> </span><a href="#local-6989586621679158744"><span class="hs-identifier hs-var">requestLogMsg</span></a><span>
</span><a name="line-191"></a><span> </span><a href="SwaggerPetstore.Logging.html#_log"><span class="hs-identifier hs-var">_log</span></a><span> </span><a href="#local-6989586621679142206"><span class="hs-identifier hs-var">src</span></a><span> </span><a href="SwaggerPetstore.Logging.html#levelDebug"><span class="hs-identifier hs-var">levelDebug</span></a><span> </span><a href="#local-6989586621679142209"><span class="hs-identifier hs-var">requestDbgLogMsg</span></a><span> </span><a name="line-191"></a><span> </span><a href="SwaggerPetstore.Logging.html#_log"><span class="hs-identifier hs-var">_log</span></a><span> </span><a href="#local-6989586621679158742"><span class="hs-identifier hs-var">src</span></a><span> </span><a href="SwaggerPetstore.Logging.html#levelDebug"><span class="hs-identifier hs-var">levelDebug</span></a><span> </span><a href="#local-6989586621679158745"><span class="hs-identifier hs-var">requestDbgLogMsg</span></a><span>
</span><a name="line-192"></a><span> </span><a name="local-6989586621679142641"><a href="#local-6989586621679142641"><span class="hs-identifier">res</span></a></a><span> </span><span class="hs-glyph">&lt;-</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">liftIO</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">NH</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">httpLbs</span><span> </span><a href="#local-6989586621679142205"><span class="hs-identifier hs-var">req</span></a><span> </span><a href="#local-6989586621679142203"><span class="hs-identifier hs-var">manager</span></a><span> </span><a name="line-192"></a><span> </span><a name="local-6989586621679159177"><a href="#local-6989586621679159177"><span class="hs-identifier">res</span></a></a><span> </span><span class="hs-glyph">&lt;-</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">liftIO</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">NH</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">httpLbs</span><span> </span><a href="#local-6989586621679158741"><span class="hs-identifier hs-var">req</span></a><span> </span><a href="#local-6989586621679158739"><span class="hs-identifier hs-var">manager</span></a><span>
</span><a name="line-193"></a><span> </span><a href="SwaggerPetstore.Logging.html#_log"><span class="hs-identifier hs-var">_log</span></a><span> </span><a href="#local-6989586621679142206"><span class="hs-identifier hs-var">src</span></a><span> </span><a href="SwaggerPetstore.Logging.html#levelInfo"><span class="hs-identifier hs-var">levelInfo</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679142211"><span class="hs-identifier hs-var">responseLogMsg</span></a><span> </span><a href="#local-6989586621679142641"><span class="hs-identifier hs-var">res</span></a><span class="hs-special">)</span><span> </span><a name="line-193"></a><span> </span><a href="SwaggerPetstore.Logging.html#_log"><span class="hs-identifier hs-var">_log</span></a><span> </span><a href="#local-6989586621679158742"><span class="hs-identifier hs-var">src</span></a><span> </span><a href="SwaggerPetstore.Logging.html#levelInfo"><span class="hs-identifier hs-var">levelInfo</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679158747"><span class="hs-identifier hs-var">responseLogMsg</span></a><span> </span><a href="#local-6989586621679159177"><span class="hs-identifier hs-var">res</span></a><span class="hs-special">)</span><span>
</span><a name="line-194"></a><span> </span><a href="SwaggerPetstore.Logging.html#_log"><span class="hs-identifier hs-var">_log</span></a><span> </span><a href="#local-6989586621679142206"><span class="hs-identifier hs-var">src</span></a><span> </span><a href="SwaggerPetstore.Logging.html#levelDebug"><span class="hs-identifier hs-var">levelDebug</span></a><span> </span><span class="hs-special">(</span><span class="hs-special">(</span><span class="hs-identifier hs-var">T</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">pack</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">show</span><span class="hs-special">)</span><span> </span><a href="#local-6989586621679142641"><span class="hs-identifier hs-var">res</span></a><span class="hs-special">)</span><span> </span><a name="line-194"></a><span> </span><a href="SwaggerPetstore.Logging.html#_log"><span class="hs-identifier hs-var">_log</span></a><span> </span><a href="#local-6989586621679158742"><span class="hs-identifier hs-var">src</span></a><span> </span><a href="SwaggerPetstore.Logging.html#levelDebug"><span class="hs-identifier hs-var">levelDebug</span></a><span> </span><span class="hs-special">(</span><span class="hs-special">(</span><span class="hs-identifier hs-var">T</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">pack</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">show</span><span class="hs-special">)</span><span> </span><a href="#local-6989586621679159177"><span class="hs-identifier hs-var">res</span></a><span class="hs-special">)</span><span>
</span><a name="line-195"></a><span> </span><span class="hs-identifier hs-var">return</span><span> </span><a href="#local-6989586621679142641"><span class="hs-identifier hs-var">res</span></a><span> </span><a name="line-195"></a><span> </span><span class="hs-identifier hs-var">return</span><span> </span><a href="#local-6989586621679159177"><span class="hs-identifier hs-var">res</span></a><span>
</span><a name="line-196"></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="line-196"></a><span> </span><span class="hs-keyword">where</span><span>
</span><a name="line-197"></a><span> </span><a name="local-6989586621679142206"><a href="#local-6989586621679142206"><span class="hs-identifier">src</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-string">&quot;Client&quot;</span><span> </span><a name="line-197"></a><span> </span><a name="local-6989586621679158742"><a href="#local-6989586621679158742"><span class="hs-identifier">src</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-string">&quot;Client&quot;</span><span>
</span><a name="line-198"></a><span> </span><a name="local-6989586621679142207"><a href="#local-6989586621679142207"><span class="hs-identifier">endpoint</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a name="line-198"></a><span> </span><a name="local-6989586621679158743"><a href="#local-6989586621679158743"><span class="hs-identifier">endpoint</span></a></a><span> </span><span class="hs-glyph">=</span><span>
</span><a name="line-199"></a><span> </span><span class="hs-identifier hs-var">T</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">pack</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><a name="line-199"></a><span> </span><span class="hs-identifier hs-var">T</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">pack</span><span> </span><span class="hs-operator hs-var">$</span><span>
</span><a name="line-200"></a><span> </span><span class="hs-identifier hs-var">BC</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">unpack</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><a name="line-200"></a><span> </span><span class="hs-identifier hs-var">BC</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">unpack</span><span> </span><span class="hs-operator hs-var">$</span><span>
</span><a name="line-201"></a><span> </span><span class="hs-identifier">NH</span><span class="hs-operator">.</span><span class="hs-identifier">method</span><span> </span><a href="#local-6989586621679142205"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-operator hs-var">&lt;&gt;</span><span> </span><span class="hs-string">&quot; &quot;</span><span> </span><span class="hs-operator hs-var">&lt;&gt;</span><span> </span><span class="hs-identifier">NH</span><span class="hs-operator">.</span><span class="hs-identifier">host</span><span> </span><a href="#local-6989586621679142205"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-operator hs-var">&lt;&gt;</span><span> </span><span class="hs-identifier">NH</span><span class="hs-operator">.</span><span class="hs-identifier">path</span><span> </span><a href="#local-6989586621679142205"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-operator hs-var">&lt;&gt;</span><span> </span><span class="hs-identifier">NH</span><span class="hs-operator">.</span><span class="hs-identifier">queryString</span><span> </span><a href="#local-6989586621679142205"><span class="hs-identifier hs-var">req</span></a><span> </span><a name="line-201"></a><span> </span><span class="hs-identifier">NH</span><span class="hs-operator">.</span><span class="hs-identifier">method</span><span> </span><a href="#local-6989586621679158741"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-operator hs-var">&lt;&gt;</span><span> </span><span class="hs-string">&quot; &quot;</span><span> </span><span class="hs-operator hs-var">&lt;&gt;</span><span> </span><span class="hs-identifier">NH</span><span class="hs-operator">.</span><span class="hs-identifier">host</span><span> </span><a href="#local-6989586621679158741"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-operator hs-var">&lt;&gt;</span><span> </span><span class="hs-identifier">NH</span><span class="hs-operator">.</span><span class="hs-identifier">path</span><span> </span><a href="#local-6989586621679158741"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-operator hs-var">&lt;&gt;</span><span> </span><span class="hs-identifier">NH</span><span class="hs-operator">.</span><span class="hs-identifier">queryString</span><span> </span><a href="#local-6989586621679158741"><span class="hs-identifier hs-var">req</span></a><span>
</span><a name="line-202"></a><span> </span><a name="local-6989586621679142208"><a href="#local-6989586621679142208"><span class="hs-identifier">requestLogMsg</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-string">&quot;REQ:&quot;</span><span> </span><span class="hs-operator hs-var">&lt;&gt;</span><span> </span><a href="#local-6989586621679142207"><span class="hs-identifier hs-var">endpoint</span></a><span> </span><a name="line-202"></a><span> </span><a name="local-6989586621679158744"><a href="#local-6989586621679158744"><span class="hs-identifier">requestLogMsg</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-string">&quot;REQ:&quot;</span><span> </span><span class="hs-operator hs-var">&lt;&gt;</span><span> </span><a href="#local-6989586621679158743"><span class="hs-identifier hs-var">endpoint</span></a><span>
</span><a name="line-203"></a><span> </span><a name="local-6989586621679142209"><a href="#local-6989586621679142209"><span class="hs-identifier">requestDbgLogMsg</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a name="line-203"></a><span> </span><a name="local-6989586621679158745"><a href="#local-6989586621679158745"><span class="hs-identifier">requestDbgLogMsg</span></a></a><span> </span><span class="hs-glyph">=</span><span>
</span><a name="line-204"></a><span> </span><span class="hs-string">&quot;Headers=&quot;</span><span> </span><span class="hs-operator hs-var">&lt;&gt;</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">T</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">pack</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">show</span><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><span class="hs-identifier">NH</span><span class="hs-operator">.</span><span class="hs-identifier">requestHeaders</span><span> </span><a href="#local-6989586621679142205"><span class="hs-identifier hs-var">req</span></a><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;&gt;</span><span> </span><span class="hs-string">&quot; Body=&quot;</span><span> </span><span class="hs-operator hs-var">&lt;&gt;</span><span> </span><a name="line-204"></a><span> </span><span class="hs-string">&quot;Headers=&quot;</span><span> </span><span class="hs-operator hs-var">&lt;&gt;</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">T</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">pack</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">show</span><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><span class="hs-identifier">NH</span><span class="hs-operator">.</span><span class="hs-identifier">requestHeaders</span><span> </span><a href="#local-6989586621679158741"><span class="hs-identifier hs-var">req</span></a><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;&gt;</span><span> </span><span class="hs-string">&quot; Body=&quot;</span><span> </span><span class="hs-operator hs-var">&lt;&gt;</span><span>
</span><a name="line-205"></a><span> </span><span class="hs-special">(</span><span class="hs-keyword">case</span><span> </span><span class="hs-identifier">NH</span><span class="hs-operator">.</span><span class="hs-identifier">requestBody</span><span> </span><a href="#local-6989586621679142205"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-keyword">of</span><span> </span><a name="line-205"></a><span> </span><span class="hs-special">(</span><span class="hs-keyword">case</span><span> </span><span class="hs-identifier">NH</span><span class="hs-operator">.</span><span class="hs-identifier">requestBody</span><span> </span><a href="#local-6989586621679158741"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-keyword">of</span><span>
</span><a name="line-206"></a><span> </span><span class="hs-identifier hs-var">NH</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">RequestBodyLBS</span><span> </span><a name="local-6989586621679142212"><a href="#local-6989586621679142212"><span class="hs-identifier">xs</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-var">T</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">decodeUtf8</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">BL</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">toStrict</span><span> </span><a href="#local-6989586621679142212"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span> </span><a name="line-206"></a><span> </span><span class="hs-identifier hs-var">NH</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">RequestBodyLBS</span><span> </span><a name="local-6989586621679158748"><a href="#local-6989586621679158748"><span class="hs-identifier">xs</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-var">T</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">decodeUtf8</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">BL</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">toStrict</span><span> </span><a href="#local-6989586621679158748"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
</span><a name="line-207"></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-string">&quot;&lt;RequestBody&gt;&quot;</span><span class="hs-special">)</span><span> </span><a name="line-207"></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-string">&quot;&lt;RequestBody&gt;&quot;</span><span class="hs-special">)</span><span>
</span><a name="line-208"></a><span> </span><a name="local-6989586621679142210"><a href="#local-6989586621679142210"><span class="hs-identifier">responseStatusCode</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">T</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">pack</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">show</span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier">NH</span><span class="hs-operator">.</span><span class="hs-identifier">statusCode</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier">NH</span><span class="hs-operator">.</span><span class="hs-identifier">responseStatus</span><span> </span><a name="line-208"></a><span> </span><a name="local-6989586621679158746"><a href="#local-6989586621679158746"><span class="hs-identifier">responseStatusCode</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">T</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">pack</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">show</span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier">NH</span><span class="hs-operator">.</span><span class="hs-identifier">statusCode</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier">NH</span><span class="hs-operator">.</span><span class="hs-identifier">responseStatus</span><span>
</span><a name="line-209"></a><span> </span><a name="local-6989586621679142211"><a href="#local-6989586621679142211"><span class="hs-identifier">responseLogMsg</span></a></a><span> </span><a name="local-6989586621679142587"><a href="#local-6989586621679142587"><span class="hs-identifier">res</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a name="line-209"></a><span> </span><a name="local-6989586621679158747"><a href="#local-6989586621679158747"><span class="hs-identifier">responseLogMsg</span></a></a><span> </span><a name="local-6989586621679159123"><a href="#local-6989586621679159123"><span class="hs-identifier">res</span></a></a><span> </span><span class="hs-glyph">=</span><span>
</span><a name="line-210"></a><span> </span><span class="hs-string">&quot;RES:statusCode=&quot;</span><span> </span><span class="hs-operator hs-var">&lt;&gt;</span><span> </span><a href="#local-6989586621679142210"><span class="hs-identifier hs-var">responseStatusCode</span></a><span> </span><a href="#local-6989586621679142587"><span class="hs-identifier hs-var">res</span></a><span> </span><span class="hs-operator hs-var">&lt;&gt;</span><span> </span><span class="hs-string">&quot; (&quot;</span><span> </span><span class="hs-operator hs-var">&lt;&gt;</span><span> </span><a href="#local-6989586621679142207"><span class="hs-identifier hs-var">endpoint</span></a><span> </span><span class="hs-operator hs-var">&lt;&gt;</span><span> </span><span class="hs-string">&quot;)&quot;</span><span> </span><a name="line-210"></a><span> </span><span class="hs-string">&quot;RES:statusCode=&quot;</span><span> </span><span class="hs-operator hs-var">&lt;&gt;</span><span> </span><a href="#local-6989586621679158746"><span class="hs-identifier hs-var">responseStatusCode</span></a><span> </span><a href="#local-6989586621679159123"><span class="hs-identifier hs-var">res</span></a><span> </span><span class="hs-operator hs-var">&lt;&gt;</span><span> </span><span class="hs-string">&quot; (&quot;</span><span> </span><span class="hs-operator hs-var">&lt;&gt;</span><span> </span><a href="#local-6989586621679158743"><span class="hs-identifier hs-var">endpoint</span></a><span> </span><span class="hs-operator hs-var">&lt;&gt;</span><span> </span><span class="hs-string">&quot;)&quot;</span><span>
</span><a name="line-211"></a><span> </span><a name="line-211"></a><span>
</span><a name="line-212"></a><span class="hs-comment">-- * InitRequest</span><span> </span><a name="line-212"></a><span class="hs-comment">-- * InitRequest</span><span>
</span><a name="line-213"></a><span> </span><a name="line-213"></a><span>
</span><a name="line-214"></a><span class="hs-comment">-- | wraps an http-client 'Request' with request/response type parameters</span><span> </span><a name="line-214"></a><span class="hs-comment">-- | wraps an http-client 'Request' with request/response type parameters</span><span>
</span><a name="line-215"></a><span class="hs-keyword">newtype</span><span> </span><a name="InitRequest"><a href="SwaggerPetstore.Client.html#InitRequest"><span class="hs-identifier">InitRequest</span></a></a><span> </span><a name="local-6989586621679142134"><a href="#local-6989586621679142134"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679142135"><a href="#local-6989586621679142135"><span class="hs-identifier">contentType</span></a></a><span> </span><a name="local-6989586621679142136"><a href="#local-6989586621679142136"><span class="hs-identifier">res</span></a></a><span> </span><a name="local-6989586621679142137"><a href="#local-6989586621679142137"><span class="hs-identifier">accept</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a name="InitRequest"><a href="SwaggerPetstore.Client.html#InitRequest"><span class="hs-identifier">InitRequest</span></a></a><span> </span><a name="line-215"></a><span class="hs-keyword">newtype</span><span> </span><a name="InitRequest"><a href="SwaggerPetstore.Client.html#InitRequest"><span class="hs-identifier">InitRequest</span></a></a><span> </span><a name="local-6989586621679158670"><a href="#local-6989586621679158670"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679158671"><a href="#local-6989586621679158671"><span class="hs-identifier">contentType</span></a></a><span> </span><a name="local-6989586621679158672"><a href="#local-6989586621679158672"><span class="hs-identifier">res</span></a></a><span> </span><a name="local-6989586621679158673"><a href="#local-6989586621679158673"><span class="hs-identifier">accept</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a name="InitRequest"><a href="SwaggerPetstore.Client.html#InitRequest"><span class="hs-identifier">InitRequest</span></a></a><span>
</span><a name="line-216"></a><span> </span><span class="hs-special">{</span><span> </span><a name="unInitRequest"><a href="SwaggerPetstore.Client.html#unInitRequest"><span class="hs-identifier">unInitRequest</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Request</span><span> </span><a name="line-216"></a><span> </span><span class="hs-special">{</span><span> </span><a name="unInitRequest"><a href="SwaggerPetstore.Client.html#unInitRequest"><span class="hs-identifier">unInitRequest</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Request</span><span>
</span><a name="line-217"></a><span> </span><span class="hs-special">}</span><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Show</span><span class="hs-special">)</span><span> </span><a name="line-217"></a><span> </span><span class="hs-special">}</span><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Show</span><span class="hs-special">)</span><span>
</span><a name="line-218"></a><span> </span><a name="line-218"></a><span>
</span><a name="line-219"></a><span class="hs-comment">-- | Build an http-client 'Request' record from the supplied config and request</span><span> </span><a name="line-219"></a><span class="hs-comment">-- | Build an http-client 'Request' record from the supplied config and request</span><span>
</span><a name="line-220"></a><span class="hs-identifier">_toInitRequest</span><span> </span><a name="line-220"></a><span class="hs-identifier">_toInitRequest</span><span>
</span><a name="line-221"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679142150"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">,</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679142151"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span> </span><a name="line-221"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679158686"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">,</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679158687"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span>
</span><a name="line-222"></a><span> </span><span class="hs-glyph">=&gt;</span><span> </span><a href="SwaggerPetstore.Client.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-comment">-- ^ config</span><span> </span><a name="line-222"></a><span> </span><span class="hs-glyph">=&gt;</span><span> </span><a href="SwaggerPetstore.Client.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-comment">-- ^ config</span><span>
</span><a name="line-223"></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679142152"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679142151"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679142153"><span class="hs-identifier hs-type">res</span></a><span> </span><span class="hs-comment">-- ^ request</span><span> </span><a name="line-223"></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679158688"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679158687"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679158689"><span class="hs-identifier hs-type">res</span></a><span> </span><span class="hs-comment">-- ^ request</span><span>
</span><a name="line-224"></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="#local-6989586621679142150"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ &quot;accept&quot; 'MimeType'</span><span> </span><a name="line-224"></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="#local-6989586621679158686"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ &quot;accept&quot; 'MimeType'</span><span>
</span><a name="line-225"></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Client.html#InitRequest"><span class="hs-identifier hs-type">InitRequest</span></a><span> </span><a href="#local-6989586621679142152"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679142151"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679142153"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679142150"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">)</span><span> </span><span class="hs-comment">-- ^ initialized request</span><span> </span><a name="line-225"></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Client.html#InitRequest"><span class="hs-identifier hs-type">InitRequest</span></a><span> </span><a href="#local-6989586621679158688"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679158687"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679158689"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679158686"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">)</span><span> </span><span class="hs-comment">-- ^ initialized request</span><span>
</span><a name="line-226"></a><a name="_toInitRequest"><a href="SwaggerPetstore.Client.html#_toInitRequest"><span class="hs-identifier">_toInitRequest</span></a></a><span> </span><a name="local-6989586621679142642"><a href="#local-6989586621679142642"><span class="hs-identifier">config</span></a></a><span> </span><a name="local-6989586621679142643"><a href="#local-6989586621679142643"><span class="hs-identifier">req0</span></a></a><span> </span><a name="local-6989586621679142644"><a href="#local-6989586621679142644"><span class="hs-identifier">accept</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span> </span><a name="line-226"></a><a name="_toInitRequest"><a href="SwaggerPetstore.Client.html#_toInitRequest"><span class="hs-identifier">_toInitRequest</span></a></a><span> </span><a name="local-6989586621679159178"><a href="#local-6989586621679159178"><span class="hs-identifier">config</span></a></a><span> </span><a name="local-6989586621679159179"><a href="#local-6989586621679159179"><span class="hs-identifier">req0</span></a></a><span> </span><a name="local-6989586621679159180"><a href="#local-6989586621679159180"><span class="hs-identifier">accept</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
</span><a name="line-227"></a><span> </span><a name="local-6989586621679142645"><a href="#local-6989586621679142645"><span class="hs-identifier">parsedReq</span></a></a><span> </span><span class="hs-glyph">&lt;-</span><span> </span><span class="hs-identifier hs-var">NH</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">parseRequest</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">BCL</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">unpack</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">BCL</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">append</span><span> </span><span class="hs-special">(</span><span class="hs-identifier">configHost</span><span> </span><a href="#local-6989586621679142642"><span class="hs-identifier hs-var">config</span></a><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">BCL</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">concat</span><span> </span><span class="hs-special">(</span><span class="hs-identifier">rUrlPath</span><span> </span><a href="#local-6989586621679142643"><span class="hs-identifier hs-var">req0</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span> </span><a name="line-227"></a><span> </span><a name="local-6989586621679159181"><a href="#local-6989586621679159181"><span class="hs-identifier">parsedReq</span></a></a><span> </span><span class="hs-glyph">&lt;-</span><span> </span><span class="hs-identifier hs-var">NH</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">parseRequest</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">BCL</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">unpack</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">BCL</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">append</span><span> </span><span class="hs-special">(</span><span class="hs-identifier">configHost</span><span> </span><a href="#local-6989586621679159178"><span class="hs-identifier hs-var">config</span></a><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">BCL</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">concat</span><span> </span><span class="hs-special">(</span><span class="hs-identifier">rUrlPath</span><span> </span><a href="#local-6989586621679159179"><span class="hs-identifier hs-var">req0</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span>
</span><a name="line-228"></a><span> </span><span class="hs-keyword">let</span><span> </span><a name="local-6989586621679142646"><a href="#local-6989586621679142646"><span class="hs-identifier">req1</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.API.html#_setAcceptHeader"><span class="hs-identifier hs-var">_setAcceptHeader</span></a><span> </span><a href="#local-6989586621679142643"><span class="hs-identifier hs-var">req0</span></a><span> </span><a href="#local-6989586621679142644"><span class="hs-identifier hs-var">accept</span></a><span> </span><span class="hs-operator hs-var">&amp;</span><span> </span><a href="SwaggerPetstore.API.html#_setContentTypeHeader"><span class="hs-identifier hs-var">_setContentTypeHeader</span></a><span> </span><a name="line-228"></a><span> </span><span class="hs-keyword">let</span><span> </span><a name="local-6989586621679159182"><a href="#local-6989586621679159182"><span class="hs-identifier">req1</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.API.html#_setAcceptHeader"><span class="hs-identifier hs-var">_setAcceptHeader</span></a><span> </span><a href="#local-6989586621679159179"><span class="hs-identifier hs-var">req0</span></a><span> </span><a href="#local-6989586621679159180"><span class="hs-identifier hs-var">accept</span></a><span> </span><span class="hs-operator hs-var">&amp;</span><span> </span><a href="SwaggerPetstore.API.html#_setContentTypeHeader"><span class="hs-identifier hs-var">_setContentTypeHeader</span></a><span>
</span><a name="line-229"></a><span> </span><a name="local-6989586621679142647"><a href="#local-6989586621679142647"><span class="hs-identifier">reqHeaders</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-string">&quot;User-Agent&quot;</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-var">WH</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">toHeader</span><span> </span><span class="hs-special">(</span><span class="hs-identifier">configUserAgent</span><span> </span><a href="#local-6989586621679142642"><span class="hs-identifier hs-var">config</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">:</span><span> </span><span class="hs-identifier">paramsHeaders</span><span> </span><span class="hs-special">(</span><span class="hs-identifier">rParams</span><span> </span><a href="#local-6989586621679142646"><span class="hs-identifier hs-var">req1</span></a><span class="hs-special">)</span><span> </span><a name="line-229"></a><span> </span><a name="local-6989586621679159183"><a href="#local-6989586621679159183"><span class="hs-identifier">reqHeaders</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-string">&quot;User-Agent&quot;</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-var">WH</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">toHeader</span><span> </span><span class="hs-special">(</span><span class="hs-identifier">configUserAgent</span><span> </span><a href="#local-6989586621679159178"><span class="hs-identifier hs-var">config</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">:</span><span> </span><span class="hs-identifier">paramsHeaders</span><span> </span><span class="hs-special">(</span><span class="hs-identifier">rParams</span><span> </span><a href="#local-6989586621679159182"><span class="hs-identifier hs-var">req1</span></a><span class="hs-special">)</span><span>
</span><a name="line-230"></a><span> </span><a name="local-6989586621679142648"><a href="#local-6989586621679142648"><span class="hs-identifier">reqQuery</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">NH</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">renderQuery</span><span> </span><span class="hs-identifier hs-var">True</span><span> </span><span class="hs-special">(</span><span class="hs-identifier">paramsQuery</span><span> </span><span class="hs-special">(</span><span class="hs-identifier">rParams</span><span> </span><a href="#local-6989586621679142646"><span class="hs-identifier hs-var">req1</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span> </span><a name="line-230"></a><span> </span><a name="local-6989586621679159184"><a href="#local-6989586621679159184"><span class="hs-identifier">reqQuery</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">NH</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">renderQuery</span><span> </span><span class="hs-identifier hs-var">True</span><span> </span><span class="hs-special">(</span><span class="hs-identifier">paramsQuery</span><span> </span><span class="hs-special">(</span><span class="hs-identifier">rParams</span><span> </span><a href="#local-6989586621679159182"><span class="hs-identifier hs-var">req1</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span>
</span><a name="line-231"></a><span> </span><a name="local-6989586621679142649"><a href="#local-6989586621679142649"><span class="hs-identifier">pReq</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679142645"><span class="hs-identifier hs-var">parsedReq</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">NH</span><span class="hs-operator">.</span><span class="hs-identifier">method</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-identifier">rMethod</span><span> </span><a href="#local-6989586621679142646"><span class="hs-identifier hs-var">req1</span></a><span class="hs-special">)</span><span> </span><a name="line-231"></a><span> </span><a name="local-6989586621679159185"><a href="#local-6989586621679159185"><span class="hs-identifier">pReq</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679159181"><span class="hs-identifier hs-var">parsedReq</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">NH</span><span class="hs-operator">.</span><span class="hs-identifier">method</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-identifier">rMethod</span><span> </span><a href="#local-6989586621679159182"><span class="hs-identifier hs-var">req1</span></a><span class="hs-special">)</span><span>
</span><a name="line-232"></a><span> </span><span class="hs-special">,</span><span> </span><span class="hs-identifier">NH</span><span class="hs-operator">.</span><span class="hs-identifier">requestHeaders</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679142647"><span class="hs-identifier hs-var">reqHeaders</span></a><span> </span><a name="line-232"></a><span> </span><span class="hs-special">,</span><span> </span><span class="hs-identifier">NH</span><span class="hs-operator">.</span><span class="hs-identifier">requestHeaders</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679159183"><span class="hs-identifier hs-var">reqHeaders</span></a><span>
</span><a name="line-233"></a><span> </span><span class="hs-special">,</span><span> </span><span class="hs-identifier">NH</span><span class="hs-operator">.</span><span class="hs-identifier">queryString</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679142648"><span class="hs-identifier hs-var">reqQuery</span></a><span> </span><a name="line-233"></a><span> </span><span class="hs-special">,</span><span> </span><span class="hs-identifier">NH</span><span class="hs-operator">.</span><span class="hs-identifier">queryString</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679159184"><span class="hs-identifier hs-var">reqQuery</span></a><span>
</span><a name="line-234"></a><span> </span><span class="hs-special">}</span><span> </span><a name="line-234"></a><span> </span><span class="hs-special">}</span><span>
</span><a name="line-235"></a><span> </span><a name="local-6989586621679142654"><a href="#local-6989586621679142654"><span class="hs-identifier">outReq</span></a></a><span> </span><span class="hs-glyph">&lt;-</span><span> </span><span class="hs-keyword">case</span><span> </span><span class="hs-identifier">paramsBody</span><span> </span><span class="hs-special">(</span><span class="hs-identifier">rParams</span><span> </span><a href="#local-6989586621679142646"><span class="hs-identifier hs-var">req1</span></a><span class="hs-special">)</span><span> </span><span class="hs-keyword">of</span><span> </span><a name="line-235"></a><span> </span><a name="local-6989586621679159190"><a href="#local-6989586621679159190"><span class="hs-identifier">outReq</span></a></a><span> </span><span class="hs-glyph">&lt;-</span><span> </span><span class="hs-keyword">case</span><span> </span><span class="hs-identifier">paramsBody</span><span> </span><span class="hs-special">(</span><span class="hs-identifier">rParams</span><span> </span><a href="#local-6989586621679159182"><span class="hs-identifier hs-var">req1</span></a><span class="hs-special">)</span><span> </span><span class="hs-keyword">of</span><span>
</span><a name="line-236"></a><span> </span><a href="SwaggerPetstore.API.html#ParamBodyNone"><span class="hs-identifier hs-var">ParamBodyNone</span></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-var">pure</span><span> </span><span class="hs-special">(</span><a href="#local-6989586621679142649"><span class="hs-identifier hs-var">pReq</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">NH</span><span class="hs-operator">.</span><span class="hs-identifier">requestBody</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">mempty</span><span> </span><span class="hs-special">}</span><span class="hs-special">)</span><span> </span><a name="line-236"></a><span> </span><a href="SwaggerPetstore.API.html#ParamBodyNone"><span class="hs-identifier hs-var">ParamBodyNone</span></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-var">pure</span><span> </span><span class="hs-special">(</span><a href="#local-6989586621679159185"><span class="hs-identifier hs-var">pReq</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">NH</span><span class="hs-operator">.</span><span class="hs-identifier">requestBody</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">mempty</span><span> </span><span class="hs-special">}</span><span class="hs-special">)</span><span>
</span><a name="line-237"></a><span> </span><a href="SwaggerPetstore.API.html#ParamBodyB"><span class="hs-identifier hs-var">ParamBodyB</span></a><span> </span><a name="local-6989586621679142650"><a href="#local-6989586621679142650"><span class="hs-identifier">bs</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-var">pure</span><span> </span><span class="hs-special">(</span><a href="#local-6989586621679142649"><span class="hs-identifier hs-var">pReq</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">NH</span><span class="hs-operator">.</span><span class="hs-identifier">requestBody</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">NH</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">RequestBodyBS</span><span> </span><a href="#local-6989586621679142650"><span class="hs-identifier hs-var">bs</span></a><span> </span><span class="hs-special">}</span><span class="hs-special">)</span><span> </span><a name="line-237"></a><span> </span><a href="SwaggerPetstore.API.html#ParamBodyB"><span class="hs-identifier hs-var">ParamBodyB</span></a><span> </span><a name="local-6989586621679159186"><a href="#local-6989586621679159186"><span class="hs-identifier">bs</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-var">pure</span><span> </span><span class="hs-special">(</span><a href="#local-6989586621679159185"><span class="hs-identifier hs-var">pReq</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">NH</span><span class="hs-operator">.</span><span class="hs-identifier">requestBody</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">NH</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">RequestBodyBS</span><span> </span><a href="#local-6989586621679159186"><span class="hs-identifier hs-var">bs</span></a><span> </span><span class="hs-special">}</span><span class="hs-special">)</span><span>
</span><a name="line-238"></a><span> </span><a href="SwaggerPetstore.API.html#ParamBodyBL"><span class="hs-identifier hs-var">ParamBodyBL</span></a><span> </span><a name="local-6989586621679142651"><a href="#local-6989586621679142651"><span class="hs-identifier">bl</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-var">pure</span><span> </span><span class="hs-special">(</span><a href="#local-6989586621679142649"><span class="hs-identifier hs-var">pReq</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">NH</span><span class="hs-operator">.</span><span class="hs-identifier">requestBody</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">NH</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">RequestBodyLBS</span><span> </span><a href="#local-6989586621679142651"><span class="hs-identifier hs-var">bl</span></a><span> </span><span class="hs-special">}</span><span class="hs-special">)</span><span> </span><a name="line-238"></a><span> </span><a href="SwaggerPetstore.API.html#ParamBodyBL"><span class="hs-identifier hs-var">ParamBodyBL</span></a><span> </span><a name="local-6989586621679159187"><a href="#local-6989586621679159187"><span class="hs-identifier">bl</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-var">pure</span><span> </span><span class="hs-special">(</span><a href="#local-6989586621679159185"><span class="hs-identifier hs-var">pReq</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">NH</span><span class="hs-operator">.</span><span class="hs-identifier">requestBody</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">NH</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">RequestBodyLBS</span><span> </span><a href="#local-6989586621679159187"><span class="hs-identifier hs-var">bl</span></a><span> </span><span class="hs-special">}</span><span class="hs-special">)</span><span>
</span><a name="line-239"></a><span> </span><a href="SwaggerPetstore.API.html#ParamBodyFormUrlEncoded"><span class="hs-identifier hs-var">ParamBodyFormUrlEncoded</span></a><span> </span><a name="local-6989586621679142652"><a href="#local-6989586621679142652"><span class="hs-identifier">form</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-var">pure</span><span> </span><span class="hs-special">(</span><a href="#local-6989586621679142649"><span class="hs-identifier hs-var">pReq</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">NH</span><span class="hs-operator">.</span><span class="hs-identifier">requestBody</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">NH</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">RequestBodyLBS</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">WH</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">urlEncodeForm</span><span> </span><a href="#local-6989586621679142652"><span class="hs-identifier hs-var">form</span></a><span class="hs-special">)</span><span> </span><span class="hs-special">}</span><span class="hs-special">)</span><span> </span><a name="line-239"></a><span> </span><a href="SwaggerPetstore.API.html#ParamBodyFormUrlEncoded"><span class="hs-identifier hs-var">ParamBodyFormUrlEncoded</span></a><span> </span><a name="local-6989586621679159188"><a href="#local-6989586621679159188"><span class="hs-identifier">form</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-var">pure</span><span> </span><span class="hs-special">(</span><a href="#local-6989586621679159185"><span class="hs-identifier hs-var">pReq</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">NH</span><span class="hs-operator">.</span><span class="hs-identifier">requestBody</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">NH</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">RequestBodyLBS</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">WH</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">urlEncodeForm</span><span> </span><a href="#local-6989586621679159188"><span class="hs-identifier hs-var">form</span></a><span class="hs-special">)</span><span> </span><span class="hs-special">}</span><span class="hs-special">)</span><span>
</span><a name="line-240"></a><span> </span><a href="SwaggerPetstore.API.html#ParamBodyMultipartFormData"><span class="hs-identifier hs-var">ParamBodyMultipartFormData</span></a><span> </span><a name="local-6989586621679142653"><a href="#local-6989586621679142653"><span class="hs-identifier">parts</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-var">NH</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">formDataBody</span><span> </span><a href="#local-6989586621679142653"><span class="hs-identifier hs-var">parts</span></a><span> </span><a href="#local-6989586621679142649"><span class="hs-identifier hs-var">pReq</span></a><span> </span><a name="line-240"></a><span> </span><a href="SwaggerPetstore.API.html#ParamBodyMultipartFormData"><span class="hs-identifier hs-var">ParamBodyMultipartFormData</span></a><span> </span><a name="local-6989586621679159189"><a href="#local-6989586621679159189"><span class="hs-identifier">parts</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-var">NH</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">formDataBody</span><span> </span><a href="#local-6989586621679159189"><span class="hs-identifier hs-var">parts</span></a><span> </span><a href="#local-6989586621679159185"><span class="hs-identifier hs-var">pReq</span></a><span>
</span><a name="line-241"></a><span> </span><a name="line-241"></a><span>
</span><a name="line-242"></a><span> </span><span class="hs-identifier hs-var">pure</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Client.html#InitRequest"><span class="hs-identifier hs-var">InitRequest</span></a><span> </span><a href="#local-6989586621679142654"><span class="hs-identifier hs-var">outReq</span></a><span class="hs-special">)</span><span> </span><a name="line-242"></a><span> </span><span class="hs-identifier hs-var">pure</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Client.html#InitRequest"><span class="hs-identifier hs-var">InitRequest</span></a><span> </span><a href="#local-6989586621679159190"><span class="hs-identifier hs-var">outReq</span></a><span class="hs-special">)</span><span>
</span><a name="line-243"></a><span> </span><a name="line-243"></a><span>
</span><a name="line-244"></a><span class="hs-comment">-- | modify the underlying Request</span><span> </span><a name="line-244"></a><span class="hs-comment">-- | modify the underlying Request</span><span>
</span><a name="line-245"></a><span class="hs-identifier">modifyInitRequest</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Client.html#InitRequest"><span class="hs-identifier hs-type">InitRequest</span></a><span> </span><a href="#local-6989586621679142146"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679142147"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679142148"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679142149"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Request</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Request</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Client.html#InitRequest"><span class="hs-identifier hs-type">InitRequest</span></a><span> </span><a href="#local-6989586621679142146"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679142147"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679142148"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679142149"><span class="hs-identifier hs-type">accept</span></a><span> </span><span> </span><a name="line-245"></a><span class="hs-identifier">modifyInitRequest</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Client.html#InitRequest"><span class="hs-identifier hs-type">InitRequest</span></a><span> </span><a href="#local-6989586621679158682"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679158683"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679158684"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679158685"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Request</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Request</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Client.html#InitRequest"><span class="hs-identifier hs-type">InitRequest</span></a><span> </span><a href="#local-6989586621679158682"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679158683"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679158684"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679158685"><span class="hs-identifier hs-type">accept</span></a><span> </span><span>
</span><a name="line-246"></a><a name="modifyInitRequest"><a href="SwaggerPetstore.Client.html#modifyInitRequest"><span class="hs-identifier">modifyInitRequest</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Client.html#InitRequest"><span class="hs-identifier hs-var">InitRequest</span></a><span> </span><a name="local-6989586621679142655"><a href="#local-6989586621679142655"><span class="hs-identifier">req</span></a></a><span class="hs-special">)</span><span> </span><a name="local-6989586621679142656"><a href="#local-6989586621679142656"><span class="hs-identifier">f</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Client.html#InitRequest"><span class="hs-identifier hs-var">InitRequest</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679142656"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679142655"><span class="hs-identifier hs-var">req</span></a><span class="hs-special">)</span><span> </span><a name="line-246"></a><a name="modifyInitRequest"><a href="SwaggerPetstore.Client.html#modifyInitRequest"><span class="hs-identifier">modifyInitRequest</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Client.html#InitRequest"><span class="hs-identifier hs-var">InitRequest</span></a><span> </span><a name="local-6989586621679159191"><a href="#local-6989586621679159191"><span class="hs-identifier">req</span></a></a><span class="hs-special">)</span><span> </span><a name="local-6989586621679159192"><a href="#local-6989586621679159192"><span class="hs-identifier">f</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Client.html#InitRequest"><span class="hs-identifier hs-var">InitRequest</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679159192"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679159191"><span class="hs-identifier hs-var">req</span></a><span class="hs-special">)</span><span>
</span><a name="line-247"></a><span> </span><a name="line-247"></a><span>
</span><a name="line-248"></a><span class="hs-comment">-- | modify the underlying Request (monadic)</span><span> </span><a name="line-248"></a><span class="hs-comment">-- | modify the underlying Request (monadic)</span><span>
</span><a name="line-249"></a><span class="hs-identifier">modifyInitRequestM</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">Monad</span><span> </span><a href="#local-6989586621679142141"><span class="hs-identifier hs-type">m</span></a><span> </span><span class="hs-glyph">=&gt;</span><span> </span><a href="SwaggerPetstore.Client.html#InitRequest"><span class="hs-identifier hs-type">InitRequest</span></a><span> </span><a href="#local-6989586621679142142"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679142143"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679142144"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679142145"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Request</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="#local-6989586621679142141"><span class="hs-identifier hs-type">m</span></a><span> </span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Request</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="#local-6989586621679142141"><span class="hs-identifier hs-type">m</span></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Client.html#InitRequest"><span class="hs-identifier hs-type">InitRequest</span></a><span> </span><a href="#local-6989586621679142142"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679142143"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679142144"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679142145"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">)</span><span> </span><a name="line-249"></a><span class="hs-identifier">modifyInitRequestM</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">Monad</span><span> </span><a href="#local-6989586621679158677"><span class="hs-identifier hs-type">m</span></a><span> </span><span class="hs-glyph">=&gt;</span><span> </span><a href="SwaggerPetstore.Client.html#InitRequest"><span class="hs-identifier hs-type">InitRequest</span></a><span> </span><a href="#local-6989586621679158678"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679158679"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679158680"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679158681"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Request</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="#local-6989586621679158677"><span class="hs-identifier hs-type">m</span></a><span> </span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Request</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="#local-6989586621679158677"><span class="hs-identifier hs-type">m</span></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Client.html#InitRequest"><span class="hs-identifier hs-type">InitRequest</span></a><span> </span><a href="#local-6989586621679158678"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679158679"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679158680"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679158681"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">)</span><span>
</span><a name="line-250"></a><a name="modifyInitRequestM"><a href="SwaggerPetstore.Client.html#modifyInitRequestM"><span class="hs-identifier">modifyInitRequestM</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Client.html#InitRequest"><span class="hs-identifier hs-var">InitRequest</span></a><span> </span><a name="local-6989586621679142657"><a href="#local-6989586621679142657"><span class="hs-identifier">req</span></a></a><span class="hs-special">)</span><span> </span><a name="local-6989586621679142658"><a href="#local-6989586621679142658"><span class="hs-identifier">f</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">fmap</span><span> </span><a href="SwaggerPetstore.Client.html#InitRequest"><span class="hs-identifier hs-var">InitRequest</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679142658"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679142657"><span class="hs-identifier hs-var">req</span></a><span class="hs-special">)</span><span> </span><a name="line-250"></a><a name="modifyInitRequestM"><a href="SwaggerPetstore.Client.html#modifyInitRequestM"><span class="hs-identifier">modifyInitRequestM</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Client.html#InitRequest"><span class="hs-identifier hs-var">InitRequest</span></a><span> </span><a name="local-6989586621679159193"><a href="#local-6989586621679159193"><span class="hs-identifier">req</span></a></a><span class="hs-special">)</span><span> </span><a name="local-6989586621679159194"><a href="#local-6989586621679159194"><span class="hs-identifier">f</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">fmap</span><span> </span><a href="SwaggerPetstore.Client.html#InitRequest"><span class="hs-identifier hs-var">InitRequest</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679159194"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679159193"><span class="hs-identifier hs-var">req</span></a><span class="hs-special">)</span><span>
</span><a name="line-251"></a><span> </span><a name="line-251"></a><span>
</span><a name="line-252"></a><span class="hs-comment">-- ** Logging </span><span> </span><a name="line-252"></a><span class="hs-comment">-- ** Logging </span><span>
</span><a name="line-253"></a><span> </span><a name="line-253"></a><span>
</span><a name="line-254"></a><span class="hs-comment">-- | Run a block using the configured logger instance</span><span> </span><a name="line-254"></a><span class="hs-comment">-- | Run a block using the configured logger instance</span><span>
</span><a name="line-255"></a><span class="hs-identifier">runConfigLog</span><span> </span><a name="line-255"></a><span class="hs-identifier">runConfigLog</span><span>
</span><a name="line-256"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">MonadIO</span><span> </span><a href="#local-6989586621679142140"><span class="hs-identifier hs-type">m</span></a><span> </span><a name="line-256"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">MonadIO</span><span> </span><a href="#local-6989586621679158676"><span class="hs-identifier hs-type">m</span></a><span>
</span><a name="line-257"></a><span> </span><span class="hs-glyph">=&gt;</span><span> </span><a href="SwaggerPetstore.Client.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Logging.html#LogExec"><span class="hs-identifier hs-type">LogExec</span></a><span> </span><a href="#local-6989586621679142140"><span class="hs-identifier hs-type">m</span></a><span> </span><a name="line-257"></a><span> </span><span class="hs-glyph">=&gt;</span><span> </span><a href="SwaggerPetstore.Client.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Logging.html#LogExec"><span class="hs-identifier hs-type">LogExec</span></a><span> </span><a href="#local-6989586621679158676"><span class="hs-identifier hs-type">m</span></a><span>
</span><a name="line-258"></a><a name="runConfigLog"><a href="SwaggerPetstore.Client.html#runConfigLog"><span class="hs-identifier">runConfigLog</span></a></a><span> </span><a name="local-6989586621679142659"><a href="#local-6989586621679142659"><span class="hs-identifier">config</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier">configLogExecWithContext</span><span> </span><a href="#local-6989586621679142659"><span class="hs-identifier hs-var">config</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier">configLogContext</span><span> </span><a href="#local-6989586621679142659"><span class="hs-identifier hs-var">config</span></a><span class="hs-special">)</span><span> </span><a name="line-258"></a><a name="runConfigLog"><a href="SwaggerPetstore.Client.html#runConfigLog"><span class="hs-identifier">runConfigLog</span></a></a><span> </span><a name="local-6989586621679159195"><a href="#local-6989586621679159195"><span class="hs-identifier">config</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier">configLogExecWithContext</span><span> </span><a href="#local-6989586621679159195"><span class="hs-identifier hs-var">config</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier">configLogContext</span><span> </span><a href="#local-6989586621679159195"><span class="hs-identifier hs-var">config</span></a><span class="hs-special">)</span><span>
</span><a name="line-259"></a><span> </span><a name="line-259"></a><span>
</span><a name="line-260"></a><span class="hs-comment">-- | Run a block using the configured logger instance (logs exceptions)</span><span> </span><a name="line-260"></a><span class="hs-comment">-- | Run a block using the configured logger instance (logs exceptions)</span><span>
</span><a name="line-261"></a><span class="hs-identifier">runConfigLogWithExceptions</span><span> </span><a name="line-261"></a><span class="hs-identifier">runConfigLogWithExceptions</span><span>
</span><a name="line-262"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">E</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">MonadCatch</span><span> </span><a href="#local-6989586621679142139"><span class="hs-identifier hs-type">m</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">MonadIO</span><span> </span><a href="#local-6989586621679142139"><span class="hs-identifier hs-type">m</span></a><span class="hs-special">)</span><span> </span><a name="line-262"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">E</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">MonadCatch</span><span> </span><a href="#local-6989586621679158675"><span class="hs-identifier hs-type">m</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">MonadIO</span><span> </span><a href="#local-6989586621679158675"><span class="hs-identifier hs-type">m</span></a><span class="hs-special">)</span><span>
</span><a name="line-263"></a><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span class="hs-identifier hs-type">T</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Text</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Client.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Logging.html#LogExec"><span class="hs-identifier hs-type">LogExec</span></a><span> </span><a href="#local-6989586621679142139"><span class="hs-identifier hs-type">m</span></a><span> </span><a name="line-263"></a><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span class="hs-identifier hs-type">T</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Text</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Client.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Logging.html#LogExec"><span class="hs-identifier hs-type">LogExec</span></a><span> </span><a href="#local-6989586621679158675"><span class="hs-identifier hs-type">m</span></a><span>
</span><a name="line-264"></a><a name="runConfigLogWithExceptions"><a href="SwaggerPetstore.Client.html#runConfigLogWithExceptions"><span class="hs-identifier">runConfigLogWithExceptions</span></a></a><span> </span><a name="local-6989586621679142660"><a href="#local-6989586621679142660"><span class="hs-identifier">src</span></a></a><span> </span><a name="local-6989586621679142661"><a href="#local-6989586621679142661"><span class="hs-identifier">config</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Client.html#runConfigLog"><span class="hs-identifier hs-var">runConfigLog</span></a><span> </span><a href="#local-6989586621679142661"><span class="hs-identifier hs-var">config</span></a><span> </span><span class="hs-operator hs-var">.</span><span> </span><a href="SwaggerPetstore.Logging.html#logExceptions"><span class="hs-identifier hs-var">logExceptions</span></a><span> </span><a href="#local-6989586621679142660"><span class="hs-identifier hs-var">src</span></a><span> </span><a name="line-264"></a><a name="runConfigLogWithExceptions"><a href="SwaggerPetstore.Client.html#runConfigLogWithExceptions"><span class="hs-identifier">runConfigLogWithExceptions</span></a></a><span> </span><a name="local-6989586621679159196"><a href="#local-6989586621679159196"><span class="hs-identifier">src</span></a></a><span> </span><a name="local-6989586621679159197"><a href="#local-6989586621679159197"><span class="hs-identifier">config</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Client.html#runConfigLog"><span class="hs-identifier hs-var">runConfigLog</span></a><span> </span><a href="#local-6989586621679159197"><span class="hs-identifier hs-var">config</span></a><span> </span><span class="hs-operator hs-var">.</span><span> </span><a href="SwaggerPetstore.Logging.html#logExceptions"><span class="hs-identifier hs-var">logExceptions</span></a><span> </span><a href="#local-6989586621679159196"><span class="hs-identifier hs-var">src</span></a><span>
</span><a name="line-265"></a></pre></body></html> </span><a name="line-265"></a></pre></body></html>

View File

@ -10,185 +10,622 @@ Module : SwaggerPetstore.Lens
</span><a name="line-10"></a><span> </span><a name="line-10"></a><span>
</span><a name="line-11"></a><span class="hs-keyword">module</span><span> </span><span class="hs-identifier">SwaggerPetstore</span><span class="hs-operator">.</span><span class="hs-identifier">Lens</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="line-11"></a><span class="hs-keyword">module</span><span> </span><span class="hs-identifier">SwaggerPetstore</span><span class="hs-operator">.</span><span class="hs-identifier">Lens</span><span> </span><span class="hs-keyword">where</span><span>
</span><a name="line-12"></a><span> </span><a name="line-12"></a><span>
</span><a name="line-13"></a><span class="hs-keyword">import</span><span> </span><span class="hs-identifier">Data</span><span class="hs-operator">.</span><span class="hs-identifier">Text</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span> </span><a name="line-13"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data</span><span class="hs-operator">.</span><span class="hs-identifier">Aeson</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">A</span><span>
</span><a name="line-14"></a><span> </span><a name="line-14"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data</span><span class="hs-operator">.</span><span class="hs-identifier">ByteString</span><span class="hs-operator">.</span><span class="hs-identifier">Lazy</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">BL</span><span>
</span><a name="line-15"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data</span><span class="hs-operator">.</span><span class="hs-identifier">Aeson</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">A</span><span> </span><a name="line-15"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data</span><span class="hs-operator">.</span><span class="hs-identifier">Data</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">P</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Data</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">Typeable</span><span class="hs-special">)</span><span>
</span><a name="line-16"></a><span class="hs-keyword">import</span><span> </span><span class="hs-identifier">Data</span><span class="hs-operator">.</span><span class="hs-identifier">Aeson</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Value</span><span class="hs-special">)</span><span> </span><a name="line-16"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data</span><span class="hs-operator">.</span><span class="hs-identifier">Map</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">Map</span><span>
</span><a name="line-17"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data</span><span class="hs-operator">.</span><span class="hs-identifier">ByteString</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">B</span><span> </span><a name="line-17"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data</span><span class="hs-operator">.</span><span class="hs-identifier">Set</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">Set</span><span>
</span><a name="line-18"></a><span class="hs-keyword">import</span><span> </span><span class="hs-identifier">Data</span><span class="hs-operator">.</span><span class="hs-identifier">ByteString</span><span class="hs-operator">.</span><span class="hs-identifier">Lazy</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">ByteString</span><span class="hs-special">)</span><span> </span><a name="line-18"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data</span><span class="hs-operator">.</span><span class="hs-identifier">Time</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">TI</span><span>
</span><a name="line-19"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data</span><span class="hs-operator">.</span><span class="hs-identifier">Data</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">P</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Data</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">Typeable</span><span class="hs-special">)</span><span> </span><a name="line-19"></a><span>
</span><a name="line-20"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data</span><span class="hs-operator">.</span><span class="hs-identifier">Map</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">Map</span><span> </span><a name="line-20"></a><span class="hs-keyword">import</span><span> </span><span class="hs-identifier">Data</span><span class="hs-operator">.</span><span class="hs-identifier">Text</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span>
</span><a name="line-21"></a><span> </span><a name="line-21"></a><span>
</span><a name="line-22"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data</span><span class="hs-operator">.</span><span class="hs-identifier">Time</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">TI</span><span> </span><a name="line-22"></a><span class="hs-keyword">import</span><span> </span><span class="hs-identifier">Prelude</span><span> </span><span class="hs-special">(</span><span class="hs-special">(</span><span class="hs-operator hs-var">$</span><span class="hs-special">)</span><span class="hs-special">,</span><span> </span><span class="hs-special">(</span><span class="hs-operator hs-var">.</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="hs-special">(</span><span class="hs-operator hs-var">&lt;$&gt;</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="hs-special">(</span><span class="hs-operator hs-var">&lt;*&gt;</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="hs-special">(</span><span class="hs-operator hs-var">=&lt;&lt;</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Maybe</span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Bool</span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Char</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Double</span><span class="hs-special">,</span><span class="hs-identifier hs-type">FilePath</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Float</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Int</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Integer</span><span class="hs-special">,</span><span class="hs-identifier hs-type">String</span><span class="hs-special">,</span><span class="hs-identifier hs-var">fmap</span><span class="hs-special">,</span><span class="hs-identifier hs-var">undefined</span><span class="hs-special">,</span><span class="hs-identifier hs-var">mempty</span><span class="hs-special">,</span><span class="hs-identifier hs-var">maybe</span><span class="hs-special">,</span><span class="hs-identifier hs-var">pure</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Monad</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Applicative</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Functor</span><span class="hs-special">)</span><span>
</span><a name="line-23"></a><span class="hs-keyword">import</span><span> </span><span class="hs-identifier">Data</span><span class="hs-operator">.</span><span class="hs-identifier">Time</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">UTCTime</span><span class="hs-special">)</span><span> </span><a name="line-23"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Prelude</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">P</span><span>
</span><a name="line-24"></a><span> </span><a name="line-24"></a><span>
</span><a name="line-25"></a><span class="hs-keyword">import</span><span> </span><span class="hs-identifier">Prelude</span><span> </span><span class="hs-special">(</span><span class="hs-special">(</span><span class="hs-operator hs-var">$</span><span class="hs-special">)</span><span class="hs-special">,</span><span> </span><span class="hs-special">(</span><span class="hs-operator hs-var">.</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="hs-special">(</span><span class="hs-operator hs-var">&lt;$&gt;</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="hs-special">(</span><span class="hs-operator hs-var">&lt;*&gt;</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="hs-special">(</span><span class="hs-operator hs-var">=&lt;&lt;</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Maybe</span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Bool</span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Char</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Double</span><span class="hs-special">,</span><span class="hs-identifier hs-type">FilePath</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Float</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Int</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Integer</span><span class="hs-special">,</span><span class="hs-identifier hs-type">String</span><span class="hs-special">,</span><span class="hs-identifier hs-var">fmap</span><span class="hs-special">,</span><span class="hs-identifier hs-var">undefined</span><span class="hs-special">,</span><span class="hs-identifier hs-var">mempty</span><span class="hs-special">,</span><span class="hs-identifier hs-var">maybe</span><span class="hs-special">,</span><span class="hs-identifier hs-var">pure</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Monad</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Applicative</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Functor</span><span class="hs-special">)</span><span> </span><a name="line-25"></a><span class="hs-keyword">import</span><span> </span><a href="SwaggerPetstore.Model.html"><span class="hs-identifier">SwaggerPetstore</span><span class="hs-operator">.</span><span class="hs-identifier">Model</span></a><span>
</span><a name="line-26"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Prelude</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">P</span><span> </span><a name="line-26"></a><span>
</span><a name="line-27"></a><span> </span><a name="line-27"></a><span class="hs-comment">-- * Type Aliases</span><span>
</span><a name="line-28"></a><span class="hs-keyword">import</span><span> </span><a href="SwaggerPetstore.Model.html"><span class="hs-identifier">SwaggerPetstore</span><span class="hs-operator">.</span><span class="hs-identifier">Model</span></a><span> </span><a name="line-28"></a><span>
</span><a name="line-29"></a><span> </span><a name="line-29"></a><span class="hs-keyword">type</span><span> </span><a name="Lens_%27"><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier">Lens_'</span></a></a><span> </span><a name="local-6989586621679099299"><a href="#local-6989586621679099299"><span class="hs-identifier">s</span></a></a><span> </span><a name="local-6989586621679099300"><a href="#local-6989586621679099300"><span class="hs-identifier">a</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_"><span class="hs-identifier hs-type">Lens_</span></a><span> </span><a href="#local-6989586621679099299"><span class="hs-identifier hs-type">s</span></a><span> </span><a href="#local-6989586621679099299"><span class="hs-identifier hs-type">s</span></a><span> </span><a href="#local-6989586621679099300"><span class="hs-identifier hs-type">a</span></a><span> </span><a href="#local-6989586621679099300"><span class="hs-identifier hs-type">a</span></a><span>
</span><a name="line-30"></a><span class="hs-comment">-- * Type Aliases</span><span> </span><a name="line-30"></a><span class="hs-keyword">type</span><span> </span><a name="Lens_"><a href="SwaggerPetstore.Lens.html#Lens_"><span class="hs-identifier">Lens_</span></a></a><span> </span><a name="local-6989586621679099294"><a href="#local-6989586621679099294"><span class="hs-identifier">s</span></a></a><span> </span><a name="local-6989586621679099295"><a href="#local-6989586621679099295"><span class="hs-identifier">t</span></a></a><span> </span><a name="local-6989586621679099296"><a href="#local-6989586621679099296"><span class="hs-identifier">a</span></a></a><span> </span><a name="local-6989586621679099297"><a href="#local-6989586621679099297"><span class="hs-identifier">b</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">forall</span><span> </span><span class="hs-special">(</span><a name="local-6989586621679099298"><a href="#local-6989586621679099298"><span class="hs-identifier">f</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-operator hs-type">*</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-operator hs-type">*</span><span class="hs-special">)</span><span class="hs-operator">.</span><span> </span><span class="hs-identifier hs-type">Functor</span><span> </span><a href="#local-6989586621679099298"><span class="hs-identifier hs-type">f</span></a><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span class="hs-special">(</span><a href="#local-6989586621679099296"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="#local-6989586621679099298"><span class="hs-identifier hs-type">f</span></a><span> </span><a href="#local-6989586621679099297"><span class="hs-identifier hs-type">b</span></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="#local-6989586621679099294"><span class="hs-identifier hs-type">s</span></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="#local-6989586621679099298"><span class="hs-identifier hs-type">f</span></a><span> </span><a href="#local-6989586621679099295"><span class="hs-identifier hs-type">t</span></a><span>
</span><a name="line-31"></a><span> </span><a name="line-31"></a><span>
</span><a name="line-32"></a><span class="hs-keyword">type</span><span> </span><a name="Lens_%27"><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier">Lens_'</span></a></a><span> </span><a name="local-6989586621679087455"><a href="#local-6989586621679087455"><span class="hs-identifier">s</span></a></a><span> </span><a name="local-6989586621679087456"><a href="#local-6989586621679087456"><span class="hs-identifier">a</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_"><span class="hs-identifier hs-type">Lens_</span></a><span> </span><a href="#local-6989586621679087455"><span class="hs-identifier hs-type">s</span></a><span> </span><a href="#local-6989586621679087455"><span class="hs-identifier hs-type">s</span></a><span> </span><a href="#local-6989586621679087456"><span class="hs-identifier hs-type">a</span></a><span> </span><a href="#local-6989586621679087456"><span class="hs-identifier hs-type">a</span></a><span> </span><a name="line-32"></a><span>
</span><a name="line-33"></a><span class="hs-keyword">type</span><span> </span><a name="Lens_"><a href="SwaggerPetstore.Lens.html#Lens_"><span class="hs-identifier">Lens_</span></a></a><span> </span><a name="local-6989586621679087450"><a href="#local-6989586621679087450"><span class="hs-identifier">s</span></a></a><span> </span><a name="local-6989586621679087451"><a href="#local-6989586621679087451"><span class="hs-identifier">t</span></a></a><span> </span><a name="local-6989586621679087452"><a href="#local-6989586621679087452"><span class="hs-identifier">a</span></a></a><span> </span><a name="local-6989586621679087453"><a href="#local-6989586621679087453"><span class="hs-identifier">b</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">forall</span><span> </span><span class="hs-special">(</span><a name="local-6989586621679087454"><a href="#local-6989586621679087454"><span class="hs-identifier">f</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-operator hs-type">*</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-operator hs-type">*</span><span class="hs-special">)</span><span class="hs-operator">.</span><span> </span><span class="hs-identifier hs-type">Functor</span><span> </span><a href="#local-6989586621679087454"><span class="hs-identifier hs-type">f</span></a><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span class="hs-special">(</span><a href="#local-6989586621679087452"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="#local-6989586621679087454"><span class="hs-identifier hs-type">f</span></a><span> </span><a href="#local-6989586621679087453"><span class="hs-identifier hs-type">b</span></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="#local-6989586621679087450"><span class="hs-identifier hs-type">s</span></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="#local-6989586621679087454"><span class="hs-identifier hs-type">f</span></a><span> </span><a href="#local-6989586621679087451"><span class="hs-identifier hs-type">t</span></a><span> </span><a name="line-33"></a><span class="hs-comment">-- * AdditionalPropertiesClass</span><span>
</span><a name="line-34"></a><span> </span><a name="line-34"></a><span>
</span><a name="line-35"></a><span> </span><a name="line-35"></a><span class="hs-comment">-- | 'additionalPropertiesClassMapProperty' Lens</span><span>
</span><a name="line-36"></a><span class="hs-comment">-- * ApiResponse</span><span> </span><a name="line-36"></a><span class="hs-identifier">additionalPropertiesClassMapPropertyL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#AdditionalPropertiesClass"><span class="hs-identifier hs-type">AdditionalPropertiesClass</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Map</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Map</span><span> </span><span class="hs-identifier hs-type">String</span><span> </span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span class="hs-special">)</span><span>
</span><a name="line-37"></a><span> </span><a name="line-37"></a><a name="additionalPropertiesClassMapPropertyL"><a href="SwaggerPetstore.Lens.html#additionalPropertiesClassMapPropertyL"><span class="hs-identifier">additionalPropertiesClassMapPropertyL</span></a></a><span> </span><a name="local-6989586621679099301"><a href="#local-6989586621679099301"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#AdditionalPropertiesClass"><span class="hs-identifier hs-var">AdditionalPropertiesClass</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099304"><a href="#local-6989586621679099304"><span class="hs-identifier">additionalPropertiesClassMapProperty</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#AdditionalPropertiesClass"><span class="hs-identifier hs-var">AdditionalPropertiesClass</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099304"><span class="hs-identifier hs-var">additionalPropertiesClassMapProperty</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099301"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099302"><span class="hs-identifier hs-var">additionalPropertiesClassMapProperty</span></a><span>
</span><a name="line-38"></a><span class="hs-comment">-- | 'apiResponseCode' Lens</span><span> </span><a name="line-38"></a><span class="hs-pragma">{-# INLINE additionalPropertiesClassMapPropertyL #-}</span><span>
</span><a name="line-39"></a><span class="hs-identifier">apiResponseCodeL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#ApiResponse"><span class="hs-identifier hs-type">ApiResponse</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Int</span><span class="hs-special">)</span><span> </span><a name="line-39"></a><span>
</span><a name="line-40"></a><a name="apiResponseCodeL"><a href="SwaggerPetstore.Lens.html#apiResponseCodeL"><span class="hs-identifier">apiResponseCodeL</span></a></a><span> </span><a name="local-6989586621679087457"><a href="#local-6989586621679087457"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#ApiResponse"><span class="hs-identifier hs-var">ApiResponse</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679087461"><a href="#local-6989586621679087461"><span class="hs-identifier">apiResponseCode</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#ApiResponse"><span class="hs-identifier hs-var">ApiResponse</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679087461"><span class="hs-identifier hs-var">apiResponseCode</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679087457"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679087458"><span class="hs-identifier hs-var">apiResponseCode</span></a><span> </span><a name="line-40"></a><span class="hs-comment">-- | 'additionalPropertiesClassMapOfMapProperty' Lens</span><span>
</span><a name="line-41"></a><span class="hs-pragma">{-# INLINE apiResponseCodeL #-}</span><span> </span><a name="line-41"></a><span class="hs-identifier">additionalPropertiesClassMapOfMapPropertyL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#AdditionalPropertiesClass"><span class="hs-identifier hs-type">AdditionalPropertiesClass</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Map</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Map</span><span> </span><span class="hs-identifier hs-type">String</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Map</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Map</span><span> </span><span class="hs-identifier hs-type">String</span><span> </span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span class="hs-special">)</span><span class="hs-special">)</span><span>
</span><a name="line-42"></a><span> </span><a name="line-42"></a><a name="additionalPropertiesClassMapOfMapPropertyL"><a href="SwaggerPetstore.Lens.html#additionalPropertiesClassMapOfMapPropertyL"><span class="hs-identifier">additionalPropertiesClassMapOfMapPropertyL</span></a></a><span> </span><a name="local-6989586621679099305"><a href="#local-6989586621679099305"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#AdditionalPropertiesClass"><span class="hs-identifier hs-var">AdditionalPropertiesClass</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099308"><a href="#local-6989586621679099308"><span class="hs-identifier">additionalPropertiesClassMapOfMapProperty</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#AdditionalPropertiesClass"><span class="hs-identifier hs-var">AdditionalPropertiesClass</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099308"><span class="hs-identifier hs-var">additionalPropertiesClassMapOfMapProperty</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099305"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099307"><span class="hs-identifier hs-var">additionalPropertiesClassMapOfMapProperty</span></a><span>
</span><a name="line-43"></a><span class="hs-comment">-- | 'apiResponseType' Lens</span><span> </span><a name="line-43"></a><span class="hs-pragma">{-# INLINE additionalPropertiesClassMapOfMapPropertyL #-}</span><span>
</span><a name="line-44"></a><span class="hs-identifier">apiResponseTypeL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#ApiResponse"><span class="hs-identifier hs-type">ApiResponse</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span> </span><a name="line-44"></a><span>
</span><a name="line-45"></a><a name="apiResponseTypeL"><a href="SwaggerPetstore.Lens.html#apiResponseTypeL"><span class="hs-identifier">apiResponseTypeL</span></a></a><span> </span><a name="local-6989586621679087462"><a href="#local-6989586621679087462"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#ApiResponse"><span class="hs-identifier hs-var">ApiResponse</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679087466"><a href="#local-6989586621679087466"><span class="hs-identifier">apiResponseType</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#ApiResponse"><span class="hs-identifier hs-var">ApiResponse</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679087466"><span class="hs-identifier hs-var">apiResponseType</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679087462"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679087464"><span class="hs-identifier hs-var">apiResponseType</span></a><span> </span><a name="line-45"></a><span>
</span><a name="line-46"></a><span class="hs-pragma">{-# INLINE apiResponseTypeL #-}</span><span> </span><a name="line-46"></a><span>
</span><a name="line-47"></a><span> </span><a name="line-47"></a><span class="hs-comment">-- * Animal</span><span>
</span><a name="line-48"></a><span class="hs-comment">-- | 'apiResponseMessage' Lens</span><span> </span><a name="line-48"></a><span>
</span><a name="line-49"></a><span class="hs-identifier">apiResponseMessageL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#ApiResponse"><span class="hs-identifier hs-type">ApiResponse</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span> </span><a name="line-49"></a><span class="hs-comment">-- | 'animalClassName' Lens</span><span>
</span><a name="line-50"></a><a name="apiResponseMessageL"><a href="SwaggerPetstore.Lens.html#apiResponseMessageL"><span class="hs-identifier">apiResponseMessageL</span></a></a><span> </span><a name="local-6989586621679087467"><a href="#local-6989586621679087467"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#ApiResponse"><span class="hs-identifier hs-var">ApiResponse</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679087471"><a href="#local-6989586621679087471"><span class="hs-identifier">apiResponseMessage</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#ApiResponse"><span class="hs-identifier hs-var">ApiResponse</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679087471"><span class="hs-identifier hs-var">apiResponseMessage</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679087467"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679087470"><span class="hs-identifier hs-var">apiResponseMessage</span></a><span> </span><a name="line-50"></a><span class="hs-identifier">animalClassNameL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Animal"><span class="hs-identifier hs-type">Animal</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span>
</span><a name="line-51"></a><span class="hs-pragma">{-# INLINE apiResponseMessageL #-}</span><span> </span><a name="line-51"></a><a name="animalClassNameL"><a href="SwaggerPetstore.Lens.html#animalClassNameL"><span class="hs-identifier">animalClassNameL</span></a></a><span> </span><a name="local-6989586621679099309"><a href="#local-6989586621679099309"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Animal"><span class="hs-identifier hs-var">Animal</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099312"><a href="#local-6989586621679099312"><span class="hs-identifier">animalClassName</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#Animal"><span class="hs-identifier hs-var">Animal</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099312"><span class="hs-identifier hs-var">animalClassName</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099309"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099310"><span class="hs-identifier hs-var">animalClassName</span></a><span>
</span><a name="line-52"></a><span> </span><a name="line-52"></a><span class="hs-pragma">{-# INLINE animalClassNameL #-}</span><span>
</span><a name="line-53"></a><span> </span><a name="line-53"></a><span>
</span><a name="line-54"></a><span> </span><a name="line-54"></a><span class="hs-comment">-- | 'animalColor' Lens</span><span>
</span><a name="line-55"></a><span class="hs-comment">-- * Category</span><span> </span><a name="line-55"></a><span class="hs-identifier">animalColorL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Animal"><span class="hs-identifier hs-type">Animal</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span>
</span><a name="line-56"></a><span> </span><a name="line-56"></a><a name="animalColorL"><a href="SwaggerPetstore.Lens.html#animalColorL"><span class="hs-identifier">animalColorL</span></a></a><span> </span><a name="local-6989586621679099313"><a href="#local-6989586621679099313"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Animal"><span class="hs-identifier hs-var">Animal</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099316"><a href="#local-6989586621679099316"><span class="hs-identifier">animalColor</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#Animal"><span class="hs-identifier hs-var">Animal</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099316"><span class="hs-identifier hs-var">animalColor</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099313"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099315"><span class="hs-identifier hs-var">animalColor</span></a><span>
</span><a name="line-57"></a><span class="hs-comment">-- | 'categoryId' Lens</span><span> </span><a name="line-57"></a><span class="hs-pragma">{-# INLINE animalColorL #-}</span><span>
</span><a name="line-58"></a><span class="hs-identifier">categoryIdL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Category"><span class="hs-identifier hs-type">Category</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Integer</span><span class="hs-special">)</span><span> </span><a name="line-58"></a><span>
</span><a name="line-59"></a><a name="categoryIdL"><a href="SwaggerPetstore.Lens.html#categoryIdL"><span class="hs-identifier">categoryIdL</span></a></a><span> </span><a name="local-6989586621679087472"><a href="#local-6989586621679087472"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Category"><span class="hs-identifier hs-var">Category</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679087475"><a href="#local-6989586621679087475"><span class="hs-identifier">categoryId</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#Category"><span class="hs-identifier hs-var">Category</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679087475"><span class="hs-identifier hs-var">categoryId</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679087472"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679087473"><span class="hs-identifier hs-var">categoryId</span></a><span> </span><a name="line-59"></a><span>
</span><a name="line-60"></a><span class="hs-pragma">{-# INLINE categoryIdL #-}</span><span> </span><a name="line-60"></a><span>
</span><a name="line-61"></a><span> </span><a name="line-61"></a><span class="hs-comment">-- * AnimalFarm</span><span>
</span><a name="line-62"></a><span class="hs-comment">-- | 'categoryName' Lens</span><span> </span><a name="line-62"></a><span>
</span><a name="line-63"></a><span class="hs-identifier">categoryNameL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Category"><span class="hs-identifier hs-type">Category</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span> </span><a name="line-63"></a><span>
</span><a name="line-64"></a><a name="categoryNameL"><a href="SwaggerPetstore.Lens.html#categoryNameL"><span class="hs-identifier">categoryNameL</span></a></a><span> </span><a name="local-6989586621679087476"><a href="#local-6989586621679087476"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Category"><span class="hs-identifier hs-var">Category</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679087479"><a href="#local-6989586621679087479"><span class="hs-identifier">categoryName</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#Category"><span class="hs-identifier hs-var">Category</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679087479"><span class="hs-identifier hs-var">categoryName</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679087476"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679087478"><span class="hs-identifier hs-var">categoryName</span></a><span> </span><a name="line-64"></a><span>
</span><a name="line-65"></a><span class="hs-pragma">{-# INLINE categoryNameL #-}</span><span> </span><a name="line-65"></a><span class="hs-comment">-- * ApiResponse</span><span>
</span><a name="line-66"></a><span> </span><a name="line-66"></a><span>
</span><a name="line-67"></a><span> </span><a name="line-67"></a><span class="hs-comment">-- | 'apiResponseCode' Lens</span><span>
</span><a name="line-68"></a><span> </span><a name="line-68"></a><span class="hs-identifier">apiResponseCodeL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#ApiResponse"><span class="hs-identifier hs-type">ApiResponse</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Int</span><span class="hs-special">)</span><span>
</span><a name="line-69"></a><span class="hs-comment">-- * Order</span><span> </span><a name="line-69"></a><a name="apiResponseCodeL"><a href="SwaggerPetstore.Lens.html#apiResponseCodeL"><span class="hs-identifier">apiResponseCodeL</span></a></a><span> </span><a name="local-6989586621679099317"><a href="#local-6989586621679099317"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#ApiResponse"><span class="hs-identifier hs-var">ApiResponse</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099321"><a href="#local-6989586621679099321"><span class="hs-identifier">apiResponseCode</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#ApiResponse"><span class="hs-identifier hs-var">ApiResponse</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099321"><span class="hs-identifier hs-var">apiResponseCode</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099317"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099318"><span class="hs-identifier hs-var">apiResponseCode</span></a><span>
</span><a name="line-70"></a><span> </span><a name="line-70"></a><span class="hs-pragma">{-# INLINE apiResponseCodeL #-}</span><span>
</span><a name="line-71"></a><span class="hs-comment">-- | 'orderId' Lens</span><span> </span><a name="line-71"></a><span>
</span><a name="line-72"></a><span class="hs-identifier">orderIdL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-type">Order</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Integer</span><span class="hs-special">)</span><span> </span><a name="line-72"></a><span class="hs-comment">-- | 'apiResponseType' Lens</span><span>
</span><a name="line-73"></a><a name="orderIdL"><a href="SwaggerPetstore.Lens.html#orderIdL"><span class="hs-identifier">orderIdL</span></a></a><span> </span><a name="local-6989586621679087480"><a href="#local-6989586621679087480"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-var">Order</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679087487"><a href="#local-6989586621679087487"><span class="hs-identifier">orderId</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-var">Order</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679087487"><span class="hs-identifier hs-var">orderId</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679087480"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679087481"><span class="hs-identifier hs-var">orderId</span></a><span> </span><a name="line-73"></a><span class="hs-identifier">apiResponseTypeL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#ApiResponse"><span class="hs-identifier hs-type">ApiResponse</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span>
</span><a name="line-74"></a><span class="hs-pragma">{-# INLINE orderIdL #-}</span><span> </span><a name="line-74"></a><a name="apiResponseTypeL"><a href="SwaggerPetstore.Lens.html#apiResponseTypeL"><span class="hs-identifier">apiResponseTypeL</span></a></a><span> </span><a name="local-6989586621679099322"><a href="#local-6989586621679099322"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#ApiResponse"><span class="hs-identifier hs-var">ApiResponse</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099326"><a href="#local-6989586621679099326"><span class="hs-identifier">apiResponseType</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#ApiResponse"><span class="hs-identifier hs-var">ApiResponse</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099326"><span class="hs-identifier hs-var">apiResponseType</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099322"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099324"><span class="hs-identifier hs-var">apiResponseType</span></a><span>
</span><a name="line-75"></a><span> </span><a name="line-75"></a><span class="hs-pragma">{-# INLINE apiResponseTypeL #-}</span><span>
</span><a name="line-76"></a><span class="hs-comment">-- | 'orderPetId' Lens</span><span> </span><a name="line-76"></a><span>
</span><a name="line-77"></a><span class="hs-identifier">orderPetIdL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-type">Order</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Integer</span><span class="hs-special">)</span><span> </span><a name="line-77"></a><span class="hs-comment">-- | 'apiResponseMessage' Lens</span><span>
</span><a name="line-78"></a><a name="orderPetIdL"><a href="SwaggerPetstore.Lens.html#orderPetIdL"><span class="hs-identifier">orderPetIdL</span></a></a><span> </span><a name="local-6989586621679087488"><a href="#local-6989586621679087488"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-var">Order</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679087495"><a href="#local-6989586621679087495"><span class="hs-identifier">orderPetId</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-var">Order</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679087495"><span class="hs-identifier hs-var">orderPetId</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679087488"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679087490"><span class="hs-identifier hs-var">orderPetId</span></a><span> </span><a name="line-78"></a><span class="hs-identifier">apiResponseMessageL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#ApiResponse"><span class="hs-identifier hs-type">ApiResponse</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span>
</span><a name="line-79"></a><span class="hs-pragma">{-# INLINE orderPetIdL #-}</span><span> </span><a name="line-79"></a><a name="apiResponseMessageL"><a href="SwaggerPetstore.Lens.html#apiResponseMessageL"><span class="hs-identifier">apiResponseMessageL</span></a></a><span> </span><a name="local-6989586621679099327"><a href="#local-6989586621679099327"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#ApiResponse"><span class="hs-identifier hs-var">ApiResponse</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099331"><a href="#local-6989586621679099331"><span class="hs-identifier">apiResponseMessage</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#ApiResponse"><span class="hs-identifier hs-var">ApiResponse</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099331"><span class="hs-identifier hs-var">apiResponseMessage</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099327"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099330"><span class="hs-identifier hs-var">apiResponseMessage</span></a><span>
</span><a name="line-80"></a><span> </span><a name="line-80"></a><span class="hs-pragma">{-# INLINE apiResponseMessageL #-}</span><span>
</span><a name="line-81"></a><span class="hs-comment">-- | 'orderQuantity' Lens</span><span> </span><a name="line-81"></a><span>
</span><a name="line-82"></a><span class="hs-identifier">orderQuantityL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-type">Order</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Int</span><span class="hs-special">)</span><span> </span><a name="line-82"></a><span>
</span><a name="line-83"></a><a name="orderQuantityL"><a href="SwaggerPetstore.Lens.html#orderQuantityL"><span class="hs-identifier">orderQuantityL</span></a></a><span> </span><a name="local-6989586621679087496"><a href="#local-6989586621679087496"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-var">Order</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679087503"><a href="#local-6989586621679087503"><span class="hs-identifier">orderQuantity</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-var">Order</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679087503"><span class="hs-identifier hs-var">orderQuantity</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679087496"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679087499"><span class="hs-identifier hs-var">orderQuantity</span></a><span> </span><a name="line-83"></a><span>
</span><a name="line-84"></a><span class="hs-pragma">{-# INLINE orderQuantityL #-}</span><span> </span><a name="line-84"></a><span class="hs-comment">-- * ArrayOfArrayOfNumberOnly</span><span>
</span><a name="line-85"></a><span> </span><a name="line-85"></a><span>
</span><a name="line-86"></a><span class="hs-comment">-- | 'orderShipDate' Lens</span><span> </span><a name="line-86"></a><span class="hs-comment">-- | 'arrayOfArrayOfNumberOnlyArrayArrayNumber' Lens</span><span>
</span><a name="line-87"></a><span class="hs-identifier">orderShipDateL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-type">Order</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">UTCTime</span><span class="hs-special">)</span><span> </span><a name="line-87"></a><span class="hs-identifier">arrayOfArrayOfNumberOnlyArrayArrayNumberL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#ArrayOfArrayOfNumberOnly"><span class="hs-identifier hs-type">ArrayOfArrayOfNumberOnly</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-special">[</span><span class="hs-special">[</span><span class="hs-identifier hs-type">Double</span><span class="hs-special">]</span><span class="hs-special">]</span><span class="hs-special">)</span><span>
</span><a name="line-88"></a><a name="orderShipDateL"><a href="SwaggerPetstore.Lens.html#orderShipDateL"><span class="hs-identifier">orderShipDateL</span></a></a><span> </span><a name="local-6989586621679087504"><a href="#local-6989586621679087504"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-var">Order</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679087511"><a href="#local-6989586621679087511"><span class="hs-identifier">orderShipDate</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-var">Order</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679087511"><span class="hs-identifier hs-var">orderShipDate</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679087504"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679087508"><span class="hs-identifier hs-var">orderShipDate</span></a><span> </span><a name="line-88"></a><a name="arrayOfArrayOfNumberOnlyArrayArrayNumberL"><a href="SwaggerPetstore.Lens.html#arrayOfArrayOfNumberOnlyArrayArrayNumberL"><span class="hs-identifier">arrayOfArrayOfNumberOnlyArrayArrayNumberL</span></a></a><span> </span><a name="local-6989586621679099332"><a href="#local-6989586621679099332"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#ArrayOfArrayOfNumberOnly"><span class="hs-identifier hs-var">ArrayOfArrayOfNumberOnly</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099334"><a href="#local-6989586621679099334"><span class="hs-identifier">arrayOfArrayOfNumberOnlyArrayArrayNumber</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#ArrayOfArrayOfNumberOnly"><span class="hs-identifier hs-var">ArrayOfArrayOfNumberOnly</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099334"><span class="hs-identifier hs-var">arrayOfArrayOfNumberOnlyArrayArrayNumber</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099332"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099333"><span class="hs-identifier hs-var">arrayOfArrayOfNumberOnlyArrayArrayNumber</span></a><span>
</span><a name="line-89"></a><span class="hs-pragma">{-# INLINE orderShipDateL #-}</span><span> </span><a name="line-89"></a><span class="hs-pragma">{-# INLINE arrayOfArrayOfNumberOnlyArrayArrayNumberL #-}</span><span>
</span><a name="line-90"></a><span> </span><a name="line-90"></a><span>
</span><a name="line-91"></a><span class="hs-comment">-- | 'orderStatus' Lens</span><span> </span><a name="line-91"></a><span>
</span><a name="line-92"></a><span class="hs-identifier">orderStatusL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-type">Order</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span> </span><a name="line-92"></a><span>
</span><a name="line-93"></a><a name="orderStatusL"><a href="SwaggerPetstore.Lens.html#orderStatusL"><span class="hs-identifier">orderStatusL</span></a></a><span> </span><a name="local-6989586621679087512"><a href="#local-6989586621679087512"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-var">Order</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679087519"><a href="#local-6989586621679087519"><span class="hs-identifier">orderStatus</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-var">Order</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679087519"><span class="hs-identifier hs-var">orderStatus</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679087512"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679087517"><span class="hs-identifier hs-var">orderStatus</span></a><span> </span><a name="line-93"></a><span class="hs-comment">-- * ArrayOfNumberOnly</span><span>
</span><a name="line-94"></a><span class="hs-pragma">{-# INLINE orderStatusL #-}</span><span> </span><a name="line-94"></a><span>
</span><a name="line-95"></a><span> </span><a name="line-95"></a><span class="hs-comment">-- | 'arrayOfNumberOnlyArrayNumber' Lens</span><span>
</span><a name="line-96"></a><span class="hs-comment">-- | 'orderComplete' Lens</span><span> </span><a name="line-96"></a><span class="hs-identifier">arrayOfNumberOnlyArrayNumberL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#ArrayOfNumberOnly"><span class="hs-identifier hs-type">ArrayOfNumberOnly</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-special">[</span><span class="hs-identifier hs-type">Double</span><span class="hs-special">]</span><span class="hs-special">)</span><span>
</span><a name="line-97"></a><span class="hs-identifier">orderCompleteL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-type">Order</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Bool</span><span class="hs-special">)</span><span> </span><a name="line-97"></a><a name="arrayOfNumberOnlyArrayNumberL"><a href="SwaggerPetstore.Lens.html#arrayOfNumberOnlyArrayNumberL"><span class="hs-identifier">arrayOfNumberOnlyArrayNumberL</span></a></a><span> </span><a name="local-6989586621679099335"><a href="#local-6989586621679099335"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#ArrayOfNumberOnly"><span class="hs-identifier hs-var">ArrayOfNumberOnly</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099337"><a href="#local-6989586621679099337"><span class="hs-identifier">arrayOfNumberOnlyArrayNumber</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#ArrayOfNumberOnly"><span class="hs-identifier hs-var">ArrayOfNumberOnly</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099337"><span class="hs-identifier hs-var">arrayOfNumberOnlyArrayNumber</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099335"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099336"><span class="hs-identifier hs-var">arrayOfNumberOnlyArrayNumber</span></a><span>
</span><a name="line-98"></a><a name="orderCompleteL"><a href="SwaggerPetstore.Lens.html#orderCompleteL"><span class="hs-identifier">orderCompleteL</span></a></a><span> </span><a name="local-6989586621679087520"><a href="#local-6989586621679087520"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-var">Order</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679087527"><a href="#local-6989586621679087527"><span class="hs-identifier">orderComplete</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-var">Order</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679087527"><span class="hs-identifier hs-var">orderComplete</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679087520"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679087526"><span class="hs-identifier hs-var">orderComplete</span></a><span> </span><a name="line-98"></a><span class="hs-pragma">{-# INLINE arrayOfNumberOnlyArrayNumberL #-}</span><span>
</span><a name="line-99"></a><span class="hs-pragma">{-# INLINE orderCompleteL #-}</span><span> </span><a name="line-99"></a><span>
</span><a name="line-100"></a><span> </span><a name="line-100"></a><span>
</span><a name="line-101"></a><span> </span><a name="line-101"></a><span>
</span><a name="line-102"></a><span> </span><a name="line-102"></a><span class="hs-comment">-- * ArrayTest</span><span>
</span><a name="line-103"></a><span class="hs-comment">-- * Pet</span><span> </span><a name="line-103"></a><span>
</span><a name="line-104"></a><span> </span><a name="line-104"></a><span class="hs-comment">-- | 'arrayTestArrayOfString' Lens</span><span>
</span><a name="line-105"></a><span class="hs-comment">-- | 'petId' Lens</span><span> </span><a name="line-105"></a><span class="hs-identifier">arrayTestArrayOfStringL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#ArrayTest"><span class="hs-identifier hs-type">ArrayTest</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-special">[</span><span class="hs-identifier hs-type">Text</span><span class="hs-special">]</span><span class="hs-special">)</span><span>
</span><a name="line-106"></a><span class="hs-identifier">petIdL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Integer</span><span class="hs-special">)</span><span> </span><a name="line-106"></a><a name="arrayTestArrayOfStringL"><a href="SwaggerPetstore.Lens.html#arrayTestArrayOfStringL"><span class="hs-identifier">arrayTestArrayOfStringL</span></a></a><span> </span><a name="local-6989586621679099338"><a href="#local-6989586621679099338"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#ArrayTest"><span class="hs-identifier hs-var">ArrayTest</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099342"><a href="#local-6989586621679099342"><span class="hs-identifier">arrayTestArrayOfString</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#ArrayTest"><span class="hs-identifier hs-var">ArrayTest</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099342"><span class="hs-identifier hs-var">arrayTestArrayOfString</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099338"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099339"><span class="hs-identifier hs-var">arrayTestArrayOfString</span></a><span>
</span><a name="line-107"></a><a name="petIdL"><a href="SwaggerPetstore.Lens.html#petIdL"><span class="hs-identifier">petIdL</span></a></a><span> </span><a name="local-6989586621679087528"><a href="#local-6989586621679087528"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-var">Pet</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679087535"><a href="#local-6989586621679087535"><span class="hs-identifier">petId</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-var">Pet</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679087535"><span class="hs-identifier hs-var">petId</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679087528"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679087529"><span class="hs-identifier hs-var">petId</span></a><span> </span><a name="line-107"></a><span class="hs-pragma">{-# INLINE arrayTestArrayOfStringL #-}</span><span>
</span><a name="line-108"></a><span class="hs-pragma">{-# INLINE petIdL #-}</span><span> </span><a name="line-108"></a><span>
</span><a name="line-109"></a><span> </span><a name="line-109"></a><span class="hs-comment">-- | 'arrayTestArrayArrayOfInteger' Lens</span><span>
</span><a name="line-110"></a><span class="hs-comment">-- | 'petCategory' Lens</span><span> </span><a name="line-110"></a><span class="hs-identifier">arrayTestArrayArrayOfIntegerL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#ArrayTest"><span class="hs-identifier hs-type">ArrayTest</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-special">[</span><span class="hs-special">[</span><span class="hs-identifier hs-type">Integer</span><span class="hs-special">]</span><span class="hs-special">]</span><span class="hs-special">)</span><span>
</span><a name="line-111"></a><span class="hs-identifier">petCategoryL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><a href="SwaggerPetstore.Model.html#Category"><span class="hs-identifier hs-type">Category</span></a><span class="hs-special">)</span><span> </span><a name="line-111"></a><a name="arrayTestArrayArrayOfIntegerL"><a href="SwaggerPetstore.Lens.html#arrayTestArrayArrayOfIntegerL"><span class="hs-identifier">arrayTestArrayArrayOfIntegerL</span></a></a><span> </span><a name="local-6989586621679099343"><a href="#local-6989586621679099343"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#ArrayTest"><span class="hs-identifier hs-var">ArrayTest</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099347"><a href="#local-6989586621679099347"><span class="hs-identifier">arrayTestArrayArrayOfInteger</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#ArrayTest"><span class="hs-identifier hs-var">ArrayTest</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099347"><span class="hs-identifier hs-var">arrayTestArrayArrayOfInteger</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099343"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099345"><span class="hs-identifier hs-var">arrayTestArrayArrayOfInteger</span></a><span>
</span><a name="line-112"></a><a name="petCategoryL"><a href="SwaggerPetstore.Lens.html#petCategoryL"><span class="hs-identifier">petCategoryL</span></a></a><span> </span><a name="local-6989586621679087536"><a href="#local-6989586621679087536"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-var">Pet</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679087543"><a href="#local-6989586621679087543"><span class="hs-identifier">petCategory</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-var">Pet</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679087543"><span class="hs-identifier hs-var">petCategory</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679087536"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679087538"><span class="hs-identifier hs-var">petCategory</span></a><span> </span><a name="line-112"></a><span class="hs-pragma">{-# INLINE arrayTestArrayArrayOfIntegerL #-}</span><span>
</span><a name="line-113"></a><span class="hs-pragma">{-# INLINE petCategoryL #-}</span><span> </span><a name="line-113"></a><span>
</span><a name="line-114"></a><span> </span><a name="line-114"></a><span class="hs-comment">-- | 'arrayTestArrayArrayOfModel' Lens</span><span>
</span><a name="line-115"></a><span class="hs-comment">-- | 'petName' Lens</span><span> </span><a name="line-115"></a><span class="hs-identifier">arrayTestArrayArrayOfModelL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#ArrayTest"><span class="hs-identifier hs-type">ArrayTest</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-special">[</span><span class="hs-special">[</span><a href="SwaggerPetstore.Model.html#ReadOnlyFirst"><span class="hs-identifier hs-type">ReadOnlyFirst</span></a><span class="hs-special">]</span><span class="hs-special">]</span><span class="hs-special">)</span><span>
</span><a name="line-116"></a><span class="hs-identifier">petNameL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span> </span><a name="line-116"></a><a name="arrayTestArrayArrayOfModelL"><a href="SwaggerPetstore.Lens.html#arrayTestArrayArrayOfModelL"><span class="hs-identifier">arrayTestArrayArrayOfModelL</span></a></a><span> </span><a name="local-6989586621679099348"><a href="#local-6989586621679099348"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#ArrayTest"><span class="hs-identifier hs-var">ArrayTest</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099352"><a href="#local-6989586621679099352"><span class="hs-identifier">arrayTestArrayArrayOfModel</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#ArrayTest"><span class="hs-identifier hs-var">ArrayTest</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099352"><span class="hs-identifier hs-var">arrayTestArrayArrayOfModel</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099348"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099351"><span class="hs-identifier hs-var">arrayTestArrayArrayOfModel</span></a><span>
</span><a name="line-117"></a><a name="petNameL"><a href="SwaggerPetstore.Lens.html#petNameL"><span class="hs-identifier">petNameL</span></a></a><span> </span><a name="local-6989586621679087544"><a href="#local-6989586621679087544"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-var">Pet</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679087551"><a href="#local-6989586621679087551"><span class="hs-identifier">petName</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-var">Pet</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679087551"><span class="hs-identifier hs-var">petName</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679087544"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679087547"><span class="hs-identifier hs-var">petName</span></a><span> </span><a name="line-117"></a><span class="hs-pragma">{-# INLINE arrayTestArrayArrayOfModelL #-}</span><span>
</span><a name="line-118"></a><span class="hs-pragma">{-# INLINE petNameL #-}</span><span> </span><a name="line-118"></a><span>
</span><a name="line-119"></a><span> </span><a name="line-119"></a><span>
</span><a name="line-120"></a><span class="hs-comment">-- | 'petPhotoUrls' Lens</span><span> </span><a name="line-120"></a><span>
</span><a name="line-121"></a><span class="hs-identifier">petPhotoUrlsL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a><span> </span><span class="hs-special">(</span><span class="hs-special">[</span><span class="hs-identifier hs-type">Text</span><span class="hs-special">]</span><span class="hs-special">)</span><span> </span><a name="line-121"></a><span class="hs-comment">-- * Capitalization</span><span>
</span><a name="line-122"></a><a name="petPhotoUrlsL"><a href="SwaggerPetstore.Lens.html#petPhotoUrlsL"><span class="hs-identifier">petPhotoUrlsL</span></a></a><span> </span><a name="local-6989586621679087552"><a href="#local-6989586621679087552"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-var">Pet</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679087559"><a href="#local-6989586621679087559"><span class="hs-identifier">petPhotoUrls</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-var">Pet</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679087559"><span class="hs-identifier hs-var">petPhotoUrls</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679087552"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679087556"><span class="hs-identifier hs-var">petPhotoUrls</span></a><span> </span><a name="line-122"></a><span>
</span><a name="line-123"></a><span class="hs-pragma">{-# INLINE petPhotoUrlsL #-}</span><span> </span><a name="line-123"></a><span class="hs-comment">-- | 'capitalizationSmallCamel' Lens</span><span>
</span><a name="line-124"></a><span> </span><a name="line-124"></a><span class="hs-identifier">capitalizationSmallCamelL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Capitalization"><span class="hs-identifier hs-type">Capitalization</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span>
</span><a name="line-125"></a><span class="hs-comment">-- | 'petTags' Lens</span><span> </span><a name="line-125"></a><a name="capitalizationSmallCamelL"><a href="SwaggerPetstore.Lens.html#capitalizationSmallCamelL"><span class="hs-identifier">capitalizationSmallCamelL</span></a></a><span> </span><a name="local-6989586621679099353"><a href="#local-6989586621679099353"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Capitalization"><span class="hs-identifier hs-var">Capitalization</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099360"><a href="#local-6989586621679099360"><span class="hs-identifier">capitalizationSmallCamel</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#Capitalization"><span class="hs-identifier hs-var">Capitalization</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099360"><span class="hs-identifier hs-var">capitalizationSmallCamel</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099353"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099354"><span class="hs-identifier hs-var">capitalizationSmallCamel</span></a><span>
</span><a name="line-126"></a><span class="hs-identifier">petTagsL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-special">[</span><a href="SwaggerPetstore.Model.html#Tag"><span class="hs-identifier hs-type">Tag</span></a><span class="hs-special">]</span><span class="hs-special">)</span><span> </span><a name="line-126"></a><span class="hs-pragma">{-# INLINE capitalizationSmallCamelL #-}</span><span>
</span><a name="line-127"></a><a name="petTagsL"><a href="SwaggerPetstore.Lens.html#petTagsL"><span class="hs-identifier">petTagsL</span></a></a><span> </span><a name="local-6989586621679087560"><a href="#local-6989586621679087560"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-var">Pet</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679087567"><a href="#local-6989586621679087567"><span class="hs-identifier">petTags</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-var">Pet</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679087567"><span class="hs-identifier hs-var">petTags</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679087560"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679087565"><span class="hs-identifier hs-var">petTags</span></a><span> </span><a name="line-127"></a><span>
</span><a name="line-128"></a><span class="hs-pragma">{-# INLINE petTagsL #-}</span><span> </span><a name="line-128"></a><span class="hs-comment">-- | 'capitalizationCapitalCamel' Lens</span><span>
</span><a name="line-129"></a><span> </span><a name="line-129"></a><span class="hs-identifier">capitalizationCapitalCamelL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Capitalization"><span class="hs-identifier hs-type">Capitalization</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span>
</span><a name="line-130"></a><span class="hs-comment">-- | 'petStatus' Lens</span><span> </span><a name="line-130"></a><a name="capitalizationCapitalCamelL"><a href="SwaggerPetstore.Lens.html#capitalizationCapitalCamelL"><span class="hs-identifier">capitalizationCapitalCamelL</span></a></a><span> </span><a name="local-6989586621679099361"><a href="#local-6989586621679099361"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Capitalization"><span class="hs-identifier hs-var">Capitalization</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099368"><a href="#local-6989586621679099368"><span class="hs-identifier">capitalizationCapitalCamel</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#Capitalization"><span class="hs-identifier hs-var">Capitalization</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099368"><span class="hs-identifier hs-var">capitalizationCapitalCamel</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099361"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099363"><span class="hs-identifier hs-var">capitalizationCapitalCamel</span></a><span>
</span><a name="line-131"></a><span class="hs-identifier">petStatusL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span> </span><a name="line-131"></a><span class="hs-pragma">{-# INLINE capitalizationCapitalCamelL #-}</span><span>
</span><a name="line-132"></a><a name="petStatusL"><a href="SwaggerPetstore.Lens.html#petStatusL"><span class="hs-identifier">petStatusL</span></a></a><span> </span><a name="local-6989586621679087568"><a href="#local-6989586621679087568"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-var">Pet</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679087575"><a href="#local-6989586621679087575"><span class="hs-identifier">petStatus</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-var">Pet</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679087575"><span class="hs-identifier hs-var">petStatus</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679087568"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679087574"><span class="hs-identifier hs-var">petStatus</span></a><span> </span><a name="line-132"></a><span>
</span><a name="line-133"></a><span class="hs-pragma">{-# INLINE petStatusL #-}</span><span> </span><a name="line-133"></a><span class="hs-comment">-- | 'capitalizationSmallSnake' Lens</span><span>
</span><a name="line-134"></a><span> </span><a name="line-134"></a><span class="hs-identifier">capitalizationSmallSnakeL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Capitalization"><span class="hs-identifier hs-type">Capitalization</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span>
</span><a name="line-135"></a><span> </span><a name="line-135"></a><a name="capitalizationSmallSnakeL"><a href="SwaggerPetstore.Lens.html#capitalizationSmallSnakeL"><span class="hs-identifier">capitalizationSmallSnakeL</span></a></a><span> </span><a name="local-6989586621679099369"><a href="#local-6989586621679099369"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Capitalization"><span class="hs-identifier hs-var">Capitalization</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099376"><a href="#local-6989586621679099376"><span class="hs-identifier">capitalizationSmallSnake</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#Capitalization"><span class="hs-identifier hs-var">Capitalization</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099376"><span class="hs-identifier hs-var">capitalizationSmallSnake</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099369"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099372"><span class="hs-identifier hs-var">capitalizationSmallSnake</span></a><span>
</span><a name="line-136"></a><span> </span><a name="line-136"></a><span class="hs-pragma">{-# INLINE capitalizationSmallSnakeL #-}</span><span>
</span><a name="line-137"></a><span class="hs-comment">-- * Tag</span><span> </span><a name="line-137"></a><span>
</span><a name="line-138"></a><span> </span><a name="line-138"></a><span class="hs-comment">-- | 'capitalizationCapitalSnake' Lens</span><span>
</span><a name="line-139"></a><span class="hs-comment">-- | 'tagId' Lens</span><span> </span><a name="line-139"></a><span class="hs-identifier">capitalizationCapitalSnakeL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Capitalization"><span class="hs-identifier hs-type">Capitalization</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span>
</span><a name="line-140"></a><span class="hs-identifier">tagIdL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Tag"><span class="hs-identifier hs-type">Tag</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Integer</span><span class="hs-special">)</span><span> </span><a name="line-140"></a><a name="capitalizationCapitalSnakeL"><a href="SwaggerPetstore.Lens.html#capitalizationCapitalSnakeL"><span class="hs-identifier">capitalizationCapitalSnakeL</span></a></a><span> </span><a name="local-6989586621679099377"><a href="#local-6989586621679099377"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Capitalization"><span class="hs-identifier hs-var">Capitalization</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099384"><a href="#local-6989586621679099384"><span class="hs-identifier">capitalizationCapitalSnake</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#Capitalization"><span class="hs-identifier hs-var">Capitalization</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099384"><span class="hs-identifier hs-var">capitalizationCapitalSnake</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099377"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099381"><span class="hs-identifier hs-var">capitalizationCapitalSnake</span></a><span>
</span><a name="line-141"></a><a name="tagIdL"><a href="SwaggerPetstore.Lens.html#tagIdL"><span class="hs-identifier">tagIdL</span></a></a><span> </span><a name="local-6989586621679087576"><a href="#local-6989586621679087576"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Tag"><span class="hs-identifier hs-var">Tag</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679087579"><a href="#local-6989586621679087579"><span class="hs-identifier">tagId</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#Tag"><span class="hs-identifier hs-var">Tag</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679087579"><span class="hs-identifier hs-var">tagId</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679087576"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679087577"><span class="hs-identifier hs-var">tagId</span></a><span> </span><a name="line-141"></a><span class="hs-pragma">{-# INLINE capitalizationCapitalSnakeL #-}</span><span>
</span><a name="line-142"></a><span class="hs-pragma">{-# INLINE tagIdL #-}</span><span> </span><a name="line-142"></a><span>
</span><a name="line-143"></a><span> </span><a name="line-143"></a><span class="hs-comment">-- | 'capitalizationScaEthFlowPoints' Lens</span><span>
</span><a name="line-144"></a><span class="hs-comment">-- | 'tagName' Lens</span><span> </span><a name="line-144"></a><span class="hs-identifier">capitalizationScaEthFlowPointsL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Capitalization"><span class="hs-identifier hs-type">Capitalization</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span>
</span><a name="line-145"></a><span class="hs-identifier">tagNameL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Tag"><span class="hs-identifier hs-type">Tag</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span> </span><a name="line-145"></a><a name="capitalizationScaEthFlowPointsL"><a href="SwaggerPetstore.Lens.html#capitalizationScaEthFlowPointsL"><span class="hs-identifier">capitalizationScaEthFlowPointsL</span></a></a><span> </span><a name="local-6989586621679099385"><a href="#local-6989586621679099385"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Capitalization"><span class="hs-identifier hs-var">Capitalization</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099392"><a href="#local-6989586621679099392"><span class="hs-identifier">capitalizationScaEthFlowPoints</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#Capitalization"><span class="hs-identifier hs-var">Capitalization</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099392"><span class="hs-identifier hs-var">capitalizationScaEthFlowPoints</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099385"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099390"><span class="hs-identifier hs-var">capitalizationScaEthFlowPoints</span></a><span>
</span><a name="line-146"></a><a name="tagNameL"><a href="SwaggerPetstore.Lens.html#tagNameL"><span class="hs-identifier">tagNameL</span></a></a><span> </span><a name="local-6989586621679087580"><a href="#local-6989586621679087580"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Tag"><span class="hs-identifier hs-var">Tag</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679087583"><a href="#local-6989586621679087583"><span class="hs-identifier">tagName</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#Tag"><span class="hs-identifier hs-var">Tag</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679087583"><span class="hs-identifier hs-var">tagName</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679087580"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679087582"><span class="hs-identifier hs-var">tagName</span></a><span> </span><a name="line-146"></a><span class="hs-pragma">{-# INLINE capitalizationScaEthFlowPointsL #-}</span><span>
</span><a name="line-147"></a><span class="hs-pragma">{-# INLINE tagNameL #-}</span><span> </span><a name="line-147"></a><span>
</span><a name="line-148"></a><span> </span><a name="line-148"></a><span class="hs-comment">-- | 'capitalizationAttName' Lens</span><span>
</span><a name="line-149"></a><span> </span><a name="line-149"></a><span class="hs-identifier">capitalizationAttNameL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Capitalization"><span class="hs-identifier hs-type">Capitalization</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span>
</span><a name="line-150"></a><span> </span><a name="line-150"></a><a name="capitalizationAttNameL"><a href="SwaggerPetstore.Lens.html#capitalizationAttNameL"><span class="hs-identifier">capitalizationAttNameL</span></a></a><span> </span><a name="local-6989586621679099393"><a href="#local-6989586621679099393"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Capitalization"><span class="hs-identifier hs-var">Capitalization</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099400"><a href="#local-6989586621679099400"><span class="hs-identifier">capitalizationAttName</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#Capitalization"><span class="hs-identifier hs-var">Capitalization</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099400"><span class="hs-identifier hs-var">capitalizationAttName</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099393"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099399"><span class="hs-identifier hs-var">capitalizationAttName</span></a><span>
</span><a name="line-151"></a><span class="hs-comment">-- * User</span><span> </span><a name="line-151"></a><span class="hs-pragma">{-# INLINE capitalizationAttNameL #-}</span><span>
</span><a name="line-152"></a><span> </span><a name="line-152"></a><span>
</span><a name="line-153"></a><span class="hs-comment">-- | 'userId' Lens</span><span> </span><a name="line-153"></a><span>
</span><a name="line-154"></a><span class="hs-identifier">userIdL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Integer</span><span class="hs-special">)</span><span> </span><a name="line-154"></a><span>
</span><a name="line-155"></a><a name="userIdL"><a href="SwaggerPetstore.Lens.html#userIdL"><span class="hs-identifier">userIdL</span></a></a><span> </span><a name="local-6989586621679087584"><a href="#local-6989586621679087584"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-var">User</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679087593"><a href="#local-6989586621679087593"><span class="hs-identifier">userId</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-var">User</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679087593"><span class="hs-identifier hs-var">userId</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679087584"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679087585"><span class="hs-identifier hs-var">userId</span></a><span> </span><a name="line-155"></a><span class="hs-comment">-- * Category</span><span>
</span><a name="line-156"></a><span class="hs-pragma">{-# INLINE userIdL #-}</span><span> </span><a name="line-156"></a><span>
</span><a name="line-157"></a><span> </span><a name="line-157"></a><span class="hs-comment">-- | 'categoryId' Lens</span><span>
</span><a name="line-158"></a><span class="hs-comment">-- | 'userUsername' Lens</span><span> </span><a name="line-158"></a><span class="hs-identifier">categoryIdL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Category"><span class="hs-identifier hs-type">Category</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Integer</span><span class="hs-special">)</span><span>
</span><a name="line-159"></a><span class="hs-identifier">userUsernameL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span> </span><a name="line-159"></a><a name="categoryIdL"><a href="SwaggerPetstore.Lens.html#categoryIdL"><span class="hs-identifier">categoryIdL</span></a></a><span> </span><a name="local-6989586621679099401"><a href="#local-6989586621679099401"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Category"><span class="hs-identifier hs-var">Category</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099404"><a href="#local-6989586621679099404"><span class="hs-identifier">categoryId</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#Category"><span class="hs-identifier hs-var">Category</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099404"><span class="hs-identifier hs-var">categoryId</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099401"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099402"><span class="hs-identifier hs-var">categoryId</span></a><span>
</span><a name="line-160"></a><a name="userUsernameL"><a href="SwaggerPetstore.Lens.html#userUsernameL"><span class="hs-identifier">userUsernameL</span></a></a><span> </span><a name="local-6989586621679087594"><a href="#local-6989586621679087594"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-var">User</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679087603"><a href="#local-6989586621679087603"><span class="hs-identifier">userUsername</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-var">User</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679087603"><span class="hs-identifier hs-var">userUsername</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679087594"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679087596"><span class="hs-identifier hs-var">userUsername</span></a><span> </span><a name="line-160"></a><span class="hs-pragma">{-# INLINE categoryIdL #-}</span><span>
</span><a name="line-161"></a><span class="hs-pragma">{-# INLINE userUsernameL #-}</span><span> </span><a name="line-161"></a><span>
</span><a name="line-162"></a><span> </span><a name="line-162"></a><span class="hs-comment">-- | 'categoryName' Lens</span><span>
</span><a name="line-163"></a><span class="hs-comment">-- | 'userFirstName' Lens</span><span> </span><a name="line-163"></a><span class="hs-identifier">categoryNameL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Category"><span class="hs-identifier hs-type">Category</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span>
</span><a name="line-164"></a><span class="hs-identifier">userFirstNameL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span> </span><a name="line-164"></a><a name="categoryNameL"><a href="SwaggerPetstore.Lens.html#categoryNameL"><span class="hs-identifier">categoryNameL</span></a></a><span> </span><a name="local-6989586621679099405"><a href="#local-6989586621679099405"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Category"><span class="hs-identifier hs-var">Category</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099408"><a href="#local-6989586621679099408"><span class="hs-identifier">categoryName</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#Category"><span class="hs-identifier hs-var">Category</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099408"><span class="hs-identifier hs-var">categoryName</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099405"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099407"><span class="hs-identifier hs-var">categoryName</span></a><span>
</span><a name="line-165"></a><a name="userFirstNameL"><a href="SwaggerPetstore.Lens.html#userFirstNameL"><span class="hs-identifier">userFirstNameL</span></a></a><span> </span><a name="local-6989586621679087604"><a href="#local-6989586621679087604"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-var">User</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679087613"><a href="#local-6989586621679087613"><span class="hs-identifier">userFirstName</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-var">User</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679087613"><span class="hs-identifier hs-var">userFirstName</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679087604"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679087607"><span class="hs-identifier hs-var">userFirstName</span></a><span> </span><a name="line-165"></a><span class="hs-pragma">{-# INLINE categoryNameL #-}</span><span>
</span><a name="line-166"></a><span class="hs-pragma">{-# INLINE userFirstNameL #-}</span><span> </span><a name="line-166"></a><span>
</span><a name="line-167"></a><span> </span><a name="line-167"></a><span>
</span><a name="line-168"></a><span class="hs-comment">-- | 'userLastName' Lens</span><span> </span><a name="line-168"></a><span>
</span><a name="line-169"></a><span class="hs-identifier">userLastNameL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span> </span><a name="line-169"></a><span class="hs-comment">-- * ClassModel</span><span>
</span><a name="line-170"></a><a name="userLastNameL"><a href="SwaggerPetstore.Lens.html#userLastNameL"><span class="hs-identifier">userLastNameL</span></a></a><span> </span><a name="local-6989586621679087614"><a href="#local-6989586621679087614"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-var">User</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679087623"><a href="#local-6989586621679087623"><span class="hs-identifier">userLastName</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-var">User</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679087623"><span class="hs-identifier hs-var">userLastName</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679087614"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679087618"><span class="hs-identifier hs-var">userLastName</span></a><span> </span><a name="line-170"></a><span>
</span><a name="line-171"></a><span class="hs-pragma">{-# INLINE userLastNameL #-}</span><span> </span><a name="line-171"></a><span class="hs-comment">-- | 'classModelClass' Lens</span><span>
</span><a name="line-172"></a><span> </span><a name="line-172"></a><span class="hs-identifier">classModelClassL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#ClassModel"><span class="hs-identifier hs-type">ClassModel</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span>
</span><a name="line-173"></a><span class="hs-comment">-- | 'userEmail' Lens</span><span> </span><a name="line-173"></a><a name="classModelClassL"><a href="SwaggerPetstore.Lens.html#classModelClassL"><span class="hs-identifier">classModelClassL</span></a></a><span> </span><a name="local-6989586621679099409"><a href="#local-6989586621679099409"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#ClassModel"><span class="hs-identifier hs-var">ClassModel</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099411"><a href="#local-6989586621679099411"><span class="hs-identifier">classModelClass</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#ClassModel"><span class="hs-identifier hs-var">ClassModel</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099411"><span class="hs-identifier hs-var">classModelClass</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099409"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099410"><span class="hs-identifier hs-var">classModelClass</span></a><span>
</span><a name="line-174"></a><span class="hs-identifier">userEmailL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span> </span><a name="line-174"></a><span class="hs-pragma">{-# INLINE classModelClassL #-}</span><span>
</span><a name="line-175"></a><a name="userEmailL"><a href="SwaggerPetstore.Lens.html#userEmailL"><span class="hs-identifier">userEmailL</span></a></a><span> </span><a name="local-6989586621679087624"><a href="#local-6989586621679087624"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-var">User</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679087633"><a href="#local-6989586621679087633"><span class="hs-identifier">userEmail</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-var">User</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679087633"><span class="hs-identifier hs-var">userEmail</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679087624"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679087629"><span class="hs-identifier hs-var">userEmail</span></a><span> </span><a name="line-175"></a><span>
</span><a name="line-176"></a><span class="hs-pragma">{-# INLINE userEmailL #-}</span><span> </span><a name="line-176"></a><span>
</span><a name="line-177"></a><span> </span><a name="line-177"></a><span>
</span><a name="line-178"></a><span class="hs-comment">-- | 'userPassword' Lens</span><span> </span><a name="line-178"></a><span class="hs-comment">-- * Client</span><span>
</span><a name="line-179"></a><span class="hs-identifier">userPasswordL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span> </span><a name="line-179"></a><span>
</span><a name="line-180"></a><a name="userPasswordL"><a href="SwaggerPetstore.Lens.html#userPasswordL"><span class="hs-identifier">userPasswordL</span></a></a><span> </span><a name="local-6989586621679087634"><a href="#local-6989586621679087634"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-var">User</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679087643"><a href="#local-6989586621679087643"><span class="hs-identifier">userPassword</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-var">User</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679087643"><span class="hs-identifier hs-var">userPassword</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679087634"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679087640"><span class="hs-identifier hs-var">userPassword</span></a><span> </span><a name="line-180"></a><span class="hs-comment">-- | 'clientClient' Lens</span><span>
</span><a name="line-181"></a><span class="hs-pragma">{-# INLINE userPasswordL #-}</span><span> </span><a name="line-181"></a><span class="hs-identifier">clientClientL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Client"><span class="hs-identifier hs-type">Client</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span>
</span><a name="line-182"></a><span> </span><a name="line-182"></a><a name="clientClientL"><a href="SwaggerPetstore.Lens.html#clientClientL"><span class="hs-identifier">clientClientL</span></a></a><span> </span><a name="local-6989586621679099412"><a href="#local-6989586621679099412"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Client"><span class="hs-identifier hs-var">Client</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099414"><a href="#local-6989586621679099414"><span class="hs-identifier">clientClient</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#Client"><span class="hs-identifier hs-var">Client</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099414"><span class="hs-identifier hs-var">clientClient</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099412"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099413"><span class="hs-identifier hs-var">clientClient</span></a><span>
</span><a name="line-183"></a><span class="hs-comment">-- | 'userPhone' Lens</span><span> </span><a name="line-183"></a><span class="hs-pragma">{-# INLINE clientClientL #-}</span><span>
</span><a name="line-184"></a><span class="hs-identifier">userPhoneL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span> </span><a name="line-184"></a><span>
</span><a name="line-185"></a><a name="userPhoneL"><a href="SwaggerPetstore.Lens.html#userPhoneL"><span class="hs-identifier">userPhoneL</span></a></a><span> </span><a name="local-6989586621679087644"><a href="#local-6989586621679087644"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-var">User</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679087653"><a href="#local-6989586621679087653"><span class="hs-identifier">userPhone</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-var">User</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679087653"><span class="hs-identifier hs-var">userPhone</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679087644"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679087651"><span class="hs-identifier hs-var">userPhone</span></a><span> </span><a name="line-185"></a><span>
</span><a name="line-186"></a><span class="hs-pragma">{-# INLINE userPhoneL #-}</span><span> </span><a name="line-186"></a><span>
</span><a name="line-187"></a><span> </span><a name="line-187"></a><span class="hs-comment">-- * EnumArrays</span><span>
</span><a name="line-188"></a><span class="hs-comment">-- | 'userUserStatus' Lens</span><span> </span><a name="line-188"></a><span>
</span><a name="line-189"></a><span class="hs-identifier">userUserStatusL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Int</span><span class="hs-special">)</span><span> </span><a name="line-189"></a><span class="hs-comment">-- | 'enumArraysJustSymbol' Lens</span><span>
</span><a name="line-190"></a><a name="userUserStatusL"><a href="SwaggerPetstore.Lens.html#userUserStatusL"><span class="hs-identifier">userUserStatusL</span></a></a><span> </span><a name="local-6989586621679087654"><a href="#local-6989586621679087654"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-var">User</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679087663"><a href="#local-6989586621679087663"><span class="hs-identifier">userUserStatus</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-var">User</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679087663"><span class="hs-identifier hs-var">userUserStatus</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679087654"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679087662"><span class="hs-identifier hs-var">userUserStatus</span></a><span> </span><a name="line-190"></a><span class="hs-identifier">enumArraysJustSymbolL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#EnumArrays"><span class="hs-identifier hs-type">EnumArrays</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span>
</span><a name="line-191"></a><span class="hs-pragma">{-# INLINE userUserStatusL #-}</span><span> </span><a name="line-191"></a><a name="enumArraysJustSymbolL"><a href="SwaggerPetstore.Lens.html#enumArraysJustSymbolL"><span class="hs-identifier">enumArraysJustSymbolL</span></a></a><span> </span><a name="local-6989586621679099415"><a href="#local-6989586621679099415"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#EnumArrays"><span class="hs-identifier hs-var">EnumArrays</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099418"><a href="#local-6989586621679099418"><span class="hs-identifier">enumArraysJustSymbol</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#EnumArrays"><span class="hs-identifier hs-var">EnumArrays</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099418"><span class="hs-identifier hs-var">enumArraysJustSymbol</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099415"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099416"><span class="hs-identifier hs-var">enumArraysJustSymbol</span></a><span>
</span><a name="line-192"></a><span> </span><a name="line-192"></a><span class="hs-pragma">{-# INLINE enumArraysJustSymbolL #-}</span><span>
</span><a name="line-193"></a><span> </span><a name="line-193"></a><span>
</span><a name="line-194"></a></pre></body></html> </span><a name="line-194"></a><span class="hs-comment">-- | 'enumArraysArrayEnum' Lens</span><span>
</span><a name="line-195"></a><span class="hs-identifier">enumArraysArrayEnumL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#EnumArrays"><span class="hs-identifier hs-type">EnumArrays</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-special">[</span><span class="hs-identifier hs-type">Text</span><span class="hs-special">]</span><span class="hs-special">)</span><span>
</span><a name="line-196"></a><a name="enumArraysArrayEnumL"><a href="SwaggerPetstore.Lens.html#enumArraysArrayEnumL"><span class="hs-identifier">enumArraysArrayEnumL</span></a></a><span> </span><a name="local-6989586621679099419"><a href="#local-6989586621679099419"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#EnumArrays"><span class="hs-identifier hs-var">EnumArrays</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099422"><a href="#local-6989586621679099422"><span class="hs-identifier">enumArraysArrayEnum</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#EnumArrays"><span class="hs-identifier hs-var">EnumArrays</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099422"><span class="hs-identifier hs-var">enumArraysArrayEnum</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099419"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099421"><span class="hs-identifier hs-var">enumArraysArrayEnum</span></a><span>
</span><a name="line-197"></a><span class="hs-pragma">{-# INLINE enumArraysArrayEnumL #-}</span><span>
</span><a name="line-198"></a><span>
</span><a name="line-199"></a><span>
</span><a name="line-200"></a><span>
</span><a name="line-201"></a><span class="hs-comment">-- * EnumClass</span><span>
</span><a name="line-202"></a><span>
</span><a name="line-203"></a><span>
</span><a name="line-204"></a><span>
</span><a name="line-205"></a><span class="hs-comment">-- * EnumTest</span><span>
</span><a name="line-206"></a><span>
</span><a name="line-207"></a><span class="hs-comment">-- | 'enumTestEnumString' Lens</span><span>
</span><a name="line-208"></a><span class="hs-identifier">enumTestEnumStringL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#EnumTest"><span class="hs-identifier hs-type">EnumTest</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span>
</span><a name="line-209"></a><a name="enumTestEnumStringL"><a href="SwaggerPetstore.Lens.html#enumTestEnumStringL"><span class="hs-identifier">enumTestEnumStringL</span></a></a><span> </span><a name="local-6989586621679099423"><a href="#local-6989586621679099423"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#EnumTest"><span class="hs-identifier hs-var">EnumTest</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099428"><a href="#local-6989586621679099428"><span class="hs-identifier">enumTestEnumString</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#EnumTest"><span class="hs-identifier hs-var">EnumTest</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099428"><span class="hs-identifier hs-var">enumTestEnumString</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099423"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099424"><span class="hs-identifier hs-var">enumTestEnumString</span></a><span>
</span><a name="line-210"></a><span class="hs-pragma">{-# INLINE enumTestEnumStringL #-}</span><span>
</span><a name="line-211"></a><span>
</span><a name="line-212"></a><span class="hs-comment">-- | 'enumTestEnumInteger' Lens</span><span>
</span><a name="line-213"></a><span class="hs-identifier">enumTestEnumIntegerL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#EnumTest"><span class="hs-identifier hs-type">EnumTest</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Int</span><span class="hs-special">)</span><span>
</span><a name="line-214"></a><a name="enumTestEnumIntegerL"><a href="SwaggerPetstore.Lens.html#enumTestEnumIntegerL"><span class="hs-identifier">enumTestEnumIntegerL</span></a></a><span> </span><a name="local-6989586621679099429"><a href="#local-6989586621679099429"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#EnumTest"><span class="hs-identifier hs-var">EnumTest</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099434"><a href="#local-6989586621679099434"><span class="hs-identifier">enumTestEnumInteger</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#EnumTest"><span class="hs-identifier hs-var">EnumTest</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099434"><span class="hs-identifier hs-var">enumTestEnumInteger</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099429"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099431"><span class="hs-identifier hs-var">enumTestEnumInteger</span></a><span>
</span><a name="line-215"></a><span class="hs-pragma">{-# INLINE enumTestEnumIntegerL #-}</span><span>
</span><a name="line-216"></a><span>
</span><a name="line-217"></a><span class="hs-comment">-- | 'enumTestEnumNumber' Lens</span><span>
</span><a name="line-218"></a><span class="hs-identifier">enumTestEnumNumberL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#EnumTest"><span class="hs-identifier hs-type">EnumTest</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Double</span><span class="hs-special">)</span><span>
</span><a name="line-219"></a><a name="enumTestEnumNumberL"><a href="SwaggerPetstore.Lens.html#enumTestEnumNumberL"><span class="hs-identifier">enumTestEnumNumberL</span></a></a><span> </span><a name="local-6989586621679099435"><a href="#local-6989586621679099435"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#EnumTest"><span class="hs-identifier hs-var">EnumTest</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099440"><a href="#local-6989586621679099440"><span class="hs-identifier">enumTestEnumNumber</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#EnumTest"><span class="hs-identifier hs-var">EnumTest</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099440"><span class="hs-identifier hs-var">enumTestEnumNumber</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099435"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099438"><span class="hs-identifier hs-var">enumTestEnumNumber</span></a><span>
</span><a name="line-220"></a><span class="hs-pragma">{-# INLINE enumTestEnumNumberL #-}</span><span>
</span><a name="line-221"></a><span>
</span><a name="line-222"></a><span class="hs-comment">-- | 'enumTestOuterEnum' Lens</span><span>
</span><a name="line-223"></a><span class="hs-identifier">enumTestOuterEnumL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#EnumTest"><span class="hs-identifier hs-type">EnumTest</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><a href="SwaggerPetstore.Model.html#OuterEnum"><span class="hs-identifier hs-type">OuterEnum</span></a><span class="hs-special">)</span><span>
</span><a name="line-224"></a><a name="enumTestOuterEnumL"><a href="SwaggerPetstore.Lens.html#enumTestOuterEnumL"><span class="hs-identifier">enumTestOuterEnumL</span></a></a><span> </span><a name="local-6989586621679099441"><a href="#local-6989586621679099441"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#EnumTest"><span class="hs-identifier hs-var">EnumTest</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099446"><a href="#local-6989586621679099446"><span class="hs-identifier">enumTestOuterEnum</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#EnumTest"><span class="hs-identifier hs-var">EnumTest</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099446"><span class="hs-identifier hs-var">enumTestOuterEnum</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099441"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099445"><span class="hs-identifier hs-var">enumTestOuterEnum</span></a><span>
</span><a name="line-225"></a><span class="hs-pragma">{-# INLINE enumTestOuterEnumL #-}</span><span>
</span><a name="line-226"></a><span>
</span><a name="line-227"></a><span>
</span><a name="line-228"></a><span>
</span><a name="line-229"></a><span class="hs-comment">-- * FormatTest</span><span>
</span><a name="line-230"></a><span>
</span><a name="line-231"></a><span class="hs-comment">-- | 'formatTestInteger' Lens</span><span>
</span><a name="line-232"></a><span class="hs-identifier">formatTestIntegerL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#FormatTest"><span class="hs-identifier hs-type">FormatTest</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Int</span><span class="hs-special">)</span><span>
</span><a name="line-233"></a><a name="formatTestIntegerL"><a href="SwaggerPetstore.Lens.html#formatTestIntegerL"><span class="hs-identifier">formatTestIntegerL</span></a></a><span> </span><a name="local-6989586621679099447"><a href="#local-6989586621679099447"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#FormatTest"><span class="hs-identifier hs-var">FormatTest</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099461"><a href="#local-6989586621679099461"><span class="hs-identifier">formatTestInteger</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#FormatTest"><span class="hs-identifier hs-var">FormatTest</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099461"><span class="hs-identifier hs-var">formatTestInteger</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099447"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099448"><span class="hs-identifier hs-var">formatTestInteger</span></a><span>
</span><a name="line-234"></a><span class="hs-pragma">{-# INLINE formatTestIntegerL #-}</span><span>
</span><a name="line-235"></a><span>
</span><a name="line-236"></a><span class="hs-comment">-- | 'formatTestInt32' Lens</span><span>
</span><a name="line-237"></a><span class="hs-identifier">formatTestInt32L</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#FormatTest"><span class="hs-identifier hs-type">FormatTest</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Int</span><span class="hs-special">)</span><span>
</span><a name="line-238"></a><a name="formatTestInt32L"><a href="SwaggerPetstore.Lens.html#formatTestInt32L"><span class="hs-identifier">formatTestInt32L</span></a></a><span> </span><a name="local-6989586621679099462"><a href="#local-6989586621679099462"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#FormatTest"><span class="hs-identifier hs-var">FormatTest</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099476"><a href="#local-6989586621679099476"><span class="hs-identifier">formatTestInt32</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#FormatTest"><span class="hs-identifier hs-var">FormatTest</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099476"><span class="hs-identifier hs-var">formatTestInt32</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099462"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099464"><span class="hs-identifier hs-var">formatTestInt32</span></a><span>
</span><a name="line-239"></a><span class="hs-pragma">{-# INLINE formatTestInt32L #-}</span><span>
</span><a name="line-240"></a><span>
</span><a name="line-241"></a><span class="hs-comment">-- | 'formatTestInt64' Lens</span><span>
</span><a name="line-242"></a><span class="hs-identifier">formatTestInt64L</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#FormatTest"><span class="hs-identifier hs-type">FormatTest</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Integer</span><span class="hs-special">)</span><span>
</span><a name="line-243"></a><a name="formatTestInt64L"><a href="SwaggerPetstore.Lens.html#formatTestInt64L"><span class="hs-identifier">formatTestInt64L</span></a></a><span> </span><a name="local-6989586621679099477"><a href="#local-6989586621679099477"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#FormatTest"><span class="hs-identifier hs-var">FormatTest</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099491"><a href="#local-6989586621679099491"><span class="hs-identifier">formatTestInt64</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#FormatTest"><span class="hs-identifier hs-var">FormatTest</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099491"><span class="hs-identifier hs-var">formatTestInt64</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099477"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099480"><span class="hs-identifier hs-var">formatTestInt64</span></a><span>
</span><a name="line-244"></a><span class="hs-pragma">{-# INLINE formatTestInt64L #-}</span><span>
</span><a name="line-245"></a><span>
</span><a name="line-246"></a><span class="hs-comment">-- | 'formatTestNumber' Lens</span><span>
</span><a name="line-247"></a><span class="hs-identifier">formatTestNumberL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#FormatTest"><span class="hs-identifier hs-type">FormatTest</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Double</span><span class="hs-special">)</span><span>
</span><a name="line-248"></a><a name="formatTestNumberL"><a href="SwaggerPetstore.Lens.html#formatTestNumberL"><span class="hs-identifier">formatTestNumberL</span></a></a><span> </span><a name="local-6989586621679099492"><a href="#local-6989586621679099492"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#FormatTest"><span class="hs-identifier hs-var">FormatTest</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099506"><a href="#local-6989586621679099506"><span class="hs-identifier">formatTestNumber</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#FormatTest"><span class="hs-identifier hs-var">FormatTest</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099506"><span class="hs-identifier hs-var">formatTestNumber</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099492"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099496"><span class="hs-identifier hs-var">formatTestNumber</span></a><span>
</span><a name="line-249"></a><span class="hs-pragma">{-# INLINE formatTestNumberL #-}</span><span>
</span><a name="line-250"></a><span>
</span><a name="line-251"></a><span class="hs-comment">-- | 'formatTestFloat' Lens</span><span>
</span><a name="line-252"></a><span class="hs-identifier">formatTestFloatL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#FormatTest"><span class="hs-identifier hs-type">FormatTest</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Float</span><span class="hs-special">)</span><span>
</span><a name="line-253"></a><a name="formatTestFloatL"><a href="SwaggerPetstore.Lens.html#formatTestFloatL"><span class="hs-identifier">formatTestFloatL</span></a></a><span> </span><a name="local-6989586621679099507"><a href="#local-6989586621679099507"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#FormatTest"><span class="hs-identifier hs-var">FormatTest</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099521"><a href="#local-6989586621679099521"><span class="hs-identifier">formatTestFloat</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#FormatTest"><span class="hs-identifier hs-var">FormatTest</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099521"><span class="hs-identifier hs-var">formatTestFloat</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099507"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099512"><span class="hs-identifier hs-var">formatTestFloat</span></a><span>
</span><a name="line-254"></a><span class="hs-pragma">{-# INLINE formatTestFloatL #-}</span><span>
</span><a name="line-255"></a><span>
</span><a name="line-256"></a><span class="hs-comment">-- | 'formatTestDouble' Lens</span><span>
</span><a name="line-257"></a><span class="hs-identifier">formatTestDoubleL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#FormatTest"><span class="hs-identifier hs-type">FormatTest</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Double</span><span class="hs-special">)</span><span>
</span><a name="line-258"></a><a name="formatTestDoubleL"><a href="SwaggerPetstore.Lens.html#formatTestDoubleL"><span class="hs-identifier">formatTestDoubleL</span></a></a><span> </span><a name="local-6989586621679099522"><a href="#local-6989586621679099522"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#FormatTest"><span class="hs-identifier hs-var">FormatTest</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099536"><a href="#local-6989586621679099536"><span class="hs-identifier">formatTestDouble</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#FormatTest"><span class="hs-identifier hs-var">FormatTest</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099536"><span class="hs-identifier hs-var">formatTestDouble</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099522"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099528"><span class="hs-identifier hs-var">formatTestDouble</span></a><span>
</span><a name="line-259"></a><span class="hs-pragma">{-# INLINE formatTestDoubleL #-}</span><span>
</span><a name="line-260"></a><span>
</span><a name="line-261"></a><span class="hs-comment">-- | 'formatTestString' Lens</span><span>
</span><a name="line-262"></a><span class="hs-identifier">formatTestStringL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#FormatTest"><span class="hs-identifier hs-type">FormatTest</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span>
</span><a name="line-263"></a><a name="formatTestStringL"><a href="SwaggerPetstore.Lens.html#formatTestStringL"><span class="hs-identifier">formatTestStringL</span></a></a><span> </span><a name="local-6989586621679099537"><a href="#local-6989586621679099537"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#FormatTest"><span class="hs-identifier hs-var">FormatTest</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099551"><a href="#local-6989586621679099551"><span class="hs-identifier">formatTestString</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#FormatTest"><span class="hs-identifier hs-var">FormatTest</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099551"><span class="hs-identifier hs-var">formatTestString</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099537"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099544"><span class="hs-identifier hs-var">formatTestString</span></a><span>
</span><a name="line-264"></a><span class="hs-pragma">{-# INLINE formatTestStringL #-}</span><span>
</span><a name="line-265"></a><span>
</span><a name="line-266"></a><span class="hs-comment">-- | 'formatTestByte' Lens</span><span>
</span><a name="line-267"></a><span class="hs-identifier">formatTestByteL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#FormatTest"><span class="hs-identifier hs-type">FormatTest</span></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#ByteArray"><span class="hs-identifier hs-type">ByteArray</span></a><span class="hs-special">)</span><span>
</span><a name="line-268"></a><a name="formatTestByteL"><a href="SwaggerPetstore.Lens.html#formatTestByteL"><span class="hs-identifier">formatTestByteL</span></a></a><span> </span><a name="local-6989586621679099552"><a href="#local-6989586621679099552"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#FormatTest"><span class="hs-identifier hs-var">FormatTest</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099566"><a href="#local-6989586621679099566"><span class="hs-identifier">formatTestByte</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#FormatTest"><span class="hs-identifier hs-var">FormatTest</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099566"><span class="hs-identifier hs-var">formatTestByte</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099552"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099560"><span class="hs-identifier hs-var">formatTestByte</span></a><span>
</span><a name="line-269"></a><span class="hs-pragma">{-# INLINE formatTestByteL #-}</span><span>
</span><a name="line-270"></a><span>
</span><a name="line-271"></a><span class="hs-comment">-- | 'formatTestBinary' Lens</span><span>
</span><a name="line-272"></a><span class="hs-identifier">formatTestBinaryL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#FormatTest"><span class="hs-identifier hs-type">FormatTest</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><a href="SwaggerPetstore.Model.html#Binary"><span class="hs-identifier hs-type">Binary</span></a><span class="hs-special">)</span><span>
</span><a name="line-273"></a><a name="formatTestBinaryL"><a href="SwaggerPetstore.Lens.html#formatTestBinaryL"><span class="hs-identifier">formatTestBinaryL</span></a></a><span> </span><a name="local-6989586621679099567"><a href="#local-6989586621679099567"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#FormatTest"><span class="hs-identifier hs-var">FormatTest</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099581"><a href="#local-6989586621679099581"><span class="hs-identifier">formatTestBinary</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#FormatTest"><span class="hs-identifier hs-var">FormatTest</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099581"><span class="hs-identifier hs-var">formatTestBinary</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099567"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099576"><span class="hs-identifier hs-var">formatTestBinary</span></a><span>
</span><a name="line-274"></a><span class="hs-pragma">{-# INLINE formatTestBinaryL #-}</span><span>
</span><a name="line-275"></a><span>
</span><a name="line-276"></a><span class="hs-comment">-- | 'formatTestDate' Lens</span><span>
</span><a name="line-277"></a><span class="hs-identifier">formatTestDateL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#FormatTest"><span class="hs-identifier hs-type">FormatTest</span></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#Date"><span class="hs-identifier hs-type">Date</span></a><span class="hs-special">)</span><span>
</span><a name="line-278"></a><a name="formatTestDateL"><a href="SwaggerPetstore.Lens.html#formatTestDateL"><span class="hs-identifier">formatTestDateL</span></a></a><span> </span><a name="local-6989586621679099582"><a href="#local-6989586621679099582"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#FormatTest"><span class="hs-identifier hs-var">FormatTest</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099596"><a href="#local-6989586621679099596"><span class="hs-identifier">formatTestDate</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#FormatTest"><span class="hs-identifier hs-var">FormatTest</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099596"><span class="hs-identifier hs-var">formatTestDate</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099582"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099592"><span class="hs-identifier hs-var">formatTestDate</span></a><span>
</span><a name="line-279"></a><span class="hs-pragma">{-# INLINE formatTestDateL #-}</span><span>
</span><a name="line-280"></a><span>
</span><a name="line-281"></a><span class="hs-comment">-- | 'formatTestDateTime' Lens</span><span>
</span><a name="line-282"></a><span class="hs-identifier">formatTestDateTimeL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#FormatTest"><span class="hs-identifier hs-type">FormatTest</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><a href="SwaggerPetstore.Model.html#DateTime"><span class="hs-identifier hs-type">DateTime</span></a><span class="hs-special">)</span><span>
</span><a name="line-283"></a><a name="formatTestDateTimeL"><a href="SwaggerPetstore.Lens.html#formatTestDateTimeL"><span class="hs-identifier">formatTestDateTimeL</span></a></a><span> </span><a name="local-6989586621679099597"><a href="#local-6989586621679099597"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#FormatTest"><span class="hs-identifier hs-var">FormatTest</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099611"><a href="#local-6989586621679099611"><span class="hs-identifier">formatTestDateTime</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#FormatTest"><span class="hs-identifier hs-var">FormatTest</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099611"><span class="hs-identifier hs-var">formatTestDateTime</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099597"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099608"><span class="hs-identifier hs-var">formatTestDateTime</span></a><span>
</span><a name="line-284"></a><span class="hs-pragma">{-# INLINE formatTestDateTimeL #-}</span><span>
</span><a name="line-285"></a><span>
</span><a name="line-286"></a><span class="hs-comment">-- | 'formatTestUuid' Lens</span><span>
</span><a name="line-287"></a><span class="hs-identifier">formatTestUuidL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#FormatTest"><span class="hs-identifier hs-type">FormatTest</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span>
</span><a name="line-288"></a><a name="formatTestUuidL"><a href="SwaggerPetstore.Lens.html#formatTestUuidL"><span class="hs-identifier">formatTestUuidL</span></a></a><span> </span><a name="local-6989586621679099612"><a href="#local-6989586621679099612"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#FormatTest"><span class="hs-identifier hs-var">FormatTest</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099626"><a href="#local-6989586621679099626"><span class="hs-identifier">formatTestUuid</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#FormatTest"><span class="hs-identifier hs-var">FormatTest</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099626"><span class="hs-identifier hs-var">formatTestUuid</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099612"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099624"><span class="hs-identifier hs-var">formatTestUuid</span></a><span>
</span><a name="line-289"></a><span class="hs-pragma">{-# INLINE formatTestUuidL #-}</span><span>
</span><a name="line-290"></a><span>
</span><a name="line-291"></a><span class="hs-comment">-- | 'formatTestPassword' Lens</span><span>
</span><a name="line-292"></a><span class="hs-identifier">formatTestPasswordL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#FormatTest"><span class="hs-identifier hs-type">FormatTest</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span>
</span><a name="line-293"></a><a name="formatTestPasswordL"><a href="SwaggerPetstore.Lens.html#formatTestPasswordL"><span class="hs-identifier">formatTestPasswordL</span></a></a><span> </span><a name="local-6989586621679099627"><a href="#local-6989586621679099627"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#FormatTest"><span class="hs-identifier hs-var">FormatTest</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099641"><a href="#local-6989586621679099641"><span class="hs-identifier">formatTestPassword</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#FormatTest"><span class="hs-identifier hs-var">FormatTest</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099641"><span class="hs-identifier hs-var">formatTestPassword</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099627"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099640"><span class="hs-identifier hs-var">formatTestPassword</span></a><span>
</span><a name="line-294"></a><span class="hs-pragma">{-# INLINE formatTestPasswordL #-}</span><span>
</span><a name="line-295"></a><span>
</span><a name="line-296"></a><span>
</span><a name="line-297"></a><span>
</span><a name="line-298"></a><span class="hs-comment">-- * HasOnlyReadOnly</span><span>
</span><a name="line-299"></a><span>
</span><a name="line-300"></a><span class="hs-comment">-- | 'hasOnlyReadOnlyBar' Lens</span><span>
</span><a name="line-301"></a><span class="hs-identifier">hasOnlyReadOnlyBarL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#HasOnlyReadOnly"><span class="hs-identifier hs-type">HasOnlyReadOnly</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span>
</span><a name="line-302"></a><a name="hasOnlyReadOnlyBarL"><a href="SwaggerPetstore.Lens.html#hasOnlyReadOnlyBarL"><span class="hs-identifier">hasOnlyReadOnlyBarL</span></a></a><span> </span><a name="local-6989586621679099642"><a href="#local-6989586621679099642"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#HasOnlyReadOnly"><span class="hs-identifier hs-var">HasOnlyReadOnly</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099645"><a href="#local-6989586621679099645"><span class="hs-identifier">hasOnlyReadOnlyBar</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#HasOnlyReadOnly"><span class="hs-identifier hs-var">HasOnlyReadOnly</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099645"><span class="hs-identifier hs-var">hasOnlyReadOnlyBar</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099642"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099643"><span class="hs-identifier hs-var">hasOnlyReadOnlyBar</span></a><span>
</span><a name="line-303"></a><span class="hs-pragma">{-# INLINE hasOnlyReadOnlyBarL #-}</span><span>
</span><a name="line-304"></a><span>
</span><a name="line-305"></a><span class="hs-comment">-- | 'hasOnlyReadOnlyFoo' Lens</span><span>
</span><a name="line-306"></a><span class="hs-identifier">hasOnlyReadOnlyFooL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#HasOnlyReadOnly"><span class="hs-identifier hs-type">HasOnlyReadOnly</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span>
</span><a name="line-307"></a><a name="hasOnlyReadOnlyFooL"><a href="SwaggerPetstore.Lens.html#hasOnlyReadOnlyFooL"><span class="hs-identifier">hasOnlyReadOnlyFooL</span></a></a><span> </span><a name="local-6989586621679099646"><a href="#local-6989586621679099646"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#HasOnlyReadOnly"><span class="hs-identifier hs-var">HasOnlyReadOnly</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099649"><a href="#local-6989586621679099649"><span class="hs-identifier">hasOnlyReadOnlyFoo</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#HasOnlyReadOnly"><span class="hs-identifier hs-var">HasOnlyReadOnly</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099649"><span class="hs-identifier hs-var">hasOnlyReadOnlyFoo</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099646"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099648"><span class="hs-identifier hs-var">hasOnlyReadOnlyFoo</span></a><span>
</span><a name="line-308"></a><span class="hs-pragma">{-# INLINE hasOnlyReadOnlyFooL #-}</span><span>
</span><a name="line-309"></a><span>
</span><a name="line-310"></a><span>
</span><a name="line-311"></a><span>
</span><a name="line-312"></a><span class="hs-comment">-- * MapTest</span><span>
</span><a name="line-313"></a><span>
</span><a name="line-314"></a><span class="hs-comment">-- | 'mapTestMapMapOfString' Lens</span><span>
</span><a name="line-315"></a><span class="hs-identifier">mapTestMapMapOfStringL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#MapTest"><span class="hs-identifier hs-type">MapTest</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Map</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Map</span><span> </span><span class="hs-identifier hs-type">String</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Map</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Map</span><span> </span><span class="hs-identifier hs-type">String</span><span> </span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span class="hs-special">)</span><span class="hs-special">)</span><span>
</span><a name="line-316"></a><a name="mapTestMapMapOfStringL"><a href="SwaggerPetstore.Lens.html#mapTestMapMapOfStringL"><span class="hs-identifier">mapTestMapMapOfStringL</span></a></a><span> </span><a name="local-6989586621679099650"><a href="#local-6989586621679099650"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#MapTest"><span class="hs-identifier hs-var">MapTest</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099653"><a href="#local-6989586621679099653"><span class="hs-identifier">mapTestMapMapOfString</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#MapTest"><span class="hs-identifier hs-var">MapTest</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099653"><span class="hs-identifier hs-var">mapTestMapMapOfString</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099650"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099651"><span class="hs-identifier hs-var">mapTestMapMapOfString</span></a><span>
</span><a name="line-317"></a><span class="hs-pragma">{-# INLINE mapTestMapMapOfStringL #-}</span><span>
</span><a name="line-318"></a><span>
</span><a name="line-319"></a><span class="hs-comment">-- | 'mapTestMapOfEnumString' Lens</span><span>
</span><a name="line-320"></a><span class="hs-identifier">mapTestMapOfEnumStringL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#MapTest"><span class="hs-identifier hs-type">MapTest</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Map</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Map</span><span> </span><span class="hs-identifier hs-type">String</span><span> </span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span class="hs-special">)</span><span>
</span><a name="line-321"></a><a name="mapTestMapOfEnumStringL"><a href="SwaggerPetstore.Lens.html#mapTestMapOfEnumStringL"><span class="hs-identifier">mapTestMapOfEnumStringL</span></a></a><span> </span><a name="local-6989586621679099654"><a href="#local-6989586621679099654"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#MapTest"><span class="hs-identifier hs-var">MapTest</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099657"><a href="#local-6989586621679099657"><span class="hs-identifier">mapTestMapOfEnumString</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#MapTest"><span class="hs-identifier hs-var">MapTest</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099657"><span class="hs-identifier hs-var">mapTestMapOfEnumString</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099654"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099656"><span class="hs-identifier hs-var">mapTestMapOfEnumString</span></a><span>
</span><a name="line-322"></a><span class="hs-pragma">{-# INLINE mapTestMapOfEnumStringL #-}</span><span>
</span><a name="line-323"></a><span>
</span><a name="line-324"></a><span>
</span><a name="line-325"></a><span>
</span><a name="line-326"></a><span class="hs-comment">-- * MixedPropertiesAndAdditionalPropertiesClass</span><span>
</span><a name="line-327"></a><span>
</span><a name="line-328"></a><span class="hs-comment">-- | 'mixedPropertiesAndAdditionalPropertiesClassUuid' Lens</span><span>
</span><a name="line-329"></a><span class="hs-identifier">mixedPropertiesAndAdditionalPropertiesClassUuidL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#MixedPropertiesAndAdditionalPropertiesClass"><span class="hs-identifier hs-type">MixedPropertiesAndAdditionalPropertiesClass</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span>
</span><a name="line-330"></a><a name="mixedPropertiesAndAdditionalPropertiesClassUuidL"><a href="SwaggerPetstore.Lens.html#mixedPropertiesAndAdditionalPropertiesClassUuidL"><span class="hs-identifier">mixedPropertiesAndAdditionalPropertiesClassUuidL</span></a></a><span> </span><a name="local-6989586621679099658"><a href="#local-6989586621679099658"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#MixedPropertiesAndAdditionalPropertiesClass"><span class="hs-identifier hs-var">MixedPropertiesAndAdditionalPropertiesClass</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099662"><a href="#local-6989586621679099662"><span class="hs-identifier">mixedPropertiesAndAdditionalPropertiesClassUuid</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#MixedPropertiesAndAdditionalPropertiesClass"><span class="hs-identifier hs-var">MixedPropertiesAndAdditionalPropertiesClass</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099662"><span class="hs-identifier hs-var">mixedPropertiesAndAdditionalPropertiesClassUuid</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099658"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099659"><span class="hs-identifier hs-var">mixedPropertiesAndAdditionalPropertiesClassUuid</span></a><span>
</span><a name="line-331"></a><span class="hs-pragma">{-# INLINE mixedPropertiesAndAdditionalPropertiesClassUuidL #-}</span><span>
</span><a name="line-332"></a><span>
</span><a name="line-333"></a><span class="hs-comment">-- | 'mixedPropertiesAndAdditionalPropertiesClassDateTime' Lens</span><span>
</span><a name="line-334"></a><span class="hs-identifier">mixedPropertiesAndAdditionalPropertiesClassDateTimeL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#MixedPropertiesAndAdditionalPropertiesClass"><span class="hs-identifier hs-type">MixedPropertiesAndAdditionalPropertiesClass</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><a href="SwaggerPetstore.Model.html#DateTime"><span class="hs-identifier hs-type">DateTime</span></a><span class="hs-special">)</span><span>
</span><a name="line-335"></a><a name="mixedPropertiesAndAdditionalPropertiesClassDateTimeL"><a href="SwaggerPetstore.Lens.html#mixedPropertiesAndAdditionalPropertiesClassDateTimeL"><span class="hs-identifier">mixedPropertiesAndAdditionalPropertiesClassDateTimeL</span></a></a><span> </span><a name="local-6989586621679099663"><a href="#local-6989586621679099663"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#MixedPropertiesAndAdditionalPropertiesClass"><span class="hs-identifier hs-var">MixedPropertiesAndAdditionalPropertiesClass</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099667"><a href="#local-6989586621679099667"><span class="hs-identifier">mixedPropertiesAndAdditionalPropertiesClassDateTime</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#MixedPropertiesAndAdditionalPropertiesClass"><span class="hs-identifier hs-var">MixedPropertiesAndAdditionalPropertiesClass</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099667"><span class="hs-identifier hs-var">mixedPropertiesAndAdditionalPropertiesClassDateTime</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099663"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099665"><span class="hs-identifier hs-var">mixedPropertiesAndAdditionalPropertiesClassDateTime</span></a><span>
</span><a name="line-336"></a><span class="hs-pragma">{-# INLINE mixedPropertiesAndAdditionalPropertiesClassDateTimeL #-}</span><span>
</span><a name="line-337"></a><span>
</span><a name="line-338"></a><span class="hs-comment">-- | 'mixedPropertiesAndAdditionalPropertiesClassMap' Lens</span><span>
</span><a name="line-339"></a><span class="hs-identifier">mixedPropertiesAndAdditionalPropertiesClassMapL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#MixedPropertiesAndAdditionalPropertiesClass"><span class="hs-identifier hs-type">MixedPropertiesAndAdditionalPropertiesClass</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Map</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Map</span><span> </span><span class="hs-identifier hs-type">String</span><span> </span><a href="SwaggerPetstore.Model.html#Animal"><span class="hs-identifier hs-type">Animal</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span>
</span><a name="line-340"></a><a name="mixedPropertiesAndAdditionalPropertiesClassMapL"><a href="SwaggerPetstore.Lens.html#mixedPropertiesAndAdditionalPropertiesClassMapL"><span class="hs-identifier">mixedPropertiesAndAdditionalPropertiesClassMapL</span></a></a><span> </span><a name="local-6989586621679099668"><a href="#local-6989586621679099668"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#MixedPropertiesAndAdditionalPropertiesClass"><span class="hs-identifier hs-var">MixedPropertiesAndAdditionalPropertiesClass</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099672"><a href="#local-6989586621679099672"><span class="hs-identifier">mixedPropertiesAndAdditionalPropertiesClassMap</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#MixedPropertiesAndAdditionalPropertiesClass"><span class="hs-identifier hs-var">MixedPropertiesAndAdditionalPropertiesClass</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099672"><span class="hs-identifier hs-var">mixedPropertiesAndAdditionalPropertiesClassMap</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099668"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099671"><span class="hs-identifier hs-var">mixedPropertiesAndAdditionalPropertiesClassMap</span></a><span>
</span><a name="line-341"></a><span class="hs-pragma">{-# INLINE mixedPropertiesAndAdditionalPropertiesClassMapL #-}</span><span>
</span><a name="line-342"></a><span>
</span><a name="line-343"></a><span>
</span><a name="line-344"></a><span>
</span><a name="line-345"></a><span class="hs-comment">-- * Model200Response</span><span>
</span><a name="line-346"></a><span>
</span><a name="line-347"></a><span class="hs-comment">-- | 'model200ResponseName' Lens</span><span>
</span><a name="line-348"></a><span class="hs-identifier">model200ResponseNameL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Model200Response"><span class="hs-identifier hs-type">Model200Response</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Int</span><span class="hs-special">)</span><span>
</span><a name="line-349"></a><a name="model200ResponseNameL"><a href="SwaggerPetstore.Lens.html#model200ResponseNameL"><span class="hs-identifier">model200ResponseNameL</span></a></a><span> </span><a name="local-6989586621679099673"><a href="#local-6989586621679099673"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Model200Response"><span class="hs-identifier hs-var">Model200Response</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099676"><a href="#local-6989586621679099676"><span class="hs-identifier">model200ResponseName</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#Model200Response"><span class="hs-identifier hs-var">Model200Response</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099676"><span class="hs-identifier hs-var">model200ResponseName</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099673"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099674"><span class="hs-identifier hs-var">model200ResponseName</span></a><span>
</span><a name="line-350"></a><span class="hs-pragma">{-# INLINE model200ResponseNameL #-}</span><span>
</span><a name="line-351"></a><span>
</span><a name="line-352"></a><span class="hs-comment">-- | 'model200ResponseClass' Lens</span><span>
</span><a name="line-353"></a><span class="hs-identifier">model200ResponseClassL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Model200Response"><span class="hs-identifier hs-type">Model200Response</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span>
</span><a name="line-354"></a><a name="model200ResponseClassL"><a href="SwaggerPetstore.Lens.html#model200ResponseClassL"><span class="hs-identifier">model200ResponseClassL</span></a></a><span> </span><a name="local-6989586621679099677"><a href="#local-6989586621679099677"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Model200Response"><span class="hs-identifier hs-var">Model200Response</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099680"><a href="#local-6989586621679099680"><span class="hs-identifier">model200ResponseClass</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#Model200Response"><span class="hs-identifier hs-var">Model200Response</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099680"><span class="hs-identifier hs-var">model200ResponseClass</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099677"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099679"><span class="hs-identifier hs-var">model200ResponseClass</span></a><span>
</span><a name="line-355"></a><span class="hs-pragma">{-# INLINE model200ResponseClassL #-}</span><span>
</span><a name="line-356"></a><span>
</span><a name="line-357"></a><span>
</span><a name="line-358"></a><span>
</span><a name="line-359"></a><span class="hs-comment">-- * ModelList</span><span>
</span><a name="line-360"></a><span>
</span><a name="line-361"></a><span class="hs-comment">-- | 'modelList123List' Lens</span><span>
</span><a name="line-362"></a><span class="hs-identifier">modelList123ListL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#ModelList"><span class="hs-identifier hs-type">ModelList</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span>
</span><a name="line-363"></a><a name="modelList123ListL"><a href="SwaggerPetstore.Lens.html#modelList123ListL"><span class="hs-identifier">modelList123ListL</span></a></a><span> </span><a name="local-6989586621679099681"><a href="#local-6989586621679099681"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#ModelList"><span class="hs-identifier hs-var">ModelList</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099683"><a href="#local-6989586621679099683"><span class="hs-identifier">modelList123List</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#ModelList"><span class="hs-identifier hs-var">ModelList</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099683"><span class="hs-identifier hs-var">modelList123List</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099681"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099682"><span class="hs-identifier hs-var">modelList123List</span></a><span>
</span><a name="line-364"></a><span class="hs-pragma">{-# INLINE modelList123ListL #-}</span><span>
</span><a name="line-365"></a><span>
</span><a name="line-366"></a><span>
</span><a name="line-367"></a><span>
</span><a name="line-368"></a><span class="hs-comment">-- * ModelReturn</span><span>
</span><a name="line-369"></a><span>
</span><a name="line-370"></a><span class="hs-comment">-- | 'modelReturnReturn' Lens</span><span>
</span><a name="line-371"></a><span class="hs-identifier">modelReturnReturnL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#ModelReturn"><span class="hs-identifier hs-type">ModelReturn</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Int</span><span class="hs-special">)</span><span>
</span><a name="line-372"></a><a name="modelReturnReturnL"><a href="SwaggerPetstore.Lens.html#modelReturnReturnL"><span class="hs-identifier">modelReturnReturnL</span></a></a><span> </span><a name="local-6989586621679099684"><a href="#local-6989586621679099684"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#ModelReturn"><span class="hs-identifier hs-var">ModelReturn</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099686"><a href="#local-6989586621679099686"><span class="hs-identifier">modelReturnReturn</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#ModelReturn"><span class="hs-identifier hs-var">ModelReturn</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099686"><span class="hs-identifier hs-var">modelReturnReturn</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099684"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099685"><span class="hs-identifier hs-var">modelReturnReturn</span></a><span>
</span><a name="line-373"></a><span class="hs-pragma">{-# INLINE modelReturnReturnL #-}</span><span>
</span><a name="line-374"></a><span>
</span><a name="line-375"></a><span>
</span><a name="line-376"></a><span>
</span><a name="line-377"></a><span class="hs-comment">-- * Name</span><span>
</span><a name="line-378"></a><span>
</span><a name="line-379"></a><span class="hs-comment">-- | 'nameName' Lens</span><span>
</span><a name="line-380"></a><span class="hs-identifier">nameNameL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Name"><span class="hs-identifier hs-type">Name</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Int</span><span class="hs-special">)</span><span>
</span><a name="line-381"></a><a name="nameNameL"><a href="SwaggerPetstore.Lens.html#nameNameL"><span class="hs-identifier">nameNameL</span></a></a><span> </span><a name="local-6989586621679099687"><a href="#local-6989586621679099687"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Name"><span class="hs-identifier hs-var">Name</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099692"><a href="#local-6989586621679099692"><span class="hs-identifier">nameName</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#Name"><span class="hs-identifier hs-var">Name</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099692"><span class="hs-identifier hs-var">nameName</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099687"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099688"><span class="hs-identifier hs-var">nameName</span></a><span>
</span><a name="line-382"></a><span class="hs-pragma">{-# INLINE nameNameL #-}</span><span>
</span><a name="line-383"></a><span>
</span><a name="line-384"></a><span class="hs-comment">-- | 'nameSnakeCase' Lens</span><span>
</span><a name="line-385"></a><span class="hs-identifier">nameSnakeCaseL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Name"><span class="hs-identifier hs-type">Name</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Int</span><span class="hs-special">)</span><span>
</span><a name="line-386"></a><a name="nameSnakeCaseL"><a href="SwaggerPetstore.Lens.html#nameSnakeCaseL"><span class="hs-identifier">nameSnakeCaseL</span></a></a><span> </span><a name="local-6989586621679099693"><a href="#local-6989586621679099693"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Name"><span class="hs-identifier hs-var">Name</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099698"><a href="#local-6989586621679099698"><span class="hs-identifier">nameSnakeCase</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#Name"><span class="hs-identifier hs-var">Name</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099698"><span class="hs-identifier hs-var">nameSnakeCase</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099693"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099695"><span class="hs-identifier hs-var">nameSnakeCase</span></a><span>
</span><a name="line-387"></a><span class="hs-pragma">{-# INLINE nameSnakeCaseL #-}</span><span>
</span><a name="line-388"></a><span>
</span><a name="line-389"></a><span class="hs-comment">-- | 'nameProperty' Lens</span><span>
</span><a name="line-390"></a><span class="hs-identifier">namePropertyL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Name"><span class="hs-identifier hs-type">Name</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span>
</span><a name="line-391"></a><a name="namePropertyL"><a href="SwaggerPetstore.Lens.html#namePropertyL"><span class="hs-identifier">namePropertyL</span></a></a><span> </span><a name="local-6989586621679099699"><a href="#local-6989586621679099699"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Name"><span class="hs-identifier hs-var">Name</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099704"><a href="#local-6989586621679099704"><span class="hs-identifier">nameProperty</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#Name"><span class="hs-identifier hs-var">Name</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099704"><span class="hs-identifier hs-var">nameProperty</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099699"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099702"><span class="hs-identifier hs-var">nameProperty</span></a><span>
</span><a name="line-392"></a><span class="hs-pragma">{-# INLINE namePropertyL #-}</span><span>
</span><a name="line-393"></a><span>
</span><a name="line-394"></a><span class="hs-comment">-- | 'name123Number' Lens</span><span>
</span><a name="line-395"></a><span class="hs-identifier">name123NumberL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Name"><span class="hs-identifier hs-type">Name</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Int</span><span class="hs-special">)</span><span>
</span><a name="line-396"></a><a name="name123NumberL"><a href="SwaggerPetstore.Lens.html#name123NumberL"><span class="hs-identifier">name123NumberL</span></a></a><span> </span><a name="local-6989586621679099705"><a href="#local-6989586621679099705"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Name"><span class="hs-identifier hs-var">Name</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099710"><a href="#local-6989586621679099710"><span class="hs-identifier">name123Number</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#Name"><span class="hs-identifier hs-var">Name</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099710"><span class="hs-identifier hs-var">name123Number</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099705"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099709"><span class="hs-identifier hs-var">name123Number</span></a><span>
</span><a name="line-397"></a><span class="hs-pragma">{-# INLINE name123NumberL #-}</span><span>
</span><a name="line-398"></a><span>
</span><a name="line-399"></a><span>
</span><a name="line-400"></a><span>
</span><a name="line-401"></a><span class="hs-comment">-- * NumberOnly</span><span>
</span><a name="line-402"></a><span>
</span><a name="line-403"></a><span class="hs-comment">-- | 'numberOnlyJustNumber' Lens</span><span>
</span><a name="line-404"></a><span class="hs-identifier">numberOnlyJustNumberL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#NumberOnly"><span class="hs-identifier hs-type">NumberOnly</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Double</span><span class="hs-special">)</span><span>
</span><a name="line-405"></a><a name="numberOnlyJustNumberL"><a href="SwaggerPetstore.Lens.html#numberOnlyJustNumberL"><span class="hs-identifier">numberOnlyJustNumberL</span></a></a><span> </span><a name="local-6989586621679099711"><a href="#local-6989586621679099711"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#NumberOnly"><span class="hs-identifier hs-var">NumberOnly</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099713"><a href="#local-6989586621679099713"><span class="hs-identifier">numberOnlyJustNumber</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#NumberOnly"><span class="hs-identifier hs-var">NumberOnly</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099713"><span class="hs-identifier hs-var">numberOnlyJustNumber</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099711"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099712"><span class="hs-identifier hs-var">numberOnlyJustNumber</span></a><span>
</span><a name="line-406"></a><span class="hs-pragma">{-# INLINE numberOnlyJustNumberL #-}</span><span>
</span><a name="line-407"></a><span>
</span><a name="line-408"></a><span>
</span><a name="line-409"></a><span>
</span><a name="line-410"></a><span class="hs-comment">-- * Order</span><span>
</span><a name="line-411"></a><span>
</span><a name="line-412"></a><span class="hs-comment">-- | 'orderId' Lens</span><span>
</span><a name="line-413"></a><span class="hs-identifier">orderIdL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-type">Order</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Integer</span><span class="hs-special">)</span><span>
</span><a name="line-414"></a><a name="orderIdL"><a href="SwaggerPetstore.Lens.html#orderIdL"><span class="hs-identifier">orderIdL</span></a></a><span> </span><a name="local-6989586621679099714"><a href="#local-6989586621679099714"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-var">Order</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099721"><a href="#local-6989586621679099721"><span class="hs-identifier">orderId</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-var">Order</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099721"><span class="hs-identifier hs-var">orderId</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099714"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099715"><span class="hs-identifier hs-var">orderId</span></a><span>
</span><a name="line-415"></a><span class="hs-pragma">{-# INLINE orderIdL #-}</span><span>
</span><a name="line-416"></a><span>
</span><a name="line-417"></a><span class="hs-comment">-- | 'orderPetId' Lens</span><span>
</span><a name="line-418"></a><span class="hs-identifier">orderPetIdL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-type">Order</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Integer</span><span class="hs-special">)</span><span>
</span><a name="line-419"></a><a name="orderPetIdL"><a href="SwaggerPetstore.Lens.html#orderPetIdL"><span class="hs-identifier">orderPetIdL</span></a></a><span> </span><a name="local-6989586621679099722"><a href="#local-6989586621679099722"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-var">Order</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099729"><a href="#local-6989586621679099729"><span class="hs-identifier">orderPetId</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-var">Order</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099729"><span class="hs-identifier hs-var">orderPetId</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099722"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099724"><span class="hs-identifier hs-var">orderPetId</span></a><span>
</span><a name="line-420"></a><span class="hs-pragma">{-# INLINE orderPetIdL #-}</span><span>
</span><a name="line-421"></a><span>
</span><a name="line-422"></a><span class="hs-comment">-- | 'orderQuantity' Lens</span><span>
</span><a name="line-423"></a><span class="hs-identifier">orderQuantityL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-type">Order</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Int</span><span class="hs-special">)</span><span>
</span><a name="line-424"></a><a name="orderQuantityL"><a href="SwaggerPetstore.Lens.html#orderQuantityL"><span class="hs-identifier">orderQuantityL</span></a></a><span> </span><a name="local-6989586621679099730"><a href="#local-6989586621679099730"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-var">Order</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099737"><a href="#local-6989586621679099737"><span class="hs-identifier">orderQuantity</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-var">Order</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099737"><span class="hs-identifier hs-var">orderQuantity</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099730"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099733"><span class="hs-identifier hs-var">orderQuantity</span></a><span>
</span><a name="line-425"></a><span class="hs-pragma">{-# INLINE orderQuantityL #-}</span><span>
</span><a name="line-426"></a><span>
</span><a name="line-427"></a><span class="hs-comment">-- | 'orderShipDate' Lens</span><span>
</span><a name="line-428"></a><span class="hs-identifier">orderShipDateL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-type">Order</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><a href="SwaggerPetstore.Model.html#DateTime"><span class="hs-identifier hs-type">DateTime</span></a><span class="hs-special">)</span><span>
</span><a name="line-429"></a><a name="orderShipDateL"><a href="SwaggerPetstore.Lens.html#orderShipDateL"><span class="hs-identifier">orderShipDateL</span></a></a><span> </span><a name="local-6989586621679099738"><a href="#local-6989586621679099738"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-var">Order</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099745"><a href="#local-6989586621679099745"><span class="hs-identifier">orderShipDate</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-var">Order</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099745"><span class="hs-identifier hs-var">orderShipDate</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099738"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099742"><span class="hs-identifier hs-var">orderShipDate</span></a><span>
</span><a name="line-430"></a><span class="hs-pragma">{-# INLINE orderShipDateL #-}</span><span>
</span><a name="line-431"></a><span>
</span><a name="line-432"></a><span class="hs-comment">-- | 'orderStatus' Lens</span><span>
</span><a name="line-433"></a><span class="hs-identifier">orderStatusL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-type">Order</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span>
</span><a name="line-434"></a><a name="orderStatusL"><a href="SwaggerPetstore.Lens.html#orderStatusL"><span class="hs-identifier">orderStatusL</span></a></a><span> </span><a name="local-6989586621679099746"><a href="#local-6989586621679099746"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-var">Order</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099753"><a href="#local-6989586621679099753"><span class="hs-identifier">orderStatus</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-var">Order</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099753"><span class="hs-identifier hs-var">orderStatus</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099746"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099751"><span class="hs-identifier hs-var">orderStatus</span></a><span>
</span><a name="line-435"></a><span class="hs-pragma">{-# INLINE orderStatusL #-}</span><span>
</span><a name="line-436"></a><span>
</span><a name="line-437"></a><span class="hs-comment">-- | 'orderComplete' Lens</span><span>
</span><a name="line-438"></a><span class="hs-identifier">orderCompleteL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-type">Order</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Bool</span><span class="hs-special">)</span><span>
</span><a name="line-439"></a><a name="orderCompleteL"><a href="SwaggerPetstore.Lens.html#orderCompleteL"><span class="hs-identifier">orderCompleteL</span></a></a><span> </span><a name="local-6989586621679099754"><a href="#local-6989586621679099754"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-var">Order</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099761"><a href="#local-6989586621679099761"><span class="hs-identifier">orderComplete</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-var">Order</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099761"><span class="hs-identifier hs-var">orderComplete</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099754"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099760"><span class="hs-identifier hs-var">orderComplete</span></a><span>
</span><a name="line-440"></a><span class="hs-pragma">{-# INLINE orderCompleteL #-}</span><span>
</span><a name="line-441"></a><span>
</span><a name="line-442"></a><span>
</span><a name="line-443"></a><span>
</span><a name="line-444"></a><span class="hs-comment">-- * OuterBoolean</span><span>
</span><a name="line-445"></a><span>
</span><a name="line-446"></a><span>
</span><a name="line-447"></a><span>
</span><a name="line-448"></a><span class="hs-comment">-- * OuterComposite</span><span>
</span><a name="line-449"></a><span>
</span><a name="line-450"></a><span class="hs-comment">-- | 'outerCompositeMyNumber' Lens</span><span>
</span><a name="line-451"></a><span class="hs-identifier">outerCompositeMyNumberL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#OuterComposite"><span class="hs-identifier hs-type">OuterComposite</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><a href="SwaggerPetstore.Model.html#OuterNumber"><span class="hs-identifier hs-type">OuterNumber</span></a><span class="hs-special">)</span><span>
</span><a name="line-452"></a><a name="outerCompositeMyNumberL"><a href="SwaggerPetstore.Lens.html#outerCompositeMyNumberL"><span class="hs-identifier">outerCompositeMyNumberL</span></a></a><span> </span><a name="local-6989586621679099762"><a href="#local-6989586621679099762"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#OuterComposite"><span class="hs-identifier hs-var">OuterComposite</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099766"><a href="#local-6989586621679099766"><span class="hs-identifier">outerCompositeMyNumber</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#OuterComposite"><span class="hs-identifier hs-var">OuterComposite</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099766"><span class="hs-identifier hs-var">outerCompositeMyNumber</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099762"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099763"><span class="hs-identifier hs-var">outerCompositeMyNumber</span></a><span>
</span><a name="line-453"></a><span class="hs-pragma">{-# INLINE outerCompositeMyNumberL #-}</span><span>
</span><a name="line-454"></a><span>
</span><a name="line-455"></a><span class="hs-comment">-- | 'outerCompositeMyString' Lens</span><span>
</span><a name="line-456"></a><span class="hs-identifier">outerCompositeMyStringL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#OuterComposite"><span class="hs-identifier hs-type">OuterComposite</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><a href="SwaggerPetstore.Model.html#OuterString"><span class="hs-identifier hs-type">OuterString</span></a><span class="hs-special">)</span><span>
</span><a name="line-457"></a><a name="outerCompositeMyStringL"><a href="SwaggerPetstore.Lens.html#outerCompositeMyStringL"><span class="hs-identifier">outerCompositeMyStringL</span></a></a><span> </span><a name="local-6989586621679099767"><a href="#local-6989586621679099767"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#OuterComposite"><span class="hs-identifier hs-var">OuterComposite</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099771"><a href="#local-6989586621679099771"><span class="hs-identifier">outerCompositeMyString</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#OuterComposite"><span class="hs-identifier hs-var">OuterComposite</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099771"><span class="hs-identifier hs-var">outerCompositeMyString</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099767"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099769"><span class="hs-identifier hs-var">outerCompositeMyString</span></a><span>
</span><a name="line-458"></a><span class="hs-pragma">{-# INLINE outerCompositeMyStringL #-}</span><span>
</span><a name="line-459"></a><span>
</span><a name="line-460"></a><span class="hs-comment">-- | 'outerCompositeMyBoolean' Lens</span><span>
</span><a name="line-461"></a><span class="hs-identifier">outerCompositeMyBooleanL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#OuterComposite"><span class="hs-identifier hs-type">OuterComposite</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><a href="SwaggerPetstore.Model.html#OuterBoolean"><span class="hs-identifier hs-type">OuterBoolean</span></a><span class="hs-special">)</span><span>
</span><a name="line-462"></a><a name="outerCompositeMyBooleanL"><a href="SwaggerPetstore.Lens.html#outerCompositeMyBooleanL"><span class="hs-identifier">outerCompositeMyBooleanL</span></a></a><span> </span><a name="local-6989586621679099772"><a href="#local-6989586621679099772"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#OuterComposite"><span class="hs-identifier hs-var">OuterComposite</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099776"><a href="#local-6989586621679099776"><span class="hs-identifier">outerCompositeMyBoolean</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#OuterComposite"><span class="hs-identifier hs-var">OuterComposite</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099776"><span class="hs-identifier hs-var">outerCompositeMyBoolean</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099772"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099775"><span class="hs-identifier hs-var">outerCompositeMyBoolean</span></a><span>
</span><a name="line-463"></a><span class="hs-pragma">{-# INLINE outerCompositeMyBooleanL #-}</span><span>
</span><a name="line-464"></a><span>
</span><a name="line-465"></a><span>
</span><a name="line-466"></a><span>
</span><a name="line-467"></a><span class="hs-comment">-- * OuterEnum</span><span>
</span><a name="line-468"></a><span>
</span><a name="line-469"></a><span>
</span><a name="line-470"></a><span>
</span><a name="line-471"></a><span class="hs-comment">-- * OuterNumber</span><span>
</span><a name="line-472"></a><span>
</span><a name="line-473"></a><span>
</span><a name="line-474"></a><span>
</span><a name="line-475"></a><span class="hs-comment">-- * OuterString</span><span>
</span><a name="line-476"></a><span>
</span><a name="line-477"></a><span>
</span><a name="line-478"></a><span>
</span><a name="line-479"></a><span class="hs-comment">-- * Pet</span><span>
</span><a name="line-480"></a><span>
</span><a name="line-481"></a><span class="hs-comment">-- | 'petId' Lens</span><span>
</span><a name="line-482"></a><span class="hs-identifier">petIdL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Integer</span><span class="hs-special">)</span><span>
</span><a name="line-483"></a><a name="petIdL"><a href="SwaggerPetstore.Lens.html#petIdL"><span class="hs-identifier">petIdL</span></a></a><span> </span><a name="local-6989586621679099777"><a href="#local-6989586621679099777"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-var">Pet</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099784"><a href="#local-6989586621679099784"><span class="hs-identifier">petId</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-var">Pet</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099784"><span class="hs-identifier hs-var">petId</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099777"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099778"><span class="hs-identifier hs-var">petId</span></a><span>
</span><a name="line-484"></a><span class="hs-pragma">{-# INLINE petIdL #-}</span><span>
</span><a name="line-485"></a><span>
</span><a name="line-486"></a><span class="hs-comment">-- | 'petCategory' Lens</span><span>
</span><a name="line-487"></a><span class="hs-identifier">petCategoryL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><a href="SwaggerPetstore.Model.html#Category"><span class="hs-identifier hs-type">Category</span></a><span class="hs-special">)</span><span>
</span><a name="line-488"></a><a name="petCategoryL"><a href="SwaggerPetstore.Lens.html#petCategoryL"><span class="hs-identifier">petCategoryL</span></a></a><span> </span><a name="local-6989586621679099785"><a href="#local-6989586621679099785"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-var">Pet</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099792"><a href="#local-6989586621679099792"><span class="hs-identifier">petCategory</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-var">Pet</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099792"><span class="hs-identifier hs-var">petCategory</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099785"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099787"><span class="hs-identifier hs-var">petCategory</span></a><span>
</span><a name="line-489"></a><span class="hs-pragma">{-# INLINE petCategoryL #-}</span><span>
</span><a name="line-490"></a><span>
</span><a name="line-491"></a><span class="hs-comment">-- | 'petName' Lens</span><span>
</span><a name="line-492"></a><span class="hs-identifier">petNameL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span>
</span><a name="line-493"></a><a name="petNameL"><a href="SwaggerPetstore.Lens.html#petNameL"><span class="hs-identifier">petNameL</span></a></a><span> </span><a name="local-6989586621679099793"><a href="#local-6989586621679099793"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-var">Pet</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099800"><a href="#local-6989586621679099800"><span class="hs-identifier">petName</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-var">Pet</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099800"><span class="hs-identifier hs-var">petName</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099793"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099796"><span class="hs-identifier hs-var">petName</span></a><span>
</span><a name="line-494"></a><span class="hs-pragma">{-# INLINE petNameL #-}</span><span>
</span><a name="line-495"></a><span>
</span><a name="line-496"></a><span class="hs-comment">-- | 'petPhotoUrls' Lens</span><span>
</span><a name="line-497"></a><span class="hs-identifier">petPhotoUrlsL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a><span> </span><span class="hs-special">(</span><span class="hs-special">[</span><span class="hs-identifier hs-type">Text</span><span class="hs-special">]</span><span class="hs-special">)</span><span>
</span><a name="line-498"></a><a name="petPhotoUrlsL"><a href="SwaggerPetstore.Lens.html#petPhotoUrlsL"><span class="hs-identifier">petPhotoUrlsL</span></a></a><span> </span><a name="local-6989586621679099801"><a href="#local-6989586621679099801"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-var">Pet</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099808"><a href="#local-6989586621679099808"><span class="hs-identifier">petPhotoUrls</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-var">Pet</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099808"><span class="hs-identifier hs-var">petPhotoUrls</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099801"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099805"><span class="hs-identifier hs-var">petPhotoUrls</span></a><span>
</span><a name="line-499"></a><span class="hs-pragma">{-# INLINE petPhotoUrlsL #-}</span><span>
</span><a name="line-500"></a><span>
</span><a name="line-501"></a><span class="hs-comment">-- | 'petTags' Lens</span><span>
</span><a name="line-502"></a><span class="hs-identifier">petTagsL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-special">[</span><a href="SwaggerPetstore.Model.html#Tag"><span class="hs-identifier hs-type">Tag</span></a><span class="hs-special">]</span><span class="hs-special">)</span><span>
</span><a name="line-503"></a><a name="petTagsL"><a href="SwaggerPetstore.Lens.html#petTagsL"><span class="hs-identifier">petTagsL</span></a></a><span> </span><a name="local-6989586621679099809"><a href="#local-6989586621679099809"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-var">Pet</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099816"><a href="#local-6989586621679099816"><span class="hs-identifier">petTags</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-var">Pet</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099816"><span class="hs-identifier hs-var">petTags</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099809"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099814"><span class="hs-identifier hs-var">petTags</span></a><span>
</span><a name="line-504"></a><span class="hs-pragma">{-# INLINE petTagsL #-}</span><span>
</span><a name="line-505"></a><span>
</span><a name="line-506"></a><span class="hs-comment">-- | 'petStatus' Lens</span><span>
</span><a name="line-507"></a><span class="hs-identifier">petStatusL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span>
</span><a name="line-508"></a><a name="petStatusL"><a href="SwaggerPetstore.Lens.html#petStatusL"><span class="hs-identifier">petStatusL</span></a></a><span> </span><a name="local-6989586621679099817"><a href="#local-6989586621679099817"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-var">Pet</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099824"><a href="#local-6989586621679099824"><span class="hs-identifier">petStatus</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-var">Pet</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099824"><span class="hs-identifier hs-var">petStatus</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099817"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099823"><span class="hs-identifier hs-var">petStatus</span></a><span>
</span><a name="line-509"></a><span class="hs-pragma">{-# INLINE petStatusL #-}</span><span>
</span><a name="line-510"></a><span>
</span><a name="line-511"></a><span>
</span><a name="line-512"></a><span>
</span><a name="line-513"></a><span class="hs-comment">-- * ReadOnlyFirst</span><span>
</span><a name="line-514"></a><span>
</span><a name="line-515"></a><span class="hs-comment">-- | 'readOnlyFirstBar' Lens</span><span>
</span><a name="line-516"></a><span class="hs-identifier">readOnlyFirstBarL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#ReadOnlyFirst"><span class="hs-identifier hs-type">ReadOnlyFirst</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span>
</span><a name="line-517"></a><a name="readOnlyFirstBarL"><a href="SwaggerPetstore.Lens.html#readOnlyFirstBarL"><span class="hs-identifier">readOnlyFirstBarL</span></a></a><span> </span><a name="local-6989586621679099825"><a href="#local-6989586621679099825"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#ReadOnlyFirst"><span class="hs-identifier hs-var">ReadOnlyFirst</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099828"><a href="#local-6989586621679099828"><span class="hs-identifier">readOnlyFirstBar</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#ReadOnlyFirst"><span class="hs-identifier hs-var">ReadOnlyFirst</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099828"><span class="hs-identifier hs-var">readOnlyFirstBar</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099825"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099826"><span class="hs-identifier hs-var">readOnlyFirstBar</span></a><span>
</span><a name="line-518"></a><span class="hs-pragma">{-# INLINE readOnlyFirstBarL #-}</span><span>
</span><a name="line-519"></a><span>
</span><a name="line-520"></a><span class="hs-comment">-- | 'readOnlyFirstBaz' Lens</span><span>
</span><a name="line-521"></a><span class="hs-identifier">readOnlyFirstBazL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#ReadOnlyFirst"><span class="hs-identifier hs-type">ReadOnlyFirst</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span>
</span><a name="line-522"></a><a name="readOnlyFirstBazL"><a href="SwaggerPetstore.Lens.html#readOnlyFirstBazL"><span class="hs-identifier">readOnlyFirstBazL</span></a></a><span> </span><a name="local-6989586621679099829"><a href="#local-6989586621679099829"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#ReadOnlyFirst"><span class="hs-identifier hs-var">ReadOnlyFirst</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099832"><a href="#local-6989586621679099832"><span class="hs-identifier">readOnlyFirstBaz</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#ReadOnlyFirst"><span class="hs-identifier hs-var">ReadOnlyFirst</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099832"><span class="hs-identifier hs-var">readOnlyFirstBaz</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099829"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099831"><span class="hs-identifier hs-var">readOnlyFirstBaz</span></a><span>
</span><a name="line-523"></a><span class="hs-pragma">{-# INLINE readOnlyFirstBazL #-}</span><span>
</span><a name="line-524"></a><span>
</span><a name="line-525"></a><span>
</span><a name="line-526"></a><span>
</span><a name="line-527"></a><span class="hs-comment">-- * SpecialModelName</span><span>
</span><a name="line-528"></a><span>
</span><a name="line-529"></a><span class="hs-comment">-- | 'specialModelNameSpecialPropertyName' Lens</span><span>
</span><a name="line-530"></a><span class="hs-identifier">specialModelNameSpecialPropertyNameL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#SpecialModelName"><span class="hs-identifier hs-type">SpecialModelName</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Integer</span><span class="hs-special">)</span><span>
</span><a name="line-531"></a><a name="specialModelNameSpecialPropertyNameL"><a href="SwaggerPetstore.Lens.html#specialModelNameSpecialPropertyNameL"><span class="hs-identifier">specialModelNameSpecialPropertyNameL</span></a></a><span> </span><a name="local-6989586621679099833"><a href="#local-6989586621679099833"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#SpecialModelName"><span class="hs-identifier hs-var">SpecialModelName</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099835"><a href="#local-6989586621679099835"><span class="hs-identifier">specialModelNameSpecialPropertyName</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#SpecialModelName"><span class="hs-identifier hs-var">SpecialModelName</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099835"><span class="hs-identifier hs-var">specialModelNameSpecialPropertyName</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099833"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099834"><span class="hs-identifier hs-var">specialModelNameSpecialPropertyName</span></a><span>
</span><a name="line-532"></a><span class="hs-pragma">{-# INLINE specialModelNameSpecialPropertyNameL #-}</span><span>
</span><a name="line-533"></a><span>
</span><a name="line-534"></a><span>
</span><a name="line-535"></a><span>
</span><a name="line-536"></a><span class="hs-comment">-- * Tag</span><span>
</span><a name="line-537"></a><span>
</span><a name="line-538"></a><span class="hs-comment">-- | 'tagId' Lens</span><span>
</span><a name="line-539"></a><span class="hs-identifier">tagIdL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Tag"><span class="hs-identifier hs-type">Tag</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Integer</span><span class="hs-special">)</span><span>
</span><a name="line-540"></a><a name="tagIdL"><a href="SwaggerPetstore.Lens.html#tagIdL"><span class="hs-identifier">tagIdL</span></a></a><span> </span><a name="local-6989586621679099836"><a href="#local-6989586621679099836"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Tag"><span class="hs-identifier hs-var">Tag</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099839"><a href="#local-6989586621679099839"><span class="hs-identifier">tagId</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#Tag"><span class="hs-identifier hs-var">Tag</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099839"><span class="hs-identifier hs-var">tagId</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099836"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099837"><span class="hs-identifier hs-var">tagId</span></a><span>
</span><a name="line-541"></a><span class="hs-pragma">{-# INLINE tagIdL #-}</span><span>
</span><a name="line-542"></a><span>
</span><a name="line-543"></a><span class="hs-comment">-- | 'tagName' Lens</span><span>
</span><a name="line-544"></a><span class="hs-identifier">tagNameL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Tag"><span class="hs-identifier hs-type">Tag</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span>
</span><a name="line-545"></a><a name="tagNameL"><a href="SwaggerPetstore.Lens.html#tagNameL"><span class="hs-identifier">tagNameL</span></a></a><span> </span><a name="local-6989586621679099840"><a href="#local-6989586621679099840"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Tag"><span class="hs-identifier hs-var">Tag</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099843"><a href="#local-6989586621679099843"><span class="hs-identifier">tagName</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#Tag"><span class="hs-identifier hs-var">Tag</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099843"><span class="hs-identifier hs-var">tagName</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099840"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099842"><span class="hs-identifier hs-var">tagName</span></a><span>
</span><a name="line-546"></a><span class="hs-pragma">{-# INLINE tagNameL #-}</span><span>
</span><a name="line-547"></a><span>
</span><a name="line-548"></a><span>
</span><a name="line-549"></a><span>
</span><a name="line-550"></a><span class="hs-comment">-- * User</span><span>
</span><a name="line-551"></a><span>
</span><a name="line-552"></a><span class="hs-comment">-- | 'userId' Lens</span><span>
</span><a name="line-553"></a><span class="hs-identifier">userIdL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Integer</span><span class="hs-special">)</span><span>
</span><a name="line-554"></a><a name="userIdL"><a href="SwaggerPetstore.Lens.html#userIdL"><span class="hs-identifier">userIdL</span></a></a><span> </span><a name="local-6989586621679099844"><a href="#local-6989586621679099844"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-var">User</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099853"><a href="#local-6989586621679099853"><span class="hs-identifier">userId</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-var">User</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099853"><span class="hs-identifier hs-var">userId</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099844"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099845"><span class="hs-identifier hs-var">userId</span></a><span>
</span><a name="line-555"></a><span class="hs-pragma">{-# INLINE userIdL #-}</span><span>
</span><a name="line-556"></a><span>
</span><a name="line-557"></a><span class="hs-comment">-- | 'userUsername' Lens</span><span>
</span><a name="line-558"></a><span class="hs-identifier">userUsernameL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span>
</span><a name="line-559"></a><a name="userUsernameL"><a href="SwaggerPetstore.Lens.html#userUsernameL"><span class="hs-identifier">userUsernameL</span></a></a><span> </span><a name="local-6989586621679099854"><a href="#local-6989586621679099854"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-var">User</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099863"><a href="#local-6989586621679099863"><span class="hs-identifier">userUsername</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-var">User</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099863"><span class="hs-identifier hs-var">userUsername</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099854"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099856"><span class="hs-identifier hs-var">userUsername</span></a><span>
</span><a name="line-560"></a><span class="hs-pragma">{-# INLINE userUsernameL #-}</span><span>
</span><a name="line-561"></a><span>
</span><a name="line-562"></a><span class="hs-comment">-- | 'userFirstName' Lens</span><span>
</span><a name="line-563"></a><span class="hs-identifier">userFirstNameL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span>
</span><a name="line-564"></a><a name="userFirstNameL"><a href="SwaggerPetstore.Lens.html#userFirstNameL"><span class="hs-identifier">userFirstNameL</span></a></a><span> </span><a name="local-6989586621679099864"><a href="#local-6989586621679099864"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-var">User</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099873"><a href="#local-6989586621679099873"><span class="hs-identifier">userFirstName</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-var">User</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099873"><span class="hs-identifier hs-var">userFirstName</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099864"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099867"><span class="hs-identifier hs-var">userFirstName</span></a><span>
</span><a name="line-565"></a><span class="hs-pragma">{-# INLINE userFirstNameL #-}</span><span>
</span><a name="line-566"></a><span>
</span><a name="line-567"></a><span class="hs-comment">-- | 'userLastName' Lens</span><span>
</span><a name="line-568"></a><span class="hs-identifier">userLastNameL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span>
</span><a name="line-569"></a><a name="userLastNameL"><a href="SwaggerPetstore.Lens.html#userLastNameL"><span class="hs-identifier">userLastNameL</span></a></a><span> </span><a name="local-6989586621679099874"><a href="#local-6989586621679099874"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-var">User</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099883"><a href="#local-6989586621679099883"><span class="hs-identifier">userLastName</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-var">User</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099883"><span class="hs-identifier hs-var">userLastName</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099874"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099878"><span class="hs-identifier hs-var">userLastName</span></a><span>
</span><a name="line-570"></a><span class="hs-pragma">{-# INLINE userLastNameL #-}</span><span>
</span><a name="line-571"></a><span>
</span><a name="line-572"></a><span class="hs-comment">-- | 'userEmail' Lens</span><span>
</span><a name="line-573"></a><span class="hs-identifier">userEmailL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span>
</span><a name="line-574"></a><a name="userEmailL"><a href="SwaggerPetstore.Lens.html#userEmailL"><span class="hs-identifier">userEmailL</span></a></a><span> </span><a name="local-6989586621679099884"><a href="#local-6989586621679099884"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-var">User</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099893"><a href="#local-6989586621679099893"><span class="hs-identifier">userEmail</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-var">User</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099893"><span class="hs-identifier hs-var">userEmail</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099884"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099889"><span class="hs-identifier hs-var">userEmail</span></a><span>
</span><a name="line-575"></a><span class="hs-pragma">{-# INLINE userEmailL #-}</span><span>
</span><a name="line-576"></a><span>
</span><a name="line-577"></a><span class="hs-comment">-- | 'userPassword' Lens</span><span>
</span><a name="line-578"></a><span class="hs-identifier">userPasswordL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span>
</span><a name="line-579"></a><a name="userPasswordL"><a href="SwaggerPetstore.Lens.html#userPasswordL"><span class="hs-identifier">userPasswordL</span></a></a><span> </span><a name="local-6989586621679099894"><a href="#local-6989586621679099894"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-var">User</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099903"><a href="#local-6989586621679099903"><span class="hs-identifier">userPassword</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-var">User</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099903"><span class="hs-identifier hs-var">userPassword</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099894"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099900"><span class="hs-identifier hs-var">userPassword</span></a><span>
</span><a name="line-580"></a><span class="hs-pragma">{-# INLINE userPasswordL #-}</span><span>
</span><a name="line-581"></a><span>
</span><a name="line-582"></a><span class="hs-comment">-- | 'userPhone' Lens</span><span>
</span><a name="line-583"></a><span class="hs-identifier">userPhoneL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span>
</span><a name="line-584"></a><a name="userPhoneL"><a href="SwaggerPetstore.Lens.html#userPhoneL"><span class="hs-identifier">userPhoneL</span></a></a><span> </span><a name="local-6989586621679099904"><a href="#local-6989586621679099904"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-var">User</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099913"><a href="#local-6989586621679099913"><span class="hs-identifier">userPhone</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-var">User</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099913"><span class="hs-identifier hs-var">userPhone</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099904"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099911"><span class="hs-identifier hs-var">userPhone</span></a><span>
</span><a name="line-585"></a><span class="hs-pragma">{-# INLINE userPhoneL #-}</span><span>
</span><a name="line-586"></a><span>
</span><a name="line-587"></a><span class="hs-comment">-- | 'userUserStatus' Lens</span><span>
</span><a name="line-588"></a><span class="hs-identifier">userUserStatusL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Int</span><span class="hs-special">)</span><span>
</span><a name="line-589"></a><a name="userUserStatusL"><a href="SwaggerPetstore.Lens.html#userUserStatusL"><span class="hs-identifier">userUserStatusL</span></a></a><span> </span><a name="local-6989586621679099914"><a href="#local-6989586621679099914"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-var">User</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099923"><a href="#local-6989586621679099923"><span class="hs-identifier">userUserStatus</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-var">User</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099923"><span class="hs-identifier hs-var">userUserStatus</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099914"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099922"><span class="hs-identifier hs-var">userUserStatus</span></a><span>
</span><a name="line-590"></a><span class="hs-pragma">{-# INLINE userUserStatusL #-}</span><span>
</span><a name="line-591"></a><span>
</span><a name="line-592"></a><span>
</span><a name="line-593"></a><span>
</span><a name="line-594"></a><span class="hs-comment">-- * Cat</span><span>
</span><a name="line-595"></a><span>
</span><a name="line-596"></a><span class="hs-comment">-- | 'catClassName' Lens</span><span>
</span><a name="line-597"></a><span class="hs-identifier">catClassNameL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Cat"><span class="hs-identifier hs-type">Cat</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span>
</span><a name="line-598"></a><a name="catClassNameL"><a href="SwaggerPetstore.Lens.html#catClassNameL"><span class="hs-identifier">catClassNameL</span></a></a><span> </span><a name="local-6989586621679099924"><a href="#local-6989586621679099924"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Cat"><span class="hs-identifier hs-var">Cat</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099928"><a href="#local-6989586621679099928"><span class="hs-identifier">catClassName</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#Cat"><span class="hs-identifier hs-var">Cat</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099928"><span class="hs-identifier hs-var">catClassName</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099924"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099925"><span class="hs-identifier hs-var">catClassName</span></a><span>
</span><a name="line-599"></a><span class="hs-pragma">{-# INLINE catClassNameL #-}</span><span>
</span><a name="line-600"></a><span>
</span><a name="line-601"></a><span class="hs-comment">-- | 'catColor' Lens</span><span>
</span><a name="line-602"></a><span class="hs-identifier">catColorL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Cat"><span class="hs-identifier hs-type">Cat</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span>
</span><a name="line-603"></a><a name="catColorL"><a href="SwaggerPetstore.Lens.html#catColorL"><span class="hs-identifier">catColorL</span></a></a><span> </span><a name="local-6989586621679099929"><a href="#local-6989586621679099929"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Cat"><span class="hs-identifier hs-var">Cat</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099933"><a href="#local-6989586621679099933"><span class="hs-identifier">catColor</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#Cat"><span class="hs-identifier hs-var">Cat</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099933"><span class="hs-identifier hs-var">catColor</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099929"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099931"><span class="hs-identifier hs-var">catColor</span></a><span>
</span><a name="line-604"></a><span class="hs-pragma">{-# INLINE catColorL #-}</span><span>
</span><a name="line-605"></a><span>
</span><a name="line-606"></a><span class="hs-comment">-- | 'catDeclawed' Lens</span><span>
</span><a name="line-607"></a><span class="hs-identifier">catDeclawedL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Cat"><span class="hs-identifier hs-type">Cat</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Bool</span><span class="hs-special">)</span><span>
</span><a name="line-608"></a><a name="catDeclawedL"><a href="SwaggerPetstore.Lens.html#catDeclawedL"><span class="hs-identifier">catDeclawedL</span></a></a><span> </span><a name="local-6989586621679099934"><a href="#local-6989586621679099934"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Cat"><span class="hs-identifier hs-var">Cat</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099938"><a href="#local-6989586621679099938"><span class="hs-identifier">catDeclawed</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#Cat"><span class="hs-identifier hs-var">Cat</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099938"><span class="hs-identifier hs-var">catDeclawed</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099934"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099937"><span class="hs-identifier hs-var">catDeclawed</span></a><span>
</span><a name="line-609"></a><span class="hs-pragma">{-# INLINE catDeclawedL #-}</span><span>
</span><a name="line-610"></a><span>
</span><a name="line-611"></a><span>
</span><a name="line-612"></a><span>
</span><a name="line-613"></a><span class="hs-comment">-- * Dog</span><span>
</span><a name="line-614"></a><span>
</span><a name="line-615"></a><span class="hs-comment">-- | 'dogClassName' Lens</span><span>
</span><a name="line-616"></a><span class="hs-identifier">dogClassNameL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Dog"><span class="hs-identifier hs-type">Dog</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span>
</span><a name="line-617"></a><a name="dogClassNameL"><a href="SwaggerPetstore.Lens.html#dogClassNameL"><span class="hs-identifier">dogClassNameL</span></a></a><span> </span><a name="local-6989586621679099939"><a href="#local-6989586621679099939"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Dog"><span class="hs-identifier hs-var">Dog</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099943"><a href="#local-6989586621679099943"><span class="hs-identifier">dogClassName</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#Dog"><span class="hs-identifier hs-var">Dog</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099943"><span class="hs-identifier hs-var">dogClassName</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099939"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099940"><span class="hs-identifier hs-var">dogClassName</span></a><span>
</span><a name="line-618"></a><span class="hs-pragma">{-# INLINE dogClassNameL #-}</span><span>
</span><a name="line-619"></a><span>
</span><a name="line-620"></a><span class="hs-comment">-- | 'dogColor' Lens</span><span>
</span><a name="line-621"></a><span class="hs-identifier">dogColorL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Dog"><span class="hs-identifier hs-type">Dog</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span>
</span><a name="line-622"></a><a name="dogColorL"><a href="SwaggerPetstore.Lens.html#dogColorL"><span class="hs-identifier">dogColorL</span></a></a><span> </span><a name="local-6989586621679099944"><a href="#local-6989586621679099944"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Dog"><span class="hs-identifier hs-var">Dog</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099948"><a href="#local-6989586621679099948"><span class="hs-identifier">dogColor</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#Dog"><span class="hs-identifier hs-var">Dog</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099948"><span class="hs-identifier hs-var">dogColor</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099944"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099946"><span class="hs-identifier hs-var">dogColor</span></a><span>
</span><a name="line-623"></a><span class="hs-pragma">{-# INLINE dogColorL #-}</span><span>
</span><a name="line-624"></a><span>
</span><a name="line-625"></a><span class="hs-comment">-- | 'dogBreed' Lens</span><span>
</span><a name="line-626"></a><span class="hs-identifier">dogBreedL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Dog"><span class="hs-identifier hs-type">Dog</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span>
</span><a name="line-627"></a><a name="dogBreedL"><a href="SwaggerPetstore.Lens.html#dogBreedL"><span class="hs-identifier">dogBreedL</span></a></a><span> </span><a name="local-6989586621679099949"><a href="#local-6989586621679099949"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Dog"><span class="hs-identifier hs-var">Dog</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679099953"><a href="#local-6989586621679099953"><span class="hs-identifier">dogBreed</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Model.html#Dog"><span class="hs-identifier hs-var">Dog</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679099953"><span class="hs-identifier hs-var">dogBreed</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">&lt;$&gt;</span><span> </span><a href="#local-6989586621679099949"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679099952"><span class="hs-identifier hs-var">dogBreed</span></a><span>
</span><a name="line-628"></a><span class="hs-pragma">{-# INLINE dogBreedL #-}</span><span>
</span><a name="line-629"></a><span>
</span><a name="line-630"></a><span>
</span><a name="line-631"></a></pre></body></html>

View File

@ -24,11 +24,11 @@ Katip Logging functions
</span><a name="line-24"></a><span class="hs-comment">-- * Type Aliases (for compatability)</span><span> </span><a name="line-24"></a><span class="hs-comment">-- * Type Aliases (for compatability)</span><span>
</span><a name="line-25"></a><span> </span><a name="line-25"></a><span>
</span><a name="line-26"></a><span class="hs-comment">-- | Runs a Katip logging block with the Log environment</span><span> </span><a name="line-26"></a><span class="hs-comment">-- | Runs a Katip logging block with the Log environment</span><span>
</span><a name="line-27"></a><span class="hs-keyword">type</span><span> </span><a name="LogExecWithContext"><a href="SwaggerPetstore.Logging.html#LogExecWithContext"><span class="hs-identifier">LogExecWithContext</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">forall</span><span> </span><a name="local-6989586621679084375"><a href="#local-6989586621679084375"><span class="hs-identifier">m</span></a></a><span class="hs-operator">.</span><span> </span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">MonadIO</span><span> </span><a href="#local-6989586621679084375"><span class="hs-identifier hs-type">m</span></a><span> </span><span class="hs-glyph">=&gt;</span><span> </span><a name="line-27"></a><span class="hs-keyword">type</span><span> </span><a name="LogExecWithContext"><a href="SwaggerPetstore.Logging.html#LogExecWithContext"><span class="hs-identifier">LogExecWithContext</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">forall</span><span> </span><a name="local-6989586621679096641"><a href="#local-6989586621679096641"><span class="hs-identifier">m</span></a></a><span class="hs-operator">.</span><span> </span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">MonadIO</span><span> </span><a href="#local-6989586621679096641"><span class="hs-identifier hs-type">m</span></a><span> </span><span class="hs-glyph">=&gt;</span><span>
</span><a name="line-28"></a><span> </span><a href="SwaggerPetstore.Logging.html#LogContext"><span class="hs-identifier hs-type">LogContext</span></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Logging.html#LogExec"><span class="hs-identifier hs-type">LogExec</span></a><span> </span><a href="#local-6989586621679084375"><span class="hs-identifier hs-type">m</span></a><span> </span><a name="line-28"></a><span> </span><a href="SwaggerPetstore.Logging.html#LogContext"><span class="hs-identifier hs-type">LogContext</span></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Logging.html#LogExec"><span class="hs-identifier hs-type">LogExec</span></a><span> </span><a href="#local-6989586621679096641"><span class="hs-identifier hs-type">m</span></a><span>
</span><a name="line-29"></a><span> </span><a name="line-29"></a><span>
</span><a name="line-30"></a><span class="hs-comment">-- | A Katip logging block</span><span> </span><a name="line-30"></a><span class="hs-comment">-- | A Katip logging block</span><span>
</span><a name="line-31"></a><span class="hs-keyword">type</span><span> </span><a name="LogExec"><a href="SwaggerPetstore.Logging.html#LogExec"><span class="hs-identifier">LogExec</span></a></a><span> </span><a name="local-6989586621679084373"><a href="#local-6989586621679084373"><span class="hs-identifier">m</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">forall</span><span> </span><a name="local-6989586621679084374"><a href="#local-6989586621679084374"><span class="hs-identifier">a</span></a></a><span class="hs-operator">.</span><span> </span><span class="hs-identifier hs-type">LG</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">KatipT</span><span> </span><a href="#local-6989586621679084373"><span class="hs-identifier hs-type">m</span></a><span> </span><a href="#local-6989586621679084374"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="#local-6989586621679084373"><span class="hs-identifier hs-type">m</span></a><span> </span><a href="#local-6989586621679084374"><span class="hs-identifier hs-type">a</span></a><span> </span><a name="line-31"></a><span class="hs-keyword">type</span><span> </span><a name="LogExec"><a href="SwaggerPetstore.Logging.html#LogExec"><span class="hs-identifier">LogExec</span></a></a><span> </span><a name="local-6989586621679096639"><a href="#local-6989586621679096639"><span class="hs-identifier">m</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">forall</span><span> </span><a name="local-6989586621679096640"><a href="#local-6989586621679096640"><span class="hs-identifier">a</span></a></a><span class="hs-operator">.</span><span> </span><span class="hs-identifier hs-type">LG</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">KatipT</span><span> </span><a href="#local-6989586621679096639"><span class="hs-identifier hs-type">m</span></a><span> </span><a href="#local-6989586621679096640"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="#local-6989586621679096639"><span class="hs-identifier hs-type">m</span></a><span> </span><a href="#local-6989586621679096640"><span class="hs-identifier hs-type">a</span></a><span>
</span><a name="line-32"></a><span> </span><a name="line-32"></a><span>
</span><a name="line-33"></a><span class="hs-comment">-- | A Katip Log environment</span><span> </span><a name="line-33"></a><span class="hs-comment">-- | A Katip Log environment</span><span>
</span><a name="line-34"></a><span class="hs-keyword">type</span><span> </span><a name="LogContext"><a href="SwaggerPetstore.Logging.html#LogContext"><span class="hs-identifier">LogContext</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-type">LG</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">LogEnv</span><span> </span><a name="line-34"></a><span class="hs-keyword">type</span><span> </span><a name="LogContext"><a href="SwaggerPetstore.Logging.html#LogContext"><span class="hs-identifier">LogContext</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-type">LG</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">LogEnv</span><span>
@ -54,9 +54,9 @@ Katip Logging functions
</span><a name="line-54"></a><span> </span><a name="line-54"></a><span>
</span><a name="line-55"></a><span class="hs-comment">-- | A Katip Log environment which targets stdout</span><span> </span><a name="line-55"></a><span class="hs-comment">-- | A Katip Log environment which targets stdout</span><span>
</span><a name="line-56"></a><span class="hs-identifier">stdoutLoggingContext</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Logging.html#LogContext"><span class="hs-identifier hs-type">LogContext</span></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><a href="SwaggerPetstore.Logging.html#LogContext"><span class="hs-identifier hs-type">LogContext</span></a><span> </span><a name="line-56"></a><span class="hs-identifier">stdoutLoggingContext</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Logging.html#LogContext"><span class="hs-identifier hs-type">LogContext</span></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><a href="SwaggerPetstore.Logging.html#LogContext"><span class="hs-identifier hs-type">LogContext</span></a><span>
</span><a name="line-57"></a><a name="stdoutLoggingContext"><a href="SwaggerPetstore.Logging.html#stdoutLoggingContext"><span class="hs-identifier">stdoutLoggingContext</span></a></a><span> </span><a name="local-6989586621679084783"><a href="#local-6989586621679084783"><span class="hs-identifier">cxt</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span> </span><a name="line-57"></a><a name="stdoutLoggingContext"><a href="SwaggerPetstore.Logging.html#stdoutLoggingContext"><span class="hs-identifier">stdoutLoggingContext</span></a></a><span> </span><a name="local-6989586621679097049"><a href="#local-6989586621679097049"><span class="hs-identifier">cxt</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
</span><a name="line-58"></a><span> </span><a name="local-6989586621679084919"><a href="#local-6989586621679084919"><span class="hs-identifier">handleScribe</span></a></a><span> </span><span class="hs-glyph">&lt;-</span><span> </span><span class="hs-identifier hs-var">LG</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">mkHandleScribe</span><span> </span><span class="hs-identifier hs-var">LG</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">ColorIfTerminal</span><span> </span><span class="hs-identifier hs-var">IO</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">stdout</span><span> </span><span class="hs-identifier hs-var">LG</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">InfoS</span><span> </span><span class="hs-identifier hs-var">LG</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">V2</span><span> </span><a name="line-58"></a><span> </span><a name="local-6989586621679097185"><a href="#local-6989586621679097185"><span class="hs-identifier">handleScribe</span></a></a><span> </span><span class="hs-glyph">&lt;-</span><span> </span><span class="hs-identifier hs-var">LG</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">mkHandleScribe</span><span> </span><span class="hs-identifier hs-var">LG</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">ColorIfTerminal</span><span> </span><span class="hs-identifier hs-var">IO</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">stdout</span><span> </span><span class="hs-identifier hs-var">LG</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">InfoS</span><span> </span><span class="hs-identifier hs-var">LG</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">V2</span><span>
</span><a name="line-59"></a><span> </span><span class="hs-identifier hs-var">LG</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">registerScribe</span><span> </span><span class="hs-string">&quot;stdout&quot;</span><span> </span><a href="#local-6989586621679084919"><span class="hs-identifier hs-var">handleScribe</span></a><span> </span><span class="hs-identifier hs-var">LG</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">defaultScribeSettings</span><span> </span><a href="#local-6989586621679084783"><span class="hs-identifier hs-var">cxt</span></a><span> </span><a name="line-59"></a><span> </span><span class="hs-identifier hs-var">LG</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">registerScribe</span><span> </span><span class="hs-string">&quot;stdout&quot;</span><span> </span><a href="#local-6989586621679097185"><span class="hs-identifier hs-var">handleScribe</span></a><span> </span><span class="hs-identifier hs-var">LG</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">defaultScribeSettings</span><span> </span><a href="#local-6989586621679097049"><span class="hs-identifier hs-var">cxt</span></a><span>
</span><a name="line-60"></a><span> </span><a name="line-60"></a><span>
</span><a name="line-61"></a><span class="hs-comment">-- * stderr logger</span><span> </span><a name="line-61"></a><span class="hs-comment">-- * stderr logger</span><span>
</span><a name="line-62"></a><span> </span><a name="line-62"></a><span>
@ -66,34 +66,34 @@ Katip Logging functions
</span><a name="line-66"></a><span> </span><a name="line-66"></a><span>
</span><a name="line-67"></a><span class="hs-comment">-- | A Katip Log environment which targets stderr</span><span> </span><a name="line-67"></a><span class="hs-comment">-- | A Katip Log environment which targets stderr</span><span>
</span><a name="line-68"></a><span class="hs-identifier">stderrLoggingContext</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Logging.html#LogContext"><span class="hs-identifier hs-type">LogContext</span></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><a href="SwaggerPetstore.Logging.html#LogContext"><span class="hs-identifier hs-type">LogContext</span></a><span> </span><a name="line-68"></a><span class="hs-identifier">stderrLoggingContext</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Logging.html#LogContext"><span class="hs-identifier hs-type">LogContext</span></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><a href="SwaggerPetstore.Logging.html#LogContext"><span class="hs-identifier hs-type">LogContext</span></a><span>
</span><a name="line-69"></a><a name="stderrLoggingContext"><a href="SwaggerPetstore.Logging.html#stderrLoggingContext"><span class="hs-identifier">stderrLoggingContext</span></a></a><span> </span><a name="local-6989586621679084920"><a href="#local-6989586621679084920"><span class="hs-identifier">cxt</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span> </span><a name="line-69"></a><a name="stderrLoggingContext"><a href="SwaggerPetstore.Logging.html#stderrLoggingContext"><span class="hs-identifier">stderrLoggingContext</span></a></a><span> </span><a name="local-6989586621679097186"><a href="#local-6989586621679097186"><span class="hs-identifier">cxt</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
</span><a name="line-70"></a><span> </span><a name="local-6989586621679084921"><a href="#local-6989586621679084921"><span class="hs-identifier">handleScribe</span></a></a><span> </span><span class="hs-glyph">&lt;-</span><span> </span><span class="hs-identifier hs-var">LG</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">mkHandleScribe</span><span> </span><span class="hs-identifier hs-var">LG</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">ColorIfTerminal</span><span> </span><span class="hs-identifier hs-var">IO</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">stderr</span><span> </span><span class="hs-identifier hs-var">LG</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">InfoS</span><span> </span><span class="hs-identifier hs-var">LG</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">V2</span><span> </span><a name="line-70"></a><span> </span><a name="local-6989586621679097187"><a href="#local-6989586621679097187"><span class="hs-identifier">handleScribe</span></a></a><span> </span><span class="hs-glyph">&lt;-</span><span> </span><span class="hs-identifier hs-var">LG</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">mkHandleScribe</span><span> </span><span class="hs-identifier hs-var">LG</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">ColorIfTerminal</span><span> </span><span class="hs-identifier hs-var">IO</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">stderr</span><span> </span><span class="hs-identifier hs-var">LG</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">InfoS</span><span> </span><span class="hs-identifier hs-var">LG</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">V2</span><span>
</span><a name="line-71"></a><span> </span><span class="hs-identifier hs-var">LG</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">registerScribe</span><span> </span><span class="hs-string">&quot;stderr&quot;</span><span> </span><a href="#local-6989586621679084921"><span class="hs-identifier hs-var">handleScribe</span></a><span> </span><span class="hs-identifier hs-var">LG</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">defaultScribeSettings</span><span> </span><a href="#local-6989586621679084920"><span class="hs-identifier hs-var">cxt</span></a><span> </span><a name="line-71"></a><span> </span><span class="hs-identifier hs-var">LG</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">registerScribe</span><span> </span><span class="hs-string">&quot;stderr&quot;</span><span> </span><a href="#local-6989586621679097187"><span class="hs-identifier hs-var">handleScribe</span></a><span> </span><span class="hs-identifier hs-var">LG</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">defaultScribeSettings</span><span> </span><a href="#local-6989586621679097186"><span class="hs-identifier hs-var">cxt</span></a><span>
</span><a name="line-72"></a><span> </span><a name="line-72"></a><span>
</span><a name="line-73"></a><span class="hs-comment">-- * Null logger</span><span> </span><a name="line-73"></a><span class="hs-comment">-- * Null logger</span><span>
</span><a name="line-74"></a><span> </span><a name="line-74"></a><span>
</span><a name="line-75"></a><span class="hs-comment">-- | Disables Katip logging</span><span> </span><a name="line-75"></a><span class="hs-comment">-- | Disables Katip logging</span><span>
</span><a name="line-76"></a><span class="hs-identifier">runNullLogExec</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Logging.html#LogExecWithContext"><span class="hs-identifier hs-type">LogExecWithContext</span></a><span> </span><a name="line-76"></a><span class="hs-identifier">runNullLogExec</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Logging.html#LogExecWithContext"><span class="hs-identifier hs-type">LogExecWithContext</span></a><span>
</span><a name="line-77"></a><a name="runNullLogExec"><a href="SwaggerPetstore.Logging.html#runNullLogExec"><span class="hs-identifier">runNullLogExec</span></a></a><span> </span><a name="local-6989586621679084922"><a href="#local-6989586621679084922"><span class="hs-identifier">le</span></a></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">LG</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">KatipT</span><span> </span><a name="local-6989586621679084923"><a href="#local-6989586621679084923"><span class="hs-identifier">f</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier">P</span><span class="hs-operator">.</span><span class="hs-identifier">runReaderT</span><span> </span><a href="#local-6989586621679084923"><span class="hs-identifier hs-var">f</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">L</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">set</span><span> </span><span class="hs-identifier hs-var">LG</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">logEnvScribes</span><span> </span><span class="hs-identifier hs-var">mempty</span><span> </span><a href="#local-6989586621679084922"><span class="hs-identifier hs-var">le</span></a><span class="hs-special">)</span><span> </span><a name="line-77"></a><a name="runNullLogExec"><a href="SwaggerPetstore.Logging.html#runNullLogExec"><span class="hs-identifier">runNullLogExec</span></a></a><span> </span><a name="local-6989586621679097188"><a href="#local-6989586621679097188"><span class="hs-identifier">le</span></a></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">LG</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">KatipT</span><span> </span><a name="local-6989586621679097189"><a href="#local-6989586621679097189"><span class="hs-identifier">f</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier">P</span><span class="hs-operator">.</span><span class="hs-identifier">runReaderT</span><span> </span><a href="#local-6989586621679097189"><span class="hs-identifier hs-var">f</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">L</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">set</span><span> </span><span class="hs-identifier hs-var">LG</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">logEnvScribes</span><span> </span><span class="hs-identifier hs-var">mempty</span><span> </span><a href="#local-6989586621679097188"><span class="hs-identifier hs-var">le</span></a><span class="hs-special">)</span><span>
</span><a name="line-78"></a><span> </span><a name="line-78"></a><span>
</span><a name="line-79"></a><span class="hs-comment">-- * Log Msg</span><span> </span><a name="line-79"></a><span class="hs-comment">-- * Log Msg</span><span>
</span><a name="line-80"></a><span> </span><a name="line-80"></a><span>
</span><a name="line-81"></a><span class="hs-comment">-- | Log a katip message</span><span> </span><a name="line-81"></a><span class="hs-comment">-- | Log a katip message</span><span>
</span><a name="line-82"></a><span class="hs-identifier">_log</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Applicative</span><span> </span><a href="#local-6989586621679084782"><span class="hs-identifier hs-type">m</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">LG</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Katip</span><span> </span><a href="#local-6989586621679084782"><span class="hs-identifier hs-type">m</span></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span class="hs-identifier hs-type">Text</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Logging.html#LogLevel"><span class="hs-identifier hs-type">LogLevel</span></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-type">Text</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="#local-6989586621679084782"><span class="hs-identifier hs-type">m</span></a><span> </span><span class="hs-special">(</span><span class="hs-special">)</span><span> </span><a name="line-82"></a><span class="hs-identifier">_log</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Applicative</span><span> </span><a href="#local-6989586621679097048"><span class="hs-identifier hs-type">m</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">LG</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Katip</span><span> </span><a href="#local-6989586621679097048"><span class="hs-identifier hs-type">m</span></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span class="hs-identifier hs-type">Text</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="SwaggerPetstore.Logging.html#LogLevel"><span class="hs-identifier hs-type">LogLevel</span></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-type">Text</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="#local-6989586621679097048"><span class="hs-identifier hs-type">m</span></a><span> </span><span class="hs-special">(</span><span class="hs-special">)</span><span>
</span><a name="line-83"></a><a name="_log"><a href="SwaggerPetstore.Logging.html#_log"><span class="hs-identifier">_log</span></a></a><span> </span><a name="local-6989586621679084924"><a href="#local-6989586621679084924"><span class="hs-identifier">src</span></a></a><span> </span><a name="local-6989586621679084925"><a href="#local-6989586621679084925"><span class="hs-identifier">level</span></a></a><span> </span><a name="local-6989586621679084926"><a href="#local-6989586621679084926"><span class="hs-identifier">msg</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span> </span><a name="line-83"></a><a name="_log"><a href="SwaggerPetstore.Logging.html#_log"><span class="hs-identifier">_log</span></a></a><span> </span><a name="local-6989586621679097190"><a href="#local-6989586621679097190"><span class="hs-identifier">src</span></a></a><span> </span><a name="local-6989586621679097191"><a href="#local-6989586621679097191"><span class="hs-identifier">level</span></a></a><span> </span><a name="local-6989586621679097192"><a href="#local-6989586621679097192"><span class="hs-identifier">msg</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
</span><a name="line-84"></a><span> </span><span class="hs-identifier hs-var">LG</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">logMsg</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">fromString</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">T</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">unpack</span><span> </span><a href="#local-6989586621679084924"><span class="hs-identifier hs-var">src</span></a><span class="hs-special">)</span><span> </span><a href="#local-6989586621679084925"><span class="hs-identifier hs-var">level</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">LG</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">logStr</span><span> </span><a href="#local-6989586621679084926"><span class="hs-identifier hs-var">msg</span></a><span class="hs-special">)</span><span> </span><a name="line-84"></a><span> </span><span class="hs-identifier hs-var">LG</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">logMsg</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">fromString</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">T</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">unpack</span><span> </span><a href="#local-6989586621679097190"><span class="hs-identifier hs-var">src</span></a><span class="hs-special">)</span><span> </span><a href="#local-6989586621679097191"><span class="hs-identifier hs-var">level</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">LG</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">logStr</span><span> </span><a href="#local-6989586621679097192"><span class="hs-identifier hs-var">msg</span></a><span class="hs-special">)</span><span>
</span><a name="line-85"></a><span> </span><a name="line-85"></a><span>
</span><a name="line-86"></a><span class="hs-comment">-- * Log Exceptions</span><span> </span><a name="line-86"></a><span class="hs-comment">-- * Log Exceptions</span><span>
</span><a name="line-87"></a><span> </span><a name="line-87"></a><span>
</span><a name="line-88"></a><span class="hs-comment">-- | re-throws exceptions after logging them</span><span> </span><a name="line-88"></a><span class="hs-comment">-- | re-throws exceptions after logging them</span><span>
</span><a name="line-89"></a><span class="hs-identifier">logExceptions</span><span> </span><a name="line-89"></a><span class="hs-identifier">logExceptions</span><span>
</span><a name="line-90"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">LG</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Katip</span><span> </span><a href="#local-6989586621679084376"><span class="hs-identifier hs-type">m</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">E</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">MonadCatch</span><span> </span><a href="#local-6989586621679084376"><span class="hs-identifier hs-type">m</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">Applicative</span><span> </span><a href="#local-6989586621679084376"><span class="hs-identifier hs-type">m</span></a><span class="hs-special">)</span><span> </span><a name="line-90"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">LG</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Katip</span><span> </span><a href="#local-6989586621679096642"><span class="hs-identifier hs-type">m</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">E</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">MonadCatch</span><span> </span><a href="#local-6989586621679096642"><span class="hs-identifier hs-type">m</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">Applicative</span><span> </span><a href="#local-6989586621679096642"><span class="hs-identifier hs-type">m</span></a><span class="hs-special">)</span><span>
</span><a name="line-91"></a><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span class="hs-identifier hs-type">Text</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="#local-6989586621679084376"><span class="hs-identifier hs-type">m</span></a><span> </span><a href="#local-6989586621679084377"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="#local-6989586621679084376"><span class="hs-identifier hs-type">m</span></a><span> </span><a href="#local-6989586621679084377"><span class="hs-identifier hs-type">a</span></a><span> </span><a name="line-91"></a><span> </span><span class="hs-glyph">=&gt;</span><span> </span><span class="hs-identifier hs-type">Text</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="#local-6989586621679096642"><span class="hs-identifier hs-type">m</span></a><span> </span><a href="#local-6989586621679096643"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="#local-6989586621679096642"><span class="hs-identifier hs-type">m</span></a><span> </span><a href="#local-6989586621679096643"><span class="hs-identifier hs-type">a</span></a><span>
</span><a name="line-92"></a><a name="logExceptions"><a href="SwaggerPetstore.Logging.html#logExceptions"><span class="hs-identifier">logExceptions</span></a></a><span> </span><a name="local-6989586621679084927"><a href="#local-6989586621679084927"><span class="hs-identifier">src</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a name="line-92"></a><a name="logExceptions"><a href="SwaggerPetstore.Logging.html#logExceptions"><span class="hs-identifier">logExceptions</span></a></a><span> </span><a name="local-6989586621679097193"><a href="#local-6989586621679097193"><span class="hs-identifier">src</span></a></a><span> </span><span class="hs-glyph">=</span><span>
</span><a name="line-93"></a><span> </span><span class="hs-identifier hs-var">E</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">handle</span><span> </span><a name="line-93"></a><span> </span><span class="hs-identifier hs-var">E</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">handle</span><span>
</span><a name="line-94"></a><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span class="hs-special">(</span><a name="local-6989586621679085188"><a href="#local-6989586621679085188"><span class="hs-identifier">e</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">E</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">SomeException</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-keyword">do</span><span> </span><a name="line-94"></a><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span class="hs-special">(</span><a name="local-6989586621679097454"><a href="#local-6989586621679097454"><span class="hs-identifier">e</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">E</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">SomeException</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-keyword">do</span><span>
</span><a name="line-95"></a><span> </span><a href="SwaggerPetstore.Logging.html#_log"><span class="hs-identifier hs-var">_log</span></a><span> </span><a href="#local-6989586621679084927"><span class="hs-identifier hs-var">src</span></a><span> </span><span class="hs-identifier hs-var">LG</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">ErrorS</span><span> </span><span class="hs-special">(</span><span class="hs-special">(</span><span class="hs-identifier hs-var">T</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">pack</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">show</span><span class="hs-special">)</span><span> </span><a href="#local-6989586621679085188"><span class="hs-identifier hs-var">e</span></a><span class="hs-special">)</span><span> </span><a name="line-95"></a><span> </span><a href="SwaggerPetstore.Logging.html#_log"><span class="hs-identifier hs-var">_log</span></a><span> </span><a href="#local-6989586621679097193"><span class="hs-identifier hs-var">src</span></a><span> </span><span class="hs-identifier hs-var">LG</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">ErrorS</span><span> </span><span class="hs-special">(</span><span class="hs-special">(</span><span class="hs-identifier hs-var">T</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">pack</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">show</span><span class="hs-special">)</span><span> </span><a href="#local-6989586621679097454"><span class="hs-identifier hs-var">e</span></a><span class="hs-special">)</span><span>
</span><a name="line-96"></a><span> </span><span class="hs-identifier hs-var">E</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">throw</span><span> </span><a href="#local-6989586621679085188"><span class="hs-identifier hs-var">e</span></a><span class="hs-special">)</span><span> </span><a name="line-96"></a><span> </span><span class="hs-identifier hs-var">E</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">throw</span><span> </span><a href="#local-6989586621679097454"><span class="hs-identifier hs-var">e</span></a><span class="hs-special">)</span><span>
</span><a name="line-97"></a><span> </span><a name="line-97"></a><span>
</span><a name="line-98"></a><span class="hs-comment">-- * Log Level</span><span> </span><a name="line-98"></a><span class="hs-comment">-- * Log Level</span><span>
</span><a name="line-99"></a><span> </span><a name="line-99"></a><span>

View File

@ -13,179 +13,208 @@ Module : SwaggerPetstore.MimeTypes
</span><a name="line-13"></a><span> </span><a name="line-13"></a><span>
</span><a name="line-14"></a><span class="hs-keyword">module</span><span> </span><span class="hs-identifier">SwaggerPetstore</span><span class="hs-operator">.</span><span class="hs-identifier">MimeTypes</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="line-14"></a><span class="hs-keyword">module</span><span> </span><span class="hs-identifier">SwaggerPetstore</span><span class="hs-operator">.</span><span class="hs-identifier">MimeTypes</span><span> </span><span class="hs-keyword">where</span><span>
</span><a name="line-15"></a><span> </span><a name="line-15"></a><span>
</span><a name="line-16"></a><span> </span><a name="line-16"></a><span class="hs-keyword">import</span><span> </span><a href="SwaggerPetstore.Model.html"><span class="hs-identifier">SwaggerPetstore</span><span class="hs-operator">.</span><span class="hs-identifier">Model</span></a><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">M</span><span>
</span><a name="line-17"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data</span><span class="hs-operator">.</span><span class="hs-identifier">Aeson</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">A</span><span> </span><a name="line-17"></a><span>
</span><a name="line-18"></a><span> </span><a name="line-18"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data</span><span class="hs-operator">.</span><span class="hs-identifier">Aeson</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">A</span><span>
</span><a name="line-19"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data</span><span class="hs-operator">.</span><span class="hs-identifier">ByteString</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">B</span><span> </span><a name="line-19"></a><span>
</span><a name="line-20"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data</span><span class="hs-operator">.</span><span class="hs-identifier">ByteString</span><span class="hs-operator">.</span><span class="hs-identifier">Lazy</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">BL</span><span> </span><a name="line-20"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data</span><span class="hs-operator">.</span><span class="hs-identifier">ByteString</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">B</span><span>
</span><a name="line-21"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data</span><span class="hs-operator">.</span><span class="hs-identifier">ByteString</span><span class="hs-operator">.</span><span class="hs-identifier">Builder</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">BB</span><span> </span><a name="line-21"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data</span><span class="hs-operator">.</span><span class="hs-identifier">ByteString</span><span class="hs-operator">.</span><span class="hs-identifier">Lazy</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">BL</span><span>
</span><a name="line-22"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data</span><span class="hs-operator">.</span><span class="hs-identifier">ByteString</span><span class="hs-operator">.</span><span class="hs-identifier">Char8</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">BC</span><span> </span><a name="line-22"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data</span><span class="hs-operator">.</span><span class="hs-identifier">ByteString</span><span class="hs-operator">.</span><span class="hs-identifier">Builder</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">BB</span><span>
</span><a name="line-23"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data</span><span class="hs-operator">.</span><span class="hs-identifier">ByteString</span><span class="hs-operator">.</span><span class="hs-identifier">Lazy</span><span class="hs-operator">.</span><span class="hs-identifier">Char8</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">BCL</span><span> </span><a name="line-23"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data</span><span class="hs-operator">.</span><span class="hs-identifier">ByteString</span><span class="hs-operator">.</span><span class="hs-identifier">Char8</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">BC</span><span>
</span><a name="line-24"></a><span> </span><a name="line-24"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data</span><span class="hs-operator">.</span><span class="hs-identifier">ByteString</span><span class="hs-operator">.</span><span class="hs-identifier">Lazy</span><span class="hs-operator">.</span><span class="hs-identifier">Char8</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">BCL</span><span>
</span><a name="line-25"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Network</span><span class="hs-operator">.</span><span class="hs-identifier">HTTP</span><span class="hs-operator">.</span><span class="hs-identifier">Media</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">ME</span><span> </span><a name="line-25"></a><span>
</span><a name="line-26"></a><span> </span><a name="line-26"></a><span>
</span><a name="line-27"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Web</span><span class="hs-operator">.</span><span class="hs-identifier">FormUrlEncoded</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">WH</span><span> </span><a name="line-27"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Network</span><span class="hs-operator">.</span><span class="hs-identifier">HTTP</span><span class="hs-operator">.</span><span class="hs-identifier">Media</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">ME</span><span>
</span><a name="line-28"></a><span> </span><a name="line-28"></a><span>
</span><a name="line-29"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data</span><span class="hs-operator">.</span><span class="hs-identifier">Data</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">P</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Typeable</span><span class="hs-special">)</span><span> </span><a name="line-29"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Web</span><span class="hs-operator">.</span><span class="hs-identifier">FormUrlEncoded</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">WH</span><span>
</span><a name="line-30"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data</span><span class="hs-operator">.</span><span class="hs-identifier">Proxy</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">P</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Proxy</span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span class="hs-special">)</span><span> </span><a name="line-30"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Web</span><span class="hs-operator">.</span><span class="hs-identifier">HttpApiData</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">WH</span><span>
</span><a name="line-31"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data</span><span class="hs-operator">.</span><span class="hs-identifier">Text</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">T</span><span> </span><a name="line-31"></a><span>
</span><a name="line-32"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data</span><span class="hs-operator">.</span><span class="hs-identifier">Text</span><span class="hs-operator">.</span><span class="hs-identifier">Encoding</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">T</span><span> </span><a name="line-32"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data</span><span class="hs-operator">.</span><span class="hs-identifier">Data</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">P</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Typeable</span><span class="hs-special">)</span><span>
</span><a name="line-33"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Control</span><span class="hs-operator">.</span><span class="hs-identifier">Arrow</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">P</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">left</span><span class="hs-special">)</span><span> </span><a name="line-33"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data</span><span class="hs-operator">.</span><span class="hs-identifier">Proxy</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">P</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Proxy</span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span class="hs-special">)</span><span>
</span><a name="line-34"></a><span> </span><a name="line-34"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data</span><span class="hs-operator">.</span><span class="hs-identifier">Text</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">T</span><span>
</span><a name="line-35"></a><span class="hs-keyword">import</span><span> </span><span class="hs-identifier">Prelude</span><span> </span><span class="hs-special">(</span><span class="hs-special">(</span><span class="hs-operator hs-var">$</span><span class="hs-special">)</span><span class="hs-special">,</span><span> </span><span class="hs-special">(</span><span class="hs-operator hs-var">.</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="hs-special">(</span><span class="hs-operator hs-var">&lt;$&gt;</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="hs-special">(</span><span class="hs-operator hs-var">&lt;*&gt;</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Maybe</span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Bool</span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Char</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Double</span><span class="hs-special">,</span><span class="hs-identifier hs-type">FilePath</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Float</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Int</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Integer</span><span class="hs-special">,</span><span class="hs-identifier hs-type">String</span><span class="hs-special">,</span><span class="hs-identifier hs-var">fmap</span><span class="hs-special">,</span><span class="hs-identifier hs-var">undefined</span><span class="hs-special">,</span><span class="hs-identifier hs-var">mempty</span><span class="hs-special">)</span><span> </span><a name="line-35"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data</span><span class="hs-operator">.</span><span class="hs-identifier">String</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">P</span><span>
</span><a name="line-36"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Prelude</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">P</span><span> </span><a name="line-36"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data</span><span class="hs-operator">.</span><span class="hs-identifier">Text</span><span class="hs-operator">.</span><span class="hs-identifier">Encoding</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">T</span><span>
</span><a name="line-37"></a><span> </span><a name="line-37"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Control</span><span class="hs-operator">.</span><span class="hs-identifier">Arrow</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">P</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">left</span><span class="hs-special">)</span><span>
</span><a name="line-38"></a><span class="hs-comment">-- * Content Negotiation</span><span> </span><a name="line-38"></a><span>
</span><a name="line-39"></a><span> </span><a name="line-39"></a><span class="hs-keyword">import</span><span> </span><span class="hs-identifier">Prelude</span><span> </span><span class="hs-special">(</span><span class="hs-special">(</span><span class="hs-operator hs-var">$</span><span class="hs-special">)</span><span class="hs-special">,</span><span> </span><span class="hs-special">(</span><span class="hs-operator hs-var">.</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="hs-special">(</span><span class="hs-operator hs-var">&lt;$&gt;</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="hs-special">(</span><span class="hs-operator hs-var">&lt;*&gt;</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Maybe</span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Bool</span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Char</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Double</span><span class="hs-special">,</span><span class="hs-identifier hs-type">FilePath</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Float</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Int</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Integer</span><span class="hs-special">,</span><span class="hs-identifier hs-type">String</span><span class="hs-special">,</span><span class="hs-identifier hs-var">fmap</span><span class="hs-special">,</span><span class="hs-identifier hs-var">undefined</span><span class="hs-special">,</span><span class="hs-identifier hs-var">mempty</span><span class="hs-special">)</span><span>
</span><a name="line-40"></a><span class="hs-comment">-- | A type for responses without content-body.</span><span> </span><a name="line-40"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Prelude</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">P</span><span>
</span><a name="line-41"></a><span class="hs-keyword">data</span><span> </span><a name="NoContent"><a href="SwaggerPetstore.MimeTypes.html#NoContent"><span class="hs-identifier">NoContent</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a name="NoContent"><a href="SwaggerPetstore.MimeTypes.html#NoContent"><span class="hs-identifier">NoContent</span></a></a><span> </span><a name="line-41"></a><span>
</span><a name="line-42"></a><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Show</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Eq</span><span class="hs-special">)</span><span> </span><a name="line-42"></a><span class="hs-comment">-- * Content Negotiation</span><span>
</span><a name="line-43"></a><span> </span><a name="line-43"></a><span>
</span><a name="line-44"></a><span class="hs-comment">-- ** Mime Types</span><span> </span><a name="line-44"></a><span class="hs-comment">-- | A type for responses without content-body.</span><span>
</span><a name="line-45"></a><span> </span><a name="line-45"></a><span class="hs-keyword">data</span><span> </span><a name="NoContent"><a href="SwaggerPetstore.MimeTypes.html#NoContent"><span class="hs-identifier">NoContent</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a name="NoContent"><a href="SwaggerPetstore.MimeTypes.html#NoContent"><span class="hs-identifier">NoContent</span></a></a><span>
</span><a name="line-46"></a><span class="hs-keyword">data</span><span> </span><a name="MimeJSON"><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier">MimeJSON</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a name="MimeJSON"><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier">MimeJSON</span></a></a><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Typeable</span><span class="hs-special">)</span><span> </span><a name="line-46"></a><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Show</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Eq</span><span class="hs-special">)</span><span>
</span><a name="line-47"></a><span class="hs-keyword">data</span><span> </span><a name="MimeXML"><a href="SwaggerPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier">MimeXML</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a name="MimeXML"><a href="SwaggerPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier">MimeXML</span></a></a><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Typeable</span><span class="hs-special">)</span><span> </span><a name="line-47"></a><span>
</span><a name="line-48"></a><span class="hs-keyword">data</span><span> </span><a name="MimePlainText"><a href="SwaggerPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier">MimePlainText</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a name="MimePlainText"><a href="SwaggerPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier">MimePlainText</span></a></a><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Typeable</span><span class="hs-special">)</span><span> </span><a name="line-48"></a><span class="hs-comment">-- ** Mime Types</span><span>
</span><a name="line-49"></a><span class="hs-keyword">data</span><span> </span><a name="MimeFormUrlEncoded"><a href="SwaggerPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier">MimeFormUrlEncoded</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a name="MimeFormUrlEncoded"><a href="SwaggerPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier">MimeFormUrlEncoded</span></a></a><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Typeable</span><span class="hs-special">)</span><span> </span><a name="line-49"></a><span>
</span><a name="line-50"></a><span class="hs-keyword">data</span><span> </span><a name="MimeMultipartFormData"><a href="SwaggerPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier">MimeMultipartFormData</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a name="MimeMultipartFormData"><a href="SwaggerPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier">MimeMultipartFormData</span></a></a><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Typeable</span><span class="hs-special">)</span><span> </span><a name="line-50"></a><span class="hs-keyword">data</span><span> </span><a name="MimeJSON"><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier">MimeJSON</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a name="MimeJSON"><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier">MimeJSON</span></a></a><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Typeable</span><span class="hs-special">)</span><span>
</span><a name="line-51"></a><span class="hs-keyword">data</span><span> </span><a name="MimeOctetStream"><a href="SwaggerPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier">MimeOctetStream</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a name="MimeOctetStream"><a href="SwaggerPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier">MimeOctetStream</span></a></a><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Typeable</span><span class="hs-special">)</span><span> </span><a name="line-51"></a><span class="hs-keyword">data</span><span> </span><a name="MimeXML"><a href="SwaggerPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier">MimeXML</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a name="MimeXML"><a href="SwaggerPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier">MimeXML</span></a></a><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Typeable</span><span class="hs-special">)</span><span>
</span><a name="line-52"></a><span class="hs-keyword">data</span><span> </span><a name="MimeNoContent"><a href="SwaggerPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier">MimeNoContent</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a name="MimeNoContent"><a href="SwaggerPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier">MimeNoContent</span></a></a><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Typeable</span><span class="hs-special">)</span><span> </span><a name="line-52"></a><span class="hs-keyword">data</span><span> </span><a name="MimePlainText"><a href="SwaggerPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier">MimePlainText</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a name="MimePlainText"><a href="SwaggerPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier">MimePlainText</span></a></a><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Typeable</span><span class="hs-special">)</span><span>
</span><a name="line-53"></a><span> </span><a name="line-53"></a><span class="hs-keyword">data</span><span> </span><a name="MimeFormUrlEncoded"><a href="SwaggerPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier">MimeFormUrlEncoded</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a name="MimeFormUrlEncoded"><a href="SwaggerPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier">MimeFormUrlEncoded</span></a></a><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Typeable</span><span class="hs-special">)</span><span>
</span><a name="line-54"></a><span> </span><a name="line-54"></a><span class="hs-keyword">data</span><span> </span><a name="MimeMultipartFormData"><a href="SwaggerPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier">MimeMultipartFormData</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a name="MimeMultipartFormData"><a href="SwaggerPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier">MimeMultipartFormData</span></a></a><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Typeable</span><span class="hs-special">)</span><span>
</span><a name="line-55"></a><span class="hs-comment">-- ** MimeType Class</span><span> </span><a name="line-55"></a><span class="hs-keyword">data</span><span> </span><a name="MimeOctetStream"><a href="SwaggerPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier">MimeOctetStream</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a name="MimeOctetStream"><a href="SwaggerPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier">MimeOctetStream</span></a></a><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Typeable</span><span class="hs-special">)</span><span>
</span><a name="line-56"></a><span> </span><a name="line-56"></a><span class="hs-keyword">data</span><span> </span><a name="MimeNoContent"><a href="SwaggerPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier">MimeNoContent</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a name="MimeNoContent"><a href="SwaggerPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier">MimeNoContent</span></a></a><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Typeable</span><span class="hs-special">)</span><span>
</span><a name="line-57"></a><span class="hs-keyword">class</span><span> </span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Typeable</span><span> </span><a href="#local-6989586621679079739"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=&gt;</span><span> </span><a name="MimeType"><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier">MimeType</span></a></a><span> </span><a name="local-6989586621679079739"><a href="#local-6989586621679079739"><span class="hs-identifier">mtype</span></a></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="line-57"></a><span class="hs-keyword">data</span><span> </span><a name="MimeAny"><a href="SwaggerPetstore.MimeTypes.html#MimeAny"><span class="hs-identifier">MimeAny</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a name="MimeAny"><a href="SwaggerPetstore.MimeTypes.html#MimeAny"><span class="hs-identifier">MimeAny</span></a></a><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Typeable</span><span class="hs-special">)</span><span>
</span><a name="line-58"></a><span> </span><span class="hs-pragma">{-# MINIMAL mimeType | mimeTypes #-}</span><span> </span><a name="line-58"></a><span>
</span><a name="line-59"></a><span> </span><a name="line-59"></a><span class="hs-keyword">data</span><span> </span><a name="MimeXmlCharsetutf8"><a href="SwaggerPetstore.MimeTypes.html#MimeXmlCharsetutf8"><span class="hs-identifier">MimeXmlCharsetutf8</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a name="MimeXmlCharsetutf8"><a href="SwaggerPetstore.MimeTypes.html#MimeXmlCharsetutf8"><span class="hs-identifier">MimeXmlCharsetutf8</span></a></a><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Typeable</span><span class="hs-special">)</span><span>
</span><a name="line-60"></a><span> </span><span class="hs-identifier">mimeTypes</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Proxy</span><span> </span><a href="#local-6989586621679079739"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-special">[</span><span class="hs-identifier hs-type">ME</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">MediaType</span><span class="hs-special">]</span><span> </span><a name="line-60"></a><span class="hs-keyword">data</span><span> </span><a name="MimeJsonCharsetutf8"><a href="SwaggerPetstore.MimeTypes.html#MimeJsonCharsetutf8"><span class="hs-identifier">MimeJsonCharsetutf8</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a name="MimeJsonCharsetutf8"><a href="SwaggerPetstore.MimeTypes.html#MimeJsonCharsetutf8"><span class="hs-identifier">MimeJsonCharsetutf8</span></a></a><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Typeable</span><span class="hs-special">)</span><span>
</span><a name="line-61"></a><span> </span><a name="local-8214565720323854329"><a href="SwaggerPetstore.MimeTypes.html#mimeTypes"><span class="hs-identifier">mimeTypes</span></a></a><span> </span><a name="local-6989586621679079896"><a href="#local-6989586621679079896"><span class="hs-identifier">p</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a name="line-61"></a><span>
</span><a name="line-62"></a><span> </span><span class="hs-keyword">case</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#mimeType"><span class="hs-identifier hs-var">mimeType</span></a><span> </span><a href="#local-6989586621679079896"><span class="hs-identifier hs-var">p</span></a><span> </span><span class="hs-keyword">of</span><span> </span><a name="line-62"></a><span class="hs-comment">-- ** MimeType Class</span><span>
</span><a name="line-63"></a><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a name="local-6989586621679079897"><a href="#local-6989586621679079897"><span class="hs-identifier">x</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-special">[</span><a href="#local-6989586621679079897"><span class="hs-identifier hs-var">x</span></a><span class="hs-special">]</span><span> </span><a name="line-63"></a><span>
</span><a name="line-64"></a><span> </span><span class="hs-identifier hs-var">Nothing</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-special">[</span><span class="hs-special">]</span><span> </span><a name="line-64"></a><span class="hs-keyword">class</span><span> </span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Typeable</span><span> </span><a href="#local-6989586621679091890"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=&gt;</span><span> </span><a name="MimeType"><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier">MimeType</span></a></a><span> </span><a name="local-6989586621679091890"><a href="#local-6989586621679091890"><span class="hs-identifier">mtype</span></a></a><span> </span><span class="hs-keyword">where</span><span>
</span><a name="line-65"></a><span> </span><a name="line-65"></a><span> </span><span class="hs-pragma">{-# MINIMAL mimeType | mimeTypes #-}</span><span>
</span><a name="line-66"></a><span> </span><span class="hs-identifier">mimeType</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Proxy</span><span> </span><a href="#local-6989586621679079739"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">ME</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">MediaType</span><span> </span><a name="line-66"></a><span>
</span><a name="line-67"></a><span> </span><a name="local-8214565720323854330"><a href="SwaggerPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><a name="local-6989586621679079898"><a href="#local-6989586621679079898"><span class="hs-identifier">p</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a name="line-67"></a><span> </span><span class="hs-identifier">mimeTypes</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Proxy</span><span> </span><a href="#local-6989586621679091890"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-special">[</span><span class="hs-identifier hs-type">ME</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">MediaType</span><span class="hs-special">]</span><span>
</span><a name="line-68"></a><span> </span><span class="hs-keyword">case</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#mimeTypes"><span class="hs-identifier hs-var">mimeTypes</span></a><span> </span><a href="#local-6989586621679079898"><span class="hs-identifier hs-var">p</span></a><span> </span><span class="hs-keyword">of</span><span> </span><a name="line-68"></a><span> </span><a name="local-8214565720323866764"><a href="SwaggerPetstore.MimeTypes.html#mimeTypes"><span class="hs-identifier">mimeTypes</span></a></a><span> </span><a name="local-6989586621679092039"><a href="#local-6989586621679092039"><span class="hs-identifier">p</span></a></a><span> </span><span class="hs-glyph">=</span><span>
</span><a name="line-69"></a><span> </span><span class="hs-special">[</span><span class="hs-special">]</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-var">Nothing</span><span> </span><a name="line-69"></a><span> </span><span class="hs-keyword">case</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#mimeType"><span class="hs-identifier hs-var">mimeType</span></a><span> </span><a href="#local-6989586621679092039"><span class="hs-identifier hs-var">p</span></a><span> </span><span class="hs-keyword">of</span><span>
</span><a name="line-70"></a><span> </span><span class="hs-special">(</span><a name="local-6989586621679079899"><a href="#local-6989586621679079899"><span class="hs-identifier">x</span></a></a><span class="hs-glyph">:</span><span class="hs-identifier">_</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679079899"><span class="hs-identifier hs-var">x</span></a><span> </span><a name="line-70"></a><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a name="local-6989586621679092040"><a href="#local-6989586621679092040"><span class="hs-identifier">x</span></a></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-special">[</span><a href="#local-6989586621679092040"><span class="hs-identifier hs-var">x</span></a><span class="hs-special">]</span><span>
</span><a name="line-71"></a><span> </span><a name="line-71"></a><span> </span><span class="hs-identifier hs-var">Nothing</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-special">[</span><span class="hs-special">]</span><span>
</span><a name="line-72"></a><span> </span><span class="hs-identifier">mimeType'</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="#local-6989586621679079739"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">ME</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">MediaType</span><span> </span><a name="line-72"></a><span>
</span><a name="line-73"></a><span> </span><a name="local-8214565720323854331"><a href="SwaggerPetstore.MimeTypes.html#mimeType%27"><span class="hs-identifier">mimeType'</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#mimeType"><span class="hs-identifier hs-var">mimeType</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">Proxy</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Proxy</span><span> </span><a href="#local-6989586621679079739"><span class="hs-identifier hs-type">mtype</span></a><span class="hs-special">)</span><span> </span><a name="line-73"></a><span> </span><span class="hs-identifier">mimeType</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Proxy</span><span> </span><a href="#local-6989586621679091890"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">ME</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">MediaType</span><span>
</span><a name="line-74"></a><span> </span><span class="hs-identifier">mimeTypes'</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="#local-6989586621679079739"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-special">[</span><span class="hs-identifier hs-type">ME</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">MediaType</span><span class="hs-special">]</span><span> </span><a name="line-74"></a><span> </span><a name="local-8214565720323866765"><a href="SwaggerPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><a name="local-6989586621679092041"><a href="#local-6989586621679092041"><span class="hs-identifier">p</span></a></a><span> </span><span class="hs-glyph">=</span><span>
</span><a name="line-75"></a><span> </span><a name="local-8214565720323854332"><a href="SwaggerPetstore.MimeTypes.html#mimeTypes%27"><span class="hs-identifier">mimeTypes'</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#mimeTypes"><span class="hs-identifier hs-var">mimeTypes</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">Proxy</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Proxy</span><span> </span><a href="#local-6989586621679079739"><span class="hs-identifier hs-type">mtype</span></a><span class="hs-special">)</span><span> </span><a name="line-75"></a><span> </span><span class="hs-keyword">case</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#mimeTypes"><span class="hs-identifier hs-var">mimeTypes</span></a><span> </span><a href="#local-6989586621679092041"><span class="hs-identifier hs-var">p</span></a><span> </span><span class="hs-keyword">of</span><span>
</span><a name="line-76"></a><span> </span><a name="line-76"></a><span> </span><span class="hs-special">[</span><span class="hs-special">]</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-var">Nothing</span><span>
</span><a name="line-77"></a><span class="hs-comment">-- ** MimeType Instances</span><span> </span><a name="line-77"></a><span> </span><span class="hs-special">(</span><a name="local-6989586621679092042"><a href="#local-6989586621679092042"><span class="hs-identifier">x</span></a></a><span class="hs-glyph">:</span><span class="hs-identifier">_</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679092042"><span class="hs-identifier hs-var">x</span></a><span>
</span><a name="line-78"></a><span> </span><a name="line-78"></a><span>
</span><a name="line-79"></a><span class="hs-comment">-- | @application/json@</span><span> </span><a name="line-79"></a><span> </span><span class="hs-identifier">mimeType'</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="#local-6989586621679091890"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">ME</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">MediaType</span><span>
</span><a name="line-80"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="line-80"></a><span> </span><a name="local-8214565720323866766"><a href="SwaggerPetstore.MimeTypes.html#mimeType%27"><span class="hs-identifier">mimeType'</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#mimeType"><span class="hs-identifier hs-var">mimeType</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">Proxy</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Proxy</span><span> </span><a href="#local-6989586621679091890"><span class="hs-identifier hs-type">mtype</span></a><span class="hs-special">)</span><span>
</span><a name="line-81"></a><span> </span><a name="local-8214565720323854329"><a href="SwaggerPetstore.MimeTypes.html#mimeTypes"><span class="hs-identifier">mimeTypes</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a name="line-81"></a><span> </span><span class="hs-identifier">mimeTypes'</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="#local-6989586621679091890"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-special">[</span><span class="hs-identifier hs-type">ME</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">MediaType</span><span class="hs-special">]</span><span>
</span><a name="line-82"></a><span> </span><span class="hs-special">[</span><span> </span><span class="hs-string">&quot;application&quot;</span><span> </span><span class="hs-identifier hs-var">ME</span><span class="hs-operator hs-var">.//</span><span> </span><span class="hs-string">&quot;json&quot;</span><span> </span><span class="hs-identifier hs-var">ME</span><span class="hs-operator hs-var">./:</span><span> </span><span class="hs-special">(</span><span class="hs-string">&quot;charset&quot;</span><span class="hs-special">,</span><span> </span><span class="hs-string">&quot;utf-8&quot;</span><span class="hs-special">)</span><span> </span><a name="line-82"></a><span> </span><a name="local-8214565720323866767"><a href="SwaggerPetstore.MimeTypes.html#mimeTypes%27"><span class="hs-identifier">mimeTypes'</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#mimeTypes"><span class="hs-identifier hs-var">mimeTypes</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">Proxy</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Proxy</span><span> </span><a href="#local-6989586621679091890"><span class="hs-identifier hs-type">mtype</span></a><span class="hs-special">)</span><span>
</span><a name="line-83"></a><span> </span><span class="hs-special">,</span><span> </span><span class="hs-string">&quot;application&quot;</span><span> </span><span class="hs-identifier hs-var">ME</span><span class="hs-operator hs-var">.//</span><span> </span><span class="hs-string">&quot;json&quot;</span><span> </span><a name="line-83"></a><span>
</span><a name="line-84"></a><span> </span><span class="hs-special">]</span><span> </span><a name="line-84"></a><span class="hs-comment">-- ** MimeType Instances</span><span>
</span><a name="line-85"></a><span> </span><a name="line-85"></a><span>
</span><a name="line-86"></a><span class="hs-comment">-- | @application/xml@</span><span> </span><a name="line-86"></a><span class="hs-comment">-- | @application/json; charset=utf-8@</span><span>
</span><a name="line-87"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier hs-type">MimeXML</span></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="line-87"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span> </span><span class="hs-keyword">where</span><span>
</span><a name="line-88"></a><span> </span><a name="local-8214565720323854330"><a href="SwaggerPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-string">&quot;application&quot;</span><span> </span><span class="hs-identifier hs-var">ME</span><span class="hs-operator hs-var">.//</span><span> </span><span class="hs-string">&quot;xml&quot;</span><span> </span><a name="line-88"></a><span> </span><a name="local-8214565720323866765"><a href="SwaggerPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">fromString</span><span> </span><span class="hs-string">&quot;application/json&quot;</span><span>
</span><a name="line-89"></a><span> </span><a name="line-89"></a><span class="hs-comment">-- | @application/xml; charset=utf-8@</span><span>
</span><a name="line-90"></a><span class="hs-comment">-- | @application/x-www-form-urlencoded@</span><span> </span><a name="line-90"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier hs-type">MimeXML</span></a><span> </span><span class="hs-keyword">where</span><span>
</span><a name="line-91"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier hs-type">MimeFormUrlEncoded</span></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="line-91"></a><span> </span><a name="local-8214565720323866765"><a href="SwaggerPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">fromString</span><span> </span><span class="hs-string">&quot;application/xml&quot;</span><span>
</span><a name="line-92"></a><span> </span><a name="local-8214565720323854330"><a href="SwaggerPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-string">&quot;application&quot;</span><span> </span><span class="hs-identifier hs-var">ME</span><span class="hs-operator hs-var">.//</span><span> </span><span class="hs-string">&quot;x-www-form-urlencoded&quot;</span><span> </span><a name="line-92"></a><span class="hs-comment">-- | @application/x-www-form-urlencoded@</span><span>
</span><a name="line-93"></a><span> </span><a name="line-93"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier hs-type">MimeFormUrlEncoded</span></a><span> </span><span class="hs-keyword">where</span><span>
</span><a name="line-94"></a><span class="hs-comment">-- | @multipart/form-data@</span><span> </span><a name="line-94"></a><span> </span><a name="local-8214565720323866765"><a href="SwaggerPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">fromString</span><span> </span><span class="hs-string">&quot;application/x-www-form-urlencoded&quot;</span><span>
</span><a name="line-95"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="line-95"></a><span class="hs-comment">-- | @multipart/form-data@</span><span>
</span><a name="line-96"></a><span> </span><a name="local-8214565720323854330"><a href="SwaggerPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-string">&quot;multipart&quot;</span><span> </span><span class="hs-identifier hs-var">ME</span><span class="hs-operator hs-var">.//</span><span> </span><span class="hs-string">&quot;form-data&quot;</span><span> </span><a name="line-96"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><span class="hs-keyword">where</span><span>
</span><a name="line-97"></a><span> </span><a name="line-97"></a><span> </span><a name="local-8214565720323866765"><a href="SwaggerPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">fromString</span><span> </span><span class="hs-string">&quot;multipart/form-data&quot;</span><span>
</span><a name="line-98"></a><span class="hs-comment">-- | @text/plain; charset=utf-8@</span><span> </span><a name="line-98"></a><span class="hs-comment">-- | @text/plain; charset=utf-8@</span><span>
</span><a name="line-99"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="line-99"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a><span> </span><span class="hs-keyword">where</span><span>
</span><a name="line-100"></a><span> </span><a name="local-8214565720323854330"><a href="SwaggerPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-string">&quot;text&quot;</span><span> </span><span class="hs-identifier hs-var">ME</span><span class="hs-operator hs-var">.//</span><span> </span><span class="hs-string">&quot;plain&quot;</span><span> </span><span class="hs-identifier hs-var">ME</span><span class="hs-operator hs-var">./:</span><span> </span><span class="hs-special">(</span><span class="hs-string">&quot;charset&quot;</span><span class="hs-special">,</span><span> </span><span class="hs-string">&quot;utf-8&quot;</span><span class="hs-special">)</span><span> </span><a name="line-100"></a><span> </span><a name="local-8214565720323866765"><a href="SwaggerPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">fromString</span><span> </span><span class="hs-string">&quot;text/plain&quot;</span><span>
</span><a name="line-101"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="line-101"></a><span class="hs-comment">-- | @application/octet-stream@</span><span>
</span><a name="line-102"></a><span> </span><a name="local-8214565720323854330"><a href="SwaggerPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-string">&quot;application&quot;</span><span> </span><span class="hs-identifier hs-var">ME</span><span class="hs-operator hs-var">.//</span><span> </span><span class="hs-string">&quot;octet-stream&quot;</span><span> </span><a name="line-102"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a><span> </span><span class="hs-keyword">where</span><span>
</span><a name="line-103"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="line-103"></a><span> </span><a name="local-8214565720323866765"><a href="SwaggerPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">fromString</span><span> </span><span class="hs-string">&quot;application/octet-stream&quot;</span><span>
</span><a name="line-104"></a><span> </span><a name="local-8214565720323854330"><a href="SwaggerPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Nothing</span><span> </span><a name="line-104"></a><span class="hs-comment">-- | @&quot;*/*&quot;@</span><span>
</span><a name="line-105"></a><span> </span><a name="line-105"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeAny"><span class="hs-identifier hs-type">MimeAny</span></a><span> </span><span class="hs-keyword">where</span><span>
</span><a name="line-106"></a><span> </span><a name="line-106"></a><span> </span><a name="local-8214565720323866765"><a href="SwaggerPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">fromString</span><span> </span><span class="hs-string">&quot;*/*&quot;</span><span>
</span><a name="line-107"></a><span class="hs-comment">-- ** MimeRender Class</span><span> </span><a name="line-107"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span> </span><span class="hs-keyword">where</span><span>
</span><a name="line-108"></a><span> </span><a name="line-108"></a><span> </span><a name="local-8214565720323866765"><a href="SwaggerPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Nothing</span><span>
</span><a name="line-109"></a><span class="hs-keyword">class</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679079736"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=&gt;</span><span> </span><a name="MimeRender"><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier">MimeRender</span></a></a><span> </span><a name="local-6989586621679079736"><a href="#local-6989586621679079736"><span class="hs-identifier">mtype</span></a></a><span> </span><a name="local-6989586621679079737"><a href="#local-6989586621679079737"><span class="hs-identifier">x</span></a></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="line-109"></a><span>
</span><a name="line-110"></a><span> </span><span class="hs-identifier">mimeRender</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Proxy</span><span> </span><a href="#local-6989586621679079736"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="#local-6989586621679079737"><span class="hs-identifier hs-type">x</span></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-type">BL</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span> </span><a name="line-110"></a><span class="hs-comment">-- | @application/xml; charset=utf-8@</span><span>
</span><a name="line-111"></a><span> </span><span class="hs-identifier">mimeRender'</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="#local-6989586621679079736"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="#local-6989586621679079737"><span class="hs-identifier hs-type">x</span></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-type">BL</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span> </span><a name="line-111"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeXmlCharsetutf8"><span class="hs-identifier hs-type">MimeXmlCharsetutf8</span></a><span> </span><span class="hs-keyword">where</span><span>
</span><a name="line-112"></a><span> </span><a name="local-8214565720323854327"><a href="SwaggerPetstore.MimeTypes.html#mimeRender%27"><span class="hs-identifier">mimeRender'</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679079738"><a href="#local-6989586621679079738"><span class="hs-identifier">x</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier hs-var">mimeRender</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">Proxy</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Proxy</span><span> </span><a href="#local-6989586621679079736"><span class="hs-identifier hs-type">mtype</span></a><span class="hs-special">)</span><span> </span><a href="#local-6989586621679079738"><span class="hs-identifier hs-var">x</span></a><span> </span><a name="line-112"></a><span> </span><a name="local-8214565720323866765"><a href="SwaggerPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">fromString</span><span> </span><span class="hs-string">&quot;application/xml; charset=utf-8&quot;</span><span>
</span><a name="line-113"></a><span> </span><a name="line-113"></a><span>
</span><a name="line-114"></a><span> </span><a name="line-114"></a><span class="hs-comment">-- | @application/json; charset=utf-8@</span><span>
</span><a name="line-115"></a><span class="hs-comment">-- ** MimeRender Instances</span><span> </span><a name="line-115"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJsonCharsetutf8"><span class="hs-identifier hs-type">MimeJsonCharsetutf8</span></a><span> </span><span class="hs-keyword">where</span><span>
</span><a name="line-116"></a><span> </span><a name="line-116"></a><span> </span><a name="local-8214565720323866765"><a href="SwaggerPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">fromString</span><span> </span><span class="hs-string">&quot;application/json; charset=utf-8&quot;</span><span>
</span><a name="line-117"></a><span class="hs-comment">-- | `A.encode`</span><span> </span><a name="line-117"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">A</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ToJSON</span><span> </span><a href="#local-6989586621679092049"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=&gt;</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJsonCharsetutf8"><span class="hs-identifier hs-type">MimeJsonCharsetutf8</span></a><span> </span><a href="#local-6989586621679092049"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323866761"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">A</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">encode</span><span>
</span><a name="line-118"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">A</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ToJSON</span><span> </span><a href="#local-6989586621679079903"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=&gt;</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span> </span><a href="#local-6989586621679079903"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323854326"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">A</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">encode</span><span> </span><a name="line-118"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">A</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">FromJSON</span><span> </span><a href="#local-6989586621679092048"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=&gt;</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJsonCharsetutf8"><span class="hs-identifier hs-type">MimeJsonCharsetutf8</span></a><span> </span><a href="#local-6989586621679092048"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323866758"><a href="SwaggerPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">A</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">eitherDecode</span><span>
</span><a name="line-119"></a><span class="hs-comment">-- | @WH.urlEncodeAsForm@</span><span> </span><a name="line-119"></a><span>
</span><a name="line-120"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">WH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ToForm</span><span> </span><a href="#local-6989586621679079902"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=&gt;</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier hs-type">MimeFormUrlEncoded</span></a><span> </span><a href="#local-6989586621679079902"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323854326"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">WH</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">urlEncodeAsForm</span><span> </span><a name="line-120"></a><span>
</span><a name="line-121"></a><span> </span><a name="line-121"></a><span class="hs-comment">-- ** MimeRender Class</span><span>
</span><a name="line-122"></a><span class="hs-comment">-- | @P.id@</span><span> </span><a name="line-122"></a><span>
</span><a name="line-123"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a><span> </span><span class="hs-identifier hs-type">BL</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323854326"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">id</span><span> </span><a name="line-123"></a><span class="hs-keyword">class</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679091887"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=&gt;</span><span> </span><a name="MimeRender"><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier">MimeRender</span></a></a><span> </span><a name="local-6989586621679091887"><a href="#local-6989586621679091887"><span class="hs-identifier">mtype</span></a></a><span> </span><a name="local-6989586621679091888"><a href="#local-6989586621679091888"><span class="hs-identifier">x</span></a></a><span> </span><span class="hs-keyword">where</span><span>
</span><a name="line-124"></a><span class="hs-comment">-- | @BL.fromStrict . T.encodeUtf8@</span><span> </span><a name="line-124"></a><span> </span><span class="hs-identifier">mimeRender</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Proxy</span><span> </span><a href="#local-6989586621679091887"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="#local-6989586621679091888"><span class="hs-identifier hs-type">x</span></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-type">BL</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span>
</span><a name="line-125"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a><span> </span><span class="hs-identifier hs-type">T</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Text</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323854326"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">BL</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">fromStrict</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">T</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">encodeUtf8</span><span> </span><a name="line-125"></a><span> </span><span class="hs-identifier">mimeRender'</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="#local-6989586621679091887"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><a href="#local-6989586621679091888"><span class="hs-identifier hs-type">x</span></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-type">BL</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span>
</span><a name="line-126"></a><span class="hs-comment">-- | @BCL.pack@</span><span> </span><a name="line-126"></a><span> </span><a name="local-8214565720323866762"><a href="SwaggerPetstore.MimeTypes.html#mimeRender%27"><span class="hs-identifier">mimeRender'</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679091889"><a href="#local-6989586621679091889"><span class="hs-identifier">x</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier hs-var">mimeRender</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">Proxy</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Proxy</span><span> </span><a href="#local-6989586621679091887"><span class="hs-identifier hs-type">mtype</span></a><span class="hs-special">)</span><span> </span><a href="#local-6989586621679091889"><span class="hs-identifier hs-var">x</span></a><span>
</span><a name="line-127"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a><span> </span><span class="hs-identifier hs-type">String</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323854326"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">BCL</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">pack</span><span> </span><a name="line-127"></a><span>
</span><a name="line-128"></a><span> </span><a name="line-128"></a><span>
</span><a name="line-129"></a><span class="hs-comment">-- | @P.id@</span><span> </span><a name="line-129"></a><span class="hs-comment">-- ** MimeRender Instances</span><span>
</span><a name="line-130"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a><span> </span><span class="hs-identifier hs-type">BL</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323854326"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">id</span><span> </span><a name="line-130"></a><span>
</span><a name="line-131"></a><span class="hs-comment">-- | @BL.fromStrict . T.encodeUtf8@</span><span> </span><a name="line-131"></a><span class="hs-comment">-- | `A.encode`</span><span>
</span><a name="line-132"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a><span> </span><span class="hs-identifier hs-type">T</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Text</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323854326"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">BL</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">fromStrict</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">T</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">encodeUtf8</span><span> </span><a name="line-132"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">A</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ToJSON</span><span> </span><a href="#local-6989586621679092047"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=&gt;</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span> </span><a href="#local-6989586621679092047"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323866761"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">A</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">encode</span><span>
</span><a name="line-133"></a><span class="hs-comment">-- | @BCL.pack@</span><span> </span><a name="line-133"></a><span class="hs-comment">-- | @WH.urlEncodeAsForm@</span><span>
</span><a name="line-134"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a><span> </span><span class="hs-identifier hs-type">String</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323854326"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">BCL</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">pack</span><span> </span><a name="line-134"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">WH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ToForm</span><span> </span><a href="#local-6989586621679092046"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=&gt;</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier hs-type">MimeFormUrlEncoded</span></a><span> </span><a href="#local-6989586621679092046"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323866761"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">WH</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">urlEncodeAsForm</span><span>
</span><a name="line-135"></a><span> </span><a name="line-135"></a><span>
</span><a name="line-136"></a><span class="hs-comment">-- | @P.id@</span><span> </span><a name="line-136"></a><span class="hs-comment">-- | @P.id@</span><span>
</span><a name="line-137"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><span class="hs-identifier hs-type">BL</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323854326"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">id</span><span> </span><a name="line-137"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a><span> </span><span class="hs-identifier hs-type">BL</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323866761"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">id</span><span>
</span><a name="line-138"></a><span class="hs-comment">-- | @BL.fromStrict . T.encodeUtf8@</span><span> </span><a name="line-138"></a><span class="hs-comment">-- | @BL.fromStrict . T.encodeUtf8@</span><span>
</span><a name="line-139"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><span class="hs-identifier hs-type">T</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Text</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323854326"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">BL</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">fromStrict</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">T</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">encodeUtf8</span><span> </span><a name="line-139"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a><span> </span><span class="hs-identifier hs-type">T</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Text</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323866761"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">BL</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">fromStrict</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">T</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">encodeUtf8</span><span>
</span><a name="line-140"></a><span class="hs-comment">-- | @BCL.pack@</span><span> </span><a name="line-140"></a><span class="hs-comment">-- | @BCL.pack@</span><span>
</span><a name="line-141"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><span class="hs-identifier hs-type">String</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323854326"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">BCL</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">pack</span><span> </span><a name="line-141"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a><span> </span><span class="hs-identifier hs-type">String</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323866761"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">BCL</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">pack</span><span>
</span><a name="line-142"></a><span> </span><a name="line-142"></a><span>
</span><a name="line-143"></a><span class="hs-comment">-- | @P.Right . P.const NoContent@</span><span> </span><a name="line-143"></a><span class="hs-comment">-- | @P.id@</span><span>
</span><a name="line-144"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323854326"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">const</span><span> </span><span class="hs-identifier hs-var">BCL</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">empty</span><span> </span><a name="line-144"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a><span> </span><span class="hs-identifier hs-type">BL</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323866761"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">id</span><span>
</span><a name="line-145"></a><span> </span><a name="line-145"></a><span class="hs-comment">-- | @BL.fromStrict . T.encodeUtf8@</span><span>
</span><a name="line-146"></a><span class="hs-comment">-- instance MimeRender MimeOctetStream Double where mimeRender _ = BB.toLazyByteString . BB.doubleDec</span><span> </span><a name="line-146"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a><span> </span><span class="hs-identifier hs-type">T</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Text</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323866761"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">BL</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">fromStrict</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">T</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">encodeUtf8</span><span>
</span><a name="line-147"></a><span class="hs-comment">-- instance MimeRender MimeOctetStream Float where mimeRender _ = BB.toLazyByteString . BB.floatDec</span><span> </span><a name="line-147"></a><span class="hs-comment">-- | @BCL.pack@</span><span>
</span><a name="line-148"></a><span class="hs-comment">-- instance MimeRender MimeOctetStream Int where mimeRender _ = BB.toLazyByteString . BB.intDec</span><span> </span><a name="line-148"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a><span> </span><span class="hs-identifier hs-type">String</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323866761"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">BCL</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">pack</span><span>
</span><a name="line-149"></a><span class="hs-comment">-- instance MimeRender MimeOctetStream Integer where mimeRender _ = BB.toLazyByteString . BB.integerDec</span><span> </span><a name="line-149"></a><span>
</span><a name="line-150"></a><span> </span><a name="line-150"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><span class="hs-identifier hs-type">BL</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323866761"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">id</span><span>
</span><a name="line-151"></a><span> </span><a name="line-151"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><a href="SwaggerPetstore.Model.html#Binary"><span class="hs-identifier hs-type">Binary</span></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323866761"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier">unBinary</span><span>
</span><a name="line-152"></a><span class="hs-comment">-- ** MimeUnrender Class</span><span> </span><a name="line-152"></a><span>
</span><a name="line-153"></a><span> </span><a name="line-153"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><a href="SwaggerPetstore.Model.html#ByteArray"><span class="hs-identifier hs-type">ByteArray</span></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323866761"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a><span>
</span><a name="line-154"></a><span class="hs-keyword">class</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679079442"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=&gt;</span><span> </span><a name="MimeUnrender"><a href="SwaggerPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier">MimeUnrender</span></a></a><span> </span><a name="local-6989586621679079442"><a href="#local-6989586621679079442"><span class="hs-identifier">mtype</span></a></a><span> </span><a name="local-6989586621679079443"><a href="#local-6989586621679079443"><span class="hs-identifier">o</span></a></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="line-154"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><span class="hs-identifier hs-type">Bool</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323866761"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a><span>
</span><a name="line-155"></a><span> </span><span class="hs-identifier">mimeUnrender</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Proxy</span><span> </span><a href="#local-6989586621679079442"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-type">BL</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Either</span><span> </span><span class="hs-identifier hs-type">String</span><span> </span><a href="#local-6989586621679079443"><span class="hs-identifier hs-type">o</span></a><span> </span><a name="line-155"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><span class="hs-identifier hs-type">Char</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323866761"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a><span>
</span><a name="line-156"></a><span> </span><span class="hs-identifier">mimeUnrender'</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="#local-6989586621679079442"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-type">BL</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Either</span><span> </span><span class="hs-identifier hs-type">String</span><span> </span><a href="#local-6989586621679079443"><span class="hs-identifier hs-type">o</span></a><span> </span><a name="line-156"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><a href="SwaggerPetstore.Model.html#Date"><span class="hs-identifier hs-type">Date</span></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323866761"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a><span>
</span><a name="line-157"></a><span> </span><a name="local-8214565720323854324"><a href="SwaggerPetstore.MimeTypes.html#mimeUnrender%27"><span class="hs-identifier">mimeUnrender'</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679079735"><a href="#local-6989586621679079735"><span class="hs-identifier">x</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier hs-var">mimeUnrender</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">Proxy</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Proxy</span><span> </span><a href="#local-6989586621679079442"><span class="hs-identifier hs-type">mtype</span></a><span class="hs-special">)</span><span> </span><a href="#local-6989586621679079735"><span class="hs-identifier hs-var">x</span></a><span> </span><a name="line-157"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><a href="SwaggerPetstore.Model.html#DateTime"><span class="hs-identifier hs-type">DateTime</span></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323866761"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a><span>
</span><a name="line-158"></a><span> </span><a name="line-158"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><span class="hs-identifier hs-type">Double</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323866761"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a><span>
</span><a name="line-159"></a><span class="hs-comment">-- ** MimeUnrender Instances</span><span> </span><a name="line-159"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><span class="hs-identifier hs-type">Float</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323866761"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a><span>
</span><a name="line-160"></a><span> </span><a name="line-160"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><span class="hs-identifier hs-type">Int</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323866761"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a><span>
</span><a name="line-161"></a><span class="hs-comment">-- | @A.eitherDecode@</span><span> </span><a name="line-161"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><span class="hs-identifier hs-type">Integer</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323866761"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a><span>
</span><a name="line-162"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">A</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">FromJSON</span><span> </span><a href="#local-6989586621679079901"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=&gt;</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span> </span><a href="#local-6989586621679079901"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323854323"><a href="SwaggerPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">A</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">eitherDecode</span><span> </span><a name="line-162"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><span class="hs-identifier hs-type">String</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323866761"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a><span>
</span><a name="line-163"></a><span class="hs-comment">-- | @P.left T.unpack . WH.urlDecodeAsForm@</span><span> </span><a name="line-163"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><span class="hs-identifier hs-type">T</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Text</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323866761"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a><span>
</span><a name="line-164"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">WH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">FromForm</span><span> </span><a href="#local-6989586621679079900"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=&gt;</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier hs-type">MimeFormUrlEncoded</span></a><span> </span><a href="#local-6989586621679079900"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323854323"><a href="SwaggerPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">left</span><span> </span><span class="hs-identifier hs-var">T</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">unpack</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">WH</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">urlDecodeAsForm</span><span> </span><a name="line-164"></a><span>
</span><a name="line-165"></a><span class="hs-comment">-- | @P.Right . P.id@</span><span> </span><a name="line-165"></a><span class="hs-identifier">mimeRenderDefaultMultipartFormData</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">WH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ToHttpApiData</span><span> </span><a href="#local-6989586621679092043"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=&gt;</span><span> </span><a href="#local-6989586621679092043"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-type">BL</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span>
</span><a name="line-166"></a><span> </span><a name="line-166"></a><a name="mimeRenderDefaultMultipartFormData"><a href="SwaggerPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier">mimeRenderDefaultMultipartFormData</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">BL</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">fromStrict</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">T</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">encodeUtf8</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">WH</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">toQueryParam</span><span>
</span><a name="line-167"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a><span> </span><span class="hs-identifier hs-type">BL</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323854323"><a href="SwaggerPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">Right</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">id</span><span> </span><a name="line-167"></a><span>
</span><a name="line-168"></a><span class="hs-comment">-- | @P.left P.show . TL.decodeUtf8'@</span><span> </span><a name="line-168"></a><span class="hs-comment">-- | @P.Right . P.const NoContent@</span><span>
</span><a name="line-169"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a><span> </span><span class="hs-identifier hs-type">T</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Text</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323854323"><a href="SwaggerPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">left</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">show</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">T</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">decodeUtf8'</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">BL</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">toStrict</span><span> </span><a name="line-169"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323866761"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">const</span><span> </span><span class="hs-identifier hs-var">BCL</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">empty</span><span>
</span><a name="line-170"></a><span class="hs-comment">-- | @P.Right . BCL.unpack@</span><span> </span><a name="line-170"></a><span>
</span><a name="line-171"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a><span> </span><span class="hs-identifier hs-type">String</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323854323"><a href="SwaggerPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">Right</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">BCL</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">unpack</span><span> </span><a name="line-171"></a><span class="hs-comment">-- instance MimeRender MimeOctetStream Double where mimeRender _ = BB.toLazyByteString . BB.doubleDec</span><span>
</span><a name="line-172"></a><span> </span><a name="line-172"></a><span class="hs-comment">-- instance MimeRender MimeOctetStream Float where mimeRender _ = BB.toLazyByteString . BB.floatDec</span><span>
</span><a name="line-173"></a><span class="hs-comment">-- | @P.Right . P.id@</span><span> </span><a name="line-173"></a><span class="hs-comment">-- instance MimeRender MimeOctetStream Int where mimeRender _ = BB.toLazyByteString . BB.intDec</span><span>
</span><a name="line-174"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a><span> </span><span class="hs-identifier hs-type">BL</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323854323"><a href="SwaggerPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">Right</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">id</span><span> </span><a name="line-174"></a><span class="hs-comment">-- instance MimeRender MimeOctetStream Integer where mimeRender _ = BB.toLazyByteString . BB.integerDec</span><span>
</span><a name="line-175"></a><span class="hs-comment">-- | @P.left P.show . T.decodeUtf8' . BL.toStrict@</span><span> </span><a name="line-175"></a><span>
</span><a name="line-176"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a><span> </span><span class="hs-identifier hs-type">T</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Text</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323854323"><a href="SwaggerPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">left</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">show</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">T</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">decodeUtf8'</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">BL</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">toStrict</span><span> </span><a name="line-176"></a><span class="hs-comment">-- instance MimeRender MimeXmlCharsetutf8 T.Text where mimeRender _ = undefined</span><span>
</span><a name="line-177"></a><span class="hs-comment">-- | @P.Right . BCL.unpack@</span><span> </span><a name="line-177"></a><span class="hs-comment">-- instance MimeRender MimeJsonCharsetutf8 T.Text where mimeRender _ = undefined</span><span>
</span><a name="line-178"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a><span> </span><span class="hs-identifier hs-type">String</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323854323"><a href="SwaggerPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">Right</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">BCL</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">unpack</span><span> </span><a name="line-178"></a><span>
</span><a name="line-179"></a><span> </span><a name="line-179"></a><span class="hs-comment">-- ** MimeUnrender Class</span><span>
</span><a name="line-180"></a><span class="hs-comment">-- | @P.Right . P.const NoContent@</span><span> </span><a name="line-180"></a><span>
</span><a name="line-181"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323854323"><a href="SwaggerPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">Right</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">const</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-var">NoContent</span></a><span> </span><a name="line-181"></a><span class="hs-keyword">class</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679091884"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=&gt;</span><span> </span><a name="MimeUnrender"><a href="SwaggerPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier">MimeUnrender</span></a></a><span> </span><a name="local-6989586621679091884"><a href="#local-6989586621679091884"><span class="hs-identifier">mtype</span></a></a><span> </span><a name="local-6989586621679091885"><a href="#local-6989586621679091885"><span class="hs-identifier">o</span></a></a><span> </span><span class="hs-keyword">where</span><span>
</span><a name="line-182"></a><span> </span><a name="line-182"></a><span> </span><span class="hs-identifier">mimeUnrender</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Proxy</span><span> </span><a href="#local-6989586621679091884"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-type">BL</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Either</span><span> </span><span class="hs-identifier hs-type">String</span><span> </span><a href="#local-6989586621679091885"><span class="hs-identifier hs-type">o</span></a><span>
</span><a name="line-183"></a><span> </span><a name="line-183"></a><span> </span><span class="hs-identifier">mimeUnrender'</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="#local-6989586621679091884"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-type">BL</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span> </span><span class="hs-glyph">-&gt;</span><span> </span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Either</span><span> </span><span class="hs-identifier hs-type">String</span><span> </span><a href="#local-6989586621679091885"><span class="hs-identifier hs-type">o</span></a><span>
</span><a name="line-184"></a><span class="hs-comment">-- ** Request Consumes</span><span> </span><a name="line-184"></a><span> </span><a name="local-8214565720323866759"><a href="SwaggerPetstore.MimeTypes.html#mimeUnrender%27"><span class="hs-identifier">mimeUnrender'</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679091886"><a href="#local-6989586621679091886"><span class="hs-identifier">x</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier hs-var">mimeUnrender</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">Proxy</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Proxy</span><span> </span><a href="#local-6989586621679091884"><span class="hs-identifier hs-type">mtype</span></a><span class="hs-special">)</span><span> </span><a href="#local-6989586621679091886"><span class="hs-identifier hs-var">x</span></a><span>
</span><a name="line-185"></a><span> </span><a name="line-185"></a><span>
</span><a name="line-186"></a><span class="hs-keyword">class</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679079441"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=&gt;</span><span> </span><a name="Consumes"><a href="SwaggerPetstore.MimeTypes.html#Consumes"><span class="hs-identifier">Consumes</span></a></a><span> </span><a name="local-6989586621679079440"><a href="#local-6989586621679079440"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679079441"><a href="#local-6989586621679079441"><span class="hs-identifier">mtype</span></a></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="line-186"></a><span class="hs-comment">-- ** MimeUnrender Instances</span><span>
</span><a name="line-187"></a><span> </span><a name="line-187"></a><span>
</span><a name="line-188"></a><span class="hs-comment">-- ** Request Produces</span><span> </span><a name="line-188"></a><span class="hs-comment">-- | @A.eitherDecode@</span><span>
</span><a name="line-189"></a><span> </span><a name="line-189"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">A</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">FromJSON</span><span> </span><a href="#local-6989586621679092045"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=&gt;</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span> </span><a href="#local-6989586621679092045"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323866758"><a href="SwaggerPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">A</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">eitherDecode</span><span>
</span><a name="line-190"></a><span class="hs-keyword">class</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679079439"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=&gt;</span><span> </span><a name="Produces"><a href="SwaggerPetstore.MimeTypes.html#Produces"><span class="hs-identifier">Produces</span></a></a><span> </span><a name="local-6989586621679079438"><a href="#local-6989586621679079438"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679079439"><a href="#local-6989586621679079439"><span class="hs-identifier">mtype</span></a></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="line-190"></a><span class="hs-comment">-- | @P.left T.unpack . WH.urlDecodeAsForm@</span><span>
</span><a name="line-191"></a></pre></body></html> </span><a name="line-191"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">WH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">FromForm</span><span> </span><a href="#local-6989586621679092044"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=&gt;</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier hs-type">MimeFormUrlEncoded</span></a><span> </span><a href="#local-6989586621679092044"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323866758"><a href="SwaggerPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">left</span><span> </span><span class="hs-identifier hs-var">T</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">unpack</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">WH</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">urlDecodeAsForm</span><span>
</span><a name="line-192"></a><span class="hs-comment">-- | @P.Right . P.id@</span><span>
</span><a name="line-193"></a><span>
</span><a name="line-194"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a><span> </span><span class="hs-identifier hs-type">BL</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323866758"><a href="SwaggerPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">Right</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">id</span><span>
</span><a name="line-195"></a><span class="hs-comment">-- | @P.left P.show . TL.decodeUtf8'@</span><span>
</span><a name="line-196"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a><span> </span><span class="hs-identifier hs-type">T</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Text</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323866758"><a href="SwaggerPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">left</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">show</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">T</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">decodeUtf8'</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">BL</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">toStrict</span><span>
</span><a name="line-197"></a><span class="hs-comment">-- | @P.Right . BCL.unpack@</span><span>
</span><a name="line-198"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a><span> </span><span class="hs-identifier hs-type">String</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323866758"><a href="SwaggerPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">Right</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">BCL</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">unpack</span><span>
</span><a name="line-199"></a><span>
</span><a name="line-200"></a><span class="hs-comment">-- | @P.Right . P.id@</span><span>
</span><a name="line-201"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a><span> </span><span class="hs-identifier hs-type">BL</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323866758"><a href="SwaggerPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">Right</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">id</span><span>
</span><a name="line-202"></a><span class="hs-comment">-- | @P.left P.show . T.decodeUtf8' . BL.toStrict@</span><span>
</span><a name="line-203"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a><span> </span><span class="hs-identifier hs-type">T</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Text</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323866758"><a href="SwaggerPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">left</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">show</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">T</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">decodeUtf8'</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">BL</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">toStrict</span><span>
</span><a name="line-204"></a><span class="hs-comment">-- | @P.Right . BCL.unpack@</span><span>
</span><a name="line-205"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a><span> </span><span class="hs-identifier hs-type">String</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323866758"><a href="SwaggerPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">Right</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">BCL</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">unpack</span><span>
</span><a name="line-206"></a><span>
</span><a name="line-207"></a><span class="hs-comment">-- | @P.Right . P.const NoContent@</span><span>
</span><a name="line-208"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323866758"><a href="SwaggerPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">Right</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">const</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-var">NoContent</span></a><span>
</span><a name="line-209"></a><span>
</span><a name="line-210"></a><span class="hs-comment">-- instance MimeUnrender MimeXmlCharsetutf8 T.Text where mimeUnrender _ = undefined</span><span>
</span><a name="line-211"></a><span class="hs-comment">-- instance MimeUnrender MimeJsonCharsetutf8 T.Text where mimeUnrender _ = undefined</span><span>
</span><a name="line-212"></a><span>
</span><a name="line-213"></a><span class="hs-comment">-- ** Request Consumes</span><span>
</span><a name="line-214"></a><span>
</span><a name="line-215"></a><span class="hs-keyword">class</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679091883"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=&gt;</span><span> </span><a name="Consumes"><a href="SwaggerPetstore.MimeTypes.html#Consumes"><span class="hs-identifier">Consumes</span></a></a><span> </span><a name="local-6989586621679091882"><a href="#local-6989586621679091882"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679091883"><a href="#local-6989586621679091883"><span class="hs-identifier">mtype</span></a></a><span> </span><span class="hs-keyword">where</span><span>
</span><a name="line-216"></a><span>
</span><a name="line-217"></a><span class="hs-comment">-- ** Request Produces</span><span>
</span><a name="line-218"></a><span>
</span><a name="line-219"></a><span class="hs-keyword">class</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679091881"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=&gt;</span><span> </span><a name="Produces"><a href="SwaggerPetstore.MimeTypes.html#Produces"><span class="hs-identifier">Produces</span></a></a><span> </span><a name="local-6989586621679091880"><a href="#local-6989586621679091880"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679091881"><a href="#local-6989586621679091881"><span class="hs-identifier">mtype</span></a></a><span> </span><span class="hs-keyword">where</span><span>
</span><a name="line-220"></a></pre></body></html>

View File

@ -120,7 +120,7 @@ runPet mgr config = do
-- instance S.HasOptionalParam S.UpdatePetWithForm S.Status -- instance S.HasOptionalParam S.UpdatePetWithForm S.Status
-- -- Defined in SwaggerPetstore.API -- -- Defined in SwaggerPetstore.API
let updatePetWithFormRequest = S.updatePetWithForm S.MimeFormUrlEncoded pid let updatePetWithFormRequest = S.updatePetWithForm S.MimeFormUrlEncoded pid
`S.applyOptionalParam` S.Name "petName" `S.applyOptionalParam` S.Name2 "petName"
`S.applyOptionalParam` S.Status "pending" `S.applyOptionalParam` S.Status "pending"
_ <- S.dispatchLbs mgr config updatePetWithFormRequest S.MimeJSON _ <- S.dispatchLbs mgr config updatePetWithFormRequest S.MimeJSON
@ -133,7 +133,7 @@ runPet mgr config = do
-- deletePet -- deletePet
let deletePetRequest = S.deletePet pid let deletePetRequest = S.deletePet pid
`S.applyOptionalParam` S.ApiUnderscorekey "api key" `S.applyOptionalParam` S.ApiKey "api key"
_ <- S.dispatchLbs mgr config deletePetRequest S.MimeJSON _ <- S.dispatchLbs mgr config deletePetRequest S.MimeJSON
return () return ()
@ -161,7 +161,7 @@ runStore mgr config = do
-- placeOrder -- placeOrder
now <- TI.getCurrentTime now <- TI.getCurrentTime
let placeOrderRequest = S.placeOrder S.MimeJSON (S.mkOrder { S.orderId = Just 21, S.orderQuantity = Just 210, S.orderShipDate = Just now}) let placeOrderRequest = S.placeOrder S.MimeJSON (S.mkOrder { S.orderId = Just 21, S.orderQuantity = Just 210, S.orderShipDate = Just (S.DateTime now)})
placeOrderResult <- S.dispatchMime mgr config placeOrderRequest S.MimeJSON placeOrderResult <- S.dispatchMime mgr config placeOrderRequest S.MimeJSON
mapM_ (\r -> putStrLn $ "placeOrderResult: " <> show r) placeOrderResult mapM_ (\r -> putStrLn $ "placeOrderResult: " <> show r) placeOrderResult

View File

@ -22,14 +22,11 @@ import SwaggerPetstore.MimeTypes
import SwaggerPetstore.Lens import SwaggerPetstore.Lens
import qualified Data.Aeson as A import qualified Data.Aeson as A
import Data.Aeson (Value)
import qualified Data.Time as TI import qualified Data.Time as TI
import Data.Time (UTCTime)
import qualified Data.ByteString as B import qualified Data.ByteString as B
import qualified Data.ByteString.Lazy as BL import qualified Data.ByteString.Lazy as BL
import Data.ByteString.Lazy (ByteString)
import qualified Data.ByteString.Builder as BB import qualified Data.ByteString.Builder as BB
import qualified Data.ByteString.Char8 as BC import qualified Data.ByteString.Char8 as BC
import qualified Data.ByteString.Lazy.Char8 as BCL import qualified Data.ByteString.Lazy.Char8 as BCL
@ -45,6 +42,7 @@ import qualified Data.CaseInsensitive as CI
import qualified Data.Data as P (Typeable) import qualified Data.Data as P (Typeable)
import qualified Data.Foldable as P import qualified Data.Foldable as P
import qualified Data.Map as Map import qualified Data.Map as Map
import qualified Data.Set as Set
import qualified Data.Maybe as P import qualified Data.Maybe as P
import qualified Data.Proxy as P (Proxy(..)) import qualified Data.Proxy as P (Proxy(..))
import qualified Data.Text as T import qualified Data.Text as T
@ -58,7 +56,6 @@ import qualified Lens.Micro as L
import Data.Monoid ((<>)) import Data.Monoid ((<>))
import Data.Function ((&)) import Data.Function ((&))
import Data.Set (Set)
import Data.Text (Text) import Data.Text (Text)
import GHC.Base ((<|>)) import GHC.Base ((<|>))
@ -68,6 +65,352 @@ import qualified Prelude as P
-- * Operations -- * Operations
-- ** AnotherFake
-- *** testSpecialTags
-- | @PATCH \/another-fake\/dummy@
--
-- To test special tags
--
-- To test special tags
--
testSpecialTags
:: (Consumes TestSpecialTags contentType, MimeRender contentType Client)
=> contentType -- ^ request content-type ('MimeType')
-> Client -- ^ "body" - client model
-> SwaggerPetstoreRequest TestSpecialTags contentType Client
testSpecialTags _ body =
_mkRequest "PATCH" ["/another-fake/dummy"]
`setBodyParam` body
data TestSpecialTags
-- | /Body Param/ "body" - client model
instance HasBodyParam TestSpecialTags Client
-- | @application/json@
instance Consumes TestSpecialTags MimeJSON
-- | @application/json@
instance Produces TestSpecialTags MimeJSON
-- ** Fake
-- *** fakeOuterBooleanSerialize
-- | @POST \/fake\/outer\/boolean@
--
-- Test serialization of outer boolean types
--
fakeOuterBooleanSerialize
:: (Consumes FakeOuterBooleanSerialize contentType)
=> contentType -- ^ request content-type ('MimeType')
-> SwaggerPetstoreRequest FakeOuterBooleanSerialize contentType OuterBoolean
fakeOuterBooleanSerialize _ =
_mkRequest "POST" ["/fake/outer/boolean"]
data FakeOuterBooleanSerialize
-- | /Body Param/ "body" - Input boolean as post body
instance HasBodyParam FakeOuterBooleanSerialize OuterBoolean
-- *** fakeOuterCompositeSerialize
-- | @POST \/fake\/outer\/composite@
--
-- Test serialization of object with outer number type
--
fakeOuterCompositeSerialize
:: (Consumes FakeOuterCompositeSerialize contentType)
=> contentType -- ^ request content-type ('MimeType')
-> SwaggerPetstoreRequest FakeOuterCompositeSerialize contentType OuterComposite
fakeOuterCompositeSerialize _ =
_mkRequest "POST" ["/fake/outer/composite"]
data FakeOuterCompositeSerialize
-- | /Body Param/ "body" - Input composite as post body
instance HasBodyParam FakeOuterCompositeSerialize OuterComposite
-- *** fakeOuterNumberSerialize
-- | @POST \/fake\/outer\/number@
--
-- Test serialization of outer number types
--
fakeOuterNumberSerialize
:: (Consumes FakeOuterNumberSerialize contentType)
=> contentType -- ^ request content-type ('MimeType')
-> SwaggerPetstoreRequest FakeOuterNumberSerialize contentType OuterNumber
fakeOuterNumberSerialize _ =
_mkRequest "POST" ["/fake/outer/number"]
data FakeOuterNumberSerialize
-- | /Body Param/ "body" - Input number as post body
instance HasBodyParam FakeOuterNumberSerialize OuterNumber
-- *** fakeOuterStringSerialize
-- | @POST \/fake\/outer\/string@
--
-- Test serialization of outer string types
--
fakeOuterStringSerialize
:: (Consumes FakeOuterStringSerialize contentType)
=> contentType -- ^ request content-type ('MimeType')
-> SwaggerPetstoreRequest FakeOuterStringSerialize contentType OuterString
fakeOuterStringSerialize _ =
_mkRequest "POST" ["/fake/outer/string"]
data FakeOuterStringSerialize
-- | /Body Param/ "body" - Input string as post body
instance HasBodyParam FakeOuterStringSerialize OuterString
-- *** testClientModel
-- | @PATCH \/fake@
--
-- To test \"client\" model
--
-- To test \"client\" model
--
testClientModel
:: (Consumes TestClientModel contentType, MimeRender contentType Client)
=> contentType -- ^ request content-type ('MimeType')
-> Client -- ^ "body" - client model
-> SwaggerPetstoreRequest TestClientModel contentType Client
testClientModel _ body =
_mkRequest "PATCH" ["/fake"]
`setBodyParam` body
data TestClientModel
-- | /Body Param/ "body" - client model
instance HasBodyParam TestClientModel Client
-- | @application/json@
instance Consumes TestClientModel MimeJSON
-- | @application/json@
instance Produces TestClientModel MimeJSON
-- *** testEndpointParameters
-- | @POST \/fake@
--
-- Fake endpoint for testing various parameters 假端點 偽のエンドポイント 가짜 엔드 포인트
--
-- Fake endpoint for testing various parameters 假端點 偽のエンドポイント 가짜 엔드 포인트
--
-- AuthMethod: http_basic_test
--
-- Note: Has 'Produces' instances, but no response schema
--
testEndpointParameters
:: (Consumes TestEndpointParameters contentType)
=> contentType -- ^ request content-type ('MimeType')
-> Double -- ^ "number" - None
-> Double -- ^ "double" - None
-> Text -- ^ "patternWithoutDelimiter" - None
-> ByteArray -- ^ "byte" - None
-> SwaggerPetstoreRequest TestEndpointParameters contentType res
testEndpointParameters _ number double patternWithoutDelimiter byte =
_mkRequest "POST" ["/fake"]
`_addForm` toForm ("number", number)
`_addForm` toForm ("double", double)
`_addForm` toForm ("pattern_without_delimiter", patternWithoutDelimiter)
`_addForm` toForm ("byte", byte)
data TestEndpointParameters
-- | /Optional Param/ "integer" - None
instance HasOptionalParam TestEndpointParameters ParamInteger where
applyOptionalParam req (ParamInteger xs) =
req `_addForm` toForm ("integer", xs)
-- | /Optional Param/ "int32" - None
instance HasOptionalParam TestEndpointParameters Int32 where
applyOptionalParam req (Int32 xs) =
req `_addForm` toForm ("int32", xs)
-- | /Optional Param/ "int64" - None
instance HasOptionalParam TestEndpointParameters Int64 where
applyOptionalParam req (Int64 xs) =
req `_addForm` toForm ("int64", xs)
-- | /Optional Param/ "float" - None
instance HasOptionalParam TestEndpointParameters ParamFloat where
applyOptionalParam req (ParamFloat xs) =
req `_addForm` toForm ("float", xs)
-- | /Optional Param/ "string" - None
instance HasOptionalParam TestEndpointParameters ParamString where
applyOptionalParam req (ParamString xs) =
req `_addForm` toForm ("string", xs)
-- | /Optional Param/ "binary" - None
instance HasOptionalParam TestEndpointParameters ParamBinary where
applyOptionalParam req (ParamBinary xs) =
req `_addForm` toForm ("binary", xs)
-- | /Optional Param/ "date" - None
instance HasOptionalParam TestEndpointParameters ParamDate where
applyOptionalParam req (ParamDate xs) =
req `_addForm` toForm ("date", xs)
-- | /Optional Param/ "dateTime" - None
instance HasOptionalParam TestEndpointParameters ParamDateTime where
applyOptionalParam req (ParamDateTime xs) =
req `_addForm` toForm ("dateTime", xs)
-- | /Optional Param/ "password" - None
instance HasOptionalParam TestEndpointParameters Password where
applyOptionalParam req (Password xs) =
req `_addForm` toForm ("password", xs)
-- | /Optional Param/ "callback" - None
instance HasOptionalParam TestEndpointParameters Callback where
applyOptionalParam req (Callback xs) =
req `_addForm` toForm ("callback", xs)
-- | @application/xml; charset=utf-8@
instance Consumes TestEndpointParameters MimeXmlCharsetutf8
-- | @application/json; charset=utf-8@
instance Consumes TestEndpointParameters MimeJsonCharsetutf8
-- | @application/xml; charset=utf-8@
instance Produces TestEndpointParameters MimeXmlCharsetutf8
-- | @application/json; charset=utf-8@
instance Produces TestEndpointParameters MimeJsonCharsetutf8
-- *** testEnumParameters
-- | @GET \/fake@
--
-- To test enum parameters
--
-- To test enum parameters
--
-- Note: Has 'Produces' instances, but no response schema
--
testEnumParameters
:: (Consumes TestEnumParameters contentType)
=> contentType -- ^ request content-type ('MimeType')
-> SwaggerPetstoreRequest TestEnumParameters contentType res
testEnumParameters _ =
_mkRequest "GET" ["/fake"]
data TestEnumParameters
-- | /Optional Param/ "enum_form_string_array" - Form parameter enum test (string array)
instance HasOptionalParam TestEnumParameters EnumFormStringArray where
applyOptionalParam req (EnumFormStringArray xs) =
req `_addForm` toFormColl CommaSeparated ("enum_form_string_array", xs)
-- | /Optional Param/ "enum_form_string" - Form parameter enum test (string)
instance HasOptionalParam TestEnumParameters EnumFormString where
applyOptionalParam req (EnumFormString xs) =
req `_addForm` toForm ("enum_form_string", xs)
-- | /Optional Param/ "enum_header_string_array" - Header parameter enum test (string array)
instance HasOptionalParam TestEnumParameters EnumHeaderStringArray where
applyOptionalParam req (EnumHeaderStringArray xs) =
req `setHeader` toHeaderColl CommaSeparated ("enum_header_string_array", xs)
-- | /Optional Param/ "enum_header_string" - Header parameter enum test (string)
instance HasOptionalParam TestEnumParameters EnumHeaderString where
applyOptionalParam req (EnumHeaderString xs) =
req `setHeader` toHeader ("enum_header_string", xs)
-- | /Optional Param/ "enum_query_string_array" - Query parameter enum test (string array)
instance HasOptionalParam TestEnumParameters EnumQueryStringArray where
applyOptionalParam req (EnumQueryStringArray xs) =
req `_setQuery` toQueryColl CommaSeparated ("enum_query_string_array", Just xs)
-- | /Optional Param/ "enum_query_string" - Query parameter enum test (string)
instance HasOptionalParam TestEnumParameters EnumQueryString where
applyOptionalParam req (EnumQueryString xs) =
req `_setQuery` toQuery ("enum_query_string", Just xs)
-- | /Optional Param/ "enum_query_integer" - Query parameter enum test (double)
instance HasOptionalParam TestEnumParameters EnumQueryInteger where
applyOptionalParam req (EnumQueryInteger xs) =
req `_setQuery` toQuery ("enum_query_integer", Just xs)
-- | /Optional Param/ "enum_query_double" - Query parameter enum test (double)
instance HasOptionalParam TestEnumParameters EnumQueryDouble where
applyOptionalParam req (EnumQueryDouble xs) =
req `_addForm` toForm ("enum_query_double", xs)
-- | @*/*@
instance Consumes TestEnumParameters MimeAny
-- | @*/*@
instance Produces TestEnumParameters MimeAny
-- *** testJsonFormData
-- | @GET \/fake\/jsonFormData@
--
-- test json serialization of form data
--
--
--
testJsonFormData
:: (Consumes TestJsonFormData contentType)
=> contentType -- ^ request content-type ('MimeType')
-> Text -- ^ "param" - field1
-> Text -- ^ "param2" - field2
-> SwaggerPetstoreRequest TestJsonFormData contentType NoContent
testJsonFormData _ param param2 =
_mkRequest "GET" ["/fake/jsonFormData"]
`_addForm` toForm ("param", param)
`_addForm` toForm ("param2", param2)
data TestJsonFormData
-- | @application/json@
instance Consumes TestJsonFormData MimeJSON
-- ** FakeClassnameTags123
-- *** testClassname
-- | @PATCH \/fake_classname_test@
--
-- To test class name in snake case
--
-- AuthMethod: api_key_query
--
testClassname
:: (Consumes TestClassname contentType, MimeRender contentType Client)
=> contentType -- ^ request content-type ('MimeType')
-> Client -- ^ "body" - client model
-> SwaggerPetstoreRequest TestClassname contentType Client
testClassname _ body =
_mkRequest "PATCH" ["/fake_classname_test"]
`setBodyParam` body
data TestClassname
-- | /Body Param/ "body" - client model
instance HasBodyParam TestClassname Client
-- | @application/json@
instance Consumes TestClassname MimeJSON
-- | @application/json@
instance Produces TestClassname MimeJSON
-- ** Pet -- ** Pet
-- *** addPet -- *** addPet
@ -127,8 +470,8 @@ deletePet petId =
data DeletePet data DeletePet
instance HasOptionalParam DeletePet ApiUnderscorekey where instance HasOptionalParam DeletePet ApiKey where
applyOptionalParam req (ApiUnderscorekey xs) = applyOptionalParam req (ApiKey xs) =
req `setHeader` toHeader ("api_key", xs) req `setHeader` toHeader ("api_key", xs)
-- | @application/xml@ -- | @application/xml@
instance Produces DeletePet MimeXML instance Produces DeletePet MimeXML
@ -271,8 +614,8 @@ updatePetWithForm _ petId =
data UpdatePetWithForm data UpdatePetWithForm
-- | /Optional Param/ "name" - Updated name of the pet -- | /Optional Param/ "name" - Updated name of the pet
instance HasOptionalParam UpdatePetWithForm Name where instance HasOptionalParam UpdatePetWithForm Name2 where
applyOptionalParam req (Name xs) = applyOptionalParam req (Name2 xs) =
req `_addForm` toForm ("name", xs) req `_addForm` toForm ("name", xs)
-- | /Optional Param/ "status" - Updated status of the pet -- | /Optional Param/ "status" - Updated status of the pet
@ -331,7 +674,7 @@ instance Produces UploadFile MimeJSON
-- *** deleteOrder -- *** deleteOrder
-- | @DELETE \/store\/order\/{orderId}@ -- | @DELETE \/store\/order\/{order_id}@
-- --
-- Delete purchase order by ID -- Delete purchase order by ID
-- --
@ -364,7 +707,7 @@ instance Produces DeleteOrder MimeJSON
-- AuthMethod: api_key -- AuthMethod: api_key
-- --
getInventory getInventory
:: SwaggerPetstoreRequest GetInventory MimeNoContent (Map.Map String Int) :: SwaggerPetstoreRequest GetInventory MimeNoContent ((Map.Map String Int))
getInventory = getInventory =
_mkRequest "GET" ["/store/inventory"] _mkRequest "GET" ["/store/inventory"]
@ -375,7 +718,7 @@ instance Produces GetInventory MimeJSON
-- *** getOrderById -- *** getOrderById
-- | @GET \/store\/order\/{orderId}@ -- | @GET \/store\/order\/{order_id}@
-- --
-- Find purchase order by ID -- Find purchase order by ID
-- --
@ -664,9 +1007,53 @@ infixl 2 -&-
-- * Optional Request Parameter Types -- * Optional Request Parameter Types
newtype ApiUnderscorekey = ApiUnderscorekey { unApiUnderscorekey :: Text } deriving (P.Eq, P.Show) newtype BodyOuterBoolean = BodyOuterBoolean { unBodyOuterBoolean :: OuterBoolean } deriving (P.Eq, P.Show)
newtype Name = Name { unName :: Text } deriving (P.Eq, P.Show) newtype BodyOuterComposite = BodyOuterComposite { unBodyOuterComposite :: OuterComposite } deriving (P.Eq, P.Show)
newtype Body = Body { unBody :: OuterNumber } deriving (P.Eq, P.Show)
newtype BodyOuterString = BodyOuterString { unBodyOuterString :: OuterString } deriving (P.Eq, P.Show)
newtype ParamInteger = ParamInteger { unParamInteger :: Int } deriving (P.Eq, P.Show)
newtype Int32 = Int32 { unInt32 :: Int } deriving (P.Eq, P.Show)
newtype Int64 = Int64 { unInt64 :: Integer } deriving (P.Eq, P.Show)
newtype ParamFloat = ParamFloat { unParamFloat :: Float } deriving (P.Eq, P.Show)
newtype ParamString = ParamString { unParamString :: Text } deriving (P.Eq, P.Show)
newtype ParamBinary = ParamBinary { unParamBinary :: Binary } deriving (P.Eq, P.Show)
newtype ParamDate = ParamDate { unParamDate :: Date } deriving (P.Eq, P.Show)
newtype ParamDateTime = ParamDateTime { unParamDateTime :: DateTime } deriving (P.Eq, P.Show)
newtype Password = Password { unPassword :: Text } deriving (P.Eq, P.Show)
newtype Callback = Callback { unCallback :: Text } deriving (P.Eq, P.Show)
newtype EnumFormStringArray = EnumFormStringArray { unEnumFormStringArray :: [Text] } deriving (P.Eq, P.Show)
newtype EnumFormString = EnumFormString { unEnumFormString :: Text } deriving (P.Eq, P.Show)
newtype EnumHeaderStringArray = EnumHeaderStringArray { unEnumHeaderStringArray :: [Text] } deriving (P.Eq, P.Show)
newtype EnumHeaderString = EnumHeaderString { unEnumHeaderString :: Text } deriving (P.Eq, P.Show)
newtype EnumQueryStringArray = EnumQueryStringArray { unEnumQueryStringArray :: [Text] } deriving (P.Eq, P.Show)
newtype EnumQueryString = EnumQueryString { unEnumQueryString :: Text } deriving (P.Eq, P.Show)
newtype EnumQueryInteger = EnumQueryInteger { unEnumQueryInteger :: Int } deriving (P.Eq, P.Show)
newtype EnumQueryDouble = EnumQueryDouble { unEnumQueryDouble :: Double } deriving (P.Eq, P.Show)
newtype ApiKey = ApiKey { unApiKey :: Text } deriving (P.Eq, P.Show)
newtype Name2 = Name2 { unName2 :: Text } deriving (P.Eq, P.Show)
newtype Status = Status { unStatus :: Text } deriving (P.Eq, P.Show) newtype Status = Status { unStatus :: Text } deriving (P.Eq, P.Show)

View File

@ -72,7 +72,7 @@ instance Show SwaggerPetstoreConfig where
-- --
-- configHost: -- configHost:
-- --
-- @http://petstore.swagger.io/v2@ -- @http://petstore.swagger.io:80/v2@
-- --
-- configUserAgent: -- configUserAgent:
-- --
@ -82,7 +82,7 @@ newConfig :: IO SwaggerPetstoreConfig
newConfig = do newConfig = do
logCxt <- initLogContext logCxt <- initLogContext
return $ SwaggerPetstoreConfig return $ SwaggerPetstoreConfig
{ configHost = "http://petstore.swagger.io/v2" { configHost = "http://petstore.swagger.io:80/v2"
, configUserAgent = "swagger-haskell-http-client/1.0.0" , configUserAgent = "swagger-haskell-http-client/1.0.0"
, configLogExecWithContext = runDefaultLogExecWithContext , configLogExecWithContext = runDefaultLogExecWithContext
, configLogContext = logCxt , configLogContext = logCxt

View File

@ -10,17 +10,14 @@ Module : SwaggerPetstore.Lens
module SwaggerPetstore.Lens where module SwaggerPetstore.Lens where
import Data.Text (Text)
import qualified Data.Aeson as A import qualified Data.Aeson as A
import Data.Aeson (Value) import qualified Data.ByteString.Lazy as BL
import qualified Data.ByteString as B
import Data.ByteString.Lazy (ByteString)
import qualified Data.Data as P (Data, Typeable) import qualified Data.Data as P (Data, Typeable)
import qualified Data.Map as Map import qualified Data.Map as Map
import qualified Data.Set as Set
import qualified Data.Time as TI import qualified Data.Time as TI
import Data.Time (UTCTime)
import Data.Text (Text)
import Prelude (($), (.),(<$>),(<*>),(=<<),Maybe(..),Bool(..),Char,Double,FilePath,Float,Int,Integer,String,fmap,undefined,mempty,maybe,pure,Monad,Applicative,Functor) import Prelude (($), (.),(<$>),(<*>),(=<<),Maybe(..),Bool(..),Char,Double,FilePath,Float,Int,Integer,String,fmap,undefined,mempty,maybe,pure,Monad,Applicative,Functor)
import qualified Prelude as P import qualified Prelude as P
@ -33,6 +30,38 @@ type Lens_' s a = Lens_ s s a a
type Lens_ s t a b = forall (f :: * -> *). Functor f => (a -> f b) -> s -> f t type Lens_ s t a b = forall (f :: * -> *). Functor f => (a -> f b) -> s -> f t
-- * AdditionalPropertiesClass
-- | 'additionalPropertiesClassMapProperty' Lens
additionalPropertiesClassMapPropertyL :: Lens_' AdditionalPropertiesClass (Maybe (Map.Map String Text))
additionalPropertiesClassMapPropertyL f AdditionalPropertiesClass{..} = (\additionalPropertiesClassMapProperty -> AdditionalPropertiesClass { additionalPropertiesClassMapProperty, ..} ) <$> f additionalPropertiesClassMapProperty
{-# INLINE additionalPropertiesClassMapPropertyL #-}
-- | 'additionalPropertiesClassMapOfMapProperty' Lens
additionalPropertiesClassMapOfMapPropertyL :: Lens_' AdditionalPropertiesClass (Maybe (Map.Map String (Map.Map String Text)))
additionalPropertiesClassMapOfMapPropertyL f AdditionalPropertiesClass{..} = (\additionalPropertiesClassMapOfMapProperty -> AdditionalPropertiesClass { additionalPropertiesClassMapOfMapProperty, ..} ) <$> f additionalPropertiesClassMapOfMapProperty
{-# INLINE additionalPropertiesClassMapOfMapPropertyL #-}
-- * Animal
-- | 'animalClassName' Lens
animalClassNameL :: Lens_' Animal (Text)
animalClassNameL f Animal{..} = (\animalClassName -> Animal { animalClassName, ..} ) <$> f animalClassName
{-# INLINE animalClassNameL #-}
-- | 'animalColor' Lens
animalColorL :: Lens_' Animal (Maybe Text)
animalColorL f Animal{..} = (\animalColor -> Animal { animalColor, ..} ) <$> f animalColor
{-# INLINE animalColorL #-}
-- * AnimalFarm
-- * ApiResponse -- * ApiResponse
-- | 'apiResponseCode' Lens -- | 'apiResponseCode' Lens
@ -52,6 +81,77 @@ apiResponseMessageL f ApiResponse{..} = (\apiResponseMessage -> ApiResponse { ap
-- * ArrayOfArrayOfNumberOnly
-- | 'arrayOfArrayOfNumberOnlyArrayArrayNumber' Lens
arrayOfArrayOfNumberOnlyArrayArrayNumberL :: Lens_' ArrayOfArrayOfNumberOnly (Maybe [[Double]])
arrayOfArrayOfNumberOnlyArrayArrayNumberL f ArrayOfArrayOfNumberOnly{..} = (\arrayOfArrayOfNumberOnlyArrayArrayNumber -> ArrayOfArrayOfNumberOnly { arrayOfArrayOfNumberOnlyArrayArrayNumber, ..} ) <$> f arrayOfArrayOfNumberOnlyArrayArrayNumber
{-# INLINE arrayOfArrayOfNumberOnlyArrayArrayNumberL #-}
-- * ArrayOfNumberOnly
-- | 'arrayOfNumberOnlyArrayNumber' Lens
arrayOfNumberOnlyArrayNumberL :: Lens_' ArrayOfNumberOnly (Maybe [Double])
arrayOfNumberOnlyArrayNumberL f ArrayOfNumberOnly{..} = (\arrayOfNumberOnlyArrayNumber -> ArrayOfNumberOnly { arrayOfNumberOnlyArrayNumber, ..} ) <$> f arrayOfNumberOnlyArrayNumber
{-# INLINE arrayOfNumberOnlyArrayNumberL #-}
-- * ArrayTest
-- | 'arrayTestArrayOfString' Lens
arrayTestArrayOfStringL :: Lens_' ArrayTest (Maybe [Text])
arrayTestArrayOfStringL f ArrayTest{..} = (\arrayTestArrayOfString -> ArrayTest { arrayTestArrayOfString, ..} ) <$> f arrayTestArrayOfString
{-# INLINE arrayTestArrayOfStringL #-}
-- | 'arrayTestArrayArrayOfInteger' Lens
arrayTestArrayArrayOfIntegerL :: Lens_' ArrayTest (Maybe [[Integer]])
arrayTestArrayArrayOfIntegerL f ArrayTest{..} = (\arrayTestArrayArrayOfInteger -> ArrayTest { arrayTestArrayArrayOfInteger, ..} ) <$> f arrayTestArrayArrayOfInteger
{-# INLINE arrayTestArrayArrayOfIntegerL #-}
-- | 'arrayTestArrayArrayOfModel' Lens
arrayTestArrayArrayOfModelL :: Lens_' ArrayTest (Maybe [[ReadOnlyFirst]])
arrayTestArrayArrayOfModelL f ArrayTest{..} = (\arrayTestArrayArrayOfModel -> ArrayTest { arrayTestArrayArrayOfModel, ..} ) <$> f arrayTestArrayArrayOfModel
{-# INLINE arrayTestArrayArrayOfModelL #-}
-- * Capitalization
-- | 'capitalizationSmallCamel' Lens
capitalizationSmallCamelL :: Lens_' Capitalization (Maybe Text)
capitalizationSmallCamelL f Capitalization{..} = (\capitalizationSmallCamel -> Capitalization { capitalizationSmallCamel, ..} ) <$> f capitalizationSmallCamel
{-# INLINE capitalizationSmallCamelL #-}
-- | 'capitalizationCapitalCamel' Lens
capitalizationCapitalCamelL :: Lens_' Capitalization (Maybe Text)
capitalizationCapitalCamelL f Capitalization{..} = (\capitalizationCapitalCamel -> Capitalization { capitalizationCapitalCamel, ..} ) <$> f capitalizationCapitalCamel
{-# INLINE capitalizationCapitalCamelL #-}
-- | 'capitalizationSmallSnake' Lens
capitalizationSmallSnakeL :: Lens_' Capitalization (Maybe Text)
capitalizationSmallSnakeL f Capitalization{..} = (\capitalizationSmallSnake -> Capitalization { capitalizationSmallSnake, ..} ) <$> f capitalizationSmallSnake
{-# INLINE capitalizationSmallSnakeL #-}
-- | 'capitalizationCapitalSnake' Lens
capitalizationCapitalSnakeL :: Lens_' Capitalization (Maybe Text)
capitalizationCapitalSnakeL f Capitalization{..} = (\capitalizationCapitalSnake -> Capitalization { capitalizationCapitalSnake, ..} ) <$> f capitalizationCapitalSnake
{-# INLINE capitalizationCapitalSnakeL #-}
-- | 'capitalizationScaEthFlowPoints' Lens
capitalizationScaEthFlowPointsL :: Lens_' Capitalization (Maybe Text)
capitalizationScaEthFlowPointsL f Capitalization{..} = (\capitalizationScaEthFlowPoints -> Capitalization { capitalizationScaEthFlowPoints, ..} ) <$> f capitalizationScaEthFlowPoints
{-# INLINE capitalizationScaEthFlowPointsL #-}
-- | 'capitalizationAttName' Lens
capitalizationAttNameL :: Lens_' Capitalization (Maybe Text)
capitalizationAttNameL f Capitalization{..} = (\capitalizationAttName -> Capitalization { capitalizationAttName, ..} ) <$> f capitalizationAttName
{-# INLINE capitalizationAttNameL #-}
-- * Category -- * Category
-- | 'categoryId' Lens -- | 'categoryId' Lens
@ -66,6 +166,247 @@ categoryNameL f Category{..} = (\categoryName -> Category { categoryName, ..} )
-- * ClassModel
-- | 'classModelClass' Lens
classModelClassL :: Lens_' ClassModel (Maybe Text)
classModelClassL f ClassModel{..} = (\classModelClass -> ClassModel { classModelClass, ..} ) <$> f classModelClass
{-# INLINE classModelClassL #-}
-- * Client
-- | 'clientClient' Lens
clientClientL :: Lens_' Client (Maybe Text)
clientClientL f Client{..} = (\clientClient -> Client { clientClient, ..} ) <$> f clientClient
{-# INLINE clientClientL #-}
-- * EnumArrays
-- | 'enumArraysJustSymbol' Lens
enumArraysJustSymbolL :: Lens_' EnumArrays (Maybe Text)
enumArraysJustSymbolL f EnumArrays{..} = (\enumArraysJustSymbol -> EnumArrays { enumArraysJustSymbol, ..} ) <$> f enumArraysJustSymbol
{-# INLINE enumArraysJustSymbolL #-}
-- | 'enumArraysArrayEnum' Lens
enumArraysArrayEnumL :: Lens_' EnumArrays (Maybe [Text])
enumArraysArrayEnumL f EnumArrays{..} = (\enumArraysArrayEnum -> EnumArrays { enumArraysArrayEnum, ..} ) <$> f enumArraysArrayEnum
{-# INLINE enumArraysArrayEnumL #-}
-- * EnumClass
-- * EnumTest
-- | 'enumTestEnumString' Lens
enumTestEnumStringL :: Lens_' EnumTest (Maybe Text)
enumTestEnumStringL f EnumTest{..} = (\enumTestEnumString -> EnumTest { enumTestEnumString, ..} ) <$> f enumTestEnumString
{-# INLINE enumTestEnumStringL #-}
-- | 'enumTestEnumInteger' Lens
enumTestEnumIntegerL :: Lens_' EnumTest (Maybe Int)
enumTestEnumIntegerL f EnumTest{..} = (\enumTestEnumInteger -> EnumTest { enumTestEnumInteger, ..} ) <$> f enumTestEnumInteger
{-# INLINE enumTestEnumIntegerL #-}
-- | 'enumTestEnumNumber' Lens
enumTestEnumNumberL :: Lens_' EnumTest (Maybe Double)
enumTestEnumNumberL f EnumTest{..} = (\enumTestEnumNumber -> EnumTest { enumTestEnumNumber, ..} ) <$> f enumTestEnumNumber
{-# INLINE enumTestEnumNumberL #-}
-- | 'enumTestOuterEnum' Lens
enumTestOuterEnumL :: Lens_' EnumTest (Maybe OuterEnum)
enumTestOuterEnumL f EnumTest{..} = (\enumTestOuterEnum -> EnumTest { enumTestOuterEnum, ..} ) <$> f enumTestOuterEnum
{-# INLINE enumTestOuterEnumL #-}
-- * FormatTest
-- | 'formatTestInteger' Lens
formatTestIntegerL :: Lens_' FormatTest (Maybe Int)
formatTestIntegerL f FormatTest{..} = (\formatTestInteger -> FormatTest { formatTestInteger, ..} ) <$> f formatTestInteger
{-# INLINE formatTestIntegerL #-}
-- | 'formatTestInt32' Lens
formatTestInt32L :: Lens_' FormatTest (Maybe Int)
formatTestInt32L f FormatTest{..} = (\formatTestInt32 -> FormatTest { formatTestInt32, ..} ) <$> f formatTestInt32
{-# INLINE formatTestInt32L #-}
-- | 'formatTestInt64' Lens
formatTestInt64L :: Lens_' FormatTest (Maybe Integer)
formatTestInt64L f FormatTest{..} = (\formatTestInt64 -> FormatTest { formatTestInt64, ..} ) <$> f formatTestInt64
{-# INLINE formatTestInt64L #-}
-- | 'formatTestNumber' Lens
formatTestNumberL :: Lens_' FormatTest (Double)
formatTestNumberL f FormatTest{..} = (\formatTestNumber -> FormatTest { formatTestNumber, ..} ) <$> f formatTestNumber
{-# INLINE formatTestNumberL #-}
-- | 'formatTestFloat' Lens
formatTestFloatL :: Lens_' FormatTest (Maybe Float)
formatTestFloatL f FormatTest{..} = (\formatTestFloat -> FormatTest { formatTestFloat, ..} ) <$> f formatTestFloat
{-# INLINE formatTestFloatL #-}
-- | 'formatTestDouble' Lens
formatTestDoubleL :: Lens_' FormatTest (Maybe Double)
formatTestDoubleL f FormatTest{..} = (\formatTestDouble -> FormatTest { formatTestDouble, ..} ) <$> f formatTestDouble
{-# INLINE formatTestDoubleL #-}
-- | 'formatTestString' Lens
formatTestStringL :: Lens_' FormatTest (Maybe Text)
formatTestStringL f FormatTest{..} = (\formatTestString -> FormatTest { formatTestString, ..} ) <$> f formatTestString
{-# INLINE formatTestStringL #-}
-- | 'formatTestByte' Lens
formatTestByteL :: Lens_' FormatTest (ByteArray)
formatTestByteL f FormatTest{..} = (\formatTestByte -> FormatTest { formatTestByte, ..} ) <$> f formatTestByte
{-# INLINE formatTestByteL #-}
-- | 'formatTestBinary' Lens
formatTestBinaryL :: Lens_' FormatTest (Maybe Binary)
formatTestBinaryL f FormatTest{..} = (\formatTestBinary -> FormatTest { formatTestBinary, ..} ) <$> f formatTestBinary
{-# INLINE formatTestBinaryL #-}
-- | 'formatTestDate' Lens
formatTestDateL :: Lens_' FormatTest (Date)
formatTestDateL f FormatTest{..} = (\formatTestDate -> FormatTest { formatTestDate, ..} ) <$> f formatTestDate
{-# INLINE formatTestDateL #-}
-- | 'formatTestDateTime' Lens
formatTestDateTimeL :: Lens_' FormatTest (Maybe DateTime)
formatTestDateTimeL f FormatTest{..} = (\formatTestDateTime -> FormatTest { formatTestDateTime, ..} ) <$> f formatTestDateTime
{-# INLINE formatTestDateTimeL #-}
-- | 'formatTestUuid' Lens
formatTestUuidL :: Lens_' FormatTest (Maybe Text)
formatTestUuidL f FormatTest{..} = (\formatTestUuid -> FormatTest { formatTestUuid, ..} ) <$> f formatTestUuid
{-# INLINE formatTestUuidL #-}
-- | 'formatTestPassword' Lens
formatTestPasswordL :: Lens_' FormatTest (Text)
formatTestPasswordL f FormatTest{..} = (\formatTestPassword -> FormatTest { formatTestPassword, ..} ) <$> f formatTestPassword
{-# INLINE formatTestPasswordL #-}
-- * HasOnlyReadOnly
-- | 'hasOnlyReadOnlyBar' Lens
hasOnlyReadOnlyBarL :: Lens_' HasOnlyReadOnly (Maybe Text)
hasOnlyReadOnlyBarL f HasOnlyReadOnly{..} = (\hasOnlyReadOnlyBar -> HasOnlyReadOnly { hasOnlyReadOnlyBar, ..} ) <$> f hasOnlyReadOnlyBar
{-# INLINE hasOnlyReadOnlyBarL #-}
-- | 'hasOnlyReadOnlyFoo' Lens
hasOnlyReadOnlyFooL :: Lens_' HasOnlyReadOnly (Maybe Text)
hasOnlyReadOnlyFooL f HasOnlyReadOnly{..} = (\hasOnlyReadOnlyFoo -> HasOnlyReadOnly { hasOnlyReadOnlyFoo, ..} ) <$> f hasOnlyReadOnlyFoo
{-# INLINE hasOnlyReadOnlyFooL #-}
-- * MapTest
-- | 'mapTestMapMapOfString' Lens
mapTestMapMapOfStringL :: Lens_' MapTest (Maybe (Map.Map String (Map.Map String Text)))
mapTestMapMapOfStringL f MapTest{..} = (\mapTestMapMapOfString -> MapTest { mapTestMapMapOfString, ..} ) <$> f mapTestMapMapOfString
{-# INLINE mapTestMapMapOfStringL #-}
-- | 'mapTestMapOfEnumString' Lens
mapTestMapOfEnumStringL :: Lens_' MapTest (Maybe (Map.Map String Text))
mapTestMapOfEnumStringL f MapTest{..} = (\mapTestMapOfEnumString -> MapTest { mapTestMapOfEnumString, ..} ) <$> f mapTestMapOfEnumString
{-# INLINE mapTestMapOfEnumStringL #-}
-- * MixedPropertiesAndAdditionalPropertiesClass
-- | 'mixedPropertiesAndAdditionalPropertiesClassUuid' Lens
mixedPropertiesAndAdditionalPropertiesClassUuidL :: Lens_' MixedPropertiesAndAdditionalPropertiesClass (Maybe Text)
mixedPropertiesAndAdditionalPropertiesClassUuidL f MixedPropertiesAndAdditionalPropertiesClass{..} = (\mixedPropertiesAndAdditionalPropertiesClassUuid -> MixedPropertiesAndAdditionalPropertiesClass { mixedPropertiesAndAdditionalPropertiesClassUuid, ..} ) <$> f mixedPropertiesAndAdditionalPropertiesClassUuid
{-# INLINE mixedPropertiesAndAdditionalPropertiesClassUuidL #-}
-- | 'mixedPropertiesAndAdditionalPropertiesClassDateTime' Lens
mixedPropertiesAndAdditionalPropertiesClassDateTimeL :: Lens_' MixedPropertiesAndAdditionalPropertiesClass (Maybe DateTime)
mixedPropertiesAndAdditionalPropertiesClassDateTimeL f MixedPropertiesAndAdditionalPropertiesClass{..} = (\mixedPropertiesAndAdditionalPropertiesClassDateTime -> MixedPropertiesAndAdditionalPropertiesClass { mixedPropertiesAndAdditionalPropertiesClassDateTime, ..} ) <$> f mixedPropertiesAndAdditionalPropertiesClassDateTime
{-# INLINE mixedPropertiesAndAdditionalPropertiesClassDateTimeL #-}
-- | 'mixedPropertiesAndAdditionalPropertiesClassMap' Lens
mixedPropertiesAndAdditionalPropertiesClassMapL :: Lens_' MixedPropertiesAndAdditionalPropertiesClass (Maybe (Map.Map String Animal))
mixedPropertiesAndAdditionalPropertiesClassMapL f MixedPropertiesAndAdditionalPropertiesClass{..} = (\mixedPropertiesAndAdditionalPropertiesClassMap -> MixedPropertiesAndAdditionalPropertiesClass { mixedPropertiesAndAdditionalPropertiesClassMap, ..} ) <$> f mixedPropertiesAndAdditionalPropertiesClassMap
{-# INLINE mixedPropertiesAndAdditionalPropertiesClassMapL #-}
-- * Model200Response
-- | 'model200ResponseName' Lens
model200ResponseNameL :: Lens_' Model200Response (Maybe Int)
model200ResponseNameL f Model200Response{..} = (\model200ResponseName -> Model200Response { model200ResponseName, ..} ) <$> f model200ResponseName
{-# INLINE model200ResponseNameL #-}
-- | 'model200ResponseClass' Lens
model200ResponseClassL :: Lens_' Model200Response (Maybe Text)
model200ResponseClassL f Model200Response{..} = (\model200ResponseClass -> Model200Response { model200ResponseClass, ..} ) <$> f model200ResponseClass
{-# INLINE model200ResponseClassL #-}
-- * ModelList
-- | 'modelList123List' Lens
modelList123ListL :: Lens_' ModelList (Maybe Text)
modelList123ListL f ModelList{..} = (\modelList123List -> ModelList { modelList123List, ..} ) <$> f modelList123List
{-# INLINE modelList123ListL #-}
-- * ModelReturn
-- | 'modelReturnReturn' Lens
modelReturnReturnL :: Lens_' ModelReturn (Maybe Int)
modelReturnReturnL f ModelReturn{..} = (\modelReturnReturn -> ModelReturn { modelReturnReturn, ..} ) <$> f modelReturnReturn
{-# INLINE modelReturnReturnL #-}
-- * Name
-- | 'nameName' Lens
nameNameL :: Lens_' Name (Int)
nameNameL f Name{..} = (\nameName -> Name { nameName, ..} ) <$> f nameName
{-# INLINE nameNameL #-}
-- | 'nameSnakeCase' Lens
nameSnakeCaseL :: Lens_' Name (Maybe Int)
nameSnakeCaseL f Name{..} = (\nameSnakeCase -> Name { nameSnakeCase, ..} ) <$> f nameSnakeCase
{-# INLINE nameSnakeCaseL #-}
-- | 'nameProperty' Lens
namePropertyL :: Lens_' Name (Maybe Text)
namePropertyL f Name{..} = (\nameProperty -> Name { nameProperty, ..} ) <$> f nameProperty
{-# INLINE namePropertyL #-}
-- | 'name123Number' Lens
name123NumberL :: Lens_' Name (Maybe Int)
name123NumberL f Name{..} = (\name123Number -> Name { name123Number, ..} ) <$> f name123Number
{-# INLINE name123NumberL #-}
-- * NumberOnly
-- | 'numberOnlyJustNumber' Lens
numberOnlyJustNumberL :: Lens_' NumberOnly (Maybe Double)
numberOnlyJustNumberL f NumberOnly{..} = (\numberOnlyJustNumber -> NumberOnly { numberOnlyJustNumber, ..} ) <$> f numberOnlyJustNumber
{-# INLINE numberOnlyJustNumberL #-}
-- * Order -- * Order
-- | 'orderId' Lens -- | 'orderId' Lens
@ -84,7 +425,7 @@ orderQuantityL f Order{..} = (\orderQuantity -> Order { orderQuantity, ..} ) <$>
{-# INLINE orderQuantityL #-} {-# INLINE orderQuantityL #-}
-- | 'orderShipDate' Lens -- | 'orderShipDate' Lens
orderShipDateL :: Lens_' Order (Maybe UTCTime) orderShipDateL :: Lens_' Order (Maybe DateTime)
orderShipDateL f Order{..} = (\orderShipDate -> Order { orderShipDate, ..} ) <$> f orderShipDate orderShipDateL f Order{..} = (\orderShipDate -> Order { orderShipDate, ..} ) <$> f orderShipDate
{-# INLINE orderShipDateL #-} {-# INLINE orderShipDateL #-}
@ -100,6 +441,41 @@ orderCompleteL f Order{..} = (\orderComplete -> Order { orderComplete, ..} ) <$>
-- * OuterBoolean
-- * OuterComposite
-- | 'outerCompositeMyNumber' Lens
outerCompositeMyNumberL :: Lens_' OuterComposite (Maybe OuterNumber)
outerCompositeMyNumberL f OuterComposite{..} = (\outerCompositeMyNumber -> OuterComposite { outerCompositeMyNumber, ..} ) <$> f outerCompositeMyNumber
{-# INLINE outerCompositeMyNumberL #-}
-- | 'outerCompositeMyString' Lens
outerCompositeMyStringL :: Lens_' OuterComposite (Maybe OuterString)
outerCompositeMyStringL f OuterComposite{..} = (\outerCompositeMyString -> OuterComposite { outerCompositeMyString, ..} ) <$> f outerCompositeMyString
{-# INLINE outerCompositeMyStringL #-}
-- | 'outerCompositeMyBoolean' Lens
outerCompositeMyBooleanL :: Lens_' OuterComposite (Maybe OuterBoolean)
outerCompositeMyBooleanL f OuterComposite{..} = (\outerCompositeMyBoolean -> OuterComposite { outerCompositeMyBoolean, ..} ) <$> f outerCompositeMyBoolean
{-# INLINE outerCompositeMyBooleanL #-}
-- * OuterEnum
-- * OuterNumber
-- * OuterString
-- * Pet -- * Pet
-- | 'petId' Lens -- | 'petId' Lens
@ -134,6 +510,29 @@ petStatusL f Pet{..} = (\petStatus -> Pet { petStatus, ..} ) <$> f petStatus
-- * ReadOnlyFirst
-- | 'readOnlyFirstBar' Lens
readOnlyFirstBarL :: Lens_' ReadOnlyFirst (Maybe Text)
readOnlyFirstBarL f ReadOnlyFirst{..} = (\readOnlyFirstBar -> ReadOnlyFirst { readOnlyFirstBar, ..} ) <$> f readOnlyFirstBar
{-# INLINE readOnlyFirstBarL #-}
-- | 'readOnlyFirstBaz' Lens
readOnlyFirstBazL :: Lens_' ReadOnlyFirst (Maybe Text)
readOnlyFirstBazL f ReadOnlyFirst{..} = (\readOnlyFirstBaz -> ReadOnlyFirst { readOnlyFirstBaz, ..} ) <$> f readOnlyFirstBaz
{-# INLINE readOnlyFirstBazL #-}
-- * SpecialModelName
-- | 'specialModelNameSpecialPropertyName' Lens
specialModelNameSpecialPropertyNameL :: Lens_' SpecialModelName (Maybe Integer)
specialModelNameSpecialPropertyNameL f SpecialModelName{..} = (\specialModelNameSpecialPropertyName -> SpecialModelName { specialModelNameSpecialPropertyName, ..} ) <$> f specialModelNameSpecialPropertyName
{-# INLINE specialModelNameSpecialPropertyNameL #-}
-- * Tag -- * Tag
-- | 'tagId' Lens -- | 'tagId' Lens
@ -191,3 +590,41 @@ userUserStatusL f User{..} = (\userUserStatus -> User { userUserStatus, ..} ) <$
{-# INLINE userUserStatusL #-} {-# INLINE userUserStatusL #-}
-- * Cat
-- | 'catClassName' Lens
catClassNameL :: Lens_' Cat (Text)
catClassNameL f Cat{..} = (\catClassName -> Cat { catClassName, ..} ) <$> f catClassName
{-# INLINE catClassNameL #-}
-- | 'catColor' Lens
catColorL :: Lens_' Cat (Maybe Text)
catColorL f Cat{..} = (\catColor -> Cat { catColor, ..} ) <$> f catColor
{-# INLINE catColorL #-}
-- | 'catDeclawed' Lens
catDeclawedL :: Lens_' Cat (Maybe Bool)
catDeclawedL f Cat{..} = (\catDeclawed -> Cat { catDeclawed, ..} ) <$> f catDeclawed
{-# INLINE catDeclawedL #-}
-- * Dog
-- | 'dogClassName' Lens
dogClassNameL :: Lens_' Dog (Text)
dogClassNameL f Dog{..} = (\dogClassName -> Dog { dogClassName, ..} ) <$> f dogClassName
{-# INLINE dogClassNameL #-}
-- | 'dogColor' Lens
dogColorL :: Lens_' Dog (Maybe Text)
dogColorL f Dog{..} = (\dogColor -> Dog { dogColor, ..} ) <$> f dogColor
{-# INLINE dogColorL #-}
-- | 'dogBreed' Lens
dogBreedL :: Lens_' Dog (Maybe Text)
dogBreedL f Dog{..} = (\dogBreed -> Dog { dogBreed, ..} ) <$> f dogBreed
{-# INLINE dogBreedL #-}

View File

@ -13,6 +13,7 @@ Module : SwaggerPetstore.MimeTypes
module SwaggerPetstore.MimeTypes where module SwaggerPetstore.MimeTypes where
import SwaggerPetstore.Model as M
import qualified Data.Aeson as A import qualified Data.Aeson as A
@ -22,13 +23,16 @@ import qualified Data.ByteString.Builder as BB
import qualified Data.ByteString.Char8 as BC import qualified Data.ByteString.Char8 as BC
import qualified Data.ByteString.Lazy.Char8 as BCL import qualified Data.ByteString.Lazy.Char8 as BCL
import qualified Network.HTTP.Media as ME import qualified Network.HTTP.Media as ME
import qualified Web.FormUrlEncoded as WH import qualified Web.FormUrlEncoded as WH
import qualified Web.HttpApiData as WH
import qualified Data.Data as P (Typeable) import qualified Data.Data as P (Typeable)
import qualified Data.Proxy as P (Proxy(..)) import qualified Data.Proxy as P (Proxy(..))
import qualified Data.Text as T import qualified Data.Text as T
import qualified Data.String as P
import qualified Data.Text.Encoding as T import qualified Data.Text.Encoding as T
import qualified Control.Arrow as P (left) import qualified Control.Arrow as P (left)
@ -50,7 +54,10 @@ data MimeFormUrlEncoded = MimeFormUrlEncoded deriving (P.Typeable)
data MimeMultipartFormData = MimeMultipartFormData deriving (P.Typeable) data MimeMultipartFormData = MimeMultipartFormData deriving (P.Typeable)
data MimeOctetStream = MimeOctetStream deriving (P.Typeable) data MimeOctetStream = MimeOctetStream deriving (P.Typeable)
data MimeNoContent = MimeNoContent deriving (P.Typeable) data MimeNoContent = MimeNoContent deriving (P.Typeable)
data MimeAny = MimeAny deriving (P.Typeable)
data MimeXmlCharsetutf8 = MimeXmlCharsetutf8 deriving (P.Typeable)
data MimeJsonCharsetutf8 = MimeJsonCharsetutf8 deriving (P.Typeable)
-- ** MimeType Class -- ** MimeType Class
@ -76,33 +83,40 @@ class P.Typeable mtype => MimeType mtype where
-- ** MimeType Instances -- ** MimeType Instances
-- | @application/json@ -- | @application/json; charset=utf-8@
instance MimeType MimeJSON where instance MimeType MimeJSON where
mimeTypes _ = mimeType _ = Just $ P.fromString "application/json"
[ "application" ME.// "json" ME./: ("charset", "utf-8") -- | @application/xml; charset=utf-8@
, "application" ME.// "json"
]
-- | @application/xml@
instance MimeType MimeXML where instance MimeType MimeXML where
mimeType _ = Just $ "application" ME.// "xml" mimeType _ = Just $ P.fromString "application/xml"
-- | @application/x-www-form-urlencoded@ -- | @application/x-www-form-urlencoded@
instance MimeType MimeFormUrlEncoded where instance MimeType MimeFormUrlEncoded where
mimeType _ = Just $ "application" ME.// "x-www-form-urlencoded" mimeType _ = Just $ P.fromString "application/x-www-form-urlencoded"
-- | @multipart/form-data@ -- | @multipart/form-data@
instance MimeType MimeMultipartFormData where instance MimeType MimeMultipartFormData where
mimeType _ = Just $ "multipart" ME.// "form-data" mimeType _ = Just $ P.fromString "multipart/form-data"
-- | @text/plain; charset=utf-8@ -- | @text/plain; charset=utf-8@
instance MimeType MimePlainText where instance MimeType MimePlainText where
mimeType _ = Just $ "text" ME.// "plain" ME./: ("charset", "utf-8") mimeType _ = Just $ P.fromString "text/plain"
-- | @application/octet-stream@
instance MimeType MimeOctetStream where instance MimeType MimeOctetStream where
mimeType _ = Just $ "application" ME.// "octet-stream" mimeType _ = Just $ P.fromString "application/octet-stream"
-- | @"*/*"@
instance MimeType MimeAny where
mimeType _ = Just $ P.fromString "*/*"
instance MimeType MimeNoContent where instance MimeType MimeNoContent where
mimeType _ = Nothing mimeType _ = Nothing
-- | @application/xml; charset=utf-8@
instance MimeType MimeXmlCharsetutf8 where
mimeType _ = Just $ P.fromString "application/xml; charset=utf-8"
-- | @application/json; charset=utf-8@
instance MimeType MimeJsonCharsetutf8 where
mimeType _ = Just $ P.fromString "application/json; charset=utf-8"
instance A.ToJSON a => MimeRender MimeJsonCharsetutf8 a where mimeRender _ = A.encode
instance A.FromJSON a => MimeUnrender MimeJsonCharsetutf8 a where mimeUnrender _ = A.eitherDecode
-- ** MimeRender Class -- ** MimeRender Class
@ -133,12 +147,23 @@ instance MimeRender MimeOctetStream T.Text where mimeRender _ = BL.fromStrict .
-- | @BCL.pack@ -- | @BCL.pack@
instance MimeRender MimeOctetStream String where mimeRender _ = BCL.pack instance MimeRender MimeOctetStream String where mimeRender _ = BCL.pack
-- | @P.id@
instance MimeRender MimeMultipartFormData BL.ByteString where mimeRender _ = P.id instance MimeRender MimeMultipartFormData BL.ByteString where mimeRender _ = P.id
-- | @BL.fromStrict . T.encodeUtf8@ instance MimeRender MimeMultipartFormData Binary where mimeRender _ = unBinary
instance MimeRender MimeMultipartFormData T.Text where mimeRender _ = BL.fromStrict . T.encodeUtf8
-- | @BCL.pack@ instance MimeRender MimeMultipartFormData ByteArray where mimeRender _ = mimeRenderDefaultMultipartFormData
instance MimeRender MimeMultipartFormData String where mimeRender _ = BCL.pack instance MimeRender MimeMultipartFormData Bool where mimeRender _ = mimeRenderDefaultMultipartFormData
instance MimeRender MimeMultipartFormData Char where mimeRender _ = mimeRenderDefaultMultipartFormData
instance MimeRender MimeMultipartFormData Date where mimeRender _ = mimeRenderDefaultMultipartFormData
instance MimeRender MimeMultipartFormData DateTime where mimeRender _ = mimeRenderDefaultMultipartFormData
instance MimeRender MimeMultipartFormData Double where mimeRender _ = mimeRenderDefaultMultipartFormData
instance MimeRender MimeMultipartFormData Float where mimeRender _ = mimeRenderDefaultMultipartFormData
instance MimeRender MimeMultipartFormData Int where mimeRender _ = mimeRenderDefaultMultipartFormData
instance MimeRender MimeMultipartFormData Integer where mimeRender _ = mimeRenderDefaultMultipartFormData
instance MimeRender MimeMultipartFormData String where mimeRender _ = mimeRenderDefaultMultipartFormData
instance MimeRender MimeMultipartFormData T.Text where mimeRender _ = mimeRenderDefaultMultipartFormData
mimeRenderDefaultMultipartFormData :: WH.ToHttpApiData a => a -> BL.ByteString
mimeRenderDefaultMultipartFormData = BL.fromStrict . T.encodeUtf8 . WH.toQueryParam
-- | @P.Right . P.const NoContent@ -- | @P.Right . P.const NoContent@
instance MimeRender MimeNoContent NoContent where mimeRender _ = P.const BCL.empty instance MimeRender MimeNoContent NoContent where mimeRender _ = P.const BCL.empty
@ -148,6 +173,8 @@ instance MimeRender MimeNoContent NoContent where mimeRender _ = P.const BCL.emp
-- instance MimeRender MimeOctetStream Int where mimeRender _ = BB.toLazyByteString . BB.intDec -- instance MimeRender MimeOctetStream Int where mimeRender _ = BB.toLazyByteString . BB.intDec
-- instance MimeRender MimeOctetStream Integer where mimeRender _ = BB.toLazyByteString . BB.integerDec -- instance MimeRender MimeOctetStream Integer where mimeRender _ = BB.toLazyByteString . BB.integerDec
-- instance MimeRender MimeXmlCharsetutf8 T.Text where mimeRender _ = undefined
-- instance MimeRender MimeJsonCharsetutf8 T.Text where mimeRender _ = undefined
-- ** MimeUnrender Class -- ** MimeUnrender Class
@ -180,6 +207,8 @@ instance MimeUnrender MimeOctetStream String where mimeUnrender _ = P.Right . BC
-- | @P.Right . P.const NoContent@ -- | @P.Right . P.const NoContent@
instance MimeUnrender MimeNoContent NoContent where mimeUnrender _ = P.Right . P.const NoContent instance MimeUnrender MimeNoContent NoContent where mimeUnrender _ = P.Right . P.const NoContent
-- instance MimeUnrender MimeXmlCharsetutf8 T.Text where mimeUnrender _ = undefined
-- instance MimeUnrender MimeJsonCharsetutf8 T.Text where mimeUnrender _ = undefined
-- ** Request Consumes -- ** Request Consumes

View File

@ -8,9 +8,9 @@ synopsis: Auto-generated swagger-petstore API Client
description: . description: .
Client library for calling the swagger-petstore API based on http-client. Client library for calling the swagger-petstore API based on http-client.
. .
host: petstore.swagger.io host: petstore.swagger.io:80
. .
base path: http://petstore.swagger.io/v2 base path: http://petstore.swagger.io:80/v2
. .
apiVersion: 0.0.1 apiVersion: 0.0.1
. .
@ -42,6 +42,7 @@ library
, unordered-containers , unordered-containers
, aeson >=1.0 && <2.0 , aeson >=1.0 && <2.0
, bytestring >=0.10.0 && <0.11 , bytestring >=0.10.0 && <0.11
, base64-bytestring >1.0 && <2.0
, containers >=0.5.0.0 && <0.6 , containers >=0.5.0.0 && <0.6
, http-types >=0.8 && <0.10 , http-types >=0.8 && <0.10
, http-client >=0.5 && <0.6 , http-client >=0.5 && <0.6
@ -59,6 +60,7 @@ library
, safe-exceptions <0.2 , safe-exceptions <0.2
, case-insensitive , case-insensitive
, microlens >= 0.4.3 && <0.5 , microlens >= 0.4.3 && <0.5
, deepseq >= 1.4 && <1.6
exposed-modules: exposed-modules:
SwaggerPetstore SwaggerPetstore
SwaggerPetstore.API SwaggerPetstore.API

View File

@ -1,7 +1,7 @@
{ {
"swagger" : "2.0", "swagger" : "2.0",
"info" : { "info" : {
"description" : "This is a sample server Petstore server. You can find out more about Swagger at [http://swagger.io](http://swagger.io) or on [irc.freenode.net, #swagger](http://swagger.io/irc/). For this sample, you can use the api key `special-key` to test the authorization filters.", "description" : "This spec is mainly for testing Petstore server and contains fake endpoints, models. Please do not use this for any other purpose. Special characters: \" \\",
"version" : "1.0.0", "version" : "1.0.0",
"title" : "Swagger Petstore", "title" : "Swagger Petstore",
"termsOfService" : "http://swagger.io/terms/", "termsOfService" : "http://swagger.io/terms/",
@ -13,7 +13,7 @@
"url" : "http://www.apache.org/licenses/LICENSE-2.0.html" "url" : "http://www.apache.org/licenses/LICENSE-2.0.html"
} }
}, },
"host" : "petstore.swagger.io", "host" : "petstore.swagger.io:80",
"basePath" : "/v2", "basePath" : "/v2",
"tags" : [ { "tags" : [ {
"name" : "pet", "name" : "pet",
@ -363,7 +363,7 @@
} }
} }
}, },
"/store/order/{orderId}" : { "/store/order/{order_id}" : {
"get" : { "get" : {
"tags" : [ "store" ], "tags" : [ "store" ],
"summary" : "Find purchase order by ID", "summary" : "Find purchase order by ID",
@ -371,7 +371,7 @@
"operationId" : "getOrderById", "operationId" : "getOrderById",
"produces" : [ "application/xml", "application/json" ], "produces" : [ "application/xml", "application/json" ],
"parameters" : [ { "parameters" : [ {
"name" : "orderId", "name" : "order_id",
"in" : "path", "in" : "path",
"description" : "ID of pet that needs to be fetched", "description" : "ID of pet that needs to be fetched",
"required" : true, "required" : true,
@ -402,7 +402,7 @@
"operationId" : "deleteOrder", "operationId" : "deleteOrder",
"produces" : [ "application/xml", "application/json" ], "produces" : [ "application/xml", "application/json" ],
"parameters" : [ { "parameters" : [ {
"name" : "orderId", "name" : "order_id",
"in" : "path", "in" : "path",
"description" : "ID of the order that needs to be deleted", "description" : "ID of the order that needs to be deleted",
"required" : true, "required" : true,
@ -634,6 +634,428 @@
} }
} }
} }
},
"/fake_classname_test" : {
"patch" : {
"tags" : [ "fake_classname_tags 123#$%^" ],
"summary" : "To test class name in snake case",
"operationId" : "testClassname",
"consumes" : [ "application/json" ],
"produces" : [ "application/json" ],
"parameters" : [ {
"in" : "body",
"name" : "body",
"description" : "client model",
"required" : true,
"schema" : {
"$ref" : "#/definitions/Client"
}
} ],
"responses" : {
"200" : {
"description" : "successful operation",
"schema" : {
"$ref" : "#/definitions/Client"
}
}
},
"security" : [ {
"api_key_query" : [ ]
} ]
}
},
"/fake" : {
"get" : {
"tags" : [ "fake" ],
"summary" : "To test enum parameters",
"description" : "To test enum parameters",
"operationId" : "testEnumParameters",
"consumes" : [ "*/*" ],
"produces" : [ "*/*" ],
"parameters" : [ {
"name" : "enum_form_string_array",
"in" : "formData",
"description" : "Form parameter enum test (string array)",
"required" : false,
"type" : "array",
"items" : {
"type" : "string",
"enum" : [ ">", "$" ],
"default" : "$"
}
}, {
"name" : "enum_form_string",
"in" : "formData",
"description" : "Form parameter enum test (string)",
"required" : false,
"type" : "string",
"default" : "-efg",
"enum" : [ "_abc", "-efg", "(xyz)" ]
}, {
"name" : "enum_header_string_array",
"in" : "header",
"description" : "Header parameter enum test (string array)",
"required" : false,
"type" : "array",
"items" : {
"type" : "string",
"enum" : [ ">", "$" ],
"default" : "$"
}
}, {
"name" : "enum_header_string",
"in" : "header",
"description" : "Header parameter enum test (string)",
"required" : false,
"type" : "string",
"default" : "-efg",
"enum" : [ "_abc", "-efg", "(xyz)" ]
}, {
"name" : "enum_query_string_array",
"in" : "query",
"description" : "Query parameter enum test (string array)",
"required" : false,
"type" : "array",
"items" : {
"type" : "string",
"enum" : [ ">", "$" ],
"default" : "$"
}
}, {
"name" : "enum_query_string",
"in" : "query",
"description" : "Query parameter enum test (string)",
"required" : false,
"type" : "string",
"default" : "-efg",
"enum" : [ "_abc", "-efg", "(xyz)" ]
}, {
"name" : "enum_query_integer",
"in" : "query",
"description" : "Query parameter enum test (double)",
"required" : false,
"type" : "integer",
"format" : "int32",
"enum" : [ 1, -2 ]
}, {
"name" : "enum_query_double",
"in" : "formData",
"description" : "Query parameter enum test (double)",
"required" : false,
"type" : "number",
"format" : "double",
"enum" : [ 1.1, -1.2 ]
} ],
"responses" : {
"400" : {
"description" : "Invalid request"
},
"404" : {
"description" : "Not found"
}
}
},
"post" : {
"tags" : [ "fake" ],
"summary" : "Fake endpoint for testing various parameters\n假端點\n偽のエンドポイント\n가짜 엔드 포인트\n",
"description" : "Fake endpoint for testing various parameters\n假端點\n偽のエンドポイント\n가짜 엔드 포인트\n",
"operationId" : "testEndpointParameters",
"consumes" : [ "application/xml; charset=utf-8", "application/json; charset=utf-8" ],
"produces" : [ "application/xml; charset=utf-8", "application/json; charset=utf-8" ],
"parameters" : [ {
"name" : "integer",
"in" : "formData",
"description" : "None",
"required" : false,
"type" : "integer",
"maximum" : 100,
"minimum" : 10
}, {
"name" : "int32",
"in" : "formData",
"description" : "None",
"required" : false,
"type" : "integer",
"maximum" : 200,
"minimum" : 20,
"format" : "int32"
}, {
"name" : "int64",
"in" : "formData",
"description" : "None",
"required" : false,
"type" : "integer",
"format" : "int64"
}, {
"name" : "number",
"in" : "formData",
"description" : "None",
"required" : true,
"type" : "number",
"maximum" : 543.2,
"minimum" : 32.1
}, {
"name" : "float",
"in" : "formData",
"description" : "None",
"required" : false,
"type" : "number",
"maximum" : 987.6,
"format" : "float"
}, {
"name" : "double",
"in" : "formData",
"description" : "None",
"required" : true,
"type" : "number",
"maximum" : 123.4,
"minimum" : 67.8,
"format" : "double"
}, {
"name" : "string",
"in" : "formData",
"description" : "None",
"required" : false,
"type" : "string",
"pattern" : "/[a-z]/i"
}, {
"name" : "pattern_without_delimiter",
"in" : "formData",
"description" : "None",
"required" : true,
"type" : "string",
"pattern" : "^[A-Z].*"
}, {
"name" : "byte",
"in" : "formData",
"description" : "None",
"required" : true,
"type" : "string",
"format" : "byte"
}, {
"name" : "binary",
"in" : "formData",
"description" : "None",
"required" : false,
"type" : "string",
"format" : "binary"
}, {
"name" : "date",
"in" : "formData",
"description" : "None",
"required" : false,
"type" : "string",
"format" : "date"
}, {
"name" : "dateTime",
"in" : "formData",
"description" : "None",
"required" : false,
"type" : "string",
"format" : "date-time"
}, {
"name" : "password",
"in" : "formData",
"description" : "None",
"required" : false,
"type" : "string",
"maxLength" : 64,
"minLength" : 10,
"format" : "password"
}, {
"name" : "callback",
"in" : "formData",
"description" : "None",
"required" : false,
"type" : "string"
} ],
"responses" : {
"400" : {
"description" : "Invalid username supplied"
},
"404" : {
"description" : "User not found"
}
},
"security" : [ {
"http_basic_test" : [ ]
} ]
},
"patch" : {
"tags" : [ "fake" ],
"summary" : "To test \"client\" model",
"description" : "To test \"client\" model",
"operationId" : "testClientModel",
"consumes" : [ "application/json" ],
"produces" : [ "application/json" ],
"parameters" : [ {
"in" : "body",
"name" : "body",
"description" : "client model",
"required" : true,
"schema" : {
"$ref" : "#/definitions/Client"
}
} ],
"responses" : {
"200" : {
"description" : "successful operation",
"schema" : {
"$ref" : "#/definitions/Client"
}
}
}
}
},
"/fake/outer/number" : {
"post" : {
"tags" : [ "fake" ],
"description" : "Test serialization of outer number types",
"operationId" : "fakeOuterNumberSerialize",
"parameters" : [ {
"in" : "body",
"name" : "body",
"description" : "Input number as post body",
"required" : false,
"schema" : {
"$ref" : "#/definitions/OuterNumber"
}
} ],
"responses" : {
"200" : {
"description" : "Output number",
"schema" : {
"$ref" : "#/definitions/OuterNumber"
}
}
}
}
},
"/fake/outer/string" : {
"post" : {
"tags" : [ "fake" ],
"description" : "Test serialization of outer string types",
"operationId" : "fakeOuterStringSerialize",
"parameters" : [ {
"in" : "body",
"name" : "body",
"description" : "Input string as post body",
"required" : false,
"schema" : {
"$ref" : "#/definitions/OuterString"
}
} ],
"responses" : {
"200" : {
"description" : "Output string",
"schema" : {
"$ref" : "#/definitions/OuterString"
}
}
}
}
},
"/fake/outer/boolean" : {
"post" : {
"tags" : [ "fake" ],
"description" : "Test serialization of outer boolean types",
"operationId" : "fakeOuterBooleanSerialize",
"parameters" : [ {
"in" : "body",
"name" : "body",
"description" : "Input boolean as post body",
"required" : false,
"schema" : {
"$ref" : "#/definitions/OuterBoolean"
}
} ],
"responses" : {
"200" : {
"description" : "Output boolean",
"schema" : {
"$ref" : "#/definitions/OuterBoolean"
}
}
}
}
},
"/fake/outer/composite" : {
"post" : {
"tags" : [ "fake" ],
"description" : "Test serialization of object with outer number type",
"operationId" : "fakeOuterCompositeSerialize",
"parameters" : [ {
"in" : "body",
"name" : "body",
"description" : "Input composite as post body",
"required" : false,
"schema" : {
"$ref" : "#/definitions/OuterComposite"
}
} ],
"responses" : {
"200" : {
"description" : "Output composite",
"schema" : {
"$ref" : "#/definitions/OuterComposite"
}
}
}
}
},
"/fake/jsonFormData" : {
"get" : {
"tags" : [ "fake" ],
"summary" : "test json serialization of form data",
"description" : "",
"operationId" : "testJsonFormData",
"consumes" : [ "application/json" ],
"parameters" : [ {
"name" : "param",
"in" : "formData",
"description" : "field1",
"required" : true,
"type" : "string"
}, {
"name" : "param2",
"in" : "formData",
"description" : "field2",
"required" : true,
"type" : "string"
} ],
"responses" : {
"200" : {
"description" : "successful operation"
}
}
}
},
"/another-fake/dummy" : {
"patch" : {
"tags" : [ "$another-fake?" ],
"summary" : "To test special tags",
"description" : "To test special tags",
"operationId" : "test_special_tags",
"consumes" : [ "application/json" ],
"produces" : [ "application/json" ],
"parameters" : [ {
"in" : "body",
"name" : "body",
"description" : "client model",
"required" : true,
"schema" : {
"$ref" : "#/definitions/Client"
}
} ],
"responses" : {
"200" : {
"description" : "successful operation",
"schema" : {
"$ref" : "#/definitions/Client"
}
}
}
}
} }
}, },
"securityDefinitions" : { "securityDefinitions" : {
@ -650,6 +1072,14 @@
"type" : "apiKey", "type" : "apiKey",
"name" : "api_key", "name" : "api_key",
"in" : "header" "in" : "header"
},
"api_key_query" : {
"type" : "apiKey",
"name" : "api_key_query",
"in" : "query"
},
"http_basic_test" : {
"type" : "basic"
} }
}, },
"definitions" : { "definitions" : {
@ -682,8 +1112,6 @@
"default" : false "default" : false
} }
}, },
"title" : "Pet Order",
"description" : "An order for a pets from the pet store",
"xml" : { "xml" : {
"name" : "Order" "name" : "Order"
} }
@ -699,8 +1127,6 @@
"type" : "string" "type" : "string"
} }
}, },
"title" : "Pet catehgry",
"description" : "A category for a pet",
"xml" : { "xml" : {
"name" : "Category" "name" : "Category"
} }
@ -710,7 +1136,8 @@
"properties" : { "properties" : {
"id" : { "id" : {
"type" : "integer", "type" : "integer",
"format" : "int64" "format" : "int64",
"x-is-unique" : true
}, },
"username" : { "username" : {
"type" : "string" "type" : "string"
@ -736,8 +1163,6 @@
"description" : "User Status" "description" : "User Status"
} }
}, },
"title" : "a User",
"description" : "A User who is purchasing from the pet store",
"xml" : { "xml" : {
"name" : "User" "name" : "User"
} }
@ -753,8 +1178,6 @@
"type" : "string" "type" : "string"
} }
}, },
"title" : "Pet Tag",
"description" : "A tag for a pet",
"xml" : { "xml" : {
"name" : "Tag" "name" : "Tag"
} }
@ -765,7 +1188,8 @@
"properties" : { "properties" : {
"id" : { "id" : {
"type" : "integer", "type" : "integer",
"format" : "int64" "format" : "int64",
"x-is-unique" : true
}, },
"category" : { "category" : {
"$ref" : "#/definitions/Category" "$ref" : "#/definitions/Category"
@ -800,8 +1224,6 @@
"enum" : [ "available", "pending", "sold" ] "enum" : [ "available", "pending", "sold" ]
} }
}, },
"title" : "a Pet",
"description" : "A pet for sale in the pet store",
"xml" : { "xml" : {
"name" : "Pet" "name" : "Pet"
} }
@ -819,9 +1241,449 @@
"message" : { "message" : {
"type" : "string" "type" : "string"
} }
}
}, },
"title" : "An uploaded response", "$special[model.name]" : {
"description" : "Describes the result of uploading an image resource" "properties" : {
"$special[property.name]" : {
"type" : "integer",
"format" : "int64"
}
},
"xml" : {
"name" : "$special[model.name]"
}
},
"Return" : {
"properties" : {
"return" : {
"type" : "integer",
"format" : "int32"
}
},
"description" : "Model for testing reserved words",
"xml" : {
"name" : "Return"
}
},
"Name" : {
"required" : [ "name" ],
"properties" : {
"name" : {
"type" : "integer",
"format" : "int32"
},
"snake_case" : {
"type" : "integer",
"format" : "int32",
"readOnly" : true
},
"property" : {
"type" : "string"
},
"123Number" : {
"type" : "integer",
"readOnly" : true
}
},
"description" : "Model for testing model name same as property name",
"xml" : {
"name" : "Name"
}
},
"200_response" : {
"properties" : {
"name" : {
"type" : "integer",
"format" : "int32"
},
"class" : {
"type" : "string"
}
},
"description" : "Model for testing model name starting with number",
"xml" : {
"name" : "Name"
}
},
"ClassModel" : {
"properties" : {
"_class" : {
"type" : "string"
}
},
"description" : "Model for testing model with \"_class\" property"
},
"Dog" : {
"allOf" : [ {
"$ref" : "#/definitions/Animal"
}, {
"type" : "object",
"properties" : {
"breed" : {
"type" : "string"
}
}
} ]
},
"Cat" : {
"allOf" : [ {
"$ref" : "#/definitions/Animal"
}, {
"type" : "object",
"properties" : {
"declawed" : {
"type" : "boolean"
}
}
} ]
},
"Animal" : {
"type" : "object",
"required" : [ "className" ],
"discriminator" : "className",
"properties" : {
"className" : {
"type" : "string"
},
"color" : {
"type" : "string",
"default" : "red"
}
}
},
"AnimalFarm" : {
"type" : "array",
"items" : {
"$ref" : "#/definitions/Animal"
}
},
"format_test" : {
"type" : "object",
"required" : [ "byte", "date", "number", "password" ],
"properties" : {
"integer" : {
"type" : "integer",
"minimum" : 10,
"maximum" : 100
},
"int32" : {
"type" : "integer",
"format" : "int32",
"minimum" : 20,
"maximum" : 200
},
"int64" : {
"type" : "integer",
"format" : "int64"
},
"number" : {
"type" : "number",
"minimum" : 32.1,
"maximum" : 543.2
},
"float" : {
"type" : "number",
"format" : "float",
"minimum" : 54.3,
"maximum" : 987.6
},
"double" : {
"type" : "number",
"format" : "double",
"minimum" : 67.8,
"maximum" : 123.4
},
"string" : {
"type" : "string",
"pattern" : "/[a-z]/i"
},
"byte" : {
"type" : "string",
"format" : "byte",
"pattern" : "^(?:[A-Za-z0-9+/]{4})*(?:[A-Za-z0-9+/]{2}==|[A-Za-z0-9+/]{3}=)?$"
},
"binary" : {
"type" : "string",
"format" : "binary"
},
"date" : {
"type" : "string",
"format" : "date"
},
"dateTime" : {
"type" : "string",
"format" : "date-time"
},
"uuid" : {
"type" : "string",
"format" : "uuid"
},
"password" : {
"type" : "string",
"format" : "password",
"minLength" : 10,
"maxLength" : 64
}
}
},
"EnumClass" : {
"type" : "string",
"enum" : [ "_abc", "-efg", "(xyz)" ],
"default" : "-efg"
},
"Enum_Test" : {
"type" : "object",
"properties" : {
"enum_string" : {
"type" : "string",
"enum" : [ "UPPER", "lower", "" ]
},
"enum_integer" : {
"type" : "integer",
"format" : "int32",
"enum" : [ 1, -1 ]
},
"enum_number" : {
"type" : "number",
"format" : "double",
"enum" : [ 1.1, -1.2 ]
},
"outerEnum" : {
"$ref" : "#/definitions/OuterEnum"
}
}
},
"AdditionalPropertiesClass" : {
"type" : "object",
"properties" : {
"map_property" : {
"type" : "object",
"additionalProperties" : {
"type" : "string"
}
},
"map_of_map_property" : {
"type" : "object",
"additionalProperties" : {
"type" : "object",
"additionalProperties" : {
"type" : "string"
}
}
}
}
},
"MixedPropertiesAndAdditionalPropertiesClass" : {
"type" : "object",
"properties" : {
"uuid" : {
"type" : "string",
"format" : "uuid"
},
"dateTime" : {
"type" : "string",
"format" : "date-time"
},
"map" : {
"type" : "object",
"additionalProperties" : {
"$ref" : "#/definitions/Animal"
}
}
}
},
"List" : {
"type" : "object",
"properties" : {
"123-list" : {
"type" : "string"
}
}
},
"Client" : {
"type" : "object",
"properties" : {
"client" : {
"type" : "string"
}
}
},
"ReadOnlyFirst" : {
"type" : "object",
"properties" : {
"bar" : {
"type" : "string",
"readOnly" : true
},
"baz" : {
"type" : "string"
}
}
},
"hasOnlyReadOnly" : {
"type" : "object",
"properties" : {
"bar" : {
"type" : "string",
"readOnly" : true
},
"foo" : {
"type" : "string",
"readOnly" : true
}
}
},
"Capitalization" : {
"type" : "object",
"properties" : {
"smallCamel" : {
"type" : "string"
},
"CapitalCamel" : {
"type" : "string"
},
"small_Snake" : {
"type" : "string"
},
"Capital_Snake" : {
"type" : "string"
},
"SCA_ETH_Flow_Points" : {
"type" : "string"
},
"ATT_NAME" : {
"type" : "string",
"description" : "Name of the pet\n"
}
}
},
"MapTest" : {
"type" : "object",
"properties" : {
"map_map_of_string" : {
"type" : "object",
"additionalProperties" : {
"type" : "object",
"additionalProperties" : {
"type" : "string"
}
}
},
"map_of_enum_string" : {
"type" : "object",
"additionalProperties" : {
"type" : "string",
"enum" : [ "UPPER", "lower" ]
}
}
}
},
"ArrayTest" : {
"type" : "object",
"properties" : {
"array_of_string" : {
"type" : "array",
"items" : {
"type" : "string"
}
},
"array_array_of_integer" : {
"type" : "array",
"items" : {
"type" : "array",
"items" : {
"type" : "integer",
"format" : "int64"
}
}
},
"array_array_of_model" : {
"type" : "array",
"items" : {
"type" : "array",
"items" : {
"$ref" : "#/definitions/ReadOnlyFirst"
}
}
}
}
},
"NumberOnly" : {
"type" : "object",
"properties" : {
"JustNumber" : {
"type" : "number"
}
}
},
"ArrayOfNumberOnly" : {
"type" : "object",
"properties" : {
"ArrayNumber" : {
"type" : "array",
"items" : {
"type" : "number"
}
}
}
},
"ArrayOfArrayOfNumberOnly" : {
"type" : "object",
"properties" : {
"ArrayArrayNumber" : {
"type" : "array",
"items" : {
"type" : "array",
"items" : {
"type" : "number"
}
}
}
}
},
"EnumArrays" : {
"type" : "object",
"properties" : {
"just_symbol" : {
"type" : "string",
"enum" : [ ">=", "$" ]
},
"array_enum" : {
"type" : "array",
"items" : {
"type" : "string",
"enum" : [ "fish", "crab" ]
}
}
}
},
"OuterEnum" : {
"type" : "string",
"enum" : [ "placed", "approved", "delivered" ]
},
"OuterNumber" : {
"type" : "number"
},
"OuterString" : {
"type" : "string"
},
"OuterBoolean" : {
"type" : "boolean"
},
"OuterComposite" : {
"type" : "object",
"properties" : {
"my_number" : {
"$ref" : "#/definitions/OuterNumber"
},
"my_string" : {
"$ref" : "#/definitions/OuterString"
},
"my_boolean" : {
"$ref" : "#/definitions/OuterBoolean"
}
}
} }
}, },
"externalDocs" : { "externalDocs" : {

View File

@ -130,7 +130,7 @@ testPetOps mgr config =
readIORef _pet >>= \case readIORef _pet >>= \case
Just S.Pet {S.petId = Just petId} -> do Just S.Pet {S.petId = Just petId} -> do
let updatePetWithFormRequest = S.updatePetWithForm S.MimeFormUrlEncoded petId let updatePetWithFormRequest = S.updatePetWithForm S.MimeFormUrlEncoded petId
`S.applyOptionalParam` S.Name "petName" `S.applyOptionalParam` S.Name2 "petName"
`S.applyOptionalParam` S.Status "pending" `S.applyOptionalParam` S.Status "pending"
updatePetWithFormResponse <- S.dispatchLbs mgr config updatePetWithFormRequest S.MimeJSON updatePetWithFormResponse <- S.dispatchLbs mgr config updatePetWithFormRequest S.MimeJSON
NH.responseStatus updatePetWithFormResponse `shouldBe` NH.status200 NH.responseStatus updatePetWithFormResponse `shouldBe` NH.status200
@ -156,7 +156,7 @@ testPetOps mgr config =
_ -> pendingWith "no petId") $ _ -> pendingWith "no petId") $
it "deletePet" $ \petId -> do it "deletePet" $ \petId -> do
let deletePetRequest = S.deletePet petId let deletePetRequest = S.deletePet petId
`S.applyOptionalParam` S.ApiUnderscorekey "api key" `S.applyOptionalParam` S.ApiKey "api key"
deletePetResponse <- S.dispatchLbs mgr config deletePetRequest S.MimeJSON deletePetResponse <- S.dispatchLbs mgr config deletePetRequest S.MimeJSON
NH.responseStatus deletePetResponse `shouldBe` NH.status200 NH.responseStatus deletePetResponse `shouldBe` NH.status200
@ -185,7 +185,7 @@ testStoreOps mgr config = do
(S.mkOrder (S.mkOrder
{ S.orderId = Just 21 { S.orderId = Just 21
, S.orderQuantity = Just 210 , S.orderQuantity = Just 210
, S.orderShipDate = Just now , S.orderShipDate = Just (S.DateTime now)
}) })
placeOrderResult <- S.dispatchMime mgr config placeOrderRequest S.MimeJSON placeOrderResult <- S.dispatchMime mgr config placeOrderRequest S.MimeJSON
NH.responseStatus (S.mimeResultResponse placeOrderResult) `shouldBe` NH.status200 NH.responseStatus (S.mimeResultResponse placeOrderResult) `shouldBe` NH.status200

View File

@ -5,11 +5,11 @@ module Instances where
import Data.Text (Text, pack) import Data.Text (Text, pack)
import Data.Char (isSpace) import Data.Char (isSpace)
import Data.List (sort) import Data.List (sort)
import Data.Time.Calendar (Day(..)) import qualified Data.Time as TI
import Data.Time.Clock (UTCTime(..), secondsToDiffTime)
import Test.QuickCheck import Test.QuickCheck
import qualified Data.HashMap.Strict as HM import qualified Data.HashMap.Strict as HM
import qualified Data.Set as Set import qualified Data.Set as Set
import qualified Data.ByteString.Lazy as BL
import ApproxEq import ApproxEq
import SwaggerPetstore.Model import SwaggerPetstore.Model
@ -17,13 +17,33 @@ import SwaggerPetstore.Model
instance Arbitrary Text where instance Arbitrary Text where
arbitrary = pack <$> arbitrary arbitrary = pack <$> arbitrary
instance Arbitrary Day where instance Arbitrary TI.Day where
arbitrary = ModifiedJulianDay . (2000 +) <$> arbitrary arbitrary = TI.ModifiedJulianDay . (2000 +) <$> arbitrary
shrink = (ModifiedJulianDay <$>) . shrink . toModifiedJulianDay shrink = (TI.ModifiedJulianDay <$>) . shrink . TI.toModifiedJulianDay
instance Arbitrary UTCTime where instance Arbitrary TI.UTCTime where
arbitrary = arbitrary =
UTCTime <$> arbitrary <*> (secondsToDiffTime <$> choose (0, 86401)) TI.UTCTime <$> arbitrary <*> (TI.secondsToDiffTime <$> choose (0, 86401))
instance Arbitrary BL.ByteString where
arbitrary = BL.pack <$> arbitrary
shrink xs = BL.pack <$> shrink (BL.unpack xs)
instance Arbitrary ByteArray where
arbitrary = ByteArray <$> arbitrary
shrink (ByteArray xs) = ByteArray <$> shrink xs
instance Arbitrary Binary where
arbitrary = Binary <$> arbitrary
shrink (Binary xs) = Binary <$> shrink xs
instance Arbitrary DateTime where
arbitrary = DateTime <$> arbitrary
shrink (DateTime xs) = DateTime <$> shrink xs
instance Arbitrary Date where
arbitrary = Date <$> arbitrary
shrink (Date xs) = Date <$> shrink xs
-- | Checks if a given list has no duplicates in _O(n log n)_. -- | Checks if a given list has no duplicates in _O(n log n)_.
hasNoDups hasNoDups
@ -37,11 +57,30 @@ hasNoDups = go Set.empty
, Set.size s' > Set.size s = go s' xs , Set.size s' > Set.size s = go s' xs
| otherwise = False | otherwise = False
instance ApproxEq Day where instance ApproxEq TI.Day where
(=~) = (==) (=~) = (==)
-- * Models -- * Models
instance Arbitrary AdditionalPropertiesClass where
arbitrary =
AdditionalPropertiesClass
<$> arbitrary -- additionalPropertiesClassMapProperty :: Maybe (Map.Map String Text)
<*> arbitrary -- additionalPropertiesClassMapOfMapProperty :: Maybe (Map.Map String (Map.Map String Text))
instance Arbitrary Animal where
arbitrary =
Animal
<$> arbitrary -- animalClassName :: Text
<*> arbitrary -- animalColor :: Maybe Text
instance Arbitrary AnimalFarm where
arbitrary =
pure AnimalFarm
instance Arbitrary ApiResponse where instance Arbitrary ApiResponse where
arbitrary = arbitrary =
ApiResponse ApiResponse
@ -50,6 +89,37 @@ instance Arbitrary ApiResponse where
<*> arbitrary -- apiResponseMessage :: Maybe Text <*> arbitrary -- apiResponseMessage :: Maybe Text
instance Arbitrary ArrayOfArrayOfNumberOnly where
arbitrary =
ArrayOfArrayOfNumberOnly
<$> arbitrary -- arrayOfArrayOfNumberOnlyArrayArrayNumber :: Maybe [[Double]]
instance Arbitrary ArrayOfNumberOnly where
arbitrary =
ArrayOfNumberOnly
<$> arbitrary -- arrayOfNumberOnlyArrayNumber :: Maybe [Double]
instance Arbitrary ArrayTest where
arbitrary =
ArrayTest
<$> arbitrary -- arrayTestArrayOfString :: Maybe [Text]
<*> arbitrary -- arrayTestArrayArrayOfInteger :: Maybe [[Integer]]
<*> arbitrary -- arrayTestArrayArrayOfModel :: Maybe [[ReadOnlyFirst]]
instance Arbitrary Capitalization where
arbitrary =
Capitalization
<$> arbitrary -- capitalizationSmallCamel :: Maybe Text
<*> arbitrary -- capitalizationCapitalCamel :: Maybe Text
<*> arbitrary -- capitalizationSmallSnake :: Maybe Text
<*> arbitrary -- capitalizationCapitalSnake :: Maybe Text
<*> arbitrary -- capitalizationScaEthFlowPoints :: Maybe Text
<*> arbitrary -- capitalizationAttName :: Maybe Text
instance Arbitrary Category where instance Arbitrary Category where
arbitrary = arbitrary =
Category Category
@ -57,17 +127,152 @@ instance Arbitrary Category where
<*> arbitrary -- categoryName :: Maybe Text <*> arbitrary -- categoryName :: Maybe Text
instance Arbitrary ClassModel where
arbitrary =
ClassModel
<$> arbitrary -- classModelClass :: Maybe Text
instance Arbitrary Client where
arbitrary =
Client
<$> arbitrary -- clientClient :: Maybe Text
instance Arbitrary EnumArrays where
arbitrary =
EnumArrays
<$> arbitrary -- enumArraysJustSymbol :: Maybe Text
<*> arbitrary -- enumArraysArrayEnum :: Maybe [Text]
instance Arbitrary EnumClass where
arbitrary =
pure EnumClass
instance Arbitrary EnumTest where
arbitrary =
EnumTest
<$> arbitrary -- enumTestEnumString :: Maybe Text
<*> arbitrary -- enumTestEnumInteger :: Maybe Int
<*> arbitrary -- enumTestEnumNumber :: Maybe Double
<*> arbitrary -- enumTestOuterEnum :: Maybe OuterEnum
instance Arbitrary FormatTest where
arbitrary =
FormatTest
<$> arbitrary -- formatTestInteger :: Maybe Int
<*> arbitrary -- formatTestInt32 :: Maybe Int
<*> arbitrary -- formatTestInt64 :: Maybe Integer
<*> arbitrary -- formatTestNumber :: Double
<*> arbitrary -- formatTestFloat :: Maybe Float
<*> arbitrary -- formatTestDouble :: Maybe Double
<*> arbitrary -- formatTestString :: Maybe Text
<*> arbitrary -- formatTestByte :: ByteArray
<*> arbitrary -- formatTestBinary :: Maybe Binary
<*> arbitrary -- formatTestDate :: Date
<*> arbitrary -- formatTestDateTime :: Maybe DateTime
<*> arbitrary -- formatTestUuid :: Maybe Text
<*> arbitrary -- formatTestPassword :: Text
instance Arbitrary HasOnlyReadOnly where
arbitrary =
HasOnlyReadOnly
<$> arbitrary -- hasOnlyReadOnlyBar :: Maybe Text
<*> arbitrary -- hasOnlyReadOnlyFoo :: Maybe Text
instance Arbitrary MapTest where
arbitrary =
MapTest
<$> arbitrary -- mapTestMapMapOfString :: Maybe (Map.Map String (Map.Map String Text))
<*> arbitrary -- mapTestMapOfEnumString :: Maybe (Map.Map String Text)
instance Arbitrary MixedPropertiesAndAdditionalPropertiesClass where
arbitrary =
MixedPropertiesAndAdditionalPropertiesClass
<$> arbitrary -- mixedPropertiesAndAdditionalPropertiesClassUuid :: Maybe Text
<*> arbitrary -- mixedPropertiesAndAdditionalPropertiesClassDateTime :: Maybe DateTime
<*> arbitrary -- mixedPropertiesAndAdditionalPropertiesClassMap :: Maybe (Map.Map String Animal)
instance Arbitrary Model200Response where
arbitrary =
Model200Response
<$> arbitrary -- model200ResponseName :: Maybe Int
<*> arbitrary -- model200ResponseClass :: Maybe Text
instance Arbitrary ModelList where
arbitrary =
ModelList
<$> arbitrary -- modelList123List :: Maybe Text
instance Arbitrary ModelReturn where
arbitrary =
ModelReturn
<$> arbitrary -- modelReturnReturn :: Maybe Int
instance Arbitrary Name where
arbitrary =
Name
<$> arbitrary -- nameName :: Int
<*> arbitrary -- nameSnakeCase :: Maybe Int
<*> arbitrary -- nameProperty :: Maybe Text
<*> arbitrary -- name123Number :: Maybe Int
instance Arbitrary NumberOnly where
arbitrary =
NumberOnly
<$> arbitrary -- numberOnlyJustNumber :: Maybe Double
instance Arbitrary Order where instance Arbitrary Order where
arbitrary = arbitrary =
Order Order
<$> arbitrary -- orderId :: Maybe Integer <$> arbitrary -- orderId :: Maybe Integer
<*> arbitrary -- orderPetId :: Maybe Integer <*> arbitrary -- orderPetId :: Maybe Integer
<*> arbitrary -- orderQuantity :: Maybe Int <*> arbitrary -- orderQuantity :: Maybe Int
<*> arbitrary -- orderShipDate :: Maybe UTCTime <*> arbitrary -- orderShipDate :: Maybe DateTime
<*> arbitrary -- orderStatus :: Maybe Text <*> arbitrary -- orderStatus :: Maybe Text
<*> arbitrary -- orderComplete :: Maybe Bool <*> arbitrary -- orderComplete :: Maybe Bool
instance Arbitrary OuterBoolean where
arbitrary =
pure OuterBoolean
instance Arbitrary OuterComposite where
arbitrary =
OuterComposite
<$> arbitrary -- outerCompositeMyNumber :: Maybe OuterNumber
<*> arbitrary -- outerCompositeMyString :: Maybe OuterString
<*> arbitrary -- outerCompositeMyBoolean :: Maybe OuterBoolean
instance Arbitrary OuterEnum where
arbitrary =
pure OuterEnum
instance Arbitrary OuterNumber where
arbitrary =
pure OuterNumber
instance Arbitrary OuterString where
arbitrary =
pure OuterString
instance Arbitrary Pet where instance Arbitrary Pet where
arbitrary = arbitrary =
Pet Pet
@ -79,6 +284,19 @@ instance Arbitrary Pet where
<*> arbitrary -- petStatus :: Maybe Text <*> arbitrary -- petStatus :: Maybe Text
instance Arbitrary ReadOnlyFirst where
arbitrary =
ReadOnlyFirst
<$> arbitrary -- readOnlyFirstBar :: Maybe Text
<*> arbitrary -- readOnlyFirstBaz :: Maybe Text
instance Arbitrary SpecialModelName where
arbitrary =
SpecialModelName
<$> arbitrary -- specialModelNameSpecialPropertyName :: Maybe Integer
instance Arbitrary Tag where instance Arbitrary Tag where
arbitrary = arbitrary =
Tag Tag
@ -99,4 +317,20 @@ instance Arbitrary User where
<*> arbitrary -- userUserStatus :: Maybe Int <*> arbitrary -- userUserStatus :: Maybe Int
instance Arbitrary Cat where
arbitrary =
Cat
<$> arbitrary -- catClassName :: Text
<*> arbitrary -- catColor :: Maybe Text
<*> arbitrary -- catDeclawed :: Maybe Bool
instance Arbitrary Dog where
arbitrary =
Dog
<$> arbitrary -- dogClassName :: Text
<*> arbitrary -- dogColor :: Maybe Text
<*> arbitrary -- dogBreed :: Maybe Text

View File

@ -19,10 +19,40 @@ main :: IO ()
main = main =
hspec $ modifyMaxSize (const 10) $ hspec $ modifyMaxSize (const 10) $
do describe "JSON instances" $ do describe "JSON instances" $
do propMimeEq MimeJSON (Proxy :: Proxy ApiResponse) do propMimeEq MimeJSON (Proxy :: Proxy AdditionalPropertiesClass)
propMimeEq MimeJSON (Proxy :: Proxy Animal)
propMimeEq MimeJSON (Proxy :: Proxy AnimalFarm)
propMimeEq MimeJSON (Proxy :: Proxy ApiResponse)
propMimeEq MimeJSON (Proxy :: Proxy ArrayOfArrayOfNumberOnly)
propMimeEq MimeJSON (Proxy :: Proxy ArrayOfNumberOnly)
propMimeEq MimeJSON (Proxy :: Proxy ArrayTest)
propMimeEq MimeJSON (Proxy :: Proxy Capitalization)
propMimeEq MimeJSON (Proxy :: Proxy Category) propMimeEq MimeJSON (Proxy :: Proxy Category)
propMimeEq MimeJSON (Proxy :: Proxy ClassModel)
propMimeEq MimeJSON (Proxy :: Proxy Client)
propMimeEq MimeJSON (Proxy :: Proxy EnumArrays)
propMimeEq MimeJSON (Proxy :: Proxy EnumClass)
propMimeEq MimeJSON (Proxy :: Proxy EnumTest)
propMimeEq MimeJSON (Proxy :: Proxy FormatTest)
propMimeEq MimeJSON (Proxy :: Proxy HasOnlyReadOnly)
propMimeEq MimeJSON (Proxy :: Proxy MapTest)
propMimeEq MimeJSON (Proxy :: Proxy MixedPropertiesAndAdditionalPropertiesClass)
propMimeEq MimeJSON (Proxy :: Proxy Model200Response)
propMimeEq MimeJSON (Proxy :: Proxy ModelList)
propMimeEq MimeJSON (Proxy :: Proxy ModelReturn)
propMimeEq MimeJSON (Proxy :: Proxy Name)
propMimeEq MimeJSON (Proxy :: Proxy NumberOnly)
propMimeEq MimeJSON (Proxy :: Proxy Order) propMimeEq MimeJSON (Proxy :: Proxy Order)
propMimeEq MimeJSON (Proxy :: Proxy OuterBoolean)
propMimeEq MimeJSON (Proxy :: Proxy OuterComposite)
propMimeEq MimeJSON (Proxy :: Proxy OuterEnum)
propMimeEq MimeJSON (Proxy :: Proxy OuterNumber)
propMimeEq MimeJSON (Proxy :: Proxy OuterString)
propMimeEq MimeJSON (Proxy :: Proxy Pet) propMimeEq MimeJSON (Proxy :: Proxy Pet)
propMimeEq MimeJSON (Proxy :: Proxy ReadOnlyFirst)
propMimeEq MimeJSON (Proxy :: Proxy SpecialModelName)
propMimeEq MimeJSON (Proxy :: Proxy Tag) propMimeEq MimeJSON (Proxy :: Proxy Tag)
propMimeEq MimeJSON (Proxy :: Proxy User) propMimeEq MimeJSON (Proxy :: Proxy User)
propMimeEq MimeJSON (Proxy :: Proxy Cat)
propMimeEq MimeJSON (Proxy :: Proxy Dog)