changeset 198:0b187d845491

Simplify
author Chris Cannam
date Mon, 06 May 2013 16:53:49 +0100
parents 9d4893157334
children 054855112a1c
files yetilab/block/complex.yeti yetilab/matrix/matrix.yeti yetilab/stream/filter.yeti yetilab/stream/syntheticstream.yeti
diffstat 4 files changed, 1 insertions(+), 38 deletions(-) [+]
line wrap: on
line diff
--- a/yetilab/block/complex.yeti	Mon May 06 16:50:52 2013 +0100
+++ b/yetilab/block/complex.yeti	Mon May 06 16:53:49 2013 +0100
@@ -74,17 +74,6 @@
     bl.fromList (map angle cc);
 
 {
-   real,
-   imaginary,
-   complex,
-   magnitude,
-   angle,
-   add,
-   scale,
-   zeros,
-   magnitudes,
-   angles,
-} as {
    real is cplx -> number,
    imaginary is cplx -> number,
    complex is number -> number -> cplx,
--- a/yetilab/matrix/matrix.yeti	Mon May 06 16:50:52 2013 +0100
+++ b/yetilab/matrix/matrix.yeti	Mon May 06 16:53:49 2013 +0100
@@ -237,21 +237,6 @@
     fi;
 
 {
-    generate,
-    constMatrix, randomMatrix, zeroMatrix, identityMatrix, zeroSizeMatrix,
-    width, height,
-    equal,
-    copyOf,
-    transposed,
-    flipped, toRowMajor, toColumnMajor,
-    scaled,
-    resizedTo,
-    asRows, asColumns,
-    sum = sum', product,
-    concat,
-    rowSlice, columnSlice,
-    newMatrix, newRowVector, newColumnVector,
-} as {
     generate is (number -> number -> number) -> { .rows is number, .columns is number } -> matrix,
     constMatrix is number -> { .rows is number, .columns is number } -> matrix,
     randomMatrix is { .rows is number, .columns is number } -> matrix,
@@ -270,7 +255,7 @@
     resizedTo is { .rows is number, .columns is number } -> matrix -> matrix,
     asRows is matrix -> list<block>, 
     asColumns is matrix -> list<block>,
-    sum is matrix -> matrix -> matrix,
+    sum is matrix -> matrix -> matrix = sum',
     product is matrix -> matrix -> matrix,
     concat is (Horizontal () | Vertical ()) -> list<matrix> -> matrix,
     rowSlice is number -> number -> matrix -> matrix, 
--- a/yetilab/stream/filter.yeti	Mon May 06 16:50:52 2013 +0100
+++ b/yetilab/stream/filter.yeti	Mon May 06 16:53:49 2013 +0100
@@ -149,11 +149,6 @@
     fi;
 
 {
-    withDuration, 
-    delayedBy,
-    multiplexed,
-    repeated,
-} as {
     withDuration is number -> stream -> stream,
     delayedBy is number -> stream -> stream,
     multiplexed is list<stream> -> stream,
--- a/yetilab/stream/syntheticstream.yeti	Mon May 06 16:50:52 2013 +0100
+++ b/yetilab/stream/syntheticstream.yeti	Mon May 06 16:53:49 2013 +0100
@@ -54,12 +54,6 @@
     });
 
 {
-    generated, 
-    precalculated, 
-    sinusoid, 
-    whiteNoise, 
-    silent,
-} as {
     generated is number -> (number -> number) -> stream, 
     precalculated is number -> block -> stream,
     sinusoid is number -> number -> stream,