3651/CH8/EX8.7/7.sce


1
2
3
4
5
6
7
8
9
10
11

//variable declaration
a=5;
n1=1.48;
delta=0.01;
V=25;

//Calculation
lamda=(%pi*(a*10**-6)*n1*sqrt(2*delta))/V   // Cutoff Wavelength

//Result
printf('Cutoff Wavellength =%0.3f micro m. \n',(lamda*10**7))