s_Diffuser

 s_Diffuser

 See oiDiffuser for how to set up the 2D diffusing  An example from the
 header to that file is here:

   oi = oiCreate; scene = sceneCreate; scene = sceneSet(scene,'fov',1);
   oi = oiCompute(scene,oi); 
   % SD units are FWHM microns,
   [oi,sd,blurFilter] = oiDiffuser(oi,[10,2]);  
   [X,Y] = meshgrid(1:size(blurFilter,2),1:size(blurFilter,1));
   wSpatialRes = oiGet(oi,'widthSpatialResolution','microns');
   X = X*wSpatialRes;  Y = Y*wSpatialRes;
   X = X - mean(X(:)); Y = Y - mean(Y(:));
   figure(1); mesh(X,Y,blurFilter);