JDrawPDF.sh

Go to the documentation of this file.

#!/usr/bin/env zsh
#
# \author mdejong, bofearraigh
#
version=1.0
script=${0##*/}
 
# ------------------------------------------------------------------------------------------
#
#                         Utility script to plot 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       3
set_variable   E           1e3
set_variable   R           50
set_variable   z           60
 
set_variable:  YMAX        PHYSICS_YMAX           2e-2
set_variable:  YMIN        PHYSICS_YMIN           1e-7
set_variable:  HISTOGRAM   PHYSICS_HISTOGRAM      "1040  -20 +500"
 
set_variable:  FORMAT      GRAPHICS_FORMAT        gif
set_variable+  BATCH       GRAPHICS_BATCH         -B
 
if do_usage $*; then
    usage "$script [energy [distance [z of PMT]]]"
fi
 
case $# in
    3) set_variable z  $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."
 
        JDrawPDF \
            -F1 -F3 -F5                                  \
            -F2 -F4 -F6                                  \
            -o $WORKDIR/f\[${DIR}\].root                 \
            -D "${(P)DIR}"                               \
        -R $R                                        \
        -E $E                                        \
        -z $z                                        \
            -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 "YMIN = 10**($(printf "%1.0f" $((log10($YMAX) + 0.5)))) * 1.0e-5"
 
if (( $YMIN * 1.0e5 < $YMAX * 2.0 )); then
    let " YMIN *= 5.0"
fi
 
let "YMAX = $YMIN * 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#; z = ${z} m"      \
    -o pdf.$FORMAT                                   $BATCH
 
 
set_variable  DEFAULT     "default"
set_variable  ABSORPTION  "Smith&Baker"
 
for DIR in $DIRECTIONS[*]; do
 
    echo "Generating $DIR ${ABSORPTION}."
 
        JDrawPDF \
            -F1 -F3 -F5                                  \
            -F2 -F4 -F6                                  \
            -o $WORKDIR/g\["${ABSORPTION}"\].root        \
            -D "${(P)DIR}"                               \
        -R $R                                        \
        -E $E                                        \
        -z $z                                        \
        -@ "absorptionLength = ${ABSORPTION} 1.0;"   \
            -H "${HISTOGRAM}"                            \
        -d $DEBUG
 
    mv $WORKDIR/f\[$DIR\].root                       \
       $WORKDIR/f\["${DEFAULT}"\].root
 
    JPlot1D \
        -f $WORKDIR/f\["${DEFAULT}"\].root:h0        \
        -f $WORKDIR/g\["${ABSORPTION}"\].root:h0     \
        -y "$YMIN $YMAX" -Y                          \
        -> "#Deltat [ns]"                           \
        -\^ "#partialP/#partialt [npe/ns]"           \
        -L TR                                        \
        -T "$DIR#; R = $R m"                         \
        -o $DIR.$FORMAT                              $BATCH
done
 
rm -f $WORKDIR/{f,g}\[{"${DEFAULT}","${ABSORPTION}"}\].root