blob: 9e3afb77597ede940f1d4b7c702ee5eb755642d6 (
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
|
# SENSFUNC definitions.
define SF_NGRAPHS 4 # Number of graphs per frame
define SF_INCLUDE 1 # Include observation
define SF_EXCLUDE 2 # Exclude observation
define SF_DELETE 3 # Delete observation
# SENSFUNC Standard Star Data Structure.
define SZ_STDIMAGE 63 # Length of standard image name
define SZ_STDTITLE 63 # Length of standard title
define LEN_STD 115 # Length of standard obs. structure
define STD_IMAGE Memc[P2C($1)] # Standard image name
define STD_SKY Memc[P2C($1+32)] # Standard image sky
define STD_TITLE Memc[P2C($1+64)] # Standard title
define STD_FLAG Memi[$1+96] # Flag
define STD_BEAM Memi[$1+97] # Beam number of spectrum
define STD_NPTS Memi[$1+98] # Number of points in spectrum
define STD_EXPTIME Memr[P2R($1+99)] # Exposure time
define STD_AIRMASS Memr[P2R($1+100)] # Airmass of spectrum
define STD_WSTART Memr[P2R($1+101)] # Starting wavelength of spectrum
define STD_WEND Memr[P2R($1+102)] # Ending wavelength of spectrum
define STD_SHIFT Memr[P2R($1+103)] # Added shift
define STD_NWAVES Memi[$1+104] # Number of calibration wavelengths
define STD_WAVES Memi[$1+105] # Pointer to wavelengths
define STD_FLUXES Memi[$1+106] # Pointer to standard flux values
define STD_DWAVES Memi[$1+107] # Pointer to flux bandwidths
define STD_COUNTS Memi[$1+108] # Pointer to counts
define STD_SENS Memi[$1+109] # Pointer to sensitivities
define STD_FIT Memi[$1+110] # Pointer to fitted sensitivities
define STD_WTS Memi[$1+111] # Pointer to weights
define STD_IWTS Memi[$1+112] # Pointer to weights
define STD_X Memi[$1+114] # Pointer to plotted x values
define STD_Y Memi[$1+115] # Pointer to plotted y values
# Graphics structure
define GP_SZTITLE 79 # Size of title string
define LEN_GP 75 # Length of structure
define GP_GIO Memi[$1] # GIO pointer
define GP_TITLE Memc[P2C($1+1)] # General title
define GP_GRAPHS Memc[P2C($1+41)+$2-1] # Graphs
define GP_IMAGES Memi[$1+44+$2-1] # Pointer to image names
define GP_SKYS Memi[$1+48+$2-1] # Pointer to sky names
define GP_MARK Memi[$1+52] # Mark type
define GP_SZMARK Memr[P2R($1+53)] # Mark size
define GP_CMARK Memi[$1+54] # Mark color
define GP_MDEL Memi[$1+55] # Deleted mark
define GP_SZMDEL Memr[P2R($1+56)] # Size of deleted mark
define GP_CDEL Memi[$1+57] # Color of deleted mark
define GP_MADD Memi[$1+58] # Mark type
define GP_CADD Memi[$1+59] # Mark color
define GP_PLCOLOR Memi[$1+60] # Line color
define GP_WSTART Memr[P2R($1+61)] # Starting wavelength for plots
define GP_WEND Memr[P2R($1+62)] # Ending wavelength for plots
define GP_LOG Memi[$1+63] # Log flux plots?
define GP_FMIN Memr[P2R($1+64)] # Minimum flux plot limit
define GP_FMAX Memr[P2R($1+65)] # Maximum flux plot limit
define GP_SHDR Memi[$1+65+$2] # SHDR pointer
define GP_AIRMASS Memr[P2R($1+69+$2)] # Airmass range of plots
|
