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

Diff of /FigKernelScripts/rebuild_global_chromosomal_clusters.pl

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

revision 1.1, Fri Aug 10 16:48:55 2007 UTC revision 1.2, Fri Aug 10 18:12:56 2007 UTC
# Line 1  Line 1 
1    ########################################################################
2  # -*- perl -*-  # -*- perl -*-
3  #  #
4  # Copyright (c) 2003-2006 University of Chicago and Fellowship  # Copyright (c) 2003-2006 University of Chicago and Fellowship
# Line 21  Line 22 
22  use FIG;  use FIG;
23  my $fig = new FIG;  my $fig = new FIG;
24    
25    &FIG::run("load_sets chromosomal_clusters cluster_id /dev/null");
26    
27  my($cluster);  my($cluster);
28  foreach $cluster (`cut -f1,2 < $FIG_Config::data/CouplingData/scores | cluster_objects`)  foreach $cluster (`cut -f1,2 < $FIG_Config::data/CouplingData/scores | cluster_objects`)
29  {  {

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

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3