From df667ca0227e2043817e8fd4408575b8e1cf4e23 Mon Sep 17 00:00:00 2001
From: Mads Flensted-Urech <mfu@coadu.com>
Date: Mon, 17 Jun 2013 22:48:05 +0200
Subject: [PATCH] Replace two '$' with '<|'

---
 libraries/Automaton.elm | 2 +-
 libraries/Dict.elm      | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/libraries/Automaton.elm b/libraries/Automaton.elm
index 6fee530..955855b 100644
--- a/libraries/Automaton.elm
+++ b/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
diff --git a/libraries/Dict.elm b/libraries/Dict.elm
index 33a9ea4..b2319ee 100644
--- a/libraries/Dict.elm
+++ b/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 =