4 # --------------------------------------------------------------------------------------------
 
    6 #          Auxiliary script to determine average creep of strings.
 
    8 # --------------------------------------------------------------------------------------------
 
   10 if [ -z $JPP_DIR ]; then
 
   11     echo "Variable JPP_DIR undefined."
 
   15 source $JPP_DIR/setenv.sh $JPP_DIR >& /dev/null
 
   17 unset_variable DETECTOR
 
   18 set_variable:  DEBUG       ACOUSTICS_DEBUG        2
 
   21     usage "$script <input file> [detector file]"
 
   25     2)  set_variable DETECTOR     $argv[2];&
 
   26     1)  set_variable INPUT_FILE   $argv[1];;
 
   27     *)  fatal "Wrong number of arguments.";;
 
   32 $JPP_DIR/examples/JAcoustics/JCreep -f $INPUT_FILE
 
   34 BUFFER=(`$JPP_DIR/examples/JAcoustics/JCreep -f $INPUT_FILE -d 0 | awk '{print $1, $2}'`)
 
   36 printf "string stretching\n"
 
   38 for KEY VALUE in ${(@kv)BUFFER}; do
 
   39     printf "%04d   %9.6f\n" $KEY $VALUE
 
   42 if [[ "$DETECTOR" != "" ]]; then
 
   44     echo "Updating detector $DETECTOR"
 
   46     for KEY VALUE in ${(@kv)BUFFER}; do
 
   51             -s "$KEY mul $VALUE"                  \