summaryrefslogtreecommitdiff
path: root/2210/CH5
diff options
context:
space:
mode:
Diffstat (limited to '2210/CH5')
-rwxr-xr-x2210/CH5/EX5.1/5_1.sce16
-rwxr-xr-x2210/CH5/EX5.10/5_10.sce26
-rwxr-xr-x2210/CH5/EX5.11/5_11.sce25
-rwxr-xr-x2210/CH5/EX5.12/5_12.sce25
-rwxr-xr-x2210/CH5/EX5.13/5_13.sce9
-rwxr-xr-x2210/CH5/EX5.14/5_14.sce16
-rwxr-xr-x2210/CH5/EX5.15/5_15.sce21
-rwxr-xr-x2210/CH5/EX5.16/5_16.sce10
-rwxr-xr-x2210/CH5/EX5.17/5_17.sce9
-rwxr-xr-x2210/CH5/EX5.18/5_18.sce9
-rwxr-xr-x2210/CH5/EX5.19/5_19.sce9
-rwxr-xr-x2210/CH5/EX5.20/5_20.sce12
-rwxr-xr-x2210/CH5/EX5.21/5_21.sce13
-rwxr-xr-x2210/CH5/EX5.22/5_22.sce21
-rwxr-xr-x2210/CH5/EX5.23/5_23.sce17
-rwxr-xr-x2210/CH5/EX5.24/5_24.sce17
-rwxr-xr-x2210/CH5/EX5.3/5_3.sce11
-rwxr-xr-x2210/CH5/EX5.4/5_4.sce22
-rwxr-xr-x2210/CH5/EX5.6/5_6.sce22
-rwxr-xr-x2210/CH5/EX5.8/5_8.sce26
20 files changed, 336 insertions, 0 deletions
diff --git a/2210/CH5/EX5.1/5_1.sce b/2210/CH5/EX5.1/5_1.sce
new file mode 100755
index 000000000..aeb560ba1
--- /dev/null
+++ b/2210/CH5/EX5.1/5_1.sce
@@ -0,0 +1,16 @@
+//Chapter 5, Problem 1
+clc
+R=3 //resistance in ohm
+L=20*10^-9 //inductance in henry
+f0=500e6 //frequency in hertz
+
+//calculation
+Z=R
+C=(1/(2*%pi*f0*sqrt(L)))^2
+Q=2*%pi*f0*L/R
+B=f0/Q
+
+printf("(a) Impedance at resonance = %d ohm\n\n",Z)
+printf("(b) Value of series capacitor = %.3f pF\n\n",C*10^12)
+printf("(c) Q of the circuit at resonance = %.3f\n\n",Q)
+printf("(d) 3 dB bandwidth of the circuit = %.3f Mhz\n\n",B/10^6)
diff --git a/2210/CH5/EX5.10/5_10.sce b/2210/CH5/EX5.10/5_10.sce
new file mode 100755
index 000000000..7f5faf9ee
--- /dev/null
+++ b/2210/CH5/EX5.10/5_10.sce
@@ -0,0 +1,26 @@
+//Chapter 5, Problem 10
+clc
+z0=50 //characteristic impedance
+fb=525e6
+fa=475e6
+fp=fb-fa //passband limit frequency
+
+f0=sqrt(fb*fa)
+
+//Butterworth normalised values
+g1=1/0.618
+g2=1/1.618
+g3=1/2
+g4=1/1.618
+g5=1/0.618
+w=2*%pi*fp
+
+//calculation of component values
+l1=g1*z0/(w)
+c2=g2/(w*z0)
+l3=g3*z0/w
+c4=g4/(w*z0)
+l5=g5*z0/(w)
+
+printf("Component values are\n\tL1 = %f nH",l1*10^9)
+printf("\n\tC2 = %f pF\n\tL3 = %f nH\n\tC4 = %f pF\n\tL5 = %f nH",c2*10^12,l3*10^9,c4*10^12,l5*10^9)
diff --git a/2210/CH5/EX5.11/5_11.sce b/2210/CH5/EX5.11/5_11.sce
new file mode 100755
index 000000000..e637fe3cc
--- /dev/null
+++ b/2210/CH5/EX5.11/5_11.sce
@@ -0,0 +1,25 @@
+//Chapter 5, Problem 11
+clc
+z0=50 //characteristic impedance
+fp=50*10^6 //passband limit frequency
+//from Figure 5.39, it is seen that about five arms will be required
+n=5
+
+
+//Butterworth normalised values
+g1=1.1468
+g2=1.3721
+g3=1.9760
+g4=1.3712
+g5=1.1468
+w=2*%pi*fp
+
+//calculation of component values
+c1=g1/(w*z0)
+l2=g2*z0/w
+c3=g3/(w*z0)
+l4=g4*z0/w
+c5=g5/(w*z0)
+printf("(a) Number of arms of low pass filter = %.2f \n",n)
+printf("Component values are\n\tC1 = %.2f pF",c1*10^12)
+printf("\n\tL2 = %.2f nH\n\tC3 = %.2f pF\n\tL4 = %.2f nH\n\tC5 = %.2f pF",l2*10^9,c3*10^12,l4*10^9,c5*10^12)
diff --git a/2210/CH5/EX5.12/5_12.sce b/2210/CH5/EX5.12/5_12.sce
new file mode 100755
index 000000000..4cd1ca041
--- /dev/null
+++ b/2210/CH5/EX5.12/5_12.sce
@@ -0,0 +1,25 @@
+//Chapter 5, Problem 12
+clc
+z0=75 //characteristic impedance
+fp=500*10^6 //passband limit frequency
+f1=260*10^6 //frequency in hertz
+//from Figure 5.39, it is seen that about five arms will be required
+n=5
+
+//Butterworth normalised values
+g1=1/1.382
+g2=1/1.326
+g3=1/2.209
+g4=1/1.326
+g5=1/1.382
+w=2*%pi*fp
+
+//calculation of component values
+l1=g1*z0/(w)
+c2=g2/(w*z0)
+l3=g3*z0/w
+c4=g4/(w*z0)
+l5=g5*z0/(w)
+printf("(a) Number of arms of low pass filter = %.2f \n",n)
+printf("(b) Component values are\n\tL1 = %f nH",l1*10^9)
+printf("\n\tC2 = %f pF\n\tL3 = %f nH\n\tC4 = %f pF\n\tL5 = %f nH",c2*10^12,l3*10^9,c4*10^12,l5*10^9)
diff --git a/2210/CH5/EX5.13/5_13.sce b/2210/CH5/EX5.13/5_13.sce
new file mode 100755
index 000000000..52b74525b
--- /dev/null
+++ b/2210/CH5/EX5.13/5_13.sce
@@ -0,0 +1,9 @@
+//Chapter 5, Problem 13
+clc
+n1=16 //no of turns on primary
+n2=8 //no of turns on secondary
+zs=16 //terminating resistance
+
+//calculation of effective resistance
+zp=zs*(n1/n2)^2
+printf("Effective resistance at the primary = %d ohm",zp)
diff --git a/2210/CH5/EX5.14/5_14.sce b/2210/CH5/EX5.14/5_14.sce
new file mode 100755
index 000000000..01a63955e
--- /dev/null
+++ b/2210/CH5/EX5.14/5_14.sce
@@ -0,0 +1,16 @@
+//Chapter 5, Problem 14
+clc
+n1=160 //no of turn
+n2=40 //no of turns
+n3=8 //no of turns
+n4=150 //no of turns
+n5=50 //no of turns
+rl=2000 //load resistance in ohms
+
+//calculation
+rl1=((n1+n2)/n3)^2*rl
+req=(n2/(n1+n2))^2*rl1
+rl2=((n4+n5)/n3)^2*rl
+req2=(n5/(n4+n5))^2*rl2
+printf("(a)Transistor load impedance at resonance = %d Kohm\n\n",req/1000)
+printf("(b)New transistor load impedance at resonance = %.2f Kohm\n\n",req2/1000)
diff --git a/2210/CH5/EX5.15/5_15.sce b/2210/CH5/EX5.15/5_15.sce
new file mode 100755
index 000000000..e85558aad
--- /dev/null
+++ b/2210/CH5/EX5.15/5_15.sce
@@ -0,0 +1,21 @@
+//Chapter 5, Problem 15
+clc
+n1=160 //no of turn
+n2=40 //no of turns
+n3=8 //no of turns
+n4=150 //no of turns
+n5=50 //no of turns
+rl=2000 //load resistance in ohms
+rt=100e3 //output impedance of transistor
+Q=100 //Q factor
+Ct=180*10^-12 //capacitance in farad
+f=465e3 //resonant frequency
+
+rl1=((n1+n2)/n3)^2*rl
+rtr=((n1+n2)/n2)^2*rt
+rckt=Q/(2*%pi*Ct*f)
+req=rl1*rckt/(rl1+rckt)
+rl2=((n2/(n1+n2))^2)*req
+
+printf("Transistor load impedance at resonance = %.2f Kohm\n\n",rl2/1000)
+
diff --git a/2210/CH5/EX5.16/5_16.sce b/2210/CH5/EX5.16/5_16.sce
new file mode 100755
index 000000000..82f3649d2
--- /dev/null
+++ b/2210/CH5/EX5.16/5_16.sce
@@ -0,0 +1,10 @@
+//Chapter 5, Problem 16
+clc
+req=125e3 //effective resistance in ohm
+f=465e3 //resonant frequency in hertz
+L=650e-6 //tuning inductance in inductance
+
+//calculation
+Q=req/(2*%pi*f*L)
+B=f/Q
+printf("Q = %.1f \n\n Bandwidth = %d Hz",Q,B)
diff --git a/2210/CH5/EX5.17/5_17.sce b/2210/CH5/EX5.17/5_17.sce
new file mode 100755
index 000000000..b4c73fdd5
--- /dev/null
+++ b/2210/CH5/EX5.17/5_17.sce
@@ -0,0 +1,9 @@
+//Chapter 5, Problem 17
+clc
+z1=22e3 //reactance in ohm
+c1=10 //capacitance in picofarad
+c2=100 //capacitance in picofarad
+
+//calculation
+z2=z1*(c1/(c1+c2))
+printf("tranformed value of reactance = %d Kohm",z2/1000)
diff --git a/2210/CH5/EX5.18/5_18.sce b/2210/CH5/EX5.18/5_18.sce
new file mode 100755
index 000000000..f473660d5
--- /dev/null
+++ b/2210/CH5/EX5.18/5_18.sce
@@ -0,0 +1,9 @@
+//Chapter 5, Problem 18
+clc
+f=100e6 //frequency in hertz
+cp=100e-12 //capacitance in farad
+rp=15e3 //resistance in ohm
+
+//calculation
+qp=2*%pi*f*cp*rp
+printf("Quality factor Qp = %.2f",qp)
diff --git a/2210/CH5/EX5.19/5_19.sce b/2210/CH5/EX5.19/5_19.sce
new file mode 100755
index 000000000..f5e4e029d
--- /dev/null
+++ b/2210/CH5/EX5.19/5_19.sce
@@ -0,0 +1,9 @@
+//Chapter 5, Problem 19
+clc
+f=800e3 //frequency in hertz
+Ls=365e-6 //capacitance in farad
+Rs=8 //resistance in ohm
+
+//calculation
+Qs=(2*%pi*f*Ls)/Rs
+printf("Quality factor Qs = %d",Qs)
diff --git a/2210/CH5/EX5.20/5_20.sce b/2210/CH5/EX5.20/5_20.sce
new file mode 100755
index 000000000..54329dfe6
--- /dev/null
+++ b/2210/CH5/EX5.20/5_20.sce
@@ -0,0 +1,12 @@
+//Chapter 5, Problem 20
+clc
+f=10e6 //frequency in hertz
+Ls=15e-6 //capacitance in farad
+Rs=2 //resistance in ohm
+
+//calculation
+Qs=(2*%pi*f*Ls)/Rs
+Rp=Rs*(1+(Qs^2))
+Lp=((1+Qs^2)/Qs^2)*Ls
+
+printf("Resistance Rp = %d Kohm\n\n Inductance Lp = %d uH\n\n Quality factor Qp = %d",Rp/1000,Lp*10^6,Qs)
diff --git a/2210/CH5/EX5.21/5_21.sce b/2210/CH5/EX5.21/5_21.sce
new file mode 100755
index 000000000..55e4d33ec
--- /dev/null
+++ b/2210/CH5/EX5.21/5_21.sce
@@ -0,0 +1,13 @@
+//Chapter 5, Problem 21, figure 5.55
+clc
+Rp=500 //equals to load resistance
+Rs=50 //equals to generator resistance
+f=100e6 //frequency in hertz
+
+w=2*%pi*f
+Qs=sqrt((Rp/Rs)-1)
+Ls=(Rs*Qs)/w
+Xs=w*Ls
+Ca=1/(w*Xs)
+Lp=((1+Qs^2)/Qs^2)*Ls
+printf("Capacitor Ca = %.2f pF\n\nInductor Lp = %.2f nH",Ca/10^-12,Lp/10^-9)
diff --git a/2210/CH5/EX5.22/5_22.sce b/2210/CH5/EX5.22/5_22.sce
new file mode 100755
index 000000000..0f3096aa9
--- /dev/null
+++ b/2210/CH5/EX5.22/5_22.sce
@@ -0,0 +1,21 @@
+//Chapter 5, Problem 22, figure 5.58
+clc
+f=100e6 //supply frequency in hertz
+Rs=50 //resistance in ohms
+Csh=42e-12 //shunt capacitance in ohm
+Rl=500 //load resistance in ohm
+Rp=Rl
+
+//calculation
+w=2*%pi*f
+Qs=sqrt((Rp/Rs)-1)
+Ls=(Rs*Qs)/w
+Xs=w*Ls
+Ca=1/(w*Xs)
+Lp=((1+Qs^2)/Qs^2)*Ls
+
+L=1/(w^2*Csh)
+Lcom=(Lp*L)/(Lp+L)
+
+printf("Matching network component value are,\n Ca = %.1f pF \n L (combined) = %d nH\n\n",Ca*10^12,Lcom*10^9)
+disp("For the final network, shown in figure 5.61")
diff --git a/2210/CH5/EX5.23/5_23.sce b/2210/CH5/EX5.23/5_23.sce
new file mode 100755
index 000000000..f48e3d1fd
--- /dev/null
+++ b/2210/CH5/EX5.23/5_23.sce
@@ -0,0 +1,17 @@
+//Chapter 5, Problem 23, figure 5.65
+clc
+Rs=100 //resistance in ohm
+Rl=1000 //resistance in ohm
+Q=15 //Q factor
+
+//calculation
+Rv=Rl/(Q^2+1)
+Xp2=Rl/Q
+Xs2=Q*Rv
+Q1=sqrt((Rs/Rv)-1)
+Xp1=Rs/Q1
+Xs1=Q1*Rv
+
+printf("Zs = %d ohm\nXp1 = %.3f ohm \nXs1 = %.3f ohm\n",Rs,Xp1,Xs1)
+printf("Xs2 = %.3f ohm\n Xp2 = %.3f ohm\n Zl = %d ohm\n\n",Xs2,Xp2,Rl)
+disp("Four types of matching network is shown in figure 5.66, 5.67, 5.68, 5.69.")
diff --git a/2210/CH5/EX5.24/5_24.sce b/2210/CH5/EX5.24/5_24.sce
new file mode 100755
index 000000000..eb05b2a8c
--- /dev/null
+++ b/2210/CH5/EX5.24/5_24.sce
@@ -0,0 +1,17 @@
+//Chapter 5, Problem 24, figure 5.72
+clc
+Rs=10 //resistance in ohm
+Rl=50 //resistance in ohm
+Q=10 //Q factor
+
+//calculation
+Rv=Rs*(Q^2+1)
+Xs1=Q*Rs
+Xp1=Rv/Q
+Q2=sqrt((Rv/Rl)-1)
+Xp2=Rv/Q2
+Xs2=Q2*Rl
+
+printf("Zs = %d ohm\nXp1 = %.3f ohm \nXs1 = %.3f ohm\n",Rs,Xp1,Xs1)
+printf("Xs2 = %.3f ohm\n Xp2 = %.3f ohm\n Zl = %d ohm\n\n",Xs2,Xp2,Rl)
+disp("Four types of matching network is shown in figure 5.66, 5.67, 5.68, 5.69.")
diff --git a/2210/CH5/EX5.3/5_3.sce b/2210/CH5/EX5.3/5_3.sce
new file mode 100755
index 000000000..48cd1c364
--- /dev/null
+++ b/2210/CH5/EX5.3/5_3.sce
@@ -0,0 +1,11 @@
+//Chapter 5, Problem 3
+clc
+f1=260*10^6 //frequency in hertz
+f2=100*10^6 //frequency in hertz
+A=40 //minimum attenuation in dB
+
+//calculation
+fr=f1/f2
+n=A/(20*log10(fr))
+
+printf("Number of arms = %f\n i.e 5 arms",n)
diff --git a/2210/CH5/EX5.4/5_4.sce b/2210/CH5/EX5.4/5_4.sce
new file mode 100755
index 000000000..d8c4e41cd
--- /dev/null
+++ b/2210/CH5/EX5.4/5_4.sce
@@ -0,0 +1,22 @@
+//Chapter 5, Problem 4
+clc
+z0=50 //characteristic impedance in ohm
+fp=500*10^6 //passband limit frequency in hertz
+
+//Butterworth normalised values
+g1=0.618
+g2=1.618
+g3=2
+g4=1.618
+g5=0.618
+w=2*%pi*fp
+
+//calculation of component values
+c1=g1/(w*z0)
+l2=g2*z0/w
+c3=g3/(w*z0)
+l4=g4*z0/w
+c5=g5/(w*z0)
+
+printf("Component values are\n\tC1 = %.2f pF",c1*10^12)
+printf("\n\tL2 = %.2f nH\n\tC3 = %.2f pF\n\tL4 = %.2f nH\n\tC5 = %.2f pF",l2*10^9,c3*10^12,l4*10^9,c5*10^12)
diff --git a/2210/CH5/EX5.6/5_6.sce b/2210/CH5/EX5.6/5_6.sce
new file mode 100755
index 000000000..c88831666
--- /dev/null
+++ b/2210/CH5/EX5.6/5_6.sce
@@ -0,0 +1,22 @@
+//Chapter 5, Problem 6
+clc
+z0=50 //characteristic impedance in ohm
+fp=500*10^6 //passband limit frequency in hertz
+
+//Butterworth normalised values
+g1=1/0.618
+g2=1/1.618
+g3=1/2
+g4=1/1.618
+g5=1/0.618
+w=2*%pi*fp
+
+//calculation of component values
+l1=g1*z0/(w)
+c2=g2/(w*z0)
+l3=g3*z0/w
+c4=g4/(w*z0)
+l5=g5*z0/(w)
+
+printf("Component values are\n\tL1 = %.2f nH",l1*10^9)
+printf("\n\tC2 = %.2f pF\n\tL3 = %.2f nH\n\tC4 = %.2f pF\n\tL5 = %.2f nH",c2*10^12,l3*10^9,c4*10^12,l5*10^9)
diff --git a/2210/CH5/EX5.8/5_8.sce b/2210/CH5/EX5.8/5_8.sce
new file mode 100755
index 000000000..64349f9ae
--- /dev/null
+++ b/2210/CH5/EX5.8/5_8.sce
@@ -0,0 +1,26 @@
+//Chapter 5, Problem 8
+clc
+z0=50 //characteristic impedance in ohm
+fb=525e6
+fa=475e6
+fp=fb-fa //passband limit frequency in hertz
+
+f0=sqrt(fb*fa)
+
+//Butterworth normalised values
+g1=0.618
+g2=1.618
+g3=2
+g4=1.618
+g5=0.618
+w=2*%pi*fp
+
+//calculation of component values
+c1=g1/(w*z0)
+l2=g2*z0/w
+c3=g3/(w*z0)
+l4=g4*z0/w
+c5=g5/(w*z0)
+
+printf("Component values are\n\tC1 = %.2f pF",c1*10^12)
+printf("\n\tL2 = %.2f nH\n\tC3 = %.2f pF\n\tL4 = %.2f nH\n\tC5 = %.2f pF",l2*10^9,c3*10^12,l4*10^9,c5*10^12)
generated by cgit (git 2.34.1) at 2025-03-12 09:00:04 +0000