lA=A(93:139:end);
lP=P(93:139:end);
lT=T(93:139:end);
lind=[0:length(lA)-1]
