B64.hs

{-# LANGUAGE TemplateHaskell #-}

module Breadth.B64
  ( Tag(..)
  , Collection(..)
  , indices
  ) where

import Data.Recollections.TH
import GHC.Generics
import Leaf qualified

data Tag
  = N0 Leaf.Tag
  | N1 Leaf.Tag
  | N2 Leaf.Tag
  | N3 Leaf.Tag
  | N4 Leaf.Tag
  | N5 Leaf.Tag
  | N6 Leaf.Tag
  | N7 Leaf.Tag
  | N8 Leaf.Tag
  | N9 Leaf.Tag
  | N10 Leaf.Tag
  | N11 Leaf.Tag
  | N12 Leaf.Tag
  | N13 Leaf.Tag
  | N14 Leaf.Tag
  | N15 Leaf.Tag
  | N16 Leaf.Tag
  | N17 Leaf.Tag
  | N18 Leaf.Tag
  | N19 Leaf.Tag
  | N20 Leaf.Tag
  | N21 Leaf.Tag
  | N22 Leaf.Tag
  | N23 Leaf.Tag
  | N24 Leaf.Tag
  | N25 Leaf.Tag
  | N26 Leaf.Tag
  | N27 Leaf.Tag
  | N28 Leaf.Tag
  | N29 Leaf.Tag
  | N30 Leaf.Tag
  | N31 Leaf.Tag
  | N32 Leaf.Tag
  | N33 Leaf.Tag
  | N34 Leaf.Tag
  | N35 Leaf.Tag
  | N36 Leaf.Tag
  | N37 Leaf.Tag
  | N38 Leaf.Tag
  | N39 Leaf.Tag
  | N40 Leaf.Tag
  | N41 Leaf.Tag
  | N42 Leaf.Tag
  | N43 Leaf.Tag
  | N44 Leaf.Tag
  | N45 Leaf.Tag
  | N46 Leaf.Tag
  | N47 Leaf.Tag
  | N48 Leaf.Tag
  | N49 Leaf.Tag
  | N50 Leaf.Tag
  | N51 Leaf.Tag
  | N52 Leaf.Tag
  | N53 Leaf.Tag
  | N54 Leaf.Tag
  | N55 Leaf.Tag
  | N56 Leaf.Tag
  | N57 Leaf.Tag
  | N58 Leaf.Tag
  | N59 Leaf.Tag
  | N60 Leaf.Tag
  | N61 Leaf.Tag
  | N62 Leaf.Tag
  | N63 Leaf.Tag
  | End

mkCollection ''Tag
mkIndices ''Tag
mkBounded ''Tag
mkEnum ''Tag