4 if [ -z $JPP_DIR ]; 
then 
    5     echo "Variable JPP_DIR undefined." 
    9 source $JPP_DIR/setenv.sh $JPP_DIR >& /dev/
null 
   18     usage "$script <string identifier> [z-range]" 
   22     2) let           
"ZRANGE = $argv[2]";&
 
   24     *) fatal 
"Wrong number of arguments." 
   32 if [[ ! -
f $MECHANICS_TXT ]] 
then 
   33     fatal 
"No mechanics data file $MECHANICS_TXT." 
   42 awk -
v A=$A -
v B=$B 
'BEGIN { DA=1e6; DB = 1e6; ZMIN = 1e6; } END { print ZMIN } \ 
   44     if (($1 - A >= -DA && $1 - A <= +DA) && ($2 - B >= -DB && $2 - B <= +DB)) { \ 
   46     if ($1 > A) { DA = $1 - A} else { DA = A - $1};  \ 
   47     if ($2 > B) { DB = $2 - B} else { DB = B - $2};  \ 
   48     }}' $MECHANICS_TXT  |  
read ZMIN
 
   50 printf 
"current %4d %7.5f %7.3f %7.3f\n"  $STRING  $A  $B  $ZMIN
 
   55     -
f ${
TMPDIR:-/tmp}/graph_1.txt               \
 
   60 sort -
n  -
k 3,3 $MECHANICS_TXT | tail -1 | 
read A B ZMAX RMS
 
   61 sort -nr -
k 3,3 $MECHANICS_TXT | tail -1 | 
read A B ZMIN RMS
 
   63 printf 
"optimal %4d %7.5f %7.3f %7.3f\n"  $STRING  $A  $B  $ZMIN
 
   68     -
f ${
TMPDIR:-/tmp}/graph_2.txt               \
 
   71 if (( $ZRANGE > 0.0 )); 
then 
   72     let 
"ZMAX = $ZMIN + $ZRANGE" 
   76     -
f ${MECHANICS_ROOT}:\.\*                    \
 
   77     -
f ${
TMPDIR:-/tmp}/graph_1.root:\.\*         \
 
   78     -
f ${
TMPDIR:-/tmp}/graph_2.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. 
 
clean eval JPrintDetector a $DETECTOR O IDENTIFIER eval JPrintDetector a $DETECTOR O SUMMARY set_variable STRING
 
then usage $script< directory A >< directoryB > nIn each there should be a file detector datx and tripod txt
 
o $QUALITY_ROOT d $DEBUG!CHECK_EXIT_CODE JPlot1D f
 
usr share Modules init zsh export TMPDIR
 
then fatal Wrong number of arguments fi JConvertDetectorFormat a o
 
then fatal Invalid string $STRING
 
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 JPlot2D f $WORKDIR detector root
 
then usage $script< input file >[option[primary[working directory]]] nWhere option can be N
 
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
 
#define DEBUG(A)
Message macros.