fix formatting

Author: Anton-4

examples/Arithmetic/main.roc

@@ -46,7 +46,7 @@ readArgs =
 
     args =
         Arg.list {}
-            |> Task.mapErr! \_ -> InvalidArg
+        |> Task.mapErr! \_ -> InvalidArg
 
     aResult = List.get args 1 |> Result.try Str.toI32
     bResult = List.get args 2 |> Result.try Str.toI32

examples/Parser/main.roc

@@ -9,11 +9,11 @@ import parser.String exposing [parseStr, codeunit, anyCodeunit]
 
 main =
     many letterParser
-        |> parseStr inputStr
-        |> Result.map countLetterAs
-        |> Result.map \count -> "I counted $(count) letter A's!"
-        |> Result.withDefault "Ooops, something went wrong parsing"
-        |> Stdout.line!
+    |> parseStr inputStr
+    |> Result.map countLetterAs
+    |> Result.map \count -> "I counted $(count) letter A's!"
+    |> Result.withDefault "Ooops, something went wrong parsing"
+    |> Stdout.line!
 
 Letter : [A, B, C, Other]