1 files changed, 17 insertions, 0 deletions
diff --git a/3754/CH31/EX31.4/31_4.sce b/3754/CH31/EX31.4/31_4.sce
new file mode 100644
index 000000000..8a428c906
--- /dev/null
+++ b/3754/CH31/EX31.4/31_4.sce
@@ -0,0 +1,17 @@
+clear//
+
+//Variables
+
+L1 = 1000.0 * 10**-6                  //Inductance1 (in Henry)
+L2 = 100.0 * 10**-6                   //Inductance2 (in Henry)
+M = 20.0 * 10**-6                     //Mutual Inductance (in Henry)
+C = 20.0 * 10**-12                    //Capacitance (in Farad)                      
+
+//Calculation
+
+L = L1 + L2 + 2 * M                  //Net inductance (in Henry)
+fo = 1/(2*%pi*(L * C)**0.5)      //Frequency of oscillations (in Hertz)
+
+//Result
+
+printf("\n Frequency of oscillations is  %0.3f ",fo*10**-6)