From fa080de7afc95aa1c19a6e6fc0e0708ced2eadc4 Mon Sep 17 00:00:00 2001
From: Joseph Hunkeler <jhunkeler@gmail.com>
Date: Wed, 8 Jul 2015 20:46:52 -0400
Subject: Initial commit

---
 noao/onedspec/irsiids/extinct.cl | 22 ++++++++++++++++++++++
 1 file changed, 22 insertions(+)
 create mode 100644 noao/onedspec/irsiids/extinct.cl

(limited to 'noao/onedspec/irsiids/extinct.cl')

diff --git a/noao/onedspec/irsiids/extinct.cl b/noao/onedspec/irsiids/extinct.cl
new file mode 100644
index 00000000..68c5a2de
--- /dev/null
+++ b/noao/onedspec/irsiids/extinct.cl
@@ -0,0 +1,22 @@
+#{ EXTINCT -- Use the BSWITCH task to perform the correction for
+#            atmospheric extinction.
+
+{
+# Root name
+rt = root
+
+# Records
+rec = records
+
+# Output root
+out = output
+
+# Output starting record
+strt = start_rec
+
+# Do operation
+# Inhibit weighting and statisitic file generation
+
+bswitch  (input=rt, records=rec, output=out, start_rec=strt, subset=nr_aps,
+         weighting=no, ids_mode=no, stats="")
+}
-- 
cgit