| 12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879 | 
							- #!/bin/bash
 
- # StarPU --- Runtime system for heterogeneous multicore architectures.
 
- #
 
- # Copyright (C) 2008-2020  Université de Bordeaux, CNRS (LaBRI UMR 5800), Inria
 
- #
 
- # StarPU 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.
 
- #
 
- # StarPU 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.
 
- #
 
- DIR=$PWD
 
- ROOTDIR=$DIR/../..
 
- TIMINGDIR=$DIR/timings/
 
- mkdir -p $TIMINGDIR
 
- filename=$TIMINGDIR/gflops.data
 
- tilelist="256 512 1024 2048"
 
- sizelist="1024 2048 4096 8192 16384"
 
- trace_header()
 
- {
 
- 	line="# size 	"
 
- 	for tile in $tilelist
 
- 	do
 
- 		line="$line	$tile"
 
- 	done
 
- 	echo "$line" > $filename
 
- }
 
- trace_size()
 
- {
 
- 	size=$1
 
- 	echo "Computing size $size"
 
- 	
 
- 	line="$size"
 
- 	for tile in $tilelist
 
- 	do
 
- 		nblocks=$(($size / $tile))
 
- 		if [ $tile -lt $size -a $nblocks -lt 32 -a $(($size % $tile)) == 0 ];
 
- 		then
 
- 			echo "start tile $tile size $size nblocks $nblocks  "
 
- 			timing=`$STARPU_LAUNCH $ROOTDIR/examples/mult/dw_mult -pin -x $size -y $size -z $size -nblocks $nblocks 2>/dev/null`
 
- 		else
 
- 			timing="x"
 
- 		fi
 
- 		echo "size : $size tile $tile => $timing us"
 
- 		line="$line	$timing"
 
- 	done
 
- 	echo "$line" >> $filename
 
- }
 
- cd $ROOTDIR
 
- make clean 1> /dev/null 2> /dev/null
 
- make examples STARPU_ATLAS=1 CUDA=1 CPUS=3 1> /dev/null 2> /dev/null
 
- cd $DIR
 
- trace_header 
 
- for size in $sizelist
 
- do
 
- 	trace_size $size;
 
- done
 
 
  |