Example for Parser.float does not type check

[timjs]

elmFloat : Parser Float
elmFloat =
  oneOf
    [ symbol "."
        |. problem "floating point numbers must start with a digit, like 0.25"
    , float
    ]

should be

elmFloat : Parser Float
elmFloat =
  oneOf
    [ symbol "."
        |> andThen (always <| problem "floating point numbers must start with a digit, like 0.25")
    , float
    ]

The (|.) operator keeps left and drops right and thus gives something of type Parser () in the first listing which clashes with Parser Float.