1 files changed, 18 insertions, 0 deletions
diff --git a/1994/CH7/EX7.16/Example7_16.sce b/1994/CH7/EX7.16/Example7_16.sce
new file mode 100755
index 000000000..19441424d
--- /dev/null
+++ b/1994/CH7/EX7.16/Example7_16.sce
@@ -0,0 +1,18 @@
+//Chapter-7,Example7_16,pg 7-42
+Rsh=0.02
+R=1000
+Vm=500*10^-3
+Im=Vm/R
+Ish=Vm/Rsh
+printf("shunt current\n")
+printf("Ish=%.2f A\n",Ish)
+Ish1=10
+V=Ish1*Rsh
+R=V/Im
+printf("resistance for Ish=10A\n")
+printf("R=%.2f ohm\n",R)
+Ish2=75
+V=Ish2*Rsh
+R=V/Im
+printf("resistance for Ish=75A\n")
+printf("R=%.2f ohm\n",R)