Hope
This
helps
N=:3
]K=:(N^2)*0 1 0 2 3 0 0 4 5 0 6 0
0 9 0 18 27 0 0 36 45 0 54 0
]L=:K+"0>12#<i.N,N
0 1 2
3 4 5
6 7 8
9 10 11
12 13 14
15 16 17
0 1 2
3 4 5
6 7 8
18 19 20
21 22 23
24 25 26
27 28 29
30 31 32
33 34 35
0 1 2
3 4 5
6 7 8
0 1 2
3 4 5
6 7 8
36 37 38
39 40 41
42 43 44
45 46 47
48 49 50
51 52 53
0 1 2
3 4 5
6 7 8
54 55 56
57 58 59
60 61 62
0 1 2
3 4 5
6 7 8
]O=:PAT,"1 (":,.i.12),"1'{L'
0{L
|. 1{L
2{L
|:|. 3{L
4{L
5{L
6{L
7{L
|:|. 8{L
9{L
|. 10{L
11{L
]ALL=:,./;"1|:4 3$<"2 ".":"1 O
0 1 2 15 16 17 0 1 2
3 4 5 12 13 14 3 4 5
6 7 8 9 10 11 6 7 8
24 21 18 27 28 29 0 1 2
25 22 19 30 31 32 3 4 5
26 23 20 33 34 35 6 7 8
0 1 2 36 37 38 51 48 45
3 4 5 39 40 41 52 49 46
6 7 8 42 43 44 53 50 47
0 1 2 60 61 62 0 1 2
3 4 5 57 58 59 3 4 5
6 7 8 54 55 56 6 7 8
Linda
-----Original Message-----
From: [email protected]
[mailto:[email protected]] On Behalf Of bill lam
Sent: Friday, September 11, 2015 11:08 PM
To: [email protected]
Subject: Re: [Jbeta] jandroid
some spaces inside quote in the line
(H`I`J)=:R=:' ';'|. ';'|:|.'
are nbsp (u+00a0), at least, that was what I got in android gmail app.
Delete all spaces and type again (4 spaces and 2 spaces) after pasting into
jandroid will run ok.
(H`I`J)=:R=:' ';'|. ';'|:|.'
On Sep 12, 2015 12:08 AM, "bill lam" <[email protected]> wrote:
> Sorry I think the problem is copy and paste from email ro browser to
> jandroid. jandroid is not smart enough to convert non-breaking space
> to true space, hence the script inside window looks good but contains
> illegal characters.
> I'll take a look. Thanks.
>
> Пт, 11 сен 2015, Linda Alvord написал(а):
> > Hopefully....
> >
> > loadd 'viewmat'
> > N=:30
> > f=: 13 :'<.(i.y)*255%<:y'
> > ]A=:|.1 0 2{"1 #:i.8
> > D=:(,A)*"0 1 ($f N)#255
> > E=:(|.f N) 5 6 10 13 15 20}D
> > F=:(<"2)|:"2(8,3,N)$,E
> > erase names<'W Y C G M R B V'
> > (W`Y`C`G`M`R`B`V)=:(i.8){F
> > V=:((N^2),3)$0
> > BAC=:((N^2),3)$,M<."1/Y
> > LEF=:((N^2),3)$,M<."1/C
> > TOP=:((N^2),3)$,C<."1/Y
> > RIG=:((N^2),3)$,R+"1/G
> > FACE=:((N^2),3)$,G+"1/B
> > BASE=:((N^2),3)$,R+"1/B
> > PALS=:V,BAC,LEF,TOP,FACE,RIG,BASE
> > erase names 'H,I,J'
> > (H`I`J)=:R=:' ';'|. ';'|:|.'
> > PAT=:12 4$H,I,H,J,H,H,H,H,J,H,I,H
> > K=:(N^2)*0 1 0 2 3 0 0 4 5 0 6 0
> > L=:K+"0>12#<i.N,N
> > O=:PAT,"1 (":,.i.12),"1'{L'
> > ALL=:,./;"1|:4 3$<"2 ".":"1 O
> > PALS viewmat ALL
> >
> > Linda
> >
> > -----Original Message-----
> > From: [email protected]
> > [mailto:[email protected]] On Behalf Of bill lam
> > Sent: Thursday, September 10, 2015 9:01 PM
> > To: [email protected]
> > Subject: Re: [Jbeta] jandroid
> >
> > ALL=:,./;"1|:4 3$<"2 ".":"1 O
> > |domain error: scriptd
> > | .2{L
> >
> > can you double check?
> > On Sep 11, 2015 8:35 AM, "Linda Alvord" <[email protected]> wrote:
> >
> > > Sorry:
> > >
> > > load 'viewmat'
> > > N=:30
> > > f=: 13 :'<.(i.y)*255%<:y'
> > > ]A=:|.1 0 2{"1 #:i.8
> > > D=:(,A)*"0 1 ($f N)#255
> > > E=:(|.f N) 5 6 10 13 15 20}D
> > > F=:(<"2)|:"2(8,3,N)$,E
> > > erase names<'W Y C G M R B V'
> > > (W`Y`C`G`M`R`B`V)=:(i.8){F
> > > V=:((N^2),3)$0
> > > BAC=:((N^2),3)$,M<."1/Y
> > > LEF=:((N^2),3)$,M<."1/C
> > > TOP=:((N^2),3)$,C<."1/Y
> > > RIG=:((N^2),3)$,R+"1/G
> > > FACE=:((N^2),3)$,G+"1/B
> > > BASE=:((N^2),3)$,R+"1/B
> > > PALS=:V,BAC,LEF,TOP,FACE,RIG,BASE
> > > erase names 'H,I,J'
> > > (H`I`J)=:R=:' ';'|. ';'|:|.'
> > > PAT=:12 4$H,I,H,J,H,H,H,H,J,H,I,H
> > > K=:(N^2)*0 1 0 2 3 0 0 4 5 0 6 0
> > > L=:K+"0>12#<i.N,N
> > > O=:PAT,"1 (":,.i.12),"1'{L'
> > > ALL=:,./;"1|:4 3$<"2 ".":"1 O
> > > PALS viewmat ALL
> > >
> > > Linda
> > >
> > >
> > >
> > >
> > >
> > > --Original Message-----
> > > From: [email protected]
> > > [mailto:[email protected]] On Behalf Of bill lam
> > > Sent: Thursday, September 10, 2015 7:00 PM
> > > To: [email protected]
> > > Subject: Re: [Jbeta] jandroid
> > >
> > > |open quote
> > > | O=:PAT,"1 (":,.i.12),"1'{L
> > > | ^
> > >
> > > I don't think the script will run on any version of J.
> > > ------------------------------------------------------------------
> > > ---- For information about J forums see
> > > http://www.jsoftware.com/forums.htm
> > >
> > > ------------------------------------------------------------------
> > > ---- For information about J forums see
> > > http://www.jsoftware.com/forums.htm
> > >
> > --------------------------------------------------------------------
> > -- For information about J forums see
> > http://www.jsoftware.com/forums.htm
> >
> > --------------------------------------------------------------------
> > -- For information about J forums see
> > http://www.jsoftware.com/forums.htm
>
> --
> regards,
> ====================================================
> GPG key 1024D/4434BAB3 2008-08-24
> gpg --keyserver subkeys.pgp.net --recv-keys 4434BAB3 gpg --keyserver
> subkeys.pgp.net --armor --export 4434BAB3
>
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
