Fix seq; more readme

1 files changed, 2 insertions, 1 deletions

diff --git a/test.icl b/test.icl
index 95f1276..54668f2 100644
--- a/test.icl
+++ b/test.icl
@@ -20,9 +20,10 @@ sqrt = 'z' := 0 :.
            'o' := 'o' + 2 :.
            's' := 's' + 'o' )
 
+//Start = toString (seq sqrt st)
 Start = toString (tree sqrt st)
 where
     st :: Var -> Int
-    st 'x' = 16
+    st 'x' = 9