summaryrefslogtreecommitdiff
path: root/Working_Examples/215/CH16/EX16.5/ex16_5.sce
diff options
context:
space:
mode:
Diffstat (limited to 'Working_Examples/215/CH16/EX16.5/ex16_5.sce')
-rwxr-xr-xWorking_Examples/215/CH16/EX16.5/ex16_5.sce13
1 files changed, 13 insertions, 0 deletions
diff --git a/Working_Examples/215/CH16/EX16.5/ex16_5.sce b/Working_Examples/215/CH16/EX16.5/ex16_5.sce
new file mode 100755
index 0000000..b3b172d
--- /dev/null
+++ b/Working_Examples/215/CH16/EX16.5/ex16_5.sce
@@ -0,0 +1,13 @@
+clc
+//Example 16.5
+disp('Given')
+disp('R=5 ohm L=100mH w=100 rad/s')
+Rs=5; Ls=100*10^-3 ;w=100;
+//Let Xs be the capacitive and inductive reactance
+Xs=w*Ls
+Q=Xs/Rs
+//As Q is greater than 5 we can approximate as
+Rp=Q^2*Rs
+Lp=Ls
+printf("The parallel equivalent is \n");
+printf("Rp= %d ohm \t Lp=%d mH",Rp,Lp*10^3); \ No newline at end of file