blob: 95bd6db037e6b4fd7fa49da3e29d2f6a90a5a287 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
|
// Example 2.14
// Calculation of critical wavelength
// Page no 483
clc;
clear;
close;
//Given data
a=3*10^-6; // Core diameter of fiber
delta=0.15; // Relative refractive index
v=2.405; // Normalized frequency
// Critical wavelength
lambda=(2*%pi*a*delta)/v;
lambda=lambda*10^9;
//Displaying The Results in Command Window
printf("\n Critical wavelength (nm)= %0.0f ",lambda);
// The answers vary due to round off error
|
