Cálculo Del Número de Modos
Cálculo Del Número de Modos
Cálculo Del Número de Modos
clc;
clear all;
close all;
a = input('Enter the Core radius in micro meter: ');
n1 = input('Enter the refractive index of core: ');
n2 = input('Enter the refractive index of cladding: ');
alpha = input('Enter the parameter that determines graded index profile: ');
n=1;
for Lambda=800:50:1600
k(Lambda+50)=2*pi/Lambda;
M=(alpha/(alpha+2))*(a^2)*(k(Lambda+50)^2)*(n1^2)*Delta*10^(4);
Modos(n)=M;
n=n+1;
disp(sprintf('Cte. Prop. Esp. Lib. a %d nm. = %f ',Lambda, k(Lambda+50)));
end
Lambda=800:50:1600;
%Modos=M;
plot(Lambda,Modos,'r--','linewidth',3);
title('CÁLCULO DEL NÚMERO DE MODOS SOPORTADO EN UNA FIBRA DE INDICE GRADUAL M');
xlabel('Longitud de Onda (nm.)');
ylabel('Número de Modos');
grid;
legend('CURVA Long. Onda vs. Nº Modos');