! @(#)irac2.ctx	17.1.1.1 (ES0-DMD) 01/25/02 17:52:27
!===========================================================================
! Copyright (C) 1995 European Southern Observatory (ESO)
!
! This program is free software; you can redistribute it and/or 
! modify it under the terms of the GNU General Public License as 
! published by the Free Software Foundation; either version 2 of 
! the License, or (at your option) any later version.
!
! This program is distributed in the hope that it will be useful,
! but WITHOUT ANY WARRANTY; without even the implied warranty of
! MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
! GNU General Public License for more details.
!
! You should have received a copy of the GNU General Public 
! License along with this program; if not, write to the Free 
! Software Foundation, Inc., 675 Massachusetss Ave, Cambridge, 
! MA 02139, USA.
!
! Corresponding concerning ESO-MIDAS should be addressed as follows:
!	Internet e-mail: midas@eso.org
!	Postal address: European Southern Observatory
!			Data Management Division 
!			Karl-Schwarzschild-Strasse 2
!			D 85748 Garching bei Muenchen 
!			GERMANY
!===========================================================================
!
! +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
!.IDENTIFICATION: irac2.ctx
!.PURPOSE:        contains the setup of the irac2package
!.AUTHOR:         Rein H. Warmels for Gert Finger
!.VERSION:        920701 RHW creation
! +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
!
!  indicate origin
!HELP = stdred
!
DEFINE/LOCAL LERR/I/1/1 'ERROR(2)'		!save current user level
SET/MIDAS USER=EXPERT
!
! Create the IRAC commands
set/context CCDRED
!
ERROR(2) = LERR
! 
! on-line commands
CREATE/COMMAND ACUTS/IRAC2     @s irac_acuts
CREATE/COMMAND DCOMB/IRAC2     @s irac_dcomb
CREATE/COMMAND FOCUS/IRAC2     @s irac_focus
CREATE/COMMAND OBSLIST/IRAC2   @s irac_obslist
CREATE/COMMAND OBSREP/IRAC2    @s irac_obsrep
CREATE/COMMAND LAST/IRAC2      @s irac_last
CREATE/COMMAND QL/IRAC2        @s irac_ql
CREATE/COMMAND RCOMB/IRAC2     @s irac_rcomb
CREATE/COMMAND SEEING/IRAC2    @s irac_seeing
!
! off line commands
CREATE/COMMAND CMASK/IRAC2     @s irac_cmask
CREATE/COMMAND MASK/IRAC2      @s irac_mask
CREATE/COMMAND MKFLAT/IRAC2    @s irac_mkflat
CREATE/COMMAND SSUBTR/IRAC2    @s irac_ssub
CREATE/COMMAND FFIELD/IRAC2    @s irac_ffield
!
WRITE/OUT ***** Context IRAC2 standard reduction package enabled *****
WRITE/OUT
WRITE/OUT "Available offline commands are:"
WRITE/OUT "CMASK/IRAC2         Create bad pixel mask from flat field"
WRITE/OUT "MASK/IRAC2          Replace bad pixels by neighbouring good ones"
WRITE/OUT "MKFLAT/IRAC2        Create a flat field"
WRITE/OUT "SSUBTR/IRAC2        Subtract a sky image from a science image""
WRITE/OUT "FFIELD/IRAC2        Flat field an image"
!
WRITE/OUT "Available online commands are:"
WRITE/OUT "ACUTS/IRAC2         Display an image with cuts setting"
WRITE/OUT "DCOMB/IRAC2         Sky subtract and combine dithered images"
WRITE/OUT "FOCUS/IRAC2         Determine best focus from a focus sequence"
WRITE/OUT "OBSLST/IRAC2        Lists a subsection of the IRAC2B OST" 
WRITE/OUT "OBSREP/IRAC2        Print out a subsection of the IRAC2B OST" 
WRITE/OUT "LAST/IRAC2          Gives brief information on recent exposures"
WRITE/OUT "QL/IRAC2            Subtracts one IRAC2 image from another" 
WRITE/OUT "RCOMB/IRAC2         Combine frames created with DCOMB/IRAC2"
WRITE/OUT "SEEING/IRAC2        Determine the seeing"
write/out " "
WRITE/OUT "*****     Use the ESO-MIDAS Problem Reporting System or     *****"
WRITE/OUT "      contact midas@eso.org in case of questions or problems"