Repatch (from linux) of OSX IRAF

1 files changed, 32 insertions, 0 deletions

diff --git a/pkg/utilities/nttools/stxtools/od/od.h b/pkg/utilities/nttools/stxtools/od/od.h
new file mode 100644
index 00000000..2070d551
--- /dev/null
+++ b/pkg/utilities/nttools/stxtools/od/od.h
@@ -0,0 +1,32 @@
+#---------------------------------------------------------------------------
+.help od.h Feb93 source
+.ih
+NAME
+od.h -- Include parameters for the 1D I/O data system.
+.endhelp
+#---------------------------------------------------------------------------
+#-----
+# Below describes the structure and access to the OD descriptor.
+define  OD_FD           Memi[$1]        # The image/table descriptor
+define  OD_TYPE         Memi[$1+1]      # TABLE/IMAGE flag.
+define  OD_CD_PTR       Memi[$1+2]      # Table column descriptor.
+define  OD_CD           Memi[OD_CD_PTR($1)+$2-1]
+define  OD_LEN          Memi[$1+3]      # Dimension of the data.
+define  OD_NGRP         Memi[$1+4]      # Number of groups in image.
+define  OD_GRP          Memi[$1+5]      # Current open group.
+define  OD_NAME_PTR     Memi[$1+6]      # Specified file name.
+define  OD_NAME         Memc[OD_NAME_PTR($1)]
+define  OD_MW           Memi[$1+7]      # MWCS descriptor.
+define  OD_WL           Memi[$1+8]      # World-to-Logical transformation.
+define  OD_LW           Memi[$1+9]      # Logical-to-World transformation.
+define  OD_WSYS_PTR     Memi[$1+10]     # WCS system type.
+define  OD_WSYS         Memc[OD_WSYS_PTR($1)]
+define  OD_OLD          Memi[$1+11]     # Template which opened this OD.
+define  OD_SZ_OD        12              # Size of structure.
+
+# The flag of what type of file we are dealing with.
+define  OD_TABLE         1
+define  OD_IMAGE         2
+#---------------------------------------------------------------------------
+# End of od.h
+#---------------------------------------------------------------------------