0001 ring=esrf; 0002 indcav=findcells(ring,'Class','RFCavity'); 0003 cav=ring(indcav(1)); 0004 ring(indcav(:))=[]; 0005 ring=[cav;ring]; 0006 0007 ring=atsetcavity(ring,8e6,0,992); 0008 0009 [fastring,fastringrad]=atfastring(ring);