functionESM2=funesm2(x,L0,L1,L2,m,alpha)T=input('T=');S1=zeros(round((L2-L0)/L1),length(x));S2=zeros(round((L2-L0)/L1),length(x));a2=zeros(round((L2-L0)/L1),length(x));