https://github.com/cran/rstpm2
Raw File
Tip revision: d415ac4eba2a0f4dd170f58ced8f09afe73047ea authored by Mark Clements on 28 February 2023, 15:02:29 UTC
version 1.6.1
Tip revision: d415ac4
laplace.f90
! Laplace for Power Variance Function distribution with E(Z)=1 => nu=rho*m
subroutine laplace_pvf_E1(len,deriv,c_vector,rho,m,L)
  integer,intent(in) :: len
  double precision,intent(in) :: deriv(len), c_vector(len), rho, m
  double precision,intent(inout) :: L(len)
  integer :: i
  double precision :: c, L0, L1, L2, L3, L4, L5, L6, L7, L8, L9, L10,&
       &L11, L12, L13, L14, L15, L16, L17, L18, L19, L20,&
       &L21, L22, L23, L24, L25, L26, L27, L28, L29, L30,&
       &L31, L32, L33, L34, L35, L36, L37, L38, L39, L40
  ! &L41, L42, L43, L44, L45, L46, L47, L48, L49, L50 
  do i=1, len
     c = c_vector(i)
     L0 = exp(-rho*(1-((m*rho)/(m*rho+c))**m))
     if (deriv(i) .eq. 0) then
        L(i) = L0
        cycle
     end if
     ! (while (re-search-forward "L[(]\\([0-9]*\\)[)]" nil t) (replace-match (concat "L" (match-string 1))))
     L1 = -L0*(m*rho)**(m+1)*(m*rho+c)**((-m)-1)
     if (deriv(i) .eq. 1) then
        L(i) = L1
        cycle
     end if
     L2 = (-L1*(m*rho)**(m+1)*(m*rho+c)**((-m)-1))-L0*((-m)-1)*(m*rh&
          &o)**(m+1)*(m*rho+c)**((-m)-2)
     if (deriv(i) .eq. 2) then
        L(i) = L2
        cycle
     end if
     L3 = (-L2*(m*rho)**(m+1)*(m*rho+c)**((-m)-1))-2*L1*((-m)-1)*(m*&
          &rho)**(m+1)*(m*rho+c)**((-m)-2)-L0*((-m)-2)*((-m)-1)*(m*rho)**(m+&
          &1)*(m*rho+c)**((-m)-3)
     if (deriv(i) .eq. 3) then
        L(i) = L3
        cycle
     end if
     L4 = (-L3*(m*rho)**(m+1)*(m*rho+c)**((-m)-1))-3*L2*((-m)-1)*(m*&
          &rho)**(m+1)*(m*rho+c)**((-m)-2)-3*L1*((-m)-2)*((-m)-1)*(m*rho)**(&
          &m+1)*(m*rho+c)**((-m)-3)-L0*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(&
          &m+1)*(m*rho+c)**((-m)-4)
     if (deriv(i) .eq. 4) then
        L(i) = L4
        cycle
     end if
     L5 = (-L4*(m*rho)**(m+1)*(m*rho+c)**((-m)-1))-4*L3*((-m)-1)*(m*&
          &rho)**(m+1)*(m*rho+c)**((-m)-2)-6*L2*((-m)-2)*((-m)-1)*(m*rho)**(&
          &m+1)*(m*rho+c)**((-m)-3)-4*L1*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)*&
          &*(m+1)*(m*rho+c)**((-m)-4)-L0*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)&
          &*(m*rho)**(m+1)*(m*rho+c)**((-m)-5)
     if (deriv(i) .eq. 5) then
        L(i) = L5
        cycle
     end if
     L6 = (-L5*(m*rho)**(m+1)*(m*rho+c)**((-m)-1))-5*L4*((-m)-1)*(m*&
          &rho)**(m+1)*(m*rho+c)**((-m)-2)-10*L3*((-m)-2)*((-m)-1)*(m*rho)**&
          &(m+1)*(m*rho+c)**((-m)-3)-10*L2*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho&
          &)**(m+1)*(m*rho+c)**((-m)-4)-5*L1*((-m)-4)*((-m)-3)*((-m)-2)*((-m&
          &)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-5)-L0*((-m)-5)*((-m)-4)*((-m&
          &)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-6)
     if (deriv(i) .eq. 6) then
        L(i) = L6
        cycle
     end if
     L7 = (-L6*(m*rho)**(m+1)*(m*rho+c)**((-m)-1))-6*L5*((-m)-1)*(m*&
          &rho)**(m+1)*(m*rho+c)**((-m)-2)-15*L4*((-m)-2)*((-m)-1)*(m*rho)**&
          &(m+1)*(m*rho+c)**((-m)-3)-20*L3*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho&
          &)**(m+1)*(m*rho+c)**((-m)-4)-15*L2*((-m)-4)*((-m)-3)*((-m)-2)*((-&
          &m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-5)-6*L1*((-m)-5)*((-m)-4)*(&
          &(-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-6)-L0*(&
          &(-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+&
          &1)*(m*rho+c)**((-m)-7)
     if (deriv(i) .eq. 7) then
        L(i) = L7
        cycle
     end if
     L8 = (-L7*(m*rho)**(m+1)*(m*rho+c)**((-m)-1))-7*L6*((-m)-1)*(m*&
          &rho)**(m+1)*(m*rho+c)**((-m)-2)-21*L5*((-m)-2)*((-m)-1)*(m*rho)**&
          &(m+1)*(m*rho+c)**((-m)-3)-35*L4*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho&
          &)**(m+1)*(m*rho+c)**((-m)-4)-35*L3*((-m)-4)*((-m)-3)*((-m)-2)*((-&
          &m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-5)-21*L2*((-m)-5)*((-m)-4)*&
          &((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-6)-7*L&
          &1*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**&
          &(m+1)*(m*rho+c)**((-m)-7)-L0*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*&
          &((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-8)
     if (deriv(i) .eq. 8) then
        L(i) = L8
        cycle
     end if
     L9 = (-L8*(m*rho)**(m+1)*(m*rho+c)**((-m)-1))-8*L7*((-m)-1)*(m*&
          &rho)**(m+1)*(m*rho+c)**((-m)-2)-28*L6*((-m)-2)*((-m)-1)*(m*rho)**&
          &(m+1)*(m*rho+c)**((-m)-3)-56*L5*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho&
          &)**(m+1)*(m*rho+c)**((-m)-4)-70*L4*((-m)-4)*((-m)-3)*((-m)-2)*((-&
          &m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-5)-56*L3*((-m)-5)*((-m)-4)*&
          &((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-6)-28*&
          &L2*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)*&
          &*(m+1)*(m*rho+c)**((-m)-7)-8*L1*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-&
          &4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-8)-&
          &L0*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)&
          &*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-9)
     if (deriv(i) .eq. 9) then
        L(i) = L9
        cycle
     end if
     L10 = (-L9*(m*rho)**(m+1)*(m*rho+c)**((-m)-1))-9*L8*((-m)-1)*(m&
          &*rho)**(m+1)*(m*rho+c)**((-m)-2)-36*L7*((-m)-2)*((-m)-1)*(m*rho)*&
          &*(m+1)*(m*rho+c)**((-m)-3)-84*L6*((-m)-3)*((-m)-2)*((-m)-1)*(m*rh&
          &o)**(m+1)*(m*rho+c)**((-m)-4)-126*L5*((-m)-4)*((-m)-3)*((-m)-2)*(&
          &(-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-5)-126*L4*((-m)-5)*((-m)-&
          &4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-6)-&
          &84*L3*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rh&
          &o)**(m+1)*(m*rho+c)**((-m)-7)-36*L2*((-m)-7)*((-m)-6)*((-m)-5)*((&
          &-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)&
          &-8)-9*L1*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((&
          &-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-9)-L0*((-m)-9)*((&
          &-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m&
          &)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-10)
     if (deriv(i) .eq. 10) then
        L(i) = L10
        cycle
     end if
     L11 = (-L10*(m*rho)**(m+1)*(m*rho+c)**((-m)-1))-10*L9*((-m)-1)*&
          &(m*rho)**(m+1)*(m*rho+c)**((-m)-2)-45*L8*((-m)-2)*((-m)-1)*(m*rho&
          &)**(m+1)*(m*rho+c)**((-m)-3)-120*L7*((-m)-3)*((-m)-2)*((-m)-1)*(m&
          &*rho)**(m+1)*(m*rho+c)**((-m)-4)-210*L6*((-m)-4)*((-m)-3)*((-m)-2&
          &)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-5)-252*L5*((-m)-5)*((-&
          &m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-&
          &6)-210*L4*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(&
          &m*rho)**(m+1)*(m*rho+c)**((-m)-7)-120*L3*((-m)-7)*((-m)-6)*((-m)-&
          &5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**&
          &((-m)-8)-45*L2*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)&
          &-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-9)-10*L1*((&
          &-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m&
          &)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-10)-L0*((-m)-10)*((&
          &-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m&
          &)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-11)
     if (deriv(i) .eq. 11) then
        L(i) = L11
        cycle
     end if
     L12 = (-L11*(m*rho)**(m+1)*(m*rho+c)**((-m)-1))-11*L10*((-m)-1)&
          &*(m*rho)**(m+1)*(m*rho+c)**((-m)-2)-55*L9*((-m)-2)*((-m)-1)*(m*rh&
          &o)**(m+1)*(m*rho+c)**((-m)-3)-165*L8*((-m)-3)*((-m)-2)*((-m)-1)*(&
          &m*rho)**(m+1)*(m*rho+c)**((-m)-4)-330*L7*((-m)-4)*((-m)-3)*((-m)-&
          &2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-5)-462*L6*((-m)-5)*((&
          &-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)&
          &-6)-462*L5*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*&
          &(m*rho)**(m+1)*(m*rho+c)**((-m)-7)-330*L4*((-m)-7)*((-m)-6)*((-m)&
          &-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)*&
          &*((-m)-8)-165*L3*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-&
          &m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-9)-55*L2*&
          &((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((&
          &-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-10)-11*L1*((-m)-1&
          &0)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)&
          &*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-11)-L0*((-m)-1&
          &1)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4&
          &)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-12)
     if (deriv(i) .eq. 12) then
        L(i) = L12
        cycle
     end if
     L13 = (-L12*(m*rho)**(m+1)*(m*rho+c)**((-m)-1))-12*L11*((-m)-1)&
          &*(m*rho)**(m+1)*(m*rho+c)**((-m)-2)-66*L10*((-m)-2)*((-m)-1)*(m*r&
          &ho)**(m+1)*(m*rho+c)**((-m)-3)-220*L9*((-m)-3)*((-m)-2)*((-m)-1)*&
          &(m*rho)**(m+1)*(m*rho+c)**((-m)-4)-495*L8*((-m)-4)*((-m)-3)*((-m)&
          &-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-5)-792*L7*((-m)-5)*(&
          &(-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m&
          &)-6)-924*L6*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)&
          &*(m*rho)**(m+1)*(m*rho+c)**((-m)-7)-792*L5*((-m)-7)*((-m)-6)*((-m&
          &)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)&
          &**((-m)-8)-495*L4*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((&
          &-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-9)-220*L&
          &3*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*&
          &((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-10)-66*L2*((-m)&
          &-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-&
          &3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-11)-12*L1*((&
          &-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((&
          &-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)&
          &-12)-L0*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*&
          &((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m&
          &+1)*(m*rho+c)**((-m)-13)
     if (deriv(i) .eq. 13) then
        L(i) = L13
        cycle
     end if
     L14 = (-L13*(m*rho)**(m+1)*(m*rho+c)**((-m)-1))-13*L12*((-m)-1)&
          &*(m*rho)**(m+1)*(m*rho+c)**((-m)-2)-78*L11*((-m)-2)*((-m)-1)*(m*r&
          &ho)**(m+1)*(m*rho+c)**((-m)-3)-286*L10*((-m)-3)*((-m)-2)*((-m)-1)&
          &*(m*rho)**(m+1)*(m*rho+c)**((-m)-4)-715*L9*((-m)-4)*((-m)-3)*((-m&
          &)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-5)-1287*L8*((-m)-5)&
          &*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((&
          &-m)-6)-1716*L7*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)&
          &-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-7)-1716*L6*((-m)-7)*((-m)-6)*&
          &((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rh&
          &o+c)**((-m)-8)-1287*L5*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-&
          &4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-9)-&
          &715*L4*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m&
          &)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-10)-286*L3&
          &*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*&
          &((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-11)-78&
          &*L2*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)&
          &-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)*&
          &*((-m)-12)-13*L1*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*&
          &((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m&
          &*rho)**(m+1)*(m*rho+c)**((-m)-13)-L0*((-m)-13)*((-m)-12)*((-m)-11&
          &)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)&
          &*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-14)
     if (deriv(i) .eq. 14) then
        L(i) = L14
        cycle
     end if
     L15 = (-L14*(m*rho)**(m+1)*(m*rho+c)**((-m)-1))-14*L13*((-m)-1)&
          &*(m*rho)**(m+1)*(m*rho+c)**((-m)-2)-91*L12*((-m)-2)*((-m)-1)*(m*r&
          &ho)**(m+1)*(m*rho+c)**((-m)-3)-364*L11*((-m)-3)*((-m)-2)*((-m)-1)&
          &*(m*rho)**(m+1)*(m*rho+c)**((-m)-4)-1001*L10*((-m)-4)*((-m)-3)*((&
          &-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-5)-2002*L9*((-m)-&
          &5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**&
          &((-m)-6)-3003*L8*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-&
          &m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-7)-3432*L7*((-m)-7)*((-m)-6&
          &)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*&
          &rho+c)**((-m)-8)-3003*L6*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m&
          &)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-9&
          &)-2002*L5*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*(&
          &(-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-10)-100&
          &1*L4*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)&
          &-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-11&
          &)-364*L3*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*&
          &((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rh&
          &o+c)**((-m)-12)-91*L2*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m&
          &)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-&
          &1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-13)-14*L1*((-m)-13)*((-m)-12)*&
          &((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*&
          &((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-&
          &m)-14)-L0*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)&
          &-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2&
          &)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-15)
     if (deriv(i) .eq. 15) then
        L(i) = L15
        cycle
     end if
     L16 = (-L15*(m*rho)**(m+1)*(m*rho+c)**((-m)-1))-15*L14*((-m)-1)&
          &*(m*rho)**(m+1)*(m*rho+c)**((-m)-2)-105*L13*((-m)-2)*((-m)-1)*(m*&
          &rho)**(m+1)*(m*rho+c)**((-m)-3)-455*L12*((-m)-3)*((-m)-2)*((-m)-1&
          &)*(m*rho)**(m+1)*(m*rho+c)**((-m)-4)-1365*L11*((-m)-4)*((-m)-3)*(&
          &(-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-5)-3003*L10*((-m&
          &)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)&
          &**((-m)-6)-5005*L9*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*(&
          &(-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-7)-6435*L8*((-m)-7)*((-m)&
          &-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(&
          &m*rho+c)**((-m)-8)-6435*L7*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((&
          &-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)&
          &-9)-5005*L6*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)&
          &*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-10)-3&
          &003*L5*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-&
          &m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-&
          &11)-1365*L4*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-&
          &6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m&
          &*rho+c)**((-m)-12)-455*L3*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*&
          &((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((&
          &-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-13)-105*L2*((-m)-13)*((-m)&
          &-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m&
          &)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)&
          &**((-m)-14)-15*L1*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-1&
          &0)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)&
          &*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-15)-L0*((-m)-1&
          &5)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-&
          &m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)&
          &-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-16)
     if (deriv(i) .eq. 16) then
        L(i) = L16
        cycle
     end if
     L17 = (-L16*(m*rho)**(m+1)*(m*rho+c)**((-m)-1))-16*L15*((-m)-1)&
          &*(m*rho)**(m+1)*(m*rho+c)**((-m)-2)-120*L14*((-m)-2)*((-m)-1)*(m*&
          &rho)**(m+1)*(m*rho+c)**((-m)-3)-560*L13*((-m)-3)*((-m)-2)*((-m)-1&
          &)*(m*rho)**(m+1)*(m*rho+c)**((-m)-4)-1820*L12*((-m)-4)*((-m)-3)*(&
          &(-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-5)-4368*L11*((-m&
          &)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)&
          &**((-m)-6)-8008*L10*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*&
          &((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-7)-11440*L9*((-m)-7)*((-&
          &m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)&
          &*(m*rho+c)**((-m)-8)-12870*L8*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)&
          &*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((&
          &-m)-9)-11440*L7*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m&
          &)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-1&
          &0)-8008*L6*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)&
          &*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((&
          &-m)-11)-4368*L5*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((&
          &-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1&
          &)*(m*rho+c)**((-m)-12)-1820*L4*((-m)-12)*((-m)-11)*((-m)-10)*((-m&
          &)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-&
          &2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-13)-560*L3*((-m)-13)*&
          &((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)&
          &*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*r&
          &ho+c)**((-m)-14)-120*L2*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*(&
          &(-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((&
          &-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-15)-16*L&
          &1*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-&
          &m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)&
          &-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-16)-L0*((-m)-16)*((-&
          &m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)&
          &*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*(&
          &(-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-17)
     if (deriv(i) .eq. 17) then
        L(i) = L17
        cycle
     end if
     L18 = (-L17*(m*rho)**(m+1)*(m*rho+c)**((-m)-1))-17*L16*((-m)-1)&
          &*(m*rho)**(m+1)*(m*rho+c)**((-m)-2)-136*L15*((-m)-2)*((-m)-1)*(m*&
          &rho)**(m+1)*(m*rho+c)**((-m)-3)-680*L14*((-m)-3)*((-m)-2)*((-m)-1&
          &)*(m*rho)**(m+1)*(m*rho+c)**((-m)-4)-2380*L13*((-m)-4)*((-m)-3)*(&
          &(-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-5)-6188*L12*((-m&
          &)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)&
          &**((-m)-6)-12376*L11*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)&
          &*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-7)-19448*L10*((-m)-7)*(&
          &(-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+&
          &1)*(m*rho+c)**((-m)-8)-24310*L9*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-&
          &5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**&
          &((-m)-9)-24310*L8*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((&
          &-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)&
          &-10)-19448*L7*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)&
          &-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)*&
          &*((-m)-11)-12376*L6*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7&
          &)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**&
          &(m+1)*(m*rho+c)**((-m)-12)-6188*L5*((-m)-12)*((-m)-11)*((-m)-10)*&
          &((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((&
          &-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-13)-2380*L4*((-m)&
          &-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-&
          &m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)&
          &*(m*rho+c)**((-m)-14)-680*L3*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-&
          &11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-&
          &4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-15)&
          &-136*L2*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-1&
          &0)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)&
          &*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-16)-17*L1*((-m&
          &)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)&
          &*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*(&
          &(-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-17)-L0*((-m)-17)&
          &*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m&
          &)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)&
          &-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-18)
     if (deriv(i) .eq. 18) then
        L(i) = L18
        cycle
     end if
     L19 = (-L18*(m*rho)**(m+1)*(m*rho+c)**((-m)-1))-18*L17*((-m)-1)&
          &*(m*rho)**(m+1)*(m*rho+c)**((-m)-2)-153*L16*((-m)-2)*((-m)-1)*(m*&
          &rho)**(m+1)*(m*rho+c)**((-m)-3)-816*L15*((-m)-3)*((-m)-2)*((-m)-1&
          &)*(m*rho)**(m+1)*(m*rho+c)**((-m)-4)-3060*L14*((-m)-4)*((-m)-3)*(&
          &(-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-5)-8568*L13*((-m&
          &)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)&
          &**((-m)-6)-18564*L12*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)&
          &*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-7)-31824*L11*((-m)-7)*(&
          &(-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+&
          &1)*(m*rho+c)**((-m)-8)-43758*L10*((-m)-8)*((-m)-7)*((-m)-6)*((-m)&
          &-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)*&
          &*((-m)-9)-48620*L9*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*(&
          &(-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m&
          &)-10)-43758*L8*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m&
          &)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)&
          &**((-m)-11)-31824*L7*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-&
          &7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)*&
          &*(m+1)*(m*rho+c)**((-m)-12)-18564*L6*((-m)-12)*((-m)-11)*((-m)-10&
          &)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*&
          &((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-13)-8568*L5*((-&
          &m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*(&
          &(-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+&
          &1)*(m*rho+c)**((-m)-14)-3060*L4*((-m)-14)*((-m)-13)*((-m)-12)*((-&
          &m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-&
          &m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-&
          &15)-816*L3*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m&
          &)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)&
          &-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-16)-153*L2*&
          &((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)&
          &-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-&
          &3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-17)-18*L1*((&
          &-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-1&
          &1)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4&
          &)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-18)-&
          &L0*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((&
          &-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*(&
          &(-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho&
          &+c)**((-m)-19)
     if (deriv(i) .eq. 19) then
        L(i) = L19
        cycle
     end if
     L20 = (-L19*(m*rho)**(m+1)*(m*rho+c)**((-m)-1))-19*L18*((-m)-1)&
          &*(m*rho)**(m+1)*(m*rho+c)**((-m)-2)-171*L17*((-m)-2)*((-m)-1)*(m*&
          &rho)**(m+1)*(m*rho+c)**((-m)-3)-969*L16*((-m)-3)*((-m)-2)*((-m)-1&
          &)*(m*rho)**(m+1)*(m*rho+c)**((-m)-4)-3876*L15*((-m)-4)*((-m)-3)*(&
          &(-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-5)-11628*L14*((-&
          &m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c&
          &)**((-m)-6)-27132*L13*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2&
          &)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-7)-50388*L12*((-m)-7)*&
          &((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m&
          &+1)*(m*rho+c)**((-m)-8)-75582*L11*((-m)-8)*((-m)-7)*((-m)-6)*((-m&
          &)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)&
          &**((-m)-9)-92378*L10*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)&
          &*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((&
          &-m)-10)-92378*L9*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((&
          &-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+&
          &c)**((-m)-11)-75582*L8*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m&
          &)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho&
          &)**(m+1)*(m*rho+c)**((-m)-12)-50388*L7*((-m)-12)*((-m)-11)*((-m)-&
          &10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3&
          &)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-13)-27132*L6*&
          &((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7&
          &)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**&
          &(m+1)*(m*rho+c)**((-m)-14)-11628*L5*((-m)-14)*((-m)-13)*((-m)-12)&
          &*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)&
          &*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((&
          &-m)-15)-3876*L4*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)&
          &*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*&
          &((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-16)-96&
          &9*L3*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*&
          &((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*(&
          &(-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-17)-171&
          &*L2*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*(&
          &(-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*(&
          &(-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m&
          &)-18)-19*L1*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-&
          &m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*(&
          &(-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+&
          &1)*(m*rho+c)**((-m)-19)-L0*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16&
          &)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-&
          &m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)&
          &-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-20)
     if (deriv(i) .eq. 20) then
        L(i) = L20
        cycle
     end if
     L21 = (-L20*(m*rho)**(m+1)*(m*rho+c)**((-m)-1))-20*L19*((-m)-1)&
          &*(m*rho)**(m+1)*(m*rho+c)**((-m)-2)-190*L18*((-m)-2)*((-m)-1)*(m*&
          &rho)**(m+1)*(m*rho+c)**((-m)-3)-1140*L17*((-m)-3)*((-m)-2)*((-m)-&
          &1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-4)-4845*L16*((-m)-4)*((-m)-3)*&
          &((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-5)-15504*L15*((&
          &-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+&
          &c)**((-m)-6)-38760*L14*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-&
          &2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-7)-77520*L13*((-m)-7)&
          &*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(&
          &m+1)*(m*rho+c)**((-m)-8)-125970*L12*((-m)-8)*((-m)-7)*((-m)-6)*((&
          &-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+&
          &c)**((-m)-9)-167960*L11*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)&
          &-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)*&
          &*((-m)-10)-184756*L10*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-&
          &6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m&
          &*rho+c)**((-m)-11)-167960*L9*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8&
          &)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*&
          &(m*rho)**(m+1)*(m*rho+c)**((-m)-12)-125970*L8*((-m)-12)*((-m)-11)&
          &*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*&
          &((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-13)-77&
          &520*L7*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*&
          &((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m&
          &*rho)**(m+1)*(m*rho+c)**((-m)-14)-38760*L6*((-m)-14)*((-m)-13)*((&
          &-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*(&
          &(-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho&
          &+c)**((-m)-15)-15504*L5*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*(&
          &(-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*(&
          &(-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m&
          &)-16)-4845*L4*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*(&
          &(-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*(&
          &(-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m&
          &)-17)-1140*L3*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*(&
          &(-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*&
          &((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rh&
          &o+c)**((-m)-18)-190*L2*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((&
          &-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)&
          &*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(&
          &m*rho)**(m+1)*(m*rho+c)**((-m)-19)-20*L1*((-m)-19)*((-m)-18)*((-m&
          &)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)&
          &*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*&
          &((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-20)-L0&
          &*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m&
          &)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*(&
          &(-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*&
          &rho)**(m+1)*(m*rho+c)**((-m)-21)
     if (deriv(i) .eq. 21) then
        L(i) = L21
        cycle
     end if
     L22 = (-L21*(m*rho)**(m+1)*(m*rho+c)**((-m)-1))-21*L20*((-m)-1)&
          &*(m*rho)**(m+1)*(m*rho+c)**((-m)-2)-210*L19*((-m)-2)*((-m)-1)*(m*&
          &rho)**(m+1)*(m*rho+c)**((-m)-3)-1330*L18*((-m)-3)*((-m)-2)*((-m)-&
          &1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-4)-5985*L17*((-m)-4)*((-m)-3)*&
          &((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-5)-20349*L16*((&
          &-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+&
          &c)**((-m)-6)-54264*L15*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-&
          &2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-7)-116280*L14*((-m)-7&
          &)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**&
          &(m+1)*(m*rho+c)**((-m)-8)-203490*L13*((-m)-8)*((-m)-7)*((-m)-6)*(&
          &(-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho&
          &+c)**((-m)-9)-293930*L12*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m&
          &)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)&
          &**((-m)-10)-352716*L11*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)&
          &-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(&
          &m*rho+c)**((-m)-11)-352716*L10*((-m)-11)*((-m)-10)*((-m)-9)*((-m)&
          &-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1&
          &)*(m*rho)**(m+1)*(m*rho+c)**((-m)-12)-293930*L9*((-m)-12)*((-m)-1&
          &1)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4&
          &)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-13)-&
          &203490*L8*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-&
          &8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)&
          &*(m*rho)**(m+1)*(m*rho+c)**((-m)-14)-116280*L7*((-m)-14)*((-m)-13&
          &)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-&
          &6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m&
          &*rho+c)**((-m)-15)-54264*L6*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-1&
          &2)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-&
          &5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**&
          &((-m)-16)-20349*L5*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-&
          &12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)&
          &-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)*&
          &*((-m)-17)-5985*L4*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-&
          &13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m&
          &)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*&
          &(m*rho+c)**((-m)-18)-1330*L3*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-&
          &15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((&
          &-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m&
          &)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-19)-210*L2*((-m)-19)*((-m)-1&
          &8)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((&
          &-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((&
          &-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)&
          &-20)-21*L1*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m&
          &)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*&
          &((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((&
          &-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-21)-L0*((-m)-21)*((-m)-20)&
          &*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m&
          &)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((&
          &-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1&
          &)*(m*rho+c)**((-m)-22)
     if (deriv(i) .eq. 22) then
        L(i) = L22
        cycle
     end if
     L23 = (-L22*(m*rho)**(m+1)*(m*rho+c)**((-m)-1))-22*L21*((-m)-1)&
          &*(m*rho)**(m+1)*(m*rho+c)**((-m)-2)-231*L20*((-m)-2)*((-m)-1)*(m*&
          &rho)**(m+1)*(m*rho+c)**((-m)-3)-1540*L19*((-m)-3)*((-m)-2)*((-m)-&
          &1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-4)-7315*L18*((-m)-4)*((-m)-3)*&
          &((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-5)-26334*L17*((&
          &-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+&
          &c)**((-m)-6)-74613*L16*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-&
          &2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-7)-170544*L15*((-m)-7&
          &)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**&
          &(m+1)*(m*rho+c)**((-m)-8)-319770*L14*((-m)-8)*((-m)-7)*((-m)-6)*(&
          &(-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho&
          &+c)**((-m)-9)-497420*L13*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m&
          &)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)&
          &**((-m)-10)-646646*L12*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)&
          &-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(&
          &m*rho+c)**((-m)-11)-705432*L11*((-m)-11)*((-m)-10)*((-m)-9)*((-m)&
          &-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1&
          &)*(m*rho)**(m+1)*(m*rho+c)**((-m)-12)-646646*L10*((-m)-12)*((-m)-&
          &11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-&
          &4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-13)&
          &-497420*L9*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)&
          &-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1&
          &)*(m*rho)**(m+1)*(m*rho+c)**((-m)-14)-319770*L8*((-m)-14)*((-m)-1&
          &3)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)&
          &-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(&
          &m*rho+c)**((-m)-15)-170544*L7*((-m)-15)*((-m)-14)*((-m)-13)*((-m)&
          &-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m&
          &)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)&
          &**((-m)-16)-74613*L6*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m&
          &)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-&
          &m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c&
          &)**((-m)-17)-26334*L5*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-&
          &m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*(&
          &(-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+&
          &1)*(m*rho+c)**((-m)-18)-7315*L4*((-m)-18)*((-m)-17)*((-m)-16)*((-&
          &m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)&
          &*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*(&
          &(-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-19)-1540*L3*((-m)-19)*((-&
          &m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12&
          &)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5&
          &)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**(&
          &(-m)-20)-231*L2*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)&
          &*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m&
          &)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-&
          &2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-21)-22*L1*((-m)-21)*(&
          &(-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-&
          &14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-&
          &m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rh&
          &o)**(m+1)*(m*rho+c)**((-m)-22)-L0*((-m)-22)*((-m)-21)*((-m)-20)*(&
          &(-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-&
          &13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m&
          &)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*&
          &(m*rho+c)**((-m)-23)
     if (deriv(i) .eq. 23) then
        L(i) = L23
        cycle
     end if
     L24 = (-L23*(m*rho)**(m+1)*(m*rho+c)**((-m)-1))-23*L22*((-m)-1)&
          &*(m*rho)**(m+1)*(m*rho+c)**((-m)-2)-253*L21*((-m)-2)*((-m)-1)*(m*&
          &rho)**(m+1)*(m*rho+c)**((-m)-3)-1771*L20*((-m)-3)*((-m)-2)*((-m)-&
          &1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-4)-8855*L19*((-m)-4)*((-m)-3)*&
          &((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-5)-33649*L18*((&
          &-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+&
          &c)**((-m)-6)-100947*L17*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)&
          &-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-7)-245157*L16*((-m)-&
          &7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)*&
          &*(m+1)*(m*rho+c)**((-m)-8)-490314*L15*((-m)-8)*((-m)-7)*((-m)-6)*&
          &((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rh&
          &o+c)**((-m)-9)-817190*L14*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-&
          &m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c&
          &)**((-m)-10)-1144066*L13*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-&
          &m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)&
          &*(m*rho+c)**((-m)-11)-1352078*L12*((-m)-11)*((-m)-10)*((-m)-9)*((&
          &-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m&
          &)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-12)-1352078*L11*((-m)-12)*((&
          &-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((&
          &-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)&
          &-13)-1144066*L10*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)&
          &*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*(&
          &(-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-14)-817190*L9*((-m)-14)*(&
          &(-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)&
          &*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(&
          &m+1)*(m*rho+c)**((-m)-15)-490314*L8*((-m)-15)*((-m)-14)*((-m)-13)&
          &*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6&
          &)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*&
          &rho+c)**((-m)-16)-245157*L7*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-1&
          &3)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)&
          &-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(&
          &m*rho+c)**((-m)-17)-100947*L6*((-m)-17)*((-m)-16)*((-m)-15)*((-m)&
          &-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((&
          &-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*r&
          &ho)**(m+1)*(m*rho+c)**((-m)-18)-33649*L5*((-m)-18)*((-m)-17)*((-m&
          &)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)&
          &*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*(&
          &(-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-19)-8855*L4*((-m&
          &)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)&
          &*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6&
          &)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*&
          &rho+c)**((-m)-20)-1771*L3*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)&
          &*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m&
          &)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)&
          &-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-21)-253*L2*&
          &((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)&
          &-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*(&
          &(-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-&
          &m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-22)-23*L1*((-m)-22)*((-m)-2&
          &1)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((&
          &-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)&
          &*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(&
          &m*rho)**(m+1)*(m*rho+c)**((-m)-23)-L0*((-m)-23)*((-m)-22)*((-m)-2&
          &1)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((&
          &-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)&
          &*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(&
          &m*rho)**(m+1)*(m*rho+c)**((-m)-24)
     if (deriv(i) .eq. 24) then
        L(i) = L24
        cycle
     end if
     L25 = (-L24*(m*rho)**(m+1)*(m*rho+c)**((-m)-1))-24*L23*((-m)-1)&
          &*(m*rho)**(m+1)*(m*rho+c)**((-m)-2)-276*L22*((-m)-2)*((-m)-1)*(m*&
          &rho)**(m+1)*(m*rho+c)**((-m)-3)-2024*L21*((-m)-3)*((-m)-2)*((-m)-&
          &1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-4)-10626*L20*((-m)-4)*((-m)-3)&
          &*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-5)-42504*L19*(&
          &(-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho&
          &+c)**((-m)-6)-134596*L18*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m&
          &)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-7)-346104*L17*((-m)&
          &-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)&
          &**(m+1)*(m*rho+c)**((-m)-8)-735471*L16*((-m)-8)*((-m)-7)*((-m)-6)&
          &*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*r&
          &ho+c)**((-m)-9)-1307504*L15*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*(&
          &(-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho&
          &+c)**((-m)-10)-1961256*L14*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*(&
          &(-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+&
          &1)*(m*rho+c)**((-m)-11)-2496144*L13*((-m)-11)*((-m)-10)*((-m)-9)*&
          &((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((&
          &-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-12)-2704156*L12*((-m)-12)*&
          &((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*&
          &((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-&
          &m)-13)-2496144*L11*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-&
          &9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)&
          &*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-14)-1961256*L10*((-m)-1&
          &4)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m&
          &)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho&
          &)**(m+1)*(m*rho+c)**((-m)-15)-1307504*L9*((-m)-15)*((-m)-14)*((-m&
          &)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((&
          &-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1&
          &)*(m*rho+c)**((-m)-16)-735471*L8*((-m)-16)*((-m)-15)*((-m)-14)*((&
          &-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*&
          &((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m&
          &+1)*(m*rho+c)**((-m)-17)-346104*L7*((-m)-17)*((-m)-16)*((-m)-15)*&
          &((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-&
          &8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)&
          &*(m*rho)**(m+1)*(m*rho+c)**((-m)-18)-134596*L6*((-m)-18)*((-m)-17&
          &)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-&
          &m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m&
          &)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-19)-42504*&
          &L5*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((&
          &-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*&
          &((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m&
          &+1)*(m*rho+c)**((-m)-20)-10626*L4*((-m)-20)*((-m)-19)*((-m)-18)*(&
          &(-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-&
          &11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-&
          &4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-21)&
          &-2024*L3*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-&
          &16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*(&
          &(-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-&
          &m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-22)-276*L2*((-m)-2&
          &2)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((&
          &-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9&
          &)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*&
          &((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-23)-24*L1*((-m)-23)*((-m&
          &)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)&
          &*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m&
          &)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-&
          &2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-24)-L0*((-m)-24)*((-m&
          &)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)&
          &*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m&
          &)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)&
          &-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-25)
     if (deriv(i) .eq. 25) then
        L(i) = L25
        cycle
     end if
     L26 = (-L25*(m*rho)**(m+1)*(m*rho+c)**((-m)-1))-25*L24*((-m)-1)&
          &*(m*rho)**(m+1)*(m*rho+c)**((-m)-2)-300*L23*((-m)-2)*((-m)-1)*(m*&
          &rho)**(m+1)*(m*rho+c)**((-m)-3)-2300*L22*((-m)-3)*((-m)-2)*((-m)-&
          &1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-4)-12650*L21*((-m)-4)*((-m)-3)&
          &*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-5)-53130*L20*(&
          &(-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho&
          &+c)**((-m)-6)-177100*L19*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m&
          &)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-7)-480700*L18*((-m)&
          &-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)&
          &**(m+1)*(m*rho+c)**((-m)-8)-1081575*L17*((-m)-8)*((-m)-7)*((-m)-6&
          &)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*&
          &rho+c)**((-m)-9)-2042975*L16*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*&
          &((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rh&
          &o+c)**((-m)-10)-3268760*L15*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*&
          &((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m&
          &+1)*(m*rho+c)**((-m)-11)-4457400*L14*((-m)-11)*((-m)-10)*((-m)-9)&
          &*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*(&
          &(-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-12)-5200300*L13*((-m)-12)&
          &*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)&
          &*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((&
          &-m)-13)-5200300*L12*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)&
          &-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2&
          &)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-14)-4457400*L11*((-m)-&
          &14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-&
          &m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rh&
          &o)**(m+1)*(m*rho+c)**((-m)-15)-3268760*L10*((-m)-15)*((-m)-14)*((&
          &-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*&
          &((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m&
          &+1)*(m*rho+c)**((-m)-16)-2042975*L9*((-m)-16)*((-m)-15)*((-m)-14)&
          &*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-&
          &7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)*&
          &*(m+1)*(m*rho+c)**((-m)-17)-1081575*L8*((-m)-17)*((-m)-16)*((-m)-&
          &15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((&
          &-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m&
          &)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-18)-480700*L7*((-m)-18)*((-m&
          &)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)&
          &*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*&
          &((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-19)-17&
          &7100*L6*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-1&
          &4)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m&
          &)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho&
          &)**(m+1)*(m*rho+c)**((-m)-20)-53130*L5*((-m)-20)*((-m)-19)*((-m)-&
          &18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*(&
          &(-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*(&
          &(-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m&
          &)-21)-12650*L4*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*&
          &((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)&
          &-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-&
          &3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-22)-2300*L3*&
          &((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)&
          &-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*&
          &((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((&
          &-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-23)-300*L2*((-m)-&
          &23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*(&
          &(-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-&
          &10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3&
          &)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-24)-25*L1*((-&
          &m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18&
          &)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-&
          &m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-&
          &m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-&
          &25)-L0*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20&
          &)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-&
          &m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*(&
          &(-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+&
          &1)*(m*rho+c)**((-m)-26)
     if (deriv(i) .eq. 26) then
        L(i) = L26
        cycle
     end if
     L27 = (-L26*(m*rho)**(m+1)*(m*rho+c)**((-m)-1))-26*L25*((-m)-1)&
          &*(m*rho)**(m+1)*(m*rho+c)**((-m)-2)-325*L24*((-m)-2)*((-m)-1)*(m*&
          &rho)**(m+1)*(m*rho+c)**((-m)-3)-2600*L23*((-m)-3)*((-m)-2)*((-m)-&
          &1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-4)-14950*L22*((-m)-4)*((-m)-3)&
          &*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-5)-65780*L21*(&
          &(-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho&
          &+c)**((-m)-6)-230230*L20*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m&
          &)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-7)-657800*L19*((-m)&
          &-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)&
          &**(m+1)*(m*rho+c)**((-m)-8)-1562275*L18*((-m)-8)*((-m)-7)*((-m)-6&
          &)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*&
          &rho+c)**((-m)-9)-3124550*L17*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*&
          &((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rh&
          &o+c)**((-m)-10)-5311735*L16*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*&
          &((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m&
          &+1)*(m*rho+c)**((-m)-11)-7726160*L15*((-m)-11)*((-m)-10)*((-m)-9)&
          &*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*(&
          &(-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-12)-9657700*L14*((-m)-12)&
          &*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)&
          &*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((&
          &-m)-13)-10400600*L13*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m&
          &)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-&
          &2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-14)-9657700*L12*((-m)&
          &-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((&
          &-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*r&
          &ho)**(m+1)*(m*rho+c)**((-m)-15)-7726160*L11*((-m)-15)*((-m)-14)*(&
          &(-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)&
          &*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(&
          &m+1)*(m*rho+c)**((-m)-16)-5311735*L10*((-m)-16)*((-m)-15)*((-m)-1&
          &4)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m&
          &)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho&
          &)**(m+1)*(m*rho+c)**((-m)-17)-3124550*L9*((-m)-17)*((-m)-16)*((-m&
          &)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*&
          &((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((&
          &-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-18)-1562275*L8*((-m)-18)*(&
          &(-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-&
          &11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-&
          &4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-19)&
          &-657800*L7*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m&
          &)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*(&
          &(-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*&
          &rho)**(m+1)*(m*rho+c)**((-m)-20)-230230*L6*((-m)-20)*((-m)-19)*((&
          &-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-1&
          &2)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-&
          &5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**&
          &((-m)-21)-65780*L5*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-&
          &17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*(&
          &(-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((&
          &-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-22)-1495&
          &0*L4*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*&
          &((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)&
          &-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-&
          &3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-23)-2600*L3*&
          &((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)&
          &-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*&
          &((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*(&
          &(-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-24)-325&
          &*L2*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*(&
          &(-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-&
          &12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)&
          &-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)*&
          &*((-m)-25)-26*L1*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21&
          &)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-&
          &m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*&
          &((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m&
          &*rho)**(m+1)*(m*rho+c)**((-m)-26)-L0*((-m)-26)*((-m)-25)*((-m)-24&
          &)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-&
          &m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11&
          &)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)&
          &*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-27)
     if (deriv(i) .eq. 27) then
        L(i) = L27
        cycle
     end if
     L28 = (-L27*(m*rho)**(m+1)*(m*rho+c)**((-m)-1))-27*L26*((-m)-1)&
          &*(m*rho)**(m+1)*(m*rho+c)**((-m)-2)-351*L25*((-m)-2)*((-m)-1)*(m*&
          &rho)**(m+1)*(m*rho+c)**((-m)-3)-2925*L24*((-m)-3)*((-m)-2)*((-m)-&
          &1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-4)-17550*L23*((-m)-4)*((-m)-3)&
          &*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-5)-80730*L22*(&
          &(-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho&
          &+c)**((-m)-6)-296010*L21*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m&
          &)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-7)-888030*L20*((-m)&
          &-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)&
          &**(m+1)*(m*rho+c)**((-m)-8)-2220075*L19*((-m)-8)*((-m)-7)*((-m)-6&
          &)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*&
          &rho+c)**((-m)-9)-4686825*L18*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*&
          &((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rh&
          &o+c)**((-m)-10)-8436285*L17*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*&
          &((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m&
          &+1)*(m*rho+c)**((-m)-11)-13037895*L16*((-m)-11)*((-m)-10)*((-m)-9&
          &)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*&
          &((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-12)-17383860*L15*((-m)-1&
          &2)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-&
          &5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**&
          &((-m)-13)-20058300*L14*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((&
          &-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m&
          &)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-14)-20058300*L13*((&
          &-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)&
          &*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(&
          &m*rho)**(m+1)*(m*rho+c)**((-m)-15)-17383860*L12*((-m)-15)*((-m)-1&
          &4)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m&
          &)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho&
          &)**(m+1)*(m*rho+c)**((-m)-16)-13037895*L11*((-m)-16)*((-m)-15)*((&
          &-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)&
          &*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(&
          &m*rho)**(m+1)*(m*rho+c)**((-m)-17)-8436285*L10*((-m)-17)*((-m)-16&
          &)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-&
          &m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)&
          &-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-18)-4686825*L9*((-m)&
          &-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*&
          &((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*&
          &((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-&
          &m)-19)-2220075*L8*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-1&
          &5)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-&
          &m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)&
          &-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-20)-888030*L7*((-m)-20)*((-m)&
          &-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*&
          &((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)&
          &*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*r&
          &ho+c)**((-m)-21)-296010*L6*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18&
          &)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-&
          &m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-&
          &m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-&
          &22)-80730*L5*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((&
          &-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-1&
          &1)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4&
          &)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-23)-&
          &17550*L4*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-&
          &18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*(&
          &(-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*(&
          &(-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m&
          &)-24)-2925*L3*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*(&
          &(-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-&
          &13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m&
          &)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*&
          &(m*rho+c)**((-m)-25)-351*L2*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-2&
          &2)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((&
          &-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9&
          &)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*&
          &((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-26)-27*L1*((-m)-26)*((-m&
          &)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)&
          &*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m&
          &)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-&
          &m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c&
          &)**((-m)-27)-L0*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)&
          &*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m&
          &)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)&
          &*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*(&
          &(-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-28)
     if (deriv(i) .eq. 28) then
        L(i) = L28
        cycle
     end if
     L29 = (-L28*(m*rho)**(m+1)*(m*rho+c)**((-m)-1))-28*L27*((-m)-1)&
          &*(m*rho)**(m+1)*(m*rho+c)**((-m)-2)-378*L26*((-m)-2)*((-m)-1)*(m*&
          &rho)**(m+1)*(m*rho+c)**((-m)-3)-3276*L25*((-m)-3)*((-m)-2)*((-m)-&
          &1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-4)-20475*L24*((-m)-4)*((-m)-3)&
          &*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-5)-98280*L23*(&
          &(-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho&
          &+c)**((-m)-6)-376740*L22*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m&
          &)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-7)-1184040*L21*((-m&
          &)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho&
          &)**(m+1)*(m*rho+c)**((-m)-8)-3108105*L20*((-m)-8)*((-m)-7)*((-m)-&
          &6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m&
          &*rho+c)**((-m)-9)-6906900*L19*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)&
          &*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*r&
          &ho+c)**((-m)-10)-13123110*L18*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7&
          &)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**&
          &(m+1)*(m*rho+c)**((-m)-11)-21474180*L17*((-m)-11)*((-m)-10)*((-m)&
          &-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2&
          &)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-12)-30421755*L16*((-m)&
          &-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m&
          &)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)&
          &**((-m)-13)-37442160*L15*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*&
          &((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((&
          &-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-14)-40116600*L14*&
          &((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-&
          &8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)&
          &*(m*rho)**(m+1)*(m*rho+c)**((-m)-15)-37442160*L13*((-m)-15)*((-m)&
          &-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((&
          &-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*r&
          &ho)**(m+1)*(m*rho+c)**((-m)-16)-30421755*L12*((-m)-16)*((-m)-15)*&
          &((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-&
          &8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)&
          &*(m*rho)**(m+1)*(m*rho+c)**((-m)-17)-21474180*L11*((-m)-17)*((-m)&
          &-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*&
          &((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((&
          &-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-18)-13123110*L10*&
          &((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)&
          &-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m&
          &)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)&
          &**((-m)-19)-6906900*L9*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((&
          &-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9&
          &)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*&
          &((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-20)-3108105*L8*((-m)-20)&
          &*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m&
          &)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((&
          &-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1&
          &)*(m*rho+c)**((-m)-21)-1184040*L7*((-m)-21)*((-m)-20)*((-m)-19)*(&
          &(-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-&
          &12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)&
          &-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)*&
          &*((-m)-22)-376740*L6*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m&
          &)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)&
          &*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)&
          &*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((&
          &-m)-23)-98280*L5*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19&
          &)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-&
          &m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((&
          &-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+&
          &c)**((-m)-24)-20475*L4*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((&
          &-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-1&
          &4)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m&
          &)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho&
          &)**(m+1)*(m*rho+c)**((-m)-25)-3276*L3*((-m)-25)*((-m)-24)*((-m)-2&
          &3)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((&
          &-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-1&
          &0)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)&
          &*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-26)-378*L2*((-&
          &m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20&
          &)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-&
          &m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*(&
          &(-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+&
          &1)*(m*rho+c)**((-m)-27)-28*L1*((-m)-27)*((-m)-26)*((-m)-25)*((-m)&
          &-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*&
          &((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)&
          &-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)&
          &-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-28&
          &)-L0*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*&
          &((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)&
          &-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*&
          &((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((&
          &-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-29)
     if (deriv(i) .eq. 29) then
        L(i) = L29
        cycle
     end if
     L30 = (-L29*(m*rho)**(m+1)*(m*rho+c)**((-m)-1))-29*L28*((-m)-1)&
          &*(m*rho)**(m+1)*(m*rho+c)**((-m)-2)-406*L27*((-m)-2)*((-m)-1)*(m*&
          &rho)**(m+1)*(m*rho+c)**((-m)-3)-3654*L26*((-m)-3)*((-m)-2)*((-m)-&
          &1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-4)-23751*L25*((-m)-4)*((-m)-3)&
          &*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-5)-118755*L24*&
          &((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rh&
          &o+c)**((-m)-6)-475020*L23*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-&
          &m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-7)-1560780*L22*((-&
          &m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rh&
          &o)**(m+1)*(m*rho+c)**((-m)-8)-4292145*L21*((-m)-8)*((-m)-7)*((-m)&
          &-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(&
          &m*rho+c)**((-m)-9)-10015005*L20*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-&
          &6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m&
          &*rho+c)**((-m)-10)-20030010*L19*((-m)-10)*((-m)-9)*((-m)-8)*((-m)&
          &-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)&
          &**(m+1)*(m*rho+c)**((-m)-11)-34597290*L18*((-m)-11)*((-m)-10)*((-&
          &m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)&
          &-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-12)-51895935*L17*((-&
          &m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((&
          &-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+&
          &c)**((-m)-13)-67863915*L16*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10&
          &)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*&
          &((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-14)-77558760*L1&
          &5*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m&
          &)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-&
          &1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-15)-77558760*L14*((-m)-15)*((-&
          &m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*&
          &((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m&
          &*rho)**(m+1)*(m*rho+c)**((-m)-16)-67863915*L13*((-m)-16)*((-m)-15&
          &)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m&
          &)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-&
          &1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-17)-51895935*L12*((-m)-17)*((-&
          &m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10&
          &)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*&
          &((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-18)-34597290*L1&
          &1*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-&
          &m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((&
          &-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+&
          &c)**((-m)-19)-20030010*L10*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16&
          &)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-&
          &m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)&
          &-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-20)-10015005*L9*((-m&
          &)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)&
          &*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-&
          &7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)*&
          &*(m+1)*(m*rho+c)**((-m)-21)-4292145*L8*((-m)-21)*((-m)-20)*((-m)-&
          &19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*(&
          &(-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*&
          &((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rh&
          &o+c)**((-m)-22)-1560780*L7*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19&
          &)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-&
          &m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((&
          &-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+&
          &c)**((-m)-23)-475020*L6*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*(&
          &(-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-&
          &13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m&
          &)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*&
          &(m*rho+c)**((-m)-24)-118755*L5*((-m)-24)*((-m)-23)*((-m)-22)*((-m&
          &)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)&
          &*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)&
          &-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1&
          &)*(m*rho)**(m+1)*(m*rho+c)**((-m)-25)-23751*L4*((-m)-25)*((-m)-24&
          &)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-&
          &m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11&
          &)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)&
          &*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-26)-3&
          &654*L3*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21&
          &)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-&
          &m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*&
          &((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m&
          &*rho)**(m+1)*(m*rho+c)**((-m)-27)-406*L2*((-m)-27)*((-m)-26)*((-m&
          &)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)&
          &*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m&
          &)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-&
          &m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c&
          &)**((-m)-28)-29*L1*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-&
          &24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*(&
          &(-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-&
          &11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-&
          &4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-29)&
          &-L0*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*(&
          &(-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-&
          &17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*(&
          &(-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((&
          &-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-30)
     if (deriv(i) .eq. 30) then
        L(i) = L30
        cycle
     end if
     L31 = (-L30*(m*rho)**(m+1)*(m*rho+c)**((-m)-1))-30*L29*((-m)-1)&
          &*(m*rho)**(m+1)*(m*rho+c)**((-m)-2)-435*L28*((-m)-2)*((-m)-1)*(m*&
          &rho)**(m+1)*(m*rho+c)**((-m)-3)-4060*L27*((-m)-3)*((-m)-2)*((-m)-&
          &1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-4)-27405*L26*((-m)-4)*((-m)-3)&
          &*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-5)-142506*L25*&
          &((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rh&
          &o+c)**((-m)-6)-593775*L24*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-&
          &m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-7)-2035800*L23*((-&
          &m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rh&
          &o)**(m+1)*(m*rho+c)**((-m)-8)-5852925*L22*((-m)-8)*((-m)-7)*((-m)&
          &-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(&
          &m*rho+c)**((-m)-9)-14307150*L21*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-&
          &6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m&
          &*rho+c)**((-m)-10)-30045015*L20*((-m)-10)*((-m)-9)*((-m)-8)*((-m)&
          &-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)&
          &**(m+1)*(m*rho+c)**((-m)-11)-54627300*L19*((-m)-11)*((-m)-10)*((-&
          &m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)&
          &-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-12)-86493225*L18*((-&
          &m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((&
          &-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+&
          &c)**((-m)-13)-119759850*L17*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-1&
          &0)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)&
          &*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-14)-145422675*&
          &L16*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((&
          &-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m&
          &)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-15)-155117520*L15*((-m)-15)*&
          &((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-&
          &8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)&
          &*(m*rho)**(m+1)*(m*rho+c)**((-m)-16)-145422675*L14*((-m)-16)*((-m&
          &)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*&
          &((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((&
          &-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-17)-119759850*L13*((-m)-17&
          &)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-&
          &m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m&
          &)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-18)-864932&
          &25*L12*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13&
          &)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-&
          &6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m&
          &*rho+c)**((-m)-19)-54627300*L11*((-m)-19)*((-m)-18)*((-m)-17)*((-&
          &m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10&
          &)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*&
          &((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-20)-30045015*L1&
          &0*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-&
          &m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*&
          &((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m&
          &*rho)**(m+1)*(m*rho+c)**((-m)-21)-14307150*L9*((-m)-21)*((-m)-20)&
          &*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m&
          &)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((&
          &-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1&
          &)*(m*rho+c)**((-m)-22)-5852925*L8*((-m)-22)*((-m)-21)*((-m)-20)*(&
          &(-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-&
          &13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m&
          &)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*&
          &(m*rho+c)**((-m)-23)-2035800*L7*((-m)-23)*((-m)-22)*((-m)-21)*((-&
          &m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14&
          &)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)&
          &-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)&
          &**(m+1)*(m*rho+c)**((-m)-24)-593775*L6*((-m)-24)*((-m)-23)*((-m)-&
          &22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*(&
          &(-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-&
          &9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)&
          &*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-25)-142506*L5*((-m)-25)&
          &*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m&
          &)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)&
          &*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)&
          &*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((&
          &-m)-26)-27405*L4*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22&
          &)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-&
          &m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)&
          &*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*(&
          &(-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-27)-4060*L3*((-m)-27)*((-&
          &m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20&
          &)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-&
          &m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*(&
          &(-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+&
          &1)*(m*rho+c)**((-m)-28)-435*L2*((-m)-28)*((-m)-27)*((-m)-26)*((-m&
          &)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)&
          &*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m&
          &)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-&
          &m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c&
          &)**((-m)-29)-30*L1*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-&
          &25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*(&
          &(-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-&
          &12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)&
          &-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)*&
          &*((-m)-30)-L0*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*(&
          &(-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-&
          &19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*(&
          &(-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*&
          &((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rh&
          &o+c)**((-m)-31)
     if (deriv(i) .eq. 31) then
        L(i) = L31
        cycle
     end if
     L32 = (-L31*(m*rho)**(m+1)*(m*rho+c)**((-m)-1))-31*L30*((-m)-1)&
          &*(m*rho)**(m+1)*(m*rho+c)**((-m)-2)-465*L29*((-m)-2)*((-m)-1)*(m*&
          &rho)**(m+1)*(m*rho+c)**((-m)-3)-4495*L28*((-m)-3)*((-m)-2)*((-m)-&
          &1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-4)-31465*L27*((-m)-4)*((-m)-3)&
          &*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-5)-169911*L26*&
          &((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rh&
          &o+c)**((-m)-6)-736281*L25*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-&
          &m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-7)-2629575*L24*((-&
          &m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rh&
          &o)**(m+1)*(m*rho+c)**((-m)-8)-7888725*L23*((-m)-8)*((-m)-7)*((-m)&
          &-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(&
          &m*rho+c)**((-m)-9)-20160075*L22*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-&
          &6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m&
          &*rho+c)**((-m)-10)-44352165*L21*((-m)-10)*((-m)-9)*((-m)-8)*((-m)&
          &-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)&
          &**(m+1)*(m*rho+c)**((-m)-11)-84672315*L20*((-m)-11)*((-m)-10)*((-&
          &m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)&
          &-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-12)-141120525*L19*((&
          &-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*(&
          &(-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho&
          &+c)**((-m)-13)-206253075*L18*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-&
          &10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3&
          &)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-14)-265182525&
          &*L17*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*(&
          &(-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-&
          &m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-15)-300540195*L16*((-m)-15)&
          &*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)&
          &-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1&
          &)*(m*rho)**(m+1)*(m*rho+c)**((-m)-16)-300540195*L15*((-m)-16)*((-&
          &m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)&
          &*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*(&
          &(-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-17)-265182525*L14*((-m)-1&
          &7)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((&
          &-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-&
          &m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-18)-20625&
          &3075*L13*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-&
          &13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m&
          &)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*&
          &(m*rho+c)**((-m)-19)-141120525*L12*((-m)-19)*((-m)-18)*((-m)-17)*&
          &((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)&
          &-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-&
          &3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-20)-84672315&
          &*L11*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*&
          &((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-&
          &8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)&
          &*(m*rho)**(m+1)*(m*rho+c)**((-m)-21)-44352165*L10*((-m)-21)*((-m)&
          &-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*&
          &((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7&
          &)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**&
          &(m+1)*(m*rho+c)**((-m)-22)-20160075*L9*((-m)-22)*((-m)-21)*((-m)-&
          &20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*(&
          &(-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)&
          &*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(&
          &m+1)*(m*rho+c)**((-m)-23)-7888725*L8*((-m)-23)*((-m)-22)*((-m)-21&
          &)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-&
          &m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*&
          &((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m&
          &*rho)**(m+1)*(m*rho+c)**((-m)-24)-2629575*L7*((-m)-24)*((-m)-23)*&
          &((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)&
          &-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*&
          &((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((&
          &-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-25)-736281*L6*((-&
          &m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19&
          &)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-&
          &m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((&
          &-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+&
          &c)**((-m)-26)-169911*L5*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*(&
          &(-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-&
          &16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*(&
          &(-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-&
          &m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-27)-31465*L4*((-m)&
          &-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*&
          &((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)&
          &-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((&
          &-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*r&
          &ho)**(m+1)*(m*rho+c)**((-m)-28)-4495*L3*((-m)-28)*((-m)-27)*((-m)&
          &-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*&
          &((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)&
          &-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-&
          &m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)&
          &*(m*rho+c)**((-m)-29)-465*L2*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-&
          &26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*(&
          &(-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-&
          &13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m&
          &)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*&
          &(m*rho+c)**((-m)-30)-31*L1*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27&
          &)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-&
          &m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14&
          &)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)&
          &-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)&
          &**(m+1)*(m*rho+c)**((-m)-31)-L0*((-m)-31)*((-m)-30)*((-m)-29)*((-&
          &m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22&
          &)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-&
          &m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)&
          &*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*(&
          &(-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-32)
     if (deriv(i) .eq. 32) then
        L(i) = L32
        cycle
     end if
     L33 = (-L32*(m*rho)**(m+1)*(m*rho+c)**((-m)-1))-32*L31*((-m)-1)&
          &*(m*rho)**(m+1)*(m*rho+c)**((-m)-2)-496*L30*((-m)-2)*((-m)-1)*(m*&
          &rho)**(m+1)*(m*rho+c)**((-m)-3)-4960*L29*((-m)-3)*((-m)-2)*((-m)-&
          &1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-4)-35960*L28*((-m)-4)*((-m)-3)&
          &*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-5)-201376*L27*&
          &((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rh&
          &o+c)**((-m)-6)-906192*L26*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-&
          &m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-7)-3365856*L25*((-&
          &m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rh&
          &o)**(m+1)*(m*rho+c)**((-m)-8)-10518300*L24*((-m)-8)*((-m)-7)*((-m&
          &)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*&
          &(m*rho+c)**((-m)-9)-28048800*L23*((-m)-9)*((-m)-8)*((-m)-7)*((-m)&
          &-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(&
          &m*rho+c)**((-m)-10)-64512240*L22*((-m)-10)*((-m)-9)*((-m)-8)*((-m&
          &)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho&
          &)**(m+1)*(m*rho+c)**((-m)-11)-129024480*L21*((-m)-11)*((-m)-10)*(&
          &(-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-&
          &m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-12)-225792840*L20*&
          &((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)&
          &*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*r&
          &ho+c)**((-m)-13)-347373600*L19*((-m)-13)*((-m)-12)*((-m)-11)*((-m&
          &)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)&
          &-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-14)-4714356&
          &00*L18*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)&
          &*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*(&
          &(-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-15)-565722720*L17*((-m)-1&
          &5)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-&
          &m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)&
          &-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-16)-601080390*L16*((-m)-16)*(&
          &(-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-&
          &9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)&
          &*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-17)-565722720*L15*((-m)&
          &-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*&
          &((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*(&
          &(-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-18)-471&
          &435600*L14*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m&
          &)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((&
          &-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1&
          &)*(m*rho+c)**((-m)-19)-347373600*L13*((-m)-19)*((-m)-18)*((-m)-17&
          &)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-&
          &m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m&
          &)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-20)-225792&
          &840*L12*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-1&
          &5)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-&
          &m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)&
          &-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-21)-129024480*L11*((-m)-21)*(&
          &(-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-&
          &14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-&
          &m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rh&
          &o)**(m+1)*(m*rho+c)**((-m)-22)-64512240*L10*((-m)-22)*((-m)-21)*(&
          &(-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-&
          &14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-&
          &m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rh&
          &o)**(m+1)*(m*rho+c)**((-m)-23)-28048800*L9*((-m)-23)*((-m)-22)*((&
          &-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-1&
          &5)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-&
          &m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)&
          &-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-24)-10518300*L8*((-m)-24)*((-&
          &m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17&
          &)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-&
          &m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m&
          &)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-25)-336585&
          &6*L7*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*&
          &((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)&
          &-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-&
          &m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)&
          &*(m*rho+c)**((-m)-26)-906192*L6*((-m)-26)*((-m)-25)*((-m)-24)*((-&
          &m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17&
          &)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-&
          &m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m&
          &)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-27)-201376&
          &*L5*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*(&
          &(-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-&
          &15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((&
          &-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m&
          &)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-28)-35960*L4*((-m)-28)*((-m)&
          &-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*&
          &((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)&
          &-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((&
          &-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*r&
          &ho)**(m+1)*(m*rho+c)**((-m)-29)-4960*L3*((-m)-29)*((-m)-28)*((-m)&
          &-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*&
          &((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)&
          &-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((&
          &-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*r&
          &ho)**(m+1)*(m*rho+c)**((-m)-30)-496*L2*((-m)-30)*((-m)-29)*((-m)-&
          &28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*(&
          &(-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-&
          &15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((&
          &-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m&
          &)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-31)-32*L1*((-m)-31)*((-m)-30&
          &)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-&
          &m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17&
          &)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-&
          &m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m&
          &)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-32)-L0*((-&
          &m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26&
          &)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-&
          &m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13&
          &)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-&
          &6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m&
          &*rho+c)**((-m)-33)
     if (deriv(i) .eq. 33) then
        L(i) = L33
        cycle
     end if
     L34 = (-L33*(m*rho)**(m+1)*(m*rho+c)**((-m)-1))-33*L32*((-m)-1)&
          &*(m*rho)**(m+1)*(m*rho+c)**((-m)-2)-528*L31*((-m)-2)*((-m)-1)*(m*&
          &rho)**(m+1)*(m*rho+c)**((-m)-3)-5456*L30*((-m)-3)*((-m)-2)*((-m)-&
          &1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-4)-40920*L29*((-m)-4)*((-m)-3)&
          &*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-5)-237336*L28*&
          &((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rh&
          &o+c)**((-m)-6)-1107568*L27*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((&
          &-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-7)-4272048*L26*((&
          &-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*r&
          &ho)**(m+1)*(m*rho+c)**((-m)-8)-13884156*L25*((-m)-8)*((-m)-7)*((-&
          &m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)&
          &*(m*rho+c)**((-m)-9)-38567100*L24*((-m)-9)*((-m)-8)*((-m)-7)*((-m&
          &)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*&
          &(m*rho+c)**((-m)-10)-92561040*L23*((-m)-10)*((-m)-9)*((-m)-8)*((-&
          &m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rh&
          &o)**(m+1)*(m*rho+c)**((-m)-11)-193536720*L22*((-m)-11)*((-m)-10)*&
          &((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((&
          &-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-12)-354817320*L21&
          &*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6&
          &)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*&
          &rho+c)**((-m)-13)-573166440*L20*((-m)-13)*((-m)-12)*((-m)-11)*((-&
          &m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m&
          &)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-14)-818809&
          &200*L19*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9&
          &)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*&
          &((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-15)-1037158320*L18*((-m)&
          &-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*(&
          &(-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-&
          &m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-16)-1166803110*L17*((-m)-16&
          &)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-&
          &m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)&
          &-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-17)-1166803110*L16*(&
          &(-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-&
          &11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-&
          &4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-18)&
          &-1037158320*L15*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)&
          &*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-&
          &7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)*&
          &*(m+1)*(m*rho+c)**((-m)-19)-818809200*L14*((-m)-19)*((-m)-18)*((-&
          &m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11&
          &)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)&
          &*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-20)-5&
          &73166440*L13*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((&
          &-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9&
          &)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*&
          &((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-21)-354817320*L12*((-m)-&
          &21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*(&
          &(-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8&
          &)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*&
          &(m*rho)**(m+1)*(m*rho+c)**((-m)-22)-193536720*L11*((-m)-22)*((-m)&
          &-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*&
          &((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-&
          &8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)&
          &*(m*rho)**(m+1)*(m*rho+c)**((-m)-23)-92561040*L10*((-m)-23)*((-m)&
          &-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*&
          &((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)&
          &-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2&
          &)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-24)-38567100*L9*((-m)-&
          &24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*(&
          &(-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-&
          &11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-&
          &4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-25)&
          &-13884156*L8*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((&
          &-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-1&
          &4)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m&
          &)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho&
          &)**(m+1)*(m*rho+c)**((-m)-26)-4272048*L7*((-m)-26)*((-m)-25)*((-m&
          &)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)&
          &*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m&
          &)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m&
          &)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-2&
          &7)-1107568*L6*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*(&
          &(-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-&
          &16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*(&
          &(-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-&
          &m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-28)-237336*L5*((-m&
          &)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)&
          &*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m&
          &)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*&
          &((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((&
          &-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-29)-40920*L4*((-m)-29)*((-&
          &m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22&
          &)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-&
          &m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)&
          &*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*(&
          &(-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-30)-5456*L3*((-m)-30)*((-&
          &m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23&
          &)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-&
          &m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10&
          &)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*&
          &((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-31)-528*L2*((-m&
          &)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)&
          &*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m&
          &)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)&
          &*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)&
          &*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((&
          &-m)-32)-33*L1*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*(&
          &(-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-&
          &21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*(&
          &(-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8&
          &)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*&
          &(m*rho)**(m+1)*(m*rho+c)**((-m)-33)-L0*((-m)-33)*((-m)-32)*((-m)-&
          &31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*(&
          &(-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-&
          &18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*(&
          &(-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*(&
          &(-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m&
          &)-34)
     if (deriv(i) .eq. 34) then
        L(i) = L34
        cycle
     end if
     ! L35 = (-L34*(m*rho)**(m+1)*(m*rho+c)**((-m)-1))-34*L33*((-m)-1)&
     !      &*(m*rho)**(m+1)*(m*rho+c)**((-m)-2)-561*L32*((-m)-2)*((-m)-1)*(m*&
     !      &rho)**(m+1)*(m*rho+c)**((-m)-3)-5984*L31*((-m)-3)*((-m)-2)*((-m)-&
     !      &1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-4)-46376*L30*((-m)-4)*((-m)-3)&
     !      &*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-5)-278256*L29*&
     !      &((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rh&
     !      &o+c)**((-m)-6)-1344904*L28*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((&
     !      &-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-7)-5379616*L27*((&
     !      &-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*r&
     !      &ho)**(m+1)*(m*rho+c)**((-m)-8)-18156204*L26*((-m)-8)*((-m)-7)*((-&
     !      &m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)&
     !      &*(m*rho+c)**((-m)-9)-52451256*L25*((-m)-9)*((-m)-8)*((-m)-7)*((-m&
     !      &)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*&
     !      &(m*rho+c)**((-m)-10)-131128140*L24*((-m)-10)*((-m)-9)*((-m)-8)*((&
     !      &-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*r&
     !      &ho)**(m+1)*(m*rho+c)**((-m)-11)-286097760*L23*((-m)-11)*((-m)-10)&
     !      &*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*(&
     !      &(-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-12)-548354040*L2&
     !      &2*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-&
     !      &6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m&
     !      &*rho+c)**((-m)-13)-927983760*L21*((-m)-13)*((-m)-12)*((-m)-11)*((&
     !      &-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-&
     !      &m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-14)-13919&
     !      &75640*L20*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)&
     !      &-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2&
     !      &)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-15)-1855967520*L19*((-&
     !      &m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)&
     !      &*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*(&
     !      &(-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-16)-2203961430*L18*((-m)-&
     !      &16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*(&
     !      &(-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-&
     !      &m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-17)-2333606220*L17&
     !      &*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m&
     !      &)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m&
     !      &)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-1&
     !      &8)-2203961430*L16*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-1&
     !      &4)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m&
     !      &)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho&
     !      &)**(m+1)*(m*rho+c)**((-m)-19)-1855967520*L15*((-m)-19)*((-m)-18)*&
     !      &((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)&
     !      &-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)&
     !      &-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-20&
     !      &)-1391975640*L14*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16&
     !      &)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-&
     !      &m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)&
     !      &-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-21)-927983760*L13*((&
     !      &-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-1&
     !      &5)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-&
     !      &m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)&
     !      &-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-22)-548354040*L12*((-m)-22)*(&
     !      &(-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-&
     !      &15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((&
     !      &-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m&
     !      &)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-23)-286097760*L11*((-m)-23)*&
     !      &((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)&
     !      &-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*&
     !      &((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((&
     !      &-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-24)-131128140*L10&
     !      &*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m&
     !      &)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)&
     !      &*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)&
     !      &*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((&
     !      &-m)-25)-52451256*L9*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)&
     !      &-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*&
     !      &((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-&
     !      &8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)&
     !      &*(m*rho)**(m+1)*(m*rho+c)**((-m)-26)-18156204*L8*((-m)-26)*((-m)-&
     !      &25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*(&
     !      &(-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-&
     !      &12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)&
     !      &-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)*&
     !      &*((-m)-27)-5379616*L7*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-&
     !      &m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17&
     !      &)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-&
     !      &m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m&
     !      &)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-28)-134490&
     !      &4*L6*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*&
     !      &((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)&
     !      &-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*&
     !      &((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((&
     !      &-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-29)-278256*L5*((-&
     !      &m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23&
     !      &)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-&
     !      &m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10&
     !      &)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*&
     !      &((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-30)-46376*L4*((&
     !      &-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-2&
     !      &4)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((&
     !      &-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-1&
     !      &1)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4&
     !      &)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-31)-&
     !      &5984*L3*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-2&
     !      &6)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((&
     !      &-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-1&
     !      &3)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)&
     !      &-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(&
     !      &m*rho+c)**((-m)-32)-561*L2*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29&
     !      &)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-&
     !      &m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16&
     !      &)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-&
     !      &m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)&
     !      &-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-33)-34*L1*((-m)-33)*&
     !      &((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)&
     !      &-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*&
     !      &((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)&
     !      &-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-&
     !      &m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)&
     !      &*(m*rho+c)**((-m)-34)-L0*((-m)-34)*((-m)-33)*((-m)-32)*((-m)-31)*&
     !      &((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)&
     !      &-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*&
     !      &((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)&
     !      &-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)&
     !      &-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-35&
     !      &)
     ! if (deriv(i) .eq. 35) then
     !    L(i) = L35
     !    cycle
     ! end if
     ! L36 = (-L35*(m*rho)**(m+1)*(m*rho+c)**((-m)-1))-35*L34*((-m)-1)&
     !      &*(m*rho)**(m+1)*(m*rho+c)**((-m)-2)-595*L33*((-m)-2)*((-m)-1)*(m*&
     !      &rho)**(m+1)*(m*rho+c)**((-m)-3)-6545*L32*((-m)-3)*((-m)-2)*((-m)-&
     !      &1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-4)-52360*L31*((-m)-4)*((-m)-3)&
     !      &*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-5)-324632*L30*&
     !      &((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rh&
     !      &o+c)**((-m)-6)-1623160*L29*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((&
     !      &-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-7)-6724520*L28*((&
     !      &-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*r&
     !      &ho)**(m+1)*(m*rho+c)**((-m)-8)-23535820*L27*((-m)-8)*((-m)-7)*((-&
     !      &m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)&
     !      &*(m*rho+c)**((-m)-9)-70607460*L26*((-m)-9)*((-m)-8)*((-m)-7)*((-m&
     !      &)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*&
     !      &(m*rho+c)**((-m)-10)-183579396*L25*((-m)-10)*((-m)-9)*((-m)-8)*((&
     !      &-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*r&
     !      &ho)**(m+1)*(m*rho+c)**((-m)-11)-417225900*L24*((-m)-11)*((-m)-10)&
     !      &*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*(&
     !      &(-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-12)-834451800*L2&
     !      &3*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-&
     !      &6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m&
     !      &*rho+c)**((-m)-13)-1476337800*L22*((-m)-13)*((-m)-12)*((-m)-11)*(&
     !      &(-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((&
     !      &-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-14)-2319&
     !      &959400*L21*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m&
     !      &)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-&
     !      &2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-15)-3247943160*L20*((&
     !      &-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9&
     !      &)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*&
     !      &((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-16)-4059928950*L19*((-m)&
     !      &-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*&
     !      &((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((&
     !      &-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-17)-4537567650*L1&
     !      &8*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-&
     !      &m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-&
     !      &m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-&
     !      &18)-4537567650*L17*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-&
     !      &14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-&
     !      &m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rh&
     !      &o)**(m+1)*(m*rho+c)**((-m)-19)-4059928950*L16*((-m)-19)*((-m)-18)&
     !      &*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m&
     !      &)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m&
     !      &)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-2&
     !      &0)-3247943160*L15*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-1&
     !      &6)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((&
     !      &-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m&
     !      &)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-21)-2319959400*L14*&
     !      &((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)&
     !      &-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*(&
     !      &(-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-&
     !      &m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-22)-1476337800*L13*((-m)-22&
     !      &)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-&
     !      &m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)&
     !      &*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*(&
     !      &(-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-23)-834451800*L12*((-m)-2&
     !      &3)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((&
     !      &-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-1&
     !      &0)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)&
     !      &*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-24)-417225900*&
     !      &L11*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*(&
     !      &(-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-&
     !      &12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)&
     !      &-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)*&
     !      &*((-m)-25)-183579396*L10*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*&
     !      &((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)&
     !      &-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*(&
     !      &(-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-&
     !      &m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-26)-70607460*L9*((-m)-26)*(&
     !      &(-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-&
     !      &19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*(&
     !      &(-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*&
     !      &((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rh&
     !      &o+c)**((-m)-27)-23535820*L8*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-2&
     !      &4)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((&
     !      &-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-1&
     !      &1)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4&
     !      &)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-28)-&
     !      &6724520*L7*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m&
     !      &)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)&
     !      &*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m&
     !      &)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)&
     !      &-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-29)-1623160&
     !      &*L6*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*(&
     !      &(-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-&
     !      &17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*(&
     !      &(-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((&
     !      &-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-30)-3246&
     !      &32*L5*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)&
     !      &*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m&
     !      &)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)&
     !      &*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)&
     !      &*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((&
     !      &-m)-31)-52360*L4*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27&
     !      &)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-&
     !      &m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14&
     !      &)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)&
     !      &-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)&
     !      &**(m+1)*(m*rho+c)**((-m)-32)-6545*L3*((-m)-32)*((-m)-31)*((-m)-30&
     !      &)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-&
     !      &m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17&
     !      &)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-&
     !      &m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m&
     !      &)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-33)-595*L2&
     !      &*((-m)-33)*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m&
     !      &)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)&
     !      &*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m&
     !      &)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*(&
     !      &(-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*&
     !      &rho)**(m+1)*(m*rho+c)**((-m)-34)-35*L1*((-m)-34)*((-m)-33)*((-m)-&
     !      &32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*(&
     !      &(-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-&
     !      &19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*(&
     !      &(-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*&
     !      &((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rh&
     !      &o+c)**((-m)-35)-L0*((-m)-35)*((-m)-34)*((-m)-33)*((-m)-32)*((-m)-&
     !      &31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*(&
     !      &(-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-&
     !      &18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*(&
     !      &(-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*(&
     !      &(-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m&
     !      &)-36)
     ! if (deriv(i) .eq. 36) then
     !    L(i) = L36
     !    cycle
     ! end if
     ! L37 = (-L36*(m*rho)**(m+1)*(m*rho+c)**((-m)-1))-36*L35*((-m)-1)&
     !      &*(m*rho)**(m+1)*(m*rho+c)**((-m)-2)-630*L34*((-m)-2)*((-m)-1)*(m*&
     !      &rho)**(m+1)*(m*rho+c)**((-m)-3)-7140*L33*((-m)-3)*((-m)-2)*((-m)-&
     !      &1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-4)-58905*L32*((-m)-4)*((-m)-3)&
     !      &*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-5)-376992*L31*&
     !      &((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rh&
     !      &o+c)**((-m)-6)-1947792*L30*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((&
     !      &-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-7)-8347680*L29*((&
     !      &-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*r&
     !      &ho)**(m+1)*(m*rho+c)**((-m)-8)-30260340*L28*((-m)-8)*((-m)-7)*((-&
     !      &m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)&
     !      &*(m*rho+c)**((-m)-9)-94143280*L27*((-m)-9)*((-m)-8)*((-m)-7)*((-m&
     !      &)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*&
     !      &(m*rho+c)**((-m)-10)-254186856*L26*((-m)-10)*((-m)-9)*((-m)-8)*((&
     !      &-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*r&
     !      &ho)**(m+1)*(m*rho+c)**((-m)-11)-600805296*L25*((-m)-11)*((-m)-10)&
     !      &*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*(&
     !      &(-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-12)-1251677700*L&
     !      &24*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)&
     !      &-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(&
     !      &m*rho+c)**((-m)-13)-2310789600*L23*((-m)-13)*((-m)-12)*((-m)-11)*&
     !      &((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*(&
     !      &(-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-14)-379&
     !      &6297200*L22*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-&
     !      &m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)&
     !      &-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-15)-5567902560*L21*(&
     !      &(-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-&
     !      &9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)&
     !      &*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-16)-7307872110*L20*((-m&
     !      &)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)&
     !      &*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*(&
     !      &(-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-17)-8597496600*L&
     !      &19*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((&
     !      &-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((&
     !      &-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)&
     !      &-18)-9075135300*L18*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)&
     !      &-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((&
     !      &-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*r&
     !      &ho)**(m+1)*(m*rho+c)**((-m)-19)-8597496600*L17*((-m)-19)*((-m)-18&
     !      &)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-&
     !      &m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-&
     !      &m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-&
     !      &20)-7307872110*L16*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-&
     !      &16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*(&
     !      &(-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-&
     !      &m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-21)-5567902560*L15&
     !      &*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m&
     !      &)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*&
     !      &((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((&
     !      &-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-22)-3796297200*L14*((-m)-2&
     !      &2)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((&
     !      &-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9&
     !      &)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*&
     !      &((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-23)-2310789600*L13*((-m)&
     !      &-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*&
     !      &((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)&
     !      &-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-&
     !      &3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-24)-12516777&
     !      &00*L12*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19&
     !      &)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-&
     !      &m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((&
     !      &-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+&
     !      &c)**((-m)-25)-600805296*L11*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-2&
     !      &2)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((&
     !      &-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9&
     !      &)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*&
     !      &((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-26)-254186856*L10*((-m)-&
     !      &26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*(&
     !      &(-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-&
     !      &13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m&
     !      &)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*&
     !      &(m*rho+c)**((-m)-27)-94143280*L9*((-m)-27)*((-m)-26)*((-m)-25)*((&
     !      &-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-1&
     !      &8)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((&
     !      &-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((&
     !      &-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)&
     !      &-28)-30260340*L8*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24&
     !      &)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-&
     !      &m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11&
     !      &)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)&
     !      &*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-29)-8&
     !      &347680*L7*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)&
     !      &-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*&
     !      &((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)&
     !      &-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)&
     !      &-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-30&
     !      &)-1947792*L6*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((&
     !      &-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-1&
     !      &9)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((&
     !      &-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*(&
     !      &(-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho&
     !      &+c)**((-m)-31)-376992*L5*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*&
     !      &((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)&
     !      &-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*&
     !      &((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-&
     !      &8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)&
     !      &*(m*rho)**(m+1)*(m*rho+c)**((-m)-32)-58905*L4*((-m)-32)*((-m)-31)&
     !      &*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m&
     !      &)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)&
     !      &*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m&
     !      &)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m&
     !      &)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-3&
     !      &3)-7140*L3*((-m)-33)*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m&
     !      &)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)&
     !      &*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m&
     !      &)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*&
     !      &((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((&
     !      &-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-34)-630*L2*((-m)-34)*((-m)&
     !      &-33)*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*&
     !      &((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)&
     !      &-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*&
     !      &((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7&
     !      &)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**&
     !      &(m+1)*(m*rho+c)**((-m)-35)-36*L1*((-m)-35)*((-m)-34)*((-m)-33)*((&
     !      &-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-2&
     !      &6)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((&
     !      &-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-1&
     !      &3)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)&
     !      &-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(&
     !      &m*rho+c)**((-m)-36)-L0*((-m)-36)*((-m)-35)*((-m)-34)*((-m)-33)*((&
     !      &-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-2&
     !      &6)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((&
     !      &-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-1&
     !      &3)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)&
     !      &-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(&
     !      &m*rho+c)**((-m)-37)
     ! if (deriv(i) .eq. 37) then
     !    L(i) = L37
     !    cycle
     ! end if
     ! L38 = (-L37*(m*rho)**(m+1)*(m*rho+c)**((-m)-1))-37*L36*((-m)-1)&
     !      &*(m*rho)**(m+1)*(m*rho+c)**((-m)-2)-666*L35*((-m)-2)*((-m)-1)*(m*&
     !      &rho)**(m+1)*(m*rho+c)**((-m)-3)-7770*L34*((-m)-3)*((-m)-2)*((-m)-&
     !      &1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-4)-66045*L33*((-m)-4)*((-m)-3)&
     !      &*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-5)-435897*L32*&
     !      &((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rh&
     !      &o+c)**((-m)-6)-2324784*L31*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((&
     !      &-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-7)-10295472*L30*(&
     !      &(-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*&
     !      &rho)**(m+1)*(m*rho+c)**((-m)-8)-38608020*L29*((-m)-8)*((-m)-7)*((&
     !      &-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1&
     !      &)*(m*rho+c)**((-m)-9)-124403620*L28*((-m)-9)*((-m)-8)*((-m)-7)*((&
     !      &-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1&
     !      &)*(m*rho+c)**((-m)-10)-348330136*L27*((-m)-10)*((-m)-9)*((-m)-8)*&
     !      &((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m&
     !      &*rho)**(m+1)*(m*rho+c)**((-m)-11)-854992152*L26*((-m)-11)*((-m)-1&
     !      &0)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)&
     !      &*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-12)-1852482996&
     !      &*L25*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-&
     !      &m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)&
     !      &*(m*rho+c)**((-m)-13)-3562467300*L24*((-m)-13)*((-m)-12)*((-m)-11&
     !      &)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)&
     !      &*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-14)-6&
     !      &107086800*L23*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*(&
     !      &(-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-&
     !      &m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-15)-9364199760*L22&
     !      &*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m&
     !      &)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-&
     !      &2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-16)-12875774670*L21*(&
     !      &(-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-&
     !      &10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3&
     !      &)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-17)-159053687&
     !      &10*L20*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12&
     !      &)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5&
     !      &)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**(&
     !      &(-m)-18)-17672631900*L19*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*&
     !      &((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-&
     !      &8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)&
     !      &*(m*rho)**(m+1)*(m*rho+c)**((-m)-19)-17672631900*L18*((-m)-19)*((&
     !      &-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-1&
     !      &2)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-&
     !      &5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**&
     !      &((-m)-20)-15905368710*L17*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)&
     !      &*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m&
     !      &)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)&
     !      &-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-21)-1287577&
     !      &4670*L16*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-&
     !      &16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*(&
     !      &(-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-&
     !      &m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-22)-9364199760*L15&
     !      &*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m&
     !      &)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)&
     !      &*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*(&
     !      &(-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-23)-6107086800*L&
     !      &14*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((&
     !      &-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-1&
     !      &1)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4&
     !      &)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-24)-&
     !      &3562467300*L13*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*&
     !      &((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)&
     !      &-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-&
     !      &m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)&
     !      &*(m*rho+c)**((-m)-25)-1852482996*L12*((-m)-25)*((-m)-24)*((-m)-23&
     !      &)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-&
     !      &m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10&
     !      &)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*&
     !      &((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-26)-854992152*L&
     !      &11*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((&
     !      &-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-1&
     !      &4)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m&
     !      &)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho&
     !      &)**(m+1)*(m*rho+c)**((-m)-27)-348330136*L10*((-m)-27)*((-m)-26)*(&
     !      &(-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-&
     !      &19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*(&
     !      &(-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*&
     !      &((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rh&
     !      &o+c)**((-m)-28)-124403620*L9*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-&
     !      &25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*(&
     !      &(-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-&
     !      &12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)&
     !      &-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)*&
     !      &*((-m)-29)-38608020*L8*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((&
     !      &-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-1&
     !      &9)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((&
     !      &-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*(&
     !      &(-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho&
     !      &+c)**((-m)-30)-10295472*L7*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27&
     !      &)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-&
     !      &m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14&
     !      &)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)&
     !      &-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)&
     !      &**(m+1)*(m*rho+c)**((-m)-31)-2324784*L6*((-m)-31)*((-m)-30)*((-m)&
     !      &-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*&
     !      &((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)&
     !      &-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*&
     !      &((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((&
     !      &-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-32)-435897*L5*((-&
     !      &m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26&
     !      &)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-&
     !      &m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13&
     !      &)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-&
     !      &6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m&
     !      &*rho+c)**((-m)-33)-66045*L4*((-m)-33)*((-m)-32)*((-m)-31)*((-m)-3&
     !      &0)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((&
     !      &-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-1&
     !      &7)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((&
     !      &-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-&
     !      &m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-34)-7770*&
     !      &L3*((-m)-34)*((-m)-33)*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((&
     !      &-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-2&
     !      &2)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((&
     !      &-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9&
     !      &)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*&
     !      &((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-35)-666*L2*((-m)-35)*((-&
     !      &m)-34)*((-m)-33)*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28&
     !      &)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-&
     !      &m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15&
     !      &)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m&
     !      &)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-&
     !      &1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-36)-37*L1*((-m)-36)*((-m)-35)*&
     !      &((-m)-34)*((-m)-33)*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)&
     !      &-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*&
     !      &((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)&
     !      &-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*(&
     !      &(-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-&
     !      &m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-37)-L0*((-m)-37)*((-m)-36)*&
     !      &((-m)-35)*((-m)-34)*((-m)-33)*((-m)-32)*((-m)-31)*((-m)-30)*((-m)&
     !      &-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*&
     !      &((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)&
     !      &-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*&
     !      &((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((&
     !      &-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-38)
     ! if (deriv(i) .eq. 38) then
     !    L(i) = L38
     !    cycle
     ! end if
     ! L39 = (-L38*(m*rho)**(m+1)*(m*rho+c)**((-m)-1))-38*L37*((-m)-1)&
     !      &*(m*rho)**(m+1)*(m*rho+c)**((-m)-2)-703*L36*((-m)-2)*((-m)-1)*(m*&
     !      &rho)**(m+1)*(m*rho+c)**((-m)-3)-8436*L35*((-m)-3)*((-m)-2)*((-m)-&
     !      &1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-4)-73815*L34*((-m)-4)*((-m)-3)&
     !      &*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-5)-501942*L33*&
     !      &((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rh&
     !      &o+c)**((-m)-6)-2760681*L32*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((&
     !      &-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-7)-12620256*L31*(&
     !      &(-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*&
     !      &rho)**(m+1)*(m*rho+c)**((-m)-8)-48903492*L30*((-m)-8)*((-m)-7)*((&
     !      &-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1&
     !      &)*(m*rho+c)**((-m)-9)-163011640*L29*((-m)-9)*((-m)-8)*((-m)-7)*((&
     !      &-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1&
     !      &)*(m*rho+c)**((-m)-10)-472733756*L28*((-m)-10)*((-m)-9)*((-m)-8)*&
     !      &((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m&
     !      &*rho)**(m+1)*(m*rho+c)**((-m)-11)-1203322288*L27*((-m)-11)*((-m)-&
     !      &10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3&
     !      &)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-12)-270747514&
     !      &8*L26*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((&
     !      &-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1&
     !      &)*(m*rho+c)**((-m)-13)-5414950296*L25*((-m)-13)*((-m)-12)*((-m)-1&
     !      &1)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4&
     !      &)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-14)-&
     !      &9669554100*L24*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*&
     !      &((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((&
     !      &-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-15)-15471286560*L&
     !      &23*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((&
     !      &-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m&
     !      &)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-16)-22239974430*L22&
     !      &*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m&
     !      &)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)&
     !      &-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-17)-2878114&
     !      &3380*L21*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-&
     !      &12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)&
     !      &-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)*&
     !      &*((-m)-18)-33578000610*L20*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15&
     !      &)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m&
     !      &)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-&
     !      &1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-19)-35345263800*L19*((-m)-19)*&
     !      &((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)&
     !      &-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m&
     !      &)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)&
     !      &**((-m)-20)-33578000610*L18*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-1&
     !      &7)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((&
     !      &-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-&
     !      &m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-21)-28781&
     !      &143380*L17*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m&
     !      &)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)&
     !      &*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*(&
     !      &(-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-22)-22239974430*&
     !      &L16*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*(&
     !      &(-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-&
     !      &10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3&
     !      &)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-23)-154712865&
     !      &60*L15*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18&
     !      &)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-&
     !      &m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-&
     !      &m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-&
     !      &24)-9669554100*L14*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-&
     !      &20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*(&
     !      &(-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)&
     !      &*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(&
     !      &m+1)*(m*rho+c)**((-m)-25)-5414950296*L13*((-m)-25)*((-m)-24)*((-m&
     !      &)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)&
     !      &*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m&
     !      &)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)&
     !      &-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-26)-2707475&
     !      &148*L12*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-2&
     !      &1)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((&
     !      &-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)&
     !      &*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(&
     !      &m*rho)**(m+1)*(m*rho+c)**((-m)-27)-1203322288*L11*((-m)-27)*((-m)&
     !      &-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*&
     !      &((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)&
     !      &-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-&
     !      &m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)&
     !      &*(m*rho+c)**((-m)-28)-472733756*L10*((-m)-28)*((-m)-27)*((-m)-26)&
     !      &*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m&
     !      &)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)&
     !      &*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6&
     !      &)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*&
     !      &rho+c)**((-m)-29)-163011640*L9*((-m)-29)*((-m)-28)*((-m)-27)*((-m&
     !      &)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)&
     !      &*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m&
     !      &)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((&
     !      &-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1&
     !      &)*(m*rho+c)**((-m)-30)-48903492*L8*((-m)-30)*((-m)-29)*((-m)-28)*&
     !      &((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)&
     !      &-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*&
     !      &((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-&
     !      &8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)&
     !      &*(m*rho)**(m+1)*(m*rho+c)**((-m)-31)-12620256*L7*((-m)-31)*((-m)-&
     !      &30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*(&
     !      &(-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-&
     !      &17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*(&
     !      &(-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((&
     !      &-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-32)-2760&
     !      &681*L6*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27&
     !      &)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-&
     !      &m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14&
     !      &)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)&
     !      &-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)&
     !      &**(m+1)*(m*rho+c)**((-m)-33)-501942*L5*((-m)-33)*((-m)-32)*((-m)-&
     !      &31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*(&
     !      &(-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-&
     !      &18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*(&
     !      &(-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*(&
     !      &(-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m&
     !      &)-34)-73815*L4*((-m)-34)*((-m)-33)*((-m)-32)*((-m)-31)*((-m)-30)*&
     !      &((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)&
     !      &-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*&
     !      &((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)&
     !      &-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-&
     !      &3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-35)-8436*L3*&
     !      &((-m)-35)*((-m)-34)*((-m)-33)*((-m)-32)*((-m)-31)*((-m)-30)*((-m)&
     !      &-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*&
     !      &((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)&
     !      &-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*&
     !      &((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((&
     !      &-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-36)-703*L2*((-m)-&
     !      &36)*((-m)-35)*((-m)-34)*((-m)-33)*((-m)-32)*((-m)-31)*((-m)-30)*(&
     !      &(-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-&
     !      &23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*(&
     !      &(-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-&
     !      &10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3&
     !      &)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-37)-38*L1*((-&
     !      &m)-37)*((-m)-36)*((-m)-35)*((-m)-34)*((-m)-33)*((-m)-32)*((-m)-31&
     !      &)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-&
     !      &m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18&
     !      &)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-&
     !      &m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-&
     !      &m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-&
     !      &38)-L0*((-m)-38)*((-m)-37)*((-m)-36)*((-m)-35)*((-m)-34)*((-m)-33&
     !      &)*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-&
     !      &m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20&
     !      &)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-&
     !      &m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*(&
     !      &(-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+&
     !      &1)*(m*rho+c)**((-m)-39)
     ! if (deriv(i) .eq. 39) then
     !    L(i) = L39
     !    cycle
     ! end if
     ! L40 = (-L39*(m*rho)**(m+1)*(m*rho+c)**((-m)-1))-39*L38*((-m)-1)&
     !      &*(m*rho)**(m+1)*(m*rho+c)**((-m)-2)-741*L37*((-m)-2)*((-m)-1)*(m*&
     !      &rho)**(m+1)*(m*rho+c)**((-m)-3)-9139*L36*((-m)-3)*((-m)-2)*((-m)-&
     !      &1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-4)-82251*L35*((-m)-4)*((-m)-3)&
     !      &*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-5)-575757*L34*&
     !      &((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rh&
     !      &o+c)**((-m)-6)-3262623*L33*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((&
     !      &-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-7)-15380937*L32*(&
     !      &(-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*&
     !      &rho)**(m+1)*(m*rho+c)**((-m)-8)-61523748*L31*((-m)-8)*((-m)-7)*((&
     !      &-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1&
     !      &)*(m*rho+c)**((-m)-9)-211915132*L30*((-m)-9)*((-m)-8)*((-m)-7)*((&
     !      &-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1&
     !      &)*(m*rho+c)**((-m)-10)-635745396*L29*((-m)-10)*((-m)-9)*((-m)-8)*&
     !      &((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m&
     !      &*rho)**(m+1)*(m*rho+c)**((-m)-11)-1676056044*L28*((-m)-11)*((-m)-&
     !      &10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3&
     !      &)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-12)-391079743&
     !      &6*L27*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((&
     !      &-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1&
     !      &)*(m*rho+c)**((-m)-13)-8122425444*L26*((-m)-13)*((-m)-12)*((-m)-1&
     !      &1)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4&
     !      &)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-14)-&
     !      &15084504396*L25*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)&
     !      &*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*(&
     !      &(-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-15)-25140840660*&
     !      &L24*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*(&
     !      &(-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-&
     !      &m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-16)-37711260990*L2&
     !      &3*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-&
     !      &m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m&
     !      &)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-17)-510211&
     !      &17810*L22*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)&
     !      &-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m&
     !      &)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)&
     !      &**((-m)-18)-62359143990*L21*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-1&
     !      &5)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-&
     !      &m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)&
     !      &-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-19)-68923264410*L20*((-m)-19)&
     !      &*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m&
     !      &)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-&
     !      &m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c&
     !      &)**((-m)-20)-68923264410*L19*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-&
     !      &17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*(&
     !      &(-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((&
     !      &-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-21)-6235&
     !      &9143990*L18*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-&
     !      &m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10&
     !      &)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*&
     !      &((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-22)-51021117810&
     !      &*L17*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*&
     !      &((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)&
     !      &-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-&
     !      &3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-23)-37711260&
     !      &990*L16*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-1&
     !      &8)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((&
     !      &-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((&
     !      &-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)&
     !      &-24)-25140840660*L15*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m&
     !      &)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)&
     !      &*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-&
     !      &7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)*&
     !      &*(m+1)*(m*rho+c)**((-m)-25)-15084504396*L14*((-m)-25)*((-m)-24)*(&
     !      &(-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-&
     !      &17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*(&
     !      &(-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((&
     !      &-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-26)-8122&
     !      &425444*L13*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m&
     !      &)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)&
     !      &*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)&
     !      &-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1&
     !      &)*(m*rho)**(m+1)*(m*rho+c)**((-m)-27)-3910797436*L12*((-m)-27)*((&
     !      &-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-2&
     !      &0)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((&
     !      &-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*&
     !      &((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m&
     !      &+1)*(m*rho+c)**((-m)-28)-1676056044*L11*((-m)-28)*((-m)-27)*((-m)&
     !      &-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*&
     !      &((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)&
     !      &-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-&
     !      &m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)&
     !      &*(m*rho+c)**((-m)-29)-635745396*L10*((-m)-29)*((-m)-28)*((-m)-27)&
     !      &*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m&
     !      &)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)&
     !      &*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-&
     !      &7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)*&
     !      &*(m+1)*(m*rho+c)**((-m)-30)-211915132*L9*((-m)-30)*((-m)-29)*((-m&
     !      &)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)&
     !      &*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m&
     !      &)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*&
     !      &((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((&
     !      &-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-31)-61523748*L8*((-m)-31)*&
     !      &((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)&
     !      &-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*&
     !      &((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)&
     !      &-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)&
     !      &-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-32&
     !      &)-15380937*L7*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*(&
     !      &(-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-&
     !      &21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*(&
     !      &(-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8&
     !      &)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*&
     !      &(m*rho)**(m+1)*(m*rho+c)**((-m)-33)-3262623*L6*((-m)-33)*((-m)-32&
     !      &)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-&
     !      &m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19&
     !      &)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-&
     !      &m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((&
     !      &-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+&
     !      &c)**((-m)-34)-575757*L5*((-m)-34)*((-m)-33)*((-m)-32)*((-m)-31)*(&
     !      &(-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-&
     !      &24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*(&
     !      &(-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-&
     !      &11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-&
     !      &4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-35)&
     !      &-82251*L4*((-m)-35)*((-m)-34)*((-m)-33)*((-m)-32)*((-m)-31)*((-m)&
     !      &-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*&
     !      &((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)&
     !      &-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*&
     !      &((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*(&
     !      &(-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-36)-913&
     !      &9*L3*((-m)-36)*((-m)-35)*((-m)-34)*((-m)-33)*((-m)-32)*((-m)-31)*&
     !      &((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)&
     !      &-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*&
     !      &((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)&
     !      &-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)&
     !      &-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-37&
     !      &)-741*L2*((-m)-37)*((-m)-36)*((-m)-35)*((-m)-34)*((-m)-33)*((-m)-&
     !      &32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*(&
     !      &(-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-&
     !      &19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*(&
     !      &(-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*&
     !      &((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rh&
     !      &o+c)**((-m)-38)-39*L1*((-m)-38)*((-m)-37)*((-m)-36)*((-m)-35)*((-&
     !      &m)-34)*((-m)-33)*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28&
     !      &)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-&
     !      &m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15&
     !      &)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m&
     !      &)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-&
     !      &1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-39)-L0*((-m)-39)*((-m)-38)*((-&
     !      &m)-37)*((-m)-36)*((-m)-35)*((-m)-34)*((-m)-33)*((-m)-32)*((-m)-31&
     !      &)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-&
     !      &m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18&
     !      &)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-&
     !      &m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-&
     !      &m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-&
     !      &40)
     ! if (deriv(i) .eq. 40) then
     !    L(i) = L40
     !    cycle
     ! end if
     ! L41 = (-L40*(m*rho)**(m+1)*(m*rho+c)**((-m)-1))-40*L39*((-m)-1)&
     ! &*(m*rho)**(m+1)*(m*rho+c)**((-m)-2)-780*L38*((-m)-2)*((-m)-1)*(m*&
     ! &rho)**(m+1)*(m*rho+c)**((-m)-3)-9880*L37*((-m)-3)*((-m)-2)*((-m)-&
     ! &1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-4)-91390*L36*((-m)-4)*((-m)-3)&
     ! &*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-5)-658008*L35*&
     ! &((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rh&
     ! &o+c)**((-m)-6)-3838380*L34*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((&
     ! &-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-7)-18643560*L33*(&
     ! &(-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*&
     ! &rho)**(m+1)*(m*rho+c)**((-m)-8)-76904685*L32*((-m)-8)*((-m)-7)*((&
     ! &-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1&
     ! &)*(m*rho+c)**((-m)-9)-273438880*L31*((-m)-9)*((-m)-8)*((-m)-7)*((&
     ! &-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1&
     ! &)*(m*rho+c)**((-m)-10)-847660528*L30*((-m)-10)*((-m)-9)*((-m)-8)*&
     ! &((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m&
     ! &*rho)**(m+1)*(m*rho+c)**((-m)-11)-2311801440*L29*((-m)-11)*((-m)-&
     ! &10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3&
     ! &)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-12)-558685348&
     ! &0*L28*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((&
     ! &-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1&
     ! &)*(m*rho+c)**((-m)-13)-12033222880*L27*((-m)-13)*((-m)-12)*((-m)-&
     ! &11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-&
     ! &4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-14)&
     ! &-23206929840*L26*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10&
     ! &)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*&
     ! &((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-15)-40225345056&
     ! &*L25*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*&
     ! &((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((&
     ! &-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-16)-62852101650*L&
     ! &24*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((&
     ! &-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-&
     ! &m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-17)-88732&
     ! &378800*L23*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m&
     ! &)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-&
     ! &m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c&
     ! &)**((-m)-18)-113380261800*L22*((-m)-18)*((-m)-17)*((-m)-16)*((-m)&
     ! &-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*(&
     ! &(-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-&
     ! &m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-19)-131282408400*L21*((-m)-&
     ! &19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*(&
     ! &(-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*&
     ! &((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rh&
     ! &o+c)**((-m)-20)-137846528820*L20*((-m)-20)*((-m)-19)*((-m)-18)*((&
     ! &-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-1&
     ! &1)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4&
     ! &)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-21)-&
     ! &131282408400*L19*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17&
     ! &)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-&
     ! &m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m&
     ! &)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-22)-113380&
     ! &261800*L18*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m&
     ! &)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)&
     ! &*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*&
     ! &((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-23)-88&
     ! &732378800*L17*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*(&
     ! &(-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-&
     ! &12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)&
     ! &-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)*&
     ! &*((-m)-24)-62852101650*L16*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21&
     ! &)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-&
     ! &m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*&
     ! &((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m&
     ! &*rho)**(m+1)*(m*rho+c)**((-m)-25)-40225345056*L15*((-m)-25)*((-m)&
     ! &-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*&
     ! &((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)&
     ! &-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)&
     ! &-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-26&
     ! &)-23206929840*L14*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-2&
     ! &2)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((&
     ! &-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9&
     ! &)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*&
     ! &((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-27)-12033222880*L13*((-m&
     ! &)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)&
     ! &*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m&
     ! &)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*(&
     ! &(-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*&
     ! &rho)**(m+1)*(m*rho+c)**((-m)-28)-5586853480*L12*((-m)-28)*((-m)-2&
     ! &7)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((&
     ! &-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-1&
     ! &4)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m&
     ! &)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho&
     ! &)**(m+1)*(m*rho+c)**((-m)-29)-2311801440*L11*((-m)-29)*((-m)-28)*&
     ! &((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)&
     ! &-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*&
     ! &((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-&
     ! &8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)&
     ! &*(m*rho)**(m+1)*(m*rho+c)**((-m)-30)-847660528*L10*((-m)-30)*((-m&
     ! &)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)&
     ! &*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m&
     ! &)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)&
     ! &*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*(&
     ! &(-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-31)-273438880*L9&
     ! &*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m&
     ! &)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)&
     ! &*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m&
     ! &)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-&
     ! &m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c&
     ! &)**((-m)-32)-76904685*L8*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*&
     ! &((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)&
     ! &-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*&
     ! &((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)&
     ! &-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2&
     ! &)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-33)-18643560*L7*((-m)-&
     ! &33)*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*(&
     ! &(-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-&
     ! &20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*(&
     ! &(-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)&
     ! &*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(&
     ! &m+1)*(m*rho+c)**((-m)-34)-3838380*L6*((-m)-34)*((-m)-33)*((-m)-32&
     ! &)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-&
     ! &m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19&
     ! &)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-&
     ! &m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((&
     ! &-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+&
     ! &c)**((-m)-35)-658008*L5*((-m)-35)*((-m)-34)*((-m)-33)*((-m)-32)*(&
     ! &(-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-&
     ! &25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*(&
     ! &(-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-&
     ! &12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)&
     ! &-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)*&
     ! &*((-m)-36)-91390*L4*((-m)-36)*((-m)-35)*((-m)-34)*((-m)-33)*((-m)&
     ! &-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*&
     ! &((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)&
     ! &-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*&
     ! &((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)&
     ! &*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*r&
     ! &ho+c)**((-m)-37)-9880*L3*((-m)-37)*((-m)-36)*((-m)-35)*((-m)-34)*&
     ! &((-m)-33)*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)&
     ! &-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*&
     ! &((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)&
     ! &-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((&
     ! &-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*r&
     ! &ho)**(m+1)*(m*rho+c)**((-m)-38)-780*L2*((-m)-38)*((-m)-37)*((-m)-&
     ! &36)*((-m)-35)*((-m)-34)*((-m)-33)*((-m)-32)*((-m)-31)*((-m)-30)*(&
     ! &(-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-&
     ! &23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*(&
     ! &(-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-&
     ! &10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3&
     ! &)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-39)-40*L1*((-&
     ! &m)-39)*((-m)-38)*((-m)-37)*((-m)-36)*((-m)-35)*((-m)-34)*((-m)-33&
     ! &)*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-&
     ! &m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20&
     ! &)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-&
     ! &m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*(&
     ! &(-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+&
     ! &1)*(m*rho+c)**((-m)-40)-L0*((-m)-40)*((-m)-39)*((-m)-38)*((-m)-37&
     ! &)*((-m)-36)*((-m)-35)*((-m)-34)*((-m)-33)*((-m)-32)*((-m)-31)*((-&
     ! &m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24&
     ! &)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-&
     ! &m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11&
     ! &)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)&
     ! &*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-41)
     !      if (deriv(i) .eq. 41) then
     !         L(i) = L41
     !         cycle
     !      end if
     ! L42 = (-L41*(m*rho)**(m+1)*(m*rho+c)**((-m)-1))-41*L40*((-m)-1)&
     ! &*(m*rho)**(m+1)*(m*rho+c)**((-m)-2)-820*L39*((-m)-2)*((-m)-1)*(m*&
     ! &rho)**(m+1)*(m*rho+c)**((-m)-3)-10660*L38*((-m)-3)*((-m)-2)*((-m)&
     ! &-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-4)-101270*L37*((-m)-4)*((-m)-&
     ! &3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-5)-749398*L3&
     ! &6*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*&
     ! &rho+c)**((-m)-6)-4496388*L35*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*&
     ! &((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-7)-22481940*L34&
     ! &*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(&
     ! &m*rho)**(m+1)*(m*rho+c)**((-m)-8)-95548245*L33*((-m)-8)*((-m)-7)*&
     ! &((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m&
     ! &+1)*(m*rho+c)**((-m)-9)-350343565*L32*((-m)-9)*((-m)-8)*((-m)-7)*&
     ! &((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m&
     ! &+1)*(m*rho+c)**((-m)-10)-1121099408*L31*((-m)-10)*((-m)-9)*((-m)-&
     ! &8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)&
     ! &*(m*rho)**(m+1)*(m*rho+c)**((-m)-11)-3159461968*L30*((-m)-11)*((-&
     ! &m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m&
     ! &)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-12)-789865&
     ! &4920*L29*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)&
     ! &*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(&
     ! &m+1)*(m*rho+c)**((-m)-13)-17620076360*L28*((-m)-13)*((-m)-12)*((-&
     ! &m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-&
     ! &m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-&
     ! &14)-35240152720*L27*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)&
     ! &-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-&
     ! &3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-15)-63432274&
     ! &896*L26*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-1&
     ! &0)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)&
     ! &*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-16)-1030774467&
     ! &06*L25*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11&
     ! &)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)&
     ! &*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-17)-1&
     ! &51584480450*L24*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)&
     ! &*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6&
     ! &)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*&
     ! &rho+c)**((-m)-18)-202112640600*L23*((-m)-18)*((-m)-17)*((-m)-16)*&
     ! &((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)&
     ! &-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2&
     ! &)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-19)-244662670200*L22*(&
     ! &(-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-&
     ! &13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m&
     ! &)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*&
     ! &(m*rho+c)**((-m)-20)-269128937220*L21*((-m)-20)*((-m)-19)*((-m)-1&
     ! &8)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((&
     ! &-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((&
     ! &-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)&
     ! &-21)-269128937220*L20*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-&
     ! &m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11&
     ! &)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)&
     ! &*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-22)-2&
     ! &44662670200*L19*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)&
     ! &*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m&
     ! &)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m&
     ! &)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-2&
     ! &3)-202112640600*L18*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)&
     ! &-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*&
     ! &((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)&
     ! &*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*r&
     ! &ho+c)**((-m)-24)-151584480450*L17*((-m)-24)*((-m)-23)*((-m)-22)*(&
     ! &(-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-&
     ! &15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((&
     ! &-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m&
     ! &)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-25)-103077446706*L16*((-m)-2&
     ! &5)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((&
     ! &-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-1&
     ! &2)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-&
     ! &5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**&
     ! &((-m)-26)-63432274896*L15*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)&
     ! &*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m&
     ! &)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)&
     ! &*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*(&
     ! &(-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-27)-35240152720*&
     ! &L14*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*(&
     ! &(-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-&
     ! &15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((&
     ! &-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m&
     ! &)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-28)-17620076360*L13*((-m)-28&
     ! &)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-&
     ! &m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15&
     ! &)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m&
     ! &)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-&
     ! &1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-29)-7898654920*L12*((-m)-29)*(&
     ! &(-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-&
     ! &22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*(&
     ! &(-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-&
     ! &9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)&
     ! &*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-30)-3159461968*L11*((-m&
     ! &)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)&
     ! &*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m&
     ! &)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)&
     ! &*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*&
     ! &((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-31)-11&
     ! &21099408*L10*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((&
     ! &-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-2&
     ! &0)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((&
     ! &-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*&
     ! &((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m&
     ! &+1)*(m*rho+c)**((-m)-32)-350343565*L9*((-m)-32)*((-m)-31)*((-m)-3&
     ! &0)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((&
     ! &-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-1&
     ! &7)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((&
     ! &-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-&
     ! &m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-33)-95548&
     ! &245*L8*((-m)-33)*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28&
     ! &)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-&
     ! &m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15&
     ! &)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m&
     ! &)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-&
     ! &1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-34)-22481940*L7*((-m)-34)*((-m&
     ! &)-33)*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)&
     ! &*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m&
     ! &)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)&
     ! &*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-&
     ! &7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)*&
     ! &*(m+1)*(m*rho+c)**((-m)-35)-4496388*L6*((-m)-35)*((-m)-34)*((-m)-&
     ! &33)*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*(&
     ! &(-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-&
     ! &20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*(&
     ! &(-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)&
     ! &*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(&
     ! &m+1)*(m*rho+c)**((-m)-36)-749398*L5*((-m)-36)*((-m)-35)*((-m)-34)&
     ! &*((-m)-33)*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m&
     ! &)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)&
     ! &*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m&
     ! &)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*(&
     ! &(-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*&
     ! &rho)**(m+1)*(m*rho+c)**((-m)-37)-101270*L4*((-m)-37)*((-m)-36)*((&
     ! &-m)-35)*((-m)-34)*((-m)-33)*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-2&
     ! &9)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((&
     ! &-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-1&
     ! &6)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((&
     ! &-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m&
     ! &)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-38)-10660*L3*((-m)-&
     ! &38)*((-m)-37)*((-m)-36)*((-m)-35)*((-m)-34)*((-m)-33)*((-m)-32)*(&
     ! &(-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-&
     ! &25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*(&
     ! &(-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-&
     ! &12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)&
     ! &-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)*&
     ! &*((-m)-39)-820*L2*((-m)-39)*((-m)-38)*((-m)-37)*((-m)-36)*((-m)-3&
     ! &5)*((-m)-34)*((-m)-33)*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((&
     ! &-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-2&
     ! &2)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((&
     ! &-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9&
     ! &)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*&
     ! &((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-40)-41*L1*((-m)-40)*((-m&
     ! &)-39)*((-m)-38)*((-m)-37)*((-m)-36)*((-m)-35)*((-m)-34)*((-m)-33)&
     ! &*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m&
     ! &)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)&
     ! &*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m&
     ! &)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((&
     ! &-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1&
     ! &)*(m*rho+c)**((-m)-41)-L0*((-m)-41)*((-m)-40)*((-m)-39)*((-m)-38)&
     ! &*((-m)-37)*((-m)-36)*((-m)-35)*((-m)-34)*((-m)-33)*((-m)-32)*((-m&
     ! &)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)&
     ! &*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m&
     ! &)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)&
     ! &*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)&
     ! &*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((&
     ! &-m)-42)
     !      if (deriv(i) .eq. 42) then
     !         L(i) = L42
     !         cycle
     !      end if
     ! L43 = (-L42*(m*rho)**(m+1)*(m*rho+c)**((-m)-1))-42*L41*((-m)-1)&
     ! &*(m*rho)**(m+1)*(m*rho+c)**((-m)-2)-861*L40*((-m)-2)*((-m)-1)*(m*&
     ! &rho)**(m+1)*(m*rho+c)**((-m)-3)-11480*L39*((-m)-3)*((-m)-2)*((-m)&
     ! &-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-4)-111930*L38*((-m)-4)*((-m)-&
     ! &3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-5)-850668*L3&
     ! &7*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*&
     ! &rho+c)**((-m)-6)-5245786*L36*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*&
     ! &((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-7)-26978328*L35&
     ! &*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(&
     ! &m*rho)**(m+1)*(m*rho+c)**((-m)-8)-118030185*L34*((-m)-8)*((-m)-7)&
     ! &*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(&
     ! &m+1)*(m*rho+c)**((-m)-9)-445891810*L33*((-m)-9)*((-m)-8)*((-m)-7)&
     ! &*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(&
     ! &m+1)*(m*rho+c)**((-m)-10)-1471442973*L32*((-m)-10)*((-m)-9)*((-m)&
     ! &-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1&
     ! &)*(m*rho)**(m+1)*(m*rho+c)**((-m)-11)-4280561376*L31*((-m)-11)*((&
     ! &-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-&
     ! &m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-12)-11058&
     ! &116888*L30*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-&
     ! &7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)*&
     ! &*(m+1)*(m*rho+c)**((-m)-13)-25518731280*L29*((-m)-13)*((-m)-12)*(&
     ! &(-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*(&
     ! &(-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m&
     ! &)-14)-52860229080*L28*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-&
     ! &m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m&
     ! &)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-15)-986724&
     ! &27616*L27*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)&
     ! &-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-&
     ! &3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-16)-16650972&
     ! &1602*L26*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-&
     ! &11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-&
     ! &4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-17)&
     ! &-254661927156*L25*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-1&
     ! &3)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)&
     ! &-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(&
     ! &m*rho+c)**((-m)-18)-353697121050*L24*((-m)-18)*((-m)-17)*((-m)-16&
     ! &)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-&
     ! &m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)&
     ! &-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-19)-446775310800*L23&
     ! &*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m&
     ! &)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((&
     ! &-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1&
     ! &)*(m*rho+c)**((-m)-20)-513791607420*L22*((-m)-20)*((-m)-19)*((-m)&
     ! &-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*&
     ! &((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*&
     ! &((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-&
     ! &m)-21)-538257874440*L21*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*(&
     ! &(-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-&
     ! &11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-&
     ! &4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-22)&
     ! &-513791607420*L20*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-1&
     ! &8)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((&
     ! &-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((&
     ! &-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)&
     ! &-23)-446775310800*L19*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-&
     ! &m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13&
     ! &)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-&
     ! &6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m&
     ! &*rho+c)**((-m)-24)-353697121050*L18*((-m)-24)*((-m)-23)*((-m)-22)&
     ! &*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m&
     ! &)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*&
     ! &((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((&
     ! &-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-25)-254661927156*L17*((-m)&
     ! &-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*&
     ! &((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)&
     ! &-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m&
     ! &)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)&
     ! &**((-m)-26)-166509721602*L16*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-&
     ! &23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*(&
     ! &(-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-&
     ! &10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3&
     ! &)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-27)-986724276&
     ! &16*L15*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22&
     ! &)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-&
     ! &m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)&
     ! &*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*(&
     ! &(-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-28)-52860229080*L14*((-m)&
     ! &-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*&
     ! &((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)&
     ! &-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*(&
     ! &(-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-&
     ! &m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-29)-25518731280*L13*((-m)-2&
     ! &9)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((&
     ! &-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-1&
     ! &6)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((&
     ! &-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m&
     ! &)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-30)-11058116888*L12&
     ! &*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m&
     ! &)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)&
     ! &*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m&
     ! &)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m&
     ! &)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-3&
     ! &1)-4280561376*L11*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-2&
     ! &7)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((&
     ! &-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-1&
     ! &4)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m&
     ! &)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho&
     ! &)**(m+1)*(m*rho+c)**((-m)-32)-1471442973*L10*((-m)-32)*((-m)-31)*&
     ! &((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)&
     ! &-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*&
     ! &((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)&
     ! &-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)&
     ! &-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-33&
     ! &)-445891810*L9*((-m)-33)*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*&
     ! &((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)&
     ! &-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*&
     ! &((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)&
     ! &-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2&
     ! &)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-34)-118030185*L8*((-m)&
     ! &-34)*((-m)-33)*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*&
     ! &((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)&
     ! &-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*&
     ! &((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-&
     ! &8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)&
     ! &*(m*rho)**(m+1)*(m*rho+c)**((-m)-35)-26978328*L7*((-m)-35)*((-m)-&
     ! &34)*((-m)-33)*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*(&
     ! &(-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-&
     ! &21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*(&
     ! &(-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8&
     ! &)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*&
     ! &(m*rho)**(m+1)*(m*rho+c)**((-m)-36)-5245786*L6*((-m)-36)*((-m)-35&
     ! &)*((-m)-34)*((-m)-33)*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-&
     ! &m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22&
     ! &)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-&
     ! &m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)&
     ! &*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*(&
     ! &(-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-37)-850668*L5*((-m)-37)*(&
     ! &(-m)-36)*((-m)-35)*((-m)-34)*((-m)-33)*((-m)-32)*((-m)-31)*((-m)-&
     ! &30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*(&
     ! &(-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-&
     ! &17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*(&
     ! &(-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((&
     ! &-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-38)-1119&
     ! &30*L4*((-m)-38)*((-m)-37)*((-m)-36)*((-m)-35)*((-m)-34)*((-m)-33)&
     ! &*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m&
     ! &)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)&
     ! &*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m&
     ! &)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((&
     ! &-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1&
     ! &)*(m*rho+c)**((-m)-39)-11480*L3*((-m)-39)*((-m)-38)*((-m)-37)*((-&
     ! &m)-36)*((-m)-35)*((-m)-34)*((-m)-33)*((-m)-32)*((-m)-31)*((-m)-30&
     ! &)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-&
     ! &m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17&
     ! &)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-&
     ! &m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m&
     ! &)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-40)-861*L2&
     ! &*((-m)-40)*((-m)-39)*((-m)-38)*((-m)-37)*((-m)-36)*((-m)-35)*((-m&
     ! &)-34)*((-m)-33)*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)&
     ! &*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m&
     ! &)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)&
     ! &*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)&
     ! &-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1&
     ! &)*(m*rho)**(m+1)*(m*rho+c)**((-m)-41)-42*L1*((-m)-41)*((-m)-40)*(&
     ! &(-m)-39)*((-m)-38)*((-m)-37)*((-m)-36)*((-m)-35)*((-m)-34)*((-m)-&
     ! &33)*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*(&
     ! &(-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-&
     ! &20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*(&
     ! &(-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)&
     ! &*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(&
     ! &m+1)*(m*rho+c)**((-m)-42)-L0*((-m)-42)*((-m)-41)*((-m)-40)*((-m)-&
     ! &39)*((-m)-38)*((-m)-37)*((-m)-36)*((-m)-35)*((-m)-34)*((-m)-33)*(&
     ! &(-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-&
     ! &26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*(&
     ! &(-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-&
     ! &13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m&
     ! &)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*&
     ! &(m*rho+c)**((-m)-43)
     !      if (deriv(i) .eq. 43) then
     !         L(i) = L43
     !         cycle
     !      end if
     ! L44 = (-L43*(m*rho)**(m+1)*(m*rho+c)**((-m)-1))-43*L42*((-m)-1)&
     ! &*(m*rho)**(m+1)*(m*rho+c)**((-m)-2)-903*L41*((-m)-2)*((-m)-1)*(m*&
     ! &rho)**(m+1)*(m*rho+c)**((-m)-3)-12341*L40*((-m)-3)*((-m)-2)*((-m)&
     ! &-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-4)-123410*L39*((-m)-4)*((-m)-&
     ! &3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-5)-962598*L3&
     ! &8*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*&
     ! &rho+c)**((-m)-6)-6096454*L37*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*&
     ! &((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-7)-32224114*L36&
     ! &*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(&
     ! &m*rho)**(m+1)*(m*rho+c)**((-m)-8)-145008513*L35*((-m)-8)*((-m)-7)&
     ! &*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(&
     ! &m+1)*(m*rho+c)**((-m)-9)-563921995*L34*((-m)-9)*((-m)-8)*((-m)-7)&
     ! &*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(&
     ! &m+1)*(m*rho+c)**((-m)-10)-1917334783*L33*((-m)-10)*((-m)-9)*((-m)&
     ! &-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1&
     ! &)*(m*rho)**(m+1)*(m*rho+c)**((-m)-11)-5752004349*L32*((-m)-11)*((&
     ! &-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-&
     ! &m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-12)-15338&
     ! &678264*L31*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-&
     ! &7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)*&
     ! &*(m+1)*(m*rho+c)**((-m)-13)-36576848168*L30*((-m)-13)*((-m)-12)*(&
     ! &(-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*(&
     ! &(-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m&
     ! &)-14)-78378960360*L29*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-&
     ! &m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m&
     ! &)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-15)-151532&
     ! &656696*L28*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m&
     ! &)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)&
     ! &-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-16)-2651821&
     ! &49218*L27*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)&
     ! &-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)&
     ! &-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-17&
     ! &)-421171648758*L26*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-&
     ! &13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m&
     ! &)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*&
     ! &(m*rho+c)**((-m)-18)-608359048206*L25*((-m)-18)*((-m)-17)*((-m)-1&
     ! &6)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((&
     ! &-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m&
     ! &)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-19)-800472431850*L2&
     ! &4*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-&
     ! &m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*(&
     ! &(-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+&
     ! &1)*(m*rho+c)**((-m)-20)-960566918220*L23*((-m)-20)*((-m)-19)*((-m&
     ! &)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)&
     ! &*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)&
     ! &*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((&
     ! &-m)-21)-1052049481860*L22*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)&
     ! &*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m&
     ! &)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m&
     ! &)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-2&
     ! &2)-1052049481860*L21*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m&
     ! &)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)&
     ! &*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)&
     ! &*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((&
     ! &-m)-23)-960566918220*L20*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*&
     ! &((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)&
     ! &-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-&
     ! &m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)&
     ! &*(m*rho+c)**((-m)-24)-800472431850*L19*((-m)-24)*((-m)-23)*((-m)-&
     ! &22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*(&
     ! &(-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-&
     ! &9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)&
     ! &*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-25)-608359048206*L18*((&
     ! &-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-1&
     ! &9)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((&
     ! &-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*(&
     ! &(-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho&
     ! &+c)**((-m)-26)-421171648758*L17*((-m)-26)*((-m)-25)*((-m)-24)*((-&
     ! &m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17&
     ! &)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-&
     ! &m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m&
     ! &)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-27)-265182&
     ! &149218*L16*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m&
     ! &)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)&
     ! &*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m&
     ! &)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-&
     ! &2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-28)-151532656696*L15*&
     ! &((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)&
     ! &-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*&
     ! &((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)&
     ! &-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2&
     ! &)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-29)-78378960360*L14*((&
     ! &-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-2&
     ! &3)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((&
     ! &-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-1&
     ! &0)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)&
     ! &*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-30)-3657684816&
     ! &8*L13*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)&
     ! &*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m&
     ! &)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)&
     ! &*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)&
     ! &*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((&
     ! &-m)-31)-15338678264*L12*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*(&
     ! &(-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-&
     ! &21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*(&
     ! &(-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8&
     ! &)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*&
     ! &(m*rho)**(m+1)*(m*rho+c)**((-m)-32)-5752004349*L11*((-m)-32)*((-m&
     ! &)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)&
     ! &*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m&
     ! &)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)&
     ! &*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)&
     ! &*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((&
     ! &-m)-33)-1917334783*L10*((-m)-33)*((-m)-32)*((-m)-31)*((-m)-30)*((&
     ! &-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-2&
     ! &3)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((&
     ! &-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-1&
     ! &0)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)&
     ! &*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-34)-563921995*&
     ! &L9*((-m)-34)*((-m)-33)*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((&
     ! &-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-2&
     ! &2)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((&
     ! &-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9&
     ! &)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*&
     ! &((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-35)-145008513*L8*((-m)-3&
     ! &5)*((-m)-34)*((-m)-33)*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((&
     ! &-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-2&
     ! &2)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((&
     ! &-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9&
     ! &)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*&
     ! &((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-36)-32224114*L7*((-m)-36&
     ! &)*((-m)-35)*((-m)-34)*((-m)-33)*((-m)-32)*((-m)-31)*((-m)-30)*((-&
     ! &m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23&
     ! &)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-&
     ! &m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10&
     ! &)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*&
     ! &((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-37)-6096454*L6*&
     ! &((-m)-37)*((-m)-36)*((-m)-35)*((-m)-34)*((-m)-33)*((-m)-32)*((-m)&
     ! &-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*&
     ! &((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)&
     ! &-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*&
     ! &((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*&
     ! &((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-&
     ! &m)-38)-962598*L5*((-m)-38)*((-m)-37)*((-m)-36)*((-m)-35)*((-m)-34&
     ! &)*((-m)-33)*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-&
     ! &m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21&
     ! &)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-&
     ! &m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*&
     ! &((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m&
     ! &*rho)**(m+1)*(m*rho+c)**((-m)-39)-123410*L4*((-m)-39)*((-m)-38)*(&
     ! &(-m)-37)*((-m)-36)*((-m)-35)*((-m)-34)*((-m)-33)*((-m)-32)*((-m)-&
     ! &31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*(&
     ! &(-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-&
     ! &18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*(&
     ! &(-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*(&
     ! &(-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m&
     ! &)-40)-12341*L3*((-m)-40)*((-m)-39)*((-m)-38)*((-m)-37)*((-m)-36)*&
     ! &((-m)-35)*((-m)-34)*((-m)-33)*((-m)-32)*((-m)-31)*((-m)-30)*((-m)&
     ! &-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*&
     ! &((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)&
     ! &-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*&
     ! &((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((&
     ! &-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-41)-903*L2*((-m)-&
     ! &41)*((-m)-40)*((-m)-39)*((-m)-38)*((-m)-37)*((-m)-36)*((-m)-35)*(&
     ! &(-m)-34)*((-m)-33)*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-&
     ! &28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*(&
     ! &(-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-&
     ! &15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((&
     ! &-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m&
     ! &)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-42)-43*L1*((-m)-42)*((-m)-41&
     ! &)*((-m)-40)*((-m)-39)*((-m)-38)*((-m)-37)*((-m)-36)*((-m)-35)*((-&
     ! &m)-34)*((-m)-33)*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28&
     ! &)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-&
     ! &m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15&
     ! &)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m&
     ! &)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-&
     ! &1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-43)-L0*((-m)-43)*((-m)-42)*((-&
     ! &m)-41)*((-m)-40)*((-m)-39)*((-m)-38)*((-m)-37)*((-m)-36)*((-m)-35&
     ! &)*((-m)-34)*((-m)-33)*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-&
     ! &m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22&
     ! &)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-&
     ! &m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)&
     ! &*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*(&
     ! &(-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-44)
     !      if (deriv(i) .eq. 44) then
     !         L(i) = L44
     !         cycle
     !      end if
     ! L45 = (-L44*(m*rho)**(m+1)*(m*rho+c)**((-m)-1))-44*L43*((-m)-1)&
     ! &*(m*rho)**(m+1)*(m*rho+c)**((-m)-2)-946*L42*((-m)-2)*((-m)-1)*(m*&
     ! &rho)**(m+1)*(m*rho+c)**((-m)-3)-13244*L41*((-m)-3)*((-m)-2)*((-m)&
     ! &-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-4)-135751*L40*((-m)-4)*((-m)-&
     ! &3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-5)-1086008*L&
     ! &39*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m&
     ! &*rho+c)**((-m)-6)-7059052*L38*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)&
     ! &*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-7)-38320568*L3&
     ! &7*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*&
     ! &(m*rho)**(m+1)*(m*rho+c)**((-m)-8)-177232627*L36*((-m)-8)*((-m)-7&
     ! &)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**&
     ! &(m+1)*(m*rho+c)**((-m)-9)-708930508*L35*((-m)-9)*((-m)-8)*((-m)-7&
     ! &)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**&
     ! &(m+1)*(m*rho+c)**((-m)-10)-2481256778*L34*((-m)-10)*((-m)-9)*((-m&
     ! &)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-&
     ! &1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-11)-7669339132*L33*((-m)-11)*(&
     ! &(-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((&
     ! &-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-12)-2109&
     ! &0682613*L32*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)&
     ! &-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)&
     ! &**(m+1)*(m*rho+c)**((-m)-13)-51915526432*L31*((-m)-13)*((-m)-12)*&
     ! &((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*&
     ! &((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-&
     ! &m)-14)-114955808528*L30*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*(&
     ! &(-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((&
     ! &-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-15)-2299&
     ! &11617056*L29*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((&
     ! &-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-&
     ! &m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-16)-41671&
     ! &4805914*L28*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-&
     ! &m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-&
     ! &m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-&
     ! &17)-686353797976*L27*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m&
     ! &)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((&
     ! &-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1&
     ! &)*(m*rho+c)**((-m)-18)-1029530696964*L26*((-m)-18)*((-m)-17)*((-m&
     ! &)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)&
     ! &*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*(&
     ! &(-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-19)-140883148005&
     ! &6*L25*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)&
     ! &*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-&
     ! &7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)*&
     ! &*(m+1)*(m*rho+c)**((-m)-20)-1761039350070*L24*((-m)-20)*((-m)-19)&
     ! &*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m&
     ! &)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-&
     ! &m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c&
     ! &)**((-m)-21)-2012616400080*L23*((-m)-21)*((-m)-20)*((-m)-19)*((-m&
     ! &)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)&
     ! &*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)&
     ! &*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((&
     ! &-m)-22)-2104098963720*L22*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)&
     ! &*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m&
     ! &)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-&
     ! &m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c&
     ! &)**((-m)-23)-2012616400080*L21*((-m)-23)*((-m)-22)*((-m)-21)*((-m&
     ! &)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)&
     ! &*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-&
     ! &7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)*&
     ! &*(m+1)*(m*rho+c)**((-m)-24)-1761039350070*L20*((-m)-24)*((-m)-23)&
     ! &*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m&
     ! &)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)&
     ! &*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*(&
     ! &(-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-25)-140883148005&
     ! &6*L19*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)&
     ! &*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m&
     ! &)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((&
     ! &-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1&
     ! &)*(m*rho+c)**((-m)-26)-1029530696964*L18*((-m)-26)*((-m)-25)*((-m&
     ! &)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)&
     ! &*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m&
     ! &)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m&
     ! &)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-2&
     ! &7)-686353797976*L17*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)&
     ! &-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*&
     ! &((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)&
     ! &-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-&
     ! &3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-28)-41671480&
     ! &5914*L16*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-&
     ! &23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*(&
     ! &(-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-&
     ! &10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3&
     ! &)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-29)-229911617&
     ! &056*L15*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-2&
     ! &4)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((&
     ! &-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-1&
     ! &1)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4&
     ! &)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-30)-&
     ! &114955808528*L14*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26&
     ! &)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-&
     ! &m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13&
     ! &)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-&
     ! &6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m&
     ! &*rho+c)**((-m)-31)-51915526432*L13*((-m)-31)*((-m)-30)*((-m)-29)*&
     ! &((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)&
     ! &-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*&
     ! &((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)&
     ! &-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2&
     ! &)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-32)-21090682613*L12*((&
     ! &-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-2&
     ! &6)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((&
     ! &-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-1&
     ! &3)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)&
     ! &-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(&
     ! &m*rho+c)**((-m)-33)-7669339132*L11*((-m)-33)*((-m)-32)*((-m)-31)*&
     ! &((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)&
     ! &-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*&
     ! &((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)&
     ! &-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)&
     ! &-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-34&
     ! &)-2481256778*L10*((-m)-34)*((-m)-33)*((-m)-32)*((-m)-31)*((-m)-30&
     ! &)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-&
     ! &m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17&
     ! &)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-&
     ! &m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m&
     ! &)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-35)-708930&
     ! &508*L9*((-m)-35)*((-m)-34)*((-m)-33)*((-m)-32)*((-m)-31)*((-m)-30&
     ! &)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-&
     ! &m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17&
     ! &)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-&
     ! &m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m&
     ! &)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-36)-177232&
     ! &627*L8*((-m)-36)*((-m)-35)*((-m)-34)*((-m)-33)*((-m)-32)*((-m)-31&
     ! &)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-&
     ! &m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18&
     ! &)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-&
     ! &m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-&
     ! &m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-&
     ! &37)-38320568*L7*((-m)-37)*((-m)-36)*((-m)-35)*((-m)-34)*((-m)-33)&
     ! &*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m&
     ! &)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)&
     ! &*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m&
     ! &)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((&
     ! &-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1&
     ! &)*(m*rho+c)**((-m)-38)-7059052*L6*((-m)-38)*((-m)-37)*((-m)-36)*(&
     ! &(-m)-35)*((-m)-34)*((-m)-33)*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-&
     ! &29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*(&
     ! &(-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-&
     ! &16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*(&
     ! &(-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-&
     ! &m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-39)-1086008*L5*((-&
     ! &m)-39)*((-m)-38)*((-m)-37)*((-m)-36)*((-m)-35)*((-m)-34)*((-m)-33&
     ! &)*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-&
     ! &m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20&
     ! &)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-&
     ! &m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*(&
     ! &(-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+&
     ! &1)*(m*rho+c)**((-m)-40)-135751*L4*((-m)-40)*((-m)-39)*((-m)-38)*(&
     ! &(-m)-37)*((-m)-36)*((-m)-35)*((-m)-34)*((-m)-33)*((-m)-32)*((-m)-&
     ! &31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*(&
     ! &(-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-&
     ! &18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*(&
     ! &(-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*(&
     ! &(-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m&
     ! &)-41)-13244*L3*((-m)-41)*((-m)-40)*((-m)-39)*((-m)-38)*((-m)-37)*&
     ! &((-m)-36)*((-m)-35)*((-m)-34)*((-m)-33)*((-m)-32)*((-m)-31)*((-m)&
     ! &-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*&
     ! &((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)&
     ! &-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*&
     ! &((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*(&
     ! &(-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-42)-946&
     ! &*L2*((-m)-42)*((-m)-41)*((-m)-40)*((-m)-39)*((-m)-38)*((-m)-37)*(&
     ! &(-m)-36)*((-m)-35)*((-m)-34)*((-m)-33)*((-m)-32)*((-m)-31)*((-m)-&
     ! &30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*(&
     ! &(-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-&
     ! &17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*(&
     ! &(-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((&
     ! &-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-43)-44*L&
     ! &1*((-m)-43)*((-m)-42)*((-m)-41)*((-m)-40)*((-m)-39)*((-m)-38)*((-&
     ! &m)-37)*((-m)-36)*((-m)-35)*((-m)-34)*((-m)-33)*((-m)-32)*((-m)-31&
     ! &)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-&
     ! &m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18&
     ! &)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-&
     ! &m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-&
     ! &m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-&
     ! &44)-L0*((-m)-44)*((-m)-43)*((-m)-42)*((-m)-41)*((-m)-40)*((-m)-39&
     ! &)*((-m)-38)*((-m)-37)*((-m)-36)*((-m)-35)*((-m)-34)*((-m)-33)*((-&
     ! &m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26&
     ! &)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-&
     ! &m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13&
     ! &)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-&
     ! &6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m&
     ! &*rho+c)**((-m)-45)
     !      if (deriv(i) .eq. 45) then
     !         L(i) = L45
     !         cycle
     !      end if
     ! L46 = (-L45*(m*rho)**(m+1)*(m*rho+c)**((-m)-1))-45*L44*((-m)-1)&
     ! &*(m*rho)**(m+1)*(m*rho+c)**((-m)-2)-990*L43*((-m)-2)*((-m)-1)*(m*&
     ! &rho)**(m+1)*(m*rho+c)**((-m)-3)-14190*L42*((-m)-3)*((-m)-2)*((-m)&
     ! &-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-4)-148995*L41*((-m)-4)*((-m)-&
     ! &3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-5)-1221759*L&
     ! &40*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m&
     ! &*rho+c)**((-m)-6)-8145060*L39*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)&
     ! &*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-7)-45379620*L3&
     ! &8*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*&
     ! &(m*rho)**(m+1)*(m*rho+c)**((-m)-8)-215553195*L37*((-m)-8)*((-m)-7&
     ! &)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**&
     ! &(m+1)*(m*rho+c)**((-m)-9)-886163135*L36*((-m)-9)*((-m)-8)*((-m)-7&
     ! &)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**&
     ! &(m+1)*(m*rho+c)**((-m)-10)-3190187286*L35*((-m)-10)*((-m)-9)*((-m&
     ! &)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-&
     ! &1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-11)-10150595910*L34*((-m)-11)*&
     ! &((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*(&
     ! &(-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-12)-287&
     ! &60021745*L33*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m&
     ! &)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho&
     ! &)**(m+1)*(m*rho+c)**((-m)-13)-73006209045*L32*((-m)-13)*((-m)-12)&
     ! &*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)&
     ! &*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((&
     ! &-m)-14)-166871334960*L31*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*&
     ! &((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*(&
     ! &(-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-15)-344&
     ! &867425584*L30*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*(&
     ! &(-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((&
     ! &-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-16)-6466&
     ! &26422970*L29*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((&
     ! &-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((&
     ! &-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)&
     ! &-17)-1103068603890*L28*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((&
     ! &-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*&
     ! &((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m&
     ! &+1)*(m*rho+c)**((-m)-18)-1715884494940*L27*((-m)-18)*((-m)-17)*((&
     ! &-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-1&
     ! &0)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)&
     ! &*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-19)-2438362177&
     ! &020*L26*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-1&
     ! &4)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m&
     ! &)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho&
     ! &)**(m+1)*(m*rho+c)**((-m)-20)-3169870830126*L25*((-m)-20)*((-m)-1&
     ! &9)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((&
     ! &-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*(&
     ! &(-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho&
     ! &+c)**((-m)-21)-3773655750150*L24*((-m)-21)*((-m)-20)*((-m)-19)*((&
     ! &-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-1&
     ! &2)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-&
     ! &5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**&
     ! &((-m)-22)-4116715363800*L23*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-1&
     ! &9)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((&
     ! &-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*(&
     ! &(-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho&
     ! &+c)**((-m)-23)-4116715363800*L22*((-m)-23)*((-m)-22)*((-m)-21)*((&
     ! &-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-1&
     ! &4)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m&
     ! &)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho&
     ! &)**(m+1)*(m*rho+c)**((-m)-24)-3773655750150*L21*((-m)-24)*((-m)-2&
     ! &3)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((&
     ! &-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-1&
     ! &0)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)&
     ! &*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-25)-3169870830&
     ! &126*L20*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-2&
     ! &0)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((&
     ! &-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*&
     ! &((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m&
     ! &+1)*(m*rho+c)**((-m)-26)-2438362177020*L19*((-m)-26)*((-m)-25)*((&
     ! &-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-1&
     ! &8)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((&
     ! &-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((&
     ! &-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)&
     ! &-27)-1715884494940*L18*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((&
     ! &-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-1&
     ! &7)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((&
     ! &-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-&
     ! &m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-28)-11030&
     ! &68603890*L17*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((&
     ! &-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-1&
     ! &7)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((&
     ! &-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-&
     ! &m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-29)-64662&
     ! &6422970*L16*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-&
     ! &m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18&
     ! &)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-&
     ! &m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-&
     ! &m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-&
     ! &30)-344867425584*L15*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m&
     ! &)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)&
     ! &*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m&
     ! &)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((&
     ! &-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1&
     ! &)*(m*rho+c)**((-m)-31)-166871334960*L14*((-m)-31)*((-m)-30)*((-m)&
     ! &-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*&
     ! &((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)&
     ! &-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*&
     ! &((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((&
     ! &-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-32)-73006209045*L&
     ! &13*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((&
     ! &-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-2&
     ! &0)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((&
     ! &-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*&
     ! &((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m&
     ! &+1)*(m*rho+c)**((-m)-33)-28760021745*L12*((-m)-33)*((-m)-32)*((-m&
     ! &)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)&
     ! &*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m&
     ! &)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)&
     ! &*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)&
     ! &*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((&
     ! &-m)-34)-10150595910*L11*((-m)-34)*((-m)-33)*((-m)-32)*((-m)-31)*(&
     ! &(-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-&
     ! &24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*(&
     ! &(-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-&
     ! &11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-&
     ! &4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-35)&
     ! &-3190187286*L10*((-m)-35)*((-m)-34)*((-m)-33)*((-m)-32)*((-m)-31)&
     ! &*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m&
     ! &)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)&
     ! &*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m&
     ! &)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m&
     ! &)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-3&
     ! &6)-886163135*L9*((-m)-36)*((-m)-35)*((-m)-34)*((-m)-33)*((-m)-32)&
     ! &*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m&
     ! &)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)&
     ! &*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m&
     ! &)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-&
     ! &m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c&
     ! &)**((-m)-37)-215553195*L8*((-m)-37)*((-m)-36)*((-m)-35)*((-m)-34)&
     ! &*((-m)-33)*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m&
     ! &)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)&
     ! &*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m&
     ! &)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*(&
     ! &(-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*&
     ! &rho)**(m+1)*(m*rho+c)**((-m)-38)-45379620*L7*((-m)-38)*((-m)-37)*&
     ! &((-m)-36)*((-m)-35)*((-m)-34)*((-m)-33)*((-m)-32)*((-m)-31)*((-m)&
     ! &-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*&
     ! &((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)&
     ! &-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*&
     ! &((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*(&
     ! &(-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-39)-814&
     ! &5060*L6*((-m)-39)*((-m)-38)*((-m)-37)*((-m)-36)*((-m)-35)*((-m)-3&
     ! &4)*((-m)-33)*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((&
     ! &-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-2&
     ! &1)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((&
     ! &-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)&
     ! &*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(&
     ! &m*rho)**(m+1)*(m*rho+c)**((-m)-40)-1221759*L5*((-m)-40)*((-m)-39)&
     ! &*((-m)-38)*((-m)-37)*((-m)-36)*((-m)-35)*((-m)-34)*((-m)-33)*((-m&
     ! &)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)&
     ! &*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m&
     ! &)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)&
     ! &*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6&
     ! &)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*&
     ! &rho+c)**((-m)-41)-148995*L4*((-m)-41)*((-m)-40)*((-m)-39)*((-m)-3&
     ! &8)*((-m)-37)*((-m)-36)*((-m)-35)*((-m)-34)*((-m)-33)*((-m)-32)*((&
     ! &-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-2&
     ! &5)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((&
     ! &-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-1&
     ! &2)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-&
     ! &5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**&
     ! &((-m)-42)-14190*L3*((-m)-42)*((-m)-41)*((-m)-40)*((-m)-39)*((-m)-&
     ! &38)*((-m)-37)*((-m)-36)*((-m)-35)*((-m)-34)*((-m)-33)*((-m)-32)*(&
     ! &(-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-&
     ! &25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*(&
     ! &(-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-&
     ! &12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)&
     ! &-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)*&
     ! &*((-m)-43)-990*L2*((-m)-43)*((-m)-42)*((-m)-41)*((-m)-40)*((-m)-3&
     ! &9)*((-m)-38)*((-m)-37)*((-m)-36)*((-m)-35)*((-m)-34)*((-m)-33)*((&
     ! &-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-2&
     ! &6)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((&
     ! &-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-1&
     ! &3)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)&
     ! &-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(&
     ! &m*rho+c)**((-m)-44)-45*L1*((-m)-44)*((-m)-43)*((-m)-42)*((-m)-41)&
     ! &*((-m)-40)*((-m)-39)*((-m)-38)*((-m)-37)*((-m)-36)*((-m)-35)*((-m&
     ! &)-34)*((-m)-33)*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)&
     ! &*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m&
     ! &)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)&
     ! &*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)&
     ! &-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1&
     ! &)*(m*rho)**(m+1)*(m*rho+c)**((-m)-45)-L0*((-m)-45)*((-m)-44)*((-m&
     ! &)-43)*((-m)-42)*((-m)-41)*((-m)-40)*((-m)-39)*((-m)-38)*((-m)-37)&
     ! &*((-m)-36)*((-m)-35)*((-m)-34)*((-m)-33)*((-m)-32)*((-m)-31)*((-m&
     ! &)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)&
     ! &*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m&
     ! &)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)&
     ! &*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*&
     ! &((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-46)
     !      if (deriv(i) .eq. 46) then
     !         L(i) = L46
     !         cycle
     !      end if
     ! L47 = (-L46*(m*rho)**(m+1)*(m*rho+c)**((-m)-1))-46*L45*((-m)-1)&
     ! &*(m*rho)**(m+1)*(m*rho+c)**((-m)-2)-1035*L44*((-m)-2)*((-m)-1)*(m&
     ! &*rho)**(m+1)*(m*rho+c)**((-m)-3)-15180*L43*((-m)-3)*((-m)-2)*((-m&
     ! &)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-4)-163185*L42*((-m)-4)*((-m)&
     ! &-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-5)-1370754*&
     ! &L41*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(&
     ! &m*rho+c)**((-m)-6)-9366819*L40*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3&
     ! &)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-7)-53524680*L&
     ! &39*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)&
     ! &*(m*rho)**(m+1)*(m*rho+c)**((-m)-8)-260932815*L38*((-m)-8)*((-m)-&
     ! &7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)*&
     ! &*(m+1)*(m*rho+c)**((-m)-9)-1101716330*L37*((-m)-9)*((-m)-8)*((-m)&
     ! &-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)&
     ! &**(m+1)*(m*rho+c)**((-m)-10)-4076350421*L36*((-m)-10)*((-m)-9)*((&
     ! &-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m&
     ! &)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-11)-13340783196*L35*((-m)-11&
     ! &)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)&
     ! &*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-12)-3&
     ! &8910617655*L34*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((&
     ! &-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*r&
     ! &ho)**(m+1)*(m*rho+c)**((-m)-13)-101766230790*L33*((-m)-13)*((-m)-&
     ! &12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)&
     ! &-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)*&
     ! &*((-m)-14)-239877544005*L32*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-1&
     ! &1)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4&
     ! &)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-15)-&
     ! &511738760544*L31*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11&
     ! &)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)&
     ! &*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-16)-9&
     ! &91493848554*L30*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)&
     ! &*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)&
     ! &*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((&
     ! &-m)-17)-1749695026860*L29*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)&
     ! &*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-&
     ! &7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)*&
     ! &*(m+1)*(m*rho+c)**((-m)-18)-2818953098830*L28*((-m)-18)*((-m)-17)&
     ! &*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m&
     ! &)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)&
     ! &-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-19)-4154246&
     ! &671960*L27*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m&
     ! &)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*(&
     ! &(-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*&
     ! &rho)**(m+1)*(m*rho+c)**((-m)-20)-5608233007146*L26*((-m)-20)*((-m&
     ! &)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)&
     ! &*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6&
     ! &)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*&
     ! &rho+c)**((-m)-21)-6943526580276*L25*((-m)-21)*((-m)-20)*((-m)-19)&
     ! &*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m&
     ! &)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-&
     ! &m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c&
     ! &)**((-m)-22)-7890371113950*L24*((-m)-22)*((-m)-21)*((-m)-20)*((-m&
     ! &)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)&
     ! &*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6&
     ! &)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*&
     ! &rho+c)**((-m)-23)-8233430727600*L23*((-m)-23)*((-m)-22)*((-m)-21)&
     ! &*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m&
     ! &)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*(&
     ! &(-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*&
     ! &rho)**(m+1)*(m*rho+c)**((-m)-24)-7890371113950*L22*((-m)-24)*((-m&
     ! &)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)&
     ! &*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m&
     ! &)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)&
     ! &-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-25)-6943526&
     ! &580276*L21*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m&
     ! &)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)&
     ! &*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-&
     ! &7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)*&
     ! &*(m+1)*(m*rho+c)**((-m)-26)-5608233007146*L20*((-m)-26)*((-m)-25)&
     ! &*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m&
     ! &)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)&
     ! &*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)&
     ! &*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((&
     ! &-m)-27)-4154246671960*L19*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)&
     ! &*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m&
     ! &)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)&
     ! &*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*&
     ! &((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-28)-28&
     ! &18953098830*L18*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)&
     ! &*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m&
     ! &)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)&
     ! &*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*&
     ! &((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-29)-17&
     ! &49695026860*L17*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)&
     ! &*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m&
     ! &)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)&
     ! &*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)&
     ! &*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((&
     ! &-m)-30)-991493848554*L16*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*&
     ! &((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)&
     ! &-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*&
     ! &((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7&
     ! &)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**&
     ! &(m+1)*(m*rho+c)**((-m)-31)-511738760544*L15*((-m)-31)*((-m)-30)*(&
     ! &(-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-&
     ! &23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*(&
     ! &(-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-&
     ! &10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3&
     ! &)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-32)-239877544&
     ! &005*L14*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-2&
     ! &7)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((&
     ! &-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-1&
     ! &4)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m&
     ! &)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho&
     ! &)**(m+1)*(m*rho+c)**((-m)-33)-101766230790*L13*((-m)-33)*((-m)-32&
     ! &)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-&
     ! &m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19&
     ! &)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-&
     ! &m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((&
     ! &-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+&
     ! &c)**((-m)-34)-38910617655*L12*((-m)-34)*((-m)-33)*((-m)-32)*((-m)&
     ! &-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*&
     ! &((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)&
     ! &-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*&
     ! &((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*&
     ! &((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-&
     ! &m)-35)-13340783196*L11*((-m)-35)*((-m)-34)*((-m)-33)*((-m)-32)*((&
     ! &-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-2&
     ! &5)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((&
     ! &-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-1&
     ! &2)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-&
     ! &5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**&
     ! &((-m)-36)-4076350421*L10*((-m)-36)*((-m)-35)*((-m)-34)*((-m)-33)*&
     ! &((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)&
     ! &-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*&
     ! &((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)&
     ! &-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-&
     ! &m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)&
     ! &*(m*rho+c)**((-m)-37)-1101716330*L9*((-m)-37)*((-m)-36)*((-m)-35)&
     ! &*((-m)-34)*((-m)-33)*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m&
     ! &)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)&
     ! &*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m&
     ! &)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*&
     ! &((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((&
     ! &-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-38)-260932815*L8*((-m)-38)&
     ! &*((-m)-37)*((-m)-36)*((-m)-35)*((-m)-34)*((-m)-33)*((-m)-32)*((-m&
     ! &)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)&
     ! &*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m&
     ! &)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)&
     ! &*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)&
     ! &*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((&
     ! &-m)-39)-53524680*L7*((-m)-39)*((-m)-38)*((-m)-37)*((-m)-36)*((-m)&
     ! &-35)*((-m)-34)*((-m)-33)*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*&
     ! &((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)&
     ! &-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*&
     ! &((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)&
     ! &-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2&
     ! &)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-40)-9366819*L6*((-m)-4&
     ! &0)*((-m)-39)*((-m)-38)*((-m)-37)*((-m)-36)*((-m)-35)*((-m)-34)*((&
     ! &-m)-33)*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-2&
     ! &7)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((&
     ! &-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-1&
     ! &4)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m&
     ! &)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho&
     ! &)**(m+1)*(m*rho+c)**((-m)-41)-1370754*L5*((-m)-41)*((-m)-40)*((-m&
     ! &)-39)*((-m)-38)*((-m)-37)*((-m)-36)*((-m)-35)*((-m)-34)*((-m)-33)&
     ! &*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m&
     ! &)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)&
     ! &*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m&
     ! &)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((&
     ! &-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1&
     ! &)*(m*rho+c)**((-m)-42)-163185*L4*((-m)-42)*((-m)-41)*((-m)-40)*((&
     ! &-m)-39)*((-m)-38)*((-m)-37)*((-m)-36)*((-m)-35)*((-m)-34)*((-m)-3&
     ! &3)*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((&
     ! &-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-2&
     ! &0)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((&
     ! &-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*&
     ! &((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m&
     ! &+1)*(m*rho+c)**((-m)-43)-15180*L3*((-m)-43)*((-m)-42)*((-m)-41)*(&
     ! &(-m)-40)*((-m)-39)*((-m)-38)*((-m)-37)*((-m)-36)*((-m)-35)*((-m)-&
     ! &34)*((-m)-33)*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*(&
     ! &(-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-&
     ! &21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*(&
     ! &(-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8&
     ! &)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*&
     ! &(m*rho)**(m+1)*(m*rho+c)**((-m)-44)-1035*L2*((-m)-44)*((-m)-43)*(&
     ! &(-m)-42)*((-m)-41)*((-m)-40)*((-m)-39)*((-m)-38)*((-m)-37)*((-m)-&
     ! &36)*((-m)-35)*((-m)-34)*((-m)-33)*((-m)-32)*((-m)-31)*((-m)-30)*(&
     ! &(-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-&
     ! &23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*(&
     ! &(-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-&
     ! &10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3&
     ! &)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-45)-46*L1*((-&
     ! &m)-45)*((-m)-44)*((-m)-43)*((-m)-42)*((-m)-41)*((-m)-40)*((-m)-39&
     ! &)*((-m)-38)*((-m)-37)*((-m)-36)*((-m)-35)*((-m)-34)*((-m)-33)*((-&
     ! &m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26&
     ! &)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-&
     ! &m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13&
     ! &)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-&
     ! &6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m&
     ! &*rho+c)**((-m)-46)-L0*((-m)-46)*((-m)-45)*((-m)-44)*((-m)-43)*((-&
     ! &m)-42)*((-m)-41)*((-m)-40)*((-m)-39)*((-m)-38)*((-m)-37)*((-m)-36&
     ! &)*((-m)-35)*((-m)-34)*((-m)-33)*((-m)-32)*((-m)-31)*((-m)-30)*((-&
     ! &m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23&
     ! &)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-&
     ! &m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10&
     ! &)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*&
     ! &((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-47)
     !      if (deriv(i) .eq. 47) then
     !         L(i) = L47
     !         cycle
     !      end if
     ! L48 = (-L47*(m*rho)**(m+1)*(m*rho+c)**((-m)-1))-47*L46*((-m)-1)&
     ! &*(m*rho)**(m+1)*(m*rho+c)**((-m)-2)-1081*L45*((-m)-2)*((-m)-1)*(m&
     ! &*rho)**(m+1)*(m*rho+c)**((-m)-3)-16215*L44*((-m)-3)*((-m)-2)*((-m&
     ! &)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-4)-178365*L43*((-m)-4)*((-m)&
     ! &-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-5)-1533939*&
     ! &L42*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(&
     ! &m*rho+c)**((-m)-6)-10737573*L41*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-&
     ! &3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-7)-62891499*&
     ! &L40*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1&
     ! &)*(m*rho)**(m+1)*(m*rho+c)**((-m)-8)-314457495*L39*((-m)-8)*((-m)&
     ! &-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)&
     ! &**(m+1)*(m*rho+c)**((-m)-9)-1362649145*L38*((-m)-9)*((-m)-8)*((-m&
     ! &)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho&
     ! &)**(m+1)*(m*rho+c)**((-m)-10)-5178066751*L37*((-m)-10)*((-m)-9)*(&
     ! &(-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-&
     ! &m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-11)-17417133617*L36*((-m)-1&
     ! &1)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4&
     ! &)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-12)-&
     ! &52251400851*L35*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*(&
     ! &(-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*&
     ! &rho)**(m+1)*(m*rho+c)**((-m)-13)-140676848445*L34*((-m)-13)*((-m)&
     ! &-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m&
     ! &)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)&
     ! &**((-m)-14)-341643774795*L33*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-&
     ! &11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-&
     ! &4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-15)&
     ! &-751616304549*L32*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-1&
     ! &1)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4&
     ! &)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-16)-&
     ! &1503232609098*L31*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-1&
     ! &2)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-&
     ! &5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**&
     ! &((-m)-17)-2741188875414*L30*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-1&
     ! &4)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m&
     ! &)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho&
     ! &)**(m+1)*(m*rho+c)**((-m)-18)-4568648125690*L29*((-m)-18)*((-m)-1&
     ! &7)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((&
     ! &-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-&
     ! &m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-19)-69731&
     ! &99770790*L28*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((&
     ! &-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)&
     ! &*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(&
     ! &m*rho)**(m+1)*(m*rho+c)**((-m)-20)-9762479679106*L27*((-m)-20)*((&
     ! &-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-1&
     ! &3)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)&
     ! &-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(&
     ! &m*rho+c)**((-m)-21)-12551759587422*L26*((-m)-21)*((-m)-20)*((-m)-&
     ! &19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*(&
     ! &(-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*&
     ! &((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rh&
     ! &o+c)**((-m)-22)-14833897694226*L25*((-m)-22)*((-m)-21)*((-m)-20)*&
     ! &((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)&
     ! &-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-&
     ! &m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)&
     ! &*(m*rho+c)**((-m)-23)-16123801841550*L24*((-m)-23)*((-m)-22)*((-m&
     ! &)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)&
     ! &*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)&
     ! &-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1&
     ! &)*(m*rho)**(m+1)*(m*rho+c)**((-m)-24)-16123801841550*L23*((-m)-24&
     ! &)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-&
     ! &m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11&
     ! &)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)&
     ! &*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-25)-1&
     ! &4833897694226*L22*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-2&
     ! &1)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((&
     ! &-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)&
     ! &*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(&
     ! &m*rho)**(m+1)*(m*rho+c)**((-m)-26)-12551759587422*L21*((-m)-26)*(&
     ! &(-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-&
     ! &19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*(&
     ! &(-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*&
     ! &((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rh&
     ! &o+c)**((-m)-27)-9762479679106*L20*((-m)-27)*((-m)-26)*((-m)-25)*(&
     ! &(-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-&
     ! &18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*(&
     ! &(-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*(&
     ! &(-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m&
     ! &)-28)-6973199770790*L19*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*(&
     ! &(-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-&
     ! &18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*(&
     ! &(-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*(&
     ! &(-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m&
     ! &)-29)-4568648125690*L18*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*(&
     ! &(-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-&
     ! &19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*(&
     ! &(-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*&
     ! &((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rh&
     ! &o+c)**((-m)-30)-2741188875414*L17*((-m)-30)*((-m)-29)*((-m)-28)*(&
     ! &(-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-&
     ! &21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*(&
     ! &(-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8&
     ! &)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*&
     ! &(m*rho)**(m+1)*(m*rho+c)**((-m)-31)-1503232609098*L16*((-m)-31)*(&
     ! &(-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-&
     ! &24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*(&
     ! &(-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-&
     ! &11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-&
     ! &4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-32)&
     ! &-751616304549*L15*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-2&
     ! &8)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((&
     ! &-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-1&
     ! &5)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-&
     ! &m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)&
     ! &-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-33)-341643774795*L14*((-m)-33&
     ! &)*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-&
     ! &m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20&
     ! &)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-&
     ! &m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*(&
     ! &(-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+&
     ! &1)*(m*rho+c)**((-m)-34)-140676848445*L13*((-m)-34)*((-m)-33)*((-m&
     ! &)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)&
     ! &*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m&
     ! &)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)&
     ! &*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6&
     ! &)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*&
     ! &rho+c)**((-m)-35)-52251400851*L12*((-m)-35)*((-m)-34)*((-m)-33)*(&
     ! &(-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-&
     ! &26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*(&
     ! &(-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-&
     ! &13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m&
     ! &)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*&
     ! &(m*rho+c)**((-m)-36)-17417133617*L11*((-m)-36)*((-m)-35)*((-m)-34&
     ! &)*((-m)-33)*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-&
     ! &m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21&
     ! &)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-&
     ! &m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*&
     ! &((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m&
     ! &*rho)**(m+1)*(m*rho+c)**((-m)-37)-5178066751*L10*((-m)-37)*((-m)-&
     ! &36)*((-m)-35)*((-m)-34)*((-m)-33)*((-m)-32)*((-m)-31)*((-m)-30)*(&
     ! &(-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-&
     ! &23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*(&
     ! &(-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-&
     ! &10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3&
     ! &)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-38)-136264914&
     ! &5*L9*((-m)-38)*((-m)-37)*((-m)-36)*((-m)-35)*((-m)-34)*((-m)-33)*&
     ! &((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)&
     ! &-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*&
     ! &((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)&
     ! &-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-&
     ! &m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)&
     ! &*(m*rho+c)**((-m)-39)-314457495*L8*((-m)-39)*((-m)-38)*((-m)-37)*&
     ! &((-m)-36)*((-m)-35)*((-m)-34)*((-m)-33)*((-m)-32)*((-m)-31)*((-m)&
     ! &-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*&
     ! &((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)&
     ! &-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*&
     ! &((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*(&
     ! &(-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-40)-628&
     ! &91499*L7*((-m)-40)*((-m)-39)*((-m)-38)*((-m)-37)*((-m)-36)*((-m)-&
     ! &35)*((-m)-34)*((-m)-33)*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*(&
     ! &(-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-&
     ! &22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*(&
     ! &(-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-&
     ! &9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)&
     ! &*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-41)-10737573*L6*((-m)-4&
     ! &1)*((-m)-40)*((-m)-39)*((-m)-38)*((-m)-37)*((-m)-36)*((-m)-35)*((&
     ! &-m)-34)*((-m)-33)*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-2&
     ! &8)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((&
     ! &-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-1&
     ! &5)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-&
     ! &m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)&
     ! &-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-42)-1533939*L5*((-m)-42)*((-m&
     ! &)-41)*((-m)-40)*((-m)-39)*((-m)-38)*((-m)-37)*((-m)-36)*((-m)-35)&
     ! &*((-m)-34)*((-m)-33)*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m&
     ! &)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)&
     ! &*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m&
     ! &)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*&
     ! &((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((&
     ! &-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-43)-178365*L4*((-m)-43)*((&
     ! &-m)-42)*((-m)-41)*((-m)-40)*((-m)-39)*((-m)-38)*((-m)-37)*((-m)-3&
     ! &6)*((-m)-35)*((-m)-34)*((-m)-33)*((-m)-32)*((-m)-31)*((-m)-30)*((&
     ! &-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-2&
     ! &3)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((&
     ! &-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-1&
     ! &0)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)&
     ! &*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-44)-16215*L3*(&
     ! &(-m)-44)*((-m)-43)*((-m)-42)*((-m)-41)*((-m)-40)*((-m)-39)*((-m)-&
     ! &38)*((-m)-37)*((-m)-36)*((-m)-35)*((-m)-34)*((-m)-33)*((-m)-32)*(&
     ! &(-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-&
     ! &25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*(&
     ! &(-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-&
     ! &12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)&
     ! &-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)*&
     ! &*((-m)-45)-1081*L2*((-m)-45)*((-m)-44)*((-m)-43)*((-m)-42)*((-m)-&
     ! &41)*((-m)-40)*((-m)-39)*((-m)-38)*((-m)-37)*((-m)-36)*((-m)-35)*(&
     ! &(-m)-34)*((-m)-33)*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-&
     ! &28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*(&
     ! &(-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-&
     ! &15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((&
     ! &-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m&
     ! &)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-46)-47*L1*((-m)-46)*((-m)-45&
     ! &)*((-m)-44)*((-m)-43)*((-m)-42)*((-m)-41)*((-m)-40)*((-m)-39)*((-&
     ! &m)-38)*((-m)-37)*((-m)-36)*((-m)-35)*((-m)-34)*((-m)-33)*((-m)-32&
     ! &)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-&
     ! &m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19&
     ! &)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-&
     ! &m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((&
     ! &-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+&
     ! &c)**((-m)-47)-L0*((-m)-47)*((-m)-46)*((-m)-45)*((-m)-44)*((-m)-43&
     ! &)*((-m)-42)*((-m)-41)*((-m)-40)*((-m)-39)*((-m)-38)*((-m)-37)*((-&
     ! &m)-36)*((-m)-35)*((-m)-34)*((-m)-33)*((-m)-32)*((-m)-31)*((-m)-30&
     ! &)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-&
     ! &m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17&
     ! &)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-&
     ! &m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m&
     ! &)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-48)
     !      if (deriv(i) .eq. 48) then
     !         L(i) = L48
     !         cycle
     !      end if
     ! L49 = (-L48*(m*rho)**(m+1)*(m*rho+c)**((-m)-1))-48*L47*((-m)-1)&
     ! &*(m*rho)**(m+1)*(m*rho+c)**((-m)-2)-1128*L46*((-m)-2)*((-m)-1)*(m&
     ! &*rho)**(m+1)*(m*rho+c)**((-m)-3)-17296*L45*((-m)-3)*((-m)-2)*((-m&
     ! &)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-4)-194580*L44*((-m)-4)*((-m)&
     ! &-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-5)-1712304*&
     ! &L43*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(&
     ! &m*rho+c)**((-m)-6)-12271512*L42*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-&
     ! &3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-7)-73629072*&
     ! &L41*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1&
     ! &)*(m*rho)**(m+1)*(m*rho+c)**((-m)-8)-377348994*L40*((-m)-8)*((-m)&
     ! &-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)&
     ! &**(m+1)*(m*rho+c)**((-m)-9)-1677106640*L39*((-m)-9)*((-m)-8)*((-m&
     ! &)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho&
     ! &)**(m+1)*(m*rho+c)**((-m)-10)-6540715896*L38*((-m)-10)*((-m)-9)*(&
     ! &(-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-&
     ! &m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-11)-22595200368*L37*((-m)-1&
     ! &1)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4&
     ! &)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-12)-&
     ! &69668534468*L36*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*(&
     ! &(-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*&
     ! &rho)**(m+1)*(m*rho+c)**((-m)-13)-192928249296*L35*((-m)-13)*((-m)&
     ! &-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m&
     ! &)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)&
     ! &**((-m)-14)-482320623240*L34*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-&
     ! &11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-&
     ! &4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-15)&
     ! &-1093260079344*L33*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-&
     ! &11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-&
     ! &4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-16)&
     ! &-2254848913647*L32*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-&
     ! &12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)&
     ! &-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)*&
     ! &*((-m)-17)-4244421484512*L31*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-&
     ! &14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-&
     ! &m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rh&
     ! &o)**(m+1)*(m*rho+c)**((-m)-18)-7309837001104*L30*((-m)-18)*((-m)-&
     ! &17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*(&
     ! &(-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((&
     ! &-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-19)-1154&
     ! &1847896480*L29*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*&
     ! &((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-&
     ! &8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)&
     ! &*(m*rho)**(m+1)*(m*rho+c)**((-m)-20)-16735679449896*L28*((-m)-20)&
     ! &*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m&
     ! &)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((&
     ! &-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1&
     ! &)*(m*rho+c)**((-m)-21)-22314239266528*L27*((-m)-21)*((-m)-20)*((-&
     ! &m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13&
     ! &)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-&
     ! &6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m&
     ! &*rho+c)**((-m)-22)-27385657281648*L26*((-m)-22)*((-m)-21)*((-m)-2&
     ! &0)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((&
     ! &-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*&
     ! &((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m&
     ! &+1)*(m*rho+c)**((-m)-23)-30957699535776*L25*((-m)-23)*((-m)-22)*(&
     ! &(-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-&
     ! &15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((&
     ! &-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m&
     ! &)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-24)-32247603683100*L24*((-m)&
     ! &-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*&
     ! &((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)&
     ! &-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)&
     ! &-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-25&
     ! &)-30957699535776*L23*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m&
     ! &)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)&
     ! &*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)&
     ! &-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1&
     ! &)*(m*rho)**(m+1)*(m*rho+c)**((-m)-26)-27385657281648*L22*((-m)-26&
     ! &)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-&
     ! &m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13&
     ! &)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-&
     ! &6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m&
     ! &*rho+c)**((-m)-27)-22314239266528*L21*((-m)-27)*((-m)-26)*((-m)-2&
     ! &5)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((&
     ! &-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-1&
     ! &2)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-&
     ! &5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**&
     ! &((-m)-28)-16735679449896*L20*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-&
     ! &25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*(&
     ! &(-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-&
     ! &12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)&
     ! &-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)*&
     ! &*((-m)-29)-11541847896480*L19*((-m)-29)*((-m)-28)*((-m)-27)*((-m)&
     ! &-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*&
     ! &((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)&
     ! &-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-&
     ! &m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)&
     ! &*(m*rho+c)**((-m)-30)-7309837001104*L18*((-m)-30)*((-m)-29)*((-m)&
     ! &-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*&
     ! &((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)&
     ! &-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*(&
     ! &(-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-&
     ! &m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-31)-4244421484512*L17*((-m)&
     ! &-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*&
     ! &((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)&
     ! &-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*&
     ! &((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*&
     ! &((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-&
     ! &m)-32)-2254848913647*L16*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*&
     ! &((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)&
     ! &-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*&
     ! &((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)&
     ! &-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2&
     ! &)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-33)-1093260079344*L15*&
     ! &((-m)-33)*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)&
     ! &-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*&
     ! &((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)&
     ! &-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((&
     ! &-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*r&
     ! &ho)**(m+1)*(m*rho+c)**((-m)-34)-482320623240*L14*((-m)-34)*((-m)-&
     ! &33)*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*(&
     ! &(-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-&
     ! &20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*(&
     ! &(-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)&
     ! &*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(&
     ! &m+1)*(m*rho+c)**((-m)-35)-192928249296*L13*((-m)-35)*((-m)-34)*((&
     ! &-m)-33)*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-2&
     ! &7)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((&
     ! &-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-1&
     ! &4)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m&
     ! &)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho&
     ! &)**(m+1)*(m*rho+c)**((-m)-36)-69668534468*L12*((-m)-36)*((-m)-35)&
     ! &*((-m)-34)*((-m)-33)*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m&
     ! &)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)&
     ! &*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m&
     ! &)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*&
     ! &((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((&
     ! &-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-37)-22595200368*L11*((-m)-&
     ! &37)*((-m)-36)*((-m)-35)*((-m)-34)*((-m)-33)*((-m)-32)*((-m)-31)*(&
     ! &(-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-&
     ! &24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*(&
     ! &(-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-&
     ! &11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-&
     ! &4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-38)&
     ! &-6540715896*L10*((-m)-38)*((-m)-37)*((-m)-36)*((-m)-35)*((-m)-34)&
     ! &*((-m)-33)*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m&
     ! &)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)&
     ! &*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m&
     ! &)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*(&
     ! &(-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*&
     ! &rho)**(m+1)*(m*rho+c)**((-m)-39)-1677106640*L9*((-m)-39)*((-m)-38&
     ! &)*((-m)-37)*((-m)-36)*((-m)-35)*((-m)-34)*((-m)-33)*((-m)-32)*((-&
     ! &m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25&
     ! &)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-&
     ! &m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12&
     ! &)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5&
     ! &)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**(&
     ! &(-m)-40)-377348994*L8*((-m)-40)*((-m)-39)*((-m)-38)*((-m)-37)*((-&
     ! &m)-36)*((-m)-35)*((-m)-34)*((-m)-33)*((-m)-32)*((-m)-31)*((-m)-30&
     ! &)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-&
     ! &m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17&
     ! &)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-&
     ! &m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m&
     ! &)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-41)-736290&
     ! &72*L7*((-m)-41)*((-m)-40)*((-m)-39)*((-m)-38)*((-m)-37)*((-m)-36)&
     ! &*((-m)-35)*((-m)-34)*((-m)-33)*((-m)-32)*((-m)-31)*((-m)-30)*((-m&
     ! &)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)&
     ! &*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m&
     ! &)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)&
     ! &*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*(&
     ! &(-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-42)-12271512*L6*&
     ! &((-m)-42)*((-m)-41)*((-m)-40)*((-m)-39)*((-m)-38)*((-m)-37)*((-m)&
     ! &-36)*((-m)-35)*((-m)-34)*((-m)-33)*((-m)-32)*((-m)-31)*((-m)-30)*&
     ! &((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)&
     ! &-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*&
     ! &((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)&
     ! &-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-&
     ! &3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-43)-1712304*&
     ! &L5*((-m)-43)*((-m)-42)*((-m)-41)*((-m)-40)*((-m)-39)*((-m)-38)*((&
     ! &-m)-37)*((-m)-36)*((-m)-35)*((-m)-34)*((-m)-33)*((-m)-32)*((-m)-3&
     ! &1)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((&
     ! &-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-1&
     ! &8)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((&
     ! &-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((&
     ! &-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)&
     ! &-44)-194580*L4*((-m)-44)*((-m)-43)*((-m)-42)*((-m)-41)*((-m)-40)*&
     ! &((-m)-39)*((-m)-38)*((-m)-37)*((-m)-36)*((-m)-35)*((-m)-34)*((-m)&
     ! &-33)*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*&
     ! &((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)&
     ! &-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*&
     ! &((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7&
     ! &)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**&
     ! &(m+1)*(m*rho+c)**((-m)-45)-17296*L3*((-m)-45)*((-m)-44)*((-m)-43)&
     ! &*((-m)-42)*((-m)-41)*((-m)-40)*((-m)-39)*((-m)-38)*((-m)-37)*((-m&
     ! &)-36)*((-m)-35)*((-m)-34)*((-m)-33)*((-m)-32)*((-m)-31)*((-m)-30)&
     ! &*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m&
     ! &)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)&
     ! &*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m&
     ! &)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)&
     ! &-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-46)-1128*L2&
     ! &*((-m)-46)*((-m)-45)*((-m)-44)*((-m)-43)*((-m)-42)*((-m)-41)*((-m&
     ! &)-40)*((-m)-39)*((-m)-38)*((-m)-37)*((-m)-36)*((-m)-35)*((-m)-34)&
     ! &*((-m)-33)*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m&
     ! &)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)&
     ! &*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m&
     ! &)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*(&
     ! &(-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*&
     ! &rho)**(m+1)*(m*rho+c)**((-m)-47)-48*L1*((-m)-47)*((-m)-46)*((-m)-&
     ! &45)*((-m)-44)*((-m)-43)*((-m)-42)*((-m)-41)*((-m)-40)*((-m)-39)*(&
     ! &(-m)-38)*((-m)-37)*((-m)-36)*((-m)-35)*((-m)-34)*((-m)-33)*((-m)-&
     ! &32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*(&
     ! &(-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-&
     ! &19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*(&
     ! &(-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*&
     ! &((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rh&
     ! &o+c)**((-m)-48)-L0*((-m)-48)*((-m)-47)*((-m)-46)*((-m)-45)*((-m)-&
     ! &44)*((-m)-43)*((-m)-42)*((-m)-41)*((-m)-40)*((-m)-39)*((-m)-38)*(&
     ! &(-m)-37)*((-m)-36)*((-m)-35)*((-m)-34)*((-m)-33)*((-m)-32)*((-m)-&
     ! &31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*(&
     ! &(-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-&
     ! &18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*(&
     ! &(-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*(&
     ! &(-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m&
     ! &)-49)
     !      if (deriv(i) .eq. 49) then
     !         L(i) = L49
     !         cycle
     !      end if
     ! L50 = (-L49*(m*rho)**(m+1)*(m*rho+c)**((-m)-1))-49*L48*((-m)-1)&
     ! &*(m*rho)**(m+1)*(m*rho+c)**((-m)-2)-1176*L47*((-m)-2)*((-m)-1)*(m&
     ! &*rho)**(m+1)*(m*rho+c)**((-m)-3)-18424*L46*((-m)-3)*((-m)-2)*((-m&
     ! &)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-4)-211876*L45*((-m)-4)*((-m)&
     ! &-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-5)-1906884*&
     ! &L44*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(&
     ! &m*rho+c)**((-m)-6)-13983816*L43*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-&
     ! &3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-7)-85900584*&
     ! &L42*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1&
     ! &)*(m*rho)**(m+1)*(m*rho+c)**((-m)-8)-450978066*L41*((-m)-8)*((-m)&
     ! &-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)&
     ! &**(m+1)*(m*rho+c)**((-m)-9)-2054455634*L40*((-m)-9)*((-m)-8)*((-m&
     ! &)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho&
     ! &)**(m+1)*(m*rho+c)**((-m)-10)-8217822536*L39*((-m)-10)*((-m)-9)*(&
     ! &(-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-&
     ! &m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-11)-29135916264*L38*((-m)-1&
     ! &1)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4&
     ! &)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-12)-&
     ! &92263734836*L37*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*(&
     ! &(-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*&
     ! &rho)**(m+1)*(m*rho+c)**((-m)-13)-262596783764*L36*((-m)-13)*((-m)&
     ! &-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m&
     ! &)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)&
     ! &**((-m)-14)-675248872536*L35*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-&
     ! &11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-&
     ! &4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-15)&
     ! &-1575580702584*L34*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-&
     ! &11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-&
     ! &4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-16)&
     ! &-3348108992991*L33*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-&
     ! &12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)&
     ! &-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)*&
     ! &*((-m)-17)-6499270398159*L32*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-&
     ! &14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-&
     ! &m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rh&
     ! &o)**(m+1)*(m*rho+c)**((-m)-18)-11554258485616*L31*((-m)-18)*((-m)&
     ! &-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*&
     ! &((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*(&
     ! &(-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-19)-188&
     ! &51684897584*L30*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)&
     ! &*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)&
     ! &-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1&
     ! &)*(m*rho)**(m+1)*(m*rho+c)**((-m)-20)-28277527346376*L29*((-m)-20&
     ! &)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-&
     ! &m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*(&
     ! &(-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+&
     ! &1)*(m*rho+c)**((-m)-21)-39049918716424*L28*((-m)-21)*((-m)-20)*((&
     ! &-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-1&
     ! &3)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)&
     ! &-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(&
     ! &m*rho+c)**((-m)-22)-49699896548176*L27*((-m)-22)*((-m)-21)*((-m)-&
     ! &20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*(&
     ! &(-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)&
     ! &*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(&
     ! &m+1)*(m*rho+c)**((-m)-23)-58343356817424*L26*((-m)-23)*((-m)-22)*&
     ! &((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)&
     ! &-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*(&
     ! &(-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-&
     ! &m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-24)-63205303218876*L25*((-m&
     ! &)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)&
     ! &*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m&
     ! &)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m&
     ! &)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-2&
     ! &5)-63205303218876*L24*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-&
     ! &m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15&
     ! &)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m&
     ! &)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-&
     ! &1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-26)-58343356817424*L23*((-m)-2&
     ! &6)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((&
     ! &-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-1&
     ! &3)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)&
     ! &-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(&
     ! &m*rho+c)**((-m)-27)-49699896548176*L22*((-m)-27)*((-m)-26)*((-m)-&
     ! &25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*(&
     ! &(-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-&
     ! &12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)&
     ! &-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)*&
     ! &*((-m)-28)-39049918716424*L21*((-m)-28)*((-m)-27)*((-m)-26)*((-m)&
     ! &-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*&
     ! &((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)&
     ! &-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m&
     ! &)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)&
     ! &**((-m)-29)-28277527346376*L20*((-m)-29)*((-m)-28)*((-m)-27)*((-m&
     ! &)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)&
     ! &*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m&
     ! &)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((&
     ! &-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1&
     ! &)*(m*rho+c)**((-m)-30)-18851684897584*L19*((-m)-30)*((-m)-29)*((-&
     ! &m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22&
     ! &)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-&
     ! &m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)&
     ! &*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*(&
     ! &(-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-31)-11554258485616*L18*((&
     ! &-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-2&
     ! &5)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((&
     ! &-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-1&
     ! &2)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-&
     ! &5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**&
     ! &((-m)-32)-6499270398159*L17*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-2&
     ! &9)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((&
     ! &-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-1&
     ! &6)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((&
     ! &-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m&
     ! &)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-33)-3348108992991*L&
     ! &16*((-m)-33)*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((&
     ! &-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-2&
     ! &1)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((&
     ! &-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)&
     ! &*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(&
     ! &m*rho)**(m+1)*(m*rho+c)**((-m)-34)-1575580702584*L15*((-m)-34)*((&
     ! &-m)-33)*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-2&
     ! &7)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((&
     ! &-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-1&
     ! &4)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m&
     ! &)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho&
     ! &)**(m+1)*(m*rho+c)**((-m)-35)-675248872536*L14*((-m)-35)*((-m)-34&
     ! &)*((-m)-33)*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-&
     ! &m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21&
     ! &)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-&
     ! &m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*&
     ! &((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m&
     ! &*rho)**(m+1)*(m*rho+c)**((-m)-36)-262596783764*L13*((-m)-36)*((-m&
     ! &)-35)*((-m)-34)*((-m)-33)*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)&
     ! &*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m&
     ! &)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)&
     ! &*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m&
     ! &)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-&
     ! &2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-37)-92263734836*L12*(&
     ! &(-m)-37)*((-m)-36)*((-m)-35)*((-m)-34)*((-m)-33)*((-m)-32)*((-m)-&
     ! &31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*(&
     ! &(-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-&
     ! &18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*(&
     ! &(-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*(&
     ! &(-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m&
     ! &)-38)-29135916264*L11*((-m)-38)*((-m)-37)*((-m)-36)*((-m)-35)*((-&
     ! &m)-34)*((-m)-33)*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28&
     ! &)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-&
     ! &m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15&
     ! &)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m&
     ! &)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-&
     ! &1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-39)-8217822536*L10*((-m)-39)*(&
     ! &(-m)-38)*((-m)-37)*((-m)-36)*((-m)-35)*((-m)-34)*((-m)-33)*((-m)-&
     ! &32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*(&
     ! &(-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-&
     ! &19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*(&
     ! &(-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*&
     ! &((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rh&
     ! &o+c)**((-m)-40)-2054455634*L9*((-m)-40)*((-m)-39)*((-m)-38)*((-m)&
     ! &-37)*((-m)-36)*((-m)-35)*((-m)-34)*((-m)-33)*((-m)-32)*((-m)-31)*&
     ! &((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)&
     ! &-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*&
     ! &((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)&
     ! &-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)&
     ! &-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-41&
     ! &)-450978066*L8*((-m)-41)*((-m)-40)*((-m)-39)*((-m)-38)*((-m)-37)*&
     ! &((-m)-36)*((-m)-35)*((-m)-34)*((-m)-33)*((-m)-32)*((-m)-31)*((-m)&
     ! &-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*&
     ! &((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)&
     ! &-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*&
     ! &((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*(&
     ! &(-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-42)-859&
     ! &00584*L7*((-m)-42)*((-m)-41)*((-m)-40)*((-m)-39)*((-m)-38)*((-m)-&
     ! &37)*((-m)-36)*((-m)-35)*((-m)-34)*((-m)-33)*((-m)-32)*((-m)-31)*(&
     ! &(-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-&
     ! &24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*(&
     ! &(-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-&
     ! &11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-&
     ! &4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-43)&
     ! &-13983816*L6*((-m)-43)*((-m)-42)*((-m)-41)*((-m)-40)*((-m)-39)*((&
     ! &-m)-38)*((-m)-37)*((-m)-36)*((-m)-35)*((-m)-34)*((-m)-33)*((-m)-3&
     ! &2)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((&
     ! &-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-1&
     ! &9)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((&
     ! &-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*(&
     ! &(-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho&
     ! &+c)**((-m)-44)-1906884*L5*((-m)-44)*((-m)-43)*((-m)-42)*((-m)-41)&
     ! &*((-m)-40)*((-m)-39)*((-m)-38)*((-m)-37)*((-m)-36)*((-m)-35)*((-m&
     ! &)-34)*((-m)-33)*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)&
     ! &*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m&
     ! &)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)&
     ! &*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)&
     ! &-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1&
     ! &)*(m*rho)**(m+1)*(m*rho+c)**((-m)-45)-211876*L4*((-m)-45)*((-m)-4&
     ! &4)*((-m)-43)*((-m)-42)*((-m)-41)*((-m)-40)*((-m)-39)*((-m)-38)*((&
     ! &-m)-37)*((-m)-36)*((-m)-35)*((-m)-34)*((-m)-33)*((-m)-32)*((-m)-3&
     ! &1)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((&
     ! &-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-1&
     ! &8)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((&
     ! &-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((&
     ! &-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)&
     ! &-46)-18424*L3*((-m)-46)*((-m)-45)*((-m)-44)*((-m)-43)*((-m)-42)*(&
     ! &(-m)-41)*((-m)-40)*((-m)-39)*((-m)-38)*((-m)-37)*((-m)-36)*((-m)-&
     ! &35)*((-m)-34)*((-m)-33)*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*(&
     ! &(-m)-28)*((-m)-27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-&
     ! &22)*((-m)-21)*((-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*(&
     ! &(-m)-15)*((-m)-14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-&
     ! &9)*((-m)-8)*((-m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)&
     ! &*((-m)-1)*(m*rho)**(m+1)*(m*rho+c)**((-m)-47)-1176*L2*((-m)-47)*(&
     ! &(-m)-46)*((-m)-45)*((-m)-44)*((-m)-43)*((-m)-42)*((-m)-41)*((-m)-&
     ! &40)*((-m)-39)*((-m)-38)*((-m)-37)*((-m)-36)*((-m)-35)*((-m)-34)*(&
     ! &(-m)-33)*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-&
     ! &27)*((-m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*(&
     ! &(-m)-20)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-&
     ! &14)*((-m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-&
     ! &m)-7)*((-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rh&
     ! &o)**(m+1)*(m*rho+c)**((-m)-48)-49*L1*((-m)-48)*((-m)-47)*((-m)-46&
     ! &)*((-m)-45)*((-m)-44)*((-m)-43)*((-m)-42)*((-m)-41)*((-m)-40)*((-&
     ! &m)-39)*((-m)-38)*((-m)-37)*((-m)-36)*((-m)-35)*((-m)-34)*((-m)-33&
     ! &)*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-&
     ! &m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20&
     ! &)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-&
     ! &m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*(&
     ! &(-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+&
     ! &1)*(m*rho+c)**((-m)-49)-L0*((-m)-49)*((-m)-48)*((-m)-47)*((-m)-46&
     ! &)*((-m)-45)*((-m)-44)*((-m)-43)*((-m)-42)*((-m)-41)*((-m)-40)*((-&
     ! &m)-39)*((-m)-38)*((-m)-37)*((-m)-36)*((-m)-35)*((-m)-34)*((-m)-33&
     ! &)*((-m)-32)*((-m)-31)*((-m)-30)*((-m)-29)*((-m)-28)*((-m)-27)*((-&
     ! &m)-26)*((-m)-25)*((-m)-24)*((-m)-23)*((-m)-22)*((-m)-21)*((-m)-20&
     ! &)*((-m)-19)*((-m)-18)*((-m)-17)*((-m)-16)*((-m)-15)*((-m)-14)*((-&
     ! &m)-13)*((-m)-12)*((-m)-11)*((-m)-10)*((-m)-9)*((-m)-8)*((-m)-7)*(&
     ! &(-m)-6)*((-m)-5)*((-m)-4)*((-m)-3)*((-m)-2)*((-m)-1)*(m*rho)**(m+&
     ! &1)*(m*rho+c)**((-m)-50)
     !      if (deriv(i) .eq. 50) then
     !         L(i) = L50
     !         cycle
     !      end if
  end do
end subroutine laplace_pvf_E1
back to top