[Bio] / Sprout / Sprout.pm Repository:
ViewVC logotype

Diff of /Sprout/Sprout.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.62, Sun Jun 18 05:38:12 2006 UTC revision 1.63, Sun Jun 18 07:03:00 2006 UTC
# Line 820  Line 820 
820      # Declare the return variable.      # Declare the return variable.
821      my $retVal = 0;      my $retVal = 0;
822      # Get the genome's contig sequence lengths.      # Get the genome's contig sequence lengths.
823      my @lens = GetFlat(['HasContig', 'IsMadeUpOf'], 'HasContig(from-link) = ?',      my @lens = $self->GetFlat(['HasContig', 'IsMadeUpOf'], 'HasContig(from-link) = ?',
824                         [$genomeID], 'IsMadeUpOf(len)');                         [$genomeID], 'IsMadeUpOf(len)');
825      # Sum the lengths.      # Sum the lengths.
826      map { $retVal += $_ } @lens;      map { $retVal += $_ } @lens;

Legend:
Removed from v.1.62  
changed lines
  Added in v.1.63

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3