 |
|
|
Op |
Code |
Result |
 |
M |
%* |
To String |
'<1a> '(1..5 %*)
$;
'<1b> '(1..5 %* #) $;
'<2a> '('abc' %* ) $;
'<2b> '('abc' %* #) $;
'<3a> '(1 2 3 'abc' %* ) $;
'<3b> '(1 2 3 'abc' %* #) $; |
<1a> 1 2 3 4 5
<1b> 9
<2a> abc
<2b> 3
<3a> 1 2 3abc
<3b> 8 |
 |
M |
%** |
To Verbose
String |
'<1a> '(1..5 %**)
$;
'<1b> '(1..5 %** #) $;
'<2a> '('abc' %** ) $;
'<2b> '('abc' %** #) $;
'<3a> '(1 2 3 'abc' %** ) $;
'<3b> '(1 2 3 'abc' %** #) $; |
<1a>
Num[I144R1C5:I]1 2 3 4 5
<1b> 24
<2a> String[I206R2C3:C]abc
<2b> 21
<3a> Seq[I287R1C2T:K]:
[1]Num[I278R1C3:I]1 2 3
[2]String[I280R2C3:C]abc
<3b> 66
|
 |
N |
#CSGLEE |
Show GLEE Collate
Sequence |
'' => #CSGLEE;
#CSGLEE $; |
0 0 0 0 0 0 0 0 0 0 0
0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 2 3
4 5 6 7 8 9 10 0 0 0 0 0 0 0 11 25 27 29 32 42 44 46 48 58 60 62 64 66 70 82 84
86 88 90 92 102 104 106 108 114 0 0 0 0 0 0 11 25 27 29 32 42 44 46 48 58 60 62
64 66 70 82 84 86 88 90 92 102 104 106 108 114 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 108 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
0 0 0 0 0 0 0 0 0 0 0 0 0 0 11 11 11 11 11 11 0 0 32 32 32 32 48 48 48 48 29 66
70 70 70 70 70 0 0 92 92 92 92 108 0 0 11 11 11 11 11 11 0 0 32 32 32 32 48 48
48 48 0 66 70 70 70 70 70 0 0 92 92 92 92 108 0 108 |
 |
N |
=> #CSGLEE |
Set GLEE Collating
Sequence |
#nil => #CSGLEE;
'abcCBA'=> #CSGLEE;
'AbB-c' 'a+BcC' 'acxAB' => t;
'<1>----'$;
t #ea '>>>' ,,\ $;
'<2>----'$;
0..255[#CSGLEE *~=0 ``]$;
#nil => #CSGLEE;
'<3>----'$;
t #ea '>>>' ,,\ $; |
<1>----
-bcBA
+acCB
xacBA
<2>----
65 66 67 97 98 99
<3>----
-AbBc
+aBcC
aABcx |
 |
|
#nil =>
#CSGLEE |
Resetting GLEE
Collating Sequence |
'<1>-----'$;
'' => #CSGLEE;
#CSGLEE ``& #ea'-1' <- _1
#asc %** ,,\ $;
'<2>-----'$;
'AaÀÁÂÃÄÅàáâãäå'
'Bb'
'Cc'
'DdÐ'
'EeÈÉÊËèéêë' => #CSGLEE;
#CSGLEE ``& <- _1 %** $; |
<1>-----
Seq[I520R1C36T:K]:
[1]String[C1:C]0
[2]String[C1:C]1
...
...
[10]String[C1:C]9
[11]String[C14:C]AaÀÁÂÃÄÅàáâãäå
[12]String[C2:C]Bb
[13]String[C2:C]Cc
[14]String[C3:C]DdÐ
[15]String[C10:C]EeÈÉÊËèéêë
...
...
[34]String[C2:C]Xx
[35]String[C6:C]YyÝýÿ
[36]String[C2:C]Zz
<2>-----
Seq[I673R1C5T:K]:
[1]Num[I666R1C14:I]66 98 193 194 195 196 197 198 225 226 227 228 229 230
[2]Num[I667R1C2:I]67 99
[3]Num[I668R1C2:I]68 100
[4]Num[I669R1C3:I]69 101 209
[5]Num[I670R1C10:I]70 102 201 202 203 204 233 234 235 236 |
 |
N |
#CSExact |
Show Exact Collating
Sequence |
''=> #CSExact;
#CSExact |
212 213 214 215 216
217 218 219 220 221 222 223 224 225
...
...
37 39 41 51 53 55 57 208 69 73 75 77 79 81 209 210 95 97 99 101 111 211 113
|
 |
N |
=> #CSExact |
Set Exact Collating
Sequence |
'<1>----'$;
'' => #CSExact;
0..255 #asc @== >>> $;
'<2>----'$;
'' => #CSExact;
'z'..'a'=> #CSExact;
0..255 #asc @== >>> $;
'<3>----'$;
'' => #CSExact;
#CSExact => cs;
'9'..'0' => #CSExact;
'0'..'9' @== >>> $;
'<4>----'$;
cs => #CSExact;
'0'..'9' @== >>> $; |
<1>----
.0123456789aAàÀáÁâÂãÃä....
<2>----
zyxwvutsrqponmlkjihgfedcba .012...
<3>----
9876543210
<4>----
0123456789 |
|
M |
@ |
Reference |
#ns => @;
10 => n;
n@ => rn;
'abc' => rn;
'<1a> ' (rn) $;
'<1b> ' (rn%*) $;
'<2> ' (n) $; |
<1a> n@
<1b> abc
<2> abc |
|
M |
^@ |
Dereference
(contained at) |
#ns => @;
10 => n;
n@ => rn;
'abc' => rn;
'<1a> ' (rn) $;
'<1b> ' (rn%*) $;
'<1c> ' (rn ^@) $;
'<2> ' (n) $; |
<1a> n@
<1b> abc
<1c> abc
<2> abc |
|
M |
?@ |
Is Reference |
#ns => @;
10 => n;
n@ => rn;
'<1> ' (n ?@) $;
'<2> ' (rn ?@) $; |
<1> 0
<2> 1 |
 |
M |
* |
Scope |
#ns => @;
'<0> ' (a *)$;
10 =>a;
'<1> ' (a *)$;
'<2> ' ({a *})$;
'<3> ' ({{a *}})$;
'<4> ' (a[.a]{a *})$;
'<5> ' ({a[.a]{a *}})$;
'<6> ' (a[.a]{a[.a]{a *}})$;
'<7> ' (a[.a]{{a *}})$;
'<8> ' ({@ ~.a => @;a[.a]{a *}})$; |
<0> _1
<1> 0
<2> 1
<3> 2
<4> 0
<5> 0
<6> 0
<7> 1
<8> 0 |
 |
M |
#SYS |
System Operator |
#ns =>
@;'str'=>s;10=>n;
13#asc =>nl;
{'longer string'=>s;10..20=>num;
(':')('; ')(nl)(nl nl)=>ss;
(#sys.NSDump ,,ss)}$; |
Scope(0)
s:String[C:13#13]1; num:Num[I:11#44]1; ss:Seq[K:4#16]1
Scope(1)
s:String[C:3#3]1; n:Num[I:1#4]1; nl:String[C:1#1]4 |