Spectral density as a function of source separation for point scatterers illuminated by partially coherent light

From Optical Imaging and Spectroscopy (Wiley - OSA 2009)
By David J. Brady
www.opticalimaging.org
Figure 6.3

jinc[r_]:=BesselJ[1,Pi r]/(2 r + 10^(-15));

<<Version5`Graphics`

ab=Plot3D[1+jinc[a/(lambda+10^(-6))],{a,0,5},{lambda,.5,1},PlotRange->{{0,5},{.5,1},{0,2}},PlotPoints->100,Mesh->False,ColorOutput->GrayLevel,AxesLabel->{a,λ,S},PlotLabel->a]

Clear[b]

bb=Plot[1+jinc[1.5/(lambda+10^(-6))],{lambda,.5,1},FrameLabel->{λ,S},Axes->False,Frame->True,PlotLabel->b]

Show[GraphicsArray[{{ab},{bb}}]]