Repatch (from linux) of OSX IRAF

1 files changed, 55 insertions, 0 deletions

diff --git a/pkg/images/imutil/src/imtile.h b/pkg/images/imutil/src/imtile.h
new file mode 100644
index 00000000..a2610860
--- /dev/null
+++ b/pkg/images/imutil/src/imtile.h
@@ -0,0 +1,55 @@
+# Header file for the IMTILE task.
+
+# Define the structure
+
+define	LEN_IRSTRUCT	35
+
+define 	IT_NCOLS	Memi[$1]	# x length of single subraster
+define	IT_NROWS	Memi[$1+1]	# y length of a single subrasters
+define	IT_NXOVERLAP	Memi[$1+2]	# x overlap between subrasters
+define	IT_NYOVERLAP	Memi[$1+3]	# y overlap between subrasters
+define	IT_NXSUB	Memi[$1+4]	# number of subrasters in x dimension
+define	IT_NYSUB	Memi[$1+5]	# number of subrasters in y dimension
+define	IT_NXRSUB	Memi[$1+6]	# x index of reference subraster
+define	IT_NYRSUB	Memi[$1+7]	# y index of reference subraster
+define	IT_XREF		Memi[$1+8]	# x offset of reference subraster
+define	IT_YREF		Memi[$1+9]	# y offset of reference subraster
+define	IT_CORNER	Memi[$1+10]	# starting corner for insertion
+define	IT_ORDER	Memi[$1+11]	# row or column insertion
+define	IT_RASTER	Memi[$1+12]	# raster order
+define	IT_OVAL		Memr[P2R($1+13)] # undefined value
+
+define	IT_IC1		Memi[$1+14]	# input image lower column limit
+define	IT_IC2		Memi[$1+15]	# input image upper column limit
+define	IT_IL1		Memi[$1+16]	# input image lower line limit
+define	IT_IL2		Memi[$1+17]	# input image upper line limit
+define	IT_OC1		Memi[$1+18]	# output image lower column limit
+define	IT_OC2		Memi[$1+19]	# output image upper column limit
+define	IT_OL1		Memi[$1+20]	# output image lower line limit
+define	IT_OL2		Memi[$1+21]	# output image upper line limit
+define	IT_DELTAX	Memi[$1+22]	# x shifts
+define	IT_DELTAY	Memi[$1+23]	# y shifts
+define	IT_DELTAI	Memi[$1+24]	# intensity shifts
+
+define	IT_XRSHIFTS	Memi[$1+25]	# x row links
+define	IT_YRSHIFTS	Memi[$1+26]	# y row links
+define	IT_NRSHIFTS	Memi[$1+27]	# number of row links
+define	IT_XCSHIFTS	Memi[$1+28]	# x column links
+define	IT_YCSHIFTS	Memi[$1+29]	# y column links
+define	IT_NCSHIFTS	Memi[$1+30]	# number of column links
+
+# Define some useful constants
+
+define	IT_LL		1
+define	IT_LR		2
+define	IT_UL		3
+define	IT_UR		4
+
+define	IT_ROW		1
+define	IT_COLUMN	2
+
+define	IT_COORDS	1
+define	IT_SHIFTS	2
+define	IT_FILE		3
+
+define	MAX_NRANGES	100