summaryrefslogtreecommitdiff
path: root/1430/CH11/EX11.5
diff options
context:
space:
mode:
authorprashantsinalkar2017-10-10 12:27:19 +0530
committerprashantsinalkar2017-10-10 12:27:19 +0530
commit7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch)
treedbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /1430/CH11/EX11.5
parentb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (diff)
downloadScilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.gz
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.bz2
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.zip
initial commit / add all books
Diffstat (limited to '1430/CH11/EX11.5')
-rw-r--r--1430/CH11/EX11.5/exa11_5.jpgbin0 -> 191998 bytes
-rw-r--r--1430/CH11/EX11.5/exa11_5.sce36
-rw-r--r--1430/CH11/EX11.5/exa11_5.txt7
3 files changed, 43 insertions, 0 deletions
diff --git a/1430/CH11/EX11.5/exa11_5.jpg b/1430/CH11/EX11.5/exa11_5.jpg
new file mode 100644
index 000000000..87d1e8f24
--- /dev/null
+++ b/1430/CH11/EX11.5/exa11_5.jpg
Binary files differ
diff --git a/1430/CH11/EX11.5/exa11_5.sce b/1430/CH11/EX11.5/exa11_5.sce
new file mode 100644
index 000000000..3de7387c9
--- /dev/null
+++ b/1430/CH11/EX11.5/exa11_5.sce
@@ -0,0 +1,36 @@
+// Example 11.5
+// Design of a Lowpass Filter
+f_co=4000; // In Hertz
+R_L=200;
+R_s=50;
+// Using node equation in figure 11.10
+// (1/R_s+1/R_L+s*C)*V_out=(1/R_s)*V_s;
+// V_out/V_s=H(s)=(K*omega_co)/(s+omega_co)---equation (1)
+// Comparing equation (1) with low pass filter equation we get,
+K=(1/R_s)/(1/R_s+1/R_L);
+omega_co=2*%pi*f_co;
+C=1/(omega_co*(1/R_s+1/R_L));
+R_eq=(R_s*R_L)/(R_s+R_L);
+tau=R_eq*C;
+// design testing
+// Model for voice signal is 3kHz sinusoid with V_m=5V
+// so total input signal will become
+// v_s(t)=5*cos(omega1*t)+0.5*cos(omega2*t)
+omega1=2*%pi*3000;
+omega2=2*%pi*16000;
+// using equation for Low pass filter we get
+H_omega1=(K*omega_co)/(%i*omega1+omega_co);
+H_omega2=(K*omega_co)/(%i*omega2+omega_co);
+a_omega1=abs(H_omega1);
+theta1_r=atan(imag(H_omega1),real(H_omega1));
+a_omega2=abs(H_omega2);
+theta2_r=atan(imag(H_omega2),real(H_omega2));
+t=0:0.0001:0.01;
+v_out=a_omega1*5*cos(omega1*t+theta1_r)+a_omega2*0.5*cos(omega2*t+theta2_r);
+v_s=5*cos(omega1*t)+0.5*cos(omega2*t)
+plot(t,v_out,t,v_s,'-g')
+xlabel('t')
+ylabel('v_out(t)')
+title('Voltage Waveform')
+h1=legend(['v_out';'v_s'])
+disp("waveform Shows that whistle amplitude has been cut down to 3% of the voice signal at the input")
diff --git a/1430/CH11/EX11.5/exa11_5.txt b/1430/CH11/EX11.5/exa11_5.txt
new file mode 100644
index 000000000..170746317
--- /dev/null
+++ b/1430/CH11/EX11.5/exa11_5.txt
@@ -0,0 +1,7 @@
+
+ -->exec('C:\Users\sangeet\Documents\Scilab\Circuits\Chapter 11\exa11_5.sce', -1)
+
+ waveform Shows that whistle amplitude has been cut down to 3% of the voice signal at the in
+ put
+
+