Alpha currents driven by ion cyclotron resonance heating in a tokamak fusion reactor