Документ взят из кэша поисковой машины. Адрес оригинального документа : http://star.arm.ac.uk/~csj/idl/MSST/read_twin_red.pro Дата изменения: Wed Jul 14 18:02:36 2004 Дата индексирования: Sun Apr 10 05:51:35 2016 Кодировка: Поисковые слова: spirit rover

PRO read_twin_red, w, t, s

; define the wavelength scale
define_logw, 5786.76, 6885, 1981, w

; Initialise the data accumulation arrays
IF keyword_set(t) THEN t(0) = -1

read_frame, 'twin', '220502', 'PG1605_R0001', w, t, s
read_frame, 'twin', '220502', 'PG1605_R0002', w, t, s
read_frame, 'twin', '220502', 'PG1605_R0003', w, t, s
read_frame, 'twin', '220502', 'PG1605_R0004', w, t, s
read_frame, 'twin', '220502', 'PG1605_R0005', w, t, s
read_frame, 'twin', '220502', 'PG1605_R0006', w, t, s
read_frame, 'twin', '220502', 'PG1605_R0007', w, t, s
read_frame, 'twin', '220502', 'PG1605_R0008', w, t, s
read_frame, 'twin', '220502', 'PG1605_R0009', w, t, s
read_frame, 'twin', '220502', 'PG1605_R0010', w, t, s
read_frame, 'twin', '220502', 'PG1605_R0012', w, t, s
read_frame, 'twin', '220502', 'PG1605_R0013', w, t, s
read_frame, 'twin', '220502', 'PG1605_R0014', w, t, s
read_frame, 'twin', '220502', 'PG1605_R0016', w, t, s
read_frame, 'twin', '220502', 'PG1605_R0017', w, t, s
read_frame, 'twin', '220502', 'PG1605_R0018', w, t, s

read_frame, 'twin', '230502', 'PG1605_R0022', w, t, s
read_frame, 'twin', '230502', 'PG1605_R0023', w, t, s
read_frame, 'twin', '230502', 'PG1605_R0024', w, t, s
read_frame, 'twin', '230502', 'PG1605_R0026', w, t, s
read_frame, 'twin', '230502', 'PG1605_R0027', w, t, s
;; read_frame, 'twin', '230502', 'PG1605_R0028', w, t, s ;; slow drift
read_frame, 'twin', '230502', 'PG1605_R0030', w, t, s
read_frame, 'twin', '230502', 'PG1605_R0031', w, t, s
read_frame, 'twin', '230502', 'PG1605_R0032', w, t, s
read_frame, 'twin', '230502', 'PG1605_R0036', w, t, s
read_frame, 'twin', '230502', 'PG1605_R0037', w, t, s
read_frame, 'twin', '230502', 'PG1605_R0038', w, t, s
read_frame, 'twin', '230502', 'PG1605_R0041', w, t, s
read_frame, 'twin', '230502', 'PG1605_R0042', w, t, s
read_frame, 'twin', '230502', 'PG1605_R0043', w, t, s
read_frame, 'twin', '230502', 'PG1605_R0045', w, t, s
read_frame, 'twin', '230502', 'PG1605_R0046', w, t, s
read_frame, 'twin', '230502', 'PG1605_R0047', w, t, s

END