4 if [ -z $JPP_DIR ]; then
 
    5     echo "Variable JPP_DIR undefined."
 
    9 source $JPP_DIR/setenv.sh $JPP_DIR >& /dev/null
 
   13 set_variable:  DEBUG    ACOUSTICS_DEBUG    2
 
   14 set_variable:  WORKDIR  ACOUSTICS_WORKDIR  ./
 
   17     usage "$script <string identifier> <detector file> (input file)+"
 
   21     fatal "Wrong number of arguments."
 
   24 set_variable  STRING              $argv[1]
 
   25 set_variable  DETECTOR            $argv[2]
 
   26 set_array     INPUT_FILES         $argv[3,-1]
 
   28 eval `JPrintDetector -a $DETECTOR -O IDENTIFIER`
 
   29 eval `JPrintDetector -a $DETECTOR -O SUMMARY`
 
   30 eval `JPrintDetector -a $DETECTOR -O CAN`
 
   32 JAcoustics.sh   $DETECTOR_ID
 
   36 if [[ -z "${STRINGS[(r)$STRING]}" ]]; then
 
   37     fatal "Invalid string $STRING; "\
 
   38           "possible values: ${STRINGS[*]}"
 
   41 let "AMAX = floor(1.0e+4 / $CAN_ZMAX_M) * 1.0e-4"
 
   42 let "BMAX = floor(1.0e-1 * $CAN_ZMAX_M) * 1.0e+1"
 
   43 let "DA = $AMAX * 2.0e-2"
 
   44 let "DB = $BMAX * 2.0e-2"
 
   46 set_variable  MECHANICS_TXT       $WORKDIR/mechanicsab_${STRING}.txt
 
   48 set_variable  TMPDIR              $WORKDIR/.$$
 
   51 rm -f $TMPDIR/detector.detx
 
   56     -o $TMPDIR/detector.detx
 
   58 for (( A = 0.0; $A <= $AMAX; A += $DA )); do
 
   59     for (( B = 0.0; $B <= $BMAX; B += $DB )); do
 
   61         if (( $A*$B < 0.5 )); then
 
   63             rm -f $TMPDIR/katoomba.root
 
   66                 -a $TMPDIR/detector.detx                  \
 
   67                 -f "$INPUT_FILES[*]"                      \
 
   68                 -o $TMPDIR/katoomba.root                  \
 
   69                 -T $WORKDIR/tripod.txt                    \
 
   70                 -V $WORKDIR/sound_velocity.txt            \
 
   71                 -M $WORKDIR/mechanics.txt                 \
 
   73                 -@ $WORKDIR/acoustics_fit_parameters.txt  \
 
   74                 -! $WORKDIR/disable.txt                   \
 
   77             if (( `JPrintResult -f $TMPDIR/katoomba.root:chi2 -F "GetSumOfWeights"` > 1.0 )); then
 
   79                 set_array RESULT `JPrintResult -f $TMPDIR/katoomba.root:chi2 -F "GetMean" -F "GetRMS / sqrt(GetSumOfWeights)"`
 
   81                 printf "%7.5f %8.3f %7.3f %7.3f\n" $A $B $RESULT[*] >> $MECHANICS_TXT