blob: 63e4c6bd1c00b348af292152c69df34152409367 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
|
# Task parameters
define LEN_EC 52 # Length ID structure
define EC_IMAGE Memi[$1] # Image name (pointer)
define EC_MAXFEATURES Memi[$1+1] # Maximum number of features
define EC_FTYPE Memi[$1+2] # Feature type
define EC_MINSEP Memr[P2R($1+3)] # Minimum pixel separation
define EC_MATCH Memr[P2R($1+4)] # Maximum matching separation
define EC_FWIDTH Memr[P2R($1+5)] # Feature width in pixels
define EC_CRADIUS Memr[P2R($1+6)] # Centering radius in pixels
define EC_THRESHOLD Memr[P2R($1+7)] # Centering threshold
define EC_ZWIDTH Memr[P2R($1+8)] # Zoom window width in fit units
define EC_DATABASE Memi[$1+9] # Name of database (pointer)
define EC_COORDLIST Memi[$1+10] # Name of coordinate list (pointer)
define EC_LABELS Memi[$1+11] # Type of feature labels
define EC_LOGFILES Memi[$1+12] # List of logfiles
# Common image data
define EC_NCOLS Memi[$1+13] # Number of columns
define EC_NLINES Memi[$1+14] # Number of lines/apertures/orders
define EC_SHS Memi[$1+15] # Pointer to SHDR pointers
define EC_PIXDATA Memi[$1+16] # Pixel coordinates (pointer)
define EC_FITDATA Memi[$1+17] # Fit coordinates (pointer)
define EC_IMLINE Memi[$1+18] # Image data (pointer)
define EC_PIXLINE Memi[$1+19] # Pixel coordinates (pointer)
define EC_FITLINE Memi[$1+20] # Fit coordinates (pointer)
define EC_NPTS Memi[$1+21] # Number of points
define EC_SHIFT Memd[P2D($1+22)]# Wavelength shift
# Features
define EC_NFEATURES Memi[$1+24] # Number of features
define EC_NALLOC Memi[$1+25] # Length of allocated feature arrays
define EC_APNUM Memi[$1+26] # Aperture number (pointer)
define EC_LINENUM Memi[$1+27] # Image line number (pointer)
define EC_ORD Memi[$1+28] # Feature order number (pointer)
define EC_PIX Memi[$1+29] # Feature pixel coordinates (pointer)
define EC_FIT Memi[$1+30] # Feature fit coordinates (pointer)
define EC_USER Memi[$1+31] # Feature user coordinates (pointer)
define EC_FWIDTHS Memi[$1+32] # Feature width (pointer)
define EC_FTYPES Memi[$1+33] # Feature type (pointer)
# Current status
define EC_CURRENT Memi[$1+34] # Current feature
define EC_SH Memi[$1+35] # Current SHDR pointer
define EC_AP Memi[$1+36] # Current aperture
define EC_LINE Memi[$1+37] # Current line
define EC_ORDER Memi[$1+38] # Current order
# Pointers for other packages
define EC_LP Memi[$1+39] # Logical to physical transformation
define EC_PL Memi[$1+40] # Physical to logical transformation
define EC_LL Memi[$1+41] # Linelist pointer
define EC_ECF Memi[$1+42] # Curfit pointer
define EC_GP Memi[$1+43] # GIO pointer
define EC_GT Memi[$1+44] # Gtools pointer
define EC_UN Memi[$1+45] # Units pointer
# Flags
define EC_NEWFEATURES Memi[$1+46] # Has feature list changed?
define EC_NEWECF Memi[$1+47] # Has fitting function changed?
define EC_NEWGRAPH Memi[$1+48] # Has graph changed?
define EC_NEWDBENTRY Memi[$1+49] # Has database entry changed?
define EC_REFIT Memi[$1+50] # Refit feature data?
define EC_GTYPE Memi[$1+51] # Graph type
# End of structure ----------------------------------------------------------
define LABELS "|none|index|pixel|user|"
define FTYPES "|emission|absorption|"
define IMDATA Memr[EC_IMLINE($1)+$2-1]
define PIXDATA Memd[EC_PIXLINE($1)+$2-1]
define FITDATA Memd[EC_FITLINE($1)+$2-1]
define SH Memi[EC_SHS($1)+$2-1]
define APS AP(SH($1,$2))
define ORDERS BEAM(SH($1,$2))
define APN Memi[EC_APNUM($1)+$2-1]
define LINE Memi[EC_LINENUM($1)+$2-1]
define ORDER Memi[EC_ORD($1)+$2-1]
define PIX Memd[EC_PIX($1)+$2-1]
define FIT Memd[EC_FIT($1)+$2-1]
define USER Memd[EC_USER($1)+$2-1]
define FWIDTH Memr[EC_FWIDTHS($1)+$2-1]
define FTYPE Memi[EC_FTYPES($1)+$2-1]
|
