Home > atdemos > atmatchExamples > FitQuadrupoleLength > compK1.m

compK1

PURPOSE

SYNOPSIS

function dif=compK1(arc,indQ1,indQ2,varargin)

DESCRIPTION

CROSS-REFERENCE INFORMATION

This function calls:

This function is called by:

MatchQuadLengthForEqualK1 adjusts length of QFA6 QFA8 to have the same K1
run_MatchQuadLengthForEqualK1 run the matching on S10 ESRF upgrade arc lattice

SOURCE CODE

0001 function dif=compK1(arc,indQ1,indQ2,varargin)
0002 
0003 KQ1=atgetfieldvalues(arc,indQ1,'PolynomB',{1,2});
0004 KQ2=atgetfieldvalues(arc,indQ2,'PolynomB',{1,2});
0005 
0006 dif=KQ2(1)-KQ1(1);
0007 
0008 return