A lot of the files are identical to old ones, but the main changes are: 1) EXFit2.C in sx3cal - Finds front/right gains for each strip using the known middle two pad edges, but gainmatches all backs 2) Define new 'fix' loci, arising from the step-ladder correction to A1C2 events. This is tested in scratch/sx3z_vs_pcz/testmodel.h, will be given a better name in the future. 3) Explore A1C2 and A1C3 loci in detail 4) environment variables to 'flip' and 'offset' wires during sort. All env vars are set in shell scripts that call them 5) environment variables that allow for timestamp bounds to be set and unset. Default limiting values are 0 and dbl_max so no harm done unless these specific env vars are set. 6) Some bookkeeping indicating 27Al instead of 26Al in all places.
81 lines
1.8 KiB
Plaintext
81 lines
1.8 KiB
Plaintext
|
|
# --- configuration ---
|
|
datafilec = "../ANASEN_analysis/PW_study_Sudarsan/cathode1_2.dat"
|
|
datafilea = "../ANASEN_analysis/PW_study_Sudarsan/anode1_2.dat"
|
|
datafileqr = "../ANASEN_analysis/PW_study_Sudarsan/qqq_rings_geometry.dat"
|
|
datafileqw = "../ANASEN_analysis/PW_study_Sudarsan/qqq_wedges_geometry.dat"
|
|
|
|
set datafile separator ","
|
|
|
|
N = 24 #number of cids
|
|
|
|
# --- allocate arrays ---
|
|
array ca1x[N]
|
|
array an1x[N]
|
|
array ca1y[N]
|
|
array an1y[N]
|
|
array ca1z[N]
|
|
array an1z[N]
|
|
array ca2x[N]
|
|
array an2x[N]
|
|
array ca2y[N]
|
|
array an2y[N]
|
|
array ca2z[N]
|
|
array an2z[N]
|
|
array qqqW_Phi[64]
|
|
array qqqR_Rho[16]
|
|
|
|
# --- initialize (optional but safe) ---
|
|
do for [i=1:N] {
|
|
ca1x[i] = ca1y[i] = ca1z[i] = NaN;
|
|
ca2x[i] = ca2y[i] = ca2z[i] = NaN;
|
|
an1x[i] = an1y[i] = an1z[i] = NaN;
|
|
an2x[i] = an2y[i] = an2z[i] = NaN;
|
|
}
|
|
|
|
do for [j=1:16] {
|
|
do for [i=1:4] {
|
|
qqqW_Phi[i*4+j] = NaN
|
|
}
|
|
qqqR_Rho[j] = NaN
|
|
}
|
|
|
|
|
|
# --- load table into arrays ---
|
|
stats datafilec using \
|
|
(ca1x[int($1)+1] = $2, \
|
|
ca1y[int($1)+1] = $3, \
|
|
ca1z[int($1)+1] = $4, \
|
|
ca2x[int($1)+1] = $5, \
|
|
ca2y[int($1)+1] = $6, \
|
|
ca2z[int($1)+1] = $7, 0) \
|
|
nooutput
|
|
|
|
stats datafilea using \
|
|
(an1x[int($1)+1] = $2, \
|
|
an1y[int($1)+1] = $3, \
|
|
an1z[int($1)+1] = $4, \
|
|
an2x[int($1)+1] = $5, \
|
|
an2y[int($1)+1] = $6, \
|
|
an2z[int($1)+1] = $7, 0) \
|
|
nooutput
|
|
|
|
set datafile separator "\t"
|
|
stats datafileqr using \
|
|
(qqqR_Rho[int($1)+1] = $2, 0) \
|
|
nooutput
|
|
|
|
stats datafileqw using \
|
|
(qqqW_Phi[(int($1))*4+int($2)+1] = $3, 0) \
|
|
nooutput
|
|
|
|
#do for [i=1:N] {
|
|
# print sprintf("Data[%d] = %g", i, an1x[i])
|
|
# print sprintf("Data[%d] = %g", i, ca1x[i])
|
|
#}
|
|
|
|
set datafile separator whitespace
|
|
#plot '< cat /tmp/coords | grep q' u (ca1x[int($2)+1]):(ca1y[int($2)+1]):(ca1x[int($2)+1]):(ca1y[int($2)+1]) w vector
|
|
|
|
#pause mouse key
|