From 8ac15bc5efafa2afc053c293152605b0e6ae60ff Mon Sep 17 00:00:00 2001
From: Siddharth Agarwal
Date: Tue, 3 Sep 2019 18:27:40 +0530
Subject: Xcos examples from textbooks and for blocks

---
 Working_Examples/215/CH16/EX16.13/ex16_13.sce | 26 ++++++++++++++++++++++++++
 1 file changed, 26 insertions(+)
 create mode 100755 Working_Examples/215/CH16/EX16.13/ex16_13.sce

(limited to 'Working_Examples/215/CH16/EX16.13')

diff --git a/Working_Examples/215/CH16/EX16.13/ex16_13.sce b/Working_Examples/215/CH16/EX16.13/ex16_13.sce
new file mode 100755
index 0000000..a46d15d
--- /dev/null
+++ b/Working_Examples/215/CH16/EX16.13/ex16_13.sce
@@ -0,0 +1,26 @@
+clc
+//Example 16.13
+disp('Given')
+disp('Voltage gain = 40dB and cutoff frequency = 10k Hz')
+Av_dB=40
+Av=10^(Av_dB/20)
+f=10*10^3
+B=2*%pi*f
+//From figure 16.41(a)
+disp('1+Rf/R1=100(Gain)')
+//From figure 16.41(b)
+//The transfer function is 
+disp('V+= Vi*(1/sC)/(1+1/sC)')
+//Combining two transfer functions
+disp('V0 = Vi*(1/sC)/(1+1/sC)*(1+Rf/R1)')
+//The maximum value of the combined transfer function is
+disp('Maximum value is V0 = Vi*(1+Rf/R1)')
+disp('Let R1=1k ohm')
+R1=10^3
+Rf=(Av-1)*R1
+printf("Rf= %d kohm \n",Rf*10^-3);
+disp('C=1 uF')
+C=10^-6
+//B=1/(R2*C)
+R2=1/(C*B)
+printf("R2= %3.2f ohm \n",R2);
\ No newline at end of file
-- 
cgit