function rayadorecinf(a) xi=0; yi=-180; %cte xf=0.02; yf=-150; %cte for rayas=1:20 x=[xi xf]; y=[yi yf]; hold on plot(x,y,'r') hold off xi=xi+0.05; xf=xf+0.05; end %x=[0 0.1]; %y=[-165 -150]; %hold on % plot(x,y,'r') %hold off %x1=[0.9 1.0]; %y1=[-180 -165]; %hold on % plot(x1,y1,'r') %hold off