Mercurial > hg > jgplsrc
annotate test/gspj.ijs @ 0:e0bbaa717f41 draft default tip
lol J
author | Jordi Gutiérrez Hermoso <jordigh@octave.org> |
---|---|
date | Mon, 25 Nov 2013 11:56:30 -0500 |
parents | |
children |
rev | line source |
---|---|
0 | 1 NB. j. ------------------------------------------------------------------ |
2 | |
3 (scheck j. $.x), (j. -: j.&.$.) x=: _10+? 405$2 | |
4 (scheck j. $.x), (j. -: j.&.$.) x=: _10+? 3 4 5$21 | |
5 (scheck j. $.x), (j. -: j.&.$.) x=: o._10+? 3 4 5$21 | |
6 (scheck j. $.x), (j. -: j.&.$.) x=:j./o._10+?2 3 4 5$21 | |
7 | |
8 0 -: 3 $. j. $. 0 1 0 | |
9 0 -: 3 $. j. $. 2 3 4 | |
10 0 -: 3 $. j. $. 2 3.4 | |
11 0 -: 3 $. j. $. 2 3j4 | |
12 | |
13 | |
14 4!:55 ;:'x' | |
15 | |
16 |