2 files changed, 24 insertions, 0 deletions
diff --git a/3850/CH38/EX38.3/Ex38_3.sce b/3850/CH38/EX38.3/Ex38_3.sce
new file mode 100644
index 000000000..fd3b9860d
--- /dev/null
+++ b/3850/CH38/EX38.3/Ex38_3.sce
@@ -0,0 +1,22 @@
+
+//To Calculate the Self Inductance of Coil
+
+//Example 38.3
+
+clear;
+
+clc;
+
+If=-5.0;//Final Current flowing through coil in opposite direction in Amperes
+
+Ii=5.0;//Initial Current flowing through coil in Amperes
+
+t=0.20;//Time Required for current to Change from -5 A to 5 A in seconds
+
+di=(If-Ii)/t;//Change in Current through the coil in Amperes
+
+E=0.2;//Average Induced EMF in Volts
+
+L=-E/di;//Self Inductance of the Coil
+
+printf("Self Inductance of the coil (L) = %.1f mH",L*10^3);
diff --git a/3850/CH38/EX38.3/Ex38_3.txt b/3850/CH38/EX38.3/Ex38_3.txt
new file mode 100644
index 000000000..f4f42c59f
--- /dev/null
+++ b/3850/CH38/EX38.3/Ex38_3.txt
@@ -0,0 +1,2 @@
+
+ Self Inductance of the coil(L) = 4.0 mH
+\ No newline at end of file