sin.m

本软件使用matlab预言编写

function [ n ] = SiN( Lamda )
%计算纯石英对应某波长的折射率
%B=[0.69681,0.40817,0.89493];
%L=[0.06853,0.11612,9.9140];
%L2=L.^2;
%B=[0.6961663,0.4079426,0.8974994];
%L2=[0.004679148,0.01351206,97.934002];
%n_tmp=Lamda.*0;
%for i=1:3
%    dummy1=(Lamda.^2).*B(i);
%    dummy2=Lamda.^2-L2(i);
%    n_tmp=n_tmp+dummy1./dummy2;
%end
%n=sqrt(1+n_tmp);
n=Lamda.*0+1.45;