角谱光学计算,利用衍射中的角谱理论做光学计算。很多同学只会看书上讲的,但是没有接触过实际程序

  • M0_257912
    了解作者
  • 1.7KB
    文件大小
  • zip
    文件格式
  • 0
    收藏次数
  • VIP专享
    资源类型
  • 1
    下载次数
  • 2022-06-14 06:55
    上传日期
角谱光学计算,利用衍射中的角谱理论做光学计算。很多同学只会看书上讲的,但是没有接触过实际程序。实际做一个利用PWD角谱理论来做衍射聚焦的小程序。
fourier.zip
  • space.m
    1.1KB
  • domain.m
    536B
  • Fourier.m
    1.3KB
内容介绍
clc clear %% c=3*1e14; lambda = 0.05; var = space('x',100,500,'y',100,500); var.ft = var.ft+c./lambda; %% kz = 2*pi*sqrt((var.ft/c).^2-(var.fx).^2-(var.fy).^2); w0 =50; E = exp(-(var.x/w0).^2).*exp(-(var.y/w0).^2); % d=50;m=500; % for i=1:m % for j=1:m % if fftshift(var.x(i,j)).^2+fftshift(var.y(i,j)).^2<=(d/2).^2 % E(i,j)=1; % else % E(i,j)=0; % end % end % end figure(1) imagesc(fftshift(var.x_),fftshift(var.y_),fftshift(abs(E).^2)); colormap jet axis xy title('输入') Focus_length = 150; Fai_len = 2*pi*var.ft./c.*(var.x.^2+var.y.^2)/2/(Focus_length); STEP = 1:500; dz = 2*Focus_length./length(STEP); GPU_ON = 1; %% 初始化光场 if(GPU_ON) Ez = gpuArray(E.*exp(i*Fai_len)); P = gpuArray( exp(-i*kz.*dz)); section = gpuArray(zeros(length(var.y_),length(STEP))); else Ez = (E.*exp(i*Fai_len)); P = ( exp(-i*kz.*dz)); section = (zeros(length(var.y_),length(STEP))); end %% 模拟主程序 tic for index = STEP Ez = fft2(P.*ifft2(Ez)); section(:,index) = Ez(:,1); end toc %% figure(2) imagesc(fftshift(var.x_),fftshift(var.y_),fftshift(abs(Ez).^2)); colormap jet axis xy title('输出') figure(3) imagesc(STEP*dz,fftshift(var.y_),(abs(fftshift(section,1)))); colormap jet axis xy title('截面')
评论
    相关推荐
    • 祝贺小程序
      是一个可以送给女朋友的小程序,真的蛮不错的
    • 计算小程序
      很好的渐开线花键计算小程序 对需要的人很重要
    • 表白小程序
      里面有三个表白小程序,都行抖音里的。EXE格式 休闲时间小作
    • 小程序模板
      支付宝小程序的模板。支付宝小程序的模板。支付宝小程序的模板。支付宝小程序的模板。
    • 记账小程序
      簿记 曲线记账小程序小程序为及其示例小程序。 预览 可能由伴侣提供支持。
    • 关机小程序
      VC 写的关机小程序,不到2K。 注意,点了就关机了。
    • 招聘小程序
      体育圈招聘小程序,测试可用,不带后台,供参考。此源码仅可用作学习和交流。
    • 精美小程序
      精美小程序 精美小程序 精美小程序 精美小程序 精美小程序
    • 桌面小程序
      让桌面开花的小程序。 让桌面开花的小程序。 让桌面开花的小程序。 让桌面开花的小程序
    • 测绘小程序
      测绘小程序,大地测量四边形用到的小程序测绘小程序,大地测量四边形用到的小程序测绘小程序,大地测量四边形用到的小程序