samer@32: function X=ipowspec(A,varargin)
samer@32: % IPOWSPEC - convert power/phase spectrum to wave
samer@32: %
samer@32: % ipowspec :: [[M+1,L]]~'power spec', [[M+1,L]]~'phase' -> [[2*M,L]]~'signal'.
samer@32: % ipowspec :: [[M+1,L]]~'power spec' -> [[2*M,L]]~'signal'.
samer@32: %
samer@32: % Second form uses random phases.
samer@32: X=imagspec(sqrt(A),varargin{:});
samer@32: