4 if [ -z $JPP_DIR ];
then
5 echo "Variable JPP_DIR undefined."
9 source $JPP_DIR/setenv.sh $JPP_DIR >& /dev/
null
18 if ( do_usage $* );
then
19 usage "$script <detector file> <tripod file>"
22 if (( $# != 2 ));
then
23 fatal
"Wrong number of arguments."
30 fatal
"No file $DETECTOR."
34 fatal
"No file $TRIPOD."
37 eval `JPrintDetector -
a $DETECTOR -O IDENTIFIER`
38 eval `JPrintDetector -
a $DETECTOR -O SUMMARY`
63 -@
"sigma_s = $SIGMA_S;" \
64 -@
"mestimator = 0;" \
72 set_array RESULT `JPrintResult -
f "$WORKDIR/katoomba.root:string\[$STRING\]" -
F "GetRMS(1)" -
F "GetRMS(2)"`
74 printf
"%4d %9.5f %9.5f [mrad]\n" $STRING $RESULT[*]
80 -
f "$WORKDIR/katoomba.root:cpu" \
83 -\^
"number of events [a.u.]" \
88 -
f "$WORKDIR/katoomba.root:chi2" \
90 -\^
"number of events [a.u.]" \
98 source JAcoustics.sh --
104 for EMITTER
in ${(@
k)TRIPODS};
do
107 -
f "$WORKDIR/katoomba.root:emitter\[${EMITTER}\]" \
109 -\^
"number of events [a.u.]" \
112 -
T "[${(l:2::0::0:)EMITTER}]" \
120 -
f "$WORKDIR/katoomba.root:string\[.*\]" \
127 -\>
"#DeltaTx [mrad]" \
128 -\<
"#DeltaTy [mrad]" \
135 rm -
f $WORKDR/sum.root
141 eval `JPrintDetector -
a $DETECTOR -O SUMMARY`
146 -
f "$WORKDIR/katoomba.root:string\[${STRING}\]" \
148 -\>
"#DeltaTx [mrad]" \
149 -\<
"#DeltaTy [mrad]" \
153 -
T "[${(l:4::0::0:)STRING}]" \
void set_variable(const std::string &name, const std::string &value)
Set environment variable.
clean eval JPrintDetector a $DETECTOR O IDENTIFIER eval JPrintDetector a $DETECTOR O SUMMARY set_variable STRING
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
do echo Generating $dir eval DIR
then fatal Invalid string $STRING
do set_variable OUTPUT_DIRECTORY $WORKDIR T
*set_variable DETECTOR $argv[1] set_variable INPUT_FILE $argv[2,-2] set_variable OUTPUT_FILE $argv[-1]
do set_variable SIGMA_NS set_variable OUTLIERS set_variable OUTPUT_FILE matrix[${ALPHA_DEG}\deg\] root $JPP JMatrixNZ a $DETECTOR f $INPUT_FILE o $OUTPUT_FILE S
then JMuonMCEvt f $INPUT_FILE o $INTERMEDIATE_FILE d
then $JPP_DIR software JCalibrate JCalibrateToT a
alias put_queue eval echo n
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
then usage $script[input file[working directory[option]]] nWhere option can be N
then fatal Invalid tripod $TRIPOD
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
do eval JCanberra a $DETECTOR f $INPUT_FILE o $WORKDIR canberra[${EMITTER}\] root T print_tripods V print_velocity E $EMITTER d $DEBUG!done attach getModule a $DETECTOR typeset Z STRING typeset Z FLOOR set_variable FIRST_FLOOR for STRING in $STRINGS[*]
#define DEBUG(A)
Message macros.