4 if [ -z $JPP_DIR ]; 
then 
    5     echo "Variable JPP_DIR undefined." 
    9 source $JPP_DIR/setenv.sh $JPP_DIR >& /dev/
null 
   20     usage "$script  <string identifier> [working directory]" 
   26     *) fatal 
"Wrong number of arguments." 
   32 if ( ! reuse_file $GRAPH_TXT ); 
then 
   41 } | tr 
':' '\n' | grep -vF $ID | grep -vF $R | sed 
's/.*=//'`
 
   42         V=(`JQuality -
f "$INPUT_FILES[*]" |& sed -
n "s/Total\ quality\ *//p"`)
 
   44         printf 
"%5.1f %12.1f %12.1f\n" $U $V >> $GRAPH_TXT
 
   56         -
f ${GRAPH_ROOT}:\.\*      \
 
   58         -
F "[0] + [1]*cos(x-[2])"  \
 
   60         -
@"p1 = GetMaximum * 0.01" \
 
then usage $script< detector file >< inputfile > nUtility script to create PDF and CDF of transition time distribution fi case set_variable WORKDIR
 
*fatal Wrong number of arguments esac set_variable GRAPH_TXT
 
then echo Variable JPP_DIR undefined exit fi source $JPP_DIR setenv sh $JPP_DIR &dev null set_variable
 
do set_variable OUTPUT_DIRECTORY $WORKDIR T
 
then usage $script[distance] fi case set_variable R
 
then echo Launching message logger in new window xterm geometry e JGetMessage H $HOST T $TAG d3
 
then usage $script< input_file >< detector_file > fi set_variable OUTPUT_DIR set_variable SELECTOR JDAQTimesliceL1 set_variable DEBUG case set_variable DEBUG
 
then fatal Wrong number of arguments fi set_variable DETECTOR $argv[1] set_variable INPUT_FILE $argv[2] eval JPrintDetector a $DETECTOR O IDENTIFIER eval JPrintDetector a $DETECTOR O SUMMARY source JAcoustics sh $DETECTOR_ID CHECK_EXIT_CODE typeset A TRIPODS get_tripods $WORKDIR tripod txt TRIPODS for EMITTER in
 
set_variable NUMBER_OF_ITERATIONS set_variable EPSILON cat acoustics_fit_parameters txt<< EOF $CONFIGURATION[*]Nmin=3;sigma_s=100.0e-6;stdev=10.0;mestimator=0;fixStrings=0;EOF for STRING in $STRINGS[*];do#fit stretching and(z) position of given string set_variable DETECTOR_TMP/tmp/detector_A.datx JEditDetector-a $DETECTOR-o $DETECTOR_TMP-r $STRING JEditDetector-a $DETECTOR-o $DETECTOR-k $STRING for MUL in 0.005 0.001;do DX_M=0.2 for((N=0;$N< $NUMBER_OF_ITERATIONS;++N));do CHI2[3]=$CHI2[1] fitPositionOfString $STRING Z $DX_M fitStretchingOfString $STRING $MUL if(($CHI2[3]-$CHI2[1]< $EPSILON));then break fi done if(($N >=$NUMBER_OF_ITERATIONS));then printf"warning: reached maximum number of iterations %d - converenge %7.3f\n"$N $(($CHI2[3]-$CHI2[1])) fi done JMergeDetector-a $DETECTOR-a $DETECTOR_TMP-o $DETECTOR rm-f $DETECTOR_TMP JConvertDetectorFormat-a $DETECTOR-o $DETECTOR-r-d 0 > &dev null done
 
esac $JPP_BIN JLogger sh $LOGGER until pgrep JGetMessage</dev/null > dev null