Mercurial > hg > jgplsrc

annotate test/g200m.ijs @ 0:e0bbaa717f41 draft default tip

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
lol J
author Jordi Gutiérrez Hermoso <jordigh@octave.org>
date Mon, 25 Nov 2013 11:56:30 -0500
parents
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
0
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
1 NB. m&|@^ ---------------------------------------------------------------
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
2
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
3 f=: |`^/
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
4 g=: 3 : 0
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
5 'm x y'=.y
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
6 x m&|@^ y
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
7 )
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
8
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
9 (f -: g) 1e3 2 24
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
10 (f -: g) 1e3 _2 24
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
11 (f -: g) _1e3 2 24
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
12 (f -: g) _1e3 _2 24
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
13
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
14 (f -: g) 1e3 2 0
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
15 (f -: g) 1e3 _2 0
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
16 (f -: g) _1e3 2 0
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
17 (f -: g) _1e3 _2 0
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
18
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
19 (f -: g) 1e3 2 _5
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
20 (f -: g) 1e3 _2 _5
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
21 (f -: g) _1e3 2 _5
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
22 (f -: g) _1e3 _2 _5
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
23
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
24 (f -: g) x: 1e6 2 500
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
25 (f -: g) x: 1e6 _2 500
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
26 (f -: g) x: _1e6 2 500
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
27 (f -: g) x: _1e6 _2 500
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
28
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
29 1r4 -: 2 (1e6&|@^) _2x
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
30 125 625 1r25 -: 5 (1e6&|@^) 3 4 _2x
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
31
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
32 4!:55 ;:'f g'
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
33
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
34