[Bio] / FigKernelScripts / similar_to.pl Repository:
ViewVC logotype

Diff of /FigKernelScripts/similar_to.pl

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

revision 1.2, Thu Aug 5 17:00:40 2004 UTC revision 1.3, Fri Aug 13 19:58:57 2004 UTC
# Line 37  Line 37 
37          foreach $sim ($fig->sims($peg,1000,$cutoff,"fig"))          foreach $sim ($fig->sims($peg,1000,$cutoff,"fig"))
38          {          {
39              push(@hits,[$peg,$sim->psc,$sim->id2]);              push(@hits,[$peg,$sim->psc,$sim->id2]);
40                my $sc = $sim->psc;
41                my $id2 = $sim->id2;
42                print STDERR "$peg\t$sc\t$id2\n";
43          }          }
44      }      }
45  }  }

Legend:
Removed from v.1.2  
changed lines
  Added in v.1.3

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3