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
|
#{ IRS -- KPNO IRS Spectral Reduction Package
# Load necessary packages
lists # List package for table
# Define necessary paths
set irscal = "onedstds$irscal/"
set irsiids = "onedspec$irsiids/"
package irs
# Standard ONEDSPEC tasks
task autoidentify,
continuum,
deredden,
dopcor,
mkspec,
names,
sarith,
sflip,
sinterp,
splot,
specplot,
specshift = onedspec$x_onedspec.e
task scombine = "onedspec$scombine/x_scombine.e"
task aidpars = "onedspec$aidpars.par"
task dispcor1 = onedspec$dispcor1.par
task scopy = onedspec$scopy.cl
hidetask dispcor1
# Special IRS/IIDS tasks
task addsets,
bswitch,
coefs,
flatdiv,
slist1d,
subsets,
sums = irsiids$x_onedspec.e
task batchred = irsiids$batchred.cl
task bplot = irsiids$bplot.cl
task extinct = irsiids$extinct.cl
# Different default parameters
task calibrate,
dispcor,
flatfit,
identify,
lcalib,
reidentify,
refspectra,
sensfunc,
standard = irs$x_onedspec.e
# Astutil tasks
task setairmass,
setjd = "astutil$x_astutil.e"
# Define a task living in the users directory - it is created by BATCHRED
task $process = process.cl
clbye()
|