DataMuseum.dk

Presents historical artifacts from the history of:

DKUUG/EUUG Conference tapes

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about DKUUG/EUUG Conference tapes

Excavated with: AutoArchaeologist - Free & Open Source Software. 

top - metrics - download
Index: T s

⟦47c26ae2d⟧ TextFile

    Length: 1120 (0x460)
    Types: TextFile
    Names: »stan.test«

Derivation

└─⟦db229ac7e⟧ Bits:30007240 EUUGD20: SSBA 1.2 / AFW Benchmarks
    └─⟦this⟧ »EUUGD20/AFUU-ssba1.21/ssba1.21F/ssba/stan.test«

TextFile

#! /bin/sh
#			SSBA 1.21F
#
F77=`grep Fortran ssba.def | awk -F: '{print $2}' `
$F77 -j ../whet/whetd.f 1>/dev/null 2>&1
if [ -f whetd.u ] ; then
if [ `grep -c STANFORD ../whet/whet.mk` != 0 ] ; then
echo Stanford
else
echo Stanford
mv ../whet/whet.mk ../whet/whet.tmp
mv ../whet/whet.stan ../whet/whet.mk
mv ../whet/whet.tmp ../whet/whet.stan
mv ../linpack/linpack.mk ../linpack/linpack.tmp
mv ../linpack/linpack.stan ../linpack/linpack.mk
mv ../linpack/linpack.tmp ../linpack/linpack.stan
mv ../doduc/doduc.mk ../doduc/doduc.tmp
mv ../doduc/doduc.stan ../doduc/doduc.mk
mv ../doduc/doduc.tmp ../doduc/doduc.stan
fi
else
if [ `grep -c STANFORD ../whet/whet.mk` != 0 ] ; then
echo Normal
mv ../whet/whet.mk ../whet/whet.tmp
mv ../whet/whet.stan ../whet/whet.mk
mv ../whet/whet.tmp ../whet/whet.stan
mv ../linpack/linpack.mk ../linpack/linpack.tmp
mv ../linpack/linpack.stan ../linpack/linpack.mk
mv ../linpack/linpack.tmp ../linpack/linpack.stan
mv ../doduc/doduc.mk ../doduc/doduc.tmp
mv ../doduc/doduc.stan ../doduc/doduc.mk
mv ../doduc/doduc.tmp ../doduc/doduc.stan
else
echo Normal
fi
fi
rm -f whetd.o whetd.u whetd