summaryrefslogtreecommitdiff
path: root/3753/CH1/EX1.15/Ex1_15.sce
blob: e9ea23ec4734a1774d91531fff64cd7d840a8fd1 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
//Example number 1.15, Page number 1.39

clc;clear;close


//Variable declaration
N=20// unitless
lamda=5000*10**-10       //Angstroms to meters
t=2.5*10**-5 // in m

//Calculation
mu_1=(N*lamda)/t// unitless
mu=1+(mu_1)// unitless

//Result
printf("mu-1=%.1f",mu_1)
printf("\nRefractive index, mu=%1f",mu)