Visualizing the "frequency shift" theorem in FFT
In the line

Inverse_GShifted=real(ifft(GShifted));


I have changed to 

Inverse_GShifted=real(fftshift(ifft(GShifted)));


This is because the ifft output is from $0 \le n \le N-1$, but your actual time output is symmetric about $n=0$. So what you have to do is to center it around $n=0$ by doing fftshift() command. It will give the output of $-N/2 \le n \le N/2-1$ whose plot is below



Regarding the zoomed output, the IFFT of gaussian function $G(f)$ is again Gaussian $g(t)$. It is getting modulated or point-by-point multiplied by $e^{j\omega_0 n}$ where $\omega_0 = 1400/4500\pi$ (considering $-\pi \le \omega_0 \le \pi$), which is the shift in frequency that you applied. ie, $g[n].*e^{j\frac{14}{45}\pi n}$. The period of this waveform turns out to be $\approx 6.43$ so you will see the peaks repeated after every 6 or 7 samples which is correct as per the zoomed plot. $14/45$ being irrational may be the reason why period is not an integer.