#ifndef _S_NEWNA_H_
#define _S_NEWNA_H_

#include <sccs.h>
SCCS_ID_C(0040,@(#)newNA.h 3.9 last edit 3/5/93 StatSci)

#define Is_NA 	1
#define Is_NaN	2
#define Is_NaNi 8
#define To_NA	Is_NA
#define To_NaN	Is_NaN
#define	To_NaNi	Is_NaNi

#define IS_SPEC_OPTIONS

#ifdef IS_SPEC_OPTIONS
#define Is_Inf	4
#define Is_Infi 16
#define Is_NInf (Is_Inf|NEG)
#define Is_NInfi (Is_Infi|NEGi)
#define Is_T	32  /*"T","TRUE" are special strings */
#define	Is_F	64  /*"F","FALSE" are special strings*/
#define NEG	256
#define NEGi	128
#define	To_Inf	Is_Inf
#define	To_Infi	Is_Infi
#define	To_NInf	(To_Inf|NEG)
#define	To_NInfi (To_Infi|NEGi)
#endif

#endif