Jpp  16.0.0
the software that should make you happy
 All Classes Namespaces Files Functions Variables Typedefs Enumerations Enumerator Friends Macros Pages
tripod-3Z:run.sh
Go to the documentation of this file.
1 #!/bin/zsh
2 script=${0##*/}
3 
4 if [ -z $JPP_DIR ]; then
5  echo "Variable JPP_DIR undefined."
6  exit
7 fi
8 
9 source $JPP_DIR/setenv.sh $JPP_DIR >& /dev/null
10 
11 set_variable: DEBUG ACOUSTICS_DEBUG 2
12 set_variable: WORKDIR ACOUSTICS_WORKDIR ./
13 set_variable: FIT ACOUSTICS_FIT 2
14 
15 if do_usage $*; then
16  usage "$script <detector file> (input file)+"
17 fi
18 
19 if (( $# < 2 )); then
20  fatal "Wrong number of arguments."
21 fi
22 
24 set_array INPUT_FILES $argv[2,-1]
25 
26 eval `JPrintDetector -a $DETECTOR -O IDENTIFIER`
27 
28 source JAcoustics.sh $DETECTOR_ID
29 
30 CHECK_EXIT_CODE
31 
32 typeset -A TRIPODS
33 
34 get_tripods $WORKDIR/tripod.txt TRIPODS
35 
36 if (( ${#${(@k)TRIPODS}} != 3 )); then
37  fatal "Number of tripods ${#${(@k)TRIPODS}} != 3."
38 fi
39 
40 set_variable A ${${(@k)TRIPODS}[1]}
41 set_variable B ${${(@k)TRIPODS}[2]}
42 set_variable C ${${(@k)TRIPODS}[3]}
43 
44 set_variable TRIPOD_TXT $WORKDIR/tripod3z.txt
46 mkdir -p $TMPDIR
47 
48 echo "# $A $B $C" > $TRIPOD_TXT # write header
49 
50 typeset -a Z
51 
52 for (( Z[$A] = -2.0; $Z[$A] <= 2.0; Z[$A] += 0.2 )); do
53  for (( Z[$B] = -2.0; $Z[$B] <= 2.0; Z[$B] += 0.2 )); do
54  for (( Z[$C] = -2.0; $Z[$C] <= 2.0; Z[$C] += 0.2 )); do
55 
56  cp $WORKDIR/tripod.txt $TMPDIR/tripod.txt
57 
58  for key in "${(@k)TRIPODS}"; do
59  JEditTripod -f $TMPDIR/tripod.txt -T "$key add 0.0 0.0 ${Z[$key]}"
60  done
61 
62  rm -f $TMPDIR/katoomba.root
63 
64  JKatoomba \
65  -a $DETECTOR \
66  -f "$INPUT_FILES[*]" \
67  -o $TMPDIR/katoomba.root \
68  -T $TMPDIR/tripod.txt \
69  -V $WORKDIR/sound_velocity.txt \
70  -M $WORKDIR/mechanics.txt \
71  -@ $WORKDIR/acoustics_fit_parameters.txt \
72  -! $WORKDIR/disable.txt \
73  -F $FIT \
74  -u \
75  -d $DEBUG --!
76 
77  if (( `JPrintResult -f $TMPDIR/katoomba.root:chi2 -F "GetSumOfWeights"` > 1.0 )); then
78 
79  set_array RESULT `JPrintResult -f $TMPDIR/katoomba.root:chi2 -F "GetMean" -F "GetRMS / sqrt(GetSumOfWeights)"`
80 
81  printf "%7.3f %7.3f %7.3f %7.3f %7.3f\n" $Z[$A] $Z[$B] $Z[$C] $RESULT[*] >> $TRIPOD_TXT
82  else
83  error "No result."
84  fi
85  done
86  done
87 done
88 
89 rm -rf $TMPDIR
then fatal No hydrophone data file $HYDROPHONE_TXT fi sort gr k
do $JPP JMEstimator M
Definition: JMEstimator.sh:37
*set_variable DETECTOR_ID $argv[1] set_array RUNS $argv[2,-2]
Definition: JDataQuality.sh:24
o $QUALITY_ROOT d $DEBUG!JPlot1D f
Definition: JDataQuality.sh:66
exit
Definition: JPizza.sh:36
V(JDAQEvent-JTriggerReprocessor)*1.0/(JDAQEvent+1.0e-10)
then echo
static const double C
Physics constants.
do for((RUN=${RANGE%%-*};$RUN<=${RANGE##*-};RUN+=1))
then echo Variable JPP_DIR undefined exit fi source $JPP_DIR setenv sh $JPP_DIR &dev null set_variable
Definition: JAcoustics.sh:20
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
do set_variable OUTPUT_DIRECTORY $WORKDIR T
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 &dev null set_variable DEBUG set_variable WORKDIR
Definition: JLegolas.sh:20
then awk F
* usage
then JConvertDetectorFormat a $DETECTOR[1] o
do sput $STRING $FLOOR sget MODULE INPUT_FILES
Definition: JCanberra.sh:73
then JMuonMCEvt f $INPUT_FILE o $INTERMEDIATE_FILE d
Definition: JMuonPath.sh:47
then JCalibrateToT a
Definition: JTuneHV.sh:116
bool write(const Vec &v, std::ostream &os)
Write a Vec(tor) to a stream.
Definition: io_ascii.hh:154
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
then display $WORKDIR
Definition: plot-Domino.sh:128
then cp
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
set_variable DETECTOR
double u[N+1]
Definition: JPolint.hh:755
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:42
source $JPP_DIR setenv csh $JPP_DIR &dev null eval JShellParser o a A
script
Definition: JAcoustics.sh:2
esac $JPP_BIN JLogger sh $LOGGER until pgrep JGetMessage</dev/null > dev null