Chris@1: module matrix;
Chris@1: 
Chris@1: zeros n =
Chris@1:     map \0 [1..n];
Chris@1: 
Chris@1: matrix rows cols = 
Chris@1:     array (map \(new double[cols]) [1..rows]);
Chris@1: 
Chris@1: { matrix }
Chris@1: