A series of Mathematica notebooks dealing with polarization, electric field potential, wave propagation, and plane wave transmission between two materials. Plus, there are introductory materials where appropriate.