Optica is an outstanding program for geometric ray tracing. The current version of Optica does not handle diffraction, near-field or otherwise. It will however plot "spot diagrams" for you, and do some modest kinds of diffraction computations related to gratings.
If your apertures are typical, then they are circularly symmetric, and you can compute the far field diffraction pattern using a Hankel transform. For problems with circular symmetry, the two-dimensional Fourier transform becomes a one-dimensional Hankel transform. In Mathematica, this transformation can be computed numerically or analytically.
Near field work is a little more complicated because far-field approximations are not admissible.
Harald Berndt wrote: > > Sam Shearman wrote: > > > > Does anyone know of Mathematica code to calculate light propigation, > > with the diffractive effects of aperatures in the fresnel region? > > Thanks in advance, > > --Sam > > You should take a look at "Optica," described at > > -- > ______________________________________________________________________ > Harald Berndt, Ph.D. Research Specialist, > > Consultant > > Phone: 510-652-5974 FAX: 510-215-4299 > ______________________________________________________________________ > "I am what I am".................................. .Popeye the Sailor > > (KRYTEN:.............Are you sure? I always thought it was Descartes!) > (LISTER:.So did I, man! It's so easy to get those two dudes mixed up!)