4 if [ -z $JPP_DIR ];
then
5 echo "Variable JPP_DIR undefined."
9 source $JPP_DIR/setenv.sh $JPP_DIR >& /dev/
null
16 usage "$script <tripod identifier> <detector file> (input file)+"
20 fatal
"Wrong number of arguments."
27 eval `JPrintDetector -
a $DETECTOR -O IDENTIFIER`
29 source JAcoustics.sh $DETECTOR_ID
35 get_tripods
$WORKDIR/tripod.txt TRIPODS
37 if [[ -z
"${TRIPODS[$TRIPOD]}" ]];
then
38 fatal
"Invalid tripod $TRIPOD; "\
39 "possible values: ${(@k)TRIPODS}"
46 for ((
X = -5.0; $X <= +5.0;
X += 0.2 ));
do
47 for ((
Y = -5.0; $Y <= +5.0;
Y += 0.2 ));
do
51 JEditTripod -
f $TMPDIR/tripod.txt -
T "$TRIPOD add $X $Y 0.0"
53 rm -
f $TMPDIR/katoomba.root
57 -
f "$INPUT_FILES[*]" \
58 -
o $TMPDIR/katoomba.root \
59 -
T $TMPDIR/tripod.txt \
62 -@
$WORKDIR/acoustics_fit_parameters.txt \
68 if (( `JPrintResult -
f $TMPDIR/katoomba.root:chi2 -
F "GetSumOfWeights"` > 1.0 ));
then
70 set_array RESULT `JPrintResult -
f $TMPDIR/katoomba.root:chi2 -
F "GetMean" -
F "GetRMS / sqrt(GetSumOfWeights)"`
72 printf
"%7.3f %7.3f %7.3f %7.3f\n" $X $Y $RESULT[*] >> $TRIPOD_TXT
then usage $script< detector file >< detectorfile > nIf the range of floors is the first detector file is aligned to the second before the comparison nIn only modules within the given range of floors are used fi case set_variable RANGE $argv[3]
then fatal Wrong number of arguments fi set_variable TRIPOD $argv[1] source JAcoustics sh CHECK_EXIT_CODE set_variable TRIPOD_TXT $WORKDIR tripodxy_
o $QUALITY_ROOT d $DEBUG!JPlot1D f
then fatal Wrong number of arguments fi set_variable STRING $argv[1] set_variable DETECTORXY_TXT $WORKDIR $DETECTORXY_TXT tail read X Y CHI2 RMS printf optimum n $X $Y $CHI2 $RMS awk v Y
V(JDAQEvent-JTriggerReprocessor)*1.0/(JDAQEvent+1.0e-10)
then echo Variable JPP_DIR undefined exit fi source $JPP_DIR setenv sh $JPP_DIR &dev null set_variable
do set_variable OUTPUT_DIRECTORY $WORKDIR T
then break fi done getCenter read X Y Z let X
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 ${TMPDIR:-/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
then echo Variable JPP_DIR undefined exit fi source $JPP_DIR setenv sh $JPP_DIR if do_usage *then usage $script[(input file)+] fi set_variable DEBUG set_variable WORKDIR TMPDIR
then echo Variable JPP_DIR undefined exit fi source $JPP_DIR setenv sh $JPP_DIR &dev null set_variable DEBUG set_variable WORKDIR
then JConvertDetectorFormat a $DETECTOR[1] o
do sput $STRING $FLOOR sget MODULE INPUT_FILES
then JMuonMCEvt f $INPUT_FILE o $INTERMEDIATE_FILE d
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
then usage $script< input_file >< detector_file > fi set_variable OUTPUT_DIR set_variable SELECTOR JDAQTimesliceL1 set_variable DEBUG case set_variable DEBUG
source $JPP_DIR setenv csh $JPP_DIR &dev null eval JShellParser o a A
esac $JPP_BIN JLogger sh $LOGGER until pgrep JGetMessage</dev/null > dev null