Jpp - the software that should make you happy
 All Classes Namespaces Files Functions Variables Typedefs Enumerations Enumerator Friends Macros Pages
tripod-3Z:fit.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+ BACKGROUND ACOUSTICS_BACKGROUND: -B
14 set_variable FORMULA "[0] + [1] * log(1.0 + 0.5*(x-[2])*(x-[2])/([3]*[3]))"
15 
16 if do_usage $*; then
17  usage "$script [<tripod file>]"
18 fi
19 
20 if (( $# > 1 )); then
21  fatal "Wrong number of arguments."
22 fi
23 
24 source JAcoustics.sh --
25 
26 CHECK_EXIT_CODE
27 
28 set_variable TRIPOD3Z_TXT $WORKDIR/tripod3z.txt
29 
30 if [[ ! -f $TRIPOD3Z_TXT ]] then
31  fatal "No detector data file $TRIPOD3Z_TXT."
32 fi
33 
34 grep -v '^#' $TRIPOD3Z_TXT | sort -gr -k 4,4 | tail -1 | read X Y Z CHI2 RMS
35 
36 printf "optimum %7.3f %7.3f %7.3f %7.3f %7.3f\n" $X $Y $Z $CHI2 $RMS
37 
38 awk '$1 ~ /^#/ { for (i = 2; i <= NF; ++i ) { printf " %s", $i }}' $TRIPOD3Z_TXT | read A B C
39 
40 awk -v Y=$Y -v Z=$Z '$1 !~ /^#/ { if ( $2 == Y && $3 == Z ) { printf "%7.3f %7.3f %7.3f\n", $1, $4, $5 } }' $TRIPOD3Z_TXT >! $WORKDIR/tripod3z_${A}.txt
41 awk -v X=$X -v Z=$Z '$1 !~ /^#/ { if ( $1 == X && $3 == Z ) { printf "%7.3f %7.3f %7.3f\n", $2, $4, $5 } }' $TRIPOD3Z_TXT >! $WORKDIR/tripod3z_${B}.txt
42 awk -v X=$X -v Y=$Y '$1 !~ /^#/ { if ( $1 == X && $2 == Y ) { printf "%7.3f %7.3f %7.3f\n", $3, $4, $5 } }' $TRIPOD3Z_TXT >! $WORKDIR/tripod3z_${C}.txt
43 
44 for TRIPOD in $A $B $C; do
45 
46  set_variable TRIPOD_TXT $WORKDIR/tripod3z_${TRIPOD}.txt
47  set_variable TRIPOD_ROOT $WORKDIR/tripod3z_${TRIPOD}.root
48  set_variable G1_TXT $WORKDIR/g1.txt
49  set_variable G1_ROOT $WORKDIR/g1.root
50 
51  JGraph \
52  -f $TRIPOD_TXT \
53  -o $TRIPOD_ROOT
54 
55  sort -gr -k 2,2 $WORKDIR/tripod3z_${TRIPOD}.txt | tail -1 | read X Y RMS
56 
57  echo $X $Y > $G1_TXT
58 
59  JGraph \
60  -f $G1_TXT \
61  -o $G1_ROOT
62 
63  awk '
64  BEGIN {
65  XMIN = +1e3
66  XMAX = -1e3
67  }
68  END { print XMIN, XMAX }
69  {
70  if ( $1 < XMIN ) { XMIN = $1 }
71  if ( $1 > XMAX ) { XMAX = $1 }
72  }
73  ' $TRIPOD_TXT | read XMIN XMAX
74 
75  if (( $X > $XMIN && $X < $XMAX )); then
76 
77  JFit \
78  -f ${TRIPOD_ROOT}:\.\* \
79  -o $WORKDIR/fit.root \
80  -F "$FORMULA" \
81  -@ "p0 = $Y" \
82  -@ "p1 = 1.0" \
83  -@ "p2 = $X" \
84  -@ "p3 = 4.0" \
85  -d $DEBUG
86 
87  set_array P2 `JPrintFit -f $WORKDIR/fit.root:\.\* -@p2`
88 
89  set_variable X $P2[1]
90 
91  printf "nominal %2d %7.3f %7.3f\n" $TRIPOD 0.0 `JPrintFit -f $WORKDIR/fit.root:\.\* -x "0.0"`
92  printf "optimal %2d %7.3f %7.3f\n" $TRIPOD $X `JPrintFit -f $WORKDIR/fit.root:\.\* -x "$X"`
93 
94  mv $WORKDIR/fit.root $TRIPOD_ROOT
95 
96  else
97 
98  echo "Optimum value at limit; -> no fit."
99  printf "nominal %2d %7.3f %7.3f\n" $TRIPOD 0.0 `awk -v X=0.0 '{ if ($1 == X) { print $2 }}' $TRIPOD_TXT`
100  printf "optimal %2d %7.3f %7.3f\n" $TRIPOD $X $Y
101 
102  fi
103 
104  if (( $# == 1 )); then
105  JEditTripod -f $argv[1] -T "$TRIPOD add 0.0 0.0 $X"
106  fi
107 
108  JPlot1D \
109  -f ${TRIPOD_ROOT}:\.\* \
110  -f ${G1_ROOT}:\.\* \
111  -\> "#Deltaz [m]" \
112  -\^ "#chi^{2}/NDF" \
113  -T "[$TRIPOD]" \
114  -o $WORKDIR/tripod3z_${TRIPOD}.gif $BACKGROUND
115 
116  rm -f $TRIPOD_TXT $TRIPOD_ROOT $G1_TXT $G1_ROOT
117 
118 done
then fatal No hydrophone data file $HYDROPHONE_TXT fi sort gr k
bool read(Vec &v, std::istream &is)
Read a Vec(tor) from a stream.
Definition: io_ascii.hh:141
exit
Definition: JPizza.sh:36
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
then JPizza f
Definition: JPizza.sh:46
then echo
do set_variable TRIPOD_TXT $WORKDIR tripod3z_
static const double C
Physics constants.
then echo Variable JPP_DIR undefined exit fi source $JPP_DIR setenv sh $JPP_DIR &dev null set_variable
Definition: JAcoustics.sh:20
do set_variable OUTPUT_DIRECTORY $WORKDIR T
then break fi done getCenter read X Y Z let X
do $DIR JTransitTime o
Definition: JTransitTime.sh:44
then awk F
* usage
p2
Definition: module-Z:fit.sh:72
*set_variable DETECTOR $argv[1] set_variable INPUT_FILE $argv[2,-2] set_variable OUTPUT_FILE $argv[-1]
Definition: JDomino.sh:39
then JMuonMCEvt f $INPUT_FILE o $INTERMEDIATE_FILE d
Definition: JMuonPath.sh:45
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:127
then echo Variable JPP_DIR undefined exit fi source $JPP_DIR setenv sh $JPP_DIR &dev null set_variable DEBUG set_variable WORKDIR tmp set_variable JDAQ_TIMESLICE JDAQTimeslice if do_usage *then usage $script< detector file >< inputfile > fi case set_variable WORKDIR
Definition: JLegolas.sh:23
then let XMIN
data_type v[N+1][M+1]
Definition: JPolint.hh:740
then fatal Wrong number of arguments fi set_variable DETECTOR $argv[1] set_variable TRIPOD_FILE $argv[2] set_variable STAGE $argv[3] set_array INPUT_FILES $argv[4,-1] eval JPrintDetector a $DETECTOR O IDENTIFIER eval JPrintDetector a $DETECTOR O SUMMARY source JAcoustics sh $DETECTOR_ID typeset A TRIPODS get_tripods $TRIPOD_FILE TRIPODS typeset a CHI2 CHI2
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:38
script
Definition: JAcoustics.sh:2
do typeset Z STRING typeset Z FLOOR set_variable MODULE_TXT $WORKDIR $MODULE_TXT tail read X ZMAX RMS sort gr $MODULE_TXT tail read X ZMIN RMS echo $X $ZMIN $G1_TXT
Definition: module-Z:fit.sh:33
then fatal Invalid tripod $TRIPOD
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
Double_t g1(const Double_t x)
Function.
Definition: JQuantiles.cc:25