experiment_1 - disp('Acceptance angle of fiber in degree is...

Info iconThis preview shows page 1. Sign up to view the full content.

View Full Document Right Arrow Icon
clc; clear all; disp('fundamental of step index fibers'); n1=input('enter the index of core =');%1.4 to 1.5 n2=input('enter the index of cladding =');%1.4 to 1.5 ,n2<n1 lamda=input('enter the operating wavelength of fiber =');%1.1 to 1.7 micrometer NA=((n1^2)-(n2^2))^(1/2);%calculation of numerical aperture disp('numerical aperture of fiber is ='); disp(NA); theta=asind(NA);%calculation of acceptance angle
Background image of page 1
This is the end of the preview. Sign up to access the rest of the document.

Unformatted text preview: disp('Acceptance angle of fiber in degree is ='); disp(theta); ohm=pi*(NA^2);%calculation of solid acceptance angle disp('solid acceptance angle of fiber in radian is ='); disp(ohm); beta=(2*pi*n1/lamda)*cos(theta);%calculation of propogation constant disp('Propogation constant of fiber in degree per micrometer is ='); disp(beta);...
View Full Document

Ask a homework question - tutors are online