## This program will print to screen a list for combining 
## lines of pixels using the IRAF task imcombine.  The output 
## should be redirected to a file for usage as a list file in IRAF.
##
## usage:
##    mkspeclist imagename linestart lineend
##    imagename -- filename of the image whose lines you wish 
##                 to combine
##    linestart -- line number of the first (lowest numbered)
##                 line to be combined
##    lineend   -- line number of the last (highest numbered)
##                 line to be combined
##
set file = $1
set a = $2
set b = $3
set ind = $a
while ( $ind <= $b )
  echo $file\[\*,$ind\]
  set ind = `expr $ind + 1`
end