Jpp
 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 
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 typeset -A TRIPODS
31 
32 get_tripods $WORKDIR/tripod.txt TRIPODS
33 
34 if (( ${#${(@k)TRIPODS}} != 3 )); then
35  fatal "Number of tripods ${#${(@k)TRIPODS}} != 3."
36 fi
37 
38 set_variable A ${${(@k)TRIPODS}[1]}
39 set_variable B ${${(@k)TRIPODS}[2]}
40 set_variable C ${${(@k)TRIPODS}[3]}
41 
42 set_variable TRIPOD_TXT $WORKDIR/tripod3z.txt
43 set_variable TMPDIR $WORKDIR/.$$
44 mkdir -p $TMPDIR
45 
46 echo "# $A $B $C" > $TRIPOD_TXT # write header
47 
48 typeset -a Z
49 
50 for (( Z[$A] = -2.0; $Z[$A] <= 2.0; Z[$A] += 0.2 )); do
51  for (( Z[$B] = -2.0; $Z[$B] <= 2.0; Z[$B] += 0.2 )); do
52  for (( Z[$C] = -2.0; $Z[$C] <= 2.0; Z[$C] += 0.2 )); do
53 
54  cp $WORKDIR/tripod.txt $TMPDIR/tripod.txt
55 
56  for key in "${(@k)TRIPODS}"; do
57  JEditTripod -f $TMPDIR/tripod.txt -T "$key add 0.0 0.0 ${Z[$key]}"
58  done
59 
60  rm -f $TMPDIR/katoomba.root
61 
62  eval JKatoomba \
63  -a $DETECTOR \
64  -f \"$INPUT_FILES[*]\" \
65  -o $TMPDIR/katoomba.root \
66  -T $TMPDIR/tripod.txt \
67  -V `print_velocity` \
68  -@ `make_equation PARAMETERS` \
69  -@ \"stdev = 50\" \
70  -@ \"mestimator = 1\" \
71  -F $FIT \
72  -u \
73  -d $DEBUG --!
74 
75  set_variable CHI2 `JPrintResult -f $TMPDIR/katoomba.root:chi2 -F "GetMean"`
76  set_variable RMS `JPrintResult -f $TMPDIR/katoomba.root:chi2 -F "GetRMS / sqrt(GetEntries)"`
77 
78  printf "%7.3f %7.3f %7.3f %7.3f %7.3f\n" $Z[$A] $Z[$B] $Z[$C] $CHI2 $RMS >> $TRIPOD_TXT
79 
80  done
81  done
82 done
83 
84 rm -rf $TMPDIR
function get_tripods()
Definition: JAcoustics.sh:100
set_variable DETECTOR
void set_variable(const std::string &name, const std::string &value)
Set environment variable.
then fatal No sound hydrophone file $HYDROPHONE_TXT fi JGraph f $HYDROPHONE_TXT o $HYDROPHONE_ROOT sort gr k
exit
Definition: JPizza.sh:36
do set_array DAQHEADER JPrintDAQHeader f
Definition: JTuneHV.sh:79
then echo
static const double C
Physics constants.
do set_variable OUTPUT_DIRECTORY $WORKDIR T
* usage
then fatal Not enough arguments fi set_variable DETECTOR $argv[1] INPUT_FILES
then echo Variable JPP_DIR undefined exit fi source $JPP_DIR setenv sh $JPP_DIR &dev null set_variable ACOUSTICS_DEBUG
Definition: JAcoustics.sh:17
*set_variable DETECTOR $argv[1] set_variable INPUT_FILE $argv[2,-2] set_variable OUTPUT_FILE $argv[-1]
Definition: JDomino.sh:39
then $JPP_DIR software JCalibrate JCalibrateToT a
Definition: JTuneHV.sh:108
bool write(const Vec &v, std::ostream &os)
Write a Vec(tor) to a stream.
Definition: io_ascii.hh:154
then display $WORKDIR
Definition: plot-Domino.sh:127
then cp
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 typeset A TRIPODS get_tripods $WORKDIR tripod txt TRIPODS for EMITTER in
Definition: JCanberra.sh:36
do for((RUN=${RANGE%%-*};$RUN<=${RANGE##*-};RUN+=1))
script
Definition: JAcoustics.sh:2
then usage $script< detector file >< inputfile > fi case set_variable WORKDIR
Definition: JLegolas.sh:28
source $JPP_DIR setenv csh $JPP_DIR eval JShellParser o a A
esac $JPP_BIN JLogger sh $LOGGER until pgrep JGetMessage</dev/null > dev null
esac done
Definition: JAddHDE.sh:21
#define DEBUG(A)
Message macros.
Definition: JMessage.hh:62