|
|
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 l
Length: 1255 (0x4e7)
Types: TextFile
Names: »linpack.run«
└─⟦db229ac7e⟧ Bits:30007240 EUUGD20: SSBA 1.2 / AFW Benchmarks
└─⟦this⟧ »EUUGD20/AFUU-ssba1.21/ssba1.21F/linpack/linpack.run«
#! /bin/sh
# SSBA 1.21F
#
# Script : linpack.run
#
b=linpack
log=$b.log
res=$b.res
echo "kill -9 $$" >$b.kill
chmod u+x $b.kill
cat $b.kill >> ../ssba/ssba.kill
d=`date`
echo "LINPACK: BEGIN execution at $d" >$log
cat $b.doc >$res
f=linpackrs
if [ -f $f ] ; then
./$f >$f.int
grep Kflops $f.int | awk ' { print $6, "Kflops" } ' >$f.tmp
echo "$f(simple precision,avec optimisation,rolled):`cat $f.tmp`" >>$res
cat $f.tmp >>$f.log
rm $f.tmp $f.int $f.log 2>/dev/null
fi
f=linpackus
if [ -f $f ] ; then
./$f >$f.int
grep Kflops $f.int | awk ' { print $6, "Kflops" } ' >$f.tmp
echo "$f(simple precision,avec optimisation,unroll):`cat $f.tmp`" >>$res
cat $f.tmp >>$f.log
rm $f.tmp $f.int $f.log 2>/dev/null
fi
f=linpackrd
if [ -f $f ] ; then
./$f >$f.int
grep Kflops $f.int | awk ' { print $6, "Kflops" } ' >$f.tmp
echo "$f(double precision,avec optimisation,rolled):`cat $f.tmp`" >>$res
cat $f.tmp >>$f.log
rm $f.tmp $f.int $f.log 2>/dev/null
fi
f=linpackud
if [ -f $f ] ; then
./$f >$f.int
grep Kflops $f.int | awk ' { print $6, "Kflops" } ' >$f.tmp
echo "$f(double precision,avec optimisation,unroll):`cat $f.tmp`" >>$res
cat $f.tmp >>$f.log
rm $f.tmp $f.int $f.log 2>/dev/null
fi
d=`date`
echo "LINPACK: END execution at $d" >>$log