add a script that takes model debug file (use --enable-model-debug) and

generates an R graphic wih the distribution of execution times so that we can
see if it's a tight gaussian or not.

tools/model_distrib.sh

@@ -0,0 +1,41 @@
+#!/bin/bash
+
+#
+# StarPU
+# Copyright (C) INRIA 2008-2009 (see AUTHORS file)
+#
+# This program is free software; you can redistribute it and/or modify
+# it under the terms of the GNU Lesser General Public License as published by
+# the Free Software Foundation; either version 2.1 of the License, or (at
+# your option) any later version.
+#
+# This program is distributed in the hope that it will be useful, but
+# WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+#
+# See the GNU Lesser General Public License in COPYING.LGPL for more details.
+#
+
+# we want to handle requests like *.debug
+for inputfile in "$@"
+do
+echo "Handle file $inputfile"
+hashlist=`cut -f 1 $inputfile | sort | uniq | xargs` 
+
+# extract subfiles from the history file
+for h in $hashlist
+do
+	echo "Handling tasks with hash = $h"
+	grep "^$h" $inputfile| cut -f 2 > $inputfile.$h
+
+R --no-save > /dev/null << EOF
+
+x <- scan("$inputfile.$h")
+hist(x[x > quantile(x,0.01) & x<quantile(x,0.99)], col="red", breaks=50, density=10)
+
+EOF
+mv Rplots.pdf $inputfile.$h.pdf
+done
+
+done
+echo "finished !"