0001 0002 clear all 0003 close all 0004 0005 % load lattice 0006 load ../../ESRFLattice.mat 0007 0008 % get indexes 0009 indq=find(atgetcells(ring,'Class','Quadrupole')); 0010 0011 % set multipole errors 0012 bn=[0 0 0 0 0 1.10934 0 0 0 -5.18658]*1e-4; 0013 0014 an=[ 0015 0 0016 0 0017 4.803458371 0018 1.910276957 0019 1.055734675 0020 0.588073151 0021 0.312742308 0022 0.175288289 0023 0.101114708 0024 0.064747269]'*1e-4; 0025 0026 [rerr,PolB,PolA]=AssignFieldErr(ring,indq,2,7*1e-3,bn,an); 0027 0028