annotate test/gpdd.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
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. p.. y ---------------------------------------------------------------
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
2
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
3 2 6 12 -: p.. 1 2 3 4
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
4
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
5 (,0) -: p.. 3j4
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
6 (,0) -: p.. i.0
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
7 (,0) -: p.. ''
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
8
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
9 (,!6 ) -: p..^:6 ]7 $1
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
10 (,!88x) -: p..^:88 ]89$1x
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
11
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
12 ( 2&o. t. i.10x) -: p.. 1&o. t. i.11x
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
13 (-@(1&o.) t. i.10x) -: p.. 2&o. t. i.11x
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
14 ( 6&o. t. i.10x) -: p.. 5&o. t. i.11x
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
15 ( 5&o. t. i.10x) -: p.. 6&o. t. i.11x
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
16
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
17
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
18 'domain error' -: p.. etx 'abc'
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
19
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
20
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
21 NB. x p.. y -------------------------------------------------------------
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
22
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
23 (1 2 1.5,4%3) -: 1 p.. 2 3 4
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
24 (1 2 3r2 4r3) -: 1 p.. 2 3 4x
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
25
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
26 x -: ({.x) p.. p.. x=: ?10$100
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
27
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
28 (%!i.10x) -: p../10$1x
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
29
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
30
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
31 'domain error' -: 3 p.. etx 'abc'
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
32 'domain error' -: 'x' p.. etx 3 4
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
33 'domain error' -: (<4) p.. etx 3 4
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
34
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
35
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
36 4!:55 ;:'x'
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
37
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
diff changeset
38