激光通过大气湍流的影响

%M脚本文件（程序）
subplot（321）;
for L=0:100:10000
    Cn=8*10^（-9）;
   th=4.03*Cn.^（6/5）*0.6328.^（-1/5）*L.^（3/5）;
    rad=th*L;
    plot（Lrad‘-‘） 
hold on
end
% title（‘光斑尺度和传输距离的关系‘）
xlabel（‘传输距离‘）
ylabel（‘光斑尺度‘）

subplot（322）;
for Cn=0:5*10^（-9）:500*10^（-9）
     L=1000;
 th=4.03*Cn.^（6/5）*0.6328.^（-1/5）*L.^（3/5）;
    rad=th*L;
    plot（Cnrad‘-‘） 
    hold on
end
% title（‘光斑尺度和湍流强度的关系‘）
xlabel（‘湍流强度‘）
ylabel（‘光斑尺度‘）

subplot（323）;
for L=0:100:10000
    Cn=8*10^（-9）;
  alf=sqrt（1.75*Cn*Cn*L*3.2^（-1/3）*10^（-18））;
    plot（Lalf‘-‘） 
hold on
end
% title（‘光斑偏移角