elm-pages 3.0.0-beta.1 → 3.0.0-beta.12

package/codegen/elm-pages-codegen.js

@@ -25890,6 +25890,370 @@ var $author$project$Gen$Pages$Internal$NotFoundReason$annotation_ = {
 		$author$project$Elm$Annotation$list(
 			A2($author$project$Elm$Annotation$tuple, $author$project$Elm$Annotation$string, $author$project$Elm$Annotation$string)))
 };
+var $author$project$Gen$Pages$Internal$Platform$moduleName_ = _List_fromArray(
+	['Pages', 'Internal', 'Platform']);
+var $author$project$Elm$Annotation$triple = F3(
+	function (one, two, three) {
+		return $author$project$Internal$Compiler$Annotation(
+			{
+				aliases: A2(
+					$author$project$Internal$Compiler$mergeAliases,
+					A2(
+						$author$project$Internal$Compiler$mergeAliases,
+						$author$project$Elm$Annotation$getAliases(one),
+						$author$project$Elm$Annotation$getAliases(two)),
+					$author$project$Elm$Annotation$getAliases(three)),
+				annotation: $stil4m$elm_syntax$Elm$Syntax$TypeAnnotation$Tupled(
+					$author$project$Internal$Compiler$nodifyAll(
+						_List_fromArray(
+							[
+								$author$project$Internal$Compiler$getInnerAnnotation(one),
+								$author$project$Internal$Compiler$getInnerAnnotation(two),
+								$author$project$Internal$Compiler$getInnerAnnotation(three)
+							]))),
+				imports: _Utils_ap(
+					$author$project$Internal$Compiler$getAnnotationImports(one),
+					_Utils_ap(
+						$author$project$Internal$Compiler$getAnnotationImports(two),
+						$author$project$Internal$Compiler$getAnnotationImports(three)))
+			});
+	});
+var $author$project$Gen$Pages$Internal$Platform$annotation_ = {
+	effect: F6(
+		function (effectArg0, effectArg1, effectArg2, effectArg3, effectArg4, effectArg5) {
+			return A3(
+				$author$project$Elm$Annotation$namedWith,
+				_List_fromArray(
+					['Pages', 'Internal', 'Platform']),
+				'Effect',
+				_List_fromArray(
+					[effectArg0, effectArg1, effectArg2, effectArg3, effectArg4, effectArg5]));
+		}),
+	flags: A4(
+		$author$project$Elm$Annotation$alias,
+		$author$project$Gen$Pages$Internal$Platform$moduleName_,
+		'Flags',
+		_List_Nil,
+		A3(
+			$author$project$Elm$Annotation$namedWith,
+			_List_fromArray(
+				['Decode']),
+			'Value',
+			_List_Nil)),
+	model: F4(
+		function (modelArg0, modelArg1, modelArg2, modelArg3) {
+			return A4(
+				$author$project$Elm$Annotation$alias,
+				$author$project$Gen$Pages$Internal$Platform$moduleName_,
+				'Model',
+				_List_fromArray(
+					[modelArg0, modelArg1, modelArg2, modelArg3]),
+				$author$project$Elm$Annotation$record(
+					_List_fromArray(
+						[
+							_Utils_Tuple2(
+							'key',
+							A3(
+								$author$project$Elm$Annotation$namedWith,
+								_List_Nil,
+								'Maybe',
+								_List_fromArray(
+									[
+										A3(
+										$author$project$Elm$Annotation$namedWith,
+										_List_fromArray(
+											['Browser', 'Navigation']),
+										'Key',
+										_List_Nil)
+									]))),
+							_Utils_Tuple2(
+							'url',
+							A3($author$project$Elm$Annotation$namedWith, _List_Nil, 'Url', _List_Nil)),
+							_Utils_Tuple2('currentPath', $author$project$Elm$Annotation$string),
+							_Utils_Tuple2('ariaNavigationAnnouncement', $author$project$Elm$Annotation$string),
+							_Utils_Tuple2(
+							'pageData',
+							A3(
+								$author$project$Elm$Annotation$namedWith,
+								_List_Nil,
+								'Result',
+								_List_fromArray(
+									[
+										$author$project$Elm$Annotation$string,
+										$author$project$Elm$Annotation$record(
+										_List_fromArray(
+											[
+												_Utils_Tuple2(
+												'userModel',
+												$author$project$Elm$Annotation$var('userModel')),
+												_Utils_Tuple2(
+												'pageData',
+												$author$project$Elm$Annotation$var('pageData')),
+												_Utils_Tuple2(
+												'sharedData',
+												$author$project$Elm$Annotation$var('sharedData')),
+												_Utils_Tuple2(
+												'actionData',
+												A3(
+													$author$project$Elm$Annotation$namedWith,
+													_List_Nil,
+													'Maybe',
+													_List_fromArray(
+														[
+															$author$project$Elm$Annotation$var('actionData')
+														])))
+											]))
+									]))),
+							_Utils_Tuple2(
+							'notFound',
+							A3(
+								$author$project$Elm$Annotation$namedWith,
+								_List_Nil,
+								'Maybe',
+								_List_fromArray(
+									[
+										$author$project$Elm$Annotation$record(
+										_List_fromArray(
+											[
+												_Utils_Tuple2(
+												'reason',
+												A3($author$project$Elm$Annotation$namedWith, _List_Nil, 'NotFoundReason', _List_Nil)),
+												_Utils_Tuple2(
+												'path',
+												A3($author$project$Elm$Annotation$namedWith, _List_Nil, 'Path', _List_Nil))
+											]))
+									]))),
+							_Utils_Tuple2(
+							'userFlags',
+							A3(
+								$author$project$Elm$Annotation$namedWith,
+								_List_fromArray(
+									['Decode']),
+								'Value',
+								_List_Nil)),
+							_Utils_Tuple2(
+							'transition',
+							A3(
+								$author$project$Elm$Annotation$namedWith,
+								_List_Nil,
+								'Maybe',
+								_List_fromArray(
+									[
+										A2(
+										$author$project$Elm$Annotation$tuple,
+										$author$project$Elm$Annotation$int,
+										A3(
+											$author$project$Elm$Annotation$namedWith,
+											_List_fromArray(
+												['Pages', 'Transition']),
+											'Transition',
+											_List_Nil))
+									]))),
+							_Utils_Tuple2('nextTransitionKey', $author$project$Elm$Annotation$int),
+							_Utils_Tuple2(
+							'inFlightFetchers',
+							A3(
+								$author$project$Elm$Annotation$namedWith,
+								_List_Nil,
+								'Dict',
+								_List_fromArray(
+									[
+										$author$project$Elm$Annotation$string,
+										A2(
+										$author$project$Elm$Annotation$tuple,
+										$author$project$Elm$Annotation$int,
+										A3(
+											$author$project$Elm$Annotation$namedWith,
+											_List_fromArray(
+												['Pages', 'Transition']),
+											'FetcherState',
+											_List_fromArray(
+												[
+													$author$project$Elm$Annotation$var('actionData')
+												])))
+									]))),
+							_Utils_Tuple2(
+							'pageFormState',
+							A3(
+								$author$project$Elm$Annotation$namedWith,
+								_List_fromArray(
+									['Pages', 'FormState']),
+								'PageFormState',
+								_List_Nil)),
+							_Utils_Tuple2('pendingRedirect', $author$project$Elm$Annotation$bool),
+							_Utils_Tuple2(
+							'pendingData',
+							A3(
+								$author$project$Elm$Annotation$namedWith,
+								_List_Nil,
+								'Maybe',
+								_List_fromArray(
+									[
+										A3(
+										$author$project$Elm$Annotation$triple,
+										$author$project$Elm$Annotation$var('pageData'),
+										$author$project$Elm$Annotation$var('sharedData'),
+										A3(
+											$author$project$Elm$Annotation$namedWith,
+											_List_Nil,
+											'Maybe',
+											_List_fromArray(
+												[
+													$author$project$Elm$Annotation$var('actionData')
+												])))
+									])))
+						])));
+		}),
+	msg: F5(
+		function (msgArg0, msgArg1, msgArg2, msgArg3, msgArg4) {
+			return A3(
+				$author$project$Elm$Annotation$namedWith,
+				_List_fromArray(
+					['Pages', 'Internal', 'Platform']),
+				'Msg',
+				_List_fromArray(
+					[msgArg0, msgArg1, msgArg2, msgArg3, msgArg4]));
+		}),
+	program: F6(
+		function (programArg0, programArg1, programArg2, programArg3, programArg4, programArg5) {
+			return A4(
+				$author$project$Elm$Annotation$alias,
+				$author$project$Gen$Pages$Internal$Platform$moduleName_,
+				'Program',
+				_List_fromArray(
+					[programArg0, programArg1, programArg2, programArg3, programArg4, programArg5]),
+				A3(
+					$author$project$Elm$Annotation$namedWith,
+					_List_fromArray(
+						['Platform']),
+					'Program',
+					_List_fromArray(
+						[
+							A3($author$project$Elm$Annotation$namedWith, _List_Nil, 'Flags', _List_Nil),
+							A3(
+							$author$project$Elm$Annotation$namedWith,
+							_List_Nil,
+							'Model',
+							_List_fromArray(
+								[
+									$author$project$Elm$Annotation$var('userModel'),
+									$author$project$Elm$Annotation$var('pageData'),
+									$author$project$Elm$Annotation$var('actionData'),
+									$author$project$Elm$Annotation$var('sharedData')
+								])),
+							A3(
+							$author$project$Elm$Annotation$namedWith,
+							_List_Nil,
+							'Msg',
+							_List_fromArray(
+								[
+									$author$project$Elm$Annotation$var('userMsg'),
+									$author$project$Elm$Annotation$var('pageData'),
+									$author$project$Elm$Annotation$var('actionData'),
+									$author$project$Elm$Annotation$var('sharedData'),
+									$author$project$Elm$Annotation$var('errorPage')
+								]))
+						])));
+		}),
+	requestInfo: A4(
+		$author$project$Elm$Annotation$alias,
+		$author$project$Gen$Pages$Internal$Platform$moduleName_,
+		'RequestInfo',
+		_List_Nil,
+		$author$project$Elm$Annotation$record(
+			_List_fromArray(
+				[
+					_Utils_Tuple2('contentType', $author$project$Elm$Annotation$string),
+					_Utils_Tuple2('body', $author$project$Elm$Annotation$string)
+				])))
+};
+var $author$project$Gen$Pages$Internal$Platform$Cli$moduleName_ = _List_fromArray(
+	['Pages', 'Internal', 'Platform', 'Cli']);
+var $author$project$Gen$Pages$Internal$Platform$Cli$annotation_ = {
+	flags: A4(
+		$author$project$Elm$Annotation$alias,
+		$author$project$Gen$Pages$Internal$Platform$Cli$moduleName_,
+		'Flags',
+		_List_Nil,
+		A3(
+			$author$project$Elm$Annotation$namedWith,
+			_List_fromArray(
+				['Decode']),
+			'Value',
+			_List_Nil)),
+	model: function (modelArg0) {
+		return A4(
+			$author$project$Elm$Annotation$alias,
+			$author$project$Gen$Pages$Internal$Platform$Cli$moduleName_,
+			'Model',
+			_List_fromArray(
+				[modelArg0]),
+			$author$project$Elm$Annotation$record(
+				_List_fromArray(
+					[
+						_Utils_Tuple2(
+						'staticResponses',
+						A3($author$project$Elm$Annotation$namedWith, _List_Nil, 'StaticResponses', _List_Nil)),
+						_Utils_Tuple2(
+						'errors',
+						$author$project$Elm$Annotation$list(
+							A3($author$project$Elm$Annotation$namedWith, _List_Nil, 'BuildError', _List_Nil))),
+						_Utils_Tuple2(
+						'allRawResponses',
+						A3($author$project$Elm$Annotation$namedWith, _List_Nil, 'RequestsAndPending', _List_Nil)),
+						_Utils_Tuple2(
+						'unprocessedPages',
+						$author$project$Elm$Annotation$list(
+							A2(
+								$author$project$Elm$Annotation$tuple,
+								A3($author$project$Elm$Annotation$namedWith, _List_Nil, 'Path', _List_Nil),
+								$author$project$Elm$Annotation$var('route')))),
+						_Utils_Tuple2(
+						'maybeRequestJson',
+						A3(
+							$author$project$Elm$Annotation$namedWith,
+							_List_Nil,
+							'RenderRequest',
+							_List_fromArray(
+								[
+									$author$project$Elm$Annotation$var('route')
+								]))),
+						_Utils_Tuple2('isDevServer', $author$project$Elm$Annotation$bool)
+					])));
+	},
+	msg: A3(
+		$author$project$Elm$Annotation$namedWith,
+		_List_fromArray(
+			['Pages', 'Internal', 'Platform', 'Cli']),
+		'Msg',
+		_List_Nil),
+	program: function (programArg0) {
+		return A4(
+			$author$project$Elm$Annotation$alias,
+			$author$project$Gen$Pages$Internal$Platform$Cli$moduleName_,
+			'Program',
+			_List_fromArray(
+				[programArg0]),
+			A3(
+				$author$project$Elm$Annotation$namedWith,
+				_List_fromArray(
+					['Platform']),
+				'Program',
+				_List_fromArray(
+					[
+						A3($author$project$Elm$Annotation$namedWith, _List_Nil, 'Flags', _List_Nil),
+						A3(
+						$author$project$Elm$Annotation$namedWith,
+						_List_Nil,
+						'Model',
+						_List_fromArray(
+							[
+								$author$project$Elm$Annotation$var('route')
+							])),
+						A3($author$project$Elm$Annotation$namedWith, _List_Nil, 'Msg', _List_Nil)
+					])));
+	}
+};
 var $author$project$Gen$Pages$Msg$annotation_ = {
 	msg: function (msgArg0) {
 		return A3(
@@ -25959,6 +26323,16 @@ var $author$project$Gen$Pages$Transition$annotation_ = {
 		'Transition',
 		_List_Nil)
 };
+var $author$project$Gen$Platform$Sub$annotation_ = {
+	sub: function (subArg0) {
+		return A3(
+			$author$project$Elm$Annotation$namedWith,
+			_List_Nil,
+			'Sub',
+			_List_fromArray(
+				[subArg0]));
+	}
+};
 var $author$project$Gen$Server$Response$moduleName_ = _List_fromArray(
 	['Server', 'Response']);
 var $author$project$Gen$Server$Response$annotation_ = {
@@ -32318,32 +32692,6 @@ var $author$project$Internal$Compiler$noImports = function (tipe) {
 	return $author$project$Internal$Compiler$Annotation(
 		{aliases: $author$project$Internal$Compiler$emptyAliases, annotation: tipe, imports: _List_Nil});
 };
-var $author$project$Elm$Annotation$triple = F3(
-	function (one, two, three) {
-		return $author$project$Internal$Compiler$Annotation(
-			{
-				aliases: A2(
-					$author$project$Internal$Compiler$mergeAliases,
-					A2(
-						$author$project$Internal$Compiler$mergeAliases,
-						$author$project$Elm$Annotation$getAliases(one),
-						$author$project$Elm$Annotation$getAliases(two)),
-					$author$project$Elm$Annotation$getAliases(three)),
-				annotation: $stil4m$elm_syntax$Elm$Syntax$TypeAnnotation$Tupled(
-					$author$project$Internal$Compiler$nodifyAll(
-						_List_fromArray(
-							[
-								$author$project$Internal$Compiler$getInnerAnnotation(one),
-								$author$project$Internal$Compiler$getInnerAnnotation(two),
-								$author$project$Internal$Compiler$getInnerAnnotation(three)
-							]))),
-				imports: _Utils_ap(
-					$author$project$Internal$Compiler$getAnnotationImports(one),
-					_Utils_ap(
-						$author$project$Internal$Compiler$getAnnotationImports(two),
-						$author$project$Internal$Compiler$getAnnotationImports(three)))
-			});
-	});
 var $author$project$Elm$triple = F3(
 	function (oneExp, twoExp, threeExp) {
 		return $author$project$Internal$Compiler$Expression(
@@ -35123,9 +35471,9 @@ var $author$project$GenerateMain$otherFile = F2(
 										$author$project$Elm$list(
 											A2(
 												$elm$core$List$map,
-												function (_v59) {
-													var route = _v59.a;
-													var params = _v59.b;
+												function (_v63) {
+													var route = _v63.a;
+													var params = _v63.b;
 													var pattern = '/' + A2(
 														$elm$core$String$join,
 														'/',
@@ -35175,9 +35523,9 @@ var $author$project$GenerateMain$otherFile = F2(
 													$elm$core$List$concatMap,
 													function (route) {
 														var params = $author$project$Pages$Internal$RoutePattern$toVariantName(route).params;
-														var _v58 = $author$project$Pages$Internal$RoutePattern$repeatWithoutOptionalEnding(params);
-														if (_v58.$ === 'Just') {
-															var repeated = _v58.a;
+														var _v62 = $author$project$Pages$Internal$RoutePattern$repeatWithoutOptionalEnding(params);
+														if (_v62.$ === 'Just') {
+															var repeated = _v62.a;
 															return _List_fromArray(
 																[
 																	_Utils_Tuple2(route, repeated),
@@ -35276,9 +35624,9 @@ var $author$project$GenerateMain$otherFile = F2(
 						[
 							A2(
 							$author$project$Elm$Case$patternToBranch,
-							function (_v56) {
-								var first = _v56.a;
-								var rest = _v56.b;
+							function (_v60) {
+								var first = _v60.a;
+								var rest = _v60.b;
 								return $author$project$GenerateMain$append(
 									_List_fromArray(
 										[
@@ -35312,7 +35660,11 @@ var $author$project$GenerateMain$otherFile = F2(
 						$author$project$Elm$string('Model mismatch')),
 						_Utils_Tuple2(
 						'body',
-						$author$project$Gen$Html$text('Model mismatch'))
+						$author$project$Elm$list(
+							_List_fromArray(
+								[
+									$author$project$Gen$Html$text('Model mismatch')
+								])))
 					])));
 		var view = A3(
 			$author$project$Elm$Declare$function,
@@ -35391,20 +35743,20 @@ var $author$project$GenerateMain$otherFile = F2(
 			function (args) {
 				if ((((((((args.b && args.b.b) && args.b.b.b) && args.b.b.b.b) && args.b.b.b.b.b) && args.b.b.b.b.b.b) && args.b.b.b.b.b.b.b) && args.b.b.b.b.b.b.b.b) && (!args.b.b.b.b.b.b.b.b.b)) {
 					var pageFormState = args.a;
-					var _v40 = args.b;
-					var fetchers = _v40.a;
-					var _v41 = _v40.b;
-					var transition = _v41.a;
-					var _v42 = _v41.b;
-					var page = _v42.a;
-					var _v43 = _v42.b;
-					var maybePageUrl = _v43.a;
-					var _v44 = _v43.b;
-					var globalData = _v44.a;
+					var _v44 = args.b;
+					var fetchers = _v44.a;
 					var _v45 = _v44.b;
-					var pageData = _v45.a;
+					var transition = _v45.a;
 					var _v46 = _v45.b;
-					var actionData = _v46.a;
+					var page = _v46.a;
+					var _v47 = _v46.b;
+					var maybePageUrl = _v47.a;
+					var _v48 = _v47.b;
+					var globalData = _v48.a;
+					var _v49 = _v48.b;
+					var pageData = _v49.a;
+					var _v50 = _v49.b;
+					var actionData = _v50.a;
 					return A2(
 						$author$project$Elm$withType,
 						$author$project$Elm$Annotation$record(
@@ -35424,9 +35776,10 @@ var $author$project$GenerateMain$otherFile = F2(
 													_Utils_Tuple2('title', $author$project$Elm$Annotation$string),
 													_Utils_Tuple2(
 													'body',
-													$author$project$Gen$Html$annotation_.html(
-														$author$project$Gen$Pages$Msg$annotation_.msg(
-															A2($author$project$Elm$Annotation$named, _List_Nil, 'Msg'))))
+													$author$project$Elm$Annotation$list(
+														$author$project$Gen$Html$annotation_.html(
+															$author$project$Gen$Pages$Msg$annotation_.msg(
+																A2($author$project$Elm$Annotation$named, _List_Nil, 'Msg')))))
 												])))),
 									_Utils_Tuple2(
 									'head',
@@ -35444,8 +35797,8 @@ var $author$project$GenerateMain$otherFile = F2(
 									[
 										A2(
 										$author$project$Elm$Case$patternToBranch,
-										function (_v47) {
-											var data = _v47.b;
+										function (_v51) {
+											var data = _v51.b;
 											return $author$project$Elm$record(
 												_List_fromArray(
 													[
@@ -35534,7 +35887,7 @@ var $author$project$GenerateMain$otherFile = F2(
 																				$author$project$Elm$Pattern$var('subModel'))),
 																			A2(
 																			$author$project$Elm$Case$patternToBranch,
-																			function (_v48) {
+																			function (_v52) {
 																				return modelMismatchView.value;
 																			},
 																			$author$project$Elm$Pattern$ignore)
@@ -35559,9 +35912,9 @@ var $author$project$GenerateMain$otherFile = F2(
 										function (route) {
 											return A2(
 												$author$project$Elm$Case$patternToBranch,
-												function (_v49) {
-													var maybeRouteParams = _v49.a;
-													var data = _v49.b;
+												function (_v53) {
+													var maybeRouteParams = _v53.a;
+													var data = _v53.b;
 													return $author$project$Elm$Let$toExpression(
 														A4(
 															$author$project$Elm$Let$fn,
@@ -35582,7 +35935,7 @@ var $author$project$GenerateMain$otherFile = F2(
 																			A3($author$project$GenerateMain$destructureRouteVariant, $author$project$GenerateMain$ActionData, 'justActionData', route)),
 																			A2(
 																			$author$project$Elm$Case$patternToBranch,
-																			function (_v53) {
+																			function (_v57) {
 																				return $author$project$Elm$nothing;
 																			},
 																			$author$project$Elm$Pattern$ignore)
@@ -35690,7 +36043,7 @@ var $author$project$GenerateMain$otherFile = F2(
 																																			A2(
 																																				$author$project$Gen$Dict$map,
 																																				F2(
-																																					function (_v50, fetcherState) {
+																																					function (_v54, fetcherState) {
 																																						return A2(
 																																							$author$project$Gen$Pages$Transition$map,
 																																							function (ad) {
@@ -35708,7 +36061,7 @@ var $author$project$GenerateMain$otherFile = F2(
 																									A3($author$project$GenerateMain$destructureRouteVariant, $author$project$GenerateMain$Model, 'subModel', route)),
 																									A2(
 																									$author$project$Elm$Case$patternToBranch,
-																									function (_v51) {
+																									function (_v55) {
 																										return modelMismatchView.value;
 																									},
 																									$author$project$Elm$Pattern$ignore)
@@ -35772,7 +36125,7 @@ var $author$project$GenerateMain$otherFile = F2(
 									_List_fromArray(
 										[
 											$author$project$Elm$Case$otherwise(
-											function (_v54) {
+											function (_v58) {
 												return $author$project$Elm$record(
 													_List_fromArray(
 														[
@@ -35781,7 +36134,7 @@ var $author$project$GenerateMain$otherFile = F2(
 															A2(
 																$author$project$Elm$fn,
 																_Utils_Tuple2('_', $elm$core$Maybe$Nothing),
-																function (_v55) {
+																function (_v59) {
 																	return $author$project$Elm$record(
 																		_List_fromArray(
 																			[
@@ -35790,12 +36143,16 @@ var $author$project$GenerateMain$otherFile = F2(
 																				$author$project$Elm$string('Page not found')),
 																				_Utils_Tuple2(
 																				'body',
-																				A2(
-																					$author$project$Gen$Html$div,
-																					_List_Nil,
+																				$author$project$Elm$list(
 																					_List_fromArray(
 																						[
-																							$author$project$Gen$Html$text('This page could not be found.')
+																							A2(
+																							$author$project$Gen$Html$div,
+																							_List_Nil,
+																							_List_fromArray(
+																								[
+																									$author$project$Gen$Html$text('This page could not be found.')
+																								]))
 																						])))
 																			]));
 																})),
@@ -35917,7 +36274,7 @@ var $author$project$GenerateMain$otherFile = F2(
 												return errorPage;
 											}),
 											$author$project$Elm$Case$otherwise(
-											function (_v38) {
+											function (_v42) {
 												return $author$project$Elm$value(
 													{
 														annotation: $elm$core$Maybe$Nothing,
@@ -36062,9 +36419,9 @@ var $author$project$GenerateMain$otherFile = F2(
 										},
 										currentGlobalModel)),
 								$author$project$Elm$Let$letIn(
-									function (_v33) {
-										var sharedModel = _v33.a;
-										var globalCmd = _v33.b;
+									function (_v37) {
+										var sharedModel = _v37.a;
+										var globalCmd = _v37.b;
 										return $author$project$Elm$Let$toExpression(
 											A4(
 												$author$project$Elm$Let$tuple,
@@ -36100,9 +36457,9 @@ var $author$project$GenerateMain$otherFile = F2(
 																			function (route) {
 																				return A2(
 																					$author$project$Elm$Case$patternToBranch,
-																					function (_v35) {
-																						var maybeRouteParams = _v35.a;
-																						var thisPageData = _v35.b;
+																					function (_v39) {
+																						var maybeRouteParams = _v39.a;
+																						var thisPageData = _v39.b;
 																						return A3(
 																							$author$project$Gen$Tuple$call_.mapBoth,
 																							A2($author$project$GenerateMain$routeVariantExpression, $author$project$GenerateMain$Model, route),
@@ -36163,7 +36520,7 @@ var $author$project$GenerateMain$otherFile = F2(
 																																	},
 																																	A3($author$project$GenerateMain$destructureRouteVariant, $author$project$GenerateMain$ActionData, 'thisActionData', route)),
 																																	$author$project$Elm$Case$otherwise(
-																																	function (_v36) {
+																																	function (_v40) {
 																																		return $author$project$Elm$nothing;
 																																	})
 																																]));
@@ -36215,7 +36572,7 @@ var $author$project$GenerateMain$otherFile = F2(
 																			[
 																				A2(
 																				$author$project$Elm$Case$patternToBranch,
-																				function (_v37) {
+																				function (_v41) {
 																					return initErrorPage.call(pageData);
 																				},
 																				$author$project$Elm$Pattern$ignore)
@@ -36224,9 +36581,9 @@ var $author$project$GenerateMain$otherFile = F2(
 														nothing: initErrorPage.call(pageData)
 													}),
 												$author$project$Elm$Let$letIn(
-													function (_v34) {
-														var templateModel = _v34.a;
-														var templateCmd = _v34.b;
+													function (_v38) {
+														var templateModel = _v38.a;
+														var templateCmd = _v38.b;
 														return A2(
 															$author$project$Elm$tuple,
 															$author$project$Elm$record(
@@ -36336,6 +36693,13 @@ var $author$project$GenerateMain$otherFile = F2(
 						$author$project$Elm$Annotation$function,
 						_List_fromArray(
 							[
+								$author$project$Elm$Annotation$maybe(
+								$author$project$Elm$Annotation$record(
+									_List_fromArray(
+										[
+											_Utils_Tuple2('indent', $author$project$Elm$Annotation$int),
+											_Utils_Tuple2('newLines', $author$project$Elm$Annotation$bool)
+										]))),
 								$author$project$Gen$Html$annotation_.html($author$project$Gen$Basics$annotation_.never)
 							]),
 						$author$project$Elm$Annotation$string))),
@@ -36378,82 +36742,154 @@ var $author$project$GenerateMain$otherFile = F2(
 		var fooFn = A6(
 			$author$project$Elm$Declare$fn4,
 			'fooFn',
-			_Utils_Tuple2('wrapModel', $elm$core$Maybe$Nothing),
-			_Utils_Tuple2('wrapMsg', $elm$core$Maybe$Nothing),
+			_Utils_Tuple2(
+				'wrapModel',
+				$elm$core$Maybe$Just(
+					A2(
+						$author$project$Elm$Annotation$function,
+						_List_fromArray(
+							[
+								$author$project$Elm$Annotation$var('a')
+							]),
+						A2($author$project$Elm$Annotation$named, _List_Nil, 'PageModel')))),
+			_Utils_Tuple2(
+				'wrapMsg',
+				$elm$core$Maybe$Just(
+					A2(
+						$author$project$Elm$Annotation$function,
+						_List_fromArray(
+							[
+								$author$project$Elm$Annotation$var('b')
+							]),
+						A2($author$project$Elm$Annotation$named, _List_Nil, 'Msg')))),
 			_Utils_Tuple2(
 				'model',
 				$elm$core$Maybe$Just(
 					A2($author$project$Elm$Annotation$named, _List_Nil, 'Model'))),
-			_Utils_Tuple2('triple', $elm$core$Maybe$Nothing),
+			_Utils_Tuple2(
+				'triple',
+				$elm$core$Maybe$Just(
+					A3(
+						$author$project$Elm$Annotation$triple,
+						$author$project$Elm$Annotation$var('a'),
+						A3(
+							$author$project$Elm$Annotation$namedWith,
+							_List_fromArray(
+								['Effect']),
+							'Effect',
+							_List_fromArray(
+								[
+									$author$project$Elm$Annotation$var('b')
+								])),
+						$author$project$Elm$Annotation$maybe(
+							A2(
+								$author$project$Elm$Annotation$named,
+								_List_fromArray(
+									['Shared']),
+								'Msg'))))),
 			F4(
 				function (wrapModel, wrapMsg, model, triple) {
-					return A3(
-						$author$project$Elm$Case$custom,
-						triple,
-						$author$project$Elm$Annotation$unit,
-						_List_fromArray(
-							[
+					return A2(
+						$author$project$Elm$withType,
+						A3(
+							$author$project$Elm$Annotation$triple,
+							A2($author$project$Elm$Annotation$named, _List_Nil, 'PageModel'),
+							A3(
+								$author$project$Elm$Annotation$namedWith,
+								_List_fromArray(
+									['Effect']),
+								'Effect',
+								_List_fromArray(
+									[
+										A2($author$project$Elm$Annotation$named, _List_Nil, 'Msg')
+									])),
+							A2(
+								$author$project$Elm$Annotation$tuple,
 								A2(
-								$author$project$Elm$Case$patternToBranch,
-								function (_v32) {
-									var a = _v32.a;
-									var b = _v32.b;
-									var c = _v32.c;
-									return A3(
-										$author$project$Elm$triple,
-										A2(
-											$author$project$Elm$apply,
-											wrapModel,
-											_List_fromArray(
-												[a])),
-										A2(
-											$author$project$Elm$apply,
-											$author$project$Elm$value(
-												{
-													annotation: $elm$core$Maybe$Nothing,
-													importFrom: _List_fromArray(
-														['Effect']),
-													name: 'map'
-												}),
+									$author$project$Elm$Annotation$named,
+									_List_fromArray(
+										['Shared']),
+									'Model'),
+								A3(
+									$author$project$Elm$Annotation$namedWith,
+									_List_fromArray(
+										['Effect']),
+									'Effect',
+									_List_fromArray(
+										[
+											A2(
+											$author$project$Elm$Annotation$named,
 											_List_fromArray(
-												[wrapMsg, b])),
-										A2(
-											$author$project$Elm$Case$maybe,
-											c,
-											{
-												just: _Utils_Tuple2(
-													'sharedMsg',
-													function (sharedMsg) {
-														return A2(
-															$author$project$Elm$apply,
-															A2(
-																$author$project$Elm$get,
-																'update',
-																$author$project$Elm$value(
-																	{
-																		annotation: $elm$core$Maybe$Nothing,
-																		importFrom: _List_fromArray(
-																			['Shared']),
-																		name: 'template'
-																	})),
-															_List_fromArray(
-																[
-																	sharedMsg,
-																	A2($author$project$Elm$get, 'global', model)
-																]));
+												['Shared']),
+											'Msg')
+										])))),
+						A3(
+							$author$project$Elm$Case$custom,
+							triple,
+							$author$project$Elm$Annotation$unit,
+							_List_fromArray(
+								[
+									A2(
+									$author$project$Elm$Case$patternToBranch,
+									function (_v36) {
+										var a = _v36.a;
+										var b = _v36.b;
+										var c = _v36.c;
+										return A3(
+											$author$project$Elm$triple,
+											A2(
+												$author$project$Elm$apply,
+												wrapModel,
+												_List_fromArray(
+													[a])),
+											A2(
+												$author$project$Elm$apply,
+												$author$project$Elm$value(
+													{
+														annotation: $elm$core$Maybe$Nothing,
+														importFrom: _List_fromArray(
+															['Effect']),
+														name: 'map'
 													}),
-												nothing: A2(
-													$author$project$Elm$tuple,
-													A2($author$project$Elm$get, 'global', model),
-													$author$project$GenerateMain$effectNone)
-											}));
-								},
-								A3(
-									$author$project$Elm$Pattern$triple,
-									$author$project$Elm$Pattern$var('a'),
-									$author$project$Elm$Pattern$var('b'),
-									$author$project$Elm$Pattern$var('c')))
-							]));
+												_List_fromArray(
+													[wrapMsg, b])),
+											A2(
+												$author$project$Elm$Case$maybe,
+												c,
+												{
+													just: _Utils_Tuple2(
+														'sharedMsg',
+														function (sharedMsg) {
+															return A2(
+																$author$project$Elm$apply,
+																A2(
+																	$author$project$Elm$get,
+																	'update',
+																	$author$project$Elm$value(
+																		{
+																			annotation: $elm$core$Maybe$Nothing,
+																			importFrom: _List_fromArray(
+																				['Shared']),
+																			name: 'template'
+																		})),
+																_List_fromArray(
+																	[
+																		sharedMsg,
+																		A2($author$project$Elm$get, 'global', model)
+																	]));
+														}),
+													nothing: A2(
+														$author$project$Elm$tuple,
+														A2($author$project$Elm$get, 'global', model),
+														$author$project$GenerateMain$effectNone)
+												}));
+									},
+									A3(
+										$author$project$Elm$Pattern$triple,
+										$author$project$Elm$Pattern$var('a'),
+										$author$project$Elm$Pattern$var('b'),
+										$author$project$Elm$Pattern$var('c')))
+								])));
 				}));
 		var update = A3(
 			$author$project$Elm$Declare$function,
@@ -36518,20 +36954,20 @@ var $author$project$GenerateMain$otherFile = F2(
 			function (args) {
 				if ((((((((args.b && args.b.b) && args.b.b.b) && args.b.b.b.b) && args.b.b.b.b.b) && args.b.b.b.b.b.b) && args.b.b.b.b.b.b.b) && args.b.b.b.b.b.b.b.b) && (!args.b.b.b.b.b.b.b.b.b)) {
 					var pageFormState = args.a;
-					var _v11 = args.b;
-					var fetchers = _v11.a;
-					var _v12 = _v11.b;
-					var transition = _v12.a;
-					var _v13 = _v12.b;
-					var sharedData = _v13.a;
-					var _v14 = _v13.b;
-					var pageData = _v14.a;
-					var _v15 = _v14.b;
-					var navigationKey = _v15.a;
+					var _v15 = args.b;
+					var fetchers = _v15.a;
 					var _v16 = _v15.b;
-					var msg = _v16.a;
+					var transition = _v16.a;
 					var _v17 = _v16.b;
-					var model = _v17.a;
+					var sharedData = _v17.a;
+					var _v18 = _v17.b;
+					var pageData = _v18.a;
+					var _v19 = _v18.b;
+					var navigationKey = _v19.a;
+					var _v20 = _v19.b;
+					var msg = _v20.a;
+					var _v21 = _v20.b;
+					var model = _v21.a;
 					return A2(
 						$author$project$Elm$withType,
 						A2(
@@ -36574,9 +37010,9 @@ var $author$project$GenerateMain$otherFile = F2(
 															[
 																A2(
 																$author$project$Elm$Case$patternToBranch,
-																function (_v19) {
-																	var pageModel = _v19.a;
-																	var thisPageData = _v19.b;
+																function (_v23) {
+																	var pageModel = _v23.a;
+																	var thisPageData = _v23.b;
 																	return A3(
 																		$author$project$Gen$Tuple$call_.mapBoth,
 																		$author$project$Elm$val('ModelErrorPage____'),
@@ -36606,7 +37042,7 @@ var $author$project$GenerateMain$otherFile = F2(
 																		$author$project$Elm$Pattern$var('thisPageData')))),
 																A2(
 																$author$project$Elm$Case$patternToBranch,
-																function (_v20) {
+																function (_v24) {
 																	return A2(
 																		$author$project$Elm$tuple,
 																		A2($author$project$Elm$get, 'page', model),
@@ -36615,9 +37051,9 @@ var $author$project$GenerateMain$otherFile = F2(
 																$author$project$Elm$Pattern$ignore)
 															])),
 													$author$project$Elm$Let$letIn(
-														function (_v18) {
-															var updatedPageModel = _v18.a;
-															var pageCmd = _v18.b;
+														function (_v22) {
+															var updatedPageModel = _v22.a;
+															var pageCmd = _v22.b;
 															return A2(
 																$author$project$Elm$tuple,
 																A2(
@@ -36662,9 +37098,9 @@ var $author$project$GenerateMain$otherFile = F2(
 																A2($author$project$Elm$get, 'global', model)
 															])),
 													$author$project$Elm$Let$letIn(
-														function (_v21) {
-															var sharedModel = _v21.a;
-															var globalCmd = _v21.b;
+														function (_v25) {
+															var sharedModel = _v25.a;
+															var globalCmd = _v25.b;
 															return A2(
 																$author$project$Elm$tuple,
 																A2(
@@ -36765,9 +37201,9 @@ var $author$project$GenerateMain$otherFile = F2(
 														navigationKey,
 														$author$project$Elm$Let$letIn(
 															F2(
-																function (_v22, _v23) {
-																	var updatedModel = _v23.a;
-																	var cmd = _v23.b;
+																function (_v26, _v27) {
+																	var updatedModel = _v27.a;
+																	var cmd = _v27.b;
 																	return A2(
 																		$author$project$Elm$Case$maybe,
 																		A2(
@@ -36827,9 +37263,9 @@ var $author$project$GenerateMain$otherFile = F2(
 																										A2($author$project$Elm$get, 'global', model)
 																									])),
 																							$author$project$Elm$Let$letIn(
-																								function (_v24) {
-																									var updatedGlobalModel = _v24.a;
-																									var globalCmd = _v24.b;
+																								function (_v28) {
+																									var updatedGlobalModel = _v28.a;
+																									var globalCmd = _v28.b;
 																									return A2(
 																										$author$project$Elm$tuple,
 																										A2(
@@ -36903,13 +37339,13 @@ var $author$project$GenerateMain$otherFile = F2(
 														[
 															A2(
 															$author$project$Elm$Case$patternToBranch,
-															function (_v25) {
-																var pageModel = _v25.a;
-																var thisPageData = _v25.b;
-																var _v26 = _v25.c;
-																var maybeRouteParams = _v26.a;
-																var pageUrl = _v26.b;
-																var justPage = _v26.c;
+															function (_v29) {
+																var pageModel = _v29.a;
+																var thisPageData = _v29.b;
+																var _v30 = _v29.c;
+																var maybeRouteParams = _v30.a;
+																var pageUrl = _v30.b;
+																var justPage = _v30.c;
 																return $author$project$Elm$Let$toExpression(
 																	A3(
 																		$author$project$Elm$Let$destructure,
@@ -36971,7 +37407,7 @@ var $author$project$GenerateMain$otherFile = F2(
 																								A2(
 																									$author$project$Gen$Dict$map,
 																									F2(
-																										function (_v29, fetcherState) {
+																										function (_v33, fetcherState) {
 																											return A2(
 																												$author$project$Gen$Pages$Transition$map,
 																												function (ad) {
@@ -36988,7 +37424,7 @@ var $author$project$GenerateMain$otherFile = F2(
 																																},
 																																A3($author$project$GenerateMain$destructureRouteVariant, $author$project$GenerateMain$ActionData, 'justActionData', route)),
 																																$author$project$Elm$Case$otherwise(
-																																function (_v30) {
+																																function (_v34) {
 																																	return $author$project$Elm$nothing;
 																																})
 																															]));
@@ -37003,12 +37439,12 @@ var $author$project$GenerateMain$otherFile = F2(
 																						A2($author$project$Elm$get, 'global', model)
 																					]))),
 																		$author$project$Elm$Let$letIn(
-																			function (_v27) {
-																				var updatedPageModel = _v27.a;
-																				var pageCmd = _v27.b;
-																				var _v28 = _v27.c;
-																				var newGlobalModel = _v28.a;
-																				var newGlobalCmd = _v28.b;
+																			function (_v31) {
+																				var updatedPageModel = _v31.a;
+																				var pageCmd = _v31.b;
+																				var _v32 = _v31.c;
+																				var newGlobalModel = _v32.a;
+																				var newGlobalCmd = _v32.b;
 																				return A2(
 																					$author$project$Elm$tuple,
 																					A2(
@@ -37066,7 +37502,7 @@ var $author$project$GenerateMain$otherFile = F2(
 																		$author$project$Elm$Pattern$var('justPage'))))),
 															A2(
 															$author$project$Elm$Case$patternToBranch,
-															function (_v31) {
+															function (_v35) {
 																return A2($author$project$Elm$tuple, model, $author$project$GenerateMain$effectNone);
 															},
 															$author$project$Elm$Pattern$ignore)
@@ -37306,7 +37742,7 @@ var $author$project$GenerateMain$otherFile = F2(
 													$author$project$Elm$Case$branch1,
 													routeVariant,
 													_Utils_Tuple2('_', $author$project$Elm$Annotation$unit),
-													function (_v9) {
+													function (_v13) {
 														return mappedDecoder;
 													}) : A2($author$project$Elm$Case$branch0, routeVariant, mappedDecoder);
 											},
@@ -37488,9 +37924,9 @@ var $author$project$GenerateMain$otherFile = F2(
 																return $author$project$Elm$list(
 																	A2(
 																		$elm$core$List$map,
-																		function (_v8) {
-																			var key = _v8.a;
-																			var value = _v8.b;
+																		function (_v12) {
+																			var key = _v12.a;
+																			var value = _v12.b;
 																			return A2(
 																				$author$project$Elm$tuple,
 																				$author$project$Elm$string(key),
@@ -37570,99 +38006,125 @@ var $author$project$GenerateMain$otherFile = F2(
 			F3(
 				function (maybeRoute, path, model) {
 					return A2(
-						$author$project$Elm$Case$maybe,
-						maybeRoute,
-						{
-							just: _Utils_Tuple2(
-								'justRoute',
-								function (justRoute) {
-									return A2(
-										branchHelper,
-										justRoute,
-										F2(
-											function (route, maybeRouteParams) {
-												return A3(
-													$author$project$Elm$Case$custom,
-													A2($author$project$Elm$get, 'page', model),
-													$author$project$Elm$Annotation$unit,
-													_List_fromArray(
-														[
-															A2(
-															$author$project$Elm$Case$patternToBranch,
-															function (templateModel) {
-																return A2(
-																	$author$project$Gen$Platform$Sub$call_.map,
-																	A2($author$project$GenerateMain$routeVariantExpression, $author$project$GenerateMain$Msg, route),
-																	A2(
-																		$author$project$Elm$apply,
+						$author$project$Elm$withType,
+						$author$project$Gen$Platform$Sub$annotation_.sub(
+							A2($author$project$Elm$Annotation$named, _List_Nil, 'Msg')),
+						A2(
+							$author$project$Elm$Case$maybe,
+							maybeRoute,
+							{
+								just: _Utils_Tuple2(
+									'justRoute',
+									function (justRoute) {
+										return A2(
+											branchHelper,
+											justRoute,
+											F2(
+												function (route, maybeRouteParams) {
+													return A3(
+														$author$project$Elm$Case$custom,
+														A2($author$project$Elm$get, 'page', model),
+														$author$project$Elm$Annotation$unit,
+														_List_fromArray(
+															[
+																A2(
+																$author$project$Elm$Case$patternToBranch,
+																function (templateModel) {
+																	return A2(
+																		$author$project$Gen$Platform$Sub$call_.map,
+																		A2($author$project$GenerateMain$routeVariantExpression, $author$project$GenerateMain$Msg, route),
 																		A2(
-																			$author$project$Elm$get,
-																			'subscriptions',
-																			$author$project$Elm$value(
-																				{
-																					annotation: $elm$core$Maybe$Nothing,
-																					importFrom: A2(
-																						$elm$core$List$cons,
-																						'Route',
-																						$author$project$Pages$Internal$RoutePattern$toModuleName(route)),
-																					name: 'route'
-																				})),
-																		_List_fromArray(
-																			[
-																				$author$project$Elm$nothing,
-																				A2(
-																				$elm$core$Maybe$withDefault,
-																				$author$project$Elm$record(_List_Nil),
-																				maybeRouteParams),
-																				path,
-																				templateModel,
-																				A2($author$project$Elm$get, 'global', model)
-																			])));
-															},
-															A3($author$project$GenerateMain$destructureRouteVariant, $author$project$GenerateMain$Model, 'templateModel', route)),
-															$author$project$Elm$Case$otherwise(
-															function (_v6) {
-																return $author$project$Gen$Platform$Sub$none;
-															})
-														]));
-											}));
-								}),
-							nothing: $author$project$Gen$Platform$Sub$none
-						});
+																			$author$project$Elm$apply,
+																			A2(
+																				$author$project$Elm$get,
+																				'subscriptions',
+																				$author$project$Elm$value(
+																					{
+																						annotation: $elm$core$Maybe$Nothing,
+																						importFrom: A2(
+																							$elm$core$List$cons,
+																							'Route',
+																							$author$project$Pages$Internal$RoutePattern$toModuleName(route)),
+																						name: 'route'
+																					})),
+																			_List_fromArray(
+																				[
+																					$author$project$Elm$nothing,
+																					A2(
+																					$elm$core$Maybe$withDefault,
+																					$author$project$Elm$record(_List_Nil),
+																					maybeRouteParams),
+																					path,
+																					templateModel,
+																					A2($author$project$Elm$get, 'global', model)
+																				])));
+																},
+																A3($author$project$GenerateMain$destructureRouteVariant, $author$project$GenerateMain$Model, 'templateModel', route)),
+																$author$project$Elm$Case$otherwise(
+																function (_v10) {
+																	return $author$project$Gen$Platform$Sub$none;
+																})
+															]));
+												}));
+									}),
+								nothing: $author$project$Gen$Platform$Sub$none
+							}));
 				}));
 		var subscriptions = A5(
 			$author$project$Elm$Declare$fn3,
 			'subscriptions',
-			_Utils_Tuple2('route', $elm$core$Maybe$Nothing),
-			_Utils_Tuple2('path', $elm$core$Maybe$Nothing),
-			_Utils_Tuple2('model', $elm$core$Maybe$Nothing),
+			_Utils_Tuple2(
+				'route',
+				$elm$core$Maybe$Just(
+					$author$project$Elm$Annotation$maybe(
+						A2(
+							$author$project$Elm$Annotation$named,
+							_List_fromArray(
+								['Route']),
+							'Route')))),
+			_Utils_Tuple2(
+				'path',
+				$elm$core$Maybe$Just(
+					A2(
+						$author$project$Elm$Annotation$named,
+						_List_fromArray(
+							['Path']),
+						'Path'))),
+			_Utils_Tuple2(
+				'model',
+				$elm$core$Maybe$Just(
+					A2($author$project$Elm$Annotation$named, _List_Nil, 'Model'))),
 			F3(
 				function (route, path, model) {
-					return $author$project$Gen$Platform$Sub$batch(
-						_List_fromArray(
-							[
-								A2(
-								$author$project$Gen$Platform$Sub$call_.map,
-								$author$project$Elm$val('MsgGlobal'),
-								A2(
-									$author$project$Elm$apply,
+					return A2(
+						$author$project$Elm$withType,
+						$author$project$Gen$Platform$Sub$annotation_.sub(
+							A2($author$project$Elm$Annotation$named, _List_Nil, 'Msg')),
+						$author$project$Gen$Platform$Sub$batch(
+							_List_fromArray(
+								[
 									A2(
-										$author$project$Elm$get,
-										'subscriptions',
-										$author$project$Elm$value(
-											{
-												annotation: $elm$core$Maybe$Nothing,
-												importFrom: _List_fromArray(
-													['Shared']),
-												name: 'template'
-											})),
-									_List_fromArray(
-										[
-											path,
-											A2($author$project$Elm$get, 'global', model)
-										]))),
-								A3(templateSubscriptions.call, route, path, model)
-							]));
+									$author$project$Gen$Platform$Sub$call_.map,
+									$author$project$Elm$val('MsgGlobal'),
+									A2(
+										$author$project$Elm$apply,
+										A2(
+											$author$project$Elm$get,
+											'subscriptions',
+											$author$project$Elm$value(
+												{
+													annotation: $elm$core$Maybe$Nothing,
+													importFrom: _List_fromArray(
+														['Shared']),
+													name: 'template'
+												})),
+										_List_fromArray(
+											[
+												path,
+												A2($author$project$Elm$get, 'global', model)
+											]))),
+									A3(templateSubscriptions.call, route, path, model)
+								])));
 				}));
 		var apiPatterns = A2(
 			$author$project$Elm$Extra$topLevelValue,
@@ -37697,8 +38159,14 @@ var $author$project$GenerateMain$otherFile = F2(
 												_List_fromArray(
 													[
 														getStaticRoutes.reference,
-														$author$project$Elm$Extra$fnIgnore(
-														$author$project$Elm$string(''))
+														A3(
+														$author$project$Elm$fn2,
+														_Utils_Tuple2('a', $elm$core$Maybe$Nothing),
+														_Utils_Tuple2('b', $elm$core$Maybe$Nothing),
+														F2(
+															function (_v8, _v9) {
+																return $author$project$Elm$string('');
+															}))
 													])))))))))));
 		var pathsToGenerateHandler = A2(
 			$author$project$Elm$Extra$topLevelValue,
@@ -37780,8 +38248,14 @@ var $author$project$GenerateMain$otherFile = F2(
 													_List_fromArray(
 														[
 															getStaticRoutes.reference,
-															$author$project$Elm$Extra$fnIgnore(
-															$author$project$Elm$string(''))
+															A3(
+															$author$project$Elm$fn2,
+															_Utils_Tuple2('a', $elm$core$Maybe$Nothing),
+															_Utils_Tuple2('b', $elm$core$Maybe$Nothing),
+															F2(
+																function (_v6, _v7) {
+																	return $author$project$Elm$string('');
+																}))
 														]))))))))))));
 		var action = A3(
 			$author$project$Elm$Declare$fn,
@@ -38292,13 +38766,58 @@ var $author$project$GenerateMain$otherFile = F2(
 							A2(
 								$author$project$Elm$declaration,
 								'main',
-								$author$project$Gen$Pages$Internal$Platform$application(config)));
+								A2(
+									$author$project$Elm$withType,
+									A3(
+										$author$project$Elm$Annotation$namedWith,
+										_List_fromArray(
+											['Platform']),
+										'Program',
+										_List_fromArray(
+											[
+												$author$project$Gen$Pages$Internal$Platform$annotation_.flags,
+												A4(
+												$author$project$Gen$Pages$Internal$Platform$annotation_.model,
+												A2($author$project$Elm$Annotation$named, _List_Nil, 'Model'),
+												A2($author$project$Elm$Annotation$named, _List_Nil, 'PageData'),
+												A2($author$project$Elm$Annotation$named, _List_Nil, 'ActionData'),
+												A2(
+													$author$project$Elm$Annotation$named,
+													_List_fromArray(
+														['Shared']),
+													'Data')),
+												A5(
+												$author$project$Gen$Pages$Internal$Platform$annotation_.msg,
+												A2($author$project$Elm$Annotation$named, _List_Nil, 'Msg'),
+												A2($author$project$Elm$Annotation$named, _List_Nil, 'PageData'),
+												A2($author$project$Elm$Annotation$named, _List_Nil, 'ActionData'),
+												A2(
+													$author$project$Elm$Annotation$named,
+													_List_fromArray(
+														['Shared']),
+													'Data'),
+												A2(
+													$author$project$Elm$Annotation$named,
+													_List_fromArray(
+														['ErrorPage']),
+													'ErrorPage'))
+											])),
+									$author$project$Gen$Pages$Internal$Platform$application(config))));
 					} else {
 						return $author$project$Elm$Extra$expose(
 							A2(
 								$author$project$Elm$declaration,
 								'main',
-								$author$project$Gen$Pages$Internal$Platform$Cli$cliApplication(config)));
+								A2(
+									$author$project$Elm$withType,
+									$author$project$Gen$Pages$Internal$Platform$Cli$annotation_.program(
+										$author$project$Elm$Annotation$maybe(
+											A2(
+												$author$project$Elm$Annotation$named,
+												_List_fromArray(
+													['Route']),
+												'Route'))),
+									$author$project$Gen$Pages$Internal$Platform$Cli$cliApplication(config))));
 					}
 				}(),
 					dataForRoute.declaration,