File r37/lisp/csl/html/r37_0588.html artifact e4816384d3 part of check-in b7c3de82ef

<A NAME=find_companion>

<TITLE>find_companion</TITLE></A>
<b><a href=r37_idx.html>INDEX</a></b><p><p>



<B>FIND_COMPANION</B> _ _ _  _ _ _  _ _ _  _ _ _ <B>operator</B><P>
<P>
 
<P>
<P>
 <P> <H3> 
syntax: </H3>
<em>find_companion</em>(&lt;matrix&gt;,&lt;x&gt;) 
<P>
<P>
<P>
&lt;matrix&gt; :- a 
<A HREF=r37_0345.html>matrix</A>. 
<P>
<P>
&lt;x&gt; :- the variable. 
<P>
<P>
Given a companion matrix, <em>find_companion</em> finds the polynomial 
from which it was made. 
<P>
<P>
 <P> <H3> 
examples: </H3>
<P><PRE><TT>

C := companion(x^4+17*x^3-9*x^2+11,x); 


       [0  0  0  -11]
       [            ]
       [1  0  0   0 ]
  c := [            ]
       [0  1  0   9 ]
       [            ]
       [0  0  1  -17]



find_companion(C,x); 

   4     3    2
  x +17*x -9*x +11

</TT></PRE><P>Related functions: 

<A HREF=r37_0584.html>companion</A>. 
<P>
<P>