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 /1619/CH2/EX2.2.8 | |
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 '1619/CH2/EX2.2.8')
-rwxr-xr-x | 1619/CH2/EX2.2.8/Example2_2_8.sce | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/1619/CH2/EX2.2.8/Example2_2_8.sce b/1619/CH2/EX2.2.8/Example2_2_8.sce new file mode 100755 index 000000000..44ac40e4f --- /dev/null +++ b/1619/CH2/EX2.2.8/Example2_2_8.sce @@ -0,0 +1,16 @@ +//Example 2.2.8 page 2.15
+
+clc;
+clear;
+
+Tf = 1400; //fictive temperature
+BETA = 7*10^-11;
+n= 1.46; //RI
+p= 0.286; //photo elastic constant
+Kb = 1.381*10^-23; //Boltzmann's constant
+lamda = 850*10^-9; //wavelength
+alpha_scat = 8*%pi^3*n^8*p^2*Kb*Tf*BETA/(3*lamda^4);
+l= 1000; //fibre length
+TL = exp(-alpha_scat*l); //transmission loss
+attenuation = 10*log10(1/TL);
+printf("The attenuation is %.3f dB/Km",attenuation);
|