4 if [ -z $JPP_DIR ]; then
 
    5     echo "Variable JPP_DIR undefined."
 
    9 source $JPP_DIR/setenv.sh $JPP_DIR >& /dev/null
 
   12 set_variable   WORKDIR     ${TMPDIR:-/tmp}                           
 
   13 set_variable   DIR         $JPP_DIR/examples/JAcoustics/  
 
   14 set_array      GRID        18 60 570
 
   15 set_variable:  FORMAT      GRAPHICS_FORMAT        gif
 
   16 set_variable+  BATCH       GRAPHICS_BATCH         -B
 
   19     usage "$script <a> <b>"
 
   22 if (( $# == 2 )); then
 
   23     set_variable  A               $argv[1]
 
   24     set_variable  B               $argv[2]
 
   26     fatal "Wrong number of arguments."
 
   30 for TX in 0.01 0.05 0.10; do
 
   36         -o $WORKDIR/geometry\[${TX}\].txt
 
   39         -f $WORKDIR/geometry\[${TX}\].txt    \
 
   40         -o $WORKDIR/geometry\[${TX}\].root   >& /dev/null
 
   42     tail -1 $WORKDIR/geometry\[${TX}\].txt   | read XMAX ZMAX
 
   45 set_variable  GRAPHS  `ls $WORKDIR/geometry\[*\].root | sed 's/.root/.root:\.\*/g' `
 
   47 let "XMAX = $XMAX    +  2.0"
 
   48 let "YMAX = $GRID[3] + 10.0"
 
   60     -o geometry_${A}_${B}.$FORMAT    $BATCH