8 # ------------------------------------------------------------------------------------------ 
   10 #                         Utility script to plot PDFs. 
   12 # ------------------------------------------------------------------------------------------ 
   15 if [ -z $JPP_DIR ]; 
then 
   16     echo "Variable JPP_DIR undefined." 
   21 source $JPP_DIR/setenv.sh $JPP_DIR
 
   40     usage "$script [energy [distance]]" 
   49 for dir 
in NORTH EAST SOUTH 
WEST; 
do 
   51     echo "Generating $dir." 
   57         -
D "${D}" -
R $R -
E $E          \
 
   59         -
o fa\[${dir}\].root --!
 
   62         -@ 
"MODULE_RADIUS_M=0.00;"     \
 
   64         -
D "${D}" -
R $R -
E $E          \
 
   66         -
o fb\[${dir}\].root --!
 
   69         -@ 
"MODULE_RADIUS_M=0.25;"     \
 
   71         -
D "${D}" -
R $R -
E $E          \
 
   73         -
o fc\[${dir}\].root --!
 
   76         -
f fa\[${dir}\].root:h0        \
 
   77         -
f fb\[${dir}\].root:h0        \
 
   78         -
f fc\[${dir}\].root:h0        \
 
   81         -\^ 
"dP/dt [npe/ns]"           \
 
   83         -
T "E = ${E} GeV#; R = ${R} m" \
 
   84         -
o shadow-${
R}-${dir}.$FORMAT  $BATCH
 
static const double H
Planck constant [eV s]. 
 
then fatal Wrong number of arguments fi set_variable STRING $argv[1] set_variable DETECTORXY_TXT $WORKDIR $DETECTORXY_TXT tail read X Y CHI2 RMS printf optimum n $X $Y $CHI2 $RMS awk v Y
 
then for dir in NORTH EAST SOUTH WEST
 
fatal Invalid number of arguments esac let YMIN
 
then echo Variable JPP_DIR undefined exit fi source $JPP_DIR setenv sh $JPP_DIR &dev null set_variable
 
do set_variable OUTPUT_DIRECTORY $WORKDIR T
 
then usage $script[distance] fi case set_variable R
 
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 CHECK_EXIT_CODE typeset A TRIPODS get_tripods $WORKDIR tripod txt TRIPODS for EMITTER in
 
set_variable NUMBER_OF_ITERATIONS set_variable EPSILON cat acoustics_fit_parameters txt<< EOF $CONFIGURATION[*]Nmin=3;sigma_s=100.0e-6;stdev=10.0;mestimator=0;fixStrings=0;EOF for STRING in $STRINGS[*];do#fit stretching and(z) position of given string set_variable DETECTOR_TMP/tmp/detector_A.datx JEditDetector-a $DETECTOR-o $DETECTOR_TMP-r $STRING JEditDetector-a $DETECTOR-o $DETECTOR-k $STRING for MUL in 0.005 0.001;do DX_M=0.2 for((N=0;$N< $NUMBER_OF_ITERATIONS;++N));do CHI2[3]=$CHI2[1] fitPositionOfString $STRING Z $DX_M fitStretchingOfString $STRING $MUL if(($CHI2[3]-$CHI2[1]< $EPSILON));then break fi done if(($N >=$NUMBER_OF_ITERATIONS));then printf"warning: reached maximum number of iterations %d - converenge %7.3f\n"$N $(($CHI2[3]-$CHI2[1])) fi done JMergeDetector-a $DETECTOR-a $DETECTOR_TMP-o $DETECTOR rm-f $DETECTOR_TMP JConvertDetectorFormat-a $DETECTOR-o $DETECTOR-r-d 0 > &dev null done
 
do echo Generating $dir eval D