Replace usage of internal "munch" method in zip.t

S03-metaops/zip.t

@@ -36,7 +36,7 @@ is (<a b c d> Z 'x', 'z', *), <a x b z c z d z>, 'non-meta zip extends right arg
 is (1, 2, 3, * Z 10, 20, 30, 40, 50),
     (1, 10, 2, 20, 3, 30, 3, 40, 3, 50), 'non-meta zip extends left argument ending with *';
 #?niecza skip 'Unable to resolve method munch in class List'
-is (2, 10, * Z 3, 4, 5, *).munch(10),
+is (2, 10, * Z 3, 4, 5, *).[^10],
     (2, 3, 10, 4, 10, 5, 10, 5, 10, 5),
     'non-meta zip extends two arguments ending with *';
 #?niecza todo
@@ -47,7 +47,7 @@ is (<a b c d> Z~ 'x', 'z', *), <ax bz cz dz>, 'zip-concat extends right argument
 #?niecza skip 'Cannot use value like Whatever as a number'
 {
 is (1, 2, 3, * Z+ 10, 20, 30, 40, 50), (11, 22, 33, 43, 53), 'zip-plus extends left argument ending with *';
-is (2, 10, * Z* 3, 4, 5, *).munch(5),
+is (2, 10, * Z* 3, 4, 5, *).[^5],
     (6, 40, 50, 50, 50), 'zip-product extends two arguments ending with *';
 }