function f = rectangular_bipolar (x,a,b,c)
  [n,m]=size(x);
  f = zeros(n,m);
  intervalo_1 = find(x>=-pi & x<0)
endfunction