samer@0: % scope - arrow to create scrolling plot of real valued signals
samer@0: %
samer@0: % scope ::
samer@0: %    W:natural ~'width of plot in samples',
samer@0: % -> arrow({[[N,1]]}, {}, pair([[N,W]],pair(empty,empty))).
samer@0: %
samer@0: % If input vectors are N dimensional, this will plot
samer@0: % N lines showing their history over the last W samples.
samer@0: 
samer@0: 
samer@0: function b=scope(width,varargin)
samer@0: 	b=awindow(width,nan)*arr(@transpose)*plotter(varargin{:});