From 40e5a5811c6ffce9b0974e93cdd927cbcf60c157 Mon Sep 17 00:00:00 2001 From: Joe Hunkeler Date: Tue, 11 Aug 2015 16:51:37 -0400 Subject: Repatch (from linux) of OSX IRAF --- lib/pkg/rmsorted.h | 15 +++++++++++++++ 1 file changed, 15 insertions(+) create mode 100644 lib/pkg/rmsorted.h (limited to 'lib/pkg/rmsorted.h') diff --git a/lib/pkg/rmsorted.h b/lib/pkg/rmsorted.h new file mode 100644 index 00000000..f0b2bcc2 --- /dev/null +++ b/lib/pkg/rmsorted.h @@ -0,0 +1,15 @@ +define RMS_OFFSET 5 # Offset to data +define RMS_LEN (RMS_OFFSET+2*$1+2) # Structure length +define RMS_BOX Memi[$1] # Running box size +define RMS_TYPE Memi[$1+1] # Output type +define RMS_DATA Memi[$1+2] # Sorted data (ptr) +define RMS_IN Memi[$1+3] # Mapping to input (ptr) +define RMS_OUT Memi[$1+4] # Mapping to output (ptr) + +define DATA Memr[RMS_DATA($1)+$2] +define IN Mems[RMS_IN($1)+$2] +define OUT Mems[RMS_OUT($1)+$2] + +define RMS_TYMED 1 # Median +define RMS_TYMAX 2 # Maximum +define RMS_TYMIN 3 # Minimum -- cgit