runtotest_atmatch macro match dba test lattice beta functions and dispersion using
SOURCE CODE
0001 function [by]=bety(Seq,indx)
0002 % get value of bety for Seq(indx)
0003
0004 T=twissring(Seq,0,indx);
0005 b=cat(1,T.beta);
0006 by=b(:,2)';
0007
0008 end