- Re-named "sequence" to "row".

1 files changed, 10 insertions, 10 deletions

diff --git a/stdlib/source/lux/math/random.lux b/stdlib/source/lux/math/random.lux
index 55c504585..b8db79ccb 100644
--- a/stdlib/source/lux/math/random.lux
+++ b/stdlib/source/lux/math/random.lux
@@ -18,7 +18,7 @@
                    [queue #+ Queue]
                    (set ["set" unordered #+ Set])
                    [stack #+ Stack]
-                   [sequence #+ Sequence]
+                   [row #+ Row]
                    (tree [finger #+ Tree])))
        ))
 
@@ -194,7 +194,7 @@
        (:: Monad<Random> wrap <zero>)))]
 
   [list     List   (.list)      #.Cons]
-  [sequence Sequence sequence.empty sequence.add]
+  [row Row row.empty row.add]
   )
 
 (do-template [<name> <type> <ctor>]
@@ -274,21 +274,21 @@
      ("lux i64 +" s0 s1)]))
 
 (def: (swap from to vec)
-  (All [a] (-> Nat Nat (Sequence a) (Sequence a)))
+  (All [a] (-> Nat Nat (Row a) (Row a)))
   (|> vec
-      (sequence.put to (maybe.assume (sequence.nth from vec)))
-      (sequence.put from (maybe.assume (sequence.nth to vec)))))
+      (row.put to (maybe.assume (row.nth from vec)))
+      (row.put from (maybe.assume (row.nth to vec)))))
 
-(def: #export (shuffle seed sequence)
-  {#.doc "Shuffle a sequence randomly based on a seed value."}
-  (All [a] (-> Nat (Sequence a) (Sequence a)))
-  (let [_size (sequence.size sequence)
+(def: #export (shuffle seed row)
+  {#.doc "Shuffle a row randomly based on a seed value."}
+  (All [a] (-> Nat (Row a) (Row a)))
+  (let [_size (row.size row)
         _shuffle (monad.fold Monad<Random>
                              (function (_ idx vec)
                                (do Monad<Random>
                                  [rand nat]
                                  (wrap (swap idx (n/% _size rand) vec))))
-                             sequence
+                             row
                              (list.n/range +0 (dec _size)))]
     (|> _shuffle
         (run (pcg-32 [+123 seed]))