
%averages every p colums of xo into 1
p=4;

xo=x1ac01'; xa = avp(xo,p); x4ac01 = xa';
xo=x1ac02'; xa = avp(xo,p); x4ac02= xa';
xo=x1ac03'; xa = avp(xo,p); x4ac03 = xa';
xo=x1ac04'; xa = avp(xo,p); x4ac04 = xa';
xo=x1ac05'; xa = avp(xo,p); x4ac05 = xa';
xo=x1ac06'; xa = avp(xo,p); x4ac06= xa';
xo=x1ac07'; xa = avp(xo,p); x4ac07 = xa';
xo=x1ac08'; xa = avp(xo,p); x4ac08 = xa';
xo=x1ac09'; xa = avp(xo,p); x4ac09 = xa';
xo=x1ac10'; xa = avp(xo,p); x4ac10= xa';
xo=x1ac11'; xa = avp(xo,p); x4ac11= xa';
xo=x1ac12'; xa = avp(xo,p); x4ac12= xa';
xo=x1ac13'; xa = avp(xo,p); x4ac13 = xa';
xo=x1ac14'; xa = avp(xo,p); x4ac14 = xa';
xo=x1ac15'; xa = avp(xo,p); x4ac15 = xa';
xo=x1ac16'; xa = avp(xo,p); x4ac16= xa';
xo=x1ac17'; xa = avp(xo,p); x4ac17 = xa';
xo=x1ac18'; xa = avp(xo,p); x4ac18 = xa';
xo=x1ac19'; xa = avp(xo,p); x4ac19 = xa';
xo=x1ac20'; xa = avp(xo,p); x4ac20= xa';
xo=x1ac21'; xa = avp(xo,p); x4ac21= xa';
xo=x1ac22'; xa = avp(xo,p); x4ac22 = xa';

xo=x1dc01'; xa = avp(xo,p); x4dc01 = xa';
xo=x1dc02'; xa = avp(xo,p); x4dc02= xa';
xo=x1dc03'; xa = avp(xo,p); x4dc03 = xa';
xo=x1dc04'; xa = avp(xo,p); x4dc04 = xa';
xo=x1dc05'; xa = avp(xo,p); x4dc05 = xa';
xo=x1dc06'; xa = avp(xo,p); x4dc06= xa';
xo=x1dc07'; xa = avp(xo,p); x4dc07 = xa';
xo=x1dc08'; xa = avp(xo,p); x4dc08 = xa';
xo=x1dc09'; xa = avp(xo,p); x4dc09 = xa';
xo=x1dc10'; xa = avp(xo,p); x4dc10= xa';
xo=x1dc11'; xa = avp(xo,p); x4dc11= xa';
xo=x1dc12'; xa = avp(xo,p); x4dc12= xa';
xo=x1dc13'; xa = avp(xo,p); x4dc13 = xa';
xo=x1dc14'; xa = avp(xo,p); x4dc14 = xa';
xo=x1dc15'; xa = avp(xo,p); x4dc15 = xa';
xo=x1dc16'; xa = avp(xo,p); x4dc16= xa';
xo=x1dc17'; xa = avp(xo,p); x4dc17 = xa';
xo=x1dc18'; xa = avp(xo,p); x4dc18 = xa';
xo=x1dc19'; xa = avp(xo,p); x4dc19 = xa';
xo=x1dc20'; xa = avp(xo,p); x4dc20= xa';
xo=x1dc21'; xa = avp(xo,p); x4dc21= xa';
xo=x1dc22'; xa = avp(xo,p); x4dc22 = xa';

xo=x1ad01'; xa = avp(xo,p); x4ad01 = xa';
xo=x1ad02'; xa = avp(xo,p); x4ad02= xa';
xo=x1ad03'; xa = avp(xo,p); x4ad03 = xa';
xo=x1ad04'; xa = avp(xo,p); x4ad04 = xa';
xo=x1ad05'; xa = avp(xo,p); x4ad05 = xa';
xo=x1ad06'; xa = avp(xo,p); x4ad06= xa';
xo=x1ad07'; xa = avp(xo,p); x4ad07 = xa';
xo=x1ad08'; xa = avp(xo,p); x4ad08 = xa';
xo=x1ad09'; xa = avp(xo,p); x4ad09 = xa';
xo=x1ad10'; xa = avp(xo,p); x4ad10= xa';
xo=x1ad11'; xa = avp(xo,p); x4ad11= xa';
xo=x1ad12'; xa = avp(xo,p); x4ad12= xa';
xo=x1ad13'; xa = avp(xo,p); x4ad13 = xa';
xo=x1ad14'; xa = avp(xo,p); x4ad14 = xa';
xo=x1ad15'; xa = avp(xo,p); x4ad15 = xa';
xo=x1ad16'; xa = avp(xo,p); x4ad16= xa';
xo=x1ad17'; xa = avp(xo,p); x4ad17 = xa';
xo=x1ad18'; xa = avp(xo,p); x4ad18 = xa';
xo=x1ad19'; xa = avp(xo,p); x4ad19 = xa';
xo=x1ad20'; xa = avp(xo,p); x4ad20= xa';
xo=x1ad21'; xa = avp(xo,p); x4ad21= xa';
xo=x1ad22'; xa = avp(xo,p); x4ad22 = xa';

xo=x1pd01'; xa = avp(xo,p); x4pd01 = xa';
xo=x1pd02'; xa = avp(xo,p); x4pd02= xa';
xo=x1pd03'; xa = avp(xo,p); x4pd03 = xa';
xo=x1pd04'; xa = avp(xo,p); x4pd04 = xa';
xo=x1pd05'; xa = avp(xo,p); x4pd05 = xa';
xo=x1pd06'; xa = avp(xo,p); x4pd06= xa';
xo=x1pd07'; xa = avp(xo,p); x4pd07 = xa';
xo=x1pd08'; xa = avp(xo,p); x4pd08 = xa';
xo=x1pd09'; xa = avp(xo,p); x4pd09 = xa';
xo=x1pd10'; xa = avp(xo,p); x4pd10= xa';
xo=x1pd11'; xa = avp(xo,p); x4pd11= xa';
xo=x1pd12'; xa = avp(xo,p); x4pd12= xa';
xo=x1pd13'; xa = avp(xo,p); x4pd13 = xa';
xo=x1pd14'; xa = avp(xo,p); x4pd14 = xa';
xo=x1pd15'; xa = avp(xo,p); x4pd15 = xa';
xo=x1pd16'; xa = avp(xo,p); x4pd16= xa';
xo=x1pd17'; xa = avp(xo,p); x4pd17 = xa';
xo=x1pd18'; xa = avp(xo,p); x4pd18 = xa';
xo=x1pd19'; xa = avp(xo,p); x4pd19 = xa';
xo=x1pd20'; xa = avp(xo,p); x4pd20= xa';
xo=x1pd21'; xa = avp(xo,p); x4pd21= xa';
xo=x1pd22'; xa = avp(xo,p); x4pd22 = xa';
