7 # ------------------------------------------------------------------------------------------
9 # Example script to plot JFitK40 results.
11 # ------------------------------------------------------------------------------------------
13 if [ -z $JPP_DIR ];
then
14 echo "Variable JPP_DIR undefined."
18 source $JPP_DIR/setenv.sh $JPP_DIR >& /dev/
null
20 if ( do_usage $* );
then
21 usage "$script <detector file> <input file>"
27 *) fatal
"Invalid number of arguments"
32 eval `JPrintDetector -
a $DETECTOR -O SUMMARY`
43 for (( FLOOR = $FIRST_FLOOR; $FLOOR <= $LAST_FLOOR; FLOOR += 1 ));
do
45 print -
u $FD_O
"$STRING $FLOOR"
49 echo "($STRING,$FLOOR) $MODULE"
57 -
T "($STRING,$FLOOR)" \
59 -
o /tmp/${TYPE}_${
STRING}_${FLOOR}.gif \
67 /tmp/${TYPE}_${
STRING}_*.gif \
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
bool read(Vec &v, std::istream &is)
Read a Vec(tor) from a stream.
do set_array DAQHEADER JPrintDAQHeader f
do set_variable OUTPUT_DIRECTORY $WORKDIR T
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
esac $JPP_BIN JLogger sh $LOGGER until pgrep JGetMessage</dev/null > dev null
const JModule & getModule(const JDetector &detector, const JModuleLocation &location)
find module with a given string and floor number
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[*]