i[L_,w1_,w2_,z_,x_,y_]:=((4*w1*w2/L*z)sinc(2w1*x/L*z)*sinc(2w2*y/L*z))^2
Plot3D[i[400*10^-6,200*10^-6,100*10^-6,1000,x,y],{x,-3,3},{y,-3,3},PlotRange->All,PlotPoints->50,BoxRatios->{1,1,0.8}]
ContourPlot[i[400*10-6,200*10^-6,100*10^-6,1000,x,y],{x,-3,3},{y,-3,3},PlotPoints->200]
为什么 画不出来图
