单模光纤基模色散曲线标量分析的Matlab实现

n1=1.45) O+ U2 p7 T& C# k% u" X( Z* @5 ^& h
n2=1.447: p4 V& z: i( `% u! K
a=4.5

k=(a^2)*(n1^2-n2^2);
3 x, V! }/ j' Ku1=(a^2)*(n1^2);# W7 `- i$ Y4 t0 c7 l& q
w1=(a^2)*(n2^2);% @  f, B3 M. S. _; o8 d
XiShu1=(n1^2+n2^2)/(2*n1^2);
; |) x( z. ^$ A- W, ^# u, yXiShu2=(n1^2-n2^2)/(2*n1^2);! t. p/ @& R: ]# o
i=1;

n=n2;