A Study of the Nonlinear Thomson Effect Produced by Changing the Current in a Thermoelectric Cooler