|
DataMuseum.dkPresents historical artifacts from the history of: DKUUG/EUUG Conference tapes |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about DKUUG/EUUG Conference tapes Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - downloadIndex: T w
Length: 923 (0x39b)
Types: TextFile
Names: »whet.run«
└─⟦db229ac7e⟧ Bits:30007240 EUUGD20: SSBA 1.2 / AFW Benchmarks
└─⟦this⟧ »EUUGD20/AFUU-ssba1.21/ssba1.21F/whet/whet.run«
#! /bin/sh
# SSBA 1.21F
#
# Script : whet.run
#
b=whet
log=$b.log
res=$b.res
TIME=../config/chrono
echo "kill -9 $$" >$b.kill
chmod u+x $b.kill
cat $b.kill >> ../ssba/ssba.kill
iter=`cat whet.dat`
mega=`expr $iter / 10`
d=`date`
echo "WHETSTONE: BEGIN execution at $d" >$log
cat $b.doc >$res
#
# whets
#
f=${b}s
if [ -f $f ] ; then
echo "iter $iter" >>$log
$TIME ./$f <$b.dat 1>$f.int 2>>$log
grep KIPS $f.int | awk ' { print $4, "KWhetstones/sec" }' >$f.tmp
echo "$f(simple precision,avec optimisation,${mega}M inst):\
`cat $f.tmp`" >>$res
rm $f.tmp $f.int 2>/dev/null
fi
#
# whetd
#
f=${b}d
if [ -f $f ] ; then
echo "iter $iter" >>$log
$TIME ./$f <$b.dat 1>$f.int 2>>$log
grep KIPS $f.int | awk ' { print $4, "KWhetstones/sec" }' >$f.tmp
echo "$f(double precision,avec optimisation,${mega}M inst):\
`cat $f.tmp`" >>$res
rm $f.tmp $f.int 2>/dev/null
fi
d=`date`
echo "WHETSTONE: END execution at $d" >>$log