mspectrum : Amplitude and Power spectrum
  Call  :
      function [A,P,smoothP,kx]=mspectrum(x,dx)
  
  1D (A)mplitude and (P)owerspectrum of x-series with spacing dx