May

        compareApprox epsilon (vec.list (mat.getRow 0 (str.read 11))) [ 0.5, 0, 0, 0, 0.5, 0, 0, 0, 0.5, 0, 0 ] and

        compare str.position 11

),

"impulseTrain-bandlimited": \(

    // 3 pulses a second sampled 10 times a second

    str = wav.impulseTrain 100 3;

    x = mat.getRow 0 (str.read 200);

false; //!!! todo

/*

    compare str.position 0 and

        compare str.channels 1 and

            [ 0.5, 0, 0, 0, 0.5, 0, 0, 0, 0.5, 0, 0, 0, 0.5, 0 ] and

        compare str.position 14

*/

"cycleLengthFor": \(

    compare (wav.cycleLengthFor 48000 1000) 48 and