4 if [ -z $JPP_DIR ]; 
then 
    5     echo "Variable JPP_DIR undefined." 
    9 source $JPP_DIR/setenv.sh $JPP_DIR >& /dev/
null 
   15     usage "$script <detector file> <tripod file> <Tx> <Ty>"\
 
   16           "\nAuxiliary script to tilt footprint of system including detector and tripods." 
   19 if (( $# != 4 )); 
then 
   20     fatal 
"Wrong number of arguments." 
   29     fatal 
"No detector file $DETECTOR." 
   33     fatal 
"No tripod file $TRIPOD." 
   36 source JAcousticsToolkit.sh
 
   44 if (( ${#TRIPODS} == 0 )); 
then 
   45     fatal 
"Number of tripods ${#TRIPODS}." 
   51 for _X _Y _Z 
in `
echo ${(@
v)TRIPODS}`; 
do 
   52     let 
"X_CENTER = $X_CENTER + $_X" 
   53     let 
"Y_CENTER = $Y_CENTER + $_Y" 
   56 let 
"X_CENTER = $X_CENTER / ${#TRIPODS}" 
   57 let 
"Y_CENTER = $Y_CENTER / ${#TRIPODS}" 
   59 printf 
"\ncenter %15.5f %15.5f\n\n"  $X_CENTER  $Y_CENTER
 
   61 # Modify tripod positions 
   63 for ID in ${(
k)TRIPODS}; 
do 
   67     let 
"DZ = ${TX} * (${X} - ${X_CENTER}) + ${TY} * (${Y} - ${Y_CENTER})" 
   69     JEditTripod -
f $TRIPOD -
T "$ID add 0.0 0.0 $DZ" --!
 
   73 # Modify module positions 
   81     let 
"DZ = $TX * ($X + $UTM_EAST - $X_CENTER)  +  $TY * ($Y + $UTM_NORTH - $Y_CENTER)" 
   83     OPTION+=(
"$MODULE add 0.0 0.0 $DZ;")
 
then usage $script< detector >< run >< outputfile > fi case set_variable OPTION
 
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
 
o $QUALITY_ROOT d $DEBUG!JPlot1D f
 
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
 
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 echo Variable JPP_DIR undefined exit fi source $JPP_DIR setenv sh $JPP_DIR &dev null set_variable DEBUG set_variable WORKDIR
 
then JConvertDetectorFormat a $DETECTOR[1] o
 
then JMuonMCEvt f $INPUT_FILE o $INTERMEDIATE_FILE d
 
then set_variable MODULE getModule a $DETECTOR L $STRING $FLOOR JEditDetector a $DETECTOR M $MODULE add $X o $DETECTOR else echo No update of detector $DETECTOR
 
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
 
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
 
then fatal Invalid tripod $TRIPOD
 
esac $JPP_BIN JLogger sh $LOGGER until pgrep JGetMessage</dev/null > dev null
 
#define DEBUG(A)
Message macros.