summaryrefslogtreecommitdiff
path: root/998/CH29/EX29.100/Ex100.sce
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /998/CH29/EX29.100/Ex100.sce
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 '998/CH29/EX29.100/Ex100.sce')
-rwxr-xr-x998/CH29/EX29.100/Ex100.sce26
1 files changed, 26 insertions, 0 deletions
diff --git a/998/CH29/EX29.100/Ex100.sce b/998/CH29/EX29.100/Ex100.sce
new file mode 100755
index 000000000..ce0da3feb
--- /dev/null
+++ b/998/CH29/EX29.100/Ex100.sce
@@ -0,0 +1,26 @@
+//Ex:100
+clc;
+clear;
+close;
+p_c=10*log(200)/log(10);// carrier power in db
+g_t=57.6;// transmit gain in db
+B_oi=0;// in db
+e_s=p_c+g_t+B_oi;//satellite saturation EIRP in dbW
+k=10*(log(1.38)/log(10)-23*log(10)/log(10));// Boltzmann's const in db
+B=10*log(36000000)/log(10);// in db
+L=1.5;// in db
+s=20*log((4*3.14*14*(10^9)*37000*(10^3))/(3*(10^8)))/log(10);
+g_t=1.6;// in db
+c_nu=e_s-s+g_t-k-B-B_oi-L;
+G=56.3;// in db
+g_td=G-10*log(160)/log(10);
+L1=1;// in db
+e_s1=44;// in db
+s1=20*log((4*3.14*12*(10^9)*37000*(10^3))/(3*(10^8)))/log(10);
+c_nd=e_s1-s1+g_td-k-B-B_oi-L1;
+c_u=10^(27/10);
+c_d=10^(24.9/10);
+c_n=(c_u*c_d)/(c_u+c_d);
+printf("The uplink carrier to noise ratio=%f db", c_nu);
+printf("\n The downlink carrier to noise ratio=%f db", c_nd);
+printf("\n The carrier to noise ratio=%f db", 10*log(c_n)/log(10)); \ No newline at end of file