1 #!/usr/bin/python

     2 from transp import transp

     3 from left_prm import left_prm

     4 

     5 def l2r(N, degN, D, degD):

     6     # given Num and Den polynomial matrices in left form,

     7     # not necessarily coprime, finds right coprime factorisation.

     8     N, degN = transp(N, degN)

     9     D, degD = transp(D, degD)

    10     Rnum, Rnumdeg, Rden, Rdendeg = left_prm(N, degN, D, degD)

    11     Rnum, Rnumdeg = transp(Rnum, Rnumdeg)

    12     Rden, Rdendeg = transp(Rden, Rdendeg)

    13 

    14     Rnum = Rnum.squeeze()

    15     Rden = Rden.squeeze()

    16     return Rnum, Rnumdeg, Rden, Rdendeg

    17 

    18 

    19