Initial commit

1 files changed, 21 insertions, 0 deletions

diff --git a/pkg/dataio/imtext/imtext.h b/pkg/dataio/imtext/imtext.h
new file mode 100644
index 00000000..76506eda
--- /dev/null
+++ b/pkg/dataio/imtext/imtext.h
@@ -0,0 +1,21 @@
+# Definitions used for conversions between text files and IRAF images.
+# Both tasks rtextimage and wtextimage include this file.
+
+define	LEN_WT		(2+20+20)
+
+define	IRAFTYPE	Memc[P2C($1)]
+define	FORM		Memc[P2C($1+20)]
+
+define	UNSET		0	# Flag for unitialized header values
+define	INT_FORM	1	# Text file pixels written as integers
+define	FP_FORM		2	# Text file pixels written as floating point
+define	CPX_FORM	3	# Text file pixels written as complex
+
+define	COL_VALUE	11	# Starting column for FITS keyword values
+define	LEN_CARD	80
+define	SZ_STRING	20
+define	MAX_LENTEXT 	(2*SZ_LINE)
+define	NFITS_LINES	10	
+define	NCARDS_FITS_BLK	36
+define	LEN_STRING	18
+define	LEN_KEYWORD	8