function stillcube,inspec,q,vpeakpt,vdisppt,res,sx,sy ;--------------------------------- ; The complement of the SHIFTCUBE function, which trims spectra ; but does not introduce any lag. ;--------------------------------- outspec=inspec(vpeakpt-q*vdisppt:vpeakpt+q*vdisppt) output=fltarr(sx,sy,2*q*vdisppt+1) for a=0,sx-1 do begin for b=0,sy-1 do begin output(a,b,*)=outspec endfor endfor return,output end