Jpp  15.0.1-rc.1-highQE
the software that should make you happy
 All Classes Namespaces Files Functions Variables Typedefs Enumerations Enumerator Friends Macros Pages
plot-canberra.sh
Go to the documentation of this file.
1 #!/bin/zsh
2 script=${0##*/}
3 
4 zmodload zsh/mathfunc
5 
6 if [ -z $JPP_DIR ]; then
7  echo "Variable JPP_DIR undefined."
8  exit
9 fi
10 
11 source $JPP_DIR/setenv.sh $JPP_DIR >& /dev/null
12 
13 set_variable: DEBUG ACOUSTICS_DEBUG 2
14 set_variable: WORKDIR ACOUSTICS_WORKDIR ./
15 set_variable FORMULA "[0] * exp(-0.5 * (x-[1])*(x-[1]) / ([2]*[2]))"
16 set_variable NUMBER_OF_ENTRIES 100
17 set_variable TMIN_MS -1.0
18 set_variable TMAX_MS +1.0
19 set_variable: FORMAT GRAPHICS_FORMAT gif
20 set_variable+ BATCH GRAPHICS_BATCH -B
21 
22 if do_usage $*; then
23  usage "$script <detector file> <input file>"\
24  "\nInput file corresponds to the output of JKatoomba[.sh]."
25 fi
26 
27 if (( $# != 2 )); then
28  fatal "Wrong number of arguments."
29 fi
30 
31 set_variable DETECTOR $argv[1]
32 set_variable INPUT_FILE $argv[2]
33 
34 eval `JPrintDetector -a $DETECTOR -O IDENTIFIER`
35 eval `JPrintDetector -a $DETECTOR -O SUMMARY`
36 
37 source JAcoustics.sh $DETECTOR_ID
38 
39 CHECK_EXIT_CODE
40 
41 
42 typeset -A TRIPODS
43 
44 get_tripods $WORKDIR/tripod.txt TRIPODS
45 
46 for EMITTER in ${(@k)TRIPODS}; do
47 
48  JCanberra \
49  -a $DETECTOR \
50  -f $INPUT_FILE \
51  -o "$WORKDIR/canberra[${EMITTER}].root" \
52  -T $WORKDIR/tripod.txt \
53  -V $WORKDIR/sound_velocity.txt \
54  -M $WORKDIR/mechanics.txt \
55  -E $EMITTER \
56  -d $DEBUG --!
57 done
58 
59 
60 HISTOGRAMS=(`ls $WORKDIR/canberra\[*\].root`)
61 
62 JOpera1D \
63  -f "${HISTOGRAMS//\.root/.root:.*toa}" \
64  -u Add \
65  -o $WORKDIR/sum.root >& /dev/null
66 
67 set_variable X `JPrintResult -f $WORKDIR/sum.root:\.\* -F GetMean`
68 set_variable RMS `JPrintResult -f $WORKDIR/sum.root:\.\* -F GetRMS`
69 
70 let XMIN="$X - 3.0*$RMS"
71 let XMAX="$X + 3.0*$RMS"
72 
73 JFit \
74  -f $WORKDIR/sum.root:\.\* \
75  -F "$FORMULA" \
76  -@ "p0 = GetMaximum" \
77  -@ "p1 = $X" \
78  -@ "p2 = 0.5*$RMS" \
79  -x "$XMIN $XMAX" \
80  -o $WORKDIR/fit.root \
81  -d $DEBUG
82 
83 let XMIN="$TMIN_MS * 1.0e-3"
84 let XMAX="$TMAX_MS * 1.0e-3"
85 
86 JPlot1D \
87  -f $WORKDIR/fit.root:\.\* \
88  -\> "#Deltat [s]" \
89  -x "$XMIN $XMAX" \
90  -N "X 505" \
91  -T "" \
92  -s 0 \
93  -o $WORKDIR/canberra.$FORMAT $BATCH
94 
95 rm -f $WORKDIR/sum.root
96 rm -f $WORKDIR/fit.root
97 
98 kill_child_processes_at_exit
99 
100 attach getModule -a $DETECTOR
101 
102 typeset -Z 4 STRING
103 typeset -Z 2 FLOOR
104 
105 set_variable FIRST_FLOOR 1
106 
107 for STRING in $STRINGS[*]; do
108 
109  echo -n "Creating graphics for string $STRING.."
110 
111  HISTOGRAMS=()
112 
113  for EMITTER in ${(@k)TRIPODS}; do
114 
115  set_variable STRING_TXT $WORKDIR/string_${STRING}\[${EMITTER}\].txt
116  set_variable STRING_ROOT $WORKDIR/string_${STRING}\[${EMITTER}\].root
117 
118  rm -f $STRING_TXT
119 
120  for (( FLOOR = $FIRST_FLOOR; $FLOOR <= $LAST_FLOOR; FLOOR += 1 )); do
121 
122  sput $STRING $FLOOR
123  sget MODULE
124 
125  set_variable N `JPrintResult -f $WORKDIR/canberra\[$EMITTER\].root:${MODULE} -F GetEntries`
126 
127  if [[ -n "$N" ]] && (( $N >= $NUMBER_OF_ENTRIES )); then
128 
129  set_variable X `JPrintResult -f $WORKDIR/canberra\[$EMITTER\].root:${MODULE} -F GetMean`
130  set_variable RMS `JPrintResult -f $WORKDIR/canberra\[$EMITTER\].root:${MODULE} -F GetRMS`
131 
132  let XMIN="$X - 3.0*$RMS"
133  let XMAX="$X + 3.0*$RMS"
134 
135  JFit \
136  -f $WORKDIR/canberra\[$EMITTER\].root:${MODULE} \
137  -F "$FORMULA" \
138  -@ "p0 = GetMaximum" \
139  -@ "p1 = $X" \
140  -@ "p2 = $RMS" \
141  -x "$XMIN $XMAX" \
142  -O L \
143  -o $WORKDIR/fit.root \
144  -d $DEBUG
145 
146  if ( `JPrintFit -f $WORKDIR/fit.root:\.\* -@p0 >& /dev/null` ); then
147 
148  set_array P1 `JPrintFit -f $WORKDIR/fit.root:\.\* -@p1`
149  set_array P2 `JPrintFit -f $WORKDIR/fit.root:\.\* -@p2`
150 
151  ((P1[1] = $P1[1] * 1.0e3)) # [ms]
152  ((P2[1] = abs($P2[1]) * 1.0e3)) # [ms]
153 
154  printf "%2d %9.6f %9.6f\n" $FLOOR $P1[1] $P2[1] >> $STRING_TXT
155  fi
156 
157  rm -f $WORKDIR/fit.root
158  fi
159  done
160 
161  JGraph \
162  -f $STRING_TXT \
163  -o $STRING_ROOT
164 
165  HISTOGRAMS+="${STRING_ROOT}:.*"
166 
167  done
168 
169  JPlot1D \
170  -f "$HISTOGRAMS[*]" \
171  -w 800x400 \
172  -x "0.5 18.5" \
173  -y "$TMIN_MS $TMAX_MS" \
174  -\> "floor" \
175  -\^ "#Deltat [ms]" \
176  -N "X 505" \
177  -T "[$STRING]" \
178  -L TR \
179  -o $WORKDIR/string_${STRING}.$FORMAT $BATCH
180 
181  echo " -> $WORKDIR/string_${STRING}.$FORMAT"
182 
183 done
184 
185 detach
$argv
then usage $script< detector file >< detectorfile > nIf the range of floors is the first detector file is aligned to the second before the comparison fi case set_variable RANGE $argv[3]
Definition: JCompareDetector.sh:31
JTOOLS::w
data_type w[N+1][M+1]
Definition: JPolint.hh:741
k
then fatal No hydrophone data file $HYDROPHONE_TXT fi sort gr k
Definition: hydrophone-phi:fit.sh:35
p1
TPaveText * p1
Definition: JDrawModule3D.cc:35
M
do $JPP JMEstimator M
Definition: JMEstimator.sh:37
HISTOGRAMS
do JCanberra a $DETECTOR f $INPUT_FILE o $WORKDIR canberra[${EMITTER}] root T $WORKDIR tripod txt V $WORKDIR sound_velocity txt M $WORKDIR mechanics txt E $EMITTER d $DEBUG!done HISTOGRAMS
Definition: plot-canberra.sh:60
STRING
clean eval JPrintDetector a $DETECTOR O IDENTIFIER eval JPrintDetector a $DETECTOR O SUMMARY set_variable STRING
Definition: examples/JTrigger/JTriggerEfficiencyRunByRun.sh:64
f
then JMuonPostfit f
Definition: JMuonPostfit.sh:118
WORKDIR
then usage $script< detector file >< inputfile > nUtility script to create PDF and CDF of transition time distribution fi case set_variable WORKDIR
Definition: JLegolas.sh:31
INPUT_FILE
set_variable INPUT_FILE
Definition: JARCACalibrateMuon.sh:30
string_
do set_variable STRING_TXT $WORKDIR string_
Definition: plot-canberra.sh:115
$STRINGS
do JCanberra a $DETECTOR f $INPUT_FILE o $WORKDIR canberra[${EMITTER}\] root T $WORKDIR tripod txt V $WORKDIR sound_velocity txt M $WORKDIR mechanics txt E $EMITTER d $DEBUG!done kill_child_processes_at_exit attach getModule a $DETECTOR typeset Z STRING typeset Z FLOOR set_variable FIRST_FLOOR for STRING in $STRINGS[*]
Definition: JCanberra.sh:63
N
then JShowerPostfit f $INPUT_FILE o $OUTPUT_FILE N
Definition: JShowerPostfit.sh:95
exit
exit
Definition: JPizza.sh:36
E
then usage E
Definition: JMuonPostfit.sh:35
echo
then echo
Definition: JDOMDAQDriver.sh:56
JTOOLS::n
const int n
Definition: JPolint.hh:660
$STRING
then fatal Invalid string $STRING
Definition: detector-XY:run.sh:35
set_variable
then echo Variable JPP_DIR undefined exit fi source $JPP_DIR setenv sh $JPP_DIR &dev null set_variable
Definition: JAcoustics.sh:20
T
do set_variable OUTPUT_DIRECTORY $WORKDIR T
Definition: JCalibrateHeight.sh:61
X
then break fi done getCenter read X Y Z let X
Definition: acoustics-fit.sh:387
o
do $DIR JTransitTime o
Definition: JTransitTime.sh:44
F
then awk F
Definition: getMIIseacurrent.sh:86
usage
* usage
Definition: JLigier-local.sh:34
$INPUT_FILE
then JFileTuna f $INPUT_FILE
Definition: file-Tuna.sh:66
FORMULA
&set_variable FORMULA
Definition: JEvtReweightMupageParameterScan.sh:54
p2
p2
Definition: module-Z:fit.sh:74
d
then JMuonMCEvt f $INPUT_FILE o $INTERMEDIATE_FILE d
Definition: JMuonPath.sh:47
a
then JCalibrateToT a
Definition: JTuneHV.sh:116
$DETECTOR
then set_variable MODULE getModule a $DETECTOR L $STRING $FLOOR JEditDetector a $DETECTOR M $MODULE add $X o $DETECTOR else echo No update of detector $DETECTOR
Definition: module-Z:fit.sh:118
DEBUG
then usage $script< input_file >< detector_file > fi set_variable OUTPUT_DIR set_variable SELECTOR JDAQTimesliceL1 set_variable DEBUG case set_variable DEBUG
Definition: JCalibratePMT.sh:21
$WORKDIR
then display $WORKDIR
Definition: plot-Domino.sh:128
Z
do set_variable MODULE getModule a $WORKDIR detector_a datx L $STRING JEditDetector a $WORKDIR detector_a datx M $MODULE setz o $WORKDIR detector_a datx JEditDetector a $WORKDIR detector_b datx M $MODULE setz o $WORKDIR detector_b datx done echo Output stored at $WORKDIR detector_a datx and $WORKDIR tripod_a txt JDrawDetector2D a $WORKDIR detector_a datx a $WORKDIR detector_b datx L BL o detector $FORMAT $BATCH JDrawDetector2D T $WORKDIR tripod_a txt T $WORKDIR tripod_b txt L BL o tripod $FORMAT $BATCH JCompareDetector a $WORKDIR detector_a datx b $WORKDIR detector_b datx o $WORKDIR abc root &dev null for KEY in X Y Z
Definition: JAlignDetector.sh:81
XMIN
then let XMIN
Definition: detector-XY:fit.sh:67
DETECTOR
set_variable DETECTOR
Definition: JARCACalibrateMuon.sh:31
JTOOLS::u
double u[N+1]
Definition: JPolint.hh:739
in
then fatal Wrong number of arguments fi set_variable DETECTOR $argv[1] set_variable INPUT_FILE $argv[2] eval JPrintDetector a $DETECTOR O IDENTIFIER eval JPrintDetector a $DETECTOR O SUMMARY source JAcoustics sh $DETECTOR_ID CHECK_EXIT_CODE typeset A TRIPODS get_tripods $WORKDIR tripod txt TRIPODS for EMITTER in
Definition: JCanberra.sh:41
done
set_variable NUMBER_OF_ITERATIONS set_variable EPSILON cat acoustics_fit_parameters txt<< EOF $CONFIGURATION[*]Nmin=3;sigma_s=100.0e-6;stdev=10.0;mestimator=0;fixStrings=0;EOF for STRING in $STRINGS[*];do#fit stretching and(z) position of given string set_variable DETECTOR_TMP/tmp/detector_A.datx JEditDetector-a $DETECTOR-o $DETECTOR_TMP-r $STRING JEditDetector-a $DETECTOR-o $DETECTOR-k $STRING for MUL in 0.005 0.001;do DX_M=0.2 for((N=0;$N< $NUMBER_OF_ITERATIONS;++N));do CHI2[3]=$CHI2[1] fitPositionOfString $STRING Z $DX_M fitStretchingOfString $STRING $MUL if(($CHI2[3]-$CHI2[1]< $EPSILON));then break fi done if(($N >=$NUMBER_OF_ITERATIONS));then printf"warning: reached maximum number of iterations %d - converenge %7.3f\n"$N $(($CHI2[3]-$CHI2[1])) fi done JMergeDetector-a $DETECTOR-a $DETECTOR_TMP-o $DETECTOR rm-f $DETECTOR_TMP JConvertDetectorFormat-a $DETECTOR-o $DETECTOR-r-d 0 > &dev null done
Definition: acoustics-fit.sh:427
script
script
Definition: JAcoustics.sh:2
A
source $JPP_DIR setenv csh $JPP_DIR eval JShellParser o a A
Definition: JShellParser.csh:15
null
esac $JPP_BIN JLogger sh $LOGGER until pgrep JGetMessage</dev/null > dev null
Definition: examples/JLogger/JLogger.sh:33
getModule
const JModule & getModule(const JDetector &detector, const JModuleLocation &location)
find module with a given string and floor number
Definition: JBeaconSimulator.cc:928
Generated by   doxygen 1.8.5