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

---
 2231/CH1/EX1.28/Ex_1_28.sce | 29 +++++++++++++++++++++++++++++
 1 file changed, 29 insertions(+)
 create mode 100755 2231/CH1/EX1.28/Ex_1_28.sce

(limited to '2231/CH1/EX1.28/Ex_1_28.sce')

diff --git a/2231/CH1/EX1.28/Ex_1_28.sce b/2231/CH1/EX1.28/Ex_1_28.sce
new file mode 100755
index 000000000..dc347bfd1
--- /dev/null
+++ b/2231/CH1/EX1.28/Ex_1_28.sce
@@ -0,0 +1,29 @@
+//Example 1_28
+clc;
+clear;close;
+
+//Given data: 
+V=32;//V
+Eta=0.63;
+Ip=10*10^-6;//A
+Vv=3.5;//V
+Iv=10*10^-3;//A
+Vf=0.5;//V
+f=50;//Hz
+tau=50*10^-3;//s
+T=1/f//s
+Vp=Eta*V+Vf;//V
+C=0.4*10^-6;//F//assumed
+disp(C*10^6,"Suitable value of C in micro F ")
+//V-Ip*R>Vp
+R_upper=(V-Vp)/Ip;//ohm
+//V-Iv*R<Vv
+R_lower=(V-Vv)/Iv;//ohm
+disp("Value of R should be lie between "+string(R_lower)+" ohm to "+string(R_upper)+" ohm")
+R=T/C/log(1/(1-Eta));//ohm
+disp(R,"Suitale value of R in ohm ");
+R4=tau/C;//ohm
+disp(R4,"Suitale value of R4 in ohm ");
+R3=10^4/Eta/V;//ohm
+disp(R3,"Suitale value of R3 in ohm ");
+//Answer for R4 is wrong in the book
-- 
cgit