--- parser3/tests/014.html	2003/07/24 11:25:57	1.2
+++ parser3/tests/014.html	2009/07/07 23:45:30	1.4
@@ -1,29 +1,45 @@
 @main[]
 ^setdata[]
+^$a: ^print[$a]
+^$b: ^print[$b]
+<br />
+
 ^a.add[$b]
-add:$a.3<br>
+^^a.add[^$b]: ^print[$a]
 
 ^setdata[]
 ^a.sub[$b]
-sub2:$a.2<br>
-sub1:$a.1<br>
+^^a.sub[^$b]: ^print[$a]
 
 ^setdata[]
-$c[^a.union[$b]]
-union3:$c.3<br>
-union2:$c.2<br>
+$c[^a.intersection[$b]]
+^$c[^^a.intersection[^$b]]: ^print[$c]
 
 ^setdata[]
-$c[^a.intersection[$b]]
-intersection3:$c.3<br>
-intersection2:$c.2<br>
+$c[^a.union[$b]]
+^$c[^^a.union[^$b]]: ^print[$c]
 
 ^setdata[]
-intersects:^if(^a.intersects[$b]){y;n}<br>
-intersects2:^if(^a.intersects[ ]){y;n}<br>
+^^a.intersects[^$b]? ^if(^a.intersects[$b]){y;n}<br />
+^^a.intersects[ ]? ^if(^a.intersects[ ]){y;n}<br />
+^^a.intersects[^$.5[x5]]? ^if(^a.intersects[$.5[x5]]){y;n}<br />
+
+^^c.contains[1] ? ^if(^c.contains[1]){y;n}<br />
+^c.delete[2]
+^^c.delete[2], ^^c.contains[2] ? ^if(^c.contains[2]){y;n}<br />
+
+^^c.delete[^$empty]^c.delete[$empty]<br />
+^^c.delete[]: ^try{^c.delete[]}{$exception.handled(1)error}<br />
+^print[$c]
+<hr />
 
-<hr>
 
 @setdata[]
-$a[$.1[a1] $.2[a2]]
-$b[        $.2[b2] $.3[b3]]
+$a[$.1[a1] $.2[a2] $.3[a3]]
+$b[    	$.2[b2] $.3[b3] $.4[b4]]
+
+
+@print[h][t]
+$t[^h._keys[]]
+^t.sort($t.key)
+^t.menu{$t.key='$h.[$t.key]'}[, ]<br />