function houghDibujaRectas(P, color)
% P es una matriz P de N x 2 con los N picos de acumulación            %
%                 (rho1,tita1)                                         %
%                 (rho2,tita2)                                         %
%                       .                                              %
%                 (rhoN,titaN)                                         %
%              Un pico en la tabla en la posicion (rho,tita)           %
%              indicara que existe una recta que forma un ángulo con   %
%              la horizontal de tita-1-90 y la distancia al origen es  %
%              rho - 1                                                 %
% rho=x*cos(tita)+y*sin(tita);   Eje X es horizontal
% tita en GRADOS
% tita es el angulo que forma rho (no la recta) con el eje horizontal!!. 
% tita positivo en sentido antihorario 
% Visualizar imagen previamente y mantener con hold on
% Ejemplo:
% I=imread('caja1.bmp');
% H=hough1(I);
% P=houghPicos(H);
% imshow(I);
% hold on;
% houghDibujaRectas(P,'g');
%------------------------------------------------------------------------
[numRectas,dos]=size(P);
if numRectas==0 
    return;
end
    
for k=1:numRectas
    rho=P(k,1);
    tita=P(k,2);
    tita=tita*pi/180;  %paso a radianes
    %  rho=x*cos(tita)+y*sin(tita);
    %  x*cos(tita) + y*sin(tita) -rho = 0;
    A=cos(tita);
    B=sin(tita);
    C=-rho;
    dibujaRectaABC(A,B,C, color)
end


