Jpp 20.0.0-rc.2
the software that should make you happy
Loading...
Searching...
No Matches
JRateK40.sh
Go to the documentation of this file.
1#!/usr/bin/env zsh
2script=${0##*/}
3
4if [ -z $JPP_DIR ]; then
5 echo "Variable JPP_DIR undefined."
6 exit
7fi
8
9source $JPP_DIR/setenv.sh $JPP_DIR >& /dev/null
10
11set_variable: DEBUG PHYSICS_DEBUG 3
12set_variable: WORKDIR PHYSICS_WORKDIR ${TMPDIR:-/tmp}
13set_variable: FORMAT GRAPHICS_FORMAT gif
14set_variable+ BATCH GRAPHICS_BATCH -B
15
16if do_usage $*; then
17 usage "$script"
18fi
19
20typeset -A FILTER
21
22FILTER[350]=15
23FILTER[370]=10
24FILTER[400]=8
25FILTER[420]=8
26FILTER[450]=8
27FILTER[470]=10
28FILTER[500]=20
29
30FORMULA="exp(-0.5 * (x-[1])*(x-[1]) / ([2]*[2]))"
31
32KEYS=($(echo ${(k)FILTER} | tr ' ' '\n' | sort -g))
33
34for KEY in $KEYS; do
35
36 echo "$KEY [nm]"
37
38 $JPP_DIR/examples/JPhysics/JRateK40 \
39 -o $WORKDIR/R\[$KEY\].root \
40 -F "${${FORMULA//\[1\]/$KEY}//\[2\]/$FILTER[$KEY]}" \
41 -d $DEBUG
42done
43
44$JPP_DIR/examples/JPhysics/JRateK40 \
45 -o $WORKDIR/R\[all\].root \
46 -d $DEBUG
47
48KEYS=(all ${(k)FILTER})
49
50JPlot1D \
51 -@ "titleOffset = 1.2" \
52 -f$WORKDIR/R\[${^KEYS}\].root:h0 \
53 -x "280 600" \
54 -> "#lambda [nm]" \
55 -\^ "#partialR/#partial#lambda [kHz/nm]" \
56 -G X \
57 -G Y \
58 -T "" \
59 -L TR \
60 -o k40.$FORMAT $BATCH
61
62rm -f $WORKDIR/R\[${^KEYS}\].root