# Copyright (c) 2002 Peter Guntert. All rights reserved.
## 7MACROS: load - load time-domain data and spectra
##
## Usage: load <format> <filename> {<npoints>[c]}
##        load <format> <filename> combine [<factor1>] [<factor2>]
##
## The macro "load" reads a data matrix from the file <filename> using
## the format <format>. "load" differs from the "read" command only in 
## that the expected size of the input data is shown. In case of the
## input formats "real", "integer", and "swap" this corresponds to the
## exact size of the input file.
##
## See also: read

var cmd i k

cmd := read
do i 1 nparam
  cmd := $cmd $p$i
end do
$cmd
k = 4
do i 1 ndim
  k = k*ndata(i)*icmplx(i)
end do
print "    The expected size of the input data is $k bytes."