summaryrefslogtreecommitdiff
path: root/1979/CH6/EX6.11
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /1979/CH6/EX6.11
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '1979/CH6/EX6.11')
-rwxr-xr-x1979/CH6/EX6.11/Ex6_11.sce13
1 files changed, 13 insertions, 0 deletions
diff --git a/1979/CH6/EX6.11/Ex6_11.sce b/1979/CH6/EX6.11/Ex6_11.sce
new file mode 100755
index 000000000..6e4d5f4c8
--- /dev/null
+++ b/1979/CH6/EX6.11/Ex6_11.sce
@@ -0,0 +1,13 @@
+//Chapter-6, Example 6.11, Page 242
+//=============================================================================
+clc;
+//Calculations
+S13=0.1*(cos(90*%pi/180)+(%i)*sin(90*%pi/180));//conversion from polar to rectangular
+S13=abs(S13);
+C=-20*log10(S13);//coupling coefficient in dB
+S14=0.05*(cos(90*%pi/180)+(%i)*sin(90*%pi/180));//conversion from polar to rectangular
+S14=abs(S14);
+D=20*log10(S13/S14);//directivity in dB
+I=-20*log10(S14);//isolation in dB
+mprintf("Thus coupling,directivity and isolation are %1.0f dB,%1.2f dB and %2.2f dB respetively ",C,D,I);
+//=================================END OF PROGRAM==============================