elm-pages 3.0.27 → 3.0.28

package/codegen/elm-pages-codegen.cjs

@@ -1458,7 +1458,7 @@ function _Json_runHelp(decoder, value)
 			// TODO test perf of Object.keys and switch when support is good enough
 			for (var key in value)
 			{
-				if (value.hasOwnProperty(key))
+				if (Object.prototype.hasOwnProperty.call(value, key))
 				{
 					var result = _Json_runHelp(decoder.b, value[key]);
 					if (!$elm$core$Result$isOk(result))
@@ -1627,7 +1627,11 @@ function _Json_emptyObject() { return {}; }
 
 var _Json_addField = F3(function(key, value, object)
 {
-	object[key] = _Json_unwrap(value);
+	var unwrapped = _Json_unwrap(value);
+	if (!(key === 'toJSON' && typeof unwrapped === 'function'))
+	{
+		object[key] = unwrapped;
+	}
 	return object;
 });
 
@@ -3160,11 +3164,13 @@ var $mdgriffith$elm_codegen$Internal$Compiler$uniqueHelp = F2($mdgriffith$elm_co
 var $mdgriffith$elm_codegen$Internal$Compiler$unique = function (list) {
 	return $mdgriffith$elm_codegen$Internal$Compiler$uniqueHelp$(list, _List_Nil);
 };
-var $mdgriffith$elm_codegen$Internal$Compiler$getGenerics = function (_v0) {
+var $mdgriffith$elm_codegen$Internal$Compiler$getGenerics$ = function (index, _v0) {
 	var details = _v0.a;
 	return $mdgriffith$elm_codegen$Internal$Compiler$unique(
-		$mdgriffith$elm_codegen$Internal$Compiler$getGenericsHelper(details.annotation));
+		$mdgriffith$elm_codegen$Internal$Compiler$getGenericsHelper(
+			details.annotation(index)));
 };
+var $mdgriffith$elm_codegen$Internal$Compiler$getGenerics = F2($mdgriffith$elm_codegen$Internal$Compiler$getGenerics$);
 var $elm$core$Dict$Black = {$: 'Black'};
 var $elm$core$Dict$RBNode_elm_builtin$ = function (a, b, c, d, e) {
 	return {$: 'RBNode_elm_builtin', a: a, b: b, c: c, d: d, e: e};
@@ -3270,17 +3276,17 @@ var $elm$core$Dict$insert$ = function (key, value, dict) {
 	}
 };
 var $elm$core$Dict$insert = F3($elm$core$Dict$insert$);
-var $mdgriffith$elm_codegen$Internal$Compiler$addAlias$ = function (mod, name, ann, aliasCache) {
+var $mdgriffith$elm_codegen$Internal$Compiler$addAlias$ = function (mod, name, index, ann, aliasCache) {
 	var annDetails = ann.a;
 	return $elm$core$Dict$insert$(
 		$mdgriffith$elm_codegen$Internal$Compiler$formatAliasKey$(mod, name),
 		{
-			target: annDetails.annotation,
-			variables: $mdgriffith$elm_codegen$Internal$Compiler$getGenerics(ann)
+			target: annDetails.annotation(index),
+			variables: $mdgriffith$elm_codegen$Internal$Compiler$getGenerics$(index, ann)
 		},
 		aliasCache);
 };
-var $mdgriffith$elm_codegen$Internal$Compiler$addAlias = F4($mdgriffith$elm_codegen$Internal$Compiler$addAlias$);
+var $mdgriffith$elm_codegen$Internal$Compiler$addAlias = F5($mdgriffith$elm_codegen$Internal$Compiler$addAlias$);
 var $elm$core$String$length = _String_length;
 var $elm$core$String$slice = _String_slice;
 var $elm$core$String$dropLeft$ = function (n, string) {
@@ -3302,18 +3308,20 @@ var $mdgriffith$elm_codegen$Internal$Format$formatType = function (str) {
 			$elm$core$String$left$(1, str)),
 		$elm$core$String$dropLeft$(1, str));
 };
-var $mdgriffith$elm_codegen$Internal$Compiler$getAliases = function (_v0) {
+var $mdgriffith$elm_codegen$Internal$Compiler$getAliases$ = function (index, _v0) {
 	var ann = _v0.a;
-	return ann.aliases;
+	return ann.aliases(index);
 };
+var $mdgriffith$elm_codegen$Internal$Compiler$getAliases = F2($mdgriffith$elm_codegen$Internal$Compiler$getAliases$);
 var $mdgriffith$elm_codegen$Internal$Compiler$getAnnotationImports = function (_v0) {
 	var details = _v0.a;
 	return details.imports;
 };
-var $mdgriffith$elm_codegen$Internal$Compiler$getInnerAnnotation = function (_v0) {
+var $mdgriffith$elm_codegen$Internal$Compiler$getInnerAnnotation$ = function (index, _v0) {
 	var details = _v0.a;
-	return details.annotation;
+	return details.annotation(index);
 };
+var $mdgriffith$elm_codegen$Internal$Compiler$getInnerAnnotation = F2($mdgriffith$elm_codegen$Internal$Compiler$getInnerAnnotation$);
 var $elm$core$Dict$foldl$ = function (func, acc, dict) {
 	foldl:
 	while (true) {
@@ -3357,28 +3365,36 @@ var $mdgriffith$elm_codegen$Internal$Compiler$nodify = function (exp) {
 var $mdgriffith$elm_codegen$Elm$Annotation$alias$ = function (mod, name, vars, target) {
 	return $mdgriffith$elm_codegen$Internal$Compiler$Annotation(
 		{
-			aliases: $mdgriffith$elm_codegen$Internal$Compiler$addAlias$(
-				mod,
-				name,
-				target,
-				$elm$core$List$foldl$(
-					F2(
-						function (ann, aliases) {
-							return A2(
-								$mdgriffith$elm_codegen$Internal$Compiler$mergeAliases,
-								$mdgriffith$elm_codegen$Internal$Compiler$getAliases(ann),
-								aliases);
-						}),
-					$mdgriffith$elm_codegen$Internal$Compiler$getAliases(target),
-					vars)),
-			annotation: $stil4m$elm_syntax$Elm$Syntax$TypeAnnotation$Typed$(
-				$mdgriffith$elm_codegen$Internal$Compiler$nodify(
-					_Utils_Tuple2(
-						mod,
-						$mdgriffith$elm_codegen$Internal$Format$formatType(name))),
-				$elm$core$List$map$(
-					A2($elm$core$Basics$composeL, $mdgriffith$elm_codegen$Internal$Compiler$nodify, $mdgriffith$elm_codegen$Internal$Compiler$getInnerAnnotation),
-					vars)),
+			aliases: function (index) {
+				return $mdgriffith$elm_codegen$Internal$Compiler$addAlias$(
+					mod,
+					name,
+					index,
+					target,
+					$elm$core$List$foldl$(
+						F2(
+							function (ann, aliases) {
+								return A2(
+									$mdgriffith$elm_codegen$Internal$Compiler$mergeAliases,
+									$mdgriffith$elm_codegen$Internal$Compiler$getAliases$(index, ann),
+									aliases);
+							}),
+						$mdgriffith$elm_codegen$Internal$Compiler$getAliases$(index, target),
+						vars));
+			},
+			annotation: function (index) {
+				return $stil4m$elm_syntax$Elm$Syntax$TypeAnnotation$Typed$(
+					$mdgriffith$elm_codegen$Internal$Compiler$nodify(
+						_Utils_Tuple2(
+							mod,
+							$mdgriffith$elm_codegen$Internal$Format$formatType(name))),
+					$elm$core$List$map$(
+						A2(
+							$elm$core$Basics$composeL,
+							$mdgriffith$elm_codegen$Internal$Compiler$nodify,
+							$mdgriffith$elm_codegen$Internal$Compiler$getInnerAnnotation(index)),
+						vars));
+			},
 			imports: function () {
 				if (!mod.b) {
 					return $elm$core$List$concatMap$($mdgriffith$elm_codegen$Internal$Compiler$getAnnotationImports, vars);
@@ -3396,32 +3412,57 @@ var $author$project$Gen$Html$moduleName_ = _List_fromArray(
 	['Html']);
 var $elm$core$Dict$empty = $elm$core$Dict$RBEmpty_elm_builtin;
 var $mdgriffith$elm_codegen$Internal$Compiler$emptyAliases = $elm$core$Dict$empty;
-var $mdgriffith$elm_codegen$Elm$Annotation$getAliases = function (_v0) {
+var $mdgriffith$elm_codegen$Elm$Annotation$getAliases$ = function (index, _v0) {
 	var ann = _v0.a;
-	return ann.aliases;
+	return ann.aliases(index);
+};
+var $mdgriffith$elm_codegen$Elm$Annotation$getAliases = F2($mdgriffith$elm_codegen$Elm$Annotation$getAliases$);
+var $mdgriffith$elm_codegen$Internal$Index$getImport$ = function (_v0, importedAs) {
+	var maybeModName = _v0.a;
+	if (maybeModName.$ === 'Just') {
+		var modName = maybeModName.a;
+		return _Utils_eq(modName, importedAs) ? _List_Nil : importedAs;
+	} else {
+		return importedAs;
+	}
+};
+var $mdgriffith$elm_codegen$Internal$Index$getImport = F2($mdgriffith$elm_codegen$Internal$Index$getImport$);
+var $elm$core$List$isEmpty = function (xs) {
+	if (!xs.b) {
+		return true;
+	} else {
+		return false;
+	}
 };
 var $mdgriffith$elm_codegen$Internal$Compiler$nodifyAll = $elm$core$List$map($mdgriffith$elm_codegen$Internal$Compiler$nodify);
 var $mdgriffith$elm_codegen$Elm$Annotation$namedWith$ = function (mod, name, args) {
 	return $mdgriffith$elm_codegen$Internal$Compiler$Annotation(
 		{
-			aliases: $elm$core$List$foldl$(
-				F2(
-					function (ann, aliases) {
-						return A2(
-							$mdgriffith$elm_codegen$Internal$Compiler$mergeAliases,
-							$mdgriffith$elm_codegen$Elm$Annotation$getAliases(ann),
-							aliases);
-					}),
-				$mdgriffith$elm_codegen$Internal$Compiler$emptyAliases,
-				args),
-			annotation: $stil4m$elm_syntax$Elm$Syntax$TypeAnnotation$Typed$(
-				$mdgriffith$elm_codegen$Internal$Compiler$nodify(
-					_Utils_Tuple2(
-						mod,
-						$mdgriffith$elm_codegen$Internal$Format$formatType(name))),
-				$mdgriffith$elm_codegen$Internal$Compiler$nodifyAll(
-					$elm$core$List$map$($mdgriffith$elm_codegen$Internal$Compiler$getInnerAnnotation, args))),
-			imports: A2(
+			aliases: function (index) {
+				return $elm$core$List$foldl$(
+					F2(
+						function (ann, aliases) {
+							return A2(
+								$mdgriffith$elm_codegen$Internal$Compiler$mergeAliases,
+								$mdgriffith$elm_codegen$Elm$Annotation$getAliases$(index, ann),
+								aliases);
+						}),
+					$mdgriffith$elm_codegen$Internal$Compiler$emptyAliases,
+					args);
+			},
+			annotation: function (index) {
+				var importFrom = $mdgriffith$elm_codegen$Internal$Index$getImport$(index, mod);
+				return $stil4m$elm_syntax$Elm$Syntax$TypeAnnotation$Typed$(
+					$mdgriffith$elm_codegen$Internal$Compiler$nodify(
+						_Utils_Tuple2(
+							importFrom,
+							$mdgriffith$elm_codegen$Internal$Format$formatType(name))),
+					$mdgriffith$elm_codegen$Internal$Compiler$nodifyAll(
+						$elm$core$List$map$(
+							$mdgriffith$elm_codegen$Internal$Compiler$getInnerAnnotation(index),
+							args)));
+			},
+			imports: $elm$core$List$isEmpty(mod) ? $elm$core$List$concatMap$($mdgriffith$elm_codegen$Internal$Compiler$getAnnotationImports, args) : A2(
 				$elm$core$List$cons,
 				mod,
 				$elm$core$List$concatMap$($mdgriffith$elm_codegen$Internal$Compiler$getAnnotationImports, args))
@@ -3478,9 +3519,13 @@ var $mdgriffith$elm_codegen$Internal$Format$formatValue = function (str) {
 var $mdgriffith$elm_codegen$Elm$Annotation$var = function (a) {
 	return $mdgriffith$elm_codegen$Internal$Compiler$Annotation(
 		{
-			aliases: $mdgriffith$elm_codegen$Internal$Compiler$emptyAliases,
-			annotation: $stil4m$elm_syntax$Elm$Syntax$TypeAnnotation$GenericType(
-				$mdgriffith$elm_codegen$Internal$Format$formatValue(a)),
+			aliases: function (_v0) {
+				return $mdgriffith$elm_codegen$Internal$Compiler$emptyAliases;
+			},
+			annotation: function (_v1) {
+				return $stil4m$elm_syntax$Elm$Syntax$TypeAnnotation$GenericType(
+					$mdgriffith$elm_codegen$Internal$Format$formatValue(a));
+			},
 			imports: _List_Nil
 		});
 };
@@ -5867,25 +5912,31 @@ var $mdgriffith$elm_codegen$Elm$apply = F2($mdgriffith$elm_codegen$Elm$apply$);
 var $mdgriffith$elm_codegen$Elm$Annotation$function$ = function (anns, _return) {
 	return $mdgriffith$elm_codegen$Internal$Compiler$Annotation(
 		{
-			aliases: $elm$core$List$foldl$(
-				F2(
-					function (ann, aliases) {
-						return A2(
-							$mdgriffith$elm_codegen$Internal$Compiler$mergeAliases,
-							$mdgriffith$elm_codegen$Elm$Annotation$getAliases(ann),
-							aliases);
-					}),
-				$mdgriffith$elm_codegen$Internal$Compiler$emptyAliases,
-				A2($elm$core$List$cons, _return, anns)),
-			annotation: $elm$core$List$foldr$(
-				F2(
-					function (ann, fn) {
-						return $stil4m$elm_syntax$Elm$Syntax$TypeAnnotation$FunctionTypeAnnotation$(
-							$mdgriffith$elm_codegen$Internal$Compiler$nodify(ann),
-							$mdgriffith$elm_codegen$Internal$Compiler$nodify(fn));
-					}),
-				$mdgriffith$elm_codegen$Internal$Compiler$getInnerAnnotation(_return),
-				$elm$core$List$map$($mdgriffith$elm_codegen$Internal$Compiler$getInnerAnnotation, anns)),
+			aliases: function (index) {
+				return $elm$core$List$foldl$(
+					F2(
+						function (ann, aliases) {
+							return A2(
+								$mdgriffith$elm_codegen$Internal$Compiler$mergeAliases,
+								$mdgriffith$elm_codegen$Elm$Annotation$getAliases$(index, ann),
+								aliases);
+						}),
+					$mdgriffith$elm_codegen$Internal$Compiler$emptyAliases,
+					A2($elm$core$List$cons, _return, anns));
+			},
+			annotation: function (index) {
+				return $elm$core$List$foldr$(
+					F2(
+						function (ann, fn) {
+							return $stil4m$elm_syntax$Elm$Syntax$TypeAnnotation$FunctionTypeAnnotation$(
+								$mdgriffith$elm_codegen$Internal$Compiler$nodify(ann),
+								$mdgriffith$elm_codegen$Internal$Compiler$nodify(fn));
+						}),
+					$mdgriffith$elm_codegen$Internal$Compiler$getInnerAnnotation$(index, _return),
+					$elm$core$List$map$(
+						$mdgriffith$elm_codegen$Internal$Compiler$getInnerAnnotation(index),
+						anns));
+			},
 			imports: _Utils_ap(
 				$mdgriffith$elm_codegen$Internal$Compiler$getAnnotationImports(_return),
 				$elm$core$List$concatMap$($mdgriffith$elm_codegen$Internal$Compiler$getAnnotationImports, anns))
@@ -5913,21 +5964,27 @@ var $mdgriffith$elm_codegen$Elm$string = function (literal) {
 var $mdgriffith$elm_codegen$Elm$Annotation$typed$ = function (mod, name, args) {
 	return $mdgriffith$elm_codegen$Internal$Compiler$Annotation(
 		{
-			aliases: $elm$core$List$foldl$(
-				F2(
-					function (ann, aliases) {
-						return A2(
-							$mdgriffith$elm_codegen$Internal$Compiler$mergeAliases,
-							$mdgriffith$elm_codegen$Elm$Annotation$getAliases(ann),
-							aliases);
-					}),
-				$mdgriffith$elm_codegen$Internal$Compiler$emptyAliases,
-				args),
-			annotation: $stil4m$elm_syntax$Elm$Syntax$TypeAnnotation$Typed$(
-				$mdgriffith$elm_codegen$Internal$Compiler$nodify(
-					_Utils_Tuple2(mod, name)),
-				$mdgriffith$elm_codegen$Internal$Compiler$nodifyAll(
-					$elm$core$List$map$($mdgriffith$elm_codegen$Internal$Compiler$getInnerAnnotation, args))),
+			aliases: function (index) {
+				return $elm$core$List$foldl$(
+					F2(
+						function (ann, aliases) {
+							return A2(
+								$mdgriffith$elm_codegen$Internal$Compiler$mergeAliases,
+								$mdgriffith$elm_codegen$Elm$Annotation$getAliases$(index, ann),
+								aliases);
+						}),
+					$mdgriffith$elm_codegen$Internal$Compiler$emptyAliases,
+					args);
+			},
+			annotation: function (index) {
+				return $stil4m$elm_syntax$Elm$Syntax$TypeAnnotation$Typed$(
+					$mdgriffith$elm_codegen$Internal$Compiler$nodify(
+						_Utils_Tuple2(mod, name)),
+					$mdgriffith$elm_codegen$Internal$Compiler$nodifyAll(
+						$elm$core$List$map$(
+							$mdgriffith$elm_codegen$Internal$Compiler$getInnerAnnotation(index),
+							args)));
+			},
 			imports: $elm$core$List$concatMap$($mdgriffith$elm_codegen$Internal$Compiler$getAnnotationImports, args)
 		});
 };
@@ -5937,16 +5994,6 @@ var $stil4m$elm_syntax$Elm$Syntax$Expression$FunctionOrValue$ = function (a, b)
 	return {$: 'FunctionOrValue', a: a, b: b};
 };
 var $stil4m$elm_syntax$Elm$Syntax$Expression$FunctionOrValue = F2($stil4m$elm_syntax$Elm$Syntax$Expression$FunctionOrValue$);
-var $mdgriffith$elm_codegen$Internal$Index$getImport$ = function (_v0, importedAs) {
-	var maybeModName = _v0.a;
-	if (maybeModName.$ === 'Just') {
-		var modName = maybeModName.a;
-		return _Utils_eq(modName, importedAs) ? _List_Nil : importedAs;
-	} else {
-		return importedAs;
-	}
-};
-var $mdgriffith$elm_codegen$Internal$Index$getImport = F2($mdgriffith$elm_codegen$Internal$Index$getImport$);
 var $mdgriffith$elm_codegen$Internal$Index$indexToString = function (_v0) {
 	var top = _v0.b;
 	var tail = _v0.c;
@@ -6071,9 +6118,11 @@ var $mdgriffith$elm_codegen$Internal$Compiler$protectField = F2($mdgriffith$elm_
 var $mdgriffith$elm_codegen$Internal$Compiler$getInnerInference$ = function (index, _v0) {
 	var details = _v0.a;
 	return {
-		aliases: details.aliases,
+		aliases: details.aliases(index),
 		inferences: $elm$core$Dict$empty,
-		type_: $mdgriffith$elm_codegen$Internal$Compiler$protectAnnotation$(index, details.annotation)
+		type_: $mdgriffith$elm_codegen$Internal$Compiler$protectAnnotation$(
+			index,
+			details.annotation(index))
 	};
 };
 var $mdgriffith$elm_codegen$Internal$Compiler$getInnerInference = F2($mdgriffith$elm_codegen$Internal$Compiler$getInnerInference$);
@@ -6170,17 +6219,21 @@ var $mdgriffith$elm_codegen$Elm$Annotation$int = $mdgriffith$elm_codegen$Elm$Ann
 var $mdgriffith$elm_codegen$Elm$Annotation$tuple$ = function (one, two) {
 	return $mdgriffith$elm_codegen$Internal$Compiler$Annotation(
 		{
-			aliases: A2(
-				$mdgriffith$elm_codegen$Internal$Compiler$mergeAliases,
-				$mdgriffith$elm_codegen$Elm$Annotation$getAliases(one),
-				$mdgriffith$elm_codegen$Elm$Annotation$getAliases(two)),
-			annotation: $stil4m$elm_syntax$Elm$Syntax$TypeAnnotation$Tupled(
-				$mdgriffith$elm_codegen$Internal$Compiler$nodifyAll(
-					_List_fromArray(
-						[
-							$mdgriffith$elm_codegen$Internal$Compiler$getInnerAnnotation(one),
-							$mdgriffith$elm_codegen$Internal$Compiler$getInnerAnnotation(two)
-						]))),
+			aliases: function (index) {
+				return A2(
+					$mdgriffith$elm_codegen$Internal$Compiler$mergeAliases,
+					$mdgriffith$elm_codegen$Elm$Annotation$getAliases$(index, one),
+					$mdgriffith$elm_codegen$Elm$Annotation$getAliases$(index, two));
+			},
+			annotation: function (index) {
+				return $stil4m$elm_syntax$Elm$Syntax$TypeAnnotation$Tupled(
+					$mdgriffith$elm_codegen$Internal$Compiler$nodifyAll(
+						_List_fromArray(
+							[
+								$mdgriffith$elm_codegen$Internal$Compiler$getInnerAnnotation$(index, one),
+								$mdgriffith$elm_codegen$Internal$Compiler$getInnerAnnotation$(index, two)
+							])));
+			},
 			imports: _Utils_ap(
 				$mdgriffith$elm_codegen$Internal$Compiler$getAnnotationImports(one),
 				$mdgriffith$elm_codegen$Internal$Compiler$getAnnotationImports(two))
@@ -15394,19 +15447,22 @@ var $mdgriffith$elm_codegen$Elm$customTypeWith$ = function (name, generics, vari
 				},
 				variants),
 			name: name,
-			toBody: function (_v1) {
+			toBody: function (index) {
 				return {
 					additionalImports: _List_Nil,
 					declaration: $stil4m$elm_syntax$Elm$Syntax$Declaration$CustomTypeDeclaration(
 						{
 							constructors: $elm$core$List$map$(
-								function (_v2) {
-									var varName = _v2.a;
-									var vars = _v2.b;
+								function (_v1) {
+									var varName = _v1.a;
+									var vars = _v1.b;
 									return $mdgriffith$elm_codegen$Internal$Compiler$nodify(
 										{
 											_arguments: $elm$core$List$map$(
-												A2($elm$core$Basics$composeR, $mdgriffith$elm_codegen$Internal$Compiler$getInnerAnnotation, $mdgriffith$elm_codegen$Internal$Compiler$nodify),
+												A2(
+													$elm$core$Basics$composeR,
+													$mdgriffith$elm_codegen$Internal$Compiler$getInnerAnnotation(index),
+													$mdgriffith$elm_codegen$Internal$Compiler$nodify),
 												vars),
 											name: $mdgriffith$elm_codegen$Internal$Compiler$nodify(
 												$mdgriffith$elm_codegen$Internal$Format$formatType(varName))
@@ -15418,9 +15474,11 @@ var $mdgriffith$elm_codegen$Elm$customTypeWith$ = function (name, generics, vari
 								{
 									keepExtra: true,
 									needed: $elm$core$List$concatMap$(
-										function (_v3) {
-											var listAnn = _v3.b;
-											return $elm$core$List$concatMap$($mdgriffith$elm_codegen$Internal$Compiler$getGenerics, listAnn);
+										function (_v2) {
+											var listAnn = _v2.b;
+											return $elm$core$List$concatMap$(
+												$mdgriffith$elm_codegen$Internal$Compiler$getGenerics(index),
+												listAnn);
 										},
 										variants),
 									requested: generics
@@ -15441,13 +15499,18 @@ var $mdgriffith$elm_codegen$Elm$customType = F2($mdgriffith$elm_codegen$Elm$cust
 var $mdgriffith$elm_codegen$Elm$Annotation$named$ = function (mod, name) {
 	return $mdgriffith$elm_codegen$Internal$Compiler$Annotation(
 		{
-			aliases: $mdgriffith$elm_codegen$Internal$Compiler$emptyAliases,
-			annotation: $stil4m$elm_syntax$Elm$Syntax$TypeAnnotation$Typed$(
-				$mdgriffith$elm_codegen$Internal$Compiler$nodify(
-					_Utils_Tuple2(
-						mod,
-						$mdgriffith$elm_codegen$Internal$Format$formatType(name))),
-				_List_Nil),
+			aliases: function (_v0) {
+				return $mdgriffith$elm_codegen$Internal$Compiler$emptyAliases;
+			},
+			annotation: function (index) {
+				var importFrom = $mdgriffith$elm_codegen$Internal$Index$getImport$(index, mod);
+				return $stil4m$elm_syntax$Elm$Syntax$TypeAnnotation$Typed$(
+					$mdgriffith$elm_codegen$Internal$Compiler$nodify(
+						_Utils_Tuple2(
+							importFrom,
+							$mdgriffith$elm_codegen$Internal$Format$formatType(name))),
+					_List_Nil);
+			},
 			imports: function () {
 				if (!mod.b) {
 					return _List_Nil;
@@ -16057,33 +16120,37 @@ var $mdgriffith$elm_codegen$Elm$exposeConstructor = $mdgriffith$elm_codegen$Inte
 var $mdgriffith$elm_codegen$Elm$Annotation$extensible$ = function (base, fields) {
 	return $mdgriffith$elm_codegen$Internal$Compiler$Annotation(
 		{
-			aliases: $elm$core$List$foldl$(
-				F2(
-					function (_v0, aliases) {
-						var ann = _v0.b;
-						return A2(
-							$mdgriffith$elm_codegen$Internal$Compiler$mergeAliases,
-							$mdgriffith$elm_codegen$Elm$Annotation$getAliases(ann),
-							aliases);
-					}),
-				$mdgriffith$elm_codegen$Internal$Compiler$emptyAliases,
-				fields),
-			annotation: $stil4m$elm_syntax$Elm$Syntax$TypeAnnotation$GenericRecord$(
-				$mdgriffith$elm_codegen$Internal$Compiler$nodify(
-					$mdgriffith$elm_codegen$Internal$Format$formatValue(base)),
-				$mdgriffith$elm_codegen$Internal$Compiler$nodify(
-					$mdgriffith$elm_codegen$Internal$Compiler$nodifyAll(
-						$elm$core$List$map$(
-							function (_v1) {
-								var name = _v1.a;
-								var ann = _v1.b;
-								return _Utils_Tuple2(
-									$mdgriffith$elm_codegen$Internal$Compiler$nodify(
-										$mdgriffith$elm_codegen$Internal$Format$formatValue(name)),
-									$mdgriffith$elm_codegen$Internal$Compiler$nodify(
-										$mdgriffith$elm_codegen$Internal$Compiler$getInnerAnnotation(ann)));
-							},
-							fields)))),
+			aliases: function (index) {
+				return $elm$core$List$foldl$(
+					F2(
+						function (_v0, aliases) {
+							var ann = _v0.b;
+							return A2(
+								$mdgriffith$elm_codegen$Internal$Compiler$mergeAliases,
+								$mdgriffith$elm_codegen$Elm$Annotation$getAliases$(index, ann),
+								aliases);
+						}),
+					$mdgriffith$elm_codegen$Internal$Compiler$emptyAliases,
+					fields);
+			},
+			annotation: function (index) {
+				return $stil4m$elm_syntax$Elm$Syntax$TypeAnnotation$GenericRecord$(
+					$mdgriffith$elm_codegen$Internal$Compiler$nodify(
+						$mdgriffith$elm_codegen$Internal$Format$formatValue(base)),
+					$mdgriffith$elm_codegen$Internal$Compiler$nodify(
+						$mdgriffith$elm_codegen$Internal$Compiler$nodifyAll(
+							$elm$core$List$map$(
+								function (_v1) {
+									var name = _v1.a;
+									var ann = _v1.b;
+									return _Utils_Tuple2(
+										$mdgriffith$elm_codegen$Internal$Compiler$nodify(
+											$mdgriffith$elm_codegen$Internal$Format$formatValue(name)),
+										$mdgriffith$elm_codegen$Internal$Compiler$nodify(
+											$mdgriffith$elm_codegen$Internal$Compiler$getInnerAnnotation$(index, ann)));
+								},
+								fields))));
+			},
 			imports: $elm$core$List$concatMap$(
 				A2($elm$core$Basics$composeR, $elm$core$Tuple$second, $mdgriffith$elm_codegen$Internal$Compiler$getAnnotationImports),
 				fields)
@@ -16139,7 +16206,9 @@ var $mdgriffith$elm_codegen$Internal$Render$dedupImports = function (mods) {
 			mods).b);
 };
 var $mdgriffith$elm_codegen$Internal$Comments$emptyComment = $mdgriffith$elm_codegen$Internal$Comments$Comment(_List_Nil);
-var $mdgriffith$elm_codegen$Internal$Render$RenderingDocsLine = {$: 'RenderingDocsLine'};
+var $mdgriffith$elm_codegen$Internal$Render$RenderingDocsLine = function (a) {
+	return {$: 'RenderingDocsLine', a: a};
+};
 var $elm$core$String$isEmpty = function (string) {
 	return string === '';
 };
@@ -16180,7 +16249,7 @@ var $mdgriffith$elm_codegen$Internal$Render$exposedGroupToMarkdown$ = function (
 						if (mode.$ === 'Normal') {
 							if ($elm$core$String$isEmpty(rendered)) {
 								var $temp$groups = rest,
-									$temp$mode = $mdgriffith$elm_codegen$Internal$Render$RenderingDocsLine,
+									$temp$mode = $mdgriffith$elm_codegen$Internal$Render$RenderingDocsLine(1),
 									$temp$rendered = '@docs ' + exposedName;
 								groups = $temp$groups;
 								mode = $temp$mode;
@@ -16188,7 +16257,7 @@ var $mdgriffith$elm_codegen$Internal$Render$exposedGroupToMarkdown$ = function (
 								continue exposedGroupToMarkdown;
 							} else {
 								var $temp$groups = rest,
-									$temp$mode = $mdgriffith$elm_codegen$Internal$Render$RenderingDocsLine,
+									$temp$mode = $mdgriffith$elm_codegen$Internal$Render$RenderingDocsLine(1),
 									$temp$rendered = rendered + ('\n\n@docs ' + exposedName);
 								groups = $temp$groups;
 								mode = $temp$mode;
@@ -16196,11 +16265,24 @@ var $mdgriffith$elm_codegen$Internal$Render$exposedGroupToMarkdown$ = function (
 								continue exposedGroupToMarkdown;
 							}
 						} else {
-							var $temp$groups = rest,
-								$temp$rendered = rendered + (', ' + exposedName);
-							groups = $temp$groups;
-							rendered = $temp$rendered;
-							continue exposedGroupToMarkdown;
+							var docsItemCount = mode.a;
+							if (docsItemCount > 5) {
+								var $temp$groups = rest,
+									$temp$mode = $mdgriffith$elm_codegen$Internal$Render$RenderingDocsLine(1),
+									$temp$rendered = rendered + ('\n@docs ' + exposedName);
+								groups = $temp$groups;
+								mode = $temp$mode;
+								rendered = $temp$rendered;
+								continue exposedGroupToMarkdown;
+							} else {
+								var $temp$groups = rest,
+									$temp$mode = $mdgriffith$elm_codegen$Internal$Render$RenderingDocsLine(docsItemCount + 1),
+									$temp$rendered = rendered + (', ' + exposedName);
+								groups = $temp$groups;
+								mode = $temp$mode;
+								rendered = $temp$rendered;
+								continue exposedGroupToMarkdown;
+							}
 						}
 					} else {
 						var $temp$groups = rest;
@@ -16287,6 +16369,21 @@ var $mdgriffith$elm_codegen$Internal$Render$getExposedGroups$ = function (decl,
 	}
 };
 var $mdgriffith$elm_codegen$Internal$Render$getExposedGroups = F2($mdgriffith$elm_codegen$Internal$Render$getExposedGroups$);
+var $mdgriffith$elm_codegen$Internal$Compiler$nodeAtLine$ = function (line, exp) {
+	return $stil4m$elm_syntax$Elm$Syntax$Node$Node$(
+		{
+			end: {column: 0, row: line},
+			start: {column: 0, row: line}
+		},
+		exp);
+};
+var $mdgriffith$elm_codegen$Internal$Compiler$nodeAtLine = F2($mdgriffith$elm_codegen$Internal$Compiler$nodeAtLine$);
+var $mdgriffith$elm_codegen$Internal$Render$groupExposedItems$ = function (line, group) {
+	return $elm$core$List$map$(
+		$mdgriffith$elm_codegen$Internal$Compiler$nodeAtLine(line),
+		group.exposed);
+};
+var $mdgriffith$elm_codegen$Internal$Render$groupExposedItems = F2($mdgriffith$elm_codegen$Internal$Render$groupExposedItems$);
 var $stil4m$elm_syntax$Elm$Syntax$Exposing$InfixExpose = function (a) {
 	return {$: 'InfixExpose', a: a};
 };
@@ -16523,11 +16620,40 @@ var $stil4m$elm_syntax$Elm$Syntax$Exposing$TypeExpose = function (a) {
 var $stil4m$elm_syntax$Elm$Syntax$Exposing$TypeOrAliasExpose = function (a) {
 	return {$: 'TypeOrAliasExpose', a: a};
 };
-var $mdgriffith$elm_codegen$Internal$Render$addExposed$ = function (exposed, declaration, otherExposes) {
+var $mdgriffith$elm_codegen$Internal$Render$addExposed$ = function (exposePath, exposed, declaration, otherExposes) {
 	if (exposed.$ === 'NotExposed') {
 		return otherExposes;
 	} else {
 		var details = exposed.a;
+		var addToExposedCollection = function (_new) {
+			if (!otherExposes.b) {
+				return _List_fromArray(
+					[
+						{
+						exposed: _List_fromArray(
+							[_new]),
+						id: exposePath
+					}
+					]);
+			} else {
+				var top = otherExposes.a;
+				var rest = otherExposes.b;
+				return _Utils_eq(top.id, exposePath) ? A2(
+					$elm$core$List$cons,
+					{
+						exposed: A2($elm$core$List$cons, _new, top.exposed),
+						id: top.id
+					},
+					rest) : A2(
+					$elm$core$List$cons,
+					{
+						exposed: _List_fromArray(
+							[_new]),
+						id: exposePath
+					},
+					otherExposes);
+			}
+		};
 		switch (declaration.$) {
 			case 'FunctionDeclaration':
 				var fn = declaration.a;
@@ -16536,38 +16662,28 @@ var $mdgriffith$elm_codegen$Internal$Render$addExposed$ = function (exposed, dec
 						return $.name;
 					}(
 						$mdgriffith$elm_codegen$Internal$Compiler$denode(fn.declaration)));
-				return A2(
-					$elm$core$List$cons,
-					$stil4m$elm_syntax$Elm$Syntax$Exposing$FunctionExpose(fnName),
-					otherExposes);
+				return addToExposedCollection(
+					$stil4m$elm_syntax$Elm$Syntax$Exposing$FunctionExpose(fnName));
 			case 'AliasDeclaration':
 				var synonym = declaration.a;
 				var aliasName = $mdgriffith$elm_codegen$Internal$Compiler$denode(synonym.name);
-				return A2(
-					$elm$core$List$cons,
-					$stil4m$elm_syntax$Elm$Syntax$Exposing$TypeOrAliasExpose(aliasName),
-					otherExposes);
+				return addToExposedCollection(
+					$stil4m$elm_syntax$Elm$Syntax$Exposing$TypeOrAliasExpose(aliasName));
 			case 'CustomTypeDeclaration':
 				var myType = declaration.a;
 				var typeName = $mdgriffith$elm_codegen$Internal$Compiler$denode(myType.name);
-				return details.exposeConstructor ? A2(
-					$elm$core$List$cons,
+				return details.exposeConstructor ? addToExposedCollection(
 					$stil4m$elm_syntax$Elm$Syntax$Exposing$TypeExpose(
 						{
 							name: typeName,
 							open: $elm$core$Maybe$Just($stil4m$elm_syntax$Elm$Syntax$Range$emptyRange)
-						}),
-					otherExposes) : A2(
-					$elm$core$List$cons,
-					$stil4m$elm_syntax$Elm$Syntax$Exposing$TypeOrAliasExpose(typeName),
-					otherExposes);
+						})) : addToExposedCollection(
+					$stil4m$elm_syntax$Elm$Syntax$Exposing$TypeOrAliasExpose(typeName));
 			case 'PortDeclaration':
 				var myPort = declaration.a;
 				var typeName = $mdgriffith$elm_codegen$Internal$Compiler$denode(myPort.name);
-				return A2(
-					$elm$core$List$cons,
-					$stil4m$elm_syntax$Elm$Syntax$Exposing$FunctionExpose(typeName),
-					otherExposes);
+				return addToExposedCollection(
+					$stil4m$elm_syntax$Elm$Syntax$Exposing$FunctionExpose(typeName));
 			case 'InfixDeclaration':
 				return otherExposes;
 			default:
@@ -16575,7 +16691,7 @@ var $mdgriffith$elm_codegen$Internal$Render$addExposed$ = function (exposed, dec
 		}
 	}
 };
-var $mdgriffith$elm_codegen$Internal$Render$addExposed = F3($mdgriffith$elm_codegen$Internal$Render$addExposed$);
+var $mdgriffith$elm_codegen$Internal$Render$addExposed = F4($mdgriffith$elm_codegen$Internal$Render$addExposed$);
 var $mdgriffith$elm_codegen$Internal$Render$renderDecls$ = function (fileDetails, decl, gathered) {
 	switch (decl.$) {
 		case 'Comment':
@@ -16609,7 +16725,8 @@ var $mdgriffith$elm_codegen$Internal$Render$renderDecls$ = function (fileDetails
 					$mdgriffith$elm_codegen$Internal$Compiler$RenderedDecl(
 						$mdgriffith$elm_codegen$Internal$Render$addDocs$(decDetails.docs, result.declaration)),
 					gathered.declarations),
-				exposed: $mdgriffith$elm_codegen$Internal$Render$addExposed$(decDetails.exposed, result.declaration, gathered.exposed),
+				exposePath: gathered.exposePath,
+				exposed: $mdgriffith$elm_codegen$Internal$Render$addExposed$(gathered.exposePath, decDetails.exposed, result.declaration, gathered.exposed),
 				hasPorts: function () {
 					if (gathered.hasPorts) {
 						return gathered.hasPorts;
@@ -16637,10 +16754,31 @@ var $mdgriffith$elm_codegen$Internal$Render$renderDecls$ = function (fileDetails
 			};
 		default:
 			var groupDecls = decl.a;
-			return $elm$core$List$foldl$(
-				$mdgriffith$elm_codegen$Internal$Render$renderDecls(fileDetails),
-				gathered,
-				groupDecls);
+			var incrementExposePath = function (g) {
+				return _Utils_update(
+					g,
+					{
+						exposePath: function () {
+							var _v3 = g.exposePath;
+							if (!_v3.b) {
+								return _List_Nil;
+							} else {
+								var top = _v3.a;
+								var remain = _v3.b;
+								return A2($elm$core$List$cons, top + 1, remain);
+							}
+						}()
+					});
+			};
+			return incrementExposePath(
+				$elm$core$List$foldl$(
+					$mdgriffith$elm_codegen$Internal$Render$renderDecls(fileDetails),
+					_Utils_update(
+						gathered,
+						{
+							exposePath: A2($elm$core$List$cons, 0, gathered.exposePath)
+						}),
+					groupDecls));
 	}
 };
 var $mdgriffith$elm_codegen$Internal$Render$renderDecls = F3($mdgriffith$elm_codegen$Internal$Render$renderDecls$);
@@ -16650,13 +16788,7 @@ var $the_sett$elm_pretty_printer$Internals$Concatenate$ = function (a, b) {
 };
 var $the_sett$elm_pretty_printer$Internals$Concatenate = F2($the_sett$elm_pretty_printer$Internals$Concatenate$);
 var $the_sett$elm_pretty_printer$Pretty$append$ = function (doc1, doc2) {
-	return $the_sett$elm_pretty_printer$Internals$Concatenate$(
-		function (_v0) {
-			return doc1;
-		},
-		function (_v1) {
-			return doc2;
-		});
+	return $the_sett$elm_pretty_printer$Internals$Concatenate$(doc1, doc2);
 };
 var $the_sett$elm_pretty_printer$Pretty$append = F2($the_sett$elm_pretty_printer$Pretty$append$);
 var $elm_community$basics_extra$Basics$Extra$flip$ = function (f, b, a) {
@@ -17187,11 +17319,7 @@ var $the_sett$elm_pretty_printer$Internals$Nest$ = function (a, b) {
 };
 var $the_sett$elm_pretty_printer$Internals$Nest = F2($the_sett$elm_pretty_printer$Internals$Nest$);
 var $the_sett$elm_pretty_printer$Pretty$nest$ = function (depth, doc) {
-	return $the_sett$elm_pretty_printer$Internals$Nest$(
-		depth,
-		function (_v0) {
-			return doc;
-		});
+	return $the_sett$elm_pretty_printer$Internals$Nest$(depth, doc);
 };
 var $the_sett$elm_pretty_printer$Pretty$nest = F2($the_sett$elm_pretty_printer$Pretty$nest$);
 var $mdgriffith$elm_codegen$Internal$Write$prettyDocumentation = function (docs) {
@@ -17208,30 +17336,76 @@ var $the_sett$elm_pretty_printer$Internals$flatten = function (doc) {
 			case 'Concatenate':
 				var doc1 = doc.a;
 				var doc2 = doc.b;
-				return $the_sett$elm_pretty_printer$Internals$Concatenate$(
-					function (_v1) {
-						return $the_sett$elm_pretty_printer$Internals$flatten(
-							doc1(_Utils_Tuple0));
-					},
-					function (_v2) {
-						return $the_sett$elm_pretty_printer$Internals$flatten(
-							doc2(_Utils_Tuple0));
+				var go = F2(
+					function (queue, acc) {
+						go:
+						while (true) {
+							if (!queue.b) {
+								if (!acc.b) {
+									return $the_sett$elm_pretty_printer$Internals$Empty;
+								} else {
+									var h = acc.a;
+									var t = acc.b;
+									return $elm$core$List$foldl$($the_sett$elm_pretty_printer$Internals$Concatenate, h, t);
+								}
+							} else {
+								if (queue.a.$ === 'Concatenate') {
+									var _v3 = queue.a;
+									var h1 = _v3.a;
+									var h2 = _v3.b;
+									var t = queue.b;
+									var $temp$queue = A2(
+										$elm$core$List$cons,
+										h1,
+										A2($elm$core$List$cons, h2, t));
+									queue = $temp$queue;
+									continue go;
+								} else {
+									var h = queue.a;
+									var t = queue.b;
+									var $temp$queue = t,
+										$temp$acc = A2(
+										$elm$core$List$cons,
+										$the_sett$elm_pretty_printer$Internals$flatten(h),
+										acc);
+									queue = $temp$queue;
+									acc = $temp$acc;
+									continue go;
+								}
+							}
+						}
 					});
+				return A2(
+					go,
+					_List_fromArray(
+						[doc1, doc2]),
+					_List_Nil);
 			case 'Nest':
-				var i = doc.a;
-				var doc1 = doc.b;
-				return $the_sett$elm_pretty_printer$Internals$Nest$(
-					i,
-					function (_v3) {
-						return $the_sett$elm_pretty_printer$Internals$flatten(
-							doc1(_Utils_Tuple0));
-					});
+				if (doc.b.$ === 'Nest') {
+					var i = doc.a;
+					var _v4 = doc.b;
+					var j = _v4.a;
+					var doc1 = _v4.b;
+					var $temp$doc = $the_sett$elm_pretty_printer$Internals$Nest$(i + j, doc1);
+					doc = $temp$doc;
+					continue flatten;
+				} else {
+					var i = doc.a;
+					var doc1 = doc.b;
+					return $the_sett$elm_pretty_printer$Internals$Nest$(
+						i,
+						$the_sett$elm_pretty_printer$Internals$flatten(doc1));
+				}
 			case 'Union':
 				var doc1 = doc.a;
-				var doc2 = doc.b;
 				var $temp$doc = doc1;
 				doc = $temp$doc;
 				continue flatten;
+			case 'FlatAlt':
+				var flatDoc = doc.a;
+				var $temp$doc = flatDoc;
+				doc = $temp$doc;
+				continue flatten;
 			case 'Line':
 				var hsep = doc.a;
 				return $the_sett$elm_pretty_printer$Internals$Text$(hsep, $elm$core$Maybe$Nothing);
@@ -17629,12 +17803,6 @@ var $mdgriffith$elm_codegen$Internal$Write$escapeChar = function (val) {
 	}
 };
 var $elm$core$String$fromFloat = _String_fromNumber;
-var $the_sett$elm_pretty_printer$Internals$copy$ = function (i, s) {
-	return (!i) ? '' : _Utils_ap(
-		s,
-		$the_sett$elm_pretty_printer$Internals$copy$(i - 1, s));
-};
-var $the_sett$elm_pretty_printer$Internals$copy = F2($the_sett$elm_pretty_printer$Internals$copy$);
 var $the_sett$elm_pretty_printer$Pretty$hang$ = function (spaces, doc) {
 	return $the_sett$elm_pretty_printer$Pretty$align(
 		$the_sett$elm_pretty_printer$Pretty$nest$(spaces, doc));
@@ -17645,7 +17813,7 @@ var $the_sett$elm_pretty_printer$Pretty$indent$ = function (spaces, doc) {
 		spaces,
 		$the_sett$elm_pretty_printer$Pretty$append$(
 			$the_sett$elm_pretty_printer$Pretty$string(
-				$the_sett$elm_pretty_printer$Internals$copy$(spaces, ' ')),
+				$elm$core$String$repeat$(spaces, ' ')),
 			doc));
 };
 var $the_sett$elm_pretty_printer$Pretty$indent = F2($the_sett$elm_pretty_printer$Pretty$indent$);
@@ -18918,58 +19086,57 @@ var $mdgriffith$elm_codegen$Internal$Write$prettyElmSyntaxDeclaration$ = functio
 };
 var $mdgriffith$elm_codegen$Internal$Write$prettyElmSyntaxDeclaration = F2($mdgriffith$elm_codegen$Internal$Write$prettyElmSyntaxDeclaration$);
 var $mdgriffith$elm_codegen$Internal$Write$prettyDeclarations$ = function (aliases, decls) {
-	return $elm$core$List$foldl$(
+	return $elm$core$List$foldr$(
 		$elm$core$Basics$apL,
 		$the_sett$elm_pretty_printer$Pretty$empty,
-		$elm$core$List$reverse(
-			$elm$core$List$drop$(
-				1,
-				$elm$core$List$reverse(
-					$elm$core$List$concatMap$(
-						function (decl) {
-							switch (decl.$) {
-								case 'RenderedComment':
-									var content = decl.a;
-									return _List_fromArray(
-										[
-											$the_sett$elm_pretty_printer$Pretty$a(
-											$the_sett$elm_pretty_printer$Pretty$string(content + '\n')),
-											A2(
-											$elm$core$Basics$composeR,
-											$the_sett$elm_pretty_printer$Pretty$a($the_sett$elm_pretty_printer$Pretty$line),
-											$the_sett$elm_pretty_printer$Pretty$a($the_sett$elm_pretty_printer$Pretty$line))
-										]);
-								case 'RenderedBlock':
-									var source = decl.a;
-									return _List_fromArray(
-										[
-											$the_sett$elm_pretty_printer$Pretty$a(
-											$the_sett$elm_pretty_printer$Pretty$string(source)),
-											A2(
+		$elm$core$List$drop$(
+			1,
+			$elm$core$List$reverse(
+				$elm$core$List$concatMap$(
+					function (decl) {
+						switch (decl.$) {
+							case 'RenderedComment':
+								var content = decl.a;
+								return _List_fromArray(
+									[
+										$the_sett$elm_pretty_printer$Pretty$a(
+										$the_sett$elm_pretty_printer$Pretty$string(content + '\n')),
+										A2(
+										$elm$core$Basics$composeR,
+										$the_sett$elm_pretty_printer$Pretty$a($the_sett$elm_pretty_printer$Pretty$line),
+										$the_sett$elm_pretty_printer$Pretty$a($the_sett$elm_pretty_printer$Pretty$line))
+									]);
+							case 'RenderedBlock':
+								var source = decl.a;
+								return _List_fromArray(
+									[
+										$the_sett$elm_pretty_printer$Pretty$a(
+										$the_sett$elm_pretty_printer$Pretty$string(source)),
+										A2(
+										$elm$core$Basics$composeR,
+										$the_sett$elm_pretty_printer$Pretty$a($the_sett$elm_pretty_printer$Pretty$line),
+										A2(
 											$elm$core$Basics$composeR,
 											$the_sett$elm_pretty_printer$Pretty$a($the_sett$elm_pretty_printer$Pretty$line),
-											A2(
-												$elm$core$Basics$composeR,
-												$the_sett$elm_pretty_printer$Pretty$a($the_sett$elm_pretty_printer$Pretty$line),
-												$the_sett$elm_pretty_printer$Pretty$a($the_sett$elm_pretty_printer$Pretty$line)))
-										]);
-								default:
-									var innerDecl = decl.a;
-									return _List_fromArray(
-										[
-											$the_sett$elm_pretty_printer$Pretty$a(
-											$mdgriffith$elm_codegen$Internal$Write$prettyElmSyntaxDeclaration$(aliases, innerDecl)),
-											A2(
+											$the_sett$elm_pretty_printer$Pretty$a($the_sett$elm_pretty_printer$Pretty$line)))
+									]);
+							default:
+								var innerDecl = decl.a;
+								return _List_fromArray(
+									[
+										$the_sett$elm_pretty_printer$Pretty$a(
+										$mdgriffith$elm_codegen$Internal$Write$prettyElmSyntaxDeclaration$(aliases, innerDecl)),
+										A2(
+										$elm$core$Basics$composeR,
+										$the_sett$elm_pretty_printer$Pretty$a($the_sett$elm_pretty_printer$Pretty$line),
+										A2(
 											$elm$core$Basics$composeR,
 											$the_sett$elm_pretty_printer$Pretty$a($the_sett$elm_pretty_printer$Pretty$line),
-											A2(
-												$elm$core$Basics$composeR,
-												$the_sett$elm_pretty_printer$Pretty$a($the_sett$elm_pretty_printer$Pretty$line),
-												$the_sett$elm_pretty_printer$Pretty$a($the_sett$elm_pretty_printer$Pretty$line)))
-										]);
-							}
-						},
-						decls)))));
+											$the_sett$elm_pretty_printer$Pretty$a($the_sett$elm_pretty_printer$Pretty$line)))
+									]);
+						}
+					},
+					decls))));
 };
 var $mdgriffith$elm_codegen$Internal$Write$prettyDeclarations = F2($mdgriffith$elm_codegen$Internal$Write$prettyDeclarations$);
 var $mdgriffith$elm_codegen$Internal$Comments$delimeters = function (doc) {
@@ -19117,188 +19284,227 @@ var $mdgriffith$elm_codegen$Internal$Comments$layoutTags$ = function (width, par
 		$mdgriffith$elm_codegen$Internal$Comments$mergeDocTags(parts));
 };
 var $mdgriffith$elm_codegen$Internal$Comments$layoutTags = F2($mdgriffith$elm_codegen$Internal$Comments$layoutTags$);
-var $the_sett$elm_pretty_printer$Internals$NLine$ = function (a, b, c) {
-	return {$: 'NLine', a: a, b: b, c: c};
+var $the_sett$elm_pretty_printer$Internals$LLine$ = function (a, b, c) {
+	return {$: 'LLine', a: a, b: b, c: c};
 };
-var $the_sett$elm_pretty_printer$Internals$NLine = F3($the_sett$elm_pretty_printer$Internals$NLine$);
+var $the_sett$elm_pretty_printer$Internals$LLine = F3($the_sett$elm_pretty_printer$Internals$LLine$);
+var $the_sett$elm_pretty_printer$Internals$LText$ = function (a, b, c) {
+	return {$: 'LText', a: a, b: b, c: c};
+};
+var $the_sett$elm_pretty_printer$Internals$LText = F3($the_sett$elm_pretty_printer$Internals$LText$);
 var $the_sett$elm_pretty_printer$Internals$NNil = {$: 'NNil'};
 var $the_sett$elm_pretty_printer$Internals$NText$ = function (a, b, c) {
 	return {$: 'NText', a: a, b: b, c: c};
 };
 var $the_sett$elm_pretty_printer$Internals$NText = F3($the_sett$elm_pretty_printer$Internals$NText$);
-var $the_sett$elm_pretty_printer$Internals$fits$ = function (w, normal) {
-	fits:
-	while (true) {
-		if (w < 0) {
-			return false;
-		} else {
-			switch (normal.$) {
-				case 'NNil':
-					return true;
-				case 'NText':
-					var text = normal.a;
-					var innerNormal = normal.b;
-					var $temp$w = w - $elm$core$String$length(text),
-						$temp$normal = innerNormal(_Utils_Tuple0);
-					w = $temp$w;
-					normal = $temp$normal;
-					continue fits;
-				default:
-					return true;
-			}
+var $the_sett$elm_pretty_printer$Internals$fits$ = function (w, norm) {
+	if (w < 0) {
+		return _Utils_Tuple2(false, norm);
+	} else {
+		switch (norm.$) {
+			case 'NNil':
+				return _Utils_Tuple2(true, norm);
+			case 'NText':
+				var text = norm.a;
+				var norm1 = norm.b;
+				var tag = norm.c;
+				var _v1 = $the_sett$elm_pretty_printer$Internals$fits$(
+					w - $elm$core$String$length(text),
+					norm1);
+				var b = _v1.a;
+				var rest = _v1.b;
+				return _Utils_Tuple2(
+					b,
+					$the_sett$elm_pretty_printer$Internals$NText$(text, rest, tag));
+			case 'LText':
+				var text = norm.a;
+				var thunk = norm.b;
+				var tag = norm.c;
+				var norm1 = thunk(_Utils_Tuple0);
+				var _v2 = $the_sett$elm_pretty_printer$Internals$fits$(
+					w - $elm$core$String$length(text),
+					norm1);
+				var b = _v2.a;
+				var rest = _v2.b;
+				return _Utils_Tuple2(
+					b,
+					$the_sett$elm_pretty_printer$Internals$NText$(text, rest, tag));
+			case 'NLine':
+				return _Utils_Tuple2(true, norm);
+			default:
+				return _Utils_Tuple2(true, norm);
 		}
 	}
 };
 var $the_sett$elm_pretty_printer$Internals$fits = F2($the_sett$elm_pretty_printer$Internals$fits$);
-var $the_sett$elm_pretty_printer$Internals$better$ = function (w, k, doc, doc2Fn) {
-	return $the_sett$elm_pretty_printer$Internals$fits$(w - k, doc) ? doc : doc2Fn(_Utils_Tuple0);
+var $elm$core$Basics$min$ = function (x, y) {
+	return (_Utils_cmp(x, y) < 0) ? x : y;
+};
+var $elm$core$Basics$min = F2($elm$core$Basics$min$);
+var $the_sett$elm_pretty_printer$Internals$better$ = function (w, r, i, k, norm, thunk) {
+	var effectiveWidth = $elm$core$Basics$min$(w, i + r);
+	var _v0 = $the_sett$elm_pretty_printer$Internals$fits$(effectiveWidth - k, norm);
+	if (_v0.a) {
+		var norm1 = _v0.b;
+		return norm1;
+	} else {
+		return thunk(_Utils_Tuple0);
+	}
 };
-var $the_sett$elm_pretty_printer$Internals$better = F4($the_sett$elm_pretty_printer$Internals$better$);
-var $the_sett$elm_pretty_printer$Internals$best$ = function (width, startCol, x) {
-	var be = F3(
-		function (w, k, docs) {
-			be:
-			while (true) {
-				if (!docs.b) {
-					return $the_sett$elm_pretty_printer$Internals$NNil;
-				} else {
-					switch (docs.a.b.$) {
-						case 'Empty':
-							var _v1 = docs.a;
-							var i = _v1.a;
-							var _v2 = _v1.b;
-							var ds = docs.b;
-							var $temp$docs = ds;
-							docs = $temp$docs;
-							continue be;
-						case 'Concatenate':
-							var _v3 = docs.a;
-							var i = _v3.a;
-							var _v4 = _v3.b;
-							var doc = _v4.a;
-							var doc2 = _v4.b;
-							var ds = docs.b;
-							var $temp$docs = A2(
-								$elm$core$List$cons,
-								_Utils_Tuple2(
-									i,
-									doc(_Utils_Tuple0)),
-								A2(
-									$elm$core$List$cons,
-									_Utils_Tuple2(
-										i,
-										doc2(_Utils_Tuple0)),
-									ds));
-							docs = $temp$docs;
-							continue be;
-						case 'Nest':
-							var _v5 = docs.a;
-							var i = _v5.a;
-							var _v6 = _v5.b;
-							var j = _v6.a;
-							var doc = _v6.b;
-							var ds = docs.b;
-							var $temp$docs = A2(
-								$elm$core$List$cons,
-								_Utils_Tuple2(
-									i + j,
-									doc(_Utils_Tuple0)),
+var $the_sett$elm_pretty_printer$Internals$better = F6($the_sett$elm_pretty_printer$Internals$better$);
+var $the_sett$elm_pretty_printer$Internals$be$ = function (w, r, k, docs) {
+	be:
+	while (true) {
+		if (!docs.b) {
+			return $the_sett$elm_pretty_printer$Internals$NNil;
+		} else {
+			switch (docs.a.b.$) {
+				case 'Empty':
+					var _v1 = docs.a;
+					var i = _v1.a;
+					var _v2 = _v1.b;
+					var ds = docs.b;
+					var $temp$docs = ds;
+					docs = $temp$docs;
+					continue be;
+				case 'Concatenate':
+					var _v3 = docs.a;
+					var i = _v3.a;
+					var _v4 = _v3.b;
+					var doc1 = _v4.a;
+					var doc2 = _v4.b;
+					var ds = docs.b;
+					var $temp$docs = A2(
+						$elm$core$List$cons,
+						_Utils_Tuple2(i, doc1),
+						A2(
+							$elm$core$List$cons,
+							_Utils_Tuple2(i, doc2),
+							ds));
+					docs = $temp$docs;
+					continue be;
+				case 'Nest':
+					var _v5 = docs.a;
+					var i = _v5.a;
+					var _v6 = _v5.b;
+					var j = _v6.a;
+					var doc = _v6.b;
+					var ds = docs.b;
+					var $temp$docs = A2(
+						$elm$core$List$cons,
+						_Utils_Tuple2(i + j, doc),
+						ds);
+					docs = $temp$docs;
+					continue be;
+				case 'Text':
+					var _v7 = docs.a;
+					var i = _v7.a;
+					var _v8 = _v7.b;
+					var text = _v8.a;
+					var maybeTag = _v8.b;
+					var ds = docs.b;
+					return $the_sett$elm_pretty_printer$Internals$LText$(
+						text,
+						function (_v9) {
+							return $the_sett$elm_pretty_printer$Internals$be$(
+								w,
+								r,
+								k + $elm$core$String$length(text),
 								ds);
-							docs = $temp$docs;
-							continue be;
-						case 'Text':
-							var _v7 = docs.a;
-							var i = _v7.a;
-							var _v8 = _v7.b;
-							var text = _v8.a;
-							var maybeTag = _v8.b;
-							var ds = docs.b;
-							return $the_sett$elm_pretty_printer$Internals$NText$(
-								text,
-								function (_v9) {
-									return A3(
-										be,
-										w,
-										k + $elm$core$String$length(text),
-										ds);
-								},
-								maybeTag);
-						case 'Line':
-							var _v10 = docs.a;
-							var i = _v10.a;
-							var _v11 = _v10.b;
-							var vsep = _v11.b;
-							var ds = docs.b;
-							return $the_sett$elm_pretty_printer$Internals$NLine$(
-								i,
-								vsep,
-								function (_v12) {
-									return A3(
-										be,
-										w,
-										i + $elm$core$String$length(vsep),
-										ds);
-								});
-						case 'Union':
-							var _v13 = docs.a;
-							var i = _v13.a;
-							var _v14 = _v13.b;
-							var doc = _v14.a;
-							var doc2 = _v14.b;
-							var ds = docs.b;
-							return $the_sett$elm_pretty_printer$Internals$better$(
+						},
+						maybeTag);
+				case 'Line':
+					var _v10 = docs.a;
+					var i = _v10.a;
+					var _v11 = _v10.b;
+					var vsep = _v11.b;
+					var ds = docs.b;
+					return $the_sett$elm_pretty_printer$Internals$LLine$(
+						i,
+						vsep,
+						function (_v12) {
+							return $the_sett$elm_pretty_printer$Internals$be$(
 								w,
-								k,
-								A3(
-									be,
-									w,
-									k,
-									A2(
-										$elm$core$List$cons,
-										_Utils_Tuple2(i, doc),
-										ds)),
-								function (_v15) {
-									return A3(
-										be,
-										w,
-										k,
-										A2(
-											$elm$core$List$cons,
-											_Utils_Tuple2(i, doc2),
-											ds));
-								});
-						case 'Nesting':
-							var _v16 = docs.a;
-							var i = _v16.a;
-							var fn = _v16.b.a;
-							var ds = docs.b;
-							var $temp$docs = A2(
-								$elm$core$List$cons,
-								_Utils_Tuple2(
-									i,
-									fn(i)),
+								r,
+								i + $elm$core$String$length(vsep),
 								ds);
-							docs = $temp$docs;
-							continue be;
-						default:
-							var _v17 = docs.a;
-							var i = _v17.a;
-							var fn = _v17.b.a;
-							var ds = docs.b;
-							var $temp$docs = A2(
+						});
+				case 'Union':
+					var _v13 = docs.a;
+					var i = _v13.a;
+					var _v14 = _v13.b;
+					var doc1 = _v14.a;
+					var doc2 = _v14.b;
+					var ds = docs.b;
+					return $the_sett$elm_pretty_printer$Internals$better$(
+						w,
+						r,
+						i,
+						k,
+						$the_sett$elm_pretty_printer$Internals$be$(
+							w,
+							r,
+							k,
+							A2(
 								$elm$core$List$cons,
-								_Utils_Tuple2(
-									i,
-									fn(k)),
-								ds);
-							docs = $temp$docs;
-							continue be;
-					}
-				}
+								_Utils_Tuple2(i, doc1),
+								ds)),
+						function (_v15) {
+							return $the_sett$elm_pretty_printer$Internals$be$(
+								w,
+								r,
+								k,
+								A2(
+									$elm$core$List$cons,
+									_Utils_Tuple2(i, doc2),
+									ds));
+						});
+				case 'FlatAlt':
+					var _v16 = docs.a;
+					var i = _v16.a;
+					var _v17 = _v16.b;
+					var brokenDoc = _v17.b;
+					var ds = docs.b;
+					var $temp$docs = A2(
+						$elm$core$List$cons,
+						_Utils_Tuple2(i, brokenDoc),
+						ds);
+					docs = $temp$docs;
+					continue be;
+				case 'Nesting':
+					var _v18 = docs.a;
+					var i = _v18.a;
+					var fn = _v18.b.a;
+					var ds = docs.b;
+					var $temp$docs = A2(
+						$elm$core$List$cons,
+						_Utils_Tuple2(
+							i,
+							fn(i)),
+						ds);
+					docs = $temp$docs;
+					continue be;
+				default:
+					var _v19 = docs.a;
+					var i = _v19.a;
+					var fn = _v19.b.a;
+					var ds = docs.b;
+					var $temp$docs = A2(
+						$elm$core$List$cons,
+						_Utils_Tuple2(
+							i,
+							fn(k)),
+						ds);
+					docs = $temp$docs;
+					continue be;
 			}
-		});
-	return A3(
-		be,
+		}
+	}
+};
+var $the_sett$elm_pretty_printer$Internals$be = F4($the_sett$elm_pretty_printer$Internals$be$);
+var $the_sett$elm_pretty_printer$Internals$best$ = function (width, startCol, x) {
+	return $the_sett$elm_pretty_printer$Internals$be$(
+		width,
 		width,
 		startCol,
 		_List_fromArray(
@@ -19317,29 +19523,57 @@ var $the_sett$elm_pretty_printer$Internals$layout = function (normal) {
 						return acc;
 					case 'NText':
 						var text = normal2.a;
-						var innerNormal = normal2.b;
-						var maybeTag = normal2.c;
-						var $temp$normal2 = innerNormal(_Utils_Tuple0),
+						var norm = normal2.b;
+						var $temp$normal2 = norm,
+							$temp$acc = A2($elm$core$List$cons, text, acc);
+						normal2 = $temp$normal2;
+						acc = $temp$acc;
+						continue layoutInner;
+					case 'LText':
+						var text = normal2.a;
+						var thunk = normal2.b;
+						var norm = thunk(_Utils_Tuple0);
+						var $temp$normal2 = norm,
 							$temp$acc = A2($elm$core$List$cons, text, acc);
 						normal2 = $temp$normal2;
 						acc = $temp$acc;
 						continue layoutInner;
+					case 'NLine':
+						var i = normal2.a;
+						var sep = normal2.b;
+						var norm = normal2.c;
+						if (norm.$ === 'NLine') {
+							var $temp$normal2 = norm,
+								$temp$acc = A2($elm$core$List$cons, '\n' + sep, acc);
+							normal2 = $temp$normal2;
+							acc = $temp$acc;
+							continue layoutInner;
+						} else {
+							var $temp$normal2 = norm,
+								$temp$acc = A2(
+								$elm$core$List$cons,
+								'\n' + ($elm$core$String$repeat$(i, ' ') + sep),
+								acc);
+							normal2 = $temp$normal2;
+							acc = $temp$acc;
+							continue layoutInner;
+						}
 					default:
 						var i = normal2.a;
 						var sep = normal2.b;
-						var innerNormal = normal2.c;
-						var norm = innerNormal(_Utils_Tuple0);
+						var thunk = normal2.c;
+						var norm = thunk(_Utils_Tuple0);
 						if (norm.$ === 'NLine') {
-							var $temp$normal2 = innerNormal(_Utils_Tuple0),
+							var $temp$normal2 = norm,
 								$temp$acc = A2($elm$core$List$cons, '\n' + sep, acc);
 							normal2 = $temp$normal2;
 							acc = $temp$acc;
 							continue layoutInner;
 						} else {
-							var $temp$normal2 = innerNormal(_Utils_Tuple0),
+							var $temp$normal2 = norm,
 								$temp$acc = A2(
 								$elm$core$List$cons,
-								'\n' + ($the_sett$elm_pretty_printer$Internals$copy$(i, ' ') + sep),
+								'\n' + ($elm$core$String$repeat$(i, ' ') + sep),
 								acc);
 							normal2 = $temp$normal2;
 							acc = $temp$acc;
@@ -19403,6 +19637,77 @@ var $mdgriffith$elm_codegen$Internal$Comments$prettyFileComment$ = function (wid
 		splits);
 };
 var $mdgriffith$elm_codegen$Internal$Comments$prettyFileComment = F2($mdgriffith$elm_codegen$Internal$Comments$prettyFileComment$);
+var $elm$core$Basics$ge = _Utils_ge;
+var $mdgriffith$elm_codegen$Internal$Write$checkIfIsIndented$ = function (tll, count) {
+	checkIfIsIndented:
+	while (true) {
+		if (count >= 5) {
+			return true;
+		} else {
+			if (!tll.b) {
+				return false;
+			} else {
+				var _v1 = tll.a;
+				var range = _v1.a;
+				var xs = tll.b;
+				if (range.start.row > 0) {
+					return true;
+				} else {
+					var $temp$tll = xs,
+						$temp$count = count + 1;
+					tll = $temp$tll;
+					count = $temp$count;
+					continue checkIfIsIndented;
+				}
+			}
+		}
+	}
+};
+var $mdgriffith$elm_codegen$Internal$Write$checkIfIsIndented = F2($mdgriffith$elm_codegen$Internal$Write$checkIfIsIndented$);
+var $mdgriffith$elm_codegen$Internal$Write$prettyGroupedExposing$ = function (_v0, rendered) {
+	var range = _v0.a;
+	var exposedElement = _v0.b;
+	var renderedTopElement = $mdgriffith$elm_codegen$Internal$Write$prettyTopLevelExpose(exposedElement);
+	var currentRow = range.start.row;
+	var newRow = (!_Utils_eq(currentRow, rendered.previousRow)) || (rendered.rowCount > 5);
+	var newRendered = rendered.firstIteration ? renderedTopElement : (newRow ? $the_sett$elm_pretty_printer$Pretty$append$(
+		$the_sett$elm_pretty_printer$Pretty$string('\n    , '),
+		renderedTopElement) : $the_sett$elm_pretty_printer$Pretty$append$(
+		$the_sett$elm_pretty_printer$Pretty$string(', '),
+		renderedTopElement));
+	return {
+		firstIteration: false,
+		previousRow: currentRow,
+		rendered: $the_sett$elm_pretty_printer$Pretty$append$(rendered.rendered, newRendered),
+		rowCount: newRow ? 0 : (rendered.rowCount + 1)
+	};
+};
+var $mdgriffith$elm_codegen$Internal$Write$prettyGroupedExposing = F2($mdgriffith$elm_codegen$Internal$Write$prettyGroupedExposing$);
+var $mdgriffith$elm_codegen$Internal$Write$prettyModuleExposing = function (exposing_) {
+	var exposings = function () {
+		if (exposing_.$ === 'All') {
+			return $the_sett$elm_pretty_printer$Pretty$surround$(
+				$the_sett$elm_pretty_printer$Pretty$string(' ('),
+				$the_sett$elm_pretty_printer$Pretty$string(')'),
+				$the_sett$elm_pretty_printer$Pretty$string('..'));
+		} else {
+			var tll = exposing_.a;
+			var isIndented = $mdgriffith$elm_codegen$Internal$Write$checkIfIsIndented$(tll, 0);
+			var start = isIndented ? $the_sett$elm_pretty_printer$Pretty$string('\n    ( ') : $the_sett$elm_pretty_printer$Pretty$string(' ( ');
+			var end = isIndented ? $the_sett$elm_pretty_printer$Pretty$string('\n    )') : $the_sett$elm_pretty_printer$Pretty$string(' )');
+			return $the_sett$elm_pretty_printer$Pretty$append$(
+				$elm$core$List$foldr$(
+					$mdgriffith$elm_codegen$Internal$Write$prettyGroupedExposing,
+					{firstIteration: true, previousRow: 0, rendered: start, rowCount: 0},
+					tll).rendered,
+				end);
+		}
+	}();
+	return A2(
+		$the_sett$elm_pretty_printer$Pretty$a,
+		exposings,
+		$the_sett$elm_pretty_printer$Pretty$string('exposing'));
+};
 var $mdgriffith$elm_codegen$Internal$Write$prettyDefaultModuleData = function (moduleData) {
 	return $the_sett$elm_pretty_printer$Pretty$words(
 		_List_fromArray(
@@ -19410,7 +19715,7 @@ var $mdgriffith$elm_codegen$Internal$Write$prettyDefaultModuleData = function (m
 				$the_sett$elm_pretty_printer$Pretty$string('module'),
 				$mdgriffith$elm_codegen$Internal$Write$prettyModuleName(
 				$mdgriffith$elm_codegen$Internal$Compiler$denode(moduleData.moduleName)),
-				$mdgriffith$elm_codegen$Internal$Write$prettyExposing(
+				$mdgriffith$elm_codegen$Internal$Write$prettyModuleExposing(
 				$mdgriffith$elm_codegen$Internal$Compiler$denode(moduleData.exposingList))
 			]));
 };
@@ -19476,7 +19781,7 @@ var $mdgriffith$elm_codegen$Internal$Write$prettyEffectModuleData = function (mo
 					prettyCmdAndSub,
 					$mdgriffith$elm_codegen$Internal$Compiler$denodeMaybe(moduleData.command),
 					$mdgriffith$elm_codegen$Internal$Compiler$denodeMaybe(moduleData.subscription))),
-				$mdgriffith$elm_codegen$Internal$Write$prettyExposing(
+				$mdgriffith$elm_codegen$Internal$Write$prettyModuleExposing(
 				$mdgriffith$elm_codegen$Internal$Compiler$denode(moduleData.exposingList))
 			]));
 };
@@ -19487,7 +19792,7 @@ var $mdgriffith$elm_codegen$Internal$Write$prettyPortModuleData = function (modu
 				$the_sett$elm_pretty_printer$Pretty$string('port module'),
 				$mdgriffith$elm_codegen$Internal$Write$prettyModuleName(
 				$mdgriffith$elm_codegen$Internal$Compiler$denode(moduleData.moduleName)),
-				$mdgriffith$elm_codegen$Internal$Write$prettyExposing(
+				$mdgriffith$elm_codegen$Internal$Write$prettyModuleExposing(
 				$mdgriffith$elm_codegen$Internal$Compiler$denode(moduleData.exposingList))
 			]));
 };
@@ -19549,7 +19854,15 @@ var $mdgriffith$elm_codegen$Internal$Write$write = $mdgriffith$elm_codegen$Inter
 var $mdgriffith$elm_codegen$Internal$Render$render$ = function (initialDocs, fileDetails) {
 	var rendered = $elm$core$List$foldl$(
 		$mdgriffith$elm_codegen$Internal$Render$renderDecls(fileDetails),
-		{declarations: _List_Nil, exposed: _List_Nil, hasPorts: false, imports: _List_Nil, warnings: _List_Nil},
+		{
+			declarations: _List_Nil,
+			exposePath: _List_fromArray(
+				[0]),
+			exposed: _List_Nil,
+			hasPorts: false,
+			imports: _List_Nil,
+			warnings: _List_Nil
+		},
 		fileDetails.declarations);
 	var body = $mdgriffith$elm_codegen$Internal$Write$write(
 		{
@@ -19587,7 +19900,8 @@ var $mdgriffith$elm_codegen$Internal$Render$render$ = function (initialDocs, fil
 						} else {
 							return $mdgriffith$elm_codegen$Internal$Compiler$nodify(
 								$stil4m$elm_syntax$Elm$Syntax$Exposing$Explicit(
-									$mdgriffith$elm_codegen$Internal$Compiler$nodifyAll(rendered.exposed)));
+									$elm$core$List$concat(
+										$elm$core$List$indexedMap$($mdgriffith$elm_codegen$Internal$Render$groupExposedItems, rendered.exposed))));
 						}
 					}(),
 					moduleName: $mdgriffith$elm_codegen$Internal$Compiler$nodify(fileDetails.moduleName)
@@ -20221,20 +20535,27 @@ var $mdgriffith$elm_codegen$Elm$Case$combineInferences$ = function (infs, infRes
 	}
 };
 var $mdgriffith$elm_codegen$Elm$Case$combineInferences = F2($mdgriffith$elm_codegen$Elm$Case$combineInferences$);
-var $mdgriffith$elm_codegen$Internal$Compiler$unifyOn$ = function (_v0, res) {
+var $mdgriffith$elm_codegen$Internal$Compiler$unifyOn$ = function (index, _v0, res) {
 	var annDetails = _v0.a;
 	if (res.$ === 'Err') {
 		return res;
 	} else {
 		var inf = res.a;
-		var _v2 = $mdgriffith$elm_codegen$Internal$Compiler$unifiable$(inf.aliases, inf.inferences, annDetails.annotation, inf.type_);
+		var _v2 = $mdgriffith$elm_codegen$Internal$Compiler$unifiable$(
+			inf.aliases,
+			inf.inferences,
+			annDetails.annotation(index),
+			inf.type_);
 		var newInferences = _v2.a;
 		var finalResult = _v2.b;
 		if (finalResult.$ === 'Ok') {
 			var finalType = finalResult.a;
 			return $elm$core$Result$Ok(
 				{
-					aliases: A2($mdgriffith$elm_codegen$Internal$Compiler$mergeAliases, annDetails.aliases, inf.aliases),
+					aliases: A2(
+						$mdgriffith$elm_codegen$Internal$Compiler$mergeAliases,
+						annDetails.aliases(index),
+						inf.aliases),
 					inferences: newInferences,
 					type_: finalType
 				});
@@ -20246,9 +20567,10 @@ var $mdgriffith$elm_codegen$Internal$Compiler$unifyOn$ = function (_v0, res) {
 		}
 	}
 };
-var $mdgriffith$elm_codegen$Internal$Compiler$unifyOn = F2($mdgriffith$elm_codegen$Internal$Compiler$unifyOn$);
+var $mdgriffith$elm_codegen$Internal$Compiler$unifyOn = F3($mdgriffith$elm_codegen$Internal$Compiler$unifyOn$);
 var $mdgriffith$elm_codegen$Elm$Case$captureCaseHelper$ = function (mainCaseExpressionModule, _v0, accum) {
 	var toBranch = _v0.a;
+	var newIndex = $mdgriffith$elm_codegen$Internal$Index$next(accum.index);
 	var _v1 = toBranch(
 		$mdgriffith$elm_codegen$Internal$Index$dive(accum.index));
 	var branchIndex = _v1.a;
@@ -20281,8 +20603,17 @@ var $mdgriffith$elm_codegen$Elm$Case$captureCaseHelper$ = function (mainCaseExpr
 					var gatheredAnnotation = _v3.a.a;
 					return $elm$core$Maybe$Just(
 						$mdgriffith$elm_codegen$Internal$Compiler$unifyOn$(
+							newIndex,
 							$mdgriffith$elm_codegen$Internal$Compiler$Annotation(
-								{aliases: gatheredAnnotation.aliases, annotation: gatheredAnnotation.type_, imports: _List_Nil}),
+								{
+									aliases: function (_v4) {
+										return gatheredAnnotation.aliases;
+									},
+									annotation: function (_v5) {
+										return gatheredAnnotation.type_;
+									},
+									imports: _List_Nil
+								}),
 							$mdgriffith$elm_codegen$Elm$Case$combineInferences$(gatheredAnnotation.inferences, exp.annotation)));
 				} else {
 					var err = _v3.a;
@@ -20297,7 +20628,7 @@ var $mdgriffith$elm_codegen$Elm$Case$captureCaseHelper$ = function (mainCaseExpr
 				$mdgriffith$elm_codegen$Internal$Compiler$nodify(exp.expression)),
 			accum.cases),
 		imports: _Utils_ap(accum.imports, exp.imports),
-		index: $mdgriffith$elm_codegen$Internal$Index$next(accum.index)
+		index: newIndex
 	};
 };
 var $mdgriffith$elm_codegen$Elm$Case$captureCaseHelper = F3($mdgriffith$elm_codegen$Elm$Case$captureCaseHelper$);
@@ -20344,9 +20675,9 @@ var $mdgriffith$elm_codegen$Elm$Case$captureCase$ = function (mainExpression, ma
 			}));
 };
 var $mdgriffith$elm_codegen$Elm$Case$captureCase = F4($mdgriffith$elm_codegen$Elm$Case$captureCase$);
-var $mdgriffith$elm_codegen$Internal$Compiler$getTypeModule = function (_v0) {
+var $mdgriffith$elm_codegen$Internal$Compiler$getTypeModule$ = function (index, _v0) {
 	var annotation = _v0.a;
-	var _v1 = annotation.annotation;
+	var _v1 = annotation.annotation(index);
 	if (_v1.$ === 'Typed') {
 		var _v2 = _v1.a;
 		var _v3 = _v2.b;
@@ -20356,6 +20687,7 @@ var $mdgriffith$elm_codegen$Internal$Compiler$getTypeModule = function (_v0) {
 		return _List_Nil;
 	}
 };
+var $mdgriffith$elm_codegen$Internal$Compiler$getTypeModule = F2($mdgriffith$elm_codegen$Internal$Compiler$getTypeModule$);
 var $mdgriffith$elm_codegen$Elm$withType$ = function (ann, _v0) {
 	var annDetails = ann.a;
 	var toExp = _v0.a;
@@ -20366,7 +20698,7 @@ var $mdgriffith$elm_codegen$Elm$withType$ = function (ann, _v0) {
 				exp,
 				{
 					annotation: function () {
-						var _v1 = $mdgriffith$elm_codegen$Internal$Compiler$unifyOn$(ann, exp.annotation);
+						var _v1 = $mdgriffith$elm_codegen$Internal$Compiler$unifyOn$(index, ann, exp.annotation);
 						if (_v1.$ === 'Ok') {
 							var unified = _v1.a;
 							return $elm$core$Result$Ok(unified);
@@ -20375,10 +20707,18 @@ var $mdgriffith$elm_codegen$Elm$withType$ = function (ann, _v0) {
 							if (_v2.$ === 'Ok') {
 								var expressionAnnotation = _v2.a;
 								return $elm$core$Result$Ok(
-									{aliases: expressionAnnotation.aliases, inferences: expressionAnnotation.inferences, type_: annDetails.annotation});
+									{
+										aliases: expressionAnnotation.aliases,
+										inferences: expressionAnnotation.inferences,
+										type_: annDetails.annotation(index)
+									});
 							} else {
 								return $elm$core$Result$Ok(
-									{aliases: $mdgriffith$elm_codegen$Internal$Compiler$emptyAliases, inferences: $elm$core$Dict$empty, type_: annDetails.annotation});
+									{
+										aliases: $mdgriffith$elm_codegen$Internal$Compiler$emptyAliases,
+										inferences: $elm$core$Dict$empty,
+										type_: annDetails.annotation(index)
+									});
 							}
 						}
 					}(),
@@ -20393,7 +20733,7 @@ var $mdgriffith$elm_codegen$Elm$Case$custom$ = function (mainExpression, annotat
 			var myMain = $mdgriffith$elm_codegen$Elm$withType$(annotation, mainExpression);
 			var _v0 = $mdgriffith$elm_codegen$Elm$Case$captureCase$(
 				myMain,
-				$mdgriffith$elm_codegen$Internal$Compiler$getTypeModule(annotation),
+				$mdgriffith$elm_codegen$Internal$Compiler$getTypeModule$(index, annotation),
 				$mdgriffith$elm_codegen$Internal$Index$dive(index),
 				branches);
 			var expr = _v0.a;
@@ -20430,15 +20770,22 @@ var $mdgriffith$elm_codegen$Internal$Types$custom$ = function (mod_, name, vars)
 		$elm$core$List$map$($mdgriffith$elm_codegen$Internal$Types$nodify, vars));
 };
 var $mdgriffith$elm_codegen$Internal$Types$custom = F3($mdgriffith$elm_codegen$Internal$Types$custom$);
-var $mdgriffith$elm_codegen$Internal$Arg$customType$ = function (name, toType) {
+var $mdgriffith$elm_codegen$Internal$Arg$customTypeWith$ = function (details, toType) {
+	var variantName = details.variantName;
+	var typeName = details.typeName;
 	return $mdgriffith$elm_codegen$Internal$Arg$Arg(
 		function (index) {
-			var imports = _List_Nil;
+			var importFrom = $mdgriffith$elm_codegen$Internal$Index$getImport$(index, details.importFrom);
+			var imports = $elm$core$List$isEmpty(importFrom) ? _List_Nil : _List_fromArray(
+				[importFrom]);
 			var annotation = $elm$core$Result$Ok(
 				{
 					aliases: $mdgriffith$elm_codegen$Internal$Compiler$emptyAliases,
 					inferences: $elm$core$Dict$empty,
-					type_: $mdgriffith$elm_codegen$Internal$Types$custom$(_List_Nil, name, _List_Nil)
+					type_: $mdgriffith$elm_codegen$Internal$Types$custom$(
+						importFrom,
+						$mdgriffith$elm_codegen$Internal$Format$formatType(typeName),
+						_List_Nil)
 				});
 			return {
 				details: {
@@ -20446,7 +20793,10 @@ var $mdgriffith$elm_codegen$Internal$Arg$customType$ = function (name, toType) {
 					imports: imports,
 					pattern: $mdgriffith$elm_codegen$Internal$Compiler$nodify(
 						$stil4m$elm_syntax$Elm$Syntax$Pattern$NamedPattern$(
-							{moduleName: _List_Nil, name: name},
+							{
+								moduleName: importFrom,
+								name: $mdgriffith$elm_codegen$Internal$Format$formatType(variantName)
+							},
 							_List_Nil))
 				},
 				index: $mdgriffith$elm_codegen$Internal$Index$dive(index),
@@ -20454,6 +20804,16 @@ var $mdgriffith$elm_codegen$Internal$Arg$customType$ = function (name, toType) {
 			};
 		});
 };
+var $mdgriffith$elm_codegen$Internal$Arg$customTypeWith = F2($mdgriffith$elm_codegen$Internal$Arg$customTypeWith$);
+var $mdgriffith$elm_codegen$Internal$Arg$customType$ = function (name, toType) {
+	return $mdgriffith$elm_codegen$Internal$Arg$customTypeWith$(
+		{
+			importFrom: _List_Nil,
+			typeName: $mdgriffith$elm_codegen$Internal$Format$formatValue(name),
+			variantName: name
+		},
+		toType);
+};
 var $mdgriffith$elm_codegen$Internal$Arg$customType = F2($mdgriffith$elm_codegen$Internal$Arg$customType$);
 var $mdgriffith$elm_codegen$Elm$Arg$customType = $mdgriffith$elm_codegen$Internal$Arg$customType;
 var $stil4m$elm_syntax$Elm$Syntax$Pattern$ListPattern = function (a) {
@@ -20732,30 +21092,34 @@ var $author$project$Gen$Tuple$first = function (firstArg_) {
 var $mdgriffith$elm_codegen$Elm$Annotation$record = function (fields) {
 	return $mdgriffith$elm_codegen$Internal$Compiler$Annotation(
 		{
-			aliases: $elm$core$List$foldl$(
-				F2(
-					function (_v0, aliases) {
-						var ann = _v0.b;
-						return A2(
-							$mdgriffith$elm_codegen$Internal$Compiler$mergeAliases,
-							$mdgriffith$elm_codegen$Elm$Annotation$getAliases(ann),
-							aliases);
-					}),
-				$mdgriffith$elm_codegen$Internal$Compiler$emptyAliases,
-				fields),
-			annotation: $stil4m$elm_syntax$Elm$Syntax$TypeAnnotation$Record(
-				$mdgriffith$elm_codegen$Internal$Compiler$nodifyAll(
-					$elm$core$List$map$(
-						function (_v1) {
-							var name = _v1.a;
-							var ann = _v1.b;
-							return _Utils_Tuple2(
-								$mdgriffith$elm_codegen$Internal$Compiler$nodify(
-									$mdgriffith$elm_codegen$Internal$Format$formatValue(name)),
-								$mdgriffith$elm_codegen$Internal$Compiler$nodify(
-									$mdgriffith$elm_codegen$Internal$Compiler$getInnerAnnotation(ann)));
-						},
-						fields))),
+			aliases: function (index) {
+				return $elm$core$List$foldl$(
+					F2(
+						function (_v0, aliases) {
+							var ann = _v0.b;
+							return A2(
+								$mdgriffith$elm_codegen$Internal$Compiler$mergeAliases,
+								$mdgriffith$elm_codegen$Elm$Annotation$getAliases$(index, ann),
+								aliases);
+						}),
+					$mdgriffith$elm_codegen$Internal$Compiler$emptyAliases,
+					fields);
+			},
+			annotation: function (index) {
+				return $stil4m$elm_syntax$Elm$Syntax$TypeAnnotation$Record(
+					$mdgriffith$elm_codegen$Internal$Compiler$nodifyAll(
+						$elm$core$List$map$(
+							function (_v1) {
+								var name = _v1.a;
+								var ann = _v1.b;
+								return _Utils_Tuple2(
+									$mdgriffith$elm_codegen$Internal$Compiler$nodify(
+										$mdgriffith$elm_codegen$Internal$Format$formatValue(name)),
+									$mdgriffith$elm_codegen$Internal$Compiler$nodify(
+										$mdgriffith$elm_codegen$Internal$Compiler$getInnerAnnotation$(index, ann)));
+							},
+							fields)));
+			},
 			imports: $elm$core$List$concatMap$(
 				A2($elm$core$Basics$composeR, $elm$core$Tuple$second, $mdgriffith$elm_codegen$Internal$Compiler$getAnnotationImports),
 				fields)
@@ -23224,13 +23588,6 @@ var $author$project$Pages$Internal$RoutePattern$endingToVariantName = function (
 						$mdgriffith$elm_codegen$Elm$Annotation$list($mdgriffith$elm_codegen$Elm$Annotation$string))));
 	}
 };
-var $elm$core$List$isEmpty = function (xs) {
-	if (!xs.b) {
-		return true;
-	} else {
-		return false;
-	}
-};
 var $mdgriffith$elm_codegen$Elm$Variant$ = function (a, b) {
 	return {$: 'Variant', a: a, b: b};
 };
@@ -23587,7 +23944,7 @@ var $mdgriffith$elm_codegen$Elm$aliasWith$ = function (name, generics, innerAnno
 			exposed: $mdgriffith$elm_codegen$Internal$Compiler$NotExposed,
 			imports: $mdgriffith$elm_codegen$Internal$Compiler$getAnnotationImports(innerAnnotation),
 			name: name,
-			toBody: function (_v0) {
+			toBody: function (index) {
 				return {
 					additionalImports: _List_Nil,
 					declaration: $stil4m$elm_syntax$Elm$Syntax$Declaration$AliasDeclaration(
@@ -23596,13 +23953,13 @@ var $mdgriffith$elm_codegen$Elm$aliasWith$ = function (name, generics, innerAnno
 							generics: $mdgriffith$elm_codegen$Elm$getGenerics(
 								{
 									keepExtra: false,
-									needed: $mdgriffith$elm_codegen$Internal$Compiler$getGenerics(innerAnnotation),
+									needed: $mdgriffith$elm_codegen$Internal$Compiler$getGenerics$(index, innerAnnotation),
 									requested: generics
 								}),
 							name: $mdgriffith$elm_codegen$Internal$Compiler$nodify(
 								$mdgriffith$elm_codegen$Internal$Format$formatType(name)),
 							typeAnnotation: $mdgriffith$elm_codegen$Internal$Compiler$nodify(
-								$mdgriffith$elm_codegen$Internal$Compiler$getInnerAnnotation(innerAnnotation))
+								$mdgriffith$elm_codegen$Internal$Compiler$getInnerAnnotation$(index, innerAnnotation))
 						}),
 					warning: $elm$core$Maybe$Nothing
 				};
@@ -24111,21 +24468,25 @@ var $author$project$Gen$Pages$Internal$Platform$moduleName_ = _List_fromArray(
 var $mdgriffith$elm_codegen$Elm$Annotation$triple$ = function (one, two, three) {
 	return $mdgriffith$elm_codegen$Internal$Compiler$Annotation(
 		{
-			aliases: A2(
-				$mdgriffith$elm_codegen$Internal$Compiler$mergeAliases,
-				A2(
+			aliases: function (index) {
+				return A2(
 					$mdgriffith$elm_codegen$Internal$Compiler$mergeAliases,
-					$mdgriffith$elm_codegen$Elm$Annotation$getAliases(one),
-					$mdgriffith$elm_codegen$Elm$Annotation$getAliases(two)),
-				$mdgriffith$elm_codegen$Elm$Annotation$getAliases(three)),
-			annotation: $stil4m$elm_syntax$Elm$Syntax$TypeAnnotation$Tupled(
-				$mdgriffith$elm_codegen$Internal$Compiler$nodifyAll(
-					_List_fromArray(
-						[
-							$mdgriffith$elm_codegen$Internal$Compiler$getInnerAnnotation(one),
-							$mdgriffith$elm_codegen$Internal$Compiler$getInnerAnnotation(two),
-							$mdgriffith$elm_codegen$Internal$Compiler$getInnerAnnotation(three)
-						]))),
+					A2(
+						$mdgriffith$elm_codegen$Internal$Compiler$mergeAliases,
+						$mdgriffith$elm_codegen$Elm$Annotation$getAliases$(index, one),
+						$mdgriffith$elm_codegen$Elm$Annotation$getAliases$(index, two)),
+					$mdgriffith$elm_codegen$Elm$Annotation$getAliases$(index, three));
+			},
+			annotation: function (index) {
+				return $stil4m$elm_syntax$Elm$Syntax$TypeAnnotation$Tupled(
+					$mdgriffith$elm_codegen$Internal$Compiler$nodifyAll(
+						_List_fromArray(
+							[
+								$mdgriffith$elm_codegen$Internal$Compiler$getInnerAnnotation$(index, one),
+								$mdgriffith$elm_codegen$Internal$Compiler$getInnerAnnotation$(index, two),
+								$mdgriffith$elm_codegen$Internal$Compiler$getInnerAnnotation$(index, three)
+							])));
+			},
 			imports: _Utils_ap(
 				$mdgriffith$elm_codegen$Internal$Compiler$getAnnotationImports(one),
 				_Utils_ap(
@@ -25260,7 +25621,15 @@ var $author$project$Gen$Api$call_ = {
 		})
 };
 var $mdgriffith$elm_codegen$Elm$Annotation$unit = $mdgriffith$elm_codegen$Internal$Compiler$Annotation(
-	{aliases: $mdgriffith$elm_codegen$Internal$Compiler$emptyAliases, annotation: $stil4m$elm_syntax$Elm$Syntax$TypeAnnotation$Unit, imports: _List_Nil});
+	{
+		aliases: function (_v0) {
+			return $mdgriffith$elm_codegen$Internal$Compiler$emptyAliases;
+		},
+		annotation: function (_v1) {
+			return $stil4m$elm_syntax$Elm$Syntax$TypeAnnotation$Unit;
+		},
+		imports: _List_Nil
+	});
 var $author$project$Gen$BackendTask$call_ = {
 	allowFatal: function (allowFatalArg_) {
 		return $mdgriffith$elm_codegen$Elm$apply$(
@@ -29264,9 +29633,13 @@ var $mdgriffith$elm_codegen$Elm$function$ = function (initialArgList, toFullExpr
 							var argType = $elm$core$Maybe$withDefault$(
 								$mdgriffith$elm_codegen$Internal$Compiler$Annotation(
 									{
-										aliases: $mdgriffith$elm_codegen$Internal$Compiler$emptyAliases,
-										annotation: $stil4m$elm_syntax$Elm$Syntax$TypeAnnotation$GenericType(
-											$mdgriffith$elm_codegen$Internal$Index$protectTypeName$(nameBase, found.index)),
+										aliases: function (_v7) {
+											return $mdgriffith$elm_codegen$Internal$Compiler$emptyAliases;
+										},
+										annotation: function (_v8) {
+											return $stil4m$elm_syntax$Elm$Syntax$TypeAnnotation$GenericType(
+												$mdgriffith$elm_codegen$Internal$Index$protectTypeName$(nameBase, found.index));
+										},
 										imports: _List_Nil
 									}),
 								maybeType);
@@ -29285,7 +29658,7 @@ var $mdgriffith$elm_codegen$Elm$function$ = function (initialArgList, toFullExpr
 								names: A2($elm$core$List$cons, name, found.names),
 								types: A2(
 									$elm$core$List$cons,
-									$mdgriffith$elm_codegen$Internal$Compiler$getInnerAnnotation(argType),
+									$mdgriffith$elm_codegen$Internal$Compiler$getInnerAnnotation$(newIndex, argType),
 									found.types)
 							};
 						}),
@@ -29317,7 +29690,7 @@ var $mdgriffith$elm_codegen$Elm$function$ = function (initialArgList, toFullExpr
 													var ann = maybeAnn.a;
 													return A2(
 														$mdgriffith$elm_codegen$Internal$Compiler$mergeAliases,
-														$mdgriffith$elm_codegen$Internal$Compiler$getAliases(ann),
+														$mdgriffith$elm_codegen$Internal$Compiler$getAliases$(index, ann),
 														aliases);
 												}
 											}),
@@ -30202,12 +30575,6 @@ var $author$project$Gen$Server$Response$plainText = function (plainTextArg_) {
 var $stil4m$elm_syntax$Elm$Syntax$Declaration$PortDeclaration = function (a) {
 	return {$: 'PortDeclaration', a: a};
 };
-var $mdgriffith$elm_codegen$Elm$groupAnn = function (ann) {
-	return $mdgriffith$elm_codegen$Internal$Compiler$nodify(
-		$stil4m$elm_syntax$Elm$Syntax$TypeAnnotation$Tupled(
-			_List_fromArray(
-				[ann])));
-};
 var $mdgriffith$elm_codegen$Elm$sub = $stil4m$elm_syntax$Elm$Syntax$TypeAnnotation$Typed$(
 	$mdgriffith$elm_codegen$Internal$Compiler$nodify(
 		_Utils_Tuple2(_List_Nil, 'Sub')),
@@ -30216,38 +30583,29 @@ var $mdgriffith$elm_codegen$Elm$sub = $stil4m$elm_syntax$Elm$Syntax$TypeAnnotati
 			$mdgriffith$elm_codegen$Internal$Compiler$nodify(
 			$stil4m$elm_syntax$Elm$Syntax$TypeAnnotation$GenericType('msg'))
 		]));
-var $mdgriffith$elm_codegen$Elm$portIncoming$ = function (nameStr, args) {
+var $mdgriffith$elm_codegen$Elm$portIncoming$ = function (nameStr, arg) {
 	var name = $mdgriffith$elm_codegen$Internal$Format$formatDeclarationName(nameStr);
 	return $mdgriffith$elm_codegen$Internal$Compiler$Declaration(
 		{
 			docs: $elm$core$Maybe$Nothing,
 			exposed: $mdgriffith$elm_codegen$Internal$Compiler$NotExposed,
-			imports: $elm$core$List$concatMap$($mdgriffith$elm_codegen$Internal$Compiler$getAnnotationImports, args),
+			imports: $mdgriffith$elm_codegen$Internal$Compiler$getAnnotationImports(arg),
 			name: name,
-			toBody: function (_v0) {
+			toBody: function (index) {
 				return {
 					additionalImports: _List_Nil,
 					declaration: $stil4m$elm_syntax$Elm$Syntax$Declaration$PortDeclaration(
 						{
 							name: $mdgriffith$elm_codegen$Internal$Compiler$nodify(name),
 							typeAnnotation: $mdgriffith$elm_codegen$Internal$Compiler$nodify(
-								function () {
-									if (!args.b) {
-										return $stil4m$elm_syntax$Elm$Syntax$TypeAnnotation$FunctionTypeAnnotation$(
+								$stil4m$elm_syntax$Elm$Syntax$TypeAnnotation$FunctionTypeAnnotation$(
+									$mdgriffith$elm_codegen$Internal$Compiler$nodify(
+										$stil4m$elm_syntax$Elm$Syntax$TypeAnnotation$FunctionTypeAnnotation$(
 											$mdgriffith$elm_codegen$Internal$Compiler$nodify(
-												$stil4m$elm_syntax$Elm$Syntax$TypeAnnotation$GenericType('msg')),
-											$mdgriffith$elm_codegen$Internal$Compiler$nodify($mdgriffith$elm_codegen$Elm$sub));
-									} else {
-										return $stil4m$elm_syntax$Elm$Syntax$TypeAnnotation$FunctionTypeAnnotation$(
-											$mdgriffith$elm_codegen$Elm$groupAnn(
-												$mdgriffith$elm_codegen$Internal$Compiler$nodify(
-													$mdgriffith$elm_codegen$Internal$Compiler$getInnerAnnotation(
-														$mdgriffith$elm_codegen$Elm$Annotation$function$(
-															args,
-															$mdgriffith$elm_codegen$Elm$Annotation$var('msg'))))),
-											$mdgriffith$elm_codegen$Internal$Compiler$nodify($mdgriffith$elm_codegen$Elm$sub));
-									}
-								}())
+												$mdgriffith$elm_codegen$Internal$Compiler$getInnerAnnotation$(index, arg)),
+											$mdgriffith$elm_codegen$Internal$Compiler$nodify(
+												$stil4m$elm_syntax$Elm$Syntax$TypeAnnotation$GenericType('msg')))),
+									$mdgriffith$elm_codegen$Internal$Compiler$nodify($mdgriffith$elm_codegen$Elm$sub)))
 						}),
 					warning: $elm$core$Maybe$Nothing
 				};
@@ -30271,7 +30629,7 @@ var $mdgriffith$elm_codegen$Elm$portOutgoing$ = function (nameStr, ann) {
 			exposed: $mdgriffith$elm_codegen$Internal$Compiler$NotExposed,
 			imports: $mdgriffith$elm_codegen$Internal$Compiler$getAnnotationImports(ann),
 			name: name,
-			toBody: function (_v0) {
+			toBody: function (index) {
 				return {
 					additionalImports: _List_Nil,
 					declaration: $stil4m$elm_syntax$Elm$Syntax$Declaration$PortDeclaration(
@@ -30280,7 +30638,7 @@ var $mdgriffith$elm_codegen$Elm$portOutgoing$ = function (nameStr, ann) {
 							typeAnnotation: $mdgriffith$elm_codegen$Internal$Compiler$nodify(
 								$stil4m$elm_syntax$Elm$Syntax$TypeAnnotation$FunctionTypeAnnotation$(
 									$mdgriffith$elm_codegen$Internal$Compiler$nodify(
-										$mdgriffith$elm_codegen$Internal$Compiler$getInnerAnnotation(ann)),
+										$mdgriffith$elm_codegen$Internal$Compiler$getInnerAnnotation$(index, ann)),
 									$mdgriffith$elm_codegen$Internal$Compiler$nodify($mdgriffith$elm_codegen$Elm$cmd)))
 						}),
 					warning: $elm$core$Maybe$Nothing
@@ -31053,7 +31411,15 @@ var $elm$core$Result$map3$ = function (func, ra, rb, rc) {
 var $elm$core$Result$map3 = F4($elm$core$Result$map3$);
 var $mdgriffith$elm_codegen$Internal$Compiler$noImports = function (tipe) {
 	return $mdgriffith$elm_codegen$Internal$Compiler$Annotation(
-		{aliases: $mdgriffith$elm_codegen$Internal$Compiler$emptyAliases, annotation: tipe, imports: _List_Nil});
+		{
+			aliases: function (_v0) {
+				return $mdgriffith$elm_codegen$Internal$Compiler$emptyAliases;
+			},
+			annotation: function (_v1) {
+				return tipe;
+			},
+			imports: _List_Nil
+		});
 };
 var $mdgriffith$elm_codegen$Elm$triple$ = function (oneExp, twoExp, threeExp) {
 	return $mdgriffith$elm_codegen$Internal$Compiler$Expression(
@@ -31078,7 +31444,8 @@ var $mdgriffith$elm_codegen$Elm$triple$ = function (oneExp, twoExp, threeExp) {
 								inferences: $mdgriffith$elm_codegen$Internal$Compiler$mergeInferences$(
 									threeA.inferences,
 									$mdgriffith$elm_codegen$Internal$Compiler$mergeInferences$(twoA.inferences, oneA.inferences)),
-								type_: $mdgriffith$elm_codegen$Internal$Compiler$getInnerAnnotation(
+								type_: $mdgriffith$elm_codegen$Internal$Compiler$getInnerAnnotation$(
+									index,
 									$mdgriffith$elm_codegen$Elm$Annotation$triple$(
 										$mdgriffith$elm_codegen$Internal$Compiler$noImports(oneA.type_),
 										$mdgriffith$elm_codegen$Internal$Compiler$noImports(twoA.type_),
@@ -31343,26 +31710,25 @@ var $stil4m$elm_syntax$Elm$Syntax$Expression$RecordUpdateExpression = F2($stil4m
 var $mdgriffith$elm_codegen$Internal$Compiler$RecordUpdateIncorrectFields = function (a) {
 	return {$: 'RecordUpdateIncorrectFields', a: a};
 };
-var $mdgriffith$elm_codegen$Elm$presentAndMatching$ = function (fieldName, _v0, existingFields) {
+var $mdgriffith$elm_codegen$Elm$presentAndMatching$ = function (fieldName, existingFields) {
 	return $elm$core$List$any$(
-		function (_v1) {
-			var _v2 = _v1.b;
-			var _v3 = _v2.a;
-			var existingFieldName = _v3.b;
+		function (_v0) {
+			var _v1 = _v0.b;
+			var _v2 = _v1.a;
+			var existingFieldName = _v2.b;
 			return _Utils_eq(fieldName, existingFieldName);
 		},
 		existingFields);
 };
-var $mdgriffith$elm_codegen$Elm$presentAndMatching = F3($mdgriffith$elm_codegen$Elm$presentAndMatching$);
+var $mdgriffith$elm_codegen$Elm$presentAndMatching = F2($mdgriffith$elm_codegen$Elm$presentAndMatching$);
 var $mdgriffith$elm_codegen$Elm$verifyFieldsHelper$ = function (existingFields, updatedFields) {
 	if (!updatedFields.b) {
 		return true;
 	} else {
 		var _v1 = updatedFields.a;
 		var fieldName = _v1.a;
-		var fieldInference = _v1.b;
 		var remain = updatedFields.b;
-		return $mdgriffith$elm_codegen$Elm$presentAndMatching$(fieldName, fieldInference, existingFields) && $mdgriffith$elm_codegen$Elm$verifyFieldsHelper$(existingFields, remain);
+		return $mdgriffith$elm_codegen$Elm$presentAndMatching$(fieldName, existingFields) && $mdgriffith$elm_codegen$Elm$verifyFieldsHelper$(existingFields, remain);
 	}
 };
 var $mdgriffith$elm_codegen$Elm$verifyFieldsHelper = F2($mdgriffith$elm_codegen$Elm$verifyFieldsHelper$);
@@ -36409,19 +36775,10 @@ var $author$project$GenerateMain$otherFile$ = function (routes, phaseString) {
 				encodeResponse.declaration,
 				pathPatterns.declaration,
 				decodeResponse.declaration,
-				$mdgriffith$elm_codegen$Elm$portIncoming$(
-				'hotReloadData',
-				_List_fromArray(
-					[$author$project$Gen$Bytes$annotation_.bytes])),
+				$mdgriffith$elm_codegen$Elm$portIncoming$('hotReloadData', $author$project$Gen$Bytes$annotation_.bytes),
 				$mdgriffith$elm_codegen$Elm$portOutgoing$('toJsPort', $author$project$Gen$Json$Encode$annotation_.value),
-				$mdgriffith$elm_codegen$Elm$portIncoming$(
-				'fromJsPort',
-				_List_fromArray(
-					[$author$project$Gen$Json$Decode$annotation_.value])),
-				$mdgriffith$elm_codegen$Elm$portIncoming$(
-				'gotBatchSub',
-				_List_fromArray(
-					[$author$project$Gen$Json$Decode$annotation_.value]))
+				$mdgriffith$elm_codegen$Elm$portIncoming$('fromJsPort', $author$project$Gen$Json$Decode$annotation_.value),
+				$mdgriffith$elm_codegen$Elm$portIncoming$('gotBatchSub', $author$project$Gen$Json$Decode$annotation_.value)
 			]));
 };
 var $author$project$GenerateMain$otherFile = F2($author$project$GenerateMain$otherFile$);