JPlotPDG.sh

Go to the documentation of this file.

#!/usr/bin/env zsh
#
# \author mdejong
#
version=1.0
script=${0##*/}
 
# ------------------------------------------------------------------------------------------
#
#                         Utility script to plot tabulated PDFs.
#
# ------------------------------------------------------------------------------------------
 
 
if [ -z $JPP_DIR ]; then
    echo "Variable JPP_DIR undefined."
    exit
fi
 
source $JPP_DIR/setenv.sh $JPP_DIR
 
zmodload zsh/mathfunc
 
set_variable   WORKDIR     ${TMPDIR:-/tmp}               
set_variable   DEBUG       2
set_variable   E           1                  
set_variable   R           50                 
set_variable   CD          0.7                
 
set_variable:  HISTOGRAM   PHYSICS_HISTOGRAM         "520  -20 +500"
set_variable:  PDF         PHYSICS_PDF               $JPP_DATA/J%p.dat.gz
 
set_variable:  FORMAT      GRAPHICS_FORMAT        gif
set_variable+  BATCH       GRAPHICS_BATCH         -B
 
if do_usage $*; then
    usage "$script [energy [distance [cosine]]]"
fi
 
case $# in
    3) set_variable CD $3;&
    2) set_variable R  $2;&
    1) set_variable E  $1;;
    0) ;;
    *) fatal "Wrong number of arguments."
esac
 
let "YMAX = 0.0"
 
DIRECTIONS=(NORTH EAST SOUTH WEST)
 
for DIR in $DIRECTIONS[*]; do
 
    echo "Generating $DIR."
 
    JPlotPDG \
        -f ${PDF/\%/13}                \
        -f ${PDF/\%/14}                \
        -o $WORKDIR/F\[${DIR}\].root   \
        -D "${(P)DIR}"                 \
        -R $R                          \
        -c $CD                         \
        -E $E                          \
        -H "${HISTOGRAM}"              \
        -d $DEBUG
 
    let "Y = $(JPrintResult -f $WORKDIR/F\[${DIR}\].root:h0 -F GetMaximum)"
 
    if (( $Y > $YMAX )); then
        let "YMAX = $Y"
    fi
done
 
let "YMAX = 10**($(printf "%1.0f" $((log10($YMAX) + 0.5))))"
let "YMIN = $YMAX * 1.0e-5"
 
JPlot1D \
    -f$WORKDIR/F\[${^DIRECTIONS}\].root:h0                    \
    -y "$YMIN $YMAX" -Y                                       \
    -> "#Deltat [ns]"                                        \
    -\^ "#partialP/#partialt [npe/ns]"                        \
    -L TR                                                     \
    -T "E = ${E} GeV#; R = ${R} m#; cos(#theta_{0}) = ${CD}"  \
    -o PDG.$FORMAT                                            $BATCH
 
rm -f $WORKDIR/F\[${^DIRECTIONS}\].root