Email Record: Simulating Fourier optics using Mathematica /