4 if [ -z $JPP_DIR ]; 
then 
    5     echo "Variable JPP_DIR undefined." 
    9 source $JPP_DIR/setenv.sh $JPP_DIR >& /dev/
null 
   13 #set_variable   FORMULA     "[0] + [1] * log(1.0 + 0.5*(x-[2])*(x-[2])/([3]*[3]))"   
   19     usage "$script [<tripod file>]" 
   23     fatal 
"Wrong number of arguments." 
   26 source JAcousticsToolkit.sh
 
   32 if [[ ! -
f $TRIPOD3Z_TXT ]] 
then 
   33     fatal 
"No detector data file $TRIPOD3Z_TXT." 
   36 grep -
v '^#' $TRIPOD3Z_TXT | sort -gr -
k 4,4 | tail -1 | 
read X Y Z CHI2 RMS
 
   38 printf 
"optimum %7.3f %7.3f %7.3f %7.3f %7.3f\n" $X $Y $Z $CHI2 $RMS
 
   40 awk                 '$1  ~ /^#/ { for (i = 2; i <= NF; ++i ) { printf " %s", $i }}' $TRIPOD3Z_TXT  |  
read A B 
C 
   42 awk -
v Y=$Y -
v Z=$Z 
'$1 !~ /^#/ { if ( $2 == Y && $3 == Z )  { printf "%7.3f %7.3f %7.3f\n", $1, $4, $5 } }' $TRIPOD3Z_TXT  >!  
$WORKDIR/
tripod3z_${
A}.txt
 
   43 awk -
v X=$X -
v Z=$Z 
'$1 !~ /^#/ { if ( $1 == X && $3 == Z )  { printf "%7.3f %7.3f %7.3f\n", $2, $4, $5 } }' $TRIPOD3Z_TXT  >!  
$WORKDIR/
tripod3z_${B}.txt
 
   44 awk -
v X=$X -
v Y=$Y 
'$1 !~ /^#/ { if ( $1 == X && $2 == Y )  { printf "%7.3f %7.3f %7.3f\n", $3, $4, $5 } }' $TRIPOD3Z_TXT  >!  
$WORKDIR/
tripod3z_${
C}.txt
 
   46 for TRIPOD 
in $A $B $C; 
do 
   70         END { print XMIN, XMAX } 
   72         if ( $1 < XMIN ) { XMIN = $1 } 
   73         if ( $1 > XMAX ) { XMAX = $1 } 
   77     if (( $X > $XMIN && $X < $XMAX )); 
then 
   80             -
f ${TRIPOD_ROOT}:\.\*                    \
 
   89         set_array P2 `JPrintFit -
f $WORKDIR/fit.root:\.\* -@
p2`
 
   93         printf 
"nominal %2d %7.3f %7.3f\n" $TRIPOD 0.0 `JPrintFit -
f $WORKDIR/fit.root:\.\* -
x "0.0"`
 
   94         printf 
"optimal %2d %7.3f %7.3f\n" $TRIPOD $X  `JPrintFit -
f $WORKDIR/fit.root:\.\* -
x "$X"`
 
  100         echo   "Optimum value at limit; -> no fit." 
  101         printf 
"nominal %2d %7.3f %7.3f\n" $TRIPOD 0.0 `
awk -
v X=0.0 
'{ if ($1 == X) { print $2 }}' $TRIPOD_TXT`
 
  102         printf 
"optimal %2d %7.3f %7.3f\n" $TRIPOD $X  $Y
 
  106     if (( $# == 1 )); 
then 
  107         JEditTripod -
f $argv[1] -
T "$TRIPOD add 0.0 0.0 $X" -
o $argv[1]
 
  111         -
f ${TRIPOD_ROOT}:\.\*                    \
 
  118     rm -
f $TRIPOD_TXT $TRIPOD_ROOT 
$G1_TXT $G1_ROOT
 
then usage $script< detector identifier >< startdate\"YYYY-MM-DDHH:MM:SS\"><finaldate\"YYYY-MM-DDHH:MM:SS\"><QA/QCfile> fi case set_variable QAQC_TXT $argv[4]
 
then fatal No hydrophone data file $HYDROPHONE_TXT fi sort gr k
 
std::istream & read(std::istream &in, JTestSummary &summary, const char delimiter= ' ')
Read test summary. 
 
o $QUALITY_ROOT d $DEBUG!CHECK_EXIT_CODE JPlot1D f
 
then usage $script(input file)+< QA/QC file >" "\nAuxiliary script to produce the following QA/QC data then fatal Wrong number of arguments fi set_array INPUT_FILES $argv[1,-2] set_variable QAQC_FILE $argv[-1] mkdir p $WORKDIR set_variable ACOUSTICS_DEBUG
 
then fatal Wrong number of arguments fi set_variable STRING $argv[1] set_variable DETECTORXY_TXT $WORKDIR $DETECTORXY_TXT tail read X Y CHI2 RMS printf optimum n $X $Y $CHI2 $RMS awk v Y
 
do set_variable TRIPOD_TXT $WORKDIR tripod3z_
 
static const double C
Physics constants. 
 
then echo Variable JPP_DIR undefined exit fi source $JPP_DIR setenv sh $JPP_DIR &dev null set_variable
 
do set_variable STRING_TXT awk
 
do set_variable OUTPUT_DIRECTORY $WORKDIR T
 
then echo Variable JPP_DIR undefined exit fi source $JPP_DIR setenv sh $JPP_DIR &dev null set_variable DEBUG set_variable WORKDIR
 
do grep(chi2\[.\]\|gradient\)" $INPUT_FILE > $WORKDIR/stage.txt awk 'BEGIN 
 
then JMuonMCEvt f $INPUT_FILE o $INTERMEDIATE_FILE d
 
then fatal Wrong number of arguments fi JConvertDetectorFormat a o
 
no fit printf nominal n $STRING awk v X
 
do set_variable MODULE getModule a $WORKDIR detector_a datx L $STRING JEditDetector a $WORKDIR detector_a datx M $MODULE setz o $WORKDIR detector_a datx JEditDetector a $WORKDIR detector_b datx M $MODULE setz o $WORKDIR detector_b datx done echo Output stored at $WORKDIR detector_a datx and $WORKDIR tripod_a txt JDrawDetector2D a $WORKDIR detector_a datx a $WORKDIR detector_b datx L BL o detector $FORMAT $BATCH JDrawDetector2D T $WORKDIR tripod_a txt T $WORKDIR tripod_b txt L BL o tripod $FORMAT $BATCH JCompareDetector a $WORKDIR detector_a datx b $WORKDIR detector_b datx o $WORKDIR abc root &dev null for KEY in X Y Z
 
static JNullStream null
Null I/O 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 JAcoustics sh $DETECTOR_ID source JAcousticsToolkit sh CHECK_EXIT_CODE typeset A EMITTERS get_tripods $WORKDIR tripod txt EMITTERS get_transmitters $WORKDIR transmitter txt EMITTERS for EMITTER in
 
source $JPP_DIR setenv csh $JPP_DIR &dev null eval JShellParser o a A
 
do typeset Z STRING typeset Z FLOOR set_variable MODULE_TXT $WORKDIR $MODULE_TXT tail read X ZMAX RMS sort gr $MODULE_TXT tail read X ZMIN RMS echo $X $ZMIN $G1_TXT
 
then fatal Invalid tripod $TRIPOD
 
#define DEBUG(A)
Message macros. 
 
Double_t g1(const Double_t x)
Function.