#! /bin/csh -f
#
#  test the DA2_copyEntriesToVector() method
#
#  created -- 97jun03, dkw
#
 
set msglvl  =        4
set msgFile =      res
set msgFile =   stdout
set nrow    =        4
set ncol    =        5
set inc1    =    $nrow
set inc2    =        1
set seed    =        1
#
# case 1
#
set nrow = 6
set ncol = 4
set inc1 = $ncol
set inc2 = 1
foreach storeflag ( 0 1 )
   test_copyEntriesToVector \
       $msglvl $msgFile $nrow $ncol $inc1 $inc2 $storeflag $seed
end
#
# case 2
#
set nrow = 6
set ncol = 4
set inc1 = 1
set inc2 = $nrow
foreach storeflag ( 0 1 )
   test_copyEntriesToVector \
       $msglvl $msgFile $nrow $ncol $inc1 $inc2 $storeflag $seed
end
#
# case 3
#
set nrow = 4
set ncol = 6
set inc1 = $ncol
set inc2 = 1
foreach storeflag ( 0 1 )
   test_copyEntriesToVector \
       $msglvl $msgFile $nrow $ncol $inc1 $inc2 $storeflag $seed
end
#
# case 4
#
set nrow = 4
set ncol = 6
set inc1 = 1
set inc2 = $nrow
foreach storeflag ( 0 1 )
   test_copyEntriesToVector \
       $msglvl $msgFile $nrow $ncol $inc1 $inc2 $storeflag $seed
end
