4 if [ -z $JPP_DIR ]; then
 
    5     echo "Variable JPP_DIR undefined."
 
    9 source $JPP_DIR/setenv.sh $JPP_DIR >& /dev/null
 
   11 set_variable:  DEBUG       ACOUSTICS_DEBUG        2
 
   12 set_variable:  WORKDIR     ACOUSTICS_WORKDIR      ./
 
   13 set_variable   FORMULA     "[0] + [1] * log(1.0 + 0.5*(x-[2])*(x-[2])/([3]*[3]))"  
 
   14 set_variable:  FORMAT      GRAPHICS_FORMAT        gif
 
   15 set_variable+  BATCH       GRAPHICS_BATCH         -B
 
   18     usage "$script <string identifier>"
 
   21 if (( $# != 1 )); then
 
   22     fatal "Wrong number of arguments."
 
   25 set_variable  STRING              $argv[1]
 
   27 set_variable  DETECTORXY_TXT      $WORKDIR/detectorxy_${STRING}.txt
 
   29 sort -gr -k 4,4 $DETECTORXY_TXT | tail -1 | read X Y CHI2 RMS
 
   31 printf "optimum %7.3f %7.3f %7.3f %7.3f\n" $X $Y $CHI2 $RMS
 
   33 awk -v Y=$Y '{ if ( $2 == Y )  { printf "%7.3f %7.3f %7.3f\n", $1, $3, $4 } }' $DETECTORXY_TXT  >!  $WORKDIR/detectorx_${STRING}.txt
 
   34 awk -v X=$X '{ if ( $1 == X )  { printf "%7.3f %7.3f %7.3f\n", $2, $3, $4 } }' $DETECTORXY_TXT  >!  $WORKDIR/detectory_${STRING}.txt
 
   38     set_variable  DETECTOR_TXT        $WORKDIR/detector${var}_${STRING}.txt
 
   39     set_variable  DETECTOR_ROOT       $WORKDIR/detector${var}_${STRING}.root
 
   45     sort -gr -k 2,2 $DETECTOR_TXT | tail -1 | read X Z RMS
 
   51         -f ${DETECTOR_ROOT}:\.\*                  \
 
   52         -o $WORKDIR/fit.root                      \
 
   61     mv $WORKDIR/fit.root $DETECTOR_ROOT
 
   64         -f ${DETECTOR_ROOT}:\.\*                                  \
 
   65         -> "#Delta${var} [m]"                                    \
 
   68         -T "[${(l:4::0::0:)STRING}].${var}"                       \
 
   69         -o $WORKDIR/detector${var}_${(l:4::0::0:)STRING}.$FORMAT  $BATCH