From f35ea80659b6a49d1bb2ce1d7d002583f3f40947 Mon Sep 17 00:00:00 2001
From: prashantsinalkar
Date: Tue, 10 Oct 2017 12:38:01 +0530
Subject: updated the code

---
 1445/CH2/EX2.32/Ex2_32.sce | 7 +++----
 1 file changed, 3 insertions(+), 4 deletions(-)

(limited to '1445/CH2/EX2.32')

diff --git a/1445/CH2/EX2.32/Ex2_32.sce b/1445/CH2/EX2.32/Ex2_32.sce
index dcbdbaf4a..a48c72871 100644
--- a/1445/CH2/EX2.32/Ex2_32.sce
+++ b/1445/CH2/EX2.32/Ex2_32.sce
@@ -1,16 +1,15 @@
 //CHAPTER 2- STEADY-STATE ANALYSIS OF SINGLE-PHASE A.C. CIRCUIT
 //Example 32 // read it as example 31 in the book on page 2.85
 
+clc;
 disp("CHAPTER 2");
 disp("EXAMPLE 32");
 
 //VARIABLE INITIALIZATION 
 //function of the waveform is deduced to be i=Im.sinΘ
 //SOLUTION
-//Average value of current is Iav=area of rectified wave/interval
-//Can be achieved by integration
 //Iav=(1/2.π).Integral(ydΘ) from 0 to π, and π to 2.π is zero, interval is 2.π
-//need to assume values, let Im=1
+//
 //say
 Im=1;                                // in Amp
 Iav=(1/(2*%pi))*integrate('(Im*sin(th))', 'th', 0, %pi);
@@ -19,7 +18,7 @@ Iav=(1/(2*%pi))*integrate('(Im*sin(th))', 'th', 0, %pi);
 Ims=(1/(2*%pi))*integrate('(Im*sin(th))^2', 'th', 0, %pi);
 //disp(sprintf("The RMS value of waveform is %f",  sqrt(Ims)));
 ff=sqrt(Ims)/Iav;
-disp(sprintf("The form factor of waveform is %.2f",ff));
+disp(sprintf("The form factor of waveform is %f",ff));
 disp(" "); 
 // 
 //END
-- 
cgit