%Rabuck1- Este es un programa auxiliar para el 
%primer ciclo del PWM  del  convertidor  Buck.
%Es  llamado  por  los  programas   buckp.m,


function zp=buck1(tpri,z);
global R L E ru i eta Mu xd j Mua
ru(i)=E*(rand-0.5)*eta;
zp=-R/L*z+sign(Mua)*E/L+ru(i)/L;


