Create a generator that produces boolean values. The following example simulates a coin flip that may land heads or tails.

type Flip
    = Heads
    | Tails


coinFlip : Generator Flip
coinFlip =
    map
        (\b ->
            if b then
                Heads


            else
                Tails
        )
        bool