4if [ -z $JPP_DIR ]; then
 
    5    echo "Variable JPP_DIR undefined."
 
    9source $JPP_DIR/setenv.sh $JPP_DIR >& /dev/null
 
   11set_variable:  DEBUG    ACOUSTICS_DEBUG    2
 
   12set_variable:  WORKDIR  ACOUSTICS_WORKDIR  ./
 
   15    usage "$script <tripod identifier> <detector file> (input file)+"
 
   19    fatal "Wrong number of arguments."
 
   22set_variable  TRIPOD              $argv[1]
 
   23set_variable  DETECTOR            $argv[2]
 
   24set_array     INPUT_FILES         $argv[3,-1]
 
   26eval `JPrintDetector -a $DETECTOR -O IDENTIFIER`
 
   28JAcoustics.sh   $DETECTOR_ID
 
   30source JAcousticsToolkit.sh
 
   36get_tripods $WORKDIR/tripod.txt TRIPODS
 
   38if [[ -z "${TRIPODS[$TRIPOD]}" ]]; then
 
   39    fatal "Invalid tripod $TRIPOD; "\
 
   40          "possible values: ${(@k)TRIPODS}"
 
   43set_variable  TRIPOD_TXT          $WORKDIR/tripodz_${TRIPOD}.txt
 
   44set_variable  TMPDIR              $WORKDIR/.$$
 
   47for (( Z = -2.0; $Z <= 2.0; Z += 0.1 )); do
 
   49    JEditTripod -f $WORKDIR/tripod.txt -T "$TRIPOD add 0.0 0.0 $Z" -o $TMPDIR/tripod.txt
 
   51    rm -f $TMPDIR/katoomba.root
 
   55        -f "$INPUT_FILES[*]"                      \
 
   56        -o $TMPDIR/katoomba.root                  \
 
   57        -T $TMPDIR/tripod.txt                     \
 
   58        -V $WORKDIR/sound_velocity.txt            \
 
   59        -M $WORKDIR/mechanics.txt                 \
 
   60        -@ $WORKDIR/acoustics_fit_parameters.txt  \
 
   61        -! $WORKDIR/disable.txt                   \
 
   64    if (( `JPrintResult -f $TMPDIR/katoomba.root:chi2 -F "GetSumOfWeights"` > 1.0 )); then
 
   66        set_array RESULT `JPrintResult -f $TMPDIR/katoomba.root:chi2 -F "GetMean" -F "GetRMS / sqrt(GetSumOfWeights)"`
 
   68        printf "%7.3f %7.3f %7.3f\n" $Z $RESULT[*] >> $TRIPOD_TXT