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

---
 1319/CH1/EX1.21/1_21.sce | 21 +++++++++++++++++++++
 1 file changed, 21 insertions(+)
 create mode 100644 1319/CH1/EX1.21/1_21.sce

(limited to '1319/CH1/EX1.21')

diff --git a/1319/CH1/EX1.21/1_21.sce b/1319/CH1/EX1.21/1_21.sce
new file mode 100644
index 000000000..242ece728
--- /dev/null
+++ b/1319/CH1/EX1.21/1_21.sce
@@ -0,0 +1,21 @@
+// To determine Rl for which resonance can take place
+
+clc;
+clear;
+
+Rl=poly(0,'Rl');
+Rc=5;
+Xc=6;
+Xl=15;
+
+x=(((Rl^2)+(Xl^2))*Xc)-(((Rc^2)+(Xc^2))*Xl);
+
+Rl=roots(x);
+
+disp(x)
+
+printf('The above eqaution must be eqauted to zero to get Rl \n')
+
+disp(Rl)
+
+printf('The above eqaution leads to imaginary roots which is not possible, hence no value of Rl can bring resonance in the circuit at the given condition \n' )
-- 
cgit