function y=glag_linear(x) y=ones(size(x));