File Coverage

blib/lib/Astro/FITS/HdrTrans/GMOS.pm
Criterion Covered Total %
statement 15 15 100.0
branch n/a
condition n/a
subroutine 6 6 100.0
pod 1 1 100.0
total 22 22 100.0


line stmt bran cond sub pod time code
1             package Astro::FITS::HdrTrans::GMOS;
2              
3             =head1 NAME
4              
5             Astro::FITS::HdrTrans::GMOS - Gemini GMOS translations
6              
7             =head1 SYNOPSIS
8              
9             use Astro::FITS::HdrTrans::GMOS;
10              
11             %gen = Astro::FITS::HdrTrans::GMOS->translate_from_FITS( %hdr );
12              
13             =head1 DESCRIPTION
14              
15             This class provides a generic set of translations that are specific to
16             GMOS on the Gemini Observatory.
17              
18             =cut
19              
20 10     10   13178628 use 5.006;
  10         69  
21 10     10   80 use warnings;
  10         53  
  10         934  
22 10     10   78 use strict;
  10         22  
  10         283  
23 10     10   90 use Carp;
  10         21  
  10         1391  
24              
25             # Inherit from GEMINI
26 10     10   75 use base qw/ Astro::FITS::HdrTrans::GEMINI /;
  10         36  
  10         6690  
27              
28             our $VERSION = "1.66";
29              
30             # for a constant mapping, there is no FITS header, just a generic
31             # header that is constant
32             my %CONST_MAP = (
33             OBSERVATION_MODE => 'imaging',
34             );
35              
36             # NULL mappings used to override base class implementations
37             my @NULL_MAP = qw/ /;
38              
39             # unit mapping implies that the value propogates directly
40             # to the output with only a keyword name change
41              
42             my %UNIT_MAP = (
43             );
44              
45              
46             # Create the translation methods
47             __PACKAGE__->_generate_lookup_methods( \%CONST_MAP, \%UNIT_MAP, \@NULL_MAP );
48              
49             =head1 METHODS
50              
51             =over 4
52              
53             =item B<this_instrument>
54              
55             The name of the instrument required to match (case insensitively)
56             against the INSTRUME/INSTRUMENT keyword to allow this class to
57             translate the specified headers. Called by the default
58             C<can_translate> method.
59              
60             $inst = $class->this_instrument();
61              
62             Returns "GMOS".
63              
64             =cut
65              
66             sub this_instrument {
67 20     20 1 108 return qr/^GMOS/;
68             }
69              
70             =back
71              
72             =head1 SEE ALSO
73              
74             C<Astro::FITS::HdrTrans>, C<Astro::FITS::HdrTrans::UKIRT>.
75              
76             =head1 AUTHOR
77              
78             Brad Cavanagh E<lt>b.cavanagh@jach.hawaii.eduE<gt>,
79             Tim Jenness E<lt>t.jenness@jach.hawaii.eduE<gt>.
80              
81             =head1 COPYRIGHT
82              
83             Copyright (C) 2003-2005 Particle Physics and Astronomy Research Council.
84             All Rights Reserved.
85              
86             This program is free software; you can redistribute it and/or modify it under
87             the terms of the GNU General Public License as published by the Free Software
88             Foundation; either Version 2 of the License, or (at your option) any later
89             version.
90              
91             This program is distributed in the hope that it will be useful,but WITHOUT ANY
92             WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A
93             PARTICULAR PURPOSE. See the GNU General Public License for more details.
94              
95             You should have received a copy of the GNU General Public License along with
96             this program; if not, write to the Free Software Foundation, Inc., 59 Temple
97             Place, Suite 330, Boston, MA 02111-1307, USA.
98              
99             =cut
100              
101             1;