summaryrefslogtreecommitdiff
path: root/3543/CH2/EX2.1/Ex2_1.sce
blob: 898f7df1cb4473274026e9ba54206b1a3249206c (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
// Example 2.1
// Calculation of core diameter
// Page no 31

clc;
clear;
close;

// Given data
n1=1.5;               // Refractive index of core
n2=1.48;              // Refractive index of cladding
N=1000;               // No of modes
lambda=1.3;           // Light wavelength
V=sqrt(2*N);          // Mode parameter

//core diameter
d=(lambda*V)/(2*%pi*sqrt(n1^2-n2^2));   


//Display result on command window
printf("\n Mode parameter = %0.2f  ",V);
printf("\n Core diameter(micrometer)= %0.0f  ",d);

// Answer is wrong in the book.