|
|
|
Op |
Code |
Result |
|
M |
%/ |
Upper Case |
'How Now Brown
Cow'%/ |
HOW NOW BROWN COW |
|
M |
%\ |
Lower Case |
'How Now Brown
Cow'%\ |
how now brown cow |
|
M |
& |
Unique |
'abc., ., .,DEFABCdef' & $; |
.aAbBcCdDeEfF,
|
|
D |
& |
Intersection |
'abcd' & 'edcb' |
bcd |
|
D |
&& |
Filter |
'Car
54'&&('A'..'z')$;
'Car 54'&&('0'..'9')$; |
Car
54 |
|
D |
| |
Union |
'abcd' | 'edcb' |
abcde |
|
M |
@= |
Mark for liberal
Glee compare |
'How now?'@= ^&'How
now?' $;
'How now?'@= %** $;
|
1
String[I506R1C8:C]How now? |
|
M |
@== |
Mark for exact
compare |
'How now?'@== ^&'how
now' $;
'How now?'@== ^&'How now?' $;
'How now?'@== %** $; |
0
1
String[I566R1C8=C]How now? |
|
D |
= |
Equals |
'How Now'='how now' $;
'How Now'@== ='how now' $; |
1
0 |
|
D |
*= |
Mark equal |
'abcdEFGH' *= 'ABxdEFyH'
$;
'abcdEFGH' @== *= 'ABxdEFyH' $; |
11011101
00011101 |
|
M |
*&
or
@< *& |
Mark Words
Start |
'Now is the 12:00 time'
=>t $;
t *& =>s $;
t @== @< *& =>s $; |
Now is the 12:00 time
10001001 00000000 01000
10001001 00000000 01000 |
|
D |
*&
or
@< *& |
Mark String
Start |
'HOW now BROWN cow'
*& 'OW' $;
'HOW now BROWN cow'@== *& 'OW' $;
"Stitch-in-time" *& "INTIME" $;
"Stitch-in-time" @< *& "IN-TIME" $;
"Stitch-in-time"@== *& "in-time" $; |
01000100 00100001 0
01000000 00100000 0
00000010 000000
00000010 000000
00000001 000000 |
|
M |
@> *& |
Mark Words End |
'Now is the 12:00 time'
=>t $;
t @> *& =>s $;
t @== @> *& =>s $; |
Now is the 12:00 time
00100100 01000000 00001
00100100 01000000 00001 |
|
D |
@> *& |
Mark String End |
'HOW now BROWN cow'
@> *& 'OW' $;
'HOW now BROWN cow'@== @> *& 'OW' $;
"Stitch-in-time" @> *& "IN TIME" $;
"Stitch-in-time" @> *& "IN-TIME" $;
"Stitch-in-time"@== @> *& "in-time" $; |
00100010 00010000 1
00100000 00010000 0
00000000 000000
00000000 000001
00000000 000001
|
|
D |
*| |
Mark Chars |
'HOW now, BROWN cow.'
=> t $;
t *| ',.Ow' => m $;
t[m] $;
t @== *| ',.Ow' => m $;
t[m] $; |
HOW now, BROWN cow.
01100111 00011000 111
OWow,OWow.
01000011 00010000 011
Ow,Ow. |
|
D |
*<> |
Band Pairs |
'(a) "b[c]"
[c] <d>' => s$;
'()""[]' => p $;
s *<> p => m $;
s[m] $;
s @== *<> p => m $;
s[m] $; |
(a) "b[c]"
[c] <d>
()""[]
11101111 11011100 00
(a)"b[c]"[c]
11101111 11011100 00
(a)"b[c]"[c] |
|
D |
, |
Catenate |
"The
","End" |
The End |
|
D |
` |
Index Of Chars |
'abcdef' ` 'bxd' $;
'bxd' ` 'abcdef' $; |
2 0 4
0 1 0 3 0 0 |
|
D |
`& |
Index of string |
'Now is the' `& 'IS'
$;
'Now is the' @== `& 'IS' $;
'Now is the' @== `& 'is' $; |
5
0
5 |
|
D |
``& |
Indices of
string |
'Up up and away' ``&
'Up' $;
'Up up and away' @== ``& 'Up' $;
'Yeh yeh yeh' @== ``& 'yeh' $; |
1 4
1
5 9 |
|
D |
`| |
Index of Any |
'A,b;c:d.' `| ',;:' $;
',;:' `| 'A,b;c:d.' $; |
2
1 |
|
D |
``| |
Indices of Any |
'A,b;c:d.' ``| ',;:' $;
',;:' ``| 'A,b,c:d.' $; |
2 4 6
1 3 |
|
D |
^| |
Contains Chars |
'ABCDx' ^| 'bx' $;
'ABCDx' @== ^| 'bx' $;
'ABCDx' @== ^| 'bX' $; |
1
1
0 |
|
D |
^& |
Contains String |
'HOW NOW BROWN COW'
^& 'ow' $;
'HOW NOW BROWN COW' @== ^& 'ow' $;
'HOW NOW BROWN COW' @== ^& 'OW' $; |
1
0
1 |
|
M |
~ |
DAB |
' ab c de ' ~ |
abcde |
|
D |
~ |
DAC |
'X,A,b,C,d,E.Y'
~'ABCDE.,' $;
'X,A,b,C,d,E.Y' @== ~'ABCDE.,' $; |
XY
XbdY |
|
M |
~~ |
DEB |
' a b c '~~ |
'a b c' |
|
M |
~< |
DLB |
' ab c de..' ~< |
'ab c de..' |
|
D |
~< |
DLC |
' .a b. .' ~< '. ' |
'a b. .' |
|
M |
~> |
DTB |
' a b '~> |
' a b' |
|
D |
~> |
DTC |
' .a b. .' ~> '. ' |
' .a b' |
|
D |
~| |
Delete Any |
|
|
|
D |
~& |
Delete All/GREP |
|
|
|
M |
\ |
Segment CRLF |
"Now is",
(13 10#asc),
"the time" \ %** |
Seq[I223R1C2T:Ptr]:
[1]String[I224R1C8]:Now is
[2]String[I225R1C8]:the time
|
|
M |
\~ |
Segment CRLF and
Eat |
"Now is",
(13 10 #asc),
"the time" \~ %** |
Seq[I259R1C2T:Ptr]:
[1]String[I260R1C6]:Now is
[2]String[I261R1C8]:the time |
|
M |
\& |
Segment Words |
"Easy come, easy
go." \& %** |
Seq[I44R1C4T:Ptr]:
[1]String[I45R1C4]:Easy
[2]String[I46R1C4]:come
[3]String[I47R1C4]:easy
[4]String[I48R1C2]:go |
|
D |
\| |
Segment
Delimiter |
'ab,cd.' \| ',.'
%** |
Seq[I23R2C2T:P]:
[1]String[I24R1C3:C]ab,
[2]String[I25R1C3:C]cd. |
|
D |
\|~ |
Segment Delimiter
and Eat |
'ab,cd.' \|~ ',.'
%** |
Seq[I754R1C2T:Ptr]:
[1]String[I755R1C2]:ab
[2]String[I756R1C2]:cd |
|
D |
\ |
Segment Index |
' Now is the time '
=> t $;
t *| ' ' => s $;
t \ s %** $; |
Now is the time
10001001 00010000 1
Seq[I448R1C5T:Ptr]:
[1]String[I449R1C1]
[2]String[I450R1C4]Now
[3]String[I451R1C3]is
[4]String[I452R1C4]the
[5]String[I453R1C5]time |
|
D |
\~ |
Segment Index and
Eat |
"<1>---------"$;
' Now is the time ' => t $;
"<2>---------"$;
t *| ' ' => s $;
"<3>---------"$;
t \~ s %** $;
"<4>---------"$;
s `` +1 => i $;
"<5>---------"$;
t \~ i %** $; |
<1>---------
Now is the time
<2>---------
10001001 00010000 1
<3>---------
Seq[I394R1C5T:K]:
[1]String[]NULL
[2]String[I396R1C3:C]Now
[3]String[I397R1C2:C]is
[4]String[I398R1C3:C]the
[5]String[I399R1C4:C]time
<4>---------
2 6 9 13 18
<5>---------
Seq[I475R1C5T:K]:
[1]String[]NULL
[2]String[I477R1C3:C]Now
[3]String[I478R1C2:C]is
[4]String[I479R1C3:C]the
[5]String[I480R1C4:C]time |
|
D |
.. |
Range |
'<1>-----'$;
'a'..'d','A'..'D' %**$;
'<2>-----'$;
'a'..'d'..'a' %**$;
'<3>-----'$;
('a'..'d'),|('A'..'D') %** $;
'<4>-----'$;
('a'..'d'),|('A'..'D') < %** $; |
<1>-----
String[I37R1C8:C]abcdABCD
<2>-----
String[I65R1C7:C]abcdcba
<3>-----
Seq[I123R1C4T:K]:
[1]String[I124R1C2:C]aA
[2]String[I125R1C2:C]bB
[3]String[I126R1C2:C]cC
[4]String[I127R1C2:C]dD
<4>-----
String[I189R1C8:C]aAbBcCdD |
|
M |
<-< |
Shift Left 1 |
'abcdef' <-<
:hex |
bcdef.
666667
23456F |
|
D |
<-< |
Shift Left n |
'abcdef' <-< 2
:hex |
cdef..
666677
3456FF |
|
M |
>-> |
Shift Right 1 |
'abcdef' >->
:hex |
.abcde
766666
F12345 |
|
D |
>-> |
Shift Right n |
'abcdef' >-> 2
:hex |
..abcd
776666
FF1234 |
|
M |
<%< |
Rotate Left 1 |
'abcdef' <%< |
bcdefa |
|
D |
<%< |
Rotate Left n |
'abcdef' <%<
2 |
cdefab |
|
M |
>%> |
Rotate Right 1 |
'abcdef' >%> |
fabcde |
|
D |
>%> |
Rotate Right n |
'abcdef' >%>
2 |
efabcd |
|
M |
%% |
Shape |
'abcdef' %% |
6 |
|
D |
%% |
Reshape |
'abcd|ef' %% 10 |
abcd|efabc |
|
M |
>%< |
Flip |
'abcdef' >%< |
fedcba |
|
P |
:b64 |
Base 64 |
"now is
the":b64 |
bm93IGlzIHRoZQ== |
|
P |
:r64 |
Rep 64 |
'bm93IGlzIHRoZQ==':r64 |
now is the |
|
D |
#SOUNDEX |
Mark by Soundex
|
In
Development |
|
|
D |
#GREP |
Mark by GREP |
In
Development |
|
|
M |
#asc |
ASCII char |
65..90 #asc $;
97..122 #asc $;
"ABCDEFG"#asc $;
'abcdefg'#asc $; |
ABCDEFGHIJKLMNOPQRSTUVWXYZ
abcdefghijklmnopqrstuvwxyz
65 66 67 68 69 70 71
97 98 99 100 101 102 103 |