summaryrefslogtreecommitdiff
path: root/991/CH14/EX14.4/Example14_4.sce
blob: 5ef56c0590c50542948d606e65e2c6c987f90581 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
//Example 14.4.
clc
format(6)
A=400
f1=50
f2=200*10^3
D=10
beta=0.01
disp("The voltage gain with feedback")
Af=A/(1+(A*beta))
disp(Af,"  Af = A / (1 + A*beta) =")
disp("New lower 3dB frequency,")
f1f=f1/(1+(A*beta))
disp(f1f,"  f_1f(Hz) = f1 / 1+A*beta =")
disp("New upper 3dB frequency,")
f2f=(1+(A*beta))*f2
x2=f2f*10^-6
disp(x2,"  f2f(MHz) = (1+A*beta)*f2 =")
disp("Distortion with feedback,")
Df=D/(1+(A*beta))
disp(Df,"  Df (in %) = D / 1+A*beta =")