% multiply a tensor by a scalar

function t = tscale(t,s)

cols = size(t,2)-1;
t(:,1:cols) = t(:,1:cols)*s;
