From 7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 Mon Sep 17 00:00:00 2001
From: prashantsinalkar
Date: Tue, 10 Oct 2017 12:27:19 +0530
Subject: initial commit / add all books

---
 147/CH4/EX4.14/Example4_14.sce | 19 +++++++++++++++++++
 1 file changed, 19 insertions(+)
 create mode 100644 147/CH4/EX4.14/Example4_14.sce

(limited to '147/CH4/EX4.14/Example4_14.sce')

diff --git a/147/CH4/EX4.14/Example4_14.sce b/147/CH4/EX4.14/Example4_14.sce
new file mode 100644
index 000000000..4bb3962a5
--- /dev/null
+++ b/147/CH4/EX4.14/Example4_14.sce
@@ -0,0 +1,19 @@
+//Resistance R, Source Voltage before opening the switch V,Inductance L
+R1 = 6;//ohm
+R2 = 3;
+R3 =  10;
+L = 0.1;//H
+V = 36;//V
+//For t<0
+Req = R1*R2/(R1+R2)+R3;
+I = V/Req;
+//Current through inductor 'Io'
+Io = R1/(R1+R2)*I;
+//For t>0
+R = R1+R2;
+Vo = R*Io/L;
+//Time constant 'tc'
+tc = R/L;
+//Maximum voltage across R1 'Vo1'
+Vo1 = R1/(R1+R2)*Vo;
+mprintf('Voltage across 6ohm resistance = %0.0fe^(-%0.0ft)',Vo1,tc);
\ No newline at end of file
-- 
cgit