4 if [ -z $JPP_DIR ];
then
5 echo "Variable JPP_DIR undefined."
9 source $JPP_DIR/setenv.sh $JPP_DIR >& /dev/
null
16 usage "$script <detector file> (input file)+"
20 fatal
"Wrong number of arguments."
26 eval `JPrintDetector -
a $DETECTOR -O IDENTIFIER`
28 JAcoustics.sh $DETECTOR_ID
30 source JAcousticsToolkit.sh
38 if (( ${#${(@
k)TRIPODS}} != 3 ));
then
39 fatal
"Number of tripods ${#${(@k)TRIPODS}} != 3."
50 echo "# $A $B $C" > $TRIPOD_TXT #
write header
54 for ((
Z[$A] = -2.0; $Z[$A] <= 2.0;
Z[$A] += 0.2 ));
do
55 for ((
Z[$B] = -2.0; $Z[$B] <= 2.0;
Z[$B] += 0.2 ));
do
56 for ((
Z[$C] = -2.0; $Z[$C] <= 2.0;
Z[$C] += 0.2 ));
do
60 for key
in "${(@k)TRIPODS}";
do
61 JEditTripod -
f $TMPDIR/
tripod.txt -
T "$key add 0.0 0.0 ${Z[$key]}"
64 rm -
f $TMPDIR/katoomba.root
68 -
f "$INPUT_FILES[*]" \
69 -
o $TMPDIR/katoomba.root \
73 -@
$WORKDIR/acoustics_fit_parameters.txt \
79 if (( `JPrintResult -
f $TMPDIR/katoomba.root:chi2 -
F "GetSumOfWeights"` > 1.0 ));
then
81 set_array RESULT `JPrintResult -
f $TMPDIR/katoomba.root:chi2 -
F "GetMean" -
F "GetRMS / sqrt(GetSumOfWeights)"`
83 printf
"%7.3f %7.3f %7.3f %7.3f %7.3f\n" $Z[$A] $Z[$B] $Z[$C] $RESULT[*] >> $TRIPOD_TXT
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
o $QUALITY_ROOT d $DEBUG!JPlot1D f
V(JDAQEvent-JTriggerReprocessor)*1.0/(JDAQEvent+1.0e-10)
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
then echo Variable JPP_DIR undefined exit fi source $JPP_DIR setenv sh $JPP_DIR if do_usage *then usage $script[(input file)+] fi set_variable DEBUG set_variable WORKDIR TMPDIR
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
do sput $STRING $FLOOR sget MODULE INPUT_FILES
then JMuonMCEvt f $INPUT_FILE o $INTERMEDIATE_FILE d
bool write(const Vec &v, std::ostream &os)
Write a Vec(tor) to a stream.
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
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
do echo n Creating graphics for string $STRING for((FLOOR=$FIRST_FLOOR;$FLOOR<=$LAST_FLOOR;FLOOR+=1))
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
esac $JPP_BIN JLogger sh $LOGGER until pgrep JGetMessage</dev/null > dev null
then usage $script< archive >< detectorfile >< run > nGet tripod
#define DEBUG(A)
Message macros.