blob: c17b377aaeeb2cf4b13e05d749faafb3320d7dbc (
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
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
|
# Definitions for SPTIME.
# Spectral distribution types.
define SPECTYPES "|blackbody|flambda_power|fnu_power|"
define SPEC_TAB 0
define SPEC_BB 1
define SPEC_FL 2
define SPEC_FN 3
# Flux units.
define FUNITS "|AB|F_lambda|F_nu|U|B|V|R|I|J|H|Ks|K|L|L'|M|"
define AB 1
define FLAMBDA 2
define FNU 3
define UMAG 4
define BMAG 5
define VMAG 6
define RMAG 7
define IMAG 8
define JMAG 9
define HMAG 10
define KSMAG 11
define KMAG 12
define LMAG 13
define LPMAG 14
define MMAG 15
# Sky subtraction options.
define SKYSUB "|none|longslit|multiap|shuffle|"
define SKY_NONE 1
define SKY_LONGSLIT 2
define SKY_MULTIAP 3
define SKY_SHUFFLE 4
# Aperture types.
define APTYPES "|circular|rectangular|"
define CIRCULAR 1
define RECTANGULAR 2
# Output types.
define OUTTYPES "|counts|snr|object|rate|atmosphere|telescope|adc|\
|aperture|fiber|filter|filter2|collimator|disperser|\
|xdisperser|corrector|camera|detector|spectrograph|\
|emissivity|thruput|sensfunc|correction|"
define OUT_COUNTS 1
define OUT_SNR 2
define OUT_OBJ 3
define OUT_RATE 4
define OUT_ATM 5
define OUT_TEL 6
define OUT_ADC 7
define OUT_AP 9
define OUT_FIB 10
define OUT_FILT 11
define OUT_FILT2 12
define OUT_COL 13
define OUT_DISP 14
define OUT_XDISP 16
define OUT_COR 17
define OUT_CAM 18
define OUT_DET 19
define OUT_SPEC 20
define OUT_EMIS 22
define OUT_THRU 23
define OUT_SENS 24
define OUT_CORRECT 25
# Grating types.
define DISPTYPES "|grating|grism|generic"
define GRATING 1
define GRISM 2
define GENERIC 3
# Macros.
define MINEXP 0.01 # Minimum exposure time.
define MAXNEXP 10000 # Maximum number of exposures.
define MAXITER 50
define H 6.626E-27
define C 2.99792456E18
# Data structure.
define ST_SZSTRING 99 # Length of strings
define ST_LEN 154 # Structure length
define ST_TAB Memi[$1] # Tables pointer
define ST_SEARCH Memi[$1+1] # Search list
define ST_SPEC Memi[$1+2] # Spectrum type
define ST_PARAM Memr[P2R($1+3)] # Spectrum parameter
define ST_THERMAL Memr[P2R($1+4)] # Thermal background temperature
define ST_AV Memr[P2R($1+5)] # A(V)
define ST_RV Memr[P2R($1+6)] # A(V)/E(B-V)
define ST_TIME Memr[P2R($1+7)] # Exposure time
define ST_NEXP Memi[$1+8] # Number of exposures
define ST_MINEXP Memr[P2R($1+9)] # Minimum time per integration
define ST_MAXEXP Memr[P2R($1+10)] # Maximum time per integration
define ST_AIRMASS Memr[P2R($1+11)] # Airmass
define ST_SEEING Memr[P2R($1+12)] # Seeing (FWHM in arcsec)
define ST_PHASE Memr[P2R($1+13)] # Moon phase
define ST_REFW Memr[P2R($1+14)] # Reference wavelength
define ST_REFF Memr[P2R($1+15)] # Reference flux
define ST_REFFL Memr[P2R($1+16)] # Reference flambda
define ST_CW Memr[P2R($1+17)] # Central wavelength
define ST_ORDER Memi[$1+17+$2] # Grating orders (2)
define ST_APSIZE Memr[P2R($1+19+$2)] # Aperture sizes (2)
define ST_BIN Memi[$1+21+$2] # Binning (2)
define ST_GAIN Memr[P2R($1+24)] # Detector gain
define ST_RDNOISE Memr[P2R($1+25)] # Detector read noise
define ST_DARK Memr[P2R($1+26)] # Detector dark counts
define ST_INOUTA Memr[P2R($1+26+$2)] # Incident-diffracted angle(deg)
define ST_SKYSUB Memi[$1+29] # Sky subtraction type
define ST_NSKYAPS Memi[$1+30] # Number of sky apertures
define ST_DISPTYPE Memi[$1+30+$2] # Disperser type
define ST_GR Memi[$1+32+$2] # Grating pointer (2)
define ST_DISP Memr[P2R($1+34+$2)] # Dispersion (2)
define ST_SCALE Memr[P2R($1+36+$2)] # Scale at detector (2)
define ST_RES Memr[P2R($1+38+$2)] # Resolution at detector (2)
define ST_AREA Memr[P2R($1+41)] # Effective collecting area
define ST_TELSCALE Memr[P2R($1+42)] # Telescope scale at aperture
define ST_NOBJPIX Memi[$1+43] # Number of object pixels
define ST_NSKYPIX Memi[$1+44] # Number of sky pixels
define ST_APLIM Memi[$1+45] # Aperture limited?
define ST_APTYPE Memi[$1+46] # Aperture type
define ST_PIXSIZE Memr[P2R($1+47)] # Pixel weighted disp. size
define ST_FILTBLK Memi[$1+48] # Block filter flag
define ST_DUNANG Memi[$1+49] # Angstrom units pointer
define ST_DUN Memi[$1+50] # User units pointer
define ST_SUBPIXELS Memi[$1+51] # Number of subpixels
define ST_COLFL Memr[P2R($1+52)] # Collimator focal length
define ST_CAMFL Memr[P2R($1+53)] # Collimator focal length
define ST_DUNITS Memc[P2C($1+54)] # Dispersion units
define ST_FUNITS Memc[P2C($1+104)] # Flux units
|