macros/boxcar.sci


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16

function w = boxcar (m)

 funcprot(0);
    rhs= argn(2);

  if (rhs ~= 1)
     error("Wrong Number of input arguments");
  end

  if (~ (isscalar (m) & (m == fix (m)) & (m > 0)))
    error ("boxcar: M must be a positive integer");
  end

  w=ones(m,1);

endfunction