function [out] = linenv (inarg, astart, aend)
%linenv
  
intout = rceval (inarg);

xvec = [1:(length (intout))] - 1;
xvec = xvec / (length (xvec) - 1);
linvec = (1 - xvec) * astart + xvec * aend;
linvec = repmat (linvec, 2, 1);

out = intout .* linvec;