Remove unused variables thetaz_mcs,thetax_mcs,gauss2,initial_xp from subroutine mcs(..), and gauss2,initial_xp from subroutine scamcs(..).
Remove unused variables thetaz_mcs,thetax_mcs,gauss2,initial_xp from subroutine mcs(..), and gauss2,initial_xp from subroutine scamcs(..).

They were detected when removing optimization flags and switching on floating-point exceptions revealed a div/0 error.

SixTrack/SixTrack,SixTrack/SixTrack,SixTrack/SixTrack,SixTrack/SixTrack,SixTrack/SixTrack,SixTrack/SixTrack