summaryrefslogtreecommitdiff
path: root/854/CH13/EX13.8/Example13_8.sce
blob: b1af9acd22051a3a1f353b16c6817f3694da8c24 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
//clear//
//Caption:Program to find the refractive index of the prism material
//Example13.8
//page463
clear;
clc;
n2 =1.00; //refractive index of air
teta1 = 45; //incident angle in degrees
teta1 = 45/57.3;//incident angle in radians
n1 = n2/sin(teta1);
disp(n1,'refractive index of prism material n1=')
//Result
//refractive index of prism material n1=   
//     1.4142954