# Copyright (c) 2002 Peter Guntert. All rights reserved.
## 7MACROS: dummycal - set dummy calibration parameters
##
## Usage: dummycal
##
## dummycal is a standard macro that sets the system variables for
## calibration to standard dummy values. For all dimensions k of a
## spectrum, w0, delta and ppmmax will be set to 1000.0, 1.0 and
## number of data points (ndata), respectively. This command is 
## useful to avoid having an uncalibrated spectrum in the program
## XEASY. 
##
## See also: delta, ndata, ppmmax, w0

var i
do i 1 ndim
  w0(i) = 1000.0
  delta(i) = 1.0
  ppmmax(i) = ndata(i)
end do