improve performance on chompOps function

src/Compiler/Parse/Symbol.elm

@@ -69,23 +69,13 @@ operator toExpectation toError =
 
 chompOps : String -> Int -> Int -> Int
 chompOps src pos end =
-    if pos < end && isBinopChar src pos then
+    if pos < end && isBinopCharHelp (P.unsafeIndex src pos) then
         chompOps src (pos + 1) end
 
     else
         pos
 
 
-isBinopChar : String -> Int -> Bool
-isBinopChar src pos =
-    src
-        |> String.dropLeft pos
-        |> String.toList
-        |> List.head
-        |> Maybe.map isBinopCharHelp
-        |> Maybe.withDefault False
-
-
 isBinopCharHelp : Char -> Bool
 isBinopCharHelp char =
     let