Optica SE is our professional level optical design package for Mathematica. It performs polarization ray-tracing, non-sequential ray-tracing, energy calculations, and optimization of optical systems in three-dimensional space. It also performs symbolic modeling of optical systems, diffraction, interference, wave-front, and Gaussian beam propagation calculations . It has dynamic interactive graphics and can use CAD inputs into your optical models.  Single user license.
Optica package for all computer platforms supported by Mathematica. Zip-file format.