-
Notifications
You must be signed in to change notification settings - Fork 0
/
mscred.cl
195 lines (161 loc) · 5 KB
/
mscred.cl
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
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
#{ MSCRED -- Mosaic CCD Reduction Package
# Load dependent packages.
if (deftask ("fitsutil"))
fitsutil
else
;
nproto
astutil
digiphot
apphot
photcal
if (deftask ("astcat"))
astcat
else
;
# This package requires FITS image type and various kernel parameters.
reset imtype = "fits"
if (defvar ("fkinit"))
set fkinit = envget ("fkinit") // ",append,padlines=10,cachesize=60"
else
set fkinit = "append,padlines=10,cachesize=60"
cl < "mscred$lib/zzsetenv.def"
package mscred, bin = mscbin$
# Logical directories.
set xtcoeff = "mscred$lib/xtcoeff/"
set mccdred = "mscsrc$ccdred/"
set combine = "mscsrc$ccdred/src/combine/"
# Tasks.
task mscmedian = mscsrc$mscmedian.cl
task msctmp1 = mscsrc$msctmp1.cl
task mscfindgain = mscsrc$mscfindgain.cl
task mscsplit = mscsrc$mscsplit.cl
task mscjoin = mscsrc$mscjoin.cl
task mscwfits = mscsrc$mscwfits.cl
task mscrfits = mscsrc$mscrfits.cl
task msctoshort = mscsrc$msctoshort.cl
task dispsnap = mscsrc$dispsnap.cl
task ccdproc = mscsrc$ccdproc.cl
task calproc = mscsrc$calproc.cl
task ccdhedit = mscsrc$ccdhedit.cl
task ccdlist = mscsrc$ccdlist.cl
task setinstrument = mscsrc$setinstrument.cl
task _ccdhedit,
_ccdlist,
_ccdtool = mscsrc$x_ccdred.e
task ccddelete,
ccdgroups = mccdred$x_ccdred.e
hidetask ccddelete, ccdgroups
task combine,
coutput,
mergeamps = combine$x_combine.e
hidetask coutput, mergeamps
task darkcombine = mccdred$darkcombine.cl
task flatcombine = mccdred$flatcombine.cl
task sflatcombine = mscsrc$sflatcombine.cl
task zerocombine = mccdred$zerocombine.cl
task mscgetcatalog = mscsrc$mscgetcatalog.cl
task mscagetcat = mscsrc$mscagetcat.cl
task mscsetwcs = mscsrc$mscsetwcs.cl
task msczero = mscsrc$msczero.cl
task mscxreg = mscsrc$mscxreg.cl
task mscimage = mscsrc$mscimage.cl
task mscoimage = mscsrc$mscoimage.cl
task mscstack = mscsrc$mscstack.cl
#task mscdither = mscsrc$mscdither.cl
task msccmd = mscsrc$msccmd.cl
task mscarith = mscsrc$mscarith.cl
task mscstat = mscsrc$mscstat.cl
#task mscimatch = mscsrc$mscimatch.cl
#task ffpupilcor = mscsrc$ffpupilcor.cl
task rmfringe = mscsrc$rmfringe.cl
task rmpupil = mscsrc$rmpupil.cl
task irmfringe = mscsrc$irmfringe.cl
task irmpupil = mscsrc$irmpupil.cl
task mscpupil = mscsrc$mscpupil.cl
task mscblkavg = mscsrc$mscblkavg.cl
task mscpixarea = mscsrc$mscpixarea.cl
#task xtalkcor = mscsrc$xtalkcor.cl
task mscqphot = mscsrc$mscqphot.cl
task msccntr = mscsrc$msccntr.cl
task mscshutcor = mscsrc$mscshutcor.cl
task mscselect = mscsrc$mscselect.cl
task addkey,
fitscopy,
getcatalog,
joinlists,
mkmsc,
msccmatch,
mscctran,
mscextensions,
mscgmask,
mscimatch,
mscpmask,
mscskysub,
msctemplate,
mscwtemplate,
mscwcs,
mscuniq,
patfit,
pixarea,
pupilfit,
toshort,
ximstat,
xlog,
xtalkcor,
xtcoeff = mscsrc$x_mscred.e
# Photometry parameters.
#task msccpars = mscsrc$msccpars.par
#task mscdpars = mscsrc$mscdpars.par
#task mscppars = mscsrc$mscppars.par
#task mscspars = mscsrc$mscspars.par
hidetask ximstat, joinlists, mscoimage, msccntr
hidetask addkey, fitscopy, calproc, getcatalog
hidetask mscgmask, mscpmask, msctemplate, mscwtemplate
hidetask mscxreg, mscuniq, mscextensions
hidetask patfit, pupilfit, toshort, xlog
#hidetask msccpars, mscdpars, mscppars, mscspars
hidetask dispsnap, mscqphot, pixarea, msctmp1
# Special version of utilities.curfit
task msccurfit = "mscsrc$curfit/x_mscred.e"
hidetask msccurfit
# Display stuff.
#task newdisplay = "mscsrc$display/x_display.e"
task msctvmark = "mscsrc$msctvmark.cl"
task mscztvmark = "mscsrc$mscztvmark.cl"
set mscdisplay = "mscsrc$mscdisplay/"
set mosexam = "mscdisplay$src/imexam/"
set starfocus = "mscdisplay$src/starfocus/"
task mscstarfocus = starfocus$x_mscdisplay.e; hidetask mscstarfocus
task mscfocus = starfocus$mscfocus.cl
task mscdisplay,
mscrtdisplay = mscdisplay$x_mscdisplay.e
task mimpars = mscdisplay$mimpars.par
hidetask mscrtdisplay, mscztvmark
task mscexamine = "mosexam$x_mscexam.e"
task cimexam2 = mosexam$cimexam2.par; hidetask cimexam2
task eimexam2 = mosexam$eimexam2.par; hidetask eimexam2
task himexam2 = mosexam$himexam2.par; hidetask himexam2
task jimexam2 = mosexam$jimexam2.par; hidetask jimexam2
task kimexam2 = mosexam$kimexam2.par; hidetask kimexam2
task limexam2 = mosexam$limexam2.par; hidetask limexam2
task rimexam2 = mosexam$rimexam2.par; hidetask rimexam2
task simexam2 = mosexam$simexam2.par; hidetask simexam2
task vimexam2 = mosexam$vimexam2.par; hidetask vimexam2
task mscotfflat = "mscdisplay$mscotfflat.cl"
task flatcompress = "mscdisplay$flatcompress.cl"
hidetask flatcompress
# Stuff for PICREAD data.
#task mkfits = mscsrc$picread/mkfits.cl
#task mosfocus = mscsrc$picread/mosfocus.cl
# Subpackages
set mscfinder = "mscsrc$mscfinder/"
task $mscfinder = mscfinder$mscfinder.cl
set mscpipeline = "mscsrc$mscpipeline/"
task mscpipeline = mscpipeline$mscpipeline.cl
hidetask mscpipeline
set msctest = "mscsrc$msctest/"
task $msctest = msctest$msctest.cl; hidetask msctest
set msctools = "mscsrc$msctools/"
#task $msctools = msctools$msctools.cl
clbye()