Jpp test-rotations-new
the software that should make you happy
Loading...
Searching...
No Matches
JCreep.sh
Go to the documentation of this file.
1#!/usr/bin/env zsh
2script=${0##*/}
3
4# --------------------------------------------------------------------------------------------
5#
6# Auxiliary script to determine average creep of strings.
7#
8# --------------------------------------------------------------------------------------------
9
10if [ -z $JPP_DIR ]; then
11 echo "Variable JPP_DIR undefined."
12 exit
13fi
14
15source $JPP_DIR/setenv.sh $JPP_DIR >& /dev/null
16
17unset_variable DETECTOR
18set_variable: DEBUG ACOUSTICS_DEBUG 2
19
20if do_usage $*; then
21 usage "$script <input file> [detector file]"
22fi
23
24case $# in
25 2) set_variable DETECTOR $argv[2];&
26 1) set_variable INPUT_FILE $argv[1];;
27 *) fatal "Wrong number of arguments.";;
28esac
29
30typeset -A BUFFER
31
32$JPP_DIR/examples/JAcoustics/JCreep -f $INPUT_FILE
33
34BUFFER=(`$JPP_DIR/examples/JAcoustics/JCreep -f $INPUT_FILE -d 0 | awk '{print $1, $2}'`)
35
36printf "string stretching\n"
37
38for KEY VALUE in ${(@kv)BUFFER}; do
39 printf "%04d %9.6f\n" $KEY $VALUE
40done
41
42if [[ "$DETECTOR" != "" ]]; then
43
44 echo "Updating detector $DETECTOR"
45
46 for KEY VALUE in ${(@kv)BUFFER}; do
47
48 JEditDetector \
49 -a $DETECTOR \
50 -o $DETECTOR \
51 -s "$KEY mul $VALUE" \
52 -d $DEBUG --!
53 done
54fi