GETCOD Closed Orbit Distortion GETCOD(RING,DP) finds closed orbit for a given momentum deviation DP. It calls FINDORBIT4 which assumes a lattice with NO accelerating cavities and NO radiation
0001 function orbit = getcod(RING, DP) 0002 % GETCOD Closed Orbit Distortion 0003 % GETCOD(RING,DP) finds closed orbit for a given momentum 0004 % deviation DP. It calls FINDORBIT4 which assumes a lattice 0005 % with NO accelerating cavities and NO radiation 0006 0007 0008 if nargin < 1 0009 global THERING 0010 end 0011 if nargin < 2 0012 DP = 0.0; 0013 end 0014 0015 %localspos = findspos(THERING,1:length(RING)+1); 0016 orbit = findorbit4(THERING,DP,1:length(RING)+1);