1 files changed, 16 insertions, 0 deletions
diff --git a/215/CH14/EX14.7/ex14_7.sce b/215/CH14/EX14.7/ex14_7.sce
new file mode 100755
index 000000000..1d507103c
--- /dev/null
+++ b/215/CH14/EX14.7/ex14_7.sce
@@ -0,0 +1,16 @@
+clc
+//Example 14.7
+//Install Symbolic toolbox
+//Find the current through 5 ohm resistor
+syms s
+s=%s
+//From figure 14.3
+//Writing the KVL equation and taking the Laplace transform
+I=1.5/(s*(s+2))+5/(s+2)
+I1=1.5/(s*(s+2))
+I2=5/(s+2)
+I1p=pfss(I1)
+i1=ilaplace(I1p(1))
+i2=ilaplace(I1p(2)+I2)
+i=i1+i2
+disp(i,'i(t)=')
+\ No newline at end of file