Below is the test script (for ease of copy/paste extraction for online viewers). Following is the test script along with its output.
spec = [1 1 1 0 0 0 1 1]'; % Lowpass cutting off at fs*3/8 format short; mps(spec) abs(mps(spec)) ifft(spec) ifft(mps(spec))