$TEMPDIR/randist.pspp >$TEMPDIR/randist.err 2> $TEMPDIR/randist.out
if [ $? -ne 0 ] ; then fail ; fi
for d in beta cauchy chisq exp f gamma laplace logistic lnormal \
normal pareto t uniform weibull; do
activity="compare output for $d distribution"
$TEMPDIR/randist.pspp >$TEMPDIR/randist.err 2> $TEMPDIR/randist.out
if [ $? -ne 0 ] ; then fail ; fi
for d in beta cauchy chisq exp f gamma laplace logistic lnormal \
normal pareto t uniform weibull; do
activity="compare output for $d distribution"