# Methods
sub CleanDproc {

    my $self = shift;
    unlink $self->{Dproc}.'LLUVToCombine.list';
    unlink $self->{Dproc}.'MergeTotalsInfo.ctf';
    unlink $self->{Dproc}.'XYUVToCombine.list';
    unlink $self->{Dproc}.'TotalProcessed.txt';
    unlink $self->{Dproc}.'TotalTime.txt';
    unlink $self->{Dproc}.'TotalOutput.txt';
    unlink $self->{Dproc}.'Tot_XXXX_00_00_00_0000.tv';
    unlink $self->{Dproc}.'TotxXXXX_00_00_00_0000.tv';

}

1;