8 # ------------------------------------------------------------------------------------------
 
   10 #                         Utility script to test JGraph2D, JFit2D and JPlot2D.
 
   12 # ------------------------------------------------------------------------------------------
 
   15 if [ -z $JPP_DIR ]; then
 
   16     echo "Variable JPP_DIR undefined."
 
   21 source $JPP_DIR/setenv.sh $JPP_DIR
 
   26 set_variable   WORKDIR  ${TMPDIR:-/tmp}/  
 
   29     usage "$script [working directory]"
 
   33     1) set_variable  WORKDIR  $1;;
 
   37 set_variable GRAPH_TXT   graph.txt
 
   38 set_variable GRAPH_ROOT  graph.root
 
   51     echo $(( $TOP * exp(-0.5*(($X - $X0)/$SIGMA)**2) * exp(-0.5*(($Y - $Y0)/$SIGMA)**2) ))
 
   54 rm -f $WORKDIR/$GRAPH_TXT >& /dev/null
 
   56 for (( X = -3.0; $X <= +3.5; X += 1.0 )); do
 
   57     for (( Y = -3.0; $Y <= +3.5; Y += 1.0 )); do
 
   60         let "V = `$JPP_DIR/examples/JMath/getPoisson -e $U`"
 
   62         printf "%7.3f %7.3f %7.3f\n"  $X  $Y  $V  >>  $WORKDIR/$GRAPH_TXT
 
   67 cat $WORKDIR/$GRAPH_TXT
 
   70     -f $WORKDIR/$GRAPH_TXT                  \
 
   71     -o $WORKDIR/$GRAPH_ROOT              
 
   73 set_variable   FORMULA  "[0] * exp(-0.5 * (x-[1])*(x-[1]) / ([2]*[2])) * exp(-0.5 * (y-[3])*(y-[3]) / ([4]*[4]))"
 
   76     -f $WORKDIR/${GRAPH_ROOT}:${GRAPH_TXT}  \
 
   77     -o $WORKDIR/fit.root                    \
 
   87     -f $WORKDIR/fit.root:${GRAPH_TXT}       \