~ubuntu-branches/debian/jessie/eso-midas/jessie

« back to all changes in this revision

Viewing changes to stdred/feros/proc/ferosextract.prg

  • Committer: Package Import Robot
  • Author(s): Ole Streicher
  • Date: 2014-04-22 14:44:58 UTC
  • Revision ID: package-import@ubuntu.com-20140422144458-okiwi1assxkkiz39
Tags: upstream-13.09pl1.2+dfsg
ImportĀ upstreamĀ versionĀ 13.09pl1.2+dfsg

Show diffs side-by-side

added added

removed removed

Lines of Context:
 
1
! @(#)ferosextract.prg  19.1 (ESO-IPG) 02/25/03 14:22:01
 
2
! @(#)ferosextract.prg  1.1 (ESO-IPG) 02/25/99 16:55:20
 
3
! @(#)ferosextract.prg  1.0 (ESO-IPG) 14-11-97
 
4
!+++++++++++++++++++++++++++++++++++++++++++++++++++++++
 
5
!
 
6
!.COPYRIGHT   (C) 1997 European Southern Observatory
 
7
!.IDENT       ferosextract.prg
 
8
!.AUTHOR      Anton Malina, LSW Heidelberg
 
9
!.KEYWORDS    Spectroscopy, Echelle, FEROS
 
10
!.PURPOSE     Extract spectrum
 
11
!.VERSION     1.0    Creation    14-Nov-1997
 
12
!
 
13
!-------------------------------------------------------
 
14
!
 
15
define/param p1 {STRAIGHT_IMG} I "straightened input spectrum: "
 
16
define/param p2 {EXT_IMG} I "Output image: "
 
17
define/param p3 {SPECTR_TYPE}{EXT_MODE}{PROFILE_GET}{IMG_WRITE} C "Spectrograph type, extraction mode, determine profile, write images (F|G,S|O,Y|N,Y|N): "
 
18
define/param p4 {FIT_DEG},{EXT_ITER} ? "fit degree, number of iterations: "
 
19
define/param p5 {CCD_RON},{CCD_GAIN},{CCD_THRES} N "readout noise, gain, threshold: "
 
20
define/param p6 {COEF_COP} T "coefficient output file: "
 
21
 
 
22
write/key in_c/C/1/80 {p1}
 
23
write/key out_a {p2}
 
24
write/key inputc {p3}
 
25
write/key inputi {p4}
 
26
write/key ccd_par/R/1/80 {p5}
 
27
write/key out_c/C/1/80 {p6}
 
28
write/key out_D/C/1/80 {FIT_IMG}
 
29
write/key out_E/C/1/80 {MASK_IMG}
 
30
 
 
31
run STD_EXE:echext.exe