aboutsummaryrefslogtreecommitdiff
path: root/noao/onedspec/ecidentify/ecffit/ecffit.com
diff options
context:
space:
mode:
authorJoseph Hunkeler <jhunkeler@gmail.com>2015-07-08 20:46:52 -0400
committerJoseph Hunkeler <jhunkeler@gmail.com>2015-07-08 20:46:52 -0400
commitfa080de7afc95aa1c19a6e6fc0e0708ced2eadc4 (patch)
treebdda434976bc09c864f2e4fa6f16ba1952b1e555 /noao/onedspec/ecidentify/ecffit/ecffit.com
downloadiraf-linux-fa080de7afc95aa1c19a6e6fc0e0708ced2eadc4.tar.gz
Initial commit
Diffstat (limited to 'noao/onedspec/ecidentify/ecffit/ecffit.com')
-rw-r--r--noao/onedspec/ecidentify/ecffit/ecffit.com23
1 files changed, 23 insertions, 0 deletions
diff --git a/noao/onedspec/ecidentify/ecffit/ecffit.com b/noao/onedspec/ecidentify/ecffit/ecffit.com
new file mode 100644
index 00000000..61f3104a
--- /dev/null
+++ b/noao/onedspec/ecidentify/ecffit/ecffit.com
@@ -0,0 +1,23 @@
+# Common parameters.
+
+char function[SZ_FNAME] # Fitting function
+char ecfstr[SZ_LINE] # Working char string
+int gstype # Surface function type
+int xorder # X order of surface function
+int yorder # Y order of surface function
+int niterate # Number of rejection iterations
+int nreject # Number of rejected points
+int xtype # X axis type
+int ytype # Y axis type
+int slope # Slope of order
+int offset # Order offset of fit
+double low, high # Low and high rejection thresholds
+double xmin, xmax # X range
+double ymin, ymax # Y range
+double shift # First order shift
+double rms # RMS of fit
+
+
+common /ecfcom/ low, high, xmin, xmax, ymin, ymax, shift, rms, gstype,
+ xorder, yorder, niterate, nreject, xtype, ytype, slope, offset,
+ function, ecfstr