{[ promptMessage ]}

Bookmark it

{[ promptMessage ]}

EE_365_200708FA_homework_10_problem_01_solution

EE_365_200708FA_homework_10_problem_01_solution - 10:46 AM...

Info iconThis preview shows pages 1–3. Sign up to view the full content.

View Full Document Right Arrow Icon
12/5/07 10:46 AM C:\Documents and Settings\Jeff Mayer\My ...\im_characteristics.m 1 of 3 1 %: im_characteristics.m 2 3 %========================================================================== 4 % Compute and plot the Te-, PM-, PE-, QE-, pf-, and eta-wr characteristics 5 % for an induction machine. 6 %========================================================================== 7 8 %========================================================================== 9 % 09-Dec-06 JSM Created. 10 % 05-Dec-07 JSM Added pf-wr characteristic. 11 %========================================================================== 12 13 pretty_plotting_16 14 15 %========================================================================== 16 %% Set essential parameter values. 17 % machine parameters 18 P = 19 20 rs = 21 xls = 22 xms = 23 xlr = 24 rr = 25 26 % operating parameters 27 Vs = 28 f = 29 30 %========================================================================== 31 %% Calculate value of derived parameters 32 we = 2*pi*f 33 34 xss = xls + xms 35 xrr = xlr + xms 36 37 n1 = 2*rr*xms 38 d0 = rr^2*(rs^2 + xss^2) 39 d1 = 2*rs*rr*xms 40 d2 = (xms^2 - xss*xrr)^2 + (rs*xrr) 41 42 %========================================================================== 43 %% Generate characteristics. 44 s = linspace(0, 1, 500) 45 46 wr = we*(1 - s) 47 48 Te = (n1*s)./(d0 + d1*s + d2*s.*s)*(Vs^2/we) 49 50 PM = Te.*wr 51 52 Zin = rs + j*xls + 1./(1/(j*xms) + 1./(rr./s + j*xlr))
Background image of page 1

Info iconThis preview has intentionally blurred sections. Sign up to view the full version.

View Full Document Right Arrow Icon
12/5/07 10:46 AM C:\Documents and Settings\Jeff Mayer\My ...\im_characteristics.m 2 of 3 53 54 SE = 2*Vs^2./conj(Zin) 55 56 %========================================================================== 57 %% Illustrate Te-wr/we characteristic. 58 figure(1) 59 clf 60 61 handle = plot(wr/we, Te) 62 set(handle, 'LineWidth', 2) 63 set(gca, AxisStyle{:}) 64 grid
Background image of page 2
Image of page 3
This is the end of the preview. Sign up to access the rest of the document.

{[ snackBarMessage ]}