function y=glag_expdecay(x) y=exp(-x);