JCreep.sh

Go to the documentation of this file.

#!/bin/zsh
script=${0##*/}

# --------------------------------------------------------------------------------------------
#
#          Auxiliary script to determine average creep of strings.
#
# --------------------------------------------------------------------------------------------

if [ -z $JPP_DIR ]; then
    echo "Variable JPP_DIR undefined."
    exit
fi

source $JPP_DIR/setenv.sh $JPP_DIR >& /dev/null

unset_variable DETECTOR
set_variable:  DEBUG       ACOUSTICS_DEBUG        2

if do_usage $*; then
    usage "$script <input file> [detector file]"
fi

case $# in
    2)  set_variable DETECTOR     $argv[2];&
    1)  set_variable INPUT_FILE   $argv[1];;
    *)  fatal "Wrong number of arguments.";;
esac

typeset -A BUFFER

$JPP_DIR/examples/JAcoustics/JCreep -f $INPUT_FILE

BUFFER=(`$JPP_DIR/examples/JAcoustics/JCreep -f $INPUT_FILE -d 0 | awk '{print $1, $2}'`)

printf "string stretching\n"

for KEY VALUE in ${(@kv)BUFFER}; do
    printf "%04d   %9.6f\n" $KEY $VALUE
done

if [[ "$DETECTOR" != "" ]]; then

    echo "Updating detector $DETECTOR"
    
    for KEY VALUE in ${(@kv)BUFFER}; do

        JEditDetector \
            -a $DETECTOR                          \
            -o $DETECTOR                          \
            -s "$KEY mul $VALUE"                  \
            -d $DEBUG --!
    done
fi