Replace two '$' with '<|'

libraries/Automaton.elm

@@ -33,7 +33,7 @@ g <<< f = f >>> g
 -- Combine a list of automatons into a single automaton that produces a list.
 combine : [Automaton a b] -> Automaton a [b]
 combine autos =
-  Step (\a -> let (autos', bs) = unzip $ map (step a) autos
+  Step (\a -> let (autos', bs) = unzip <| map (step a) autos
               in  (combine autos', bs))
 
 -- Create an automaton with no memory. It just applies the given function to

libraries/Dict.elm

@@ -154,7 +154,7 @@ find k t =
 -- Determine if a key is in a dictionary.
 member : Comparable k -> Dict (Comparable k) v -> Bool
 -- Does t contain k?
-member k t = Maybe.isJust $ lookup k t
+member k t = Maybe.isJust <| lookup k t
 
 rotateLeft : Dict k v -> Dict k v
 rotateLeft t =