diff options
| author | priyanka | 2015-06-24 15:03:17 +0530 |
|---|---|---|
| committer | priyanka | 2015-06-24 15:03:17 +0530 |
| commit | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch) | |
| tree | ab291cffc65280e58ac82470ba63fbcca7805165 /2681/CH6 | |
| download | Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2 Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip | |
initial commit / add all books
Diffstat (limited to '2681/CH6')
| -rwxr-xr-x | 2681/CH6/EX6.1/Ex6_1.sce | 18 | ||||
| -rwxr-xr-x | 2681/CH6/EX6.10/Ex6_10.sce | 9 | ||||
| -rwxr-xr-x | 2681/CH6/EX6.11/Ex6_11.sce | 7 | ||||
| -rwxr-xr-x | 2681/CH6/EX6.12/Ex6_12.sce | 8 | ||||
| -rwxr-xr-x | 2681/CH6/EX6.13/Ex6_13.sce | 8 | ||||
| -rwxr-xr-x | 2681/CH6/EX6.14/Ex6_14.sce | 10 | ||||
| -rwxr-xr-x | 2681/CH6/EX6.15/Ex6_15.sce | 8 | ||||
| -rwxr-xr-x | 2681/CH6/EX6.16/Ex6_16.sce | 9 | ||||
| -rwxr-xr-x | 2681/CH6/EX6.17/Ex6_17.sce | 9 | ||||
| -rwxr-xr-x | 2681/CH6/EX6.18/Ex6_18.sce | 10 | ||||
| -rwxr-xr-x | 2681/CH6/EX6.19/Ex6_19.sce | 15 | ||||
| -rwxr-xr-x | 2681/CH6/EX6.2/Ex6_2.sce | 8 | ||||
| -rwxr-xr-x | 2681/CH6/EX6.20/Ex6_20.sce | 11 | ||||
| -rwxr-xr-x | 2681/CH6/EX6.21/Ex6_21.sce | 9 | ||||
| -rwxr-xr-x | 2681/CH6/EX6.22/Ex6_22.sce | 17 | ||||
| -rwxr-xr-x | 2681/CH6/EX6.23/Ex6_23.sce | 15 | ||||
| -rwxr-xr-x | 2681/CH6/EX6.3/Ex6_3.sce | 9 | ||||
| -rwxr-xr-x | 2681/CH6/EX6.4/Ex6_4.sce | 9 | ||||
| -rwxr-xr-x | 2681/CH6/EX6.5/Ex6_5.sce | 9 | ||||
| -rwxr-xr-x | 2681/CH6/EX6.6/Ex6_6.sce | 9 | ||||
| -rwxr-xr-x | 2681/CH6/EX6.7/Ex6_7.sce | 8 | ||||
| -rwxr-xr-x | 2681/CH6/EX6.8/Ex6_8.sce | 7 | ||||
| -rwxr-xr-x | 2681/CH6/EX6.9/Ex6_9.sce | 8 |
23 files changed, 230 insertions, 0 deletions
diff --git a/2681/CH6/EX6.1/Ex6_1.sce b/2681/CH6/EX6.1/Ex6_1.sce new file mode 100755 index 000000000..c972d80f1 --- /dev/null +++ b/2681/CH6/EX6.1/Ex6_1.sce @@ -0,0 +1,18 @@ +//determine Z0 for given transmission line
+//given
+clc
+function[Zo]=zed(L,C)
+Zo=sqrt(L/C)//impedence function
+endfunction
+L=110D-9
+C=20D-12
+[Zo1]=zed(L,C)
+L=110D-9
+C=20D-12
+[Zo2]=zed(L,C)
+Zo2=round(Zo2*100)/100///rounding off decimals
+Zo1=round(Zo1*100)/100///rounding off decimals
+disp(Zo1,Zo2,'the Zo is determined in ohm:')
+
+
+
diff --git a/2681/CH6/EX6.10/Ex6_10.sce b/2681/CH6/EX6.10/Ex6_10.sce new file mode 100755 index 000000000..fa73bbca8 --- /dev/null +++ b/2681/CH6/EX6.10/Ex6_10.sce @@ -0,0 +1,9 @@ +//voltage standing wave ratio
+//given
+clc
+Vmax=50//volts
+Vmin=35//volts
+VSWR=Vmax/Vmin
+VSWR_db=20*log10(VSWR)//db
+VSWR_db=round(VSWR_db*1000)/1000///rounding off decimals
+disp(VSWR_db,'the voltage standing wave ratio in decibles')//db
diff --git a/2681/CH6/EX6.11/Ex6_11.sce b/2681/CH6/EX6.11/Ex6_11.sce new file mode 100755 index 000000000..7172e53f6 --- /dev/null +++ b/2681/CH6/EX6.11/Ex6_11.sce @@ -0,0 +1,7 @@ +//maximum impedance of the line
+//given
+clc
+Zo=75//ohm
+VSWR=3//voltage standing wave ratio
+Zmax=VSWR*Zo//ohm
+disp(Zmax,'the maximum impedance of the line for the given VSWR IN ohm')//ohm
diff --git a/2681/CH6/EX6.12/Ex6_12.sce b/2681/CH6/EX6.12/Ex6_12.sce new file mode 100755 index 000000000..470fcafbb --- /dev/null +++ b/2681/CH6/EX6.12/Ex6_12.sce @@ -0,0 +1,8 @@ +//EXAMPLE-6.12;PAGE-201
+//voltage standin wave ratio
+//given
+clc
+row=0.4
+VSWR=(1+row)/(1-row)//voltage standing wave ratio
+VSWR=round(VSWR*100)/100///rounding off decimals
+disp(VSWR,'the voltage standing wave ratio')
diff --git a/2681/CH6/EX6.13/Ex6_13.sce b/2681/CH6/EX6.13/Ex6_13.sce new file mode 100755 index 000000000..064152646 --- /dev/null +++ b/2681/CH6/EX6.13/Ex6_13.sce @@ -0,0 +1,8 @@ +//input impedance
+//given
+clc
+Zl=0//ohm
+Bl=2*%pi/8//rad
+Zo=75//ohm
+Zi=Zo*(Zl+%i*Zo*tan(Bl))/(Zo+%i*Zl*tan(Bl))
+disp(Zi,'the input impedance at point')//ohm
diff --git a/2681/CH6/EX6.14/Ex6_14.sce b/2681/CH6/EX6.14/Ex6_14.sce new file mode 100755 index 000000000..b92142332 --- /dev/null +++ b/2681/CH6/EX6.14/Ex6_14.sce @@ -0,0 +1,10 @@ +//length and characteristic impedance of transformer
+//given
+Zo=50//ohm
+Zl=200//ohm
+f=300d+6//MHz
+Vo=3d+8//velocity of wave
+lem=Vo/f
+leng_trans=lem/4//meter//the length of transformer is 1/4 of wavelength
+Zt=sqrt(Zo*Zl)//ohm
+disp(Zt,leng_trans,'the length and characteristic impedance in meter and ohm respectively')
diff --git a/2681/CH6/EX6.15/Ex6_15.sce b/2681/CH6/EX6.15/Ex6_15.sce new file mode 100755 index 000000000..a94cb30aa --- /dev/null +++ b/2681/CH6/EX6.15/Ex6_15.sce @@ -0,0 +1,8 @@ +//characteristic impedance
+//given
+clc
+Zl=300//ohm
+Zo=75//ohm//of the line
+SWR=1//the source impedence is equal to characteristic impedance of the line
+Zt=sqrt(Zl*Zo)
+disp(Zt,'the characteristic impedance in ohm')
diff --git a/2681/CH6/EX6.16/Ex6_16.sce b/2681/CH6/EX6.16/Ex6_16.sce new file mode 100755 index 000000000..97b07e83a --- /dev/null +++ b/2681/CH6/EX6.16/Ex6_16.sce @@ -0,0 +1,9 @@ +//reflection coefficent
+//given
+clc
+S=2//voltage standing wave ratio(VSWR)
+Zo=50//ohm
+row=((S-1)/(S+1))
+row=round(row*1000)/1000///rounding off decimals
+disp(row,'the value of reflection coefficent as modulus row')
+
diff --git a/2681/CH6/EX6.17/Ex6_17.sce b/2681/CH6/EX6.17/Ex6_17.sce new file mode 100755 index 000000000..26fb10489 --- /dev/null +++ b/2681/CH6/EX6.17/Ex6_17.sce @@ -0,0 +1,9 @@ +//input impedance of the shorted line
+//given
+clc
+Zn=50//ohm
+f=500//Mhz
+Bl=0.2*%pi//B=2*pi/lemda
+Zi=%i*Zn*tan(Bl)//input impedance
+Zi=round(Zi*100)/100//rounding off decimals
+disp(Zi,'the input impedance of the shorted line in ohm')
diff --git a/2681/CH6/EX6.18/Ex6_18.sce b/2681/CH6/EX6.18/Ex6_18.sce new file mode 100755 index 000000000..952f14a1b --- /dev/null +++ b/2681/CH6/EX6.18/Ex6_18.sce @@ -0,0 +1,10 @@ +//characteristc impedance of the line for air dielectric
+//given
+clc
+b=30-2*2//mm//diameter of the outside conductor
+a=10-2*1//mm//diameter of the inner conductor
+Zo=138*log10(b/a)//characteristic impedance
+Zo=round(Zo*100)/100///rounding off decimals
+disp(Zo,'the characteristic impedance of the line for air dielectric in ohm')
+//error in the value of b
+
diff --git a/2681/CH6/EX6.19/Ex6_19.sce b/2681/CH6/EX6.19/Ex6_19.sce new file mode 100755 index 000000000..c2aa9371d --- /dev/null +++ b/2681/CH6/EX6.19/Ex6_19.sce @@ -0,0 +1,15 @@ +//time delay ,propogaion velocity,propagation delay
+//given
+clc
+L=500D-9//H/m
+C=30D-12//F/m
+td=sqrt(L*C)//time delay for 1 m long cable
+vp=1/3.87d-9//m/s
+C1=C*10//capacitance of 10 m cable
+L1=L*10//inductance of 10 m cable
+Ld=sqrt(L1*C1)//time delay for 10 m long cable
+Ld=round(Ld*1d+10)/1d+10///rounding off decimals
+td=round(td*1d+11)/1d+11///rounding off decimals
+disp(Ld*1d+9,vp,td*1d+9,'the time delay in nanoseconds ,propogaion velocity in meter/second,propogation delay over a cable length in nanoseconds')
+
+
diff --git a/2681/CH6/EX6.2/Ex6_2.sce b/2681/CH6/EX6.2/Ex6_2.sce new file mode 100755 index 000000000..75cdb70ad --- /dev/null +++ b/2681/CH6/EX6.2/Ex6_2.sce @@ -0,0 +1,8 @@ +//characteristic impedence
+//given
+clc
+s=300//mm//
+r=3/2//mm
+Zo=276*log10(s/r)
+Zo=round(Zo)///rounding off decimals
+disp(Zo,'the characteristic impedence in ohm')
diff --git a/2681/CH6/EX6.20/Ex6_20.sce b/2681/CH6/EX6.20/Ex6_20.sce new file mode 100755 index 000000000..70f9690d5 --- /dev/null +++ b/2681/CH6/EX6.20/Ex6_20.sce @@ -0,0 +1,11 @@ +//radius of the outer conductor
+//given
+clc
+C=70D-12//F/m
+Zo=75//ohm
+L=Zo^2*C//inductance
+epsilon_r=2.3
+a=0.292//mm//radius of inner conductor
+b=a*10^(Zo*sqrt(epsilon_r)/138)//Zo=(138/sqrt(epsilon_r))*log(b/a)
+b=round(b*1d+4)/1d+4///rounding off decimals
+disp(b,'the radius of the outer conductor')
diff --git a/2681/CH6/EX6.21/Ex6_21.sce b/2681/CH6/EX6.21/Ex6_21.sce new file mode 100755 index 000000000..b071d7540 --- /dev/null +++ b/2681/CH6/EX6.21/Ex6_21.sce @@ -0,0 +1,9 @@ +//resonant frequency
+//given
+clc
+a=0.03//m
+b=0.01//m
+c=0.04//m
+v=3d+8//speed of wave
+fr=(v/2)*(sqrt((1/a^2)+(1/b^2)+(1/c^2)))//hertz
+disp(fr*1d-9,'resonant frequency for TM110 mode in Ghz')//Ghz
diff --git a/2681/CH6/EX6.22/Ex6_22.sce b/2681/CH6/EX6.22/Ex6_22.sce new file mode 100755 index 000000000..fa40072c1 --- /dev/null +++ b/2681/CH6/EX6.22/Ex6_22.sce @@ -0,0 +1,17 @@ +//resonant frequency and quality cycle
+//given
+clc
+a=0.03//m
+b=0.01//m
+c=0.04//m
+l=0.04//m
+v=3d+8//speed of wave in m/s in mho/m
+uo=4*%pi*10^-7
+con_d=5.8d+7//conductivity of copper
+fr=(v/2)*(sqrt((1/a^2)+(1/b^2)))//hertz
+fr1=(v/2)*(sqrt((1/a^2)+(1/l^2)))//hertz
+del=1/sqrt(%pi*fr1*uo*con_d)
+Q=((a^2+c^2)*a*b*c)/(del*(((a^3+c^3)*2*b)+a*c*(a^2+c^2)))
+fr=round(fr*1d-8)/1d-8///rounding off decimals
+Q=round(Q)///rounding off decimals
+disp(Q,fr1*1d-9,fr*1d-9,'resonant frequency of dominant mode TM110,dominant mode TE101 in Ghz and the quality factor')//GHz
diff --git a/2681/CH6/EX6.23/Ex6_23.sce b/2681/CH6/EX6.23/Ex6_23.sce new file mode 100755 index 000000000..b85d9a52d --- /dev/null +++ b/2681/CH6/EX6.23/Ex6_23.sce @@ -0,0 +1,15 @@ +//resonant frequency of TE101 and its quality factor
+//given
+clc
+con_d=5.8d+7//mho/m
+a=0.05//m
+b=0.04//m
+c=0.1//m
+v=3d+8//m/s
+epsilon_r=4//dielectric
+uo=4*%pi*10^-7
+fr=(v/(2*sqrt(epsilon_r)))*(sqrt((1/a^2)+(1/c^2)))//hertz
+del=1/sqrt(%pi*fr*uo*con_d)//ERROR
+Q=((a^2+c^2)*a*b*c)/(del*(((a^3+c^3)*2*b)+a*c*(a^2+c^2)))//quality factor
+disp(Q,fr*1d-9,'resonant frequency in dominant mode TE101 in Ghz and the quality factor')//GHz
+//ERROR in the calculation of the book as value of del=32.275d-7 in the book.
diff --git a/2681/CH6/EX6.3/Ex6_3.sce b/2681/CH6/EX6.3/Ex6_3.sce new file mode 100755 index 000000000..7fbb919a6 --- /dev/null +++ b/2681/CH6/EX6.3/Ex6_3.sce @@ -0,0 +1,9 @@ +//input impedance
+//given
+clc
+Zl=0//ohm
+Zo=50//ohm
+Bl=2*%pi*0.1//((2*pi/lem)*lem)
+Zi=Zo*(Zl+%i*Zo*tan(Bl))/(Zo+%i*Zl*tan(Bl))//the input impedence in ohm
+Zi=round(Zi*100)/100///rounding off decimals
+disp(Zi,'the input impedance of 50ohm loss less transmission line')
diff --git a/2681/CH6/EX6.4/Ex6_4.sce b/2681/CH6/EX6.4/Ex6_4.sce new file mode 100755 index 000000000..c86227fbe --- /dev/null +++ b/2681/CH6/EX6.4/Ex6_4.sce @@ -0,0 +1,9 @@ +//input of lossless transmission line
+//given
+clc
+Zo=50//ohms
+Zl=%inf//defined as infinity
+Bl=2*%pi*0.1
+Zi=(Zo*(1+%i*(Zo/Zl)*tan(Bl))/(Zo/Zl+%i*tan(Bl)))//taking Zl common from numerrator and denominator
+Zi=round(Zi*100)/100///rounding off decimals
+disp(Zi,'the input of 50ohm lossless transmission line')//ohm
diff --git a/2681/CH6/EX6.5/Ex6_5.sce b/2681/CH6/EX6.5/Ex6_5.sce new file mode 100755 index 000000000..4143ab6de --- /dev/null +++ b/2681/CH6/EX6.5/Ex6_5.sce @@ -0,0 +1,9 @@ +//input impedance of a lossless transmission
+//given
+clc
+Zo=100//ohm
+Bl=(2*%pi)/3//ERROR
+Zl=150+%i*60
+Zi=Zo*(Zl+%i*Zo*tan(Bl))/(Zo+%i*Zl*tan(Bl))//the input impedence in ohm
+disp(Zi,'the input impedance of lossless transmission line in ohm:')
+//ERROR in the calculation of the book as value of Bl=120*pi
diff --git a/2681/CH6/EX6.6/Ex6_6.sce b/2681/CH6/EX6.6/Ex6_6.sce new file mode 100755 index 000000000..b46da868e --- /dev/null +++ b/2681/CH6/EX6.6/Ex6_6.sce @@ -0,0 +1,9 @@ +//time required for wave to travell
+//given
+clc
+L=1.2d-6//H/m
+C=12.5d-12//F/m
+leng_line=2//length of the line in meter
+t=sqrt(L*C)*leng_line//time required for the wave to travell in seconds
+t=round(t*1d+12)/1d+12///rounding off decimals
+disp(t*1d+9,'the time required for wave to travell in nanoseconds')//nsec
diff --git a/2681/CH6/EX6.7/Ex6_7.sce b/2681/CH6/EX6.7/Ex6_7.sce new file mode 100755 index 000000000..429f47a5d --- /dev/null +++ b/2681/CH6/EX6.7/Ex6_7.sce @@ -0,0 +1,8 @@ +//characteristic impedance
+//given
+clc
+L=1.5d-6//H/m
+C=10d-12//F
+Zo=sqrt(L/C)
+Zo=round(Zo)///rounding off decimals
+disp(Zo,'the characteristic impedence in ohm')//ohm
diff --git a/2681/CH6/EX6.8/Ex6_8.sce b/2681/CH6/EX6.8/Ex6_8.sce new file mode 100755 index 000000000..410014601 --- /dev/null +++ b/2681/CH6/EX6.8/Ex6_8.sce @@ -0,0 +1,7 @@ +//reflected voltage
+//given
+clc
+Vi=50//volts
+row=0.25//reflection coefficent
+Vr=Vi*row//the reflected voltage
+disp(Vr,'the reflected voltage for given reflection coefficent in volts')
diff --git a/2681/CH6/EX6.9/Ex6_9.sce b/2681/CH6/EX6.9/Ex6_9.sce new file mode 100755 index 000000000..b8f20a51c --- /dev/null +++ b/2681/CH6/EX6.9/Ex6_9.sce @@ -0,0 +1,8 @@ +//percentage of reflected voltage
+//given
+clc
+Vi=50//volts
+Vr=25//volts
+row=Vr/Vi//reflection coefficent
+per_ref_volt=row*100//percentage of reflected voltage
+disp(per_ref_volt,'the percentage of reflected voltage')
|