单模光纤与多模光纤的耦合.pdf

该【单模光纤与多模光纤的耦合】是由【鼠标】上传分享，文档一共【1】页，该文档可以免费在线阅读，需要了解更多关于【单模光纤与多模光纤的耦合】的内容，可以使用淘豆网的站内搜索功能，选择自己适合的文档，以下文字是截取该文章内的部分文字，如需要获得完整电子版，请下载此文档到您的设备，方便您编辑和打印。% 单模光纤与多模光纤的耦合 
clear all 
format long 
 
a1 = -6;           % 多模光纤半径 a 
a0 = -6;           %单模光纤半径 
wl = 1550e-9;           %波长 lambda 
n01 = ;     n02 = ;      %单模光纤折射率 
n1 = ;      n2 = ;     %多模光纤折射率 
V0 = 2*pi*a0/wl*sqrt(n01^2-n02^2);   %单模归一化频率 
w = a0/sqrt(log(2)*(+*V0^-+*V0^-6));   %高斯光束半高宽 
 
v = 1:50;              %纤芯模序数 
V = 2*pi*a1/wl*sqrt(n1^2-n2^2);         %多模归一化频率 
uv = (2*v-1/2)*pi/2;  
wv = sqrt(V^2-uv.^2);  
 
 up = 2*(w/a1)^2*exp(-*w^2/a1*uv.^2);  
 down1 = besselj(0,uv).^2 + besselj(1,uv).^2;  
 down2 = besselk(1,wv).^2./besselk(0,wv).^2;  
 down3 = besselj(0,uv).^2;  
 down = down1+(down2-1).*down3;  
 eta = real(up./down);  
 
%{ 
eta = 2*(w/a1)^2*exp(-*w^2/a1*((2*v-1/2)*pi/2).^2)./ ...,  
    (besselj(0,((2*v-)*pi/2)).^2 + besselj(1,((2*v-)*pi/2)).^2+ ..., 
    
(besselk(1,sqrt(V^2-((2*v-)*pi/2).^2)).^2./besselk(0,sqrt(V^2-((2*v-
)*pi/2).^2)).^2 -1).* ...,  
    besselj(0,((2*v-)*pi/2)).^2); 
%} 
plot(v,eta,'*','markersize',5)