Bug & Patch for mpoles.m

[John W. Eaton]

On  2-Jan-2008, Ben Abbott wrote:

| There is a bug in mpoles.m which occurs when a pole is associated with  
| two, or more, groups of multiplicity. For example,
| 
| octave:2> p = [.9 1 1.1];
| octave:2> toler = 0.15;
| octave:3> [m, indx] = mpoles (p, toler, 1)
| m =
| 
|     1
|     1
|     1
|     2
| 
| indx =
| 
|     3
|     2
|     2
|     1
| 
| There are only three poles, but the result is indicative of four. This  
| is because "1" qualifies as a multiple of "0.9" and "1.1" and  causes  
| residue.m to fail (terminate with an error).

2008-01-02  Ben Abbott  <bpabbott at mac.com>

	* scripts/polynomial/mpoles.m: Bug fix to avoid cases where
        poles could be assigned to more than one multiplicity group.


I made these changes in cvs head and the 3.0 branch.

jwe