ListPlot[ Table[ { phi, phi + Sgn[ phi ] }, { phi, -Pi, Pi, Pi/1000 } ] ]