summaryrefslogtreecommitdiff
path: root/2780/CH6/EX6.4/Ex6_4.sce
blob: 90b091c797d75553aeafcefa7e1a5a602e802661 (plain)
1
2
3
4
5
6
7
8
9
clc
//to calculate cut-off wavelength of the fibre
//(2*del)^(1/2)=(2*(n1-n2)/n1)^(1/2)=(0.005)^(1/2)=0.071
a=5*10^-6 //radius in micrometre
n1=1.46 //core refractive index in micrometre
Vc=2.405 //cut-off value of V parametre for single mode operation
//formula is LAMBDAc=(2*%pi*a*n1*(2*del)^(1/2))/Vc 
lambdac=(2*%pi*a*n1*0.071)/Vc
disp("cut-off wavelength is LAMBDAc="+string(lambdac)+"metre")