aboutsummaryrefslogtreecommitdiff
path: root/noao/onedspec/ecidentify/ecffit/ecffit.com
diff options
context:
space:
mode:
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