From b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b Mon Sep 17 00:00:00 2001
From: priyanka
Date: Wed, 24 Jun 2015 15:03:17 +0530
Subject: initial commit / add all books

---
 1964/CH4/EX4.17/ex4_17.sce | 23 +++++++++++++++++++++++
 1 file changed, 23 insertions(+)
 create mode 100755 1964/CH4/EX4.17/ex4_17.sce

(limited to '1964/CH4/EX4.17')

diff --git a/1964/CH4/EX4.17/ex4_17.sce b/1964/CH4/EX4.17/ex4_17.sce
new file mode 100755
index 000000000..f780eeb37
--- /dev/null
+++ b/1964/CH4/EX4.17/ex4_17.sce
@@ -0,0 +1,23 @@
+//Chapter-4, Example 4.17, Page 145
+//=============================================================================
+clc
+clear
+//CALCULATIONS
+L=0.225;//inductance in henry
+e=120;//voltage in volts
+f=50;//frequency in c/s
+Xl=(2*%pi*f*L);//inductive reactance in ohms
+mprintf("Inductive reactance in ohms is %2.2f ohms\n",Xl);
+L=0.2;//inductance in henry
+Im=2.4;//peak value of current in A
+//instantaneous voltage equation is e=(sqrt(2)*120*sin(314*t))
+// indefinitely integrating e and later dividing by L we get it as
+//i=-2.4*cos(314t);//instantaneous current in A
+I=Im/(sqrt(2));//in A
+mprintf("Current is %1.3f A\n",I);
+m=(e*sqrt(2)*Im)/2;//maximum power delivered in watts
+mprintf("Maximum power delivered to inductor is %3.2f watts\n",m);
+mprintf("average power is zero\n")
+mprintf("equation for voltage and current are 169.68*sin(314*t) and -2.4*cos(314*t) respectively");
+//note:We cannot compute symbolic or indefinite integration in scilab.In order to verify your results use wxmaxima software.
+//=================================END OF PROGRAM==============================
-- 
cgit