#---------------------------------------------------------------------------
.help spec_obj.h May94 source
.ih
NAME
spec_obj.h -- Definition of a simple spectrum object.
.endhelp
#---------------------------------------------------------------------------

# Memory management, string sizes.
define	SP_SZ_UNITS		SZ_COMMAND
define	SP_SZ_WUNITS		SZ_COMMAND

# Structure of the object.
define	SP_UNITS_PTR		Memi[$1]
define	SP_UNITS		Memc[SP_UNITS_PTR($1)]
define	SP_WUNITS_PTR		Memi[$1+1]
define	SP_WUNITS		Memc[SP_WUNITS_PTR($1)]
define	SP_N			Memi[$1+2]
define	SP_DATA_ARRAY_PTR	Memi[$1+3]
define	SP_DATA_ARRAY		Memi[SP_DATA_ARRAY_PTR($1)+$2-1]
define	SP_MAX_DATA		Memi[$1+4]
define	SP_GROW			Memi[$1+5]
define	SP_EXIST_PTR		Memi[$1+6]
define	SP_EXIST		Memi[SP_EXIST_PTR($1)+$2-1]
define	SP_SIZE			7

# Constanstants for the output table.
define	SP_N_COLUMNS		3
define	SP_ALL			0
define	SP_FLUX			1
define	SP_WAVE			2
define	SP_ERR			3

# Access the values.
define	SP_FLUX_DATA		Memd[SP_DATA_ARRAY($1,SP_FLUX)+$2-1]
define	SP_WAVE_DATA		Memd[SP_DATA_ARRAY($1,SP_WAVE)+$2-1]
define	SP_ERR_DATA		Memd[SP_DATA_ARRAY($1,SP_ERR)+$2-1]
#---------------------------------------------------------------------------
# End of spec_obj.h
#---------------------------------------------------------------------------