While producing a color animation of a solution to the heat equation using Mathematica, we discover many ways to optimize Mathematica code, resulting in a program that runs hundreds of times faster than the original version.