4 if [ -z $JPP_DIR ]; 
then 
    5     echo "Variable JPP_DIR undefined." 
    9 source $JPP_DIR/setenv.sh $JPP_DIR >& /dev/
null 
   15 if ( do_usage $* ); 
then 
   16     usage "$script <detector file> (input file)+" 
   20     fatal 
"Wrong number of arguments." 
   26 eval `JPrintDetector -
a $DETECTOR -O IDENTIFIER`
 
   28 source JAcoustics.sh   $DETECTOR_ID
 
   34 if (( ${#${(@
k)TRIPODS}} != 3 )); 
then 
   35     fatal 
"Number of tripods ${#${(@k)TRIPODS}} != 3." 
   46 echo "# $A $B $C"  >  $TRIPOD_TXT # 
write header
 
   50 for (( Z[$A] = -2.0; $Z[$A] <= 2.0; Z[$A] += 0.2 )); 
do 
   51     for (( Z[$B] = -2.0; $Z[$B] <= 2.0; Z[$B] += 0.2 )); 
do 
   52         for (( Z[$C] = -2.0; $Z[$C] <= 2.0; Z[$C] += 0.2 )); 
do 
   56             for key 
in "${(@k)TRIPODS}"; 
do 
   57                 JEditTripod -
f $TMPDIR/tripod.txt -
T "$key add 0.0 0.0 ${Z[$key]}" 
   60             rm -
f $TMPDIR/katoomba.root
 
   64                 -
f \
"$INPUT_FILES[*]\"                    \ 
   65                 -o $TMPDIR/katoomba.root                  \ 
   66                 -T $TMPDIR/tripod.txt                     \ 
   68                 -@ `make_equation PARAMETERS`             \ 
   70                 -@ \"mestimator = 1\"                     \ 
   75             set_variable CHI2 `JPrintResult -f $TMPDIR/katoomba.root:chi2 -F "GetMean
"` 
   76             set_variable RMS  `JPrintResult -f $TMPDIR/katoomba.root:chi2 -F "GetRMS / sqrt(GetEntries)
"` 
   78             printf "%7.3f %7.3f %7.3f %7.3f %7.3f\n
" $Z[$A] $Z[$B] $Z[$C] $CHI2 $RMS >> $TRIPOD_TXT 
void set_variable(const std::string &name, const std::string &value)
Set environment variable. 
 
then fatal No sound hydrophone file $HYDROPHONE_TXT fi JGraph f $HYDROPHONE_TXT o $HYDROPHONE_ROOT sort gr k
 
do set_array DAQHEADER JPrintDAQHeader f
 
static const double C
Physics constants. 
 
do set_variable OUTPUT_DIRECTORY $WORKDIR T
 
then fatal Not enough arguments fi set_variable DETECTOR $argv[1] INPUT_FILES
 
then echo Variable JPP_DIR undefined exit fi source $JPP_DIR setenv sh $JPP_DIR &dev null set_variable ACOUSTICS_DEBUG
 
*set_variable DETECTOR $argv[1] set_variable INPUT_FILE $argv[2,-2] set_variable OUTPUT_FILE $argv[-1]
 
bool write(const Vec &v, std::ostream &os)
Write a Vec(tor) to a stream. 
 
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 typeset A TRIPODS get_tripods $WORKDIR tripod txt TRIPODS for EMITTER in
 
do for((RUN=${RANGE%%-*};$RUN<=${RANGE##*-};RUN+=1))
 
then usage $script< detector file >< inputfile > fi case set_variable WORKDIR
 
source $JPP_DIR setenv csh $JPP_DIR eval JShellParser o a A
 
esac $JPP_BIN JLogger sh $LOGGER until pgrep JGetMessage</dev/null > dev null
 
#define DEBUG(A)
Message macros.