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

Diff of /FigKernelScripts/load_coupling.pl

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

revision 1.3, Wed Jun 1 01:18:50 2005 UTC revision 1.4, Mon Jun 20 20:09:58 2005 UTC
# Line 6  Line 6 
6    
7  # usage: load_coupling  # usage: load_coupling
8    
9  $pchD   = "$FIG_Config::fig/CouplingData/PCHs";  $pchD   = "$FIG_Config::data/CouplingData/PCHs";
10  $scores = "$FIG_Config::fig/CouplingData/scores";  $scores = "$FIG_Config::data/CouplingData/scores";
11    
12  use DBrtns;  use DBrtns;
13    
14  if (! ((-d $pchD) && (-s $scores))) { exit }  if (! ((-d $pchD) && (-s $scores))) { die "Cannot find data at $pchD or $scores"; }
15    
16  my $dbf = $fig->{_dbf};  my $dbf = $fig->{_dbf};
17    

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

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3