summaryrefslogtreecommitdiff
path: root/3822/CH7/EX7.1/Ex7_1.sce
blob: 2e2552ac56322043622333f58dcef42b1c85e2b7 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16

//Optoelectronics and Fiber Optics Communication by C.R. Sarkar and D.C. Sarkar
//Example 7.1
//OS = Windows 7
//Scilab version 5.5.2

clc;
clear;

//given
theta=30;//value of angle of deliverence in degrees
b=cosd(theta);// cosine value of the theta
a=log10(b);//constant
c=log10(1/2);//constant
n=c/a;//  refractive index
mprintf("The value of refractive index is= %.2f",n);//the answer vary due to rounding