source: MML/trunk/mml/doc_html/mml/measdispresp.html @ 4

Last change on this file since 4 was 4, checked in by zhangj, 10 years ago

Initial import--MML version from SOLEIL@2013
File size: 8.4 KB
Line 
1<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"
2                "http://www.w3.org/TR/REC-html40/loose.dtd">
3<html>
4<head>
5  <title>Description of measdispresp</title>
6  <meta name="keywords" content="measdispresp">
7  <meta name="description" content="MEASDISPRESP - Measures Amman TERMs in response matrix">
8  <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
9  <meta name="generator" content="m2html &copy; 2003 Guillaume Flandin">
10  <meta name="robots" content="index, follow">
11  <link type="text/css" rel="stylesheet" href="../m2html.css">
12</head>
13<body>
14<a name="_top"></a>
15<div><a href="../index.html">Home</a> &gt;  <a href="index.html">mml</a> &gt; measdispresp.m</div>
16
17<!--<table width="100%"><tr><td align="left"><a href="../index.html"><img alt="<" border="0" src="../left.png">&nbsp;Master index</a></td>
18<td align="right"><a href="index.html">Index for mml&nbsp;<img alt=">" border="0" src="../right.png"></a></td></tr></table>-->
19
20<h1>measdispresp
21</h1>
22
23<h2><a name="_name"></a>PURPOSE <a href="#_top"><img alt="^" border="0" src="../up.png"></a></h2>
24<div class="box"><strong>MEASDISPRESP - Measures Amman TERMs in response matrix</strong></div>
25
26<h2><a name="_synopsis"></a>SYNOPSIS <a href="#_top"><img alt="^" border="0" src="../up.png"></a></h2>
27<div class="box"><strong>function [D] = measdispresp(CMfamily, CMlist); </strong></div>
28
29<h2><a name="_description"></a>DESCRIPTION <a href="#_top"><img alt="^" border="0" src="../up.png"></a></h2>
30<div class="fragment"><pre class="comment"> MEASDISPRESP - Measures Amman TERMs in response matrix
31 Dmat = measdispresp(CMfamily, CMlist);
32 
33 INPUTS
34 1. CMfamily - Magnet corrector family
35 2. CMlist - List of magnet corrector
36
37 OUTPUTS
38 1. D Energy part of the bpm response matrix
39
40 Seems to measure Amman TERMs in response matrix</pre></div>
41
42<!-- crossreference -->
43<h2><a name="_cross"></a>CROSS-REFERENCE INFORMATION <a href="#_top"><img alt="^" border="0" src="../up.png"></a></h2>
44This function calls:
45<ul style="list-style-image:url(../matlabicon.gif)">
46<li><a href="getbpm.html" class="code" title="function [BPM1, BPM2, FileName]=getbpm(varargin);">getbpm</a>     GETBPM - Returns the horizontal and vertical orbit</li><li><a href="getdcct.html" class="code" title="function [DCCT, tout, DataTime, ErrorFlag] = getdcct(varargin)">getdcct</a>       GETDCCT - returns the beam current</li><li><a href="gethcmfamily.html" class="code" title="function Family = gethcmfamily">gethcmfamily</a>     GETHCMFAMILY - Returns the default horizontal corrector family</li><li><a href="getrf.html" class="code" title="function [RFsp, RFam, DataTime, ErrorFlag] = getrf(varargin)">getrf</a> GETRF - Gets the RF frequency</li><li><a href="getsp.html" class="code" title="function [SP, tout, DataTime, ErrorFlag] = getsp(Family, varargin)">getsp</a>    GETSP - Gets setpoint channels</li><li><a href="getvcmfamily.html" class="code" title="function Family = getvcmfamily">getvcmfamily</a> GETVCMFAMILY - Returns the default vertical corrector family</li><li><a href="setsp.html" class="code" title="function ErrorFlag = setsp(Family, varargin)">setsp</a>   SETSP - Makes an absolute setpoint change to the 'Setpoint' field</li></ul>
47This function is called by:
48<ul style="list-style-image:url(../matlabicon.gif)">
49</ul>
50<!-- crossreference -->
51
52
53<h2><a name="_source"></a>SOURCE CODE <a href="#_top"><img alt="^" border="0" src="../up.png"></a></h2>
54<div class="fragment"><pre>0001 <a name="_sub0" href="#_subfunctions" class="code">function [D] = measdispresp(CMfamily, CMlist);</a>
550002 <span class="comment">% MEASDISPRESP - Measures Amman TERMs in response matrix</span>
560003 <span class="comment">% Dmat = measdispresp(CMfamily, CMlist);</span>
570004 <span class="comment">%</span>
580005 <span class="comment">% INPUTS</span>
590006 <span class="comment">% 1. CMfamily - Magnet corrector family</span>
600007 <span class="comment">% 2. CMlist - List of magnet corrector</span>
610008 <span class="comment">%</span>
620009 <span class="comment">% OUTPUTS</span>
630010 <span class="comment">% 1. D Energy part of the bpm response matrix</span>
640011 <span class="comment">%</span>
650012 <span class="comment">% Seems to measure Amman TERMs in response matrix</span>
660013
670014 <span class="comment">% Written By Spear3 people</span>
680015 <span class="comment">% Modified by Laurent S. Nadolski</span>
690016
700017 <span class="comment">% Initialize</span>
710018 MMmax = 6;      <span class="comment">% to set corrector strength magnitude</span>
720019 Navg=6;
730020 DeltaMO = 1;
740021 Delay1 = 2;
750022 Delay2 = 2;
760023
770024 <span class="keyword">if</span> CMfamily == <a href="getvcmfamily.html" class="code" title="function Family = getvcmfamily">getvcmfamily</a>
780025     Dim = 2;
790026 <span class="keyword">elseif</span> CMfamily == <a href="gethcmfamily.html" class="code" title="function Family = gethcmfamily">gethcmfamily</a>
800027     Dim = 1;
810028 <span class="keyword">else</span>
820029     error(<span class="string">'Dim set problem'</span>);
830030 <span class="keyword">end</span>
840031
850032
860033 <span class="comment">% Save corrector magnet starting points</span>
870034 CM0 = <a href="getsp.html" class="code" title="function [SP, tout, DataTime, ErrorFlag] = getsp(Family, varargin)">getsp</a>(CMfamily, CMlist);
880035 MO0 = getmo;
890036 DCCT0 = <a href="getdcct.html" class="code" title="function [DCCT, tout, DataTime, ErrorFlag] = getdcct(varargin)">getdcct</a>;
900037
910038 <span class="keyword">for</span> i=1:max(size(CMlist,1))
920039     fprintf(<span class="string">'%s Sector %d Magnet #%d\n'</span>,CMfamily, CMlist(i,1), CMlist(i,2)); drawnow;
930040     
940041     <span class="comment">% Get change in amps</span>
950042     DeltaAmps = mm2amps(CMfamily, MMmax, CMlist(i,:))
960043         
970044     <span class="comment">% plus CM</span>
980045     CMam=<a href="setsp.html" class="code" title="function ErrorFlag = setsp(Family, varargin)">setsp</a>(CMfamily, CM0(i)+DeltaAmps, CMlist(i,:));
990046     setmo(MO0+DeltaMO);
1000047     sleep(Delay1);
1010048     BPMp = <a href="getbpm.html" class="code" title="function [BPM1, BPM2, FileName]=getbpm(varargin);">getbpm</a>(Dim, Navg);
1020049     RFp= <a href="getrf.html" class="code" title="function [RFsp, RFam, DataTime, ErrorFlag] = getrf(varargin)">getrf</a>;
1030050     
1040051     setmo(MO0-DeltaMO);
1050052     sleep(Delay2);
1060053     BPMm = <a href="getbpm.html" class="code" title="function [BPM1, BPM2, FileName]=getbpm(varargin);">getbpm</a>(Dim, Navg);
1070054     RFm= <a href="getrf.html" class="code" title="function [RFsp, RFam, DataTime, ErrorFlag] = getrf(varargin)">getrf</a>;
1080055     
1090056     Dp = (BPMp-BPMm)/(RFp-RFm);
1100057         
1110058     <span class="comment">% minus CM</span>
1120059     CMam=<a href="setsp.html" class="code" title="function ErrorFlag = setsp(Family, varargin)">setsp</a>(CMfamily, CM0(i)-DeltaAmps, CMlist(i,:));
1130060     setmo(MO0+DeltaMO);
1140061     sleep(Delay1);
1150062     BPMp = <a href="getbpm.html" class="code" title="function [BPM1, BPM2, FileName]=getbpm(varargin);">getbpm</a>(Dim, Navg);
1160063     RFp= <a href="getrf.html" class="code" title="function [RFsp, RFam, DataTime, ErrorFlag] = getrf(varargin)">getrf</a>;
1170064     
1180065     setmo(MO0-DeltaMO);
1190066     sleep(Delay2);
1200067     BPMm = <a href="getbpm.html" class="code" title="function [BPM1, BPM2, FileName]=getbpm(varargin);">getbpm</a>(Dim, Navg);
1210068     RFm= <a href="getrf.html" class="code" title="function [RFsp, RFam, DataTime, ErrorFlag] = getrf(varargin)">getrf</a>;
1220069     
1230070     Dm = (BPMp-BPMm)/(RFp-RFm);
1240071   
1250072     <span class="comment">% Reset corrector magnet and MO</span>
1260073     CMam=<a href="setsp.html" class="code" title="function ErrorFlag = setsp(Family, varargin)">setsp</a>(CMfamily, CM0(i), CMlist(i,:));
1270074     setmo(MO0);
1280075     
1290076     D(:,i) = (Dp-Dm)/(2*DeltaAmps);
1300077     
1310078     <span class="keyword">if</span> (abs(DCCT0-<a href="getdcct.html" class="code" title="function [DCCT, tout, DataTime, ErrorFlag] = getdcct(varargin)">getdcct</a>) &gt; 10)
1320079         disp(<span class="string">'Beam current dropped 10 milliamps.'</span>);
1330080         disp(<span class="string">'Refill then hit return.'</span>); pause;
1340081         DCCT0 = <a href="getdcct.html" class="code" title="function [DCCT, tout, DataTime, ErrorFlag] = getdcct(varargin)">getdcct</a>;
1350082     <span class="keyword">end</span>;
1360083 <span class="keyword">end</span></pre></div>
137<hr><address>Generated on Mon 21-May-2007 15:29:18 by <strong><a href="http://www.artefact.tk/software/matlab/m2html/">m2html</a></strong> &copy; 2003</address>
138</body>
139</html>
Note: See TracBrowser for help on using the repository browser.