package Subs::Spacecraft2FITS; ############################################################################## # # DESCRIPTION: This subroutine converts Spacecraft HK telemetry to FITS # # HISTORY: # HISTORY: $Log: Spacecraft2FITS.pm,v $ # HISTORY: Revision 1.7 2004/05/06 20:02:34 dah # HISTORY: Add version number back into the header comments. # HISTORY: # HISTORY: Revision 1.6 2004/04/28 13:47:35 dah # HISTORY: Make one method for extracting hk, and put it in Swift2FTIS superclass. # HISTORY: # HISTORY: Revision 1.5 2004/04/16 20:21:18 dah # HISTORY: Begin using embedded history records # HISTORY: # # VERSION: 0.0 # # ############################################################################## use Subs::Swift2FITS; use Util::Tool; @ISA = ("Subs::Swift2FITS"); use strict; sub new { my $proto=shift; my $self=$proto->SUPER::new(); $self->{DESCRIPTION}="Decoding Spacecraft Telemetry"; return $self; } ################## # METHODS: ################## sub body { my $self=shift; my $log =$self->log(); my $filename=$self->filename(); my $procpar =$self->procpar(); my $jobpar =$self->jobpar(); $self->hk_extract('swift'); $self->hk_combine('swift'); } # end of body method