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]*(sqrt(1.0 + 0.5*(x-[2])*(x-[2])/([3]*[3])) - 1.0)"  
 
   14 set_variable:  FORMAT      GRAPHICS_FORMAT        gif
 
   15 set_variable+  BATCH       GRAPHICS_BATCH         -B
 
   21 if (( $# != 0 )); then
 
   22     fatal "Wrong number of arguments."
 
   25 set_variable  VELOCITY_TXT        $WORKDIR/soundv.txt
 
   26 set_variable  VELOCITY_ROOT       $WORKDIR/soundv.root
 
   28 if [[ ! -f $VELOCITY_TXT ]]; then
 
   29     fatal "No sound velocity file $VELOCITY_TXT."
 
   36 sort -gr -k 2,2 $VELOCITY_TXT | tail -1 | read X Y RMS
 
   39     -f ${VELOCITY_ROOT}:\.\*        \
 
   40     -o $WORKDIR/fit.root            \
 
   48 set_array P2 `JPrintFit -f $WORKDIR/fit.root:\.\* -@p2`
 
   50 printf "result %10.5f +/- %10.5f\n" $P2[1] $P2[2]
 
   52 mv $WORKDIR/fit.root $VELOCITY_ROOT
 
   55     -f $VELOCITY_ROOT:\.\*              \
 
   59     -o $WORKDIR/velocity.$FORMAT        $BATCH