% Redresseur triphasé. Jesus Morales
% ELE4801. Machines et entraînements électriques.  Hiver 2018.
close all; clear; clc

f = 60;       w = 2*pi*f;   
dt = 1e-5;    t = 0:dt:2/f;      N = length(t);

Vabc = [ cos(w*t); cos(w*t-2*pi/3); cos(w*t+2*pi/3) ];
Vcd = zeros(1,N);

for n=1:N
    [~,pos] = max(Vabc(:,n));
    [~,neg] = min(Vabc(:,n));
    
    Vcd(n) = Vabc(pos,n) - Vabc(neg,n);
end

figure; plot(t,Vabc); hold on;  grid; plot(t,Vcd); legend('Vca','Vd')