Jpp 21.0.0-rc.1
the software that should make you happy
Loading...
Searching...
No Matches
JDrawPDE.sh
Go to the documentation of this file.
1#!/usr/bin/env zsh
2#
3# \author mdejong
4#
5version=1.0
6script=${0##*/}
7
8# ------------------------------------------------------------------------------------------
9#
10# Utility script to plot PDFs.
11#
12# ------------------------------------------------------------------------------------------
13
14
15if [ -z $JPP_DIR ]; then
16 echo "Variable JPP_DIR undefined."
17 exit
18fi
19
20source $JPP_DIR/setenv.sh $JPP_DIR
21
22zmodload zsh/mathfunc
23
24set_variable WORKDIR ${TMPDIR:-/tmp}
25set_variable DEBUG 3
26set_variable E 1.0e6
27set_variable R 50
28set_variable CD 0.7
29
30set_variable: HISTOGRAM PHYSICS_HISTOGRAM "520 -20 +500"
31
32set_variable: FORMAT GRAPHICS_FORMAT gif
33set_variable+ BATCH GRAPHICS_BATCH -B
34
35
36if do_usage $*; then
37 usage "$script [energy [distance [cosine]]]"
38fi
39
40case $# in
41 3) set_variable CD $3;&
42 2) set_variable R $2;&
43 1) set_variable E $1;;
44esac
45
46let "YMAX = 0.0"
47
48DIRECTIONS=(NORTH EAST SOUTH WEST)
49
50for DIR in $DIRECTIONS[*]; do
51
52 echo "Generating $DIR."
53
54 JDrawPDE \
55 -F13 -F14 \
56 -D "${(P)DIR}" \
57 -R $R \
58 -c $CD \
59 -E $E \
60 -H "${HISTOGRAM}" \
61 -o $WORKDIR/f\[${DIR}\].root \
62 -d $DEBUG
63
64 let "Y = $(JPrintResult -f $WORKDIR/f\[${DIR}\].root:h0 -F GetMaximum)"
65
66 if (( $Y > $YMAX )); then
67 let "YMAX = $Y"
68 fi
69done
70
71let "YMAX = 10**($(printf "%1.0f" $((log10($YMAX) + 0.5))))"
72let "YMIN = $YMAX * 1.0e-5"
73
74JPlot1D \
75 -f$WORKDIR/f\[${^DIRECTIONS}\].root:h0 \
76 -y "$YMIN $YMAX" -Y \
77 -> "#Deltat [ns]" \
78 -\^ "#partialP/#partialt [npe/ns]" \
79 -L TR \
80 -T "E = ${E} GeV#; R = ${R} m#; cos(#theta_{0}) = ${CD}" \
81 -o pde.$FORMAT $BATCH
82
83rm -f $WORKDIR/f\[${^DIRECTIONS}\].root