MHD_CONTROL_MOVIE is a pair of Mathematica routines which display the magnetic field or velocity field, using data from a particular run of a magnetic hydrodynamic control problem for a fluid flow in a 2D region.
The program used to generate the data is available in MHD_CONTROL.
The data files used for this particular animation are available in the MHD_CONTROL dataset directory.
You can go up one level to the Mathematica source codes.