Modelluntersuchungen betreffend die Stabilität - Institut für ...
Modelluntersuchungen betreffend die Stabilität - Institut für ...
Modelluntersuchungen betreffend die Stabilität - Institut für ...
Sie wollen auch ein ePaper? Erhöhen Sie die Reichweite Ihrer Titel.
YUMPU macht aus Druck-PDFs automatisch weboptimierte ePaper, die Google liebt.
Anhang<br />
psi12=angle(z12)<br />
psi21=angle(z21)<br />
psi22=angle(z22)<br />
% Berechnung der Komplementärwinkel<br />
a11=(pi/2) - psi11<br />
a12=(pi/2) - psi12<br />
a21=(pi/2) - psi21<br />
a22=(pi/2) - psi22<br />
% Umrechnung rad-grad<br />
a11g=a11 * 360 / (2*pi)<br />
a12g=a12 * 360 / (2*pi)<br />
a21g=a21 * 360 / (2*pi)<br />
a22g=a22 * 360 / (2*pi)<br />
% Berechnung des Betrages der komplexen Impedanzen<br />
z11abs=abs(z11)<br />
z22abs=abs(z22)<br />
z12abs=abs(z12)<br />
% Berechnung der Faktoren A1,A2,B zur Berechnung der Leistungen<br />
A1=(u1*u1*sin(a11)) / z11abs<br />
A2=(u2*u2*sin(a22)) / z22abs<br />
B=(u1*u2) / z12abs<br />
% Laufvariable des Polradwinkels<br />
thetag= 0 : 5 : 180<br />
thetar=thetag*pi/180;<br />
% Berechnung der Leistungen<br />
P1ges=3* ( A1 + (B*sin(thetar-a12)))<br />
P2ges=3* (-A2 + (B*sin(thetar+a12)))<br />
% Achsenbeschriftung und Plotkonfiguration<br />
plot(thetag,P1ges,'-',thetag,P2ges,'--')<br />
grid on<br />
legend('In <strong>die</strong> Leitung hineingeschickte Leistung P1','Aus der Leitung herauskommende Leistung P2')<br />
xlabel('Theta [°] (Winkel zwischen Polradspannung Ep und Netzspannung U2)')<br />
ylabel('Wirkleistung [W]')<br />
title('Übertragene Leistung als Fkt. des Polradwinkels')<br />
% Maximalwert der übertagbaren Leistung<br />
% p2max=max(P2ges);<br />
p2max=3*(-A2+B);<br />
P2MAX=p2max;<br />
% Anzeigen der berechneten Werte am Bildschirm (Ep)<br />
Teilung=p2max/10;<br />
[a,erromsg]=sprintf('%5.2f',u1)<br />
U1='Ep=';<br />
V=' V';<br />
k=strcat(U1,a,V);<br />
text(60, Teilung*7,k)<br />
% Anzeigen der berechneten Werte am Bildschirm (U2)<br />
[u,erromsg]=sprintf('%5.2f',u2)<br />
U2='U2=';<br />
V=' V';<br />
k=strcat(U2,u,V);<br />
text(60, Teilung*6,k)<br />
% Anzeigen der berechneten Werte am Bildschirm (Länge)<br />
Teilung=p2max/10;<br />
[s,erromsg]=sprintf('%5.2f',X)<br />
L='Länge=';<br />
KM=' km';<br />
k=strcat(L,s,KM);<br />
text(60, Teilung*5,k)<br />
% Anzeigen der berechneten Werte am Bildschirm (Cbh)<br />
[d,erromsg]=sprintf('%5.9f',cbh)<br />
CBH='Cbh=';<br />
F=' F';<br />
k=strcat(CBH,d,F);<br />
text(60, Teilung*4,k)<br />
% Anzeigen der berechneten Werte am Bildschirm (RL)<br />
[f,erromsg]=sprintf('%5.2f',RL)<br />
RL='RL=';<br />
O=' Ohm';<br />
k=strcat(RL,f,O);<br />
Diplomarbeit<br />
90