8 # ------------------------------------------------------------------------------------------ 
   10 #                         Utility script to plot integrals of tabulated PDFs. 
   12 # ------------------------------------------------------------------------------------------ 
   15 if [ -z $JPP_DIR ]; 
then 
   16     echo "Variable JPP_DIR undefined." 
   21 source $JPP_DIR/setenv.sh $JPP_DIR
 
   35 set_variable  YMAX     1e+2
 
   42 if ( do_usage $* ); 
then 
   43     usage "$script [energy]" 
   51 for dir 
in NORTH EAST SOUTH 
WEST; 
do 
   53     echo "Generating $dir." 
   61             -
C ${
CDF/\%/${TYPE}}            \
 
   74                 -
f $WORKDIR/npe\[${dir}\].root:${FUNCTION}      \
 
   76                 -
T "${dir} E = ${E} GeV"                        \
 
   79                 -\< 
"cos #theta_{0}"                            \
 
   89         for FUNCTION 
in npe 
cdf; 
do 
   92                 -
f $WORKDIR/npe\[${dir}\].root:${FUNCTION}        \
 
   98                 -
f $WORKDIR/ratio-${FUNCTION}-${dir}.root:Divide  \
 
  100                 -
T "${FUNCTION}/pdf ${dir}"                       \
 
  102                 -\< 
"cos #theta_{0}"                              \
 
then usage $script< detector file >< inputfile >< outputfile > fi case set_variable PDF
 
do echo Generating $dir eval D
 
void set_variable(const std::string &name, const std::string &value)
Set environment variable. 
 
do set_array DAQHEADER JPrintDAQHeader f
 
do echo Generating $dir eval DIR
 
then for dir in NORTH EAST SOUTH WEST
 
fatal Invalid number of arguments esac let YMIN
 
static const double C
Physics constants. 
 
do set_variable OUTPUT_DIRECTORY $WORKDIR T
 
then usage $script[detector file[input file[output file[CDF file descriptor]]]] nNote that if more than one input file is all other arguments must be provided fi case set_variable CDF
 
then for FUNCTION in pdf npe cdf
 
then JMuonMCEvt f $INPUT_FILE o $INTERMEDIATE_FILE d
 
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< detector file >< inputfile > fi case set_variable WORKDIR
 
then usage $script[input file[working directory[option]]] nWhere option can be E
 
#define DEBUG(A)
Message macros.