--- parser3/src/www/htdocs/Attic/index.html	2001/10/10 14:20:56	1.382
+++ parser3/src/www/htdocs/Attic/index.html	2001/10/11 14:00:10	1.386
@@ -1,4 +1,8 @@
 @main[]
+^replace[]
+#^set[]
+#^hash[]<hr>
+#$t[^methresult[]] ->$t
 #^terror[]
 #^ssave[]
 #^calendar[]
@@ -6,7 +10,7 @@
 #^tdef[]
 #^ford[]
 #^tif[]
-^image[]
+#^image[]
 #^mail2[]
 #^cookie[]
 #^response[]
@@ -18,11 +22,59 @@
 #^exec[]
 #^fori[]
 #^tconnect[]
-^xslt[]
+#^xslt[]
 #^xml[]
 #^header[]
 OK
 
+@replace[]
+$a[12^;3]
+^a.replace[^table::set{from	to
+2^;	!
+}]
+
+
+@set[]
+^setdata[]
+^a.add[$b]
+add:$a.3<br>
+
+^setdata[]
+^a.sub[$b]
+sub2:$a.2<br>
+sub1:$a.1<br>
+
+^setdata[]
+$c[^a.union[$b]]
+union3:$c.3<br>
+union2:$c.2<br>
+
+^setdata[]
+$c[^a.intersection[$b]]
+intersection3:$c.3<br>
+intersection2:$c.2<br>
+
+^setdata[]
+intersects:^if(^a.intersects[$b]){y;n}<br>
+intersects2:^if(^a.intersects[ ]){y;n}<br>
+
+
+<hr>
+
+@setdata[]
+$a[$.1[a1] $.2[a2]]
+$b[        $.2[b2] $.3[b3]]
+
+
+@hash[]
+$h[^hash::create[$._default[123]]]
+$h.paf[not kretin]
+$h.paf<br>
+=$h.that=<br>
+
+@methresult[]
+$result[^table::set{1}]
+
 @terror[]
 ^error[method z must be called with z]