[Bio] / FigKernelPackages / FullLocation.pm Repository:
ViewVC logotype

Diff of /FigKernelPackages/FullLocation.pm

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

revision 1.22, Tue Apr 29 05:32:10 2008 UTC revision 1.23, Wed May 14 09:07:39 2008 UTC
# Line 44  Line 44 
44      RED_100_250, RED_275_325, RED_330_430      RED_100_250, RED_275_325, RED_330_430
45    
46  the B<Left> and B<Begin> locations are C<RED_100>, while the B<Right> and B<EndPoint>  the B<Left> and B<Begin> locations are C<RED_100>, while the B<Right> and B<EndPoint>
47  locations are C<RED_430>.  locations are C<RED_430>. Similarly, with the location list
 Similarly, with the location list  
48    
49      BLUE_500_450, BLUE_425_300, BLUE_295_200      BLUE_500_450, BLUE_425_300, BLUE_295_200
50    
51  the B<Left> and B<EndPoint> locations are C<BLUE_200>, which the B<Right> and B<Begin>  the B<Left> and B<EndPoint> locations are C<BLUE_200>, while the B<Right> and B<Begin>
52  locations are C<BLUE_500>.  locations are C<BLUE_500>.
53    
54  A location can be converted to a DNA string using the genome ID and data accessible  A location can be converted to a DNA string using the genome ID and data accessible
# Line 471  Line 470 
470      return $retVal;      return $retVal;
471  }  }
472    
473  =head3 Constrain  =head3 ConstrainPoint
474    
475      my $constrainedPoint = $loc->Constrain($point);      my $constrainedPoint = $loc->ConstrainPoint($point);
476    
477  Change a point location value so that it fits inside the base contig. If the point  Change a point location value so that it fits inside the base contig. If the point
478  location is less than 1, it will be set to 1. If it's greater than the length of  location is less than 1, it will be set to 1. If it's greater than the length of
# Line 493  Line 492 
492    
493  =cut  =cut
494  #: Return Type $;  #: Return Type $;
495  sub Constrain {  sub ConstrainPoint {
496      # Get the parameters.      # Get the parameters.
497      my ($self, $point) = @_;      my ($self, $point) = @_;
498      # Declare the return variable.      # Declare the return variable.

Legend:
Removed from v.1.22  
changed lines
  Added in v.1.23

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3