==================== Arity analysis ====================
$w==_s4mH :: GHC.Prim.Int#
	     -> GHC.Base.Int
	     -> GHC.Base.Int
	     -> GHC.Prim.Int#
	     -> GHC.Base.Int
	     -> GHC.Base.Int
	     -> GHC.Base.Bool
[Arity 6
 0 -> 0 -> 0 -> 0 -> 0 -> 0 -> *
 Str: DmdType LLLLLL]
$w==_s4mH = \ (ww_s4lF :: GHC.Prim.Int#)
	      (ww_s4lH :: GHC.Base.Int)
	      (ww_s4lI :: GHC.Base.Int)
	      (ww_s4lO :: GHC.Prim.Int#)
	      (ww_s4lQ :: GHC.Base.Int)
	      (ww_s4lR :: GHC.Base.Int) ->
	      case GHC.Base.Bool GHC.Prim.==# ww_s4lF ww_s4lO of wild_X45N {
		GHC.Base.False -> GHC.Base.False;
		GHC.Base.True ->
		  case GHC.Base.Bool ww_s4lH of wild_X45G { GHC.Base.I# x_X45H ->
		  case GHC.Base.Bool ww_s4lQ of wild1_X45M { GHC.Base.I# y_X45Q ->
		  case GHC.Base.Bool GHC.Prim.==# x_X45H y_X45Q of wild_X45X {
		    GHC.Base.False -> GHC.Base.False;
		    GHC.Base.True ->
		      case GHC.Base.Bool ww_s4lI of wild_X47o { GHC.Base.I# x_X47r ->
		      case GHC.Base.Bool ww_s4lR of wild1_X47y { GHC.Base.I# y_X47E ->
		      GHC.Prim.==# x_X47r y_X47E
		      }
		      }
		  }
		  }
		  }
	      }

a_s40I :: [GHC.Base.Char]
[*
 Str: DmdType]
a_s40I = GHC.Base.unpackCString# "AlexPn "

$wshowsPrec_s4mG :: GHC.Prim.Int#
		    -> GHC.Base.Int
		    -> GHC.Base.Int
		    -> GHC.Base.Int
		    -> GHC.Base.String
		    -> GHC.Base.String
[Arity 5
 0 -> 0 -> 0 -> 0 -> 0 -> *
 Str: DmdType LLLLL]
$wshowsPrec_s4mG = \ (ww_s4lp :: GHC.Prim.Int#)
		     (ww_s4lt :: GHC.Base.Int)
		     (ww_s4lu :: GHC.Base.Int)
		     (ww_s4lv :: GHC.Base.Int)
		     (w_s4lx :: GHC.Base.String) ->
		     let {
		       p_s4p5 :: GHC.Show.ShowS
		       [Arity 1
			*
			Str: DmdType L]
		       p_s4p5 = \ (x_a41d :: GHC.Base.String) ->
				  GHC.Base.++
				    @ GHC.Base.Char
				    a_s40I
				    (case [GHC.Base.Char] ww_s4lt of w_X42m { GHC.Base.I# ww_a40t ->
				     GHC.Show.$wshowSignedInt
				       11
				       ww_a40t
				       (GHC.Base.:
					  @ GHC.Base.Char
					  GHC.Show.lvl1
					  (case [GHC.Base.Char] ww_s4lu of w_X44A { GHC.Base.I# ww_X42J ->
					   GHC.Show.$wshowSignedInt
					     11
					     ww_X42J
					     (GHC.Base.:
						@ GHC.Base.Char
						GHC.Show.lvl1
						(case [GHC.Base.Char] ww_s4lv of w_X44r { GHC.Base.I# ww_X42A ->
						 GHC.Show.$wshowSignedInt 11 ww_X42A x_a41d
						 }))
					   }))
				     })
		     } in 
		       case GHC.Base.String GHC.Prim.>=# ww_s4lp 11 of wild_a42t {
			 GHC.Base.False -> p_s4p5 w_s4lx;
			 GHC.Base.True ->
			   GHC.Base.:
			     @ GHC.Base.Char
			     GHC.Show.a2
			     (p_s4p5 (GHC.Base.: @ GHC.Base.Char GHC.Show.a w_s4lx))
		       }

lvl_s3Z7 :: [GHC.Base.Char]
[*
 Str: DmdType]
lvl_s3Z7 = GHC.Base.unpackCString# "error."

lvl_s3Z6 :: [GHC.Base.Char]
[*
 Str: DmdType]
lvl_s3Z6 = GHC.Base.unpackCString# "stopped."

lit_s3Yy :: GHC.Num.Integer
[*
 Str: DmdType]
lit_s3Yy = GHC.Num.S# 1

lit_a3m9 :: GHC.Base.Int
[*
 Str: DmdType m]
lit_a3m9 = GHC.Base.I# 0

return_a3fW :: forall a_a2mR. a_a2mR -> Main.Alex a_a2mR
[Arity 2
 0 -> T
 Str: DmdType LA]
return_a3fW = \ (@ a_a3g1)
		(a_X2cH :: a_a3g1)
		(@ s_a3g7)
		(s_a2bU :: Main.AlexState s_a3g7) ->
		GHC.ST.poly_return @ s_a3g7 @ a_a3g1 a_X2cH

>>_a3fv :: forall a_a2kH b_a2kJ.
	   Main.Alex a_a2kH -> Main.Alex b_a2kJ -> Main.Alex b_a2kJ
[Arity 4
 3 -> 3 -> 0 -> 0 -> *
 Str: DmdType C(C(U(LA)))C(C(S))LL]
>>_a3fv = \ (@ a_a3fM)
	    (@ b_a3fN)
	    (eta_a3Ts :: Main.Alex a_a3fM)
	    (eta1_a3Tr :: Main.Alex b_a3fN)
	    (@ s_a3eY)
	    (eta_s40h :: Main.AlexState s_a3eY)
	    (eta_s40i :: GHC.Prim.State# s_a3eY) ->
	    case (# GHC.Prim.State# s_a3eY, b_a3fN #) eta_a3Ts @ s_a3eY eta_s40h eta_s40i
	    of wild_a3ZB { (# new_s_a3Zz, r_a3ZA #) ->
	    eta1_a3Tr @ s_a3eY eta_s40h new_s_a3Zz
	    }

>>=_a3eM :: forall a_a2n6 b_a2n8.
	    Main.Alex a_a2n6 -> (a_a2n6 -> Main.Alex b_a2n8) -> Main.Alex b_a2n8
[Arity 4
 3 -> 4 -> 0 -> 0 -> *
 Str: DmdType C(C(U(LL)))C(C(C(S)))LL]
>>=_a3eM = \ (@ a_a3eR)
	     (@ b_a3eS)
	     (ds_d3nC :: Main.Alex a_a3eR)
	     (k_X2cv :: a_a3eR -> Main.Alex b_a3eS)
	     (@ s_a3eY)
	     (s_a2bI :: Main.AlexState s_a3eY)
	     (s_a3Zr :: GHC.Prim.State# s_a3eY) ->
	     case (# GHC.Prim.State# s_a3eY, b_a3eS #) ds_d3nC @ s_a3eY s_a2bI s_a3Zr
	     of wild_a3ZB { (# new_s_a3Zz, r_a3ZA #) ->
	     k_X2cv r_a3ZA @ s_a3eY s_a2bI new_s_a3Zz
	     }

showsPrec_a3cJ :: GHC.Base.Int -> Main.AlexPosn -> GHC.Show.ShowS
[T
 Worker $wshowsPrec_s4mG
 Str: DmdType U(L)U(LLL)L]
showsPrec_a3cJ = __inline_me (\ (w_s4ln :: GHC.Base.Int)
				(w_s4lr :: Main.AlexPosn)
				(w_s4lx :: GHC.Base.String) ->
				case GHC.Base.String w_s4ln of w_X4mv { GHC.Base.I# ww_s4lp ->
				case GHC.Base.String w_s4lr of w_X4mD { Main.AlexPn ww_s4lt ww_s4lu ww_s4lv ->
				$wshowsPrec_s4mG ww_s4lp ww_s4lt ww_s4lu ww_s4lv w_s4lx
				}
				})

showList_a3eh :: [Main.AlexPosn] -> GHC.Show.ShowS
[Arity 2
 0 -> 0 -> *
 Str: DmdType SL]
showList_a3eh = \ (ds1_a3Hj :: [Main.AlexPosn]) (s_a3Hi :: GHC.Base.String) ->
		  case GHC.Base.String ds1_a3Hj of wild_a3Hu {
		    [] -> GHC.Base.++ @ GHC.Base.Char GHC.Show.lvl16 s_a3Hi;
		    : x_a3Hs xs_a3Ht ->
		      GHC.Base.:
			@ GHC.Base.Char
			GHC.Show.lvl14
			(case [GHC.Base.Char] x_a3Hs of w_X4mD { Main.AlexPn ww_s4lt ww_s4lu ww_s4lv ->
			 $wshowsPrec_s4mG
			   0
			   ww_s4lt
			   ww_s4lu
			   ww_s4lv
			   (__letrec {
			      showl1_s4p9 :: [Main.AlexPosn] -> [GHC.Base.Char]
			      [Arity 1
			       0 -> *
			       Str: DmdType S]
			      showl1_s4p9 = \ (ds2_a3Hq :: [Main.AlexPosn]) ->
					      case [GHC.Base.Char] ds2_a3Hq of wild1_a42z {
						[] -> GHC.Base.: @ GHC.Base.Char GHC.Show.lvl15 s_a3Hi;
						: y_a42x ys_a42y ->
						  GHC.Base.:
						    @ GHC.Base.Char
						    GHC.Show.a1
						    (case [GHC.Base.Char] y_a42x
						     of w_X4o5 { Main.AlexPn ww_X4mX ww_X4mZ ww_X4n1 ->
						     $wshowsPrec_s4mG 0 ww_X4mX ww_X4mZ ww_X4n1 (showl1_s4p9 ys_a42y)
						     })
					      };
			    } in  showl1_s4p9 xs_a3Ht)
			 })
		  }

$dmshow_a3m7 :: Main.AlexPosn -> GHC.Base.String
[Arity 1
 0 -> *
 Str: DmdType U(LLL)]
$dmshow_a3m7 = \ (x_a42G :: Main.AlexPosn) ->
		 case GHC.Base.String x_a42G of w_X4mD { Main.AlexPn ww_s4lt ww_s4lu ww_s4lv ->
		 $wshowsPrec_s4mG 0 ww_s4lt ww_s4lu ww_s4lv (GHC.Base.[] @ GHC.Base.Char)
		 }

==_a3c8 :: Main.AlexPosn -> Main.AlexPosn -> GHC.Base.Bool
[T
 Worker $w==_s4mH
 Str: DmdType U(U(L)LL)U(U(L)LL)]
==_a3c8 = __inline_me (\ (w_s4lB :: Main.AlexPosn) (w_s4lK :: Main.AlexPosn) ->
			 case GHC.Base.Bool w_s4lB of w_X4mO { Main.AlexPn ww_s4lD ww_s4lH ww_s4lI ->
			 case GHC.Base.Bool ww_s4lD of ww_X4mW { GHC.Base.I# ww_s4lF ->
			 case GHC.Base.Bool w_s4lK of w_X4n7 { Main.AlexPn ww_s4lM ww_s4lQ ww_s4lR ->
			 case GHC.Base.Bool ww_s4lM of ww_X4nf { GHC.Base.I# ww_s4lO ->
			 $w==_s4mH ww_s4lF ww_s4lH ww_s4lI ww_s4lO ww_s4lQ ww_s4lR
			 }
			 }
			 }
			 })

/=_a3cr :: Main.AlexPosn -> Main.AlexPosn -> GHC.Base.Bool
[Arity 2
 0 -> 0 -> *
 Str: DmdType U(U(L)LL)U(U(L)LL)]
/=_a3cr = \ (a_a2jh :: Main.AlexPosn) (b_a2ji :: Main.AlexPosn) ->
	    case GHC.Base.Bool a_a2jh of w_X4mO { Main.AlexPn ww_s4lD ww_s4lH ww_s4lI ->
	    case GHC.Base.Bool ww_s4lD of ww_X4mW { GHC.Base.I# ww_s4lF ->
	    case GHC.Base.Bool b_a2ji of w_X4n7 { Main.AlexPn ww_s4lM ww_s4lQ ww_s4lR ->
	    case GHC.Base.Bool ww_s4lM of ww_X4nf { GHC.Base.I# ww_s4lO ->
	    case GHC.Base.Bool GHC.Prim.==# ww_s4lF ww_s4lO of wild_X45N {
	      GHC.Base.False -> GHC.Base.True;
	      GHC.Base.True ->
		case GHC.Base.Bool ww_s4lH of wild_X45G { GHC.Base.I# x_X45H ->
		case GHC.Base.Bool ww_s4lQ of wild1_X45M { GHC.Base.I# y_X45Q ->
		case GHC.Base.Bool GHC.Prim.==# x_X45H y_X45Q of wild_X45X {
		  GHC.Base.False -> GHC.Base.True;
		  GHC.Base.True ->
		    case GHC.Base.Bool ww_s4lI of wild_X47o { GHC.Base.I# x_X47r ->
		    case GHC.Base.Bool ww_s4lR of wild1_X47y { GHC.Base.I# y_X47E ->
		    case GHC.Base.Bool GHC.Prim.==# x_X47r y_X47E of wild_a43s {
		      GHC.Base.False -> GHC.Base.True; GHC.Base.True -> GHC.Base.False
		    }
		    }
		    }
		}
		}
		}
	    }
	    }
	    }
	    }
	    }

$fShowAlexPosn_a2iT :: {GHC.Show.Show Main.AlexPosn}
[Exported]
[*
 Str: DmdType m]
$fShowAlexPosn_a2iT = GHC.Show.:DShow
			@ Main.AlexPosn showsPrec_a3cJ $dmshow_a3m7 showList_a3eh

$fEqAlexPosn_a2iS :: {GHC.Base.Eq Main.AlexPosn}
[Exported]
[*
 Str: DmdType m]
$fEqAlexPosn_a2iS = GHC.Base.:DEq @ Main.AlexPosn ==_a3c8 /=_a3cr

Rec {
$fMonadAlex_a2dQ :: {GHC.Base.Monad Main.Alex}
[Exported]
[*
 Str: DmdType m]
$fMonadAlex_a2dQ = GHC.Base.:DMonad
		     @ Main.Alex >>=_a3eM >>_a3fv return_a3fW fail_a3gq
fail_a3gq :: forall a_a3eL. GHC.Base.String -> Main.Alex a_a3eL
[Arity 1
 *
 Str: DmdType Sb]
fail_a3gq = \ (@ a_a3gE) (eta_x1 :: GHC.Base.String) ->
	      GHC.Base.$dmfail @ Main.Alex $fMonadAlex_a2dQ @ a_a3gE eta_x1
end Rec }

lvl_s4pX :: GHC.Base.Int
[*]
lvl_s4pX = GHC.Base.I# 3

lvl_s4pU :: (Main.AlexPosn, GHC.Base.Char, [GHC.Base.Char])
	    -> GHC.Base.Int
	    -> Main.Alex [GHC.Base.Char]
[Arity 2
 0 -> 0 -> T]
lvl_s4pU = \ (ds_d3nZ :: (Main.AlexPosn, GHC.Base.Char, [GHC.Base.Char]))
	     (len_a1Rn :: GHC.Base.Int) ->
	     case (Main.Alex [GHC.Base.Char]) ds_d3nZ
	     of wild_X3c { (ds_d3o0, ds_d3o1, input_a1Rm) ->
	     let {
	       a_s4pV :: [GHC.Base.Char]
	       [*
		Str: DmdType]
	       a_s4pV = GHC.List.take @ GHC.Base.Char len_a1Rn input_a1Rm
	     } in 
	       \ (@ s_X3jq)
		 (s_X2fe :: Main.AlexState s_X3jq)
		 (s_a3ZV :: GHC.Prim.State# s_X3jq) ->
		 (# s_a3ZV, a_s4pV #)
	     }

lvl_s4pT :: GHC.Base.Int
[*]
lvl_s4pT = GHC.Base.I# 1

lvl_s4pS :: Main.AlexAcc ((Main.AlexPosn, GHC.Base.Char, [GHC.Base.Char])
			  -> GHC.Base.Int
			  -> Main.Alex [GHC.Base.Char])
[*]
lvl_s4pS = Main.AlexAcc
	     @ ((Main.AlexPosn, GHC.Base.Char, [GHC.Base.Char])
		-> GHC.Base.Int
		-> Main.Alex [GHC.Base.Char])
	     lvl_s4pT
	     lvl_s4pU
	     (Data.Maybe.Nothing @ (GHC.Arr.Array GHC.Base.Char GHC.Base.Bool))
	     (Data.Maybe.Nothing @ GHC.Base.Int)

lvl_s4pR :: [Main.AlexAcc ((Main.AlexPosn, GHC.Base.Char, [GHC.Base.Char])
			   -> GHC.Base.Int
			   -> Main.Alex [GHC.Base.Char])]
[*]
lvl_s4pR = GHC.Base.:
	     @ (Main.AlexAcc ((Main.AlexPosn, GHC.Base.Char, [GHC.Base.Char])
			      -> GHC.Base.Int
			      -> Main.Alex [GHC.Base.Char]))
	     lvl_s4pS
	     (GHC.Base.[]
		@ (Main.AlexAcc ((Main.AlexPosn, GHC.Base.Char, [GHC.Base.Char])
				 -> GHC.Base.Int
				 -> Main.Alex [GHC.Base.Char])))

lvl_s4pQ :: [[Main.AlexAcc ((Main.AlexPosn, GHC.Base.Char, [GHC.Base.Char])
			    -> GHC.Base.Int
			    -> Main.Alex [GHC.Base.Char])]]
[*]
lvl_s4pQ = GHC.Base.:
	     @ [Main.AlexAcc ((Main.AlexPosn, GHC.Base.Char, [GHC.Base.Char])
			      -> GHC.Base.Int
			      -> Main.Alex [GHC.Base.Char])]
	     lvl_s4pR
	     (GHC.Base.[]
		@ [Main.AlexAcc ((Main.AlexPosn, GHC.Base.Char, [GHC.Base.Char])
				 -> GHC.Base.Int
				 -> Main.Alex [GHC.Base.Char])])

Rec {
$wk_s4mM :: GHC.Prim.Int#
	    -> forall s_a2bs.
	       Main.AlexState s_a2bs
	       -> GHC.Prim.State# s_a2bs
	       -> (# GHC.Prim.State# s_a2bs, [GHC.Base.Char] #)
[Arity 3
 0 -> 0 -> 0 -> *
 Str: DmdType LS(U(L)U(L)U(L)L)L]
$wk_s4mM = \ (ww_s4mz :: GHC.Prim.Int#)
	     (@ s_a2bs)
	     (w_s4mC :: Main.AlexState s_a2bs)
	     (w_s4mD :: GHC.Prim.State# s_a2bs) ->
	     case (# GHC.Prim.State# s_a2bs, [GHC.Base.Char] #) w_s4mC
	     of wild_X2B { Main.AlexState pos_r_a21Q inp_r_a21S chr_r_a21R ds_d3od ->
	     case (# GHC.Prim.State# s_a2bs, [GHC.Base.Char] #) inp_r_a21S
	     of wild_a43y { GHC.STRef.STRef var#_a43z ->
	     case (# GHC.Prim.State# s_a2bs, [GHC.Base.Char] #) GHC.Prim.readMutVar#
								  @ s_a2bs @ GHC.Base.String var#_a43z w_s4mD
	     of wild_a3ZB { (# new_s_a3Zz, r_a3ZA #) ->
	     case (# GHC.Prim.State# s_a2bs, [GHC.Base.Char] #) chr_r_a21R
	     of wild_X46u { GHC.STRef.STRef var#_X46x ->
	     case (# GHC.Prim.State# s_a2bs, [GHC.Base.Char] #) GHC.Prim.readMutVar#
								  @ s_a2bs @ GHC.Base.Char var#_X46x new_s_a3Zz
	     of wild_X42B { (# new_s_X42A, r_X42C #) ->
	     case (# GHC.Prim.State# s_a2bs, [GHC.Base.Char] #) pos_r_a21Q
	     of wild_X46v { GHC.STRef.STRef var#_X46y ->
	     case (# GHC.Prim.State# s_a2bs, [GHC.Base.Char] #) GHC.Prim.readMutVar#
								  @ s_a2bs @ Main.AlexPosn var#_X46y new_s_X42A
	     of wild_X45K { (# new_s_X48T, r_X42D #) ->
	     case (# GHC.Prim.State# s_a2bs, [GHC.Base.Char] #) r_X42C
	     of tpl_X4U { GHC.Base.C# a_s3Wm ->
	     case (# GHC.Prim.State# s_a2bs, [GHC.Base.Char] #) alex_scan_tkn_a2zF
								  tpl_X4U
								  0
								  ww_s4mz
								  (Main.AlexNone
								     @ (Main.AlexInput
									-> GHC.Base.Int
									-> Main.Alex [GHC.Base.Char]))
								  @ s_a2bs
								  wild_X2B
								  new_s_X48T
	     of wild_X42t { (# new_s_X42s, r_X42u #) ->
	     case (# GHC.Prim.State# s_a2bs, [GHC.Base.Char] #) r_X42u of wild_X4V {
	       Main.AlexNone ->
		 case (# GHC.Prim.State# s_a2bs, [GHC.Base.Char] #) r_a3ZA of wild_X4y {
		   [] -> (# new_s_X42s, lvl_s3Z6 #); : a_s3Tv a_s3Tw -> (# new_s_X42s, lvl_s3Z7 #)
		 };
	       Main.AlexLastAcc k_a23z input_a23A len_a23B ->
		 case (# GHC.Prim.State# s_a2bs, [GHC.Base.Char] #) input_a23A
		 of wild_X2D { (pos_a225, chr_a226, inp_a227) ->
		 case (# GHC.Prim.State# s_a2bs, [GHC.Base.Char] #) GHC.Prim.writeMutVar#
								      @ s_a2bs
								      @ GHC.Base.String
								      var#_a43z
								      inp_a227
								      new_s_X42s
		 of s2#_a43F { __DEFAULT ->
		 case (# GHC.Prim.State# s_a2bs, [GHC.Base.Char] #) GHC.Prim.writeMutVar#
								      @ s_a2bs
								      @ Main.AlexPosn
								      var#_X46y
								      pos_a225
								      s2#_a43F
		 of s2#_X46S { __DEFAULT ->
		 case (# GHC.Prim.State# s_a2bs, [GHC.Base.Char] #) GHC.Prim.writeMutVar#
								      @ s_a2bs
								      @ GHC.Base.Char
								      var#_X46x
								      chr_a226
								      s2#_X46S
		 of s2#_X46O { __DEFAULT ->
		 k_a23z (r_X42D, tpl_X4U, r_a3ZA) len_a23B @ s_a2bs wild_X2B s2#_X46O
		 }
		 }
		 }
		 }
	     }
	     }
	     }
	     }
	     }
	     }
	     }
	     }
	     }
	     }
lvl_s4pP :: (Main.AlexPosn, GHC.Base.Char, [GHC.Base.Char])
	    -> GHC.Base.Int
	    -> forall s_a2bs.
	       Main.AlexState s_a2bs
	       -> GHC.Prim.State# s_a2bs
	       -> (# GHC.Prim.State# s_a2bs, [GHC.Base.Char] #)
[Arity 4
 T]
lvl_s4pP = \ (input_a22z :: (Main.AlexPosn, GHC.Base.Char, [GHC.Base.Char]))
	     (len_a22A :: GHC.Base.Int)
	     (@ s_a2bs)
	     (eta_s47H :: Main.AlexState s_a2bs)
	     (eta_s47I :: GHC.Prim.State# s_a2bs) ->
	     case (# GHC.Prim.State# s_a2bs, [GHC.Base.Char] #) eta_s47H
	     of wild_X34 { Main.AlexState ds_d3og ds_d3oh ds_d3oi scd_r_a22m ->
	     case (# GHC.Prim.State# s_a2bs, [GHC.Base.Char] #) scd_r_a22m
	     of wild_a43y { GHC.STRef.STRef var#_a43z ->
	     case (# GHC.Prim.State# s_a2bs, [GHC.Base.Char] #) GHC.Prim.readMutVar#
								  @ s_a2bs @ GHC.Base.Int var#_a43z eta_s47I
	     of wild_a3ZB { (# new_s_a3Zz, r_a3ZA #) ->
	     case (# GHC.Prim.State# s_a2bs, [GHC.Base.Char] #) r_a3ZA
	     of w_X4o2 { GHC.Base.I# ww_s4mz ->
	     $wk_s4mM ww_s4mz @ s_a2bs wild_X34 new_s_a3Zz
	     }
	     }
	     }
	     }
lvl_s4pN :: Main.AlexAcc ((Main.AlexPosn, GHC.Base.Char, [GHC.Base.Char])
			  -> GHC.Base.Int
			  -> Main.Alex [GHC.Base.Char])
[*]
lvl_s4pN = Main.AlexAcc
	     @ ((Main.AlexPosn, GHC.Base.Char, [GHC.Base.Char])
		-> GHC.Base.Int
		-> Main.Alex [GHC.Base.Char])
	     lit_a3m9
	     lvl_s4pP
	     (Data.Maybe.Nothing @ (GHC.Arr.Array GHC.Base.Char GHC.Base.Bool))
	     (Data.Maybe.Nothing @ GHC.Base.Int)
lvl_s4pM :: [Main.AlexAcc ((Main.AlexPosn, GHC.Base.Char, [GHC.Base.Char])
			   -> GHC.Base.Int
			   -> Main.Alex [GHC.Base.Char])]
[*]
lvl_s4pM = GHC.Base.:
	     @ (Main.AlexAcc ((Main.AlexPosn, GHC.Base.Char, [GHC.Base.Char])
			      -> GHC.Base.Int
			      -> Main.Alex [GHC.Base.Char]))
	     lvl_s4pN
	     (GHC.Base.[]
		@ (Main.AlexAcc ((Main.AlexPosn, GHC.Base.Char, [GHC.Base.Char])
				 -> GHC.Base.Int
				 -> Main.Alex [GHC.Base.Char])))
lvl_s4pL :: [[Main.AlexAcc ((Main.AlexPosn, GHC.Base.Char, [GHC.Base.Char])
			    -> GHC.Base.Int
			    -> Main.Alex [GHC.Base.Char])]]
[*]
lvl_s4pL = GHC.Base.:
	     @ [Main.AlexAcc ((Main.AlexPosn, GHC.Base.Char, [GHC.Base.Char])
			      -> GHC.Base.Int
			      -> Main.Alex [GHC.Base.Char])]
	     lvl_s4pM
	     lvl_s4pQ
lvl_s4pK :: [[Main.AlexAcc ((Main.AlexPosn, GHC.Base.Char, [GHC.Base.Char])
			    -> GHC.Base.Int
			    -> Main.Alex [GHC.Base.Char])]]
[*]
lvl_s4pK = GHC.Base.:
	     @ [Main.AlexAcc ((Main.AlexPosn, GHC.Base.Char, [GHC.Base.Char])
			      -> GHC.Base.Int
			      -> Main.Alex [GHC.Base.Char])]
	     (GHC.Base.[]
		@ (Main.AlexAcc ((Main.AlexPosn, GHC.Base.Char, [GHC.Base.Char])
				 -> GHC.Base.Int
				 -> Main.Alex [GHC.Base.Char])))
	     lvl_s4pL
lvl_s4pJ :: [[Main.AlexAcc ((Main.AlexPosn, GHC.Base.Char, [GHC.Base.Char])
			    -> GHC.Base.Int
			    -> Main.Alex [GHC.Base.Char])]]
[*]
lvl_s4pJ = GHC.Base.:
	     @ [Main.AlexAcc ((Main.AlexPosn, GHC.Base.Char, [GHC.Base.Char])
			      -> GHC.Base.Int
			      -> Main.Alex [GHC.Base.Char])]
	     (GHC.Base.[]
		@ (Main.AlexAcc ((Main.AlexPosn, GHC.Base.Char, [GHC.Base.Char])
				 -> GHC.Base.Int
				 -> Main.Alex [GHC.Base.Char])))
	     lvl_s4pK
alex_accept_a2Bg :: GHC.Arr.Array GHC.Base.Int
				  [Main.AlexAcc ((Main.AlexPosn, GHC.Base.Char, [GHC.Base.Char])
						 -> GHC.Base.Int
						 -> Main.Alex [GHC.Base.Char])]
[*
 Str: DmdType]
alex_accept_a2Bg = case (GHC.Arr.Array GHC.Base.Int
				       [Main.AlexAcc ((Main.AlexPosn, GHC.Base.Char, [GHC.Base.Char])
						      -> GHC.Base.Int
						      -> Main.Alex [GHC.Base.Char])]) GHC.Prim.newArray#
											@ [Main.AlexAcc ((Main.AlexPosn,
													  GHC.Base.Char,
													  [GHC.Base.Char])
													 -> GHC.Base.Int
													 -> Main.Alex [GHC.Base.Char])]
											@ GHC.Prim.RealWorld
											4
											(GHC.Arr.arrEleBottom
											   @ [Main.AlexAcc ((Main.AlexPosn,
													     GHC.Base.Char,
													     [GHC.Base.Char])
													    -> GHC.Base.Int
													    -> Main.Alex [GHC.Base.Char])])
											GHC.Prim.realWorld#
		   of wild2_a3Up { (# s2#_a3Un, marr#_a3Uo #) ->
		   __letrec {
		     fillFromList_s4pc :: GHC.Prim.Int#
					  -> [[Main.AlexAcc ((Main.AlexPosn, GHC.Base.Char, [GHC.Base.Char])
							     -> GHC.Base.Int
							     -> Main.Alex [GHC.Base.Char])]]
					  -> GHC.Prim.State# GHC.Prim.RealWorld
					  -> GHC.Prim.State# GHC.Prim.RealWorld
		     [Arity 3
		      0 -> 0 -> 0 -> *
		      Str: DmdType LLL]
		     fillFromList_s4pc = \ (i#_a3Ul :: GHC.Prim.Int#)
					   (xs_a3Uk :: [[Main.AlexAcc ((Main.AlexPosn, GHC.Base.Char, [GHC.Base.Char])
								       -> GHC.Base.Int
								       -> Main.Alex [GHC.Base.Char])]])
					   (s3#_a3Uj :: GHC.Prim.State# GHC.Prim.RealWorld) ->
					   case (GHC.Prim.State# GHC.Prim.RealWorld) i#_a3Ul of wild_X3y {
					     __DEFAULT ->
					       case (GHC.Prim.State# GHC.Prim.RealWorld) xs_a3Uk of wild4_a47j {
						 [] -> s3#_a3Uj;
						 : y_a47h ys_a47i ->
						   case (GHC.Prim.State# GHC.Prim.RealWorld) GHC.Prim.writeArray#
											       @ GHC.Prim.RealWorld
											       @ [Main.AlexAcc ((Main.AlexPosn,
														 GHC.Base.Char,
														 [GHC.Base.Char])
														-> GHC.Base.Int
														-> Main.Alex [GHC.Base.Char])]
											       marr#_a3Uo
											       wild_X3y
											       y_a47h
											       s3#_a3Uj
						   of s4#_a47g { __DEFAULT ->
						   fillFromList_s4pc (GHC.Prim.+# wild_X3y 1) ys_a47i s4#_a47g
						   }
					       };
					     4 -> s3#_a3Uj
					   };
		   } in 
		     case (GHC.Arr.Array GHC.Base.Int
					 [Main.AlexAcc ((Main.AlexPosn, GHC.Base.Char, [GHC.Base.Char])
							-> GHC.Base.Int
							-> Main.Alex [GHC.Base.Char])]) fillFromList_s4pc
											  0 lvl_s4pJ s2#_a3Un
		     of s3#_a47k { __DEFAULT ->
		     case (GHC.Arr.Array GHC.Base.Int
					 [Main.AlexAcc ((Main.AlexPosn, GHC.Base.Char, [GHC.Base.Char])
							-> GHC.Base.Int
							-> Main.Alex [GHC.Base.Char])]) GHC.Prim.unsafeFreezeArray#
											  @ GHC.Prim.RealWorld
											  @ [Main.AlexAcc ((Main.AlexPosn,
													    GHC.Base.Char,
													    [GHC.Base.Char])
													   -> GHC.Base.Int
													   -> Main.Alex [GHC.Base.Char])]
											  marr#_a3Uo
											  s3#_a47k
		     of wild_a488 { (# s2#_a48a, arr#_a48b #) ->
		     GHC.Arr.Array
		       @ GHC.Base.Int
		       @ [Main.AlexAcc ((Main.AlexPosn, GHC.Base.Char, [GHC.Base.Char])
					-> GHC.Base.Int
					-> Main.Alex [GHC.Base.Char])]
		       lit_a3m9
		       lvl_s4pX
		       arr#_a48b
		     }
		     }
		   }
check_rctx_a2B6 :: ((Main.AlexPosn, GHC.Base.Char, [GHC.Base.Char])
		    -> GHC.Base.Int
		    -> Main.Alex [GHC.Base.Char])
		   -> Data.Maybe.Maybe GHC.Base.Int
		   -> [Main.AlexAcc ((Main.AlexPosn, GHC.Base.Char, [GHC.Base.Char])
				     -> GHC.Base.Int
				     -> Main.Alex [GHC.Base.Char])]
		   -> GHC.Base.Char
		   -> GHC.Prim.Int#
		   -> Main.AlexLastAcc (Main.AlexInput
					-> GHC.Base.Int
					-> Main.Alex [GHC.Base.Char])
		   -> Main.Alex (Main.AlexLastAcc (Main.AlexInput
						   -> GHC.Base.Int
						   -> Main.Alex [GHC.Base.Char]))
[Arity 8
 0 -> 0 -> 0 -> 0 -> 0 -> 0 -> 0 -> 0 -> *
 Str: DmdType LSLLLL]
check_rctx_a2B6 = \ (a_a2aL :: (Main.AlexPosn, GHC.Base.Char, [GHC.Base.Char])
			       -> GHC.Base.Int
			       -> Main.Alex [GHC.Base.Char])
		    (rctx_a2aM :: Data.Maybe.Maybe GHC.Base.Int)
		    (rest_a2aN :: [Main.AlexAcc ((Main.AlexPosn, GHC.Base.Char, [GHC.Base.Char])
						 -> GHC.Base.Int
						 -> Main.Alex [GHC.Base.Char])])
		    (lc_a2aO :: GHC.Base.Char)
		    (len_a2aP :: GHC.Prim.Int#)
		    (last_acc_a2aQ :: Main.AlexLastAcc (Main.AlexInput
							-> GHC.Base.Int
							-> Main.Alex [GHC.Base.Char]))
		    (@ s_a2bs)
		    (eta_x1 :: Main.AlexState s_a2bs)
		    (eta_x2 :: GHC.Prim.State# s_a2bs) ->
		    (case (Main.Alex (Main.AlexLastAcc (Main.AlexInput
							-> GHC.Base.Int
							-> Main.Alex [GHC.Base.Char]))) rctx_a2aM
		     of wild_X3t {
		       Data.Maybe.Nothing ->
			 \ (@ s_a2bs)
			   (w_s4m0 :: Main.AlexState s_a2bs)
			   (w_s4mg :: GHC.Prim.State# s_a2bs) ->
			   case (# GHC.Prim.State# s_a2bs,
				   Main.AlexLastAcc (Main.AlexInput
						     -> GHC.Base.Int
						     -> Main.Alex [GHC.Base.Char]) #) w_s4m0
			   of w_X4n1 { Main.AlexState ww_s4m2 ww_s4m6 ww_s4ma ww_s4me ->
			   case (# GHC.Prim.State# s_a2bs,
				   Main.AlexLastAcc (Main.AlexInput
						     -> GHC.Base.Int
						     -> Main.Alex [GHC.Base.Char]) #) ww_s4m2
			   of ww_X4na { GHC.STRef.STRef ww_s4m4 ->
			   case (# GHC.Prim.State# s_a2bs,
				   Main.AlexLastAcc (Main.AlexInput
						     -> GHC.Base.Int
						     -> Main.Alex [GHC.Base.Char]) #) ww_s4m6
			   of ww_X4ni { GHC.STRef.STRef ww_s4m8 ->
			   case (# GHC.Prim.State# s_a2bs,
				   Main.AlexLastAcc (Main.AlexInput
						     -> GHC.Base.Int
						     -> Main.Alex [GHC.Base.Char]) #) ww_s4ma
			   of ww_X4nq { GHC.STRef.STRef ww_s4mc ->
			   case (# GHC.Prim.State# s_a2bs,
				   Main.AlexLastAcc (Main.AlexInput
						     -> GHC.Base.Int
						     -> Main.Alex [GHC.Base.Char]) #) GHC.Prim.readMutVar#
											@ s_a2bs
											@ GHC.Base.String
											ww_s4m8
											w_s4mg
			   of wild_a3ZB { (# new_s_a3Zz, r_a3ZA #) ->
			   case (# GHC.Prim.State# s_a2bs,
				   Main.AlexLastAcc (Main.AlexInput
						     -> GHC.Base.Int
						     -> Main.Alex [GHC.Base.Char]) #) GHC.Prim.readMutVar#
											@ s_a2bs
											@ GHC.Base.Char
											ww_s4mc
											new_s_a3Zz
			   of wild_X42B { (# new_s_X42A, r_X42C #) ->
			   case (# GHC.Prim.State# s_a2bs,
				   Main.AlexLastAcc (Main.AlexInput
						     -> GHC.Base.Int
						     -> Main.Alex [GHC.Base.Char]) #) GHC.Prim.readMutVar#
											@ s_a2bs
											@ Main.AlexPosn
											ww_s4m4
											new_s_X42A
			   of wild_X45K { (# new_s_X48T, r_X42D #) ->
			   (# new_s_X48T,
			      (Main.AlexLastAcc
				 @ (Main.AlexInput -> GHC.Base.Int -> Main.Alex [GHC.Base.Char])
				 a_a2aL
				 (r_X42D, r_X42C, r_a3ZA)
				 (GHC.Base.I# len_a2aP)) #)
			   }
			   }
			   }
			   }
			   }
			   }
			   };
		       Data.Maybe.Just ds_d3nH ->
			 case (Main.Alex (Main.AlexLastAcc (Main.AlexInput
							    -> GHC.Base.Int
							    -> Main.Alex [GHC.Base.Char]))) ds_d3nH
			 of wild_X4X { GHC.Base.I# ds_d3nI ->
			 let {
			   lvl_s4pt :: Main.Alex (Main.AlexLastAcc (Main.AlexInput
								    -> GHC.Base.Int
								    -> Main.Alex [GHC.Base.Char]))
			   [*
			    Str: DmdType]
			   lvl_s4pt = check_accs1_a2B8 rest_a2aN lc_a2aO len_a2aP last_acc_a2aQ
			 } in 
			   \ (@ s_X3iB)
			     (s_X2fm :: Main.AlexState s_X3iB)
			     (s_X436 :: GHC.Prim.State# s_X3iB) ->
			     case (# GHC.Prim.State# s_X3iB,
				     Main.AlexLastAcc (Main.AlexInput
						       -> GHC.Base.Int
						       -> Main.Alex [GHC.Base.Char]) #) s_X2fm
			     of wild_X2B { Main.AlexState pos_r_a21Q inp_r_a21S chr_r_a21R ds_d3od ->
			     case (# GHC.Prim.State# s_X3iB,
				     Main.AlexLastAcc (Main.AlexInput
						       -> GHC.Base.Int
						       -> Main.Alex [GHC.Base.Char]) #) inp_r_a21S
			     of wild_a43y { GHC.STRef.STRef var#_a43z ->
			     case (# GHC.Prim.State# s_X3iB,
				     Main.AlexLastAcc (Main.AlexInput
						       -> GHC.Base.Int
						       -> Main.Alex [GHC.Base.Char]) #) GHC.Prim.readMutVar#
											  @ s_X3iB
											  @ GHC.Base.String
											  var#_a43z
											  s_X436
			     of wild_a3ZB { (# new_s_a3Zz, r_a3ZA #) ->
			     case (# GHC.Prim.State# s_X3iB,
				     Main.AlexLastAcc (Main.AlexInput
						       -> GHC.Base.Int
						       -> Main.Alex [GHC.Base.Char]) #) chr_r_a21R
			     of wild_X46u { GHC.STRef.STRef var#_X46x ->
			     case (# GHC.Prim.State# s_X3iB,
				     Main.AlexLastAcc (Main.AlexInput
						       -> GHC.Base.Int
						       -> Main.Alex [GHC.Base.Char]) #) GHC.Prim.readMutVar#
											  @ s_X3iB
											  @ GHC.Base.Char
											  var#_X46x
											  new_s_a3Zz
			     of wild_X42B { (# new_s_X42A, r_X42C #) ->
			     case (# GHC.Prim.State# s_X3iB,
				     Main.AlexLastAcc (Main.AlexInput
						       -> GHC.Base.Int
						       -> Main.Alex [GHC.Base.Char]) #) pos_r_a21Q
			     of wild_X46v { GHC.STRef.STRef var#_X46y ->
			     case (# GHC.Prim.State# s_X3iB,
				     Main.AlexLastAcc (Main.AlexInput
						       -> GHC.Base.Int
						       -> Main.Alex [GHC.Base.Char]) #) GHC.Prim.readMutVar#
											  @ s_X3iB
											  @ Main.AlexPosn
											  var#_X46y
											  new_s_X42A
			     of wild_X45K { (# new_s_X48T, r_X42D #) ->
			     case (# GHC.Prim.State# s_X3iB,
				     Main.AlexLastAcc (Main.AlexInput
						       -> GHC.Base.Int
						       -> Main.Alex [GHC.Base.Char]) #) r_X42C
			     of tpl_X56 { GHC.Base.C# a_s3Wu ->
			     case (# GHC.Prim.State# s_X3iB,
				     Main.AlexLastAcc (Main.AlexInput
						       -> GHC.Base.Int
						       -> Main.Alex [GHC.Base.Char]) #) alex_scan_tkn_a2zF
											  tpl_X56
											  0
											  ds_d3nI
											  (Main.AlexNone
											     @ (Main.AlexInput
												-> GHC.Base.Int
												-> Main.Alex [GHC.Base.Char]))
											  @ s_X3iB
											  wild_X2B
											  new_s_X48T
			     of wild_X42y { (# new_s_X42x, r_X42z #) ->
			     case (# GHC.Prim.State# s_X3iB,
				     Main.AlexLastAcc (Main.AlexInput
						       -> GHC.Base.Int
						       -> Main.Alex [GHC.Base.Char]) #) GHC.Prim.writeMutVar#
											  @ s_X3iB
											  @ GHC.Base.String
											  var#_a43z
											  r_a3ZA
											  new_s_X42x
			     of s2#_a43F { __DEFAULT ->
			     case (# GHC.Prim.State# s_X3iB,
				     Main.AlexLastAcc (Main.AlexInput
						       -> GHC.Base.Int
						       -> Main.Alex [GHC.Base.Char]) #) GHC.Prim.writeMutVar#
											  @ s_X3iB
											  @ Main.AlexPosn
											  var#_X46y
											  r_X42D
											  s2#_a43F
			     of s2#_X46S { __DEFAULT ->
			     case (# GHC.Prim.State# s_X3iB,
				     Main.AlexLastAcc (Main.AlexInput
						       -> GHC.Base.Int
						       -> Main.Alex [GHC.Base.Char]) #) GHC.Prim.writeMutVar#
											  @ s_X3iB
											  @ GHC.Base.Char
											  var#_X46x
											  tpl_X56
											  s2#_X46S
			     of s2#_X46O { __DEFAULT ->
			     case (# GHC.Prim.State# s_X3iB,
				     Main.AlexLastAcc (Main.AlexInput
						       -> GHC.Base.Int
						       -> Main.Alex [GHC.Base.Char]) #) r_X42z
			     of wild_X57 {
			       Main.AlexNone -> lvl_s4pt @ s_X3iB wild_X2B s2#_X46O;
			       Main.AlexLastAcc ds_d3nK ds_d3nL ds_d3nM ->
				 case (# GHC.Prim.State# s_X3iB,
					 Main.AlexLastAcc (Main.AlexInput
							   -> GHC.Base.Int
							   -> Main.Alex [GHC.Base.Char]) #) GHC.Prim.readMutVar#
											      @ s_X3iB
											      @ GHC.Base.String
											      var#_a43z
											      s2#_X46O
				 of wild_X42f { (# new_s_X42e, r_X42g #) ->
				 case (# GHC.Prim.State# s_X3iB,
					 Main.AlexLastAcc (Main.AlexInput
							   -> GHC.Base.Int
							   -> Main.Alex [GHC.Base.Char]) #) GHC.Prim.readMutVar#
											      @ s_X3iB
											      @ GHC.Base.Char
											      var#_X46x
											      new_s_X42e
				 of wild_X45j { (# new_s_X482, r_X45m #) ->
				 case (# GHC.Prim.State# s_X3iB,
					 Main.AlexLastAcc (Main.AlexInput
							   -> GHC.Base.Int
							   -> Main.Alex [GHC.Base.Char]) #) GHC.Prim.readMutVar#
											      @ s_X3iB
											      @ Main.AlexPosn
											      var#_X46y
											      new_s_X482
				 of wild_X48w { (# new_s_X4bG, r_X45r #) ->
				 (# new_s_X4bG,
				    (Main.AlexLastAcc
				       @ (Main.AlexInput -> GHC.Base.Int -> Main.Alex [GHC.Base.Char])
				       a_a2aL
				       (r_X45r, r_X45m, r_X42g)
				       (GHC.Base.I# len_a2aP)) #)
				 }
				 }
				 }
			     }
			     }
			     }
			     }
			     }
			     }
			     }
			     }
			     }
			     }
			     }
			     }
			     }
			 }
		     })
		      @ s_a2bs eta_x1 eta_x2
check_accs1_a2B8 :: [Main.AlexAcc ((Main.AlexPosn,
				    GHC.Base.Char,
				    [GHC.Base.Char])
				   -> GHC.Base.Int
				   -> Main.Alex [GHC.Base.Char])]
		    -> GHC.Base.Char
		    -> GHC.Prim.Int#
		    -> Main.AlexLastAcc (Main.AlexInput
					 -> GHC.Base.Int
					 -> Main.Alex [GHC.Base.Char])
		    -> Main.Alex (Main.AlexLastAcc (Main.AlexInput
						    -> GHC.Base.Int
						    -> Main.Alex [GHC.Base.Char]))
[Arity 4
 0 -> 0 -> 0 -> 0 -> *
 Str: DmdType SLLL]
check_accs1_a2B8 = \ (accs_a24C :: [Main.AlexAcc ((Main.AlexPosn,
						   GHC.Base.Char,
						   [GHC.Base.Char])
						  -> GHC.Base.Int
						  -> Main.Alex [GHC.Base.Char])])
		     (lc_a24D :: GHC.Base.Char)
		     (len_a24E :: GHC.Prim.Int#)
		     (last_acc_a24F :: Main.AlexLastAcc (Main.AlexInput
							 -> GHC.Base.Int
							 -> Main.Alex [GHC.Base.Char])) ->
		     case (Main.Alex (Main.AlexLastAcc (Main.AlexInput
							-> GHC.Base.Int
							-> Main.Alex [GHC.Base.Char]))) accs_a24C
		     of wild_X3t {
		       [] ->
			 return_a3fW
			   @ (Main.AlexLastAcc (Main.AlexInput
						-> GHC.Base.Int
						-> Main.Alex [GHC.Base.Char]))
			   last_acc_a24F;
		       : ds_d3nO rest_a24P ->
			 case (Main.Alex (Main.AlexLastAcc (Main.AlexInput
							    -> GHC.Base.Int
							    -> Main.Alex [GHC.Base.Char]))) ds_d3nO
			 of wild_X4Y { Main.AlexAcc ds_d3nP a_a24M lctx_a24N rctx_a24O ->
			 case (Main.Alex (Main.AlexLastAcc (Main.AlexInput
							    -> GHC.Base.Int
							    -> Main.Alex [GHC.Base.Char]))) lctx_a24N
			 of wild_X54 {
			   Data.Maybe.Nothing ->
			     check_rctx_a2B6 a_a24M rctx_a24O rest_a24P lc_a24D len_a24E last_acc_a24F;
			   Data.Maybe.Just arr_a24W ->
			     case (Main.Alex (Main.AlexLastAcc (Main.AlexInput
								-> GHC.Base.Int
								-> Main.Alex [GHC.Base.Char]))) arr_a24W
			     of wild_a48O { GHC.Arr.Array l_a48P u_a48Q ds_a48R ->
			     case (Main.Alex (Main.AlexLastAcc (Main.AlexInput
								-> GHC.Base.Int
								-> Main.Alex [GHC.Base.Char]))) l_a48P
			     of ww_a48V { GHC.Base.C# ww_a48X ->
			     case (Main.Alex (Main.AlexLastAcc (Main.AlexInput
								-> GHC.Base.Int
								-> Main.Alex [GHC.Base.Char]))) u_a48Q
			     of ww_a48Z { GHC.Base.C# ww_a491 ->
			     case (Main.Alex (Main.AlexLastAcc (Main.AlexInput
								-> GHC.Base.Int
								-> Main.Alex [GHC.Base.Char]))) lc_a24D
			     of w_a494 { GHC.Base.C# ww_a496 ->
			     case (Main.Alex (Main.AlexLastAcc (Main.AlexInput
								-> GHC.Base.Int
								-> Main.Alex [GHC.Base.Char]))) GHC.Arr.$windex2
												  ww_a48X
												  ww_a491
												  ww_a496
			     of ww_a49b { __DEFAULT ->
			     case (Main.Alex (Main.AlexLastAcc (Main.AlexInput
								-> GHC.Base.Int
								-> Main.Alex [GHC.Base.Char]))) GHC.Prim.indexArray#
												  @ GHC.Base.Bool
												  ds_a48R
												  ww_a49b
			     of wild2_a49K { (# e_a49M #) ->
			     case (Main.Alex (Main.AlexLastAcc (Main.AlexInput
								-> GHC.Base.Int
								-> Main.Alex [GHC.Base.Char]))) e_a49M
			     of wild_X57 {
			       GHC.Base.False -> check_accs1_a2B8 rest_a24P w_a494 len_a24E last_acc_a24F;
			       GHC.Base.True ->
				 check_rctx_a2B6 a_a24M rctx_a24O rest_a24P w_a494 len_a24E last_acc_a24F
			     }
			     }
			     }
			     }
			     }
			     }
			     }
			 }
			 }
		     }
alex_scan_tkn_a2zF :: GHC.Base.Char
		      -> GHC.Prim.Int#
		      -> GHC.Prim.Int#
		      -> Main.AlexLastAcc (Main.AlexInput
					   -> GHC.Base.Int
					   -> Main.Alex [GHC.Base.Char])
		      -> Main.Alex (Main.AlexLastAcc (Main.AlexInput
						      -> GHC.Base.Int
						      -> Main.Alex [GHC.Base.Char]))
[Arity 4
 0 -> 0 -> 0 -> 0 -> 0 -> 0 -> *
 Str: DmdType LLLL]
alex_scan_tkn_a2zF = \ (lc_a23F :: GHC.Base.Char)
		       (len_a23G :: GHC.Prim.Int#)
		       (ds_d3n1 :: GHC.Prim.Int#)
		       (last_acc_a23H :: Main.AlexLastAcc (Main.AlexInput
							   -> GHC.Base.Int
							   -> Main.Alex [GHC.Base.Char])) ->
		       case (Main.Alex (Main.AlexLastAcc (Main.AlexInput
							  -> GHC.Base.Int
							  -> Main.Alex [GHC.Base.Char]))) ds_d3n1
		       of ds_X3rY {
			 __DEFAULT ->
			   let {
			     ds_s4pv :: Main.Alex (Main.AlexLastAcc (Main.AlexInput
								     -> GHC.Base.Int
								     -> Main.Alex [GHC.Base.Char]))
			     [*
			      Str: DmdType]
			     ds_s4pv = case (Main.Alex (Main.AlexLastAcc (Main.AlexInput
									  -> GHC.Base.Int
									  -> Main.Alex [GHC.Base.Char]))) alex_accept_a2Bg
				       of wild_a4cx { GHC.Arr.Array ds2_a4cu ds3_a4cv arr#_a4cw ->
				       case (Main.Alex (Main.AlexLastAcc (Main.AlexInput
									  -> GHC.Base.Int
									  -> Main.Alex [GHC.Base.Char]))) GHC.Prim.indexArray#
													    @ [Main.AlexAcc ((Main.AlexPosn,
															      GHC.Base.Char,
															      [GHC.Base.Char])
															     -> GHC.Base.Int
															     -> Main.Alex [GHC.Base.Char])]
													    arr#_a4cw
													    ds_X3rY
				       of wild2_a4cD { (# e_a4cF #) ->
				       check_accs1_a2B8 e_a4cF lc_a23F len_a23G last_acc_a23H
				       }
				       }
			   } in 
			     \ (@ s_X3iz)
			       (s_X2fk :: Main.AlexState s_X3iz)
			       (s_X434 :: GHC.Prim.State# s_X3iz) ->
			       case (# GHC.Prim.State# s_X3iz,
				       Main.AlexLastAcc (Main.AlexInput
							 -> GHC.Base.Int
							 -> Main.Alex [GHC.Base.Char]) #) ds_s4pv @ s_X3iz s_X2fk s_X434
			       of wild_a3ZB { (# new_s_a3Zz, r_a3ZA #) ->
			       case (# GHC.Prim.State# s_X3iz,
				       Main.AlexLastAcc (Main.AlexInput
							 -> GHC.Base.Int
							 -> Main.Alex [GHC.Base.Char]) #) s_X2fk
			       of wild_X2w { Main.AlexState pos_r_a21o inp_r_a21m chr_r_a21n ds_d3o7 ->
			       case (# GHC.Prim.State# s_X3iz,
				       Main.AlexLastAcc (Main.AlexInput
							 -> GHC.Base.Int
							 -> Main.Alex [GHC.Base.Char]) #) inp_r_a21m
			       of wild_a43y { GHC.STRef.STRef var#_a43z ->
			       case (# GHC.Prim.State# s_X3iz,
				       Main.AlexLastAcc (Main.AlexInput
							 -> GHC.Base.Int
							 -> Main.Alex [GHC.Base.Char]) #) GHC.Prim.readMutVar#
											    @ s_X3iz
											    @ GHC.Base.String
											    var#_a43z
											    new_s_a3Zz
			       of wild_X420 { (# new_s_X41Z, r_X421 #) ->
			       case (# GHC.Prim.State# s_X3iz,
				       Main.AlexLastAcc (Main.AlexInput
							 -> GHC.Base.Int
							 -> Main.Alex [GHC.Base.Char]) #) pos_r_a21o
			       of wild_X46p { GHC.STRef.STRef var#_X46s ->
			       case (# GHC.Prim.State# s_X3iz,
				       Main.AlexLastAcc (Main.AlexInput
							 -> GHC.Base.Int
							 -> Main.Alex [GHC.Base.Char]) #) GHC.Prim.readMutVar#
											    @ s_X3iz
											    @ Main.AlexPosn
											    var#_X46s
											    new_s_X41Z
			       of wild_X42w { (# new_s_X42v, r_X42x #) ->
			       case (# GHC.Prim.State# s_X3iz,
				       Main.AlexLastAcc (Main.AlexInput
							 -> GHC.Base.Int
							 -> Main.Alex [GHC.Base.Char]) #) r_X421
			       of wild_X4j {
				 [] -> (# new_s_X42v, r_a3ZA #);
				 : c_a21B s_a21C ->
				   case (# GHC.Prim.State# s_X3iz,
					   Main.AlexLastAcc (Main.AlexInput
							     -> GHC.Base.Int
							     -> Main.Alex [GHC.Base.Char]) #) GHC.Prim.writeMutVar#
												@ s_X3iz
												@ GHC.Base.String
												var#_a43z
												s_a21C
												new_s_X42v
				   of s2#_a43F { __DEFAULT ->
				   case (# GHC.Prim.State# s_X3iz,
					   Main.AlexLastAcc (Main.AlexInput
							     -> GHC.Base.Int
							     -> Main.Alex [GHC.Base.Char]) #) chr_r_a21n
				   of wild_X46I { GHC.STRef.STRef var#_X46M ->
				   case (# GHC.Prim.State# s_X3iz,
					   Main.AlexLastAcc (Main.AlexInput
							     -> GHC.Base.Int
							     -> Main.Alex [GHC.Base.Char]) #) GHC.Prim.writeMutVar#
												@ s_X3iz
												@ GHC.Base.Char
												var#_X46M
												c_a21B
												s2#_a43F
				   of s2#_X46N { __DEFAULT ->
				   case (# GHC.Prim.State# s_X3iz,
					   Main.AlexLastAcc (Main.AlexInput
							     -> GHC.Base.Int
							     -> Main.Alex [GHC.Base.Char]) #) r_X42x
				   of wild_X4p { Main.AlexPn a_a1UD l_a1UE c_a1UF ->
				   case (# GHC.Prim.State# s_X3iz,
					   Main.AlexLastAcc (Main.AlexInput
							     -> GHC.Base.Int
							     -> Main.Alex [GHC.Base.Char]) #) c_a21B
				   of wild_X3V { GHC.Base.C# ds_d3my ->
				   case (# GHC.Prim.State# s_X3iz,
					   Main.AlexLastAcc (Main.AlexInput
							     -> GHC.Base.Int
							     -> Main.Alex [GHC.Base.Char]) #) ds_d3my
				   of ds_X3qv {
				     __DEFAULT ->
				       case (# GHC.Prim.State# s_X3iz,
					       Main.AlexLastAcc (Main.AlexInput
								 -> GHC.Base.Int
								 -> Main.Alex [GHC.Base.Char]) #) a_a1UD
				       of wild_a437 { GHC.Base.I# x_a436 ->
				       case (# GHC.Prim.State# s_X3iz,
					       Main.AlexLastAcc (Main.AlexInput
								 -> GHC.Base.Int
								 -> Main.Alex [GHC.Base.Char]) #) c_a1UF
				       of wild_X469 { GHC.Base.I# x_X46a ->
				       case (# GHC.Prim.State# s_X3iz,
					       Main.AlexLastAcc (Main.AlexInput
								 -> GHC.Base.Int
								 -> Main.Alex [GHC.Base.Char]) #) l_a1UE
				       of tpl_X3b { GHC.Base.I# a_s43O ->
				       case (# GHC.Prim.State# s_X3iz,
					       Main.AlexLastAcc (Main.AlexInput
								 -> GHC.Base.Int
								 -> Main.Alex [GHC.Base.Char]) #) GHC.Prim.writeMutVar#
												    @ s_X3iz
												    @ Main.AlexPosn
												    var#_X46s
												    (Main.AlexPn
												       (GHC.Base.I#
													  (GHC.Prim.+#
													     x_a436 1))
												       tpl_X3b
												       (GHC.Base.I#
													  (GHC.Prim.+#
													     x_X46a 1)))
												    s2#_X46N
				       of s2#_X461 { __DEFAULT ->
				       let {
					 off'_s3XM :: GHC.Prim.Int#
					 [*
					  Str: DmdType]
					 off'_s3XM = GHC.Prim.*# ds_X3rY 2 } in
				       let {
					 arr_a22R :: GHC.Prim.Addr#
					 [*
					  Str: DmdType]
					 arr_a22R = "\248\255\253\255\STX\NULL\NUL" } in
				       let {
					 ds_d3nX :: GHC.Prim.Int#
					 [*
					  Str: DmdType]
					 ds_d3nX = GHC.Prim.ord# ds_X3qv } in
				       let {
					 offset_s3XK :: GHC.Prim.Int#
					 [*
					  Str: DmdType]
					 offset_s3XK = GHC.Prim.+#
							 (GHC.Prim.narrow16Int#
							    (GHC.Prim.word2Int#
							       (GHC.Prim.or#
								  (GHC.Prim.uncheckedShiftL#
								     (GHC.Prim.int2Word#
									(GHC.Prim.ord#
									   (GHC.Prim.indexCharOffAddr#
									      arr_a22R (GHC.Prim.+# off'_s3XM 1))))
								     8)
								  (GHC.Prim.int2Word#
								     (GHC.Prim.ord#
									(GHC.Prim.indexCharOffAddr#
									   arr_a22R off'_s3XM))))))
							 ds_d3nX } in
				       let {
					 $w$j_s4px :: GHC.Prim.State# GHC.Prim.RealWorld
						      -> (# GHC.Prim.State# s_X3iz,
							    Main.AlexLastAcc (Main.AlexInput
									      -> GHC.Base.Int
									      -> Main.Alex [GHC.Base.Char]) #)
					 [Arity 1
					  *
					  Str: DmdType A]
					 $w$j_s4px = \ (w_s4mk :: GHC.Prim.State# GHC.Prim.RealWorld) ->
						       let {
							 arr_X26b :: GHC.Prim.Addr#
							 [*
							  Str: DmdType]
							 arr_X26b = "\255\255\255\255\255\255\255\255"
						       } in 
							 alex_scan_tkn_a2zF
							   lc_a23F
							   (GHC.Prim.+# len_a23G 1)
							   (GHC.Prim.narrow16Int#
							      (GHC.Prim.word2Int#
								 (GHC.Prim.or#
								    (GHC.Prim.uncheckedShiftL#
								       (GHC.Prim.int2Word#
									  (GHC.Prim.ord#
									     (GHC.Prim.indexCharOffAddr#
										arr_X26b (GHC.Prim.+# off'_s3XM 1))))
								       8)
								    (GHC.Prim.int2Word#
								       (GHC.Prim.ord#
									  (GHC.Prim.indexCharOffAddr#
									     arr_X26b off'_s3XM))))))
							   r_a3ZA
							   @ s_X3iz
							   wild_X2w
							   s2#_X461
				       } in 
					 case (# GHC.Prim.State# s_X3iz,
						 Main.AlexLastAcc (Main.AlexInput
								   -> GHC.Base.Int
								   -> Main.Alex [GHC.Base.Char]) #) GHC.Prim.>=#
												      offset_s3XK 0
					 of wild_a43m {
					   GHC.Base.False -> $w$j_s4px GHC.Prim.realWorld#;
					   GHC.Base.True ->
					     let {
					       off'_X40Z :: GHC.Prim.Int#
					       [*
						Str: DmdType]
					       off'_X40Z = GHC.Prim.*# offset_s3XK 2 } in
					     let {
					       arr_X262 :: GHC.Prim.Addr#
					       [*
						Str: DmdType]
					       arr_X262 = "\255\255\t\NUL\n\NUL\v\NUL\f\NUL\r\NUL\t\NUL\n\NUL\v\NUL\f\NUL\r\NUL\t\NUL\n\NUL\v\NUL\f\NUL\r\NUL\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255 \NUL\255\255\255\255\255\255\255\255 \NUL\255\255'\NUL\255\255\255\255 \NUL\255\255\255\255-\NUL\255\255\255\255\&0\NUL1\NUL2\NUL3\NUL4\NUL5\NUL6\NUL7\NUL8\NUL9\NUL\255\255\255\255\255\255\255\255\255\255\255\255\255\255A\NULB\NULC\NULD\NULE\NULF\NULG\NULH\NULI\NULJ\NULK\NULL\NULM\NULN\NULO\NULP\NULQ\NULR\NULS\NULT\NULU\NULV\NULW\NULX\NULY\NULZ\NUL\255\255\255\255\255\255\255\255\255\255\255\255a\NULb\NULc\NULd\NULe\NULf\NULg\NULh\NULi\NULj\NULk\NULl\NULm\NULn\NULo\NULp\NULq\NULr\NULs\NULt\NULu\NULv\NULw\NULx\NULy\NULz\NUL'\NUL\255\255\255\255\255\255\255\255\255\255-\NUL\255\255\255\255\&0\NUL1\NUL2\NUL3\NUL4\NUL5\NUL6\NUL7\NUL8\NUL9\NUL\255\255\255\255\255\255\255\255\255\255\255\255\255\255A\NULB\NULC\NULD\NULE\NULF\NULG\NULH\NULI\NULJ\NULK\NULL\NULM\NULN\NULO\NULP\NULQ\NULR\NULS\NULT\NULU\NULV\NULW\NULX\NULY\NULZ\NUL\255\255\255\255\255\255\255\255\255\255\255\255a\NULb\NULc\NULd\NULe\NULf\NULg\NULh\NULi\NULj\NULk\NULl\NULm\NULn\NULo\NULp\NULq\NULr\NULs\NULt\NULu\NULv\NULw\NULx\NULy\NULz\NUL\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255"
					     } in 
					       case (# GHC.Prim.State# s_X3iz,
						       Main.AlexLastAcc (Main.AlexInput
									 -> GHC.Base.Int
									 -> Main.Alex [GHC.Base.Char]) #) GHC.Prim.==#
													    (GHC.Prim.narrow16Int#
													       (GHC.Prim.word2Int#
														  (GHC.Prim.or#
														     (GHC.Prim.uncheckedShiftL#
															(GHC.Prim.int2Word#
															   (GHC.Prim.ord#
															      (GHC.Prim.indexCharOffAddr#
																 arr_X262
																 (GHC.Prim.+#
																    off'_X40Z
																    1))))
															8)
														     (GHC.Prim.int2Word#
															(GHC.Prim.ord#
															   (GHC.Prim.indexCharOffAddr#
															      arr_X262
															      off'_X40Z))))))
													    ds_d3nX
					       of wild_X8K {
						 GHC.Base.False -> $w$j_s4px GHC.Prim.realWorld#;
						 GHC.Base.True ->
						   let {
						     arr_X26c :: GHC.Prim.Addr#
						     [*
						      Str: DmdType]
						     arr_X26c = "\NUL\NUL\STX\NUL\STX\NUL\STX\NUL\STX\NUL\STX\NUL\STX\NUL\STX\NUL\STX\NUL\STX\NUL\STX\NUL\STX\NUL\STX\NUL\STX\NUL\STX\NUL\STX\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\STX\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\STX\NUL\NUL\NUL\ETX\NUL\NUL\NUL\NUL\NUL\STX\NUL\NUL\NUL\NUL\NUL\ETX\NUL\NUL\NUL\NUL\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\ETX\NUL\NUL\NUL\NUL\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL"
						   } in 
						     alex_scan_tkn_a2zF
						       lc_a23F
						       (GHC.Prim.+# len_a23G 1)
						       (GHC.Prim.narrow16Int#
							  (GHC.Prim.word2Int#
							     (GHC.Prim.or#
								(GHC.Prim.uncheckedShiftL#
								   (GHC.Prim.int2Word#
								      (GHC.Prim.ord#
									 (GHC.Prim.indexCharOffAddr#
									    arr_X26c (GHC.Prim.+# off'_X40Z 1))))
								   8)
								(GHC.Prim.int2Word#
								   (GHC.Prim.ord#
								      (GHC.Prim.indexCharOffAddr#
									 arr_X26c off'_X40Z))))))
						       r_a3ZA
						       @ s_X3iz
						       wild_X2w
						       s2#_X461
					       }
					 }
				       }
				       }
				       }
				       };
				     '\t' ->
				       case (# GHC.Prim.State# s_X3iz,
					       Main.AlexLastAcc (Main.AlexInput
								 -> GHC.Base.Int
								 -> Main.Alex [GHC.Base.Char]) #) a_a1UD
				       of wild_a437 { GHC.Base.I# x_a436 ->
				       case (# GHC.Prim.State# s_X3iz,
					       Main.AlexLastAcc (Main.AlexInput
								 -> GHC.Base.Int
								 -> Main.Alex [GHC.Base.Char]) #) c_a1UF
				       of wild_X469 { GHC.Base.I# x_X46a ->
				       case (# GHC.Prim.State# s_X3iz,
					       Main.AlexLastAcc (Main.AlexInput
								 -> GHC.Base.Int
								 -> Main.Alex [GHC.Base.Char]) #) GHC.Base.divInt#
												    (GHC.Prim.+#
												       x_X46a 7)
												    8
				       of x_a44T { __DEFAULT ->
				       case (# GHC.Prim.State# s_X3iz,
					       Main.AlexLastAcc (Main.AlexInput
								 -> GHC.Base.Int
								 -> Main.Alex [GHC.Base.Char]) #) l_a1UE
				       of tpl_X3c { GHC.Base.I# a_s452 ->
				       case (# GHC.Prim.State# s_X3iz,
					       Main.AlexLastAcc (Main.AlexInput
								 -> GHC.Base.Int
								 -> Main.Alex [GHC.Base.Char]) #) GHC.Prim.writeMutVar#
												    @ s_X3iz
												    @ Main.AlexPosn
												    var#_X46s
												    (Main.AlexPn
												       (GHC.Base.I#
													  (GHC.Prim.+#
													     x_a436 1))
												       tpl_X3c
												       (GHC.Base.I#
													  (GHC.Prim.+#
													     (GHC.Prim.*#
														x_a44T
														8)
													     1)))
												    s2#_X46N
				       of s2#_X461 { __DEFAULT ->
				       let {
					 off'_s3XM :: GHC.Prim.Int#
					 [*
					  Str: DmdType]
					 off'_s3XM = GHC.Prim.*# ds_X3rY 2 } in
				       let {
					 arr_a22R :: GHC.Prim.Addr#
					 [*
					  Str: DmdType]
					 arr_a22R = "\248\255\253\255\STX\NULL\NUL" } in
				       let {
					 offset_s3XK :: GHC.Prim.Int#
					 [*
					  Str: DmdType]
					 offset_s3XK = GHC.Prim.+#
							 (GHC.Prim.narrow16Int#
							    (GHC.Prim.word2Int#
							       (GHC.Prim.or#
								  (GHC.Prim.uncheckedShiftL#
								     (GHC.Prim.int2Word#
									(GHC.Prim.ord#
									   (GHC.Prim.indexCharOffAddr#
									      arr_a22R (GHC.Prim.+# off'_s3XM 1))))
								     8)
								  (GHC.Prim.int2Word#
								     (GHC.Prim.ord#
									(GHC.Prim.indexCharOffAddr#
									   arr_a22R off'_s3XM))))))
							 9 } in
				       let {
					 $w$j_s4pz :: GHC.Prim.State# GHC.Prim.RealWorld
						      -> (# GHC.Prim.State# s_X3iz,
							    Main.AlexLastAcc (Main.AlexInput
									      -> GHC.Base.Int
									      -> Main.Alex [GHC.Base.Char]) #)
					 [Arity 1
					  *
					  Str: DmdType A]
					 $w$j_s4pz = \ (w_s4mo :: GHC.Prim.State# GHC.Prim.RealWorld) ->
						       let {
							 arr_X26c :: GHC.Prim.Addr#
							 [*
							  Str: DmdType]
							 arr_X26c = "\255\255\255\255\255\255\255\255"
						       } in 
							 alex_scan_tkn_a2zF
							   lc_a23F
							   (GHC.Prim.+# len_a23G 1)
							   (GHC.Prim.narrow16Int#
							      (GHC.Prim.word2Int#
								 (GHC.Prim.or#
								    (GHC.Prim.uncheckedShiftL#
								       (GHC.Prim.int2Word#
									  (GHC.Prim.ord#
									     (GHC.Prim.indexCharOffAddr#
										arr_X26c (GHC.Prim.+# off'_s3XM 1))))
								       8)
								    (GHC.Prim.int2Word#
								       (GHC.Prim.ord#
									  (GHC.Prim.indexCharOffAddr#
									     arr_X26c off'_s3XM))))))
							   r_a3ZA
							   @ s_X3iz
							   wild_X2w
							   s2#_X461
				       } in 
					 case (# GHC.Prim.State# s_X3iz,
						 Main.AlexLastAcc (Main.AlexInput
								   -> GHC.Base.Int
								   -> Main.Alex [GHC.Base.Char]) #) GHC.Prim.>=#
												      offset_s3XK 0
					 of wild_a43m {
					   GHC.Base.False -> $w$j_s4pz GHC.Prim.realWorld#;
					   GHC.Base.True ->
					     let {
					       off'_X410 :: GHC.Prim.Int#
					       [*
						Str: DmdType]
					       off'_X410 = GHC.Prim.*# offset_s3XK 2 } in
					     let {
					       arr_X263 :: GHC.Prim.Addr#
					       [*
						Str: DmdType]
					       arr_X263 = "\255\255\t\NUL\n\NUL\v\NUL\f\NUL\r\NUL\t\NUL\n\NUL\v\NUL\f\NUL\r\NUL\t\NUL\n\NUL\v\NUL\f\NUL\r\NUL\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255 \NUL\255\255\255\255\255\255\255\255 \NUL\255\255'\NUL\255\255\255\255 \NUL\255\255\255\255-\NUL\255\255\255\255\&0\NUL1\NUL2\NUL3\NUL4\NUL5\NUL6\NUL7\NUL8\NUL9\NUL\255\255\255\255\255\255\255\255\255\255\255\255\255\255A\NULB\NULC\NULD\NULE\NULF\NULG\NULH\NULI\NULJ\NULK\NULL\NULM\NULN\NULO\NULP\NULQ\NULR\NULS\NULT\NULU\NULV\NULW\NULX\NULY\NULZ\NUL\255\255\255\255\255\255\255\255\255\255\255\255a\NULb\NULc\NULd\NULe\NULf\NULg\NULh\NULi\NULj\NULk\NULl\NULm\NULn\NULo\NULp\NULq\NULr\NULs\NULt\NULu\NULv\NULw\NULx\NULy\NULz\NUL'\NUL\255\255\255\255\255\255\255\255\255\255-\NUL\255\255\255\255\&0\NUL1\NUL2\NUL3\NUL4\NUL5\NUL6\NUL7\NUL8\NUL9\NUL\255\255\255\255\255\255\255\255\255\255\255\255\255\255A\NULB\NULC\NULD\NULE\NULF\NULG\NULH\NULI\NULJ\NULK\NULL\NULM\NULN\NULO\NULP\NULQ\NULR\NULS\NULT\NULU\NULV\NULW\NULX\NULY\NULZ\NUL\255\255\255\255\255\255\255\255\255\255\255\255a\NULb\NULc\NULd\NULe\NULf\NULg\NULh\NULi\NULj\NULk\NULl\NULm\NULn\NULo\NULp\NULq\NULr\NULs\NULt\NULu\NULv\NULw\NULx\NULy\NULz\NUL\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255"
					     } in 
					       case (# GHC.Prim.State# s_X3iz,
						       Main.AlexLastAcc (Main.AlexInput
									 -> GHC.Base.Int
									 -> Main.Alex [GHC.Base.Char]) #) GHC.Prim.narrow16Int#
													    (GHC.Prim.word2Int#
													       (GHC.Prim.or#
														  (GHC.Prim.uncheckedShiftL#
														     (GHC.Prim.int2Word#
															(GHC.Prim.ord#
															   (GHC.Prim.indexCharOffAddr#
															      arr_X263
															      (GHC.Prim.+#
																 off'_X410
																 1))))
														     8)
														  (GHC.Prim.int2Word#
														     (GHC.Prim.ord#
															(GHC.Prim.indexCharOffAddr#
															   arr_X263
															   off'_X410)))))
					       of wild_X3k {
						 __DEFAULT -> $w$j_s4pz GHC.Prim.realWorld#;
						 9 ->
						   let {
						     arr_X26d :: GHC.Prim.Addr#
						     [*
						      Str: DmdType]
						     arr_X26d = "\NUL\NUL\STX\NUL\STX\NUL\STX\NUL\STX\NUL\STX\NUL\STX\NUL\STX\NUL\STX\NUL\STX\NUL\STX\NUL\STX\NUL\STX\NUL\STX\NUL\STX\NUL\STX\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\STX\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\STX\NUL\NUL\NUL\ETX\NUL\NUL\NUL\NUL\NUL\STX\NUL\NUL\NUL\NUL\NUL\ETX\NUL\NUL\NUL\NUL\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\ETX\NUL\NUL\NUL\NUL\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL"
						   } in 
						     alex_scan_tkn_a2zF
						       lc_a23F
						       (GHC.Prim.+# len_a23G 1)
						       (GHC.Prim.narrow16Int#
							  (GHC.Prim.word2Int#
							     (GHC.Prim.or#
								(GHC.Prim.uncheckedShiftL#
								   (GHC.Prim.int2Word#
								      (GHC.Prim.ord#
									 (GHC.Prim.indexCharOffAddr#
									    arr_X26d (GHC.Prim.+# off'_X410 1))))
								   8)
								(GHC.Prim.int2Word#
								   (GHC.Prim.ord#
								      (GHC.Prim.indexCharOffAddr#
									 arr_X26d off'_X410))))))
						       r_a3ZA
						       @ s_X3iz
						       wild_X2w
						       s2#_X461
					       }
					 }
				       }
				       }
				       }
				       }
				       };
				     '\n' ->
				       case (# GHC.Prim.State# s_X3iz,
					       Main.AlexLastAcc (Main.AlexInput
								 -> GHC.Base.Int
								 -> Main.Alex [GHC.Base.Char]) #) a_a1UD
				       of wild_a437 { GHC.Base.I# x_a436 ->
				       case (# GHC.Prim.State# s_X3iz,
					       Main.AlexLastAcc (Main.AlexInput
								 -> GHC.Base.Int
								 -> Main.Alex [GHC.Base.Char]) #) l_a1UE
				       of wild_X469 { GHC.Base.I# x_X46a ->
				       case (# GHC.Prim.State# s_X3iz,
					       Main.AlexLastAcc (Main.AlexInput
								 -> GHC.Base.Int
								 -> Main.Alex [GHC.Base.Char]) #) GHC.Prim.writeMutVar#
												    @ s_X3iz
												    @ Main.AlexPosn
												    var#_X46s
												    (Main.AlexPn
												       (GHC.Base.I#
													  (GHC.Prim.+#
													     x_a436 1))
												       (GHC.Base.I#
													  (GHC.Prim.+#
													     x_X46a 1))
												       lvl_s4pT)
												    s2#_X46N
				       of s2#_X461 { __DEFAULT ->
				       let {
					 off'_s3XM :: GHC.Prim.Int#
					 [*
					  Str: DmdType]
					 off'_s3XM = GHC.Prim.*# ds_X3rY 2 } in
				       let {
					 arr_a22R :: GHC.Prim.Addr#
					 [*
					  Str: DmdType]
					 arr_a22R = "\248\255\253\255\STX\NULL\NUL" } in
				       let {
					 offset_s3XK :: GHC.Prim.Int#
					 [*
					  Str: DmdType]
					 offset_s3XK = GHC.Prim.+#
							 (GHC.Prim.narrow16Int#
							    (GHC.Prim.word2Int#
							       (GHC.Prim.or#
								  (GHC.Prim.uncheckedShiftL#
								     (GHC.Prim.int2Word#
									(GHC.Prim.ord#
									   (GHC.Prim.indexCharOffAddr#
									      arr_a22R (GHC.Prim.+# off'_s3XM 1))))
								     8)
								  (GHC.Prim.int2Word#
								     (GHC.Prim.ord#
									(GHC.Prim.indexCharOffAddr#
									   arr_a22R off'_s3XM))))))
							 10 } in
				       let {
					 $w$j_s4pC :: GHC.Prim.State# GHC.Prim.RealWorld
						      -> (# GHC.Prim.State# s_X3iz,
							    Main.AlexLastAcc (Main.AlexInput
									      -> GHC.Base.Int
									      -> Main.Alex [GHC.Base.Char]) #)
					 [Arity 1
					  *
					  Str: DmdType A]
					 $w$j_s4pC = \ (w_s4ms :: GHC.Prim.State# GHC.Prim.RealWorld) ->
						       let {
							 arr_X266 :: GHC.Prim.Addr#
							 [*
							  Str: DmdType]
							 arr_X266 = "\255\255\255\255\255\255\255\255"
						       } in 
							 alex_scan_tkn_a2zF
							   lc_a23F
							   (GHC.Prim.+# len_a23G 1)
							   (GHC.Prim.narrow16Int#
							      (GHC.Prim.word2Int#
								 (GHC.Prim.or#
								    (GHC.Prim.uncheckedShiftL#
								       (GHC.Prim.int2Word#
									  (GHC.Prim.ord#
									     (GHC.Prim.indexCharOffAddr#
										arr_X266 (GHC.Prim.+# off'_s3XM 1))))
								       8)
								    (GHC.Prim.int2Word#
								       (GHC.Prim.ord#
									  (GHC.Prim.indexCharOffAddr#
									     arr_X266 off'_s3XM))))))
							   r_a3ZA
							   @ s_X3iz
							   wild_X2w
							   s2#_X461
				       } in 
					 case (# GHC.Prim.State# s_X3iz,
						 Main.AlexLastAcc (Main.AlexInput
								   -> GHC.Base.Int
								   -> Main.Alex [GHC.Base.Char]) #) GHC.Prim.>=#
												      offset_s3XK 0
					 of wild_a43m {
					   GHC.Base.False -> $w$j_s4pC GHC.Prim.realWorld#;
					   GHC.Base.True ->
					     let {
					       off'_X40U :: GHC.Prim.Int#
					       [*
						Str: DmdType]
					       off'_X40U = GHC.Prim.*# offset_s3XK 2 } in
					     let {
					       arr_X25X :: GHC.Prim.Addr#
					       [*
						Str: DmdType]
					       arr_X25X = "\255\255\t\NUL\n\NUL\v\NUL\f\NUL\r\NUL\t\NUL\n\NUL\v\NUL\f\NUL\r\NUL\t\NUL\n\NUL\v\NUL\f\NUL\r\NUL\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255 \NUL\255\255\255\255\255\255\255\255 \NUL\255\255'\NUL\255\255\255\255 \NUL\255\255\255\255-\NUL\255\255\255\255\&0\NUL1\NUL2\NUL3\NUL4\NUL5\NUL6\NUL7\NUL8\NUL9\NUL\255\255\255\255\255\255\255\255\255\255\255\255\255\255A\NULB\NULC\NULD\NULE\NULF\NULG\NULH\NULI\NULJ\NULK\NULL\NULM\NULN\NULO\NULP\NULQ\NULR\NULS\NULT\NULU\NULV\NULW\NULX\NULY\NULZ\NUL\255\255\255\255\255\255\255\255\255\255\255\255a\NULb\NULc\NULd\NULe\NULf\NULg\NULh\NULi\NULj\NULk\NULl\NULm\NULn\NULo\NULp\NULq\NULr\NULs\NULt\NULu\NULv\NULw\NULx\NULy\NULz\NUL'\NUL\255\255\255\255\255\255\255\255\255\255-\NUL\255\255\255\255\&0\NUL1\NUL2\NUL3\NUL4\NUL5\NUL6\NUL7\NUL8\NUL9\NUL\255\255\255\255\255\255\255\255\255\255\255\255\255\255A\NULB\NULC\NULD\NULE\NULF\NULG\NULH\NULI\NULJ\NULK\NULL\NULM\NULN\NULO\NULP\NULQ\NULR\NULS\NULT\NULU\NULV\NULW\NULX\NULY\NULZ\NUL\255\255\255\255\255\255\255\255\255\255\255\255a\NULb\NULc\NULd\NULe\NULf\NULg\NULh\NULi\NULj\NULk\NULl\NULm\NULn\NULo\NULp\NULq\NULr\NULs\NULt\NULu\NULv\NULw\NULx\NULy\NULz\NUL\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255\255"
					     } in 
					       case (# GHC.Prim.State# s_X3iz,
						       Main.AlexLastAcc (Main.AlexInput
									 -> GHC.Base.Int
									 -> Main.Alex [GHC.Base.Char]) #) GHC.Prim.narrow16Int#
													    (GHC.Prim.word2Int#
													       (GHC.Prim.or#
														  (GHC.Prim.uncheckedShiftL#
														     (GHC.Prim.int2Word#
															(GHC.Prim.ord#
															   (GHC.Prim.indexCharOffAddr#
															      arr_X25X
															      (GHC.Prim.+#
																 off'_X40U
																 1))))
														     8)
														  (GHC.Prim.int2Word#
														     (GHC.Prim.ord#
															(GHC.Prim.indexCharOffAddr#
															   arr_X25X
															   off'_X40U)))))
					       of wild_X3e {
						 __DEFAULT -> $w$j_s4pC GHC.Prim.realWorld#;
						 10 ->
						   let {
						     arr_X267 :: GHC.Prim.Addr#
						     [*
						      Str: DmdType]
						     arr_X267 = "\NUL\NUL\STX\NUL\STX\NUL\STX\NUL\STX\NUL\STX\NUL\STX\NUL\STX\NUL\STX\NUL\STX\NUL\STX\NUL\STX\NUL\STX\NUL\STX\NUL\STX\NUL\STX\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\STX\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\STX\NUL\NUL\NUL\ETX\NUL\NUL\NUL\NUL\NUL\STX\NUL\NUL\NUL\NUL\NUL\ETX\NUL\NUL\NUL\NUL\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\ETX\NUL\NUL\NUL\NUL\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\ETX\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL\NUL"
						   } in 
						     alex_scan_tkn_a2zF
						       lc_a23F
						       (GHC.Prim.+# len_a23G 1)
						       (GHC.Prim.narrow16Int#
							  (GHC.Prim.word2Int#
							     (GHC.Prim.or#
								(GHC.Prim.uncheckedShiftL#
								   (GHC.Prim.int2Word#
								      (GHC.Prim.ord#
									 (GHC.Prim.indexCharOffAddr#
									    arr_X267 (GHC.Prim.+# off'_X40U 1))))
								   8)
								(GHC.Prim.int2Word#
								   (GHC.Prim.ord#
								      (GHC.Prim.indexCharOffAddr#
									 arr_X267 off'_X40U))))))
						       r_a3ZA
						       @ s_X3iz
						       wild_X2w
						       s2#_X461
					       }
					 }
				       }
				       }
				       }
				   }
				   }
				   }
				   }
				   }
				   }
			       }
			       }
			       }
			       }
			       }
			       }
			       };
			 (-1) ->
			   return_a3fW
			     @ (Main.AlexLastAcc (Main.AlexInput
						  -> GHC.Base.Int
						  -> Main.Alex [GHC.Base.Char]))
			     last_acc_a23H
		       }
end Rec }

Rec {
loop_s3YA :: GHC.Num.Integer -> Main.Alex GHC.Num.Integer
[Arity 1
 0 -> 0 -> 0 -> *
 Str: DmdType L]
loop_s3YA = \ (i_a1Ry :: GHC.Num.Integer) ->
	      let {
		lvl_s4pE :: Main.Alex GHC.Num.Integer
		[*
		 Str: DmdType]
		lvl_s4pE = case (Main.Alex GHC.Num.Integer) GHC.Num.plusInteger i_a1Ry lit_s3Yy
			   of tpl_X5k { __DEFAULT ->
			   loop_s3YA tpl_X5k
			   }
	      } in 
		\ (@ s_X3iH)
		  (s_X2fs :: Main.AlexState s_X3iH)
		  (s_X43c :: GHC.Prim.State# s_X3iH) ->
		  case (# GHC.Prim.State# s_X3iH, GHC.Num.Integer #) s_X2fs
		  of wild_X34 { Main.AlexState ds_d3og ds_d3oh ds_d3oi scd_r_a22m ->
		  case (# GHC.Prim.State# s_X3iH, GHC.Num.Integer #) scd_r_a22m
		  of wild_a43y { GHC.STRef.STRef var#_a43z ->
		  case (# GHC.Prim.State# s_X3iH, GHC.Num.Integer #) GHC.Prim.readMutVar#
								       @ s_X3iH @ GHC.Base.Int var#_a43z s_X43c
		  of wild_a3ZB { (# new_s_a3Zz, r_a3ZA #) ->
		  case (# GHC.Prim.State# s_X3iH, GHC.Num.Integer #) r_a3ZA
		  of w_X4o2 { GHC.Base.I# ww_s4mz ->
		  case (# GHC.Prim.State# s_X3iH, GHC.Num.Integer #) $wk_s4mM
								       ww_s4mz @ s_X3iH wild_X34 new_s_a3Zz
		  of wild_X43C { (# new_s_X43B, r_X43D #) ->
		  case (# GHC.Prim.State# s_X3iH, GHC.Num.Integer #) GHC.Base.==1 r_X43D lvl_s3Z6
		  of wild_a4d2 {
		    GHC.Base.False ->
		      case (# GHC.Prim.State# s_X3iH, GHC.Num.Integer #) GHC.Base.==1 r_X43D lvl_s3Z7
		      of wild_X3O {
			GHC.Base.False -> lvl_s4pE @ s_X3iH wild_X34 new_s_X43B;
			GHC.Base.True -> (# new_s_X43B, i_a1Ry #)
		      };
		    GHC.Base.True -> (# new_s_X43B, i_a1Ry #)
		  }
		  }
		  }
		  }
		  }
		  }
end Rec }

lvl_s4pZ :: GHC.Num.Integer
[*]
lvl_s4pZ = GHC.Num.S# 0

lvl_s3Z5 :: Main.Alex GHC.Num.Integer
[0 -> 0 -> *
 Str: DmdType]
lvl_s3Z5 = loop_s3YA lvl_s4pZ

Main.alexStartPos :: Main.AlexPosn
[*
 Str: DmdType m]
Main.alexStartPos = Main.AlexPn lit_a3m9 lvl_s4pT lvl_s4pT

lvl_s4q0 :: GHC.Base.Char
[*]
lvl_s4q0 = GHC.Base.C# '\n'

k_a4es :: GHC.Base.String -> GHC.IOBase.IO ()
[Arity 2
 0 -> 0 -> *
 Str: DmdType LL]
k_a4es = \ (s_a1Uq :: GHC.Base.String)
	   (eta_s4ed :: GHC.Prim.State# GHC.Prim.RealWorld) ->
	   case (# GHC.Prim.State# GHC.Prim.RealWorld, () #) GHC.IO.hPutStr
							       GHC.Handle.stdout
							       (case GHC.Base.String GHC.Prim.newMutVar#
										       @ GHC.Base.String
										       @ GHC.Prim.RealWorld
										       s_a1Uq
										       GHC.Prim.realWorld#
								of wild_a4cU { (# s2#_a4cV, var#_a4cW #) ->
								case GHC.Base.String GHC.Prim.newMutVar#
										       @ GHC.Base.Char
										       @ GHC.Prim.RealWorld
										       lvl_s4q0
										       s2#_a4cV
								of wild_X4fc { (# s2#_X4fe, var#_X4fg #) ->
								case GHC.Base.String GHC.Prim.newMutVar#
										       @ Main.AlexPosn
										       @ GHC.Prim.RealWorld
										       Main.alexStartPos
										       s2#_X4fe
								of wild_X4gU { (# s2#_X4gW, var#_X4gY #) ->
								case GHC.Base.String GHC.Prim.newMutVar#
										       @ GHC.Base.Int
										       @ GHC.Prim.RealWorld
										       lit_a3m9
										       s2#_X4gW
								of wild_X4gS { (# s2#_X4l2, var#_X4l5 #) ->
								case GHC.Base.String lvl_s3Z5
										       @ GHC.Prim.RealWorld
										       (Main.AlexState
											  @ GHC.Prim.RealWorld
											  (GHC.STRef.STRef
											     @ GHC.Prim.RealWorld
											     @ Main.AlexPosn
											     var#_X4gY)
											  (GHC.STRef.STRef
											     @ GHC.Prim.RealWorld
											     @ GHC.Base.String
											     var#_a4cW)
											  (GHC.STRef.STRef
											     @ GHC.Prim.RealWorld
											     @ GHC.Base.Char
											     var#_X4fg)
											  (GHC.STRef.STRef
											     @ GHC.Prim.RealWorld
											     @ GHC.Base.Int
											     var#_X4l5))
										       s2#_X4l2
								of wild_a4jy { (# ds_a4jz, r_a4jA #) ->
								GHC.Num.$wshowsPrec
								  0 r_a4jA (GHC.Base.[] @ GHC.Base.Char)
								}
								}
								}
								}
								})
							       eta_s4ed
	   of wild_a4dA { (# new_s_a4dB, a89_a4dC #) ->
	   GHC.IO.$whPutChar GHC.Handle.stdout '\n' new_s_a4dB
	   }

Main.main :: GHC.IOBase.IO ()
[Exported]
[Arity 1
 0 -> *
 Str: DmdType L]
Main.main = \ (s_a4er :: GHC.Prim.State# GHC.Prim.RealWorld) ->
	      case (# GHC.Prim.State# GHC.Prim.RealWorld, () #) GHC.IO.hGetContents
								  GHC.Handle.stdin s_a4er
	      of wild_a4eA { (# new_s_a4ey, a89_a4ez #) ->
	      k_a4es a89_a4ez new_s_a4ey
	      }

lvl_s4q1 :: GHC.Prim.State# GHC.Prim.RealWorld
	    -> (# GHC.Prim.State# GHC.Prim.RealWorld, () #)
[Arity 1
 0 -> *]
lvl_s4q1 = \ (s_a3VF :: GHC.Prim.State# GHC.Prim.RealWorld) ->
	     case (# GHC.Prim.State# GHC.Prim.RealWorld, () #) GHC.IO.hGetContents
								 GHC.Handle.stdin s_a3VF
	     of wild_a4eA { (# new_s_a4ey, a89_a4ez #) ->
	     case (# GHC.Prim.State# GHC.Prim.RealWorld, () #) k_a4es a89_a4ez new_s_a4ey
	     of wild_a4eD { (# new_s_a4eK, a89_a4eL #) ->
	     case (# GHC.Prim.State# GHC.Prim.RealWorld, () #) GHC.Prim.catch#
								 @ ()
								 @ GHC.IOBase.Exception
								 GHC.TopHandler.ds
								 GHC.TopHandler.k
								 new_s_a4eK
	     of wild1_a4eE { (# new_s1_a4eI, a891_a4eJ #) ->
	     case (# GHC.Prim.State# GHC.Prim.RealWorld, () #) GHC.Prim.catch#
								 @ ()
								 @ GHC.IOBase.Exception
								 GHC.TopHandler.ds1
								 GHC.TopHandler.k1
								 new_s1_a4eI
	     of wild2_a4eF { (# new_s2_a4eG, a892_a4eH #) ->
	     (# new_s2_a4eG, a89_a4eL #)
	     }
	     }
	     }
	     }

:Main.main :: GHC.IOBase.IO ()
[Exported]
[Arity 1
 0 -> *
 Str: DmdType L]
:Main.main = \ (eta_a3VG :: GHC.Prim.State# GHC.Prim.RealWorld) ->
	       GHC.Prim.catch#
		 @ () @ GHC.IOBase.Exception lvl_s4q1 (GHC.TopHandler.topHandler @ ()) eta_a3VG