summaryrefslogtreecommitdiff
path: root/1430/CH8/EX8.4/exa8_4.sce
diff options
context:
space:
mode:
Diffstat (limited to '1430/CH8/EX8.4/exa8_4.sce')
-rw-r--r--1430/CH8/EX8.4/exa8_4.sce17
1 files changed, 17 insertions, 0 deletions
diff --git a/1430/CH8/EX8.4/exa8_4.sce b/1430/CH8/EX8.4/exa8_4.sce
new file mode 100644
index 000000000..351c7e6da
--- /dev/null
+++ b/1430/CH8/EX8.4/exa8_4.sce
@@ -0,0 +1,17 @@
+// Example 8.4
+// Impedance Matching with a Transformer
+omega=10^5;
+R_L=500 ;
+I_s_m=100*10^-3;
+Z_s=(400*(-%i*200))/(400-%i*200); // from figure 8.10(a)
+V_s_m=abs(Z_s)*I_s_m;
+// From figure 8.10(b),load impedance referred to the primary
+// Turn ratio
+N=sqrt(500/80); // from condition of impedance matching
+L=(160*N^2)/omega;// from condition of impedance matching
+P_max=(V_s_m/sqrt(2))^2/(4*real(Z_s));
+// Load reactance will be
+X_L=%i*omega*L;
+disp(X_L,"Load reactance for maximum power transfer(Ohms)=")
+disp(N,"Turn ratio for maximum power transfer=")
+disp(P_max,"Maximum power transferred(Watts)=")