Refactor some methods in/into Iterator/Iterable.

src/core/Iterable.pm

@@ -1,5 +1,25 @@
 augment class Iterable {
+    multi method Int() {
+        $.elems.Int;
+    }
+
+    multi method Num() {
+        $.elems;
+    }
+
     multi method Seq() {
-        self.iterator.Seq;
+        $.iterator.Seq;
+    }
+
+    multi method Str() {
+        pir::join(' ', $.iterator.eager);
+    }
+
+    multi method eager() {
+        $.iterator.eager;
+    }
+
+    multi method elems() {
+        $.iterator.elems;
     }
 }

src/core/Iterator.pm

@@ -11,10 +11,6 @@ augment class Iterator {
         Seq.new!STORE(self);
     }
 
-    multi method Str() {
-        pir::join(' ', self.eager);
-    }
-
     # TimToady suggests this should be on Cool,
     # but it makes more sense to me here.  Also
     # should support slices, but I don't know 

src/core/Range.pm

@@ -62,14 +62,6 @@ class Range is Iterable {
         my $emax = $.excludes_max ?? "^" !! "";
         $min ~ $emin ~ ".." ~ $emax ~ $max;
     }
-
-    our Str multi method Str() {
-        $.iterator.Str;
-    }
-
-    our multi method Num() {
-        $.iterator.elems;
-    }
 }
 
 our multi sub infix:<..>($min, $max) {

src/core/Seq.pm

@@ -1,12 +1,6 @@
 augment class Seq {
-    multi method eager() { self.iterator.eager; }
-
     method elems() { pir::set__IP(self!fill); }
 
-    method Num() { self.elems; }
-
-    method Int() { self.elems.Int; }
-
     method Str() {
         pir::join(' ', self!fill);
     }