/* Declare an array, subscripts run from 0 to max value */
array(a, flonum, 20, 20, 3)$

arrayinfo(a);
/* [complete, 3, [20, 20, 3]] */

a[0, 0]: 1.0;

listarray(a);
/* [1.0, 0.0, 0.0, ..., 0.0] */

/* Show all declared arrays */
arrays;
/* [a] */


/* One may also use an array without declaring it, it's a hashed array */
b[1]: 1000;
b['x]: 3/4; /* hashed array may have any subscript */

arrayinfo(b);
/* [hashed, 1, [1], [x]] */

listarray(b);
/* [1000, 3/4] */