|
|
| version 1.4, 2009/07/07 23:45:30 | version 1.7, 2015/02/03 09:31:54 |
|---|---|
| Line 1 | Line 1 |
| @main[] | @main[] |
| $WHITESPACE[ ] | |
| ^setdata[] | ^setdata[] |
| ^$a: ^print[$a] | ^$a: ^print[$a] |
| ^$b: ^print[$b] | ^$b: ^print[$b] |
| <br /> | ^^a.add[^$b]^a.add[$b]<br /> |
| ^$a: ^print[$a] | |
| ^a.add[$b] | <hr /> |
| ^^a.add[^$b]: ^print[$a] | |
| ^setdata[] | ^setdata[] |
| ^a.sub[$b] | ^$a: ^print[$a] |
| ^^a.sub[^$b]: ^print[$a] | ^$b: ^print[$b] |
| ^^a.sub[^$b]^a.sub[$b]<br /> | |
| ^$a: ^print[$a] | |
| <hr /> | |
| ^setdata[] | ^setdata[] |
| $c[^a.intersection[$b]] | ^$a: ^print[$a] |
| ^$c[^^a.intersection[^$b]]: ^print[$c] | ^$b: ^print[$b] |
| ^$d[^^a.intersection[^$b]], ^$d: $d[^a.intersection[$b]]^print[$d] | |
| <hr /> | |
| ^setdata[] | ^setdata[] |
| $c[^a.union[$b]] | ^$a: ^print[$a] |
| ^$c[^^a.union[^$b]]: ^print[$c] | ^$b: ^print[$b] |
| ^$d[^^a.union[^$b]], ^$d: $d[^a.union[$b]]^print[$d] | |
| <hr /> | |
| ^setdata[] | ^setdata[] |
| ^$a: ^print[$a] | |
| ^$b: ^print[$b] | |
| ^^a.intersects[^$b]? ^if(^a.intersects[$b]){y;n}<br /> | ^^a.intersects[^$b]? ^if(^a.intersects[$b]){y;n}<br /> |
| ^^a.intersects[ ]? ^if(^a.intersects[ ]){y;n}<br /> | ^^a.intersects[$WHITESPACE]? ^if(^a.intersects[$WHITESPACE]){y;n}<br /> |
| ^^a.intersects[^$.5[x5]]? ^if(^a.intersects[$.5[x5]]){y;n}<br /> | ^^a.intersects[^$.5[x5]]? ^if(^a.intersects[$.5[x5]]){y;n}<br /> |
| <hr /> | |
| ^setdata[] | |
| ^$a: ^print[$a] | |
| ^^a.contains[1] ? ^if(^a.contains[1]){y;n}<br /> | |
| ^^a.contains[2] ? ^if(^a.contains[2]){y;n}<br /> | |
| ^^a.delete[2]^a.delete[2]<br /> | |
| ^^a.contains[2] ? ^if(^a.contains[2]){y;n}<br /> | |
| ^$a: ^print[$a] | |
| <hr /> | |
| ^^c.contains[1] ? ^if(^c.contains[1]){y;n}<br /> | ^setdata[] |
| ^c.delete[2] | ^$c: ^print[$c] |
| ^^c.delete[2], ^^c.contains[2] ? ^if(^c.contains[2]){y;n}<br /> | ^^c.delete[^$VOID]^c.delete[$VOID]<br /> |
| ^$c: ^print[$c] | |
| ^^c.delete[^$empty]^c.delete[$empty]<br /> | <hr /> |
| ^^c.delete[]: ^try{^c.delete[]}{$exception.handled(1)error}<br /> | |
| ^print[$c] | ^setdata[] |
| ^$c: ^print[$c] | |
| ^^c.delete[]: ^try{^c.delete[]}{$exception.handled(1)exception}<br /> | |
| ^$c: ^print[$c] | |
| <hr /> | <hr /> |
| @setdata[] | @setdata[] |
| $a[$.1[a1] $.2[a2] $.3[a3]] | $a[$.1[a1] $.2[a2] $.3[a3]] |
| $b[ $.2[b2] $.3[b3] $.4[b4]] | $b[$.2[b2] $.3[b3] $.4[b4]] |
| $c[^a.union[$b]] | |
| @print[h][t] | @print[h] |
| $t[^h._keys[]] | ^if($h){^h.foreach[k;v]{$k='$v'}[, ]}{empty}<br /> |
| ^t.sort($t.key) | |
| ^t.menu{$t.key='$h.[$t.key]'}[, ]<br /> |