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/EX6.22 | |
| 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/EX6.22')
| -rwxr-xr-x | 2681/CH6/EX6.22/Ex6_22.sce | 17 |
1 files changed, 17 insertions, 0 deletions
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
|