From: Siraaj Khandkar <siraaj@khandkar.net>
Date: Sat, 28 Sep 2013 16:36:25 +0000 (-0400)
Subject: A more obvious order in this context.
X-Git-Url: https://git.xandkar.net/?p=cellular-automata.git;a=commitdiff_plain;h=8526e3e1220a86ff1d6fee238123611f89a4f242

A more obvious order in this context.
---

diff --git a/polymorphism/001/src/polymorphism.ml b/polymorphism/001/src/polymorphism.ml
index 1c47e0b..c52df93 100644
--- a/polymorphism/001/src/polymorphism.ml
+++ b/polymorphism/001/src/polymorphism.ml
@@ -271,7 +271,7 @@ let main () =
     [ (module Conway : RULE)
     ]
   in
-  Automaton.create ~rows:(rows - 3) ~columns ~interval ~rules |> Automaton.loop
+  Automaton.loop (Automaton.create ~rows:(rows - 3) ~columns ~interval ~rules)
 
 
 let spec =