%% Machine synchrone connectée au réseau

% Max Chevron et André Hodder - v08.mlx
close all; clear; clc
lim = 3;
myLineWidth = 2;

%% Préambule
% Comprendre/Observer la relation entre le contrôle du couple et du courant d'excitation sur le transfert de puissance active et réactive avec le réseau.
%
%% Exercice
%
% Equations de base:
% \underline{U} = jX_{d}\underline{I} + \underline{U_{i}}
% U_{i} = k_{If}I
% _f\Omega
% T_{em} = 3\frac{UU_{i}}{2\pi n_{s}X_d}\sin\delta
% P_{em}=\Omega T_ {em} = 3UIcos\phi=P
% Q = 3UIsin\phi
% Paramètres:

% Réseau
fres = 50;      %[Hz]
Ures = 230;     %[V]

% Machine Synchrone :
p = 2;          % [-] Nombre de paire de poles
Un = Ures;      % [V] Tension nominale statorique
In =  3.5;      % [A] Courant statorique nominal
Ifn = 4.5;      % [A] Courant d'excitation nominal
Xd = 98.6;      % [Ohm] Réactance statorique

% Courant d'éxcitation à vide
If0 = 2.0;        % [A] Courant d'excitation pour garantir la tension U_n

%
% Question
% A l'aide des sliders, observer l'échange de puissance active et réactive avec le réseau pour un couple pouvant varier de + ou - 15 Nm et un courant d'excitation pouvant aller jusqu'à 4.5 A.
% Représenter le point de fonctionnement graphiquement en mettant la puissance réactive (Q) sur l'axe X et la puissance active (P) sur l'axe Y.

% Sliders
Tem = -8
If  = 1.8


% % Visualisation
% figure
% plot(Q/1e3,P/1e3,'*');
% xlabel('Q [kVAr]');
% ylabel('P [kW]');
% grid on
% axis equal
% lim = 3;
% xlim([-lim lim]); ylim([-lim lim]);
% line([-lim lim],[0 0],'Color','black')
% line([0 0],[-lim lim],'Color','black') 