Blame thirdparty/superlu/SuperLU_4.1/TESTING/stest.csh
|
kusano |
7d535a |
#!/bin/csh
|
|
kusano |
7d535a |
|
|
kusano |
7d535a |
set ofile = stest.out # output file
|
|
kusano |
7d535a |
if ( -e $ofile ) then
|
|
kusano |
7d535a |
rm -f $ofile
|
|
kusano |
7d535a |
endif
|
|
kusano |
7d535a |
echo "Single-precision testing output" > $ofile
|
|
kusano |
7d535a |
|
|
kusano |
7d535a |
set MATRICES = (LAPACK g10)
|
|
kusano |
7d535a |
set NVAL = (9 19)
|
|
kusano |
7d535a |
set NRHS = (5)
|
|
kusano |
7d535a |
set LWORK = (0 10000000)
|
|
kusano |
7d535a |
|
|
kusano |
7d535a |
#
|
|
kusano |
7d535a |
# Loop through all matrices ...
|
|
kusano |
7d535a |
#
|
|
kusano |
7d535a |
foreach m ($MATRICES)
|
|
kusano |
7d535a |
|
|
kusano |
7d535a |
#--------------------------------------------
|
|
kusano |
7d535a |
# Test matrix types generated in LAPACK-style
|
|
kusano |
7d535a |
#--------------------------------------------
|
|
kusano |
7d535a |
if ($m == 'LAPACK') then
|
|
kusano |
7d535a |
echo '== LAPACK test matrices' >> $ofile
|
|
kusano |
7d535a |
foreach n ($NVAL)
|
|
kusano |
7d535a |
foreach s ($NRHS)
|
|
kusano |
7d535a |
foreach l ($LWORK)
|
|
kusano |
7d535a |
echo '' >> $ofile
|
|
kusano |
7d535a |
echo 'n='$n 'nrhs='$s 'lwork='$l >> $ofile
|
|
kusano |
7d535a |
./stest -t "LA" -l $l -n $n -s $s >> $ofile
|
|
kusano |
7d535a |
end
|
|
kusano |
7d535a |
end
|
|
kusano |
7d535a |
end
|
|
kusano |
7d535a |
#--------------------------------------------
|
|
kusano |
7d535a |
# Test a specified sparse matrix
|
|
kusano |
7d535a |
#--------------------------------------------
|
|
kusano |
7d535a |
else
|
|
kusano |
7d535a |
echo '' >> $ofile
|
|
kusano |
7d535a |
echo '== sparse matrix:' $m >> $ofile
|
|
kusano |
7d535a |
foreach s ($NRHS)
|
|
kusano |
7d535a |
foreach l ($LWORK)
|
|
kusano |
7d535a |
echo '' >> $ofile
|
|
kusano |
7d535a |
echo 'nrhs='$s 'lwork='$l >> $ofile
|
|
kusano |
7d535a |
./stest -t "SP" -s $s -l $l < ../EXAMPLE/$m >> $ofile
|
|
kusano |
7d535a |
end
|
|
kusano |
7d535a |
end
|
|
kusano |
7d535a |
endif
|
|
kusano |
7d535a |
|
|
kusano |
7d535a |
end
|
|
kusano |
7d535a |
|
|
kusano |
7d535a |
|