senales4.m

This file is used to develop Phase locked loop.

function [y]=senales3(vector)

% ARMONICOS EN LA TENSION DE RED

t=vector(1); % tiempo

% Datos de las senales
Vllrmsa1=400;
Vllrmsb1=400;
Vllrmsc1=400;
f1=50;
phasea1=0;
phaseb1=-120*pi/180;
phasec1=120*pi/180;

y1(1)=Vllrmsa1*sqrt(2/3)*sin(2*pi*f1*t+phasea1);
y1(2)=Vllrmsb1*sqrt(2/3)*sin(2*pi*f1*t+phaseb1);
y1(3)=Vllrmsc1*sqrt(2/3)*sin(2*pi*f1*t+phasec1); 

y5(1)=(Vllrmsa1/15)*sqrt(2/3)*sin(5*(2*pi*f1*t+phasea1));
y5(2)=(Vllrmsb1/15)*sqrt(2/3)*sin(5*(2*pi*f1*t+phaseb1));
y5(3)=(Vllrmsc1/15)*sqrt(2/3)*sin(5*(2*pi*f1*t+phasec1)); 

y7(1)=(Vllrmsa1/17)*sqrt(2/3)*sin(7*(2*pi*f1*t+phasea1));
y7(2)=(Vllrmsb1/17)*sqrt(2/3)*sin(7*(2*pi*f1*t+phaseb1));
y7(3)=(Vllrmsc1/17)*sqrt(2/3)*sin(7*(2*pi*f1*t+phasec1)); 

% y11(1)=(Vllrmsa1/20)*sqrt(2/3)*sin(11*(2*pi*f1*t+phasea1));
% y11(2)=(Vllrmsb1/20)*sqrt(2/3)*sin(11*(2*pi*f1*t+phaseb1));
% y11(3)=(Vllrmsc1/20)*sqrt(2/3)*sin(11*(2*pi*f1*t+phasec1)); 
y11(1)=0;
y11(2)=0;
y11(3)=0; 

% y13(1)=(Vllrmsa1/22)*sqrt(2/3)*sin(13*(2*pi*f1*t+phasea1));
% y13(2)=(Vllrmsb1/22)*sqrt(2/3)*sin(13*(2*pi*f1*t+phaseb1));
% y13(3)=(Vllrmsc1/22)*sqrt(2/3)*sin(13*(2*pi*f1*t+phasec1)); 
y13(1)=0;
y13(2)=0;
y13(3)=0; 

y(1)=y1(1)+y5(1)+y7(1)+y11(1)+y13(1);
y(2)=y1(2)+y5(2)+y7(2)+y11(2)+y13(2);
y(3)=y1(3)+y5(3)+y7(3)+y11(3)+y13(3);