Change in energy_p_new_barrier.F, in eelec, aorund line 3065