diff options
author | prashantsinalkar | 2017-10-10 12:38:01 +0530 |
---|---|---|
committer | prashantsinalkar | 2017-10-10 12:38:01 +0530 |
commit | f35ea80659b6a49d1bb2ce1d7d002583f3f40947 (patch) | |
tree | eb72842d800ac1233e9d890e020eac5fd41b0b1b /2825/CH14/EX14.6/Ex14_6.sce | |
parent | 7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (diff) | |
download | Scilab-TBC-Uploads-f35ea80659b6a49d1bb2ce1d7d002583f3f40947.tar.gz Scilab-TBC-Uploads-f35ea80659b6a49d1bb2ce1d7d002583f3f40947.tar.bz2 Scilab-TBC-Uploads-f35ea80659b6a49d1bb2ce1d7d002583f3f40947.zip |
updated the code
Diffstat (limited to '2825/CH14/EX14.6/Ex14_6.sce')
-rwxr-xr-x | 2825/CH14/EX14.6/Ex14_6.sce | 34 |
1 files changed, 17 insertions, 17 deletions
diff --git a/2825/CH14/EX14.6/Ex14_6.sce b/2825/CH14/EX14.6/Ex14_6.sce index 1d4d305c5..c570f9fc8 100755 --- a/2825/CH14/EX14.6/Ex14_6.sce +++ b/2825/CH14/EX14.6/Ex14_6.sce @@ -1,17 +1,17 @@ -//Ex14_6 Pg-697
-clc
-
-n2=1.59 //cladding refractive index
-NA=0.2 //numerical apperture
-n0=1 //when fiber is in air
-
-n1=sqrt(n2^2+NA^2) //core refractive index
-printf("Core refractive index = %.3f \n",n1)
-
-n0=1.33 //water refractive index
-NA=sqrt(n1^2-n2^2)/n0 //numerical apperture
-printf(" Numerical apperture = %.2f \n",NA)
-
-AA_rad=asin(NA/n) //maximum Acceptance angle in rad
-AA=AA_rad*180/%pi //maximum entrance angle in degree
-printf(" The maximum entrance angle i0 = %.2f degree",AA)
+//Ex14_6 Pg-697 +clc + +n2=1.59 //cladding refractive index +NA=0.2 //numerical apperture +n0=1 //when fiber is in air + +n1=sqrt(n2^2+NA^2) //core refractive index +printf("Core refractive index = %.3f \n",n1) + +n=1.33 //water refractive index +NA=sqrt(n1^2-n2^2)/n0 //numerical apperture +printf(" Numerical apperture = %.2f \n",NA) + +AA_rad=asin(NA/n) //maximum Acceptance angle in rad +AA=AA_rad*180/%pi //maximum entrance angle in degree +printf(" The maximum entrance angle i0 = %.2f degree",AA)
\ No newline at end of file |