lastall1

int[\[Tau]/(1 + \[Tau]), 
   (log[1 + \[Tau]]*log[(ab[1, 2, 5, 6]*ab[1, 6, 7, 8])/
       (ab[1, 2, 6, 7]*ab[1, 5, 6, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 5] + 
 int[1 + \[Tau], (log[1 + \[Tau]^(-1)]*log[(ab[1, 2, 5, 6]*ab[1, 6, 7, 8])/
       (ab[1, 2, 6, 7]*ab[1, 5, 6, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 5] + 
 int[\[Tau]/(1 + \[Tau]), 
   (log[1 + \[Tau]]*log[(ab[1, 2, 4, 5]*ab[1, 5, 6, 8])/
       (ab[1, 2, 5, 6]*ab[1, 4, 5, 8])])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 5] - 
 int[1 + \[Tau], 
   -(log[(ab[1, 2, 5, 6]*ab[1, 6, 7, 8])/(ab[1, 2, 6, 7]*ab[1, 5, 6, 8])]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 5] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   -Li[1 - (ab[1, 2, 4, 5]*ab[1, 5, 6, 8])/(ab[1, 2, 5, 6]*ab[1, 4, 5, 8])] + 
    (log[(ab[1, 2, 4, 5]*ab[1, 5, 6, 8])/(ab[1, 2, 5, 6]*ab[1, 4, 5, 8])]*
      log[((1 + \[Tau])*ab[1, 2, 5, 6]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8]*
         ab[3, 4, 6, 7])/(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[3, 4, 5, 6]*
         ab[4, 5, 6, 7])])/2]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[1, 2, 3, 4, 5] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (-Li[1] - log[(ab[1, 2, 5, 6]*ab[1, 6, 7, 8])/(ab[1, 2, 6, 7]*
         ab[1, 5, 6, 8])]*log[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 5] + 
 intdone[log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
      ab[5, 6, 7, 8])], -Li[1]/2 - 
    (log[(ab[1, 2, 5, 6]*ab[2, 3, 4, 5])/(ab[1, 2, 4, 5]*ab[2, 3, 5, 6])]*
      log[(ab[1, 2, 3, 4]*ab[4, 5, 6, 7])/(ab[1, 2, 4, 5]*ab[3, 4, 6, 7])])/
     2]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 5] - 
 int[\[Tau]/(1 + \[Tau]), 
   (log[1 + \[Tau]]*log[(ab[1, 2, 3, 4]*ab[1, 4, 5, 8])/
       (ab[1, 2, 4, 5]*ab[1, 3, 4, 8])])/2]*
  Qlog[ab[7, 8, 1, 6]/ab[7, 8, 1, cap[{4, 5}, {1, 2, 3}]]]*R[1, 2, 3, 4, 5] + 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[cap[{4, 5}, {1, 2, 3}], 
        6, 7, 8])/(ab[1, cap[{4, 5}, {1, 2, 3}], 6, 8]*ab[2, 3, 7, 8])), 
   (-Li[1] + log[(ab[1, 2, 3, 4]*ab[1, 4, 5, 8])/(ab[1, 2, 4, 5]*
         ab[1, 3, 4, 8])]*log[((1 + \[Tau])*ab[1, 2, 4, 5]*ab[2, 3, 7, 8])/
        (ab[1, 2, 7, 8]*ab[2, 3, 4, 5])])/2]*
  Qlog[ab[7, 8, 1, 6]/ab[7, 8, 1, cap[{4, 5}, {1, 2, 3}]]]*R[1, 2, 3, 4, 5] + 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[cap[{4, 5}, {1, 2, 3}], 6, 7, 8])/
      (ab[1, cap[{4, 5}, {1, 2, 3}], 6, 8]*ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (-Li[1] + log[(ab[1, 2, 3, 4]*ab[1, 4, 5, 8])/(ab[1, 2, 4, 5]*
         ab[1, 3, 4, 8])]*log[((1 + \[Tau])*ab[1, 2, 4, 5]*ab[2, 3, 7, 8])/
        (ab[1, 2, 7, 8]*ab[2, 3, 4, 5])])/2]*
  Qlog[ab[7, 8, 1, 6]/ab[7, 8, 1, cap[{4, 5}, {1, 2, 3}]]]*R[1, 2, 3, 4, 5] + 
 int[\[Tau]/(1 + \[Tau]), 
   -(log[(ab[1, 2, 7, 8]*ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[4, 5, 7, 8])]*
      log[((\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8])*ab[5, 6, 7, 8])/(ab[4, 5, 7, 8]*
         (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*
  R[1, 2, 3, 4, 7] - 
 int[(\[Tau] - (ab[1, 2, 3, 7]*ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
      (ab[2, 3, 7, 8]*ab[cap[{1, 8}, {1, 2, 3}], 4, 5, 7]))/(1 + \[Tau]), 
   (-Li[1] - log[(ab[1, 2, 7, 8]*ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*
         ab[4, 5, 7, 8])]*log[((\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[4, 5, 7, 8])*ab[5, 6, 7, 8])/
        (ab[4, 5, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*R[1, 2, 3, 4, 7] + 
 intt1[((3*ab[1, 6, 7, cap[{8, 2}, {1, 3, 4}]]^2*ab[2, 3, 7, 8]*
       ((1 + t)^2*ab[1, 2, 7, cap[{6, 8}, {3, 4, 7}]]*
         ab[1, 6, 7, cap[{8, 2}, {1, 3, 4}]] - 4*t*ab[1, 2, 3, 4]*
         ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[3, 4, 6, 7])*
       ((Log[(2*ab[1, 2, 3, 8]*((1 + t)*ab[1, 2, 7, cap[{6, 8}, {3, 4, 7}]]*
               ab[1, 6, 7, cap[{8, 2}, {1, 3, 4}]] - 2*ab[1, 2, 3, 4]*ab[1, 
                2, 7, 8]*ab[1, 6, 7, 8]*ab[3, 4, 6, 7]))/((-1 + t^2)*
             ab[1, 6, 7, cap[{8, 2}, {1, 3, 4}]]^2*ab[2, 3, 7, 8])] + 
          Log[(ab[1, 2, 3, 4]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8])/
            (ab[1, 2, 3, 8]*ab[1, 2, 6, 7]*ab[3, 4, 7, 8])])*
         Log[(ab[1, 2, 7, 8]*ab[3, 4, 6, 7])/(ab[1, 2, 6, 7]*
            ab[3, 4, 7, 8])] + 2*PolyLog[2, 
          1 - (ab[1, 2, 7, 8]*ab[3, 4, 6, 7])/(ab[1, 2, 6, 7]*
             ab[3, 4, 7, 8])]))/(((1 + t)*ab[1, 2, 7, cap[{6, 8}, {3, 4, 7}]]*
         ab[1, 6, 7, cap[{8, 2}, {1, 3, 4}]] - 2*ab[1, 2, 3, 4]*
         ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[3, 4, 6, 7])*
       (2*(1 + t)*ab[1, 2, 3, 8]*ab[1, 2, 7, cap[{6, 8}, {3, 4, 7}]]*
         ab[1, 6, 7, cap[{8, 2}, {1, 3, 4}]] + (-1 + t^2)*
         ab[1, 6, 7, cap[{8, 2}, {1, 3, 4}]]^2*ab[2, 3, 7, 8] - 
        4*ab[1, 2, 3, 4]*ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
         ab[3, 4, 6, 7])) + (ab[1, 2, 7, cap[{3, 4}, {6, 7, 8}]]*
       ab[1, 6, 7, cap[{3, 4}, {1, 2, 8}]]*
       (Pi^2 + 6*Log[((1 + t)*(-(ab[1, 2, 6, 7]*ab[1, 3, 4, 8]) + 
             ab[1, 2, 3, 4]*ab[1, 6, 7, 8]))/
           (-((1 + t)*ab[1, 2, 6, 7]*ab[1, 3, 4, 8]) + 
            (-1 + t)*ab[1, 2, 3, 4]*ab[1, 6, 7, 8])]*
         Log[((-1 + t)*ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
             ab[3, 4, 6, 7] + (1 + t)*ab[1, 2, 6, 7]*ab[1, 3, 4, 7]*
             ab[6, 7, 8, cap[{1, 2}, {3, 4, 8}]])/(ab[1, 2, 6, 7]*
            ((-1 + t)*ab[1, 6, 7, cap[{8, 2}, {1, 3, 4}]]*ab[3, 4, 7, 8] + 
             2*ab[1, 3, 4, 7]*ab[6, 7, 8, cap[{1, 2}, {3, 4, 8}]]))] - 
        3*Log[(2*ab[1, 2, 3, 4]*ab[1, 6, 7, 8]*((-1 + t)*ab[1, 2, 3, 4]*
              ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[3, 4, 6, 7] + 
             (1 + t)*ab[1, 2, 6, 7]*ab[1, 3, 4, 7]*ab[6, 7, 8, cap[{1, 2}, 
                {3, 4, 8}]]))/(ab[1, 2, 6, 7]*((1 + t)*ab[1, 2, 6, 7]*
              ab[1, 3, 4, 8] - (-1 + t)*ab[1, 2, 3, 4]*ab[1, 6, 7, 8])*
            ((-1 + t)*ab[1, 6, 7, cap[{8, 2}, {1, 3, 4}]]*ab[3, 4, 7, 8] + 
             2*ab[1, 3, 4, 7]*ab[6, 7, 8, cap[{1, 2}, {3, 4, 8}]]))]*
         Log[((1 + t)*(1 - (ab[1, 2, 3, 4]*ab[1, 6, 7, 8])/(ab[1, 2, 6, 7]*ab[
                1, 3, 4, 8]))*(1 - ((-1 + t)*ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*
                ab[1, 6, 7, 8]*ab[3, 4, 6, 7] + (1 + t)*ab[1, 2, 6, 7]*
                ab[1, 3, 4, 7]*ab[6, 7, 8, cap[{1, 2}, {3, 4, 8}]])/
              (ab[1, 2, 6, 7]*((-1 + t)*ab[1, 6, 7, cap[{8, 2}, {1, 3, 4}]]*
                 ab[3, 4, 7, 8] + 2*ab[1, 3, 4, 7]*ab[6, 7, 8, cap[{1, 2}, 
                   {3, 4, 8}]]))))/(1 + t - ((-1 + t)*ab[1, 2, 3, 4]*
              ab[1, 6, 7, 8])/(ab[1, 2, 6, 7]*ab[1, 3, 4, 8]))] - 
        6*PolyLog[2, ((1 + t)*(-(ab[1, 2, 6, 7]*ab[1, 3, 4, 8]) + 
             ab[1, 2, 3, 4]*ab[1, 6, 7, 8]))/
           (-((1 + t)*ab[1, 2, 6, 7]*ab[1, 3, 4, 8]) + 
            (-1 + t)*ab[1, 2, 3, 4]*ab[1, 6, 7, 8])] - 
        6*PolyLog[2, ((-1 + t)*ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
             ab[3, 4, 6, 7] + (1 + t)*ab[1, 2, 6, 7]*ab[1, 3, 4, 7]*
             ab[6, 7, 8, cap[{1, 2}, {3, 4, 8}]])/(ab[1, 2, 6, 7]*
            ((-1 + t)*ab[1, 6, 7, cap[{8, 2}, {1, 3, 4}]]*ab[3, 4, 7, 8] + 
             2*ab[1, 3, 4, 7]*ab[6, 7, 8, cap[{1, 2}, {3, 4, 8}]]))]))/
      ((-1 + t)*ab[1, 2, 7, cap[{3, 4}, {6, 7, 8}]]*
        ab[1, 6, 7, cap[{3, 4}, {1, 2, 8}]] + 2*ab[1, 2, 6, 7]*ab[1, 3, 4, 7]*
        ab[cap[{3, 4}, {1, 2, 8}], 6, 7, 8]))/6]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 7] + 
 int[\[Tau]/(1 + \[Tau]), 
   Li[1 - (ab[3, 4, 7, 8]*ab[4, 5, 6, 7])/(ab[3, 4, 6, 7]*ab[4, 5, 7, 8])] + 
    (-2*Li[1 - ((\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
             ab[3, 4, 7, 8])*ab[4, 5, 6, 7])/(ab[3, 4, 6, 7]*
           (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
             ab[4, 5, 7, 8]))] + 
      log[(ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
         (ab[1, 2, 3, 8]*ab[2, 3, 5, 6]*ab[3, 4, 6, 7]*ab[4, 5, 7, 8])]*
       log[(ab[3, 4, 7, 8]*ab[4, 5, 6, 7])/(ab[3, 4, 6, 7]*ab[4, 5, 7, 8])] - 
      log[(ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
         (ab[2, 3, 5, 6]*ab[3, 4, 6, 7]*(\[Tau]*ab[1, 4, 5, 8]*
            ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]*
       log[((\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
            ab[3, 4, 7, 8])*ab[4, 5, 6, 7])/(ab[3, 4, 6, 7]*
          (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
            ab[4, 5, 7, 8]))] - log[\[Tau]]*
       log[((\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
            ab[3, 4, 7, 8])*ab[4, 5, 7, 8])/(ab[3, 4, 7, 8]*
          (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
            ab[4, 5, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 6]]*
  R[1, 2, 3, 4, 7] - 
 int[1 + \[Tau], Li[1 - (ab[1, 3, 4, 8]*ab[4, 5, 6, 7])/
       (ab[1, 4, 5, 8]*ab[3, 4, 6, 7])] + 
    (-2*Li[1 - ((\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
             ab[3, 4, 7, 8])*ab[4, 5, 6, 7])/(ab[3, 4, 6, 7]*
           (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
             ab[4, 5, 7, 8]))] + 
      log[(ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[3, 4, 5, 6])/
         (ab[1, 4, 5, 8]*ab[2, 3, 5, 6]*ab[3, 4, 6, 7])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 6, 7])/(ab[1, 4, 5, 8]*ab[3, 4, 6, 7])] - 
      log[(\[Tau]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 7, 8]*
          ab[3, 4, 5, 6])/(ab[2, 3, 5, 6]*ab[3, 4, 6, 7]*
          (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
            ab[4, 5, 7, 8]))]*log[((\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
           ab[1, 2, 3, 8]*ab[3, 4, 7, 8])*ab[4, 5, 6, 7])/
         (ab[3, 4, 6, 7]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
           ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 7] + 
 int[1 + \[Tau], Li[1 - (ab[1, 3, 4, 8]*ab[4, 5, 6, 7])/
       (ab[1, 4, 5, 8]*ab[3, 4, 6, 7])] - 
    Li[1 - ((\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[3, 4, 7, 8])*ab[4, 5, 6, 7])/(ab[3, 4, 6, 7]*
        (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[4, 5, 7, 8]))] - 
    (log[(\[Tau]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
        (ab[2, 3, 5, 6]*ab[3, 4, 6, 7]*(\[Tau]*ab[1, 4, 5, 8]*
           ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
          (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 7] + 
 int[1 + \[Tau], (log[(ab[1, 3, 4, 8]*ab[4, 5, 6, 7])/
       (ab[1, 4, 5, 8]*ab[3, 4, 6, 7])]*
     log[1 + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(\[Tau]*ab[1, 4, 5, 8]*
         ab[2, 3, 7, 8])])/2]*Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 6]]*
  R[1, 2, 3, 4, 7] - 
 int[(\[Tau] - (ab[1, 2, 3, 7]*ab[1, 2, 3, 8]*ab[4, 6, 7, 8])/
      (ab[2, 3, 7, 8]*ab[cap[{1, 8}, {1, 2, 3}], 4, 6, 7]))/(1 + \[Tau]), 
   -Li[1 - ((\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[3, 4, 7, 8])*ab[4, 5, 6, 7])/(ab[3, 4, 6, 7]*
         (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8]))] - 
    (log[(\[Tau]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
        (ab[2, 3, 5, 6]*ab[3, 4, 6, 7]*(\[Tau]*ab[1, 4, 5, 8]*
           ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]*
      log[((\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[3, 4, 7, 8])*ab[4, 5, 6, 7])/(ab[3, 4, 6, 7]*
         (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 6]]*
  R[1, 2, 3, 4, 7] + int[\[Tau]/(1 + \[Tau]), 
   -(log[(\[Tau]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
        (ab[3, 4, 6, 7]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]*
      log[((\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8])*ab[5, 6, 7, 8])/(ab[4, 5, 7, 8]*
         (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[1, 2, 3, 4, 7] + 
 int[1 + \[Tau], -(log[(\[Tau]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
        (ab[3, 4, 6, 7]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 7] - 
 int[1 + \[Tau], 
   (-(log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
       log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
           (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))]) - 
     log[(\[Tau]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
        (ab[3, 4, 6, 7]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 7] + 
 int[1 + \[Tau], (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/
       (ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
     log[1 + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(\[Tau]*ab[1, 5, 6, 8]*
         ab[2, 3, 7, 8])])/2]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[1, 2, 3, 4, 7] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (-Li[1] - log[(\[Tau]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
        (ab[3, 4, 6, 7]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]*
      log[((\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8])*ab[5, 6, 7, 8])/(ab[4, 5, 7, 8]*
         (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[1, 2, 3, 4, 7] + int[\[Tau]/(1 + \[Tau]), 
   (log[1 + (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
         ab[4, 5, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
         (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*R[1, 2, 3, 4, 8] - 
 int[1 + \[Tau], -Li[1] + Li[\[Tau]/(1 + \[Tau])]]*
  Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*R[1, 2, 3, 4, 8] - 
 int[1 + \[Tau], Li[(ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/
     ((1 + \[Tau])*ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]]*
  Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*R[1, 2, 3, 4, 8] - 
 int[1 + \[Tau], -Li[(ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/
       (ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
    Li[(\[Tau]*ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/
      (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
        ab[3, 4, 7, 8])]]*Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*
  R[1, 2, 3, 4, 8] - 
 int[1 + \[Tau], Li[(ab[1, 2, 3, 8]*ab[1, 5, 7, 8]*ab[4, 5, 6, 8])/
     (ab[1, 5, 6, 8]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
       ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]]*Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*
  R[1, 2, 3, 4, 8] - 
 int[1 + \[Tau], Li[(ab[1, 2, 3, 8]*(ab[1, 4, 5, 8]*ab[3, 4, 7, 8] - 
       ab[1, 3, 4, 8]*ab[4, 5, 7, 8]))/(ab[1, 4, 5, 8]*
      (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
        ab[3, 4, 7, 8]))]]*Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*
  R[1, 2, 3, 4, 8] - 
 int[1 + \[Tau], Li[(\[Tau]*ab[2, 3, 7, 8]*(ab[1, 4, 5, 8]*ab[3, 4, 7, 8] - 
        ab[1, 3, 4, 8]*ab[4, 5, 7, 8]))/(ab[3, 4, 7, 8]*
       (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
         ab[4, 5, 7, 8]))] - Li[1 - (ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/
       (ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]]*Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*
  R[1, 2, 3, 4, 8] - 
 int[1 + \[Tau], -Li[(ab[1, 5, 7, 8]*ab[4, 5, 6, 8])/
       (ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
    Li[(\[Tau]*ab[1, 5, 7, 8]*ab[2, 3, 7, 8]*ab[4, 5, 6, 8])/
      (ab[4, 5, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
        ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]]*Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*
  R[1, 2, 3, 4, 8] - 
 int[1 + \[Tau], Li[(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
     (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]]*
  Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*R[1, 2, 3, 4, 8] - 
 int[1 + \[Tau], -(log[\[Tau]/(1 + \[Tau])]*log[1 + \[Tau]])/2]*
  Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*R[1, 2, 3, 4, 8] - 
 int[1 + \[Tau], (log[\[Tau]/(1 + \[Tau])]*
     log[(ab[1, 2, 3, 4]*ab[1, 4, 5, 8])/(ab[1, 2, 4, 5]*ab[1, 3, 4, 8])])/2]*
  Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*R[1, 2, 3, 4, 8] - 
 int[1 + \[Tau], (log[\[Tau]/(1 + \[Tau])]*
     log[(ab[1, 2, 4, 5]*ab[1, 5, 6, 8])/(ab[1, 2, 5, 6]*ab[1, 4, 5, 8])])/2]*
  Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*R[1, 2, 3, 4, 8] - 
 int[1 + \[Tau], (log[\[Tau]/(1 + \[Tau])]*
     log[(ab[1, 2, 3, 4]*ab[1, 6, 7, 8])/(ab[1, 2, 6, 7]*ab[1, 3, 4, 8])])/2]*
  Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*R[1, 2, 3, 4, 8] - 
 int[1 + \[Tau], (log[\[Tau]/(1 + \[Tau])]*
     log[(ab[1, 2, 5, 6]*ab[1, 6, 7, 8])/(ab[1, 2, 6, 7]*ab[1, 5, 6, 8])])/2]*
  Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*R[1, 2, 3, 4, 8] - 
 int[1 + \[Tau], 
   (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
      log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))] + 
     log[(\[Tau]*ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5])/
        (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*(\[Tau]*ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))]*
      log[(1 + \[Tau])/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*R[1, 2, 3, 4, 8] - 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
        ab[2, 3, 4, 5])/((1 + \[Tau])*ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*
        ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
     log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
          ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*R[1, 2, 3, 4, 8] + 
 int[1 + \[Tau], (log[1 + (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8])/
        (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
         (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*R[1, 2, 3, 4, 8] - 
 2*int[1 + \[Tau], 
   -(log[(ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(\[Tau]*ab[1, 4, 5, 8]*
          ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[4, 5, 7, 8])]*
      log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
          (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*R[1, 2, 3, 4, 8] - 
 int[1 + \[Tau], 
   (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
      log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
          (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))] + 
     log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 7, 8]*
         ab[3, 4, 5, 6])/(ab[1, 2, 6, 7]*ab[2, 3, 5, 6]*ab[3, 4, 7, 8]*
         (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8]))]*log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))/(\[Tau] + 
         (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))])/
    2]*Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*R[1, 2, 3, 4, 8] - 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
        ab[2, 3, 4, 5]*ab[3, 4, 5, 6])/(ab[1, 2, 6, 7]*ab[1, 4, 5, 8]*
        ab[2, 3, 5, 6]*(\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))]*
     log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
          ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
         (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*R[1, 2, 3, 4, 8] - 
 int[1 + \[Tau], 
   -Li[(\[Tau]*ab[2, 3, 7, 8]*(ab[1, 5, 6, 8]*ab[4, 5, 7, 8] - 
         ab[1, 4, 5, 8]*ab[5, 6, 7, 8]))/(ab[4, 5, 7, 8]*
        (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8]))] + Li[1 - (ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/
       (ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
    (log[(ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
         (ab[1, 2, 6, 7]*ab[1, 5, 6, 8]*ab[3, 4, 6, 7]*ab[4, 5, 7, 8])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] - 
      log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6]*
          ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[3, 4, 6, 7]*ab[4, 5, 7, 8]*
          (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
            ab[5, 6, 7, 8]))]*log[((\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
           ab[1, 2, 3, 8]*ab[4, 5, 7, 8])*ab[5, 6, 7, 8])/
         (ab[4, 5, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
           ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*R[1, 2, 3, 4, 8] - 
 int[1 + \[Tau], (log[(ab[1, 2, 7, 8]*ab[2, 3, 6, 7])/
       (ab[1, 2, 6, 7]*ab[2, 3, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*R[1, 2, 3, 4, 8] - 
 int[1 + \[Tau], (log[(ab[2, 3, 7, 8]*ab[3, 4, 6, 7])/
       (ab[2, 3, 6, 7]*ab[3, 4, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*R[1, 2, 3, 4, 8] - 
 int[1 + \[Tau], (log[(ab[3, 4, 7, 8]*ab[4, 5, 6, 7])/
       (ab[3, 4, 6, 7]*ab[4, 5, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*R[1, 2, 3, 4, 8] - 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[4, 5, 6, 7]*
        ab[5, 6, 7, 8])/(ab[1, 2, 6, 7]*ab[4, 5, 7, 8]*
        (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8]))]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*R[1, 2, 3, 4, 8] - 
 int[1 + \[Tau], 
   (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
      log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))] + 
     log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6]*
         ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[3, 4, 6, 7]*ab[4, 5, 7, 8]*
         (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8]))]*log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
          (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))/(\[Tau] + 
         (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/
    2]*Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*R[1, 2, 3, 4, 8] - 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
        ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[1, 5, 6, 8]*
        ab[3, 4, 6, 7]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]*
     log[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
          ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
         (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*R[1, 2, 3, 4, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), Li[\[Tau]/(1 + \[Tau])]]*
  Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*R[1, 2, 3, 4, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   Li[(ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/((1 + \[Tau])*ab[1, 3, 4, 8]*
      ab[2, 3, 7, 8])]]*Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*
  R[1, 2, 3, 4, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   Li[(\[Tau]*ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/
     (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[3, 4, 7, 8])]]*
  Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*R[1, 2, 3, 4, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   Li[(ab[1, 2, 3, 8]*ab[1, 5, 7, 8]*ab[4, 5, 6, 8])/
     (ab[1, 5, 6, 8]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
       ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]]*Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*
  R[1, 2, 3, 4, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   Li[(ab[1, 2, 3, 8]*(ab[1, 4, 5, 8]*ab[3, 4, 7, 8] - 
       ab[1, 3, 4, 8]*ab[4, 5, 7, 8]))/(ab[1, 4, 5, 8]*
      (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
        ab[3, 4, 7, 8]))]]*Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*
  R[1, 2, 3, 4, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   Li[(\[Tau]*ab[2, 3, 7, 8]*(ab[1, 4, 5, 8]*ab[3, 4, 7, 8] - 
       ab[1, 3, 4, 8]*ab[4, 5, 7, 8]))/(ab[3, 4, 7, 8]*
      (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
        ab[4, 5, 7, 8]))]]*Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*
  R[1, 2, 3, 4, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   Li[(\[Tau]*ab[1, 5, 7, 8]*ab[2, 3, 7, 8]*ab[4, 5, 6, 8])/
     (ab[4, 5, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
       ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]]*Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*
  R[1, 2, 3, 4, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   Li[(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
      ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]]*Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*
  R[1, 2, 3, 4, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   -(log[1 + \[Tau]]*log[(\[Tau]*ab[1, 2, 3, 4]*ab[1, 6, 7, 8])/
        ((1 + \[Tau])*ab[1, 2, 6, 7]*ab[1, 3, 4, 8])])/2]*
  Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*R[1, 2, 3, 4, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (log[(ab[1, 2, 3, 4]*ab[1, 4, 5, 8])/(ab[1, 2, 4, 5]*ab[1, 3, 4, 8])]*
     log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[3, 4, 5, 6])/
       ((1 + \[Tau])*ab[1, 2, 4, 5]*ab[1, 3, 4, 8]*ab[2, 3, 5, 6]*
        ab[2, 3, 7, 8])])/2]*Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*
  R[1, 2, 3, 4, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (log[(\[Tau]*ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5])/
       (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*(\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))]*
     log[((1 + \[Tau])*ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
       (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
         ab[3, 4, 7, 8])])/2]*Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*
  R[1, 2, 3, 4, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5])/
       ((1 + \[Tau])*ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*ab[1, 3, 4, 8]*
        ab[2, 3, 7, 8])]*log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
         (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*R[1, 2, 3, 4, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (log[(ab[1, 2, 4, 5]*ab[1, 5, 6, 8])/(ab[1, 2, 5, 6]*ab[1, 4, 5, 8])]*
     log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
       ((1 + \[Tau])*ab[1, 2, 5, 6]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8]*
        ab[3, 4, 6, 7])])/2]*Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*
  R[1, 2, 3, 4, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 7, 8]*
        ab[3, 4, 5, 6])/(ab[1, 2, 6, 7]*ab[2, 3, 5, 6]*ab[3, 4, 7, 8]*
        (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[4, 5, 7, 8]))]*log[((\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[3, 4, 7, 8])*ab[4, 5, 7, 8])/
       (ab[3, 4, 7, 8]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*R[1, 2, 3, 4, 8] - 
 2*int[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (-Li[1] - log[(ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
        (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[4, 5, 7, 8])]*
      log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
          (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*R[1, 2, 3, 4, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*
        ab[3, 4, 5, 6])/(ab[1, 2, 6, 7]*ab[1, 4, 5, 8]*ab[2, 3, 5, 6]*
        (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[3, 4, 7, 8]))]*log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
         (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))/(\[Tau] + 
        (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*R[1, 2, 3, 4, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (log[(ab[1, 2, 5, 6]*ab[1, 6, 7, 8])/(ab[1, 2, 6, 7]*ab[1, 5, 6, 8])]*
     log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])/
       ((1 + \[Tau])*ab[1, 2, 6, 7]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8]*
        ab[4, 5, 7, 8])])/2]*Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*
  R[1, 2, 3, 4, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (log[(ab[1, 2, 7, 8]*ab[2, 3, 6, 7])/(ab[1, 2, 6, 7]*ab[2, 3, 7, 8])]*
     log[(\[Tau]*ab[1, 2, 3, 4]*ab[1, 2, 3, 8]*ab[1, 6, 7, 8]*ab[5, 6, 7, 8])/
       (ab[1, 2, 6, 7]*ab[1, 3, 4, 8]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*R[1, 2, 3, 4, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (log[(ab[2, 3, 7, 8]*ab[3, 4, 6, 7])/(ab[2, 3, 6, 7]*ab[3, 4, 7, 8])]*
     log[(\[Tau]*ab[1, 2, 3, 4]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 7, 8]*
        ab[5, 6, 7, 8])/(ab[1, 2, 4, 5]*ab[2, 3, 6, 7]*ab[3, 4, 7, 8]*
        (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*
  R[1, 2, 3, 4, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (log[(ab[3, 4, 7, 8]*ab[4, 5, 6, 7])/(ab[3, 4, 6, 7]*ab[4, 5, 7, 8])]*
     log[(\[Tau]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6]*
        ab[5, 6, 7, 8])/(ab[2, 3, 5, 6]*ab[3, 4, 6, 7]*ab[4, 5, 7, 8]*
        (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*
  R[1, 2, 3, 4, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6]*
        ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[3, 4, 6, 7]*ab[4, 5, 7, 8]*
        (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8]))]*log[((\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[4, 5, 7, 8])*ab[5, 6, 7, 8])/
       (ab[4, 5, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*R[1, 2, 3, 4, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   -Li[(\[Tau]*ab[2, 3, 7, 8]*(ab[1, 5, 6, 8]*ab[4, 5, 7, 8] - 
         ab[1, 4, 5, 8]*ab[5, 6, 7, 8]))/(ab[4, 5, 7, 8]*
        (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8]))] - 
    (log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6]*
         ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[3, 4, 6, 7]*ab[4, 5, 7, 8]*
         (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8]))]*log[((\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[4, 5, 7, 8])*ab[5, 6, 7, 8])/
        (ab[4, 5, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*R[1, 2, 3, 4, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])/
       (ab[1, 2, 6, 7]*ab[4, 5, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*R[1, 2, 3, 4, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[3, 4, 5, 6]*
        ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[1, 5, 6, 8]*ab[3, 4, 6, 7]*
        (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[4, 5, 7, 8]))]*log[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))/(\[Tau] + 
        (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*R[1, 2, 3, 4, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
       ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
      (ab[1, 5, 6, 8]*ab[2, 3, 7, 8])), 
   -Li[(ab[1, 2, 3, 8]*(ab[1, 4, 5, 8]*ab[3, 4, 7, 8] - 
         ab[1, 3, 4, 8]*ab[4, 5, 7, 8]))/(ab[1, 4, 5, 8]*
        (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[3, 4, 7, 8]))] + 
    (log[(ab[1, 2, 6, 7]*ab[1, 4, 5, 8]*ab[2, 3, 5, 6]*
         (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[3, 4, 7, 8]))/(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
         ab[2, 3, 4, 5]*ab[3, 4, 5, 6])]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*R[1, 2, 3, 4, 8] + 
 (intdone[log[(ab[1, 4, 5, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
       ab[4, 5, 7, 8])], Li[1] + Li[(ab[1, 2, 4, 8]*ab[1, 3, 4, 5])/
       (ab[1, 2, 4, 5]*ab[1, 3, 4, 8])] + 
     Li[(ab[1, 2, 5, 8]*ab[1, 4, 5, 6])/(ab[1, 2, 5, 6]*ab[1, 4, 5, 8])] + 
     Li[(ab[1, 2, 6, 8]*ab[1, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[1, 5, 6, 8])] + 
     Li[(ab[1, 2, 3, 5]*ab[2, 4, 5, 6])/(ab[1, 2, 4, 5]*ab[2, 3, 5, 6])] + 
     Li[(ab[1, 2, 3, 6]*ab[2, 5, 6, 7])/(ab[1, 2, 5, 6]*ab[2, 3, 6, 7])] + 
     Li[(ab[1, 2, 3, 7]*ab[2, 6, 7, 8])/(ab[1, 2, 6, 7]*ab[2, 3, 7, 8])] + 
     Li[(ab[2, 3, 4, 6]*ab[3, 5, 6, 7])/(ab[2, 3, 5, 6]*ab[3, 4, 6, 7])] + 
     Li[(ab[2, 3, 4, 7]*ab[3, 6, 7, 8])/(ab[2, 3, 6, 7]*ab[3, 4, 7, 8])] + 
     Li[(ab[3, 4, 5, 7]*ab[4, 6, 7, 8])/(ab[3, 4, 6, 7]*ab[4, 5, 7, 8])] + 
     (log[(ab[1, 2, 5, 6]*ab[2, 3, 4, 5])/(ab[1, 2, 4, 5]*ab[2, 3, 5, 6])]*
       log[(ab[1, 2, 3, 4]*ab[1, 2, 3, 8]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
         (ab[1, 2, 4, 5]*ab[1, 3, 4, 8]*ab[2, 3, 5, 6]*ab[3, 4, 6, 7])])/2 + 
     (log[(ab[1, 2, 6, 7]*ab[2, 3, 5, 6])/(ab[1, 2, 5, 6]*ab[2, 3, 6, 7])]*
       log[(ab[1, 2, 3, 4]*ab[1, 2, 3, 8]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])/
         (ab[1, 2, 5, 6]*ab[1, 3, 4, 8]*ab[2, 3, 6, 7]*ab[4, 5, 7, 8])])/2 + 
     (log[(ab[2, 3, 6, 7]*ab[3, 4, 5, 6])/(ab[2, 3, 5, 6]*ab[3, 4, 6, 7])]*
       log[(ab[1, 2, 3, 4]*ab[2, 3, 4, 5]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])/
         (ab[1, 2, 4, 5]*ab[2, 3, 5, 6]*ab[3, 4, 6, 7]*ab[4, 5, 7, 8])])/2] + 
   intdone[log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[4, 5, 7, 8])], -Li[1]/2 - 
     (log[(ab[1, 2, 3, 4]*ab[1, 4, 5, 8])/(ab[1, 2, 4, 5]*ab[1, 3, 4, 8])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 5, 6])/(ab[1, 3, 4, 8]*ab[2, 3, 5, 6])])/
      2])*Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*R[1, 2, 3, 4, 8] + 
 int[\[Tau]/(1 + \[Tau]), Li[\[Tau]/(1 + \[Tau])]]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   -Li[(ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
    Li[(ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/((1 + \[Tau])*ab[1, 3, 4, 8]*
       ab[2, 3, 7, 8])]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[1, 2, 3, 4, 8] + int[\[Tau]/(1 + \[Tau]), 
   Li[(\[Tau]*ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/
     (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[3, 4, 7, 8])]]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   -Li[(ab[1, 5, 7, 8]*ab[4, 5, 6, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
    Li[(ab[1, 2, 3, 8]*ab[1, 5, 7, 8]*ab[4, 5, 6, 8])/
      (ab[1, 5, 6, 8]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
        ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[1, 2, 3, 4, 8] + int[\[Tau]/(1 + \[Tau]), 
   Li[(\[Tau]*ab[2, 3, 7, 8]*(ab[1, 4, 5, 8]*ab[3, 4, 7, 8] - 
       ab[1, 3, 4, 8]*ab[4, 5, 7, 8]))/(ab[3, 4, 7, 8]*
      (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
        ab[4, 5, 7, 8]))]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[1, 2, 3, 4, 8] + int[\[Tau]/(1 + \[Tau]), 
   Li[(ab[1, 2, 3, 8]*(ab[1, 4, 5, 8]*ab[3, 4, 7, 8] - 
        ab[1, 3, 4, 8]*ab[4, 5, 7, 8]))/(ab[1, 4, 5, 8]*
       (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
         ab[3, 4, 7, 8]))] - Li[1 - (ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/
       (ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[1, 2, 3, 4, 8] + int[\[Tau]/(1 + \[Tau]), 
   Li[(\[Tau]*ab[1, 5, 7, 8]*ab[2, 3, 7, 8]*ab[4, 5, 6, 8])/
     (ab[4, 5, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
       ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[1, 2, 3, 4, 8] + int[\[Tau]/(1 + \[Tau]), 
   -Li[1] + Li[(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
      (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
        ab[5, 6, 7, 8])]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[1, 2, 3, 4, 8] + int[\[Tau]/(1 + \[Tau]), 
   -(log[1 + \[Tau]]*log[(ab[1, 2, 3, 4]*ab[1, 4, 5, 8])/
        (ab[1, 2, 4, 5]*ab[1, 3, 4, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   -(log[1 + \[Tau]]*log[(ab[1, 2, 4, 5]*ab[1, 5, 6, 8])/
        (ab[1, 2, 5, 6]*ab[1, 4, 5, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   (log[1 + \[Tau]]*log[((1 + \[Tau]^(-1))*ab[1, 2, 6, 7]*ab[1, 3, 4, 8])/
       (ab[1, 2, 3, 4]*ab[1, 6, 7, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   -(log[1 + \[Tau]]*log[(ab[1, 2, 5, 6]*ab[1, 6, 7, 8])/
        (ab[1, 2, 6, 7]*ab[1, 5, 6, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   (log[(\[Tau]*ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5])/
       (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*(\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))]*
     log[((1 + \[Tau])*ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
       (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
         ab[3, 4, 7, 8])])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[1, 2, 3, 4, 8] + int[\[Tau]/(1 + \[Tau]), 
   (log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5])/
        (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
      log[(1 + (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[3, 4, 7, 8]))/(1 + \[Tau])] - log[1 + \[Tau]]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   (log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 7, 8]*
        ab[3, 4, 5, 6])/(ab[1, 2, 6, 7]*ab[2, 3, 5, 6]*ab[3, 4, 7, 8]*
        (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[4, 5, 7, 8]))]*log[((\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[3, 4, 7, 8])*ab[4, 5, 7, 8])/
       (ab[3, 4, 7, 8]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   (-(log[(ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[3, 4, 5, 6])/
         (ab[1, 2, 6, 7]*ab[1, 4, 5, 8]*ab[2, 3, 5, 6]*ab[3, 4, 7, 8])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
          ab[3, 4, 7, 8])]) + 
     log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*
         ab[3, 4, 5, 6])/(ab[1, 2, 6, 7]*ab[1, 4, 5, 8]*ab[2, 3, 5, 6]*
         (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[3, 4, 7, 8]))]*log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
          (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))/(\[Tau] + 
         (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))])/
    2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   -(log[(ab[1, 2, 7, 8]*ab[2, 3, 6, 7])/(ab[1, 2, 6, 7]*ab[2, 3, 7, 8])]*
      log[1 + (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8])])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[1, 2, 3, 4, 8] + int[\[Tau]/(1 + \[Tau]), 
   -(log[(ab[2, 3, 7, 8]*ab[3, 4, 6, 7])/(ab[2, 3, 6, 7]*ab[3, 4, 7, 8])]*
      log[1 + (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8])])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[1, 2, 3, 4, 8] + int[\[Tau]/(1 + \[Tau]), 
   (log[(ab[1, 2, 7, 8]*ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[4, 5, 7, 8])]*
     log[1 + (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
         ab[5, 6, 7, 8])])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[1, 2, 3, 4, 8] + int[\[Tau]/(1 + \[Tau]), 
   -(log[(ab[3, 4, 7, 8]*ab[4, 5, 6, 7])/(ab[3, 4, 6, 7]*ab[4, 5, 7, 8])]*
      log[1 + (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8])])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[1, 2, 3, 4, 8] + int[\[Tau]/(1 + \[Tau]), 
   (log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6]*
        ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[3, 4, 6, 7]*ab[4, 5, 7, 8]*
        (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8]))]*log[((\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[4, 5, 7, 8])*ab[5, 6, 7, 8])/
       (ab[4, 5, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   (-(log[(ab[1, 2, 7, 8]*ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[4, 5, 7, 8])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8])]) + log[\[Tau]]*log[(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
        (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8])] + 
     log[(ab[1, 2, 6, 7]*ab[4, 5, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*
           ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))/
        (ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])]*
      log[\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
          ab[2, 3, 7, 8])])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[1, 2, 3, 4, 8] + int[\[Tau]/(1 + \[Tau]), 
   (-(log[(ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
         (ab[1, 2, 6, 7]*ab[1, 5, 6, 8]*ab[3, 4, 6, 7]*ab[4, 5, 7, 8])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
          ab[4, 5, 7, 8])]) + 
     log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[3, 4, 5, 6]*
         ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[1, 5, 6, 8]*ab[3, 4, 6, 7]*
         (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8]))]*log[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))/(\[Tau] + 
         (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))])/
    2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] + 
 int[1 + \[Tau], -Li[1] + Li[\[Tau]/(1 + \[Tau])]]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] + 
 int[1 + \[Tau], Li[(ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/
     ((1 + \[Tau])*ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] + 
 int[1 + \[Tau], -Li[(ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/
       (ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
    Li[(\[Tau]*ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/
      (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
        ab[3, 4, 7, 8])]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[1, 2, 3, 4, 8] + 
 int[1 + \[Tau], Li[(ab[1, 2, 3, 8]*ab[1, 5, 7, 8]*ab[4, 5, 6, 8])/
     (ab[1, 5, 6, 8]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
       ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[1, 2, 3, 4, 8] + 
 int[1 + \[Tau], Li[(ab[1, 2, 3, 8]*(ab[1, 4, 5, 8]*ab[3, 4, 7, 8] - 
       ab[1, 3, 4, 8]*ab[4, 5, 7, 8]))/(ab[1, 4, 5, 8]*
      (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
        ab[3, 4, 7, 8]))]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[1, 2, 3, 4, 8] + 
 int[1 + \[Tau], Li[(\[Tau]*ab[2, 3, 7, 8]*(ab[1, 4, 5, 8]*ab[3, 4, 7, 8] - 
        ab[1, 3, 4, 8]*ab[4, 5, 7, 8]))/(ab[3, 4, 7, 8]*
       (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
         ab[4, 5, 7, 8]))] - Li[1 - (ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/
       (ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[1, 2, 3, 4, 8] + 
 int[1 + \[Tau], -Li[(ab[1, 5, 7, 8]*ab[4, 5, 6, 8])/
       (ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
    Li[(\[Tau]*ab[1, 5, 7, 8]*ab[2, 3, 7, 8]*ab[4, 5, 6, 8])/
      (ab[4, 5, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
        ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[1, 2, 3, 4, 8] + 
 int[1 + \[Tau], Li[(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
     (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] + 
 int[1 + \[Tau], (log[\[Tau]/(1 + \[Tau])]*
     log[(ab[1, 2, 3, 4]*ab[1, 4, 5, 8])/(ab[1, 2, 4, 5]*ab[1, 3, 4, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] + 
 int[1 + \[Tau], (log[\[Tau]/(1 + \[Tau])]*
     log[(ab[1, 2, 4, 5]*ab[1, 5, 6, 8])/(ab[1, 2, 5, 6]*ab[1, 4, 5, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] + 
 int[1 + \[Tau], -(log[\[Tau]/(1 + \[Tau])]*
      log[((1 + \[Tau])*ab[1, 2, 6, 7]*ab[1, 3, 4, 8])/
        (ab[1, 2, 3, 4]*ab[1, 6, 7, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] + 
 int[1 + \[Tau], (log[\[Tau]/(1 + \[Tau])]*
     log[(ab[1, 2, 5, 6]*ab[1, 6, 7, 8])/(ab[1, 2, 6, 7]*ab[1, 5, 6, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] + 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
       (ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
         (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] + 
 int[1 + \[Tau], (log[(\[Tau]*ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
        ab[2, 3, 4, 5])/(ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*
        (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[3, 4, 7, 8]))]*log[(1 + \[Tau])/
       (\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
          ab[2, 3, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[1, 2, 3, 4, 8] + 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
        ab[2, 3, 4, 5])/((1 + \[Tau])*ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*
        ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
     log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
          ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] + 
 int[1 + \[Tau], (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/
       (ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
         (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] + 
 int[1 + \[Tau], (log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*
        ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/(ab[1, 2, 6, 7]*ab[2, 3, 5, 6]*
        ab[3, 4, 7, 8]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]*
     log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
          ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
         (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] + 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
        ab[2, 3, 4, 5]*ab[3, 4, 5, 6])/(ab[1, 2, 6, 7]*ab[1, 4, 5, 8]*
        ab[2, 3, 5, 6]*(\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))]*
     log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
          ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
         (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] + 
 int[1 + \[Tau], (log[(ab[1, 2, 7, 8]*ab[2, 3, 6, 7])/
       (ab[1, 2, 6, 7]*ab[2, 3, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] + 
 int[1 + \[Tau], (log[(ab[2, 3, 7, 8]*ab[3, 4, 6, 7])/
       (ab[2, 3, 6, 7]*ab[3, 4, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] + 
 int[1 + \[Tau], (log[(ab[3, 4, 7, 8]*ab[4, 5, 6, 7])/
       (ab[3, 4, 6, 7]*ab[4, 5, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] + 
 int[1 + \[Tau], (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/
       (ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] + 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[4, 5, 6, 7]*
        ab[5, 6, 7, 8])/(ab[1, 2, 6, 7]*ab[4, 5, 7, 8]*
        (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8]))]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] + 
 int[1 + \[Tau], (log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*
        ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[3, 4, 6, 7]*
        ab[4, 5, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]*
     log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
          ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] + 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
        ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[1, 5, 6, 8]*
        ab[3, 4, 6, 7]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]*
     log[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
          ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
         (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] + 
 int[1 + \[Tau], (log[(ab[1, 2, 7, 8]*ab[4, 5, 6, 7])/
       (ab[1, 2, 6, 7]*ab[4, 5, 7, 8])]*
     log[1 + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(\[Tau]*ab[1, 5, 6, 8]*
         ab[2, 3, 7, 8])])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[1, 2, 3, 4, 8] + int[\[Tau]/(1 + \[Tau]), 
   -Li[(ab[1, 2, 3, 8]*(ab[1, 4, 5, 8]*ab[3, 4, 7, 8] - 
         ab[1, 3, 4, 8]*ab[4, 5, 7, 8]))/(ab[1, 4, 5, 8]*
        (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[3, 4, 7, 8]))] + Li[1 - (ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/
       (ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
    (log[(ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[3, 4, 5, 6])/
         (ab[1, 2, 6, 7]*ab[1, 4, 5, 8]*ab[2, 3, 5, 6]*ab[3, 4, 7, 8])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      log[(ab[1, 2, 6, 7]*ab[1, 4, 5, 8]*ab[2, 3, 5, 6]*
          (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
            ab[3, 4, 7, 8]))/(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
          ab[2, 3, 4, 5]*ab[3, 4, 5, 6])]*
       log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
            ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
           (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 6, 7, 8])/(ab[1, 4, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   -Li[(ab[1, 2, 3, 8]*(ab[1, 4, 5, 8]*ab[3, 4, 7, 8] - 
         ab[1, 3, 4, 8]*ab[4, 5, 7, 8]))/(ab[1, 4, 5, 8]*
        (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[3, 4, 7, 8]))] + 
    (log[(ab[1, 2, 6, 7]*ab[1, 4, 5, 8]*ab[2, 3, 5, 6]*
         (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[3, 4, 7, 8]))/(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
         ab[2, 3, 4, 5]*ab[3, 4, 5, 6])]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 6, 7, 8])/
      (ab[1, 4, 6, 8]*ab[2, 3, 7, 8])), 
   -Li[(ab[1, 2, 3, 8]*(ab[1, 4, 5, 8]*ab[3, 4, 7, 8] - 
         ab[1, 3, 4, 8]*ab[4, 5, 7, 8]))/(ab[1, 4, 5, 8]*
        (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[3, 4, 7, 8]))] + 
    (log[(ab[1, 2, 6, 7]*ab[1, 4, 5, 8]*ab[2, 3, 5, 6]*
         (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[3, 4, 7, 8]))/(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
         ab[2, 3, 4, 5]*ab[3, 4, 5, 6])]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] + 
 intdone[log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
      ab[5, 6, 7, 8])], -Li[1]/2 - 
    (log[(ab[1, 2, 3, 4]*ab[1, 4, 5, 8])/(ab[1, 2, 4, 5]*ab[1, 3, 4, 8])]*
      log[(ab[1, 2, 3, 8]*ab[3, 4, 5, 6])/(ab[1, 3, 4, 8]*ab[2, 3, 5, 6])])/
     2]*Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   (log[1 + (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
         ab[5, 6, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   -Li[(ab[1, 2, 3, 8]*(ab[1, 5, 6, 8]*ab[4, 5, 7, 8] - 
         ab[1, 4, 5, 8]*ab[5, 6, 7, 8]))/(ab[1, 5, 6, 8]*
        (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[4, 5, 7, 8]))] + Li[1 - (ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/
       (ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
    (log[(ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
         (ab[1, 2, 6, 7]*ab[1, 5, 6, 8]*ab[3, 4, 6, 7]*ab[4, 5, 7, 8])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      log[(ab[1, 2, 6, 7]*ab[1, 5, 6, 8]*ab[3, 4, 6, 7]*
          (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
            ab[4, 5, 7, 8]))/(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
          ab[3, 4, 5, 6]*ab[4, 5, 6, 7])]*
       log[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
            ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
           (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] - 
 int[1 + \[Tau], -Li[1] + Li[\[Tau]/(1 + \[Tau])]]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] - 
 int[1 + \[Tau], Li[(ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/
     ((1 + \[Tau])*ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] - 
 int[1 + \[Tau], -Li[(ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/
       (ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
    Li[(\[Tau]*ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/
      (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
        ab[3, 4, 7, 8])]]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[1, 2, 3, 4, 8] - 
 int[1 + \[Tau], Li[(ab[1, 2, 3, 8]*ab[1, 5, 7, 8]*ab[4, 5, 6, 8])/
     (ab[1, 5, 6, 8]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
       ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[1, 2, 3, 4, 8] - 
 int[1 + \[Tau], Li[(ab[1, 2, 3, 8]*(ab[1, 4, 5, 8]*ab[3, 4, 7, 8] - 
       ab[1, 3, 4, 8]*ab[4, 5, 7, 8]))/(ab[1, 4, 5, 8]*
      (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
        ab[3, 4, 7, 8]))]]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[1, 2, 3, 4, 8] - 
 int[1 + \[Tau], Li[(\[Tau]*ab[2, 3, 7, 8]*(ab[1, 4, 5, 8]*ab[3, 4, 7, 8] - 
        ab[1, 3, 4, 8]*ab[4, 5, 7, 8]))/(ab[3, 4, 7, 8]*
       (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
         ab[4, 5, 7, 8]))] - Li[1 - (ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/
       (ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[1, 2, 3, 4, 8] - 
 int[1 + \[Tau], -Li[(ab[1, 5, 7, 8]*ab[4, 5, 6, 8])/
       (ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
    Li[(\[Tau]*ab[1, 5, 7, 8]*ab[2, 3, 7, 8]*ab[4, 5, 6, 8])/
      (ab[4, 5, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
        ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[1, 2, 3, 4, 8] - 
 int[1 + \[Tau], Li[(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
     (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] - 
 int[1 + \[Tau], -(log[\[Tau]/(1 + \[Tau])]*log[1 + \[Tau]])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] - 
 int[1 + \[Tau], (log[\[Tau]/(1 + \[Tau])]*
     log[(ab[1, 2, 3, 4]*ab[1, 4, 5, 8])/(ab[1, 2, 4, 5]*ab[1, 3, 4, 8])])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] - 
 int[1 + \[Tau], (log[\[Tau]/(1 + \[Tau])]*
     log[(ab[1, 2, 4, 5]*ab[1, 5, 6, 8])/(ab[1, 2, 5, 6]*ab[1, 4, 5, 8])])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] - 
 int[1 + \[Tau], (log[\[Tau]/(1 + \[Tau])]*
     log[(ab[1, 2, 3, 4]*ab[1, 6, 7, 8])/(ab[1, 2, 6, 7]*ab[1, 3, 4, 8])])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] - 
 int[1 + \[Tau], (log[\[Tau]/(1 + \[Tau])]*
     log[(ab[1, 2, 5, 6]*ab[1, 6, 7, 8])/(ab[1, 2, 6, 7]*ab[1, 5, 6, 8])])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] - 
 int[1 + \[Tau], 
   (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
      log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))] + 
     log[(\[Tau]*ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5])/
        (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*(\[Tau]*ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))]*
      log[(1 + \[Tau])/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] - 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
        ab[2, 3, 4, 5])/((1 + \[Tau])*ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*
        ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
     log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
          ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] - 
 int[1 + \[Tau], 
   (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
      log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
          (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))] + 
     log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 7, 8]*
         ab[3, 4, 5, 6])/(ab[1, 2, 6, 7]*ab[2, 3, 5, 6]*ab[3, 4, 7, 8]*
         (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8]))]*log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))/(\[Tau] + 
         (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))])/
    2]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] - 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
        ab[2, 3, 4, 5]*ab[3, 4, 5, 6])/(ab[1, 2, 6, 7]*ab[1, 4, 5, 8]*
        ab[2, 3, 5, 6]*(\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))]*
     log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
          ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
         (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] - 
 int[1 + \[Tau], (log[(ab[1, 2, 7, 8]*ab[2, 3, 6, 7])/
       (ab[1, 2, 6, 7]*ab[2, 3, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] - 
 int[1 + \[Tau], (log[(ab[2, 3, 7, 8]*ab[3, 4, 6, 7])/
       (ab[2, 3, 6, 7]*ab[3, 4, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] - 
 int[1 + \[Tau], (log[(ab[3, 4, 7, 8]*ab[4, 5, 6, 7])/
       (ab[3, 4, 6, 7]*ab[4, 5, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] + 
 int[1 + \[Tau], (log[1 + (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/
        (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] - 
 2*int[1 + \[Tau], 
   -(log[(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(\[Tau]*ab[1, 5, 6, 8]*
          ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
      log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] - 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[4, 5, 6, 7]*
        ab[5, 6, 7, 8])/(ab[1, 2, 6, 7]*ab[4, 5, 7, 8]*
        (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8]))]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] - 
 int[1 + \[Tau], 
   (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
      log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))] + 
     log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6]*
         ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[3, 4, 6, 7]*ab[4, 5, 7, 8]*
         (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8]))]*log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
          (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))/(\[Tau] + 
         (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/
    2]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] - 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
        ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[1, 5, 6, 8]*
        ab[3, 4, 6, 7]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]*
     log[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
          ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
         (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), Li[\[Tau]/(1 + \[Tau])]]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   Li[(ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/((1 + \[Tau])*ab[1, 3, 4, 8]*
      ab[2, 3, 7, 8])]]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[1, 2, 3, 4, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   Li[(\[Tau]*ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/
     (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[3, 4, 7, 8])]]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   Li[(ab[1, 2, 3, 8]*ab[1, 5, 7, 8]*ab[4, 5, 6, 8])/
     (ab[1, 5, 6, 8]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
       ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[1, 2, 3, 4, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   Li[(ab[1, 2, 3, 8]*(ab[1, 4, 5, 8]*ab[3, 4, 7, 8] - 
       ab[1, 3, 4, 8]*ab[4, 5, 7, 8]))/(ab[1, 4, 5, 8]*
      (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
        ab[3, 4, 7, 8]))]]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[1, 2, 3, 4, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   Li[(\[Tau]*ab[2, 3, 7, 8]*(ab[1, 4, 5, 8]*ab[3, 4, 7, 8] - 
       ab[1, 3, 4, 8]*ab[4, 5, 7, 8]))/(ab[3, 4, 7, 8]*
      (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
        ab[4, 5, 7, 8]))]]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[1, 2, 3, 4, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   Li[(\[Tau]*ab[1, 5, 7, 8]*ab[2, 3, 7, 8]*ab[4, 5, 6, 8])/
     (ab[4, 5, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
       ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[1, 2, 3, 4, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   Li[(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
      ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[1, 2, 3, 4, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   -(log[1 + \[Tau]]*log[(\[Tau]*ab[1, 2, 3, 4]*ab[1, 6, 7, 8])/
        ((1 + \[Tau])*ab[1, 2, 6, 7]*ab[1, 3, 4, 8])])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (log[(ab[1, 2, 3, 4]*ab[1, 4, 5, 8])/(ab[1, 2, 4, 5]*ab[1, 3, 4, 8])]*
     log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[3, 4, 5, 6])/
       ((1 + \[Tau])*ab[1, 2, 4, 5]*ab[1, 3, 4, 8]*ab[2, 3, 5, 6]*
        ab[2, 3, 7, 8])])/2]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[1, 2, 3, 4, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (log[(\[Tau]*ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5])/
       (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*(\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))]*
     log[((1 + \[Tau])*ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
       (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
         ab[3, 4, 7, 8])])/2]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[1, 2, 3, 4, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5])/
       ((1 + \[Tau])*ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*ab[1, 3, 4, 8]*
        ab[2, 3, 7, 8])]*log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
         (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (log[(ab[1, 2, 4, 5]*ab[1, 5, 6, 8])/(ab[1, 2, 5, 6]*ab[1, 4, 5, 8])]*
     log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
       ((1 + \[Tau])*ab[1, 2, 5, 6]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8]*
        ab[3, 4, 6, 7])])/2]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[1, 2, 3, 4, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 7, 8]*
        ab[3, 4, 5, 6])/(ab[1, 2, 6, 7]*ab[2, 3, 5, 6]*ab[3, 4, 7, 8]*
        (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[4, 5, 7, 8]))]*log[((\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[3, 4, 7, 8])*ab[4, 5, 7, 8])/
       (ab[3, 4, 7, 8]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*
        ab[3, 4, 5, 6])/(ab[1, 2, 6, 7]*ab[1, 4, 5, 8]*ab[2, 3, 5, 6]*
        (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[3, 4, 7, 8]))]*log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
         (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))/(\[Tau] + 
        (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (log[(ab[1, 2, 5, 6]*ab[1, 6, 7, 8])/(ab[1, 2, 6, 7]*ab[1, 5, 6, 8])]*
     log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])/
       ((1 + \[Tau])*ab[1, 2, 6, 7]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8]*
        ab[4, 5, 7, 8])])/2]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[1, 2, 3, 4, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (log[(ab[1, 2, 7, 8]*ab[2, 3, 6, 7])/(ab[1, 2, 6, 7]*ab[2, 3, 7, 8])]*
     log[(\[Tau]*ab[1, 2, 3, 4]*ab[1, 2, 3, 8]*ab[1, 6, 7, 8]*ab[5, 6, 7, 8])/
       (ab[1, 2, 6, 7]*ab[1, 3, 4, 8]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (log[(ab[2, 3, 7, 8]*ab[3, 4, 6, 7])/(ab[2, 3, 6, 7]*ab[3, 4, 7, 8])]*
     log[(\[Tau]*ab[1, 2, 3, 4]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 7, 8]*
        ab[5, 6, 7, 8])/(ab[1, 2, 4, 5]*ab[2, 3, 6, 7]*ab[3, 4, 7, 8]*
        (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[1, 2, 3, 4, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (log[(ab[3, 4, 7, 8]*ab[4, 5, 6, 7])/(ab[3, 4, 6, 7]*ab[4, 5, 7, 8])]*
     log[(\[Tau]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6]*
        ab[5, 6, 7, 8])/(ab[2, 3, 5, 6]*ab[3, 4, 6, 7]*ab[4, 5, 7, 8]*
        (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[1, 2, 3, 4, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6]*
        ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[3, 4, 6, 7]*ab[4, 5, 7, 8]*
        (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8]))]*log[((\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[4, 5, 7, 8])*ab[5, 6, 7, 8])/
       (ab[4, 5, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])/
       (ab[1, 2, 6, 7]*ab[4, 5, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] - 
 2*int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (-Li[1] - log[(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
        (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8])]*
      log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[3, 4, 5, 6]*
        ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[1, 5, 6, 8]*ab[3, 4, 6, 7]*
        (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[4, 5, 7, 8]))]*log[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))/(\[Tau] + 
        (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   -Li[(ab[1, 2, 3, 8]*(ab[1, 5, 6, 8]*ab[4, 5, 7, 8] - 
         ab[1, 4, 5, 8]*ab[5, 6, 7, 8]))/(ab[1, 5, 6, 8]*
        (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[4, 5, 7, 8]))] + 
    (log[(ab[1, 2, 6, 7]*ab[1, 5, 6, 8]*ab[3, 4, 6, 7]*
         (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8]))/(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
         ab[3, 4, 5, 6]*ab[4, 5, 6, 7])]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
          (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] + 
 intdone[log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
      ab[5, 6, 7, 8])], Li[1] + Li[(ab[1, 2, 4, 8]*ab[1, 3, 4, 5])/
      (ab[1, 2, 4, 5]*ab[1, 3, 4, 8])] + 
    Li[(ab[1, 2, 5, 8]*ab[1, 4, 5, 6])/(ab[1, 2, 5, 6]*ab[1, 4, 5, 8])] + 
    Li[(ab[1, 2, 6, 8]*ab[1, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[1, 5, 6, 8])] + 
    Li[(ab[1, 2, 3, 5]*ab[2, 4, 5, 6])/(ab[1, 2, 4, 5]*ab[2, 3, 5, 6])] + 
    Li[(ab[1, 2, 3, 6]*ab[2, 5, 6, 7])/(ab[1, 2, 5, 6]*ab[2, 3, 6, 7])] + 
    Li[(ab[1, 2, 3, 7]*ab[2, 6, 7, 8])/(ab[1, 2, 6, 7]*ab[2, 3, 7, 8])] + 
    Li[(ab[2, 3, 4, 6]*ab[3, 5, 6, 7])/(ab[2, 3, 5, 6]*ab[3, 4, 6, 7])] + 
    Li[(ab[2, 3, 4, 7]*ab[3, 6, 7, 8])/(ab[2, 3, 6, 7]*ab[3, 4, 7, 8])] + 
    Li[(ab[3, 4, 5, 7]*ab[4, 6, 7, 8])/(ab[3, 4, 6, 7]*ab[4, 5, 7, 8])] + 
    (log[(ab[1, 2, 5, 6]*ab[2, 3, 4, 5])/(ab[1, 2, 4, 5]*ab[2, 3, 5, 6])]*
      log[(ab[1, 2, 3, 4]*ab[1, 2, 3, 8]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
        (ab[1, 2, 4, 5]*ab[1, 3, 4, 8]*ab[2, 3, 5, 6]*ab[3, 4, 6, 7])])/2 + 
    (log[(ab[1, 2, 6, 7]*ab[2, 3, 5, 6])/(ab[1, 2, 5, 6]*ab[2, 3, 6, 7])]*
      log[(ab[1, 2, 3, 4]*ab[1, 2, 3, 8]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])/
        (ab[1, 2, 5, 6]*ab[1, 3, 4, 8]*ab[2, 3, 6, 7]*ab[4, 5, 7, 8])])/2 + 
    (log[(ab[2, 3, 6, 7]*ab[3, 4, 5, 6])/(ab[2, 3, 5, 6]*ab[3, 4, 6, 7])]*
      log[(ab[1, 2, 3, 4]*ab[2, 3, 4, 5]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])/
        (ab[1, 2, 4, 5]*ab[2, 3, 5, 6]*ab[3, 4, 6, 7]*ab[4, 5, 7, 8])])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 3, 4, 8] + 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
       ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[cap[{3, 4}, {1, 2, 8}], 
        5, 7, 8])/(ab[1, cap[{3, 4}, {1, 2, 8}], 5, 8]*ab[2, 3, 7, 8])), 
   (-Li[1] - log[(ab[1, 2, 3, 4]*ab[1, 6, 7, 8])/(ab[1, 2, 6, 7]*
         ab[1, 3, 4, 8])]*log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, cap[{3, 4}, {1, 2, 8}]]]*R[1, 2, 3, 4, 8] + 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[cap[{3, 4}, {1, 2, 8}], 5, 7, 8])/
      (ab[1, cap[{3, 4}, {1, 2, 8}], 5, 8]*ab[2, 3, 7, 8]))/
    (\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8])), 
   (-Li[1] - log[(ab[1, 2, 3, 4]*ab[1, 6, 7, 8])/(ab[1, 2, 6, 7]*
         ab[1, 3, 4, 8])]*log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, cap[{3, 4}, {1, 2, 8}]]]*R[1, 2, 3, 4, 8] - 
 int[\[Tau]/(1 + \[Tau]), 
   (log[(ab[1, 2, 3, 4]*ab[1, 6, 7, 8])/(ab[1, 2, 6, 7]*ab[1, 3, 4, 8])]*
     log[((1 + \[Tau])*ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
       (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
         ab[3, 4, 7, 8])])/2]*
  Qlog[ab[7, 8, 1, 6]/ab[7, 8, 1, cap[{3, 4}, {1, 2, 8}]]]*R[1, 2, 3, 4, 8] + 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[cap[{3, 4}, {1, 2, 8}], 
        6, 7, 8])/(ab[1, cap[{3, 4}, {1, 2, 8}], 6, 8]*ab[2, 3, 7, 8])), 
   (-Li[1] - log[(ab[1, 2, 3, 4]*ab[1, 6, 7, 8])/(ab[1, 2, 6, 7]*
         ab[1, 3, 4, 8])]*log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 6]/ab[7, 8, 1, cap[{3, 4}, {1, 2, 8}]]]*R[1, 2, 3, 4, 8] + 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[cap[{3, 4}, {1, 2, 8}], 6, 7, 8])/
      (ab[1, cap[{3, 4}, {1, 2, 8}], 6, 8]*ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (-Li[1] - log[(ab[1, 2, 3, 4]*ab[1, 6, 7, 8])/(ab[1, 2, 6, 7]*
         ab[1, 3, 4, 8])]*log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 6]/ab[7, 8, 1, cap[{3, 4}, {1, 2, 8}]]]*R[1, 2, 3, 4, 8] + 
 intdone[log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
      ab[5, 6, 7, 8])], 
   -Li[1 - (ab[1, 5, 6, 8]*ab[2, 3, 4, 5])/(ab[1, 4, 5, 8]*ab[2, 3, 5, 6])] - 
    (log[(ab[1, 5, 6, 8]*ab[2, 3, 4, 5])/(ab[1, 4, 5, 8]*ab[2, 3, 5, 6])]*
      log[(ab[1, 2, 3, 8]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
        (ab[1, 4, 5, 8]*ab[2, 3, 5, 6]*ab[3, 4, 6, 7])])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 3, 5, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   (log[(ab[3, 4, 7, 8]*ab[4, 5, 6, 7])/(ab[3, 4, 6, 7]*ab[4, 5, 7, 8])]*
     log[1 + (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
         ab[5, 6, 7, 8])])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 4]]*
  R[1, 2, 3, 7, 8] + int[\[Tau]/(1 + \[Tau]), 
   -(log[(ab[1, 2, 7, 8]*ab[3, 4, 6, 7])/(ab[1, 2, 6, 7]*ab[3, 4, 7, 8])]*
      log[((\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[3, 4, 7, 8])*ab[5, 6, 7, 8])/(ab[3, 4, 7, 8]*
         (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 4]]*
  R[1, 2, 3, 7, 8] + 
 int[1 + \[Tau], 
   -(log[(ab[1, 2, 7, 8]*ab[3, 4, 6, 7])/(ab[1, 2, 6, 7]*ab[3, 4, 7, 8])]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 4]]*R[1, 2, 3, 7, 8] + 
 int[1 + \[Tau], (log[(ab[3, 4, 7, 8]*ab[4, 5, 6, 7])/
       (ab[3, 4, 6, 7]*ab[4, 5, 7, 8])]*
     log[1 + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(\[Tau]*ab[1, 5, 6, 8]*
         ab[2, 3, 7, 8])])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 4]]*
  R[1, 2, 3, 7, 8] + int[\[Tau]/(1 + \[Tau]), 
   -(log[(ab[1, 2, 7, 8]*ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[4, 5, 7, 8])]*
      log[((\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8])*ab[5, 6, 7, 8])/(ab[4, 5, 7, 8]*
         (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*
  R[1, 2, 3, 7, 8] + 
 int[1 + \[Tau], 
   -(log[(ab[1, 2, 7, 8]*ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[4, 5, 7, 8])]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*R[1, 2, 3, 7, 8] + 
 int[\[Tau]/(1 + \[Tau]), Li[1] - Li[(1 + \[Tau])^(-1)] + 
    (log[1 + \[Tau]]*log[(\[Tau]*ab[1, 2, 7, 8]*ab[2, 3, 6, 7])/
        ((1 + \[Tau])*ab[1, 2, 6, 7]*ab[2, 3, 7, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 3, 7, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   Li[1 - (ab[2, 3, 7, 8]*ab[3, 4, 6, 7])/(ab[2, 3, 6, 7]*ab[3, 4, 7, 8])] + 
    (-2*Li[1 - ((1 + \[Tau])*ab[1, 2, 3, 8]*ab[2, 3, 7, 8]*ab[3, 4, 6, 7])/
          (ab[2, 3, 6, 7]*(\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
            ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))] + 
      log[(ab[1, 2, 3, 4]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 7, 8])/
         (ab[1, 2, 3, 8]*ab[1, 2, 4, 5]*ab[2, 3, 6, 7]*ab[3, 4, 7, 8])]*
       log[(ab[2, 3, 7, 8]*ab[3, 4, 6, 7])/(ab[2, 3, 6, 7]*ab[3, 4, 7, 8])] - 
      log[(ab[1, 2, 3, 4]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 7, 8])/
         (ab[1, 2, 4, 5]*ab[2, 3, 6, 7]*(\[Tau]*ab[1, 3, 4, 8]*
            ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))]*
       log[((1 + \[Tau])*ab[1, 2, 3, 8]*ab[2, 3, 7, 8]*ab[3, 4, 6, 7])/
         (ab[2, 3, 6, 7]*(\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
           ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))] - 
      log[\[Tau]]*log[((1 + \[Tau])*ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
         (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[3, 4, 7, 8])])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[1, 2, 3, 7, 8] + int[\[Tau]/(1 + \[Tau]), 
   (log[(ab[1, 2, 7, 8]*ab[2, 3, 4, 5])/(ab[1, 2, 4, 5]*ab[2, 3, 7, 8])]*
      log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
     log[((1 + \[Tau])*ab[1, 2, 4, 5]*ab[2, 3, 7, 8])/
        (ab[1, 2, 7, 8]*ab[2, 3, 4, 5])]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 3, 7, 8] + 
 int[1 + \[Tau], -Li[(1 + \[Tau])^(-1)]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[1, 2, 3, 7, 8] + 
 int[1 + \[Tau], (log[\[Tau]/(1 + \[Tau])]*
     log[((1 + \[Tau])*ab[1, 2, 6, 7]*ab[2, 3, 7, 8])/
       (ab[1, 2, 7, 8]*ab[2, 3, 6, 7])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 3, 7, 8] + 
 int[1 + \[Tau], Li[1 - (ab[1, 2, 3, 8]*ab[3, 4, 6, 7])/
       (ab[1, 3, 4, 8]*ab[2, 3, 6, 7])] - 
    Li[1 - ((1 + \[Tau])*ab[1, 2, 3, 8]*ab[2, 3, 7, 8]*ab[3, 4, 6, 7])/
       (ab[2, 3, 6, 7]*(\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))] - 
    (log[(\[Tau]*ab[1, 2, 3, 4]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 7, 8])/
        (ab[1, 2, 4, 5]*ab[2, 3, 6, 7]*(\[Tau]*ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))]*
      log[(1 + \[Tau])/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 3, 7, 8] + 
 int[1 + \[Tau], (log[((1 + \[Tau])*ab[1, 2, 4, 5]*ab[2, 3, 7, 8])/
       (ab[1, 2, 7, 8]*ab[2, 3, 4, 5])]*
     log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
          ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 3, 7, 8] + 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 8]*ab[3, 4, 6, 7])/
       (ab[1, 3, 4, 8]*ab[2, 3, 6, 7])]*
     log[1 + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(\[Tau]*ab[1, 3, 4, 8]*
         ab[2, 3, 7, 8])])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[1, 2, 3, 7, 8] + int[\[Tau]/(1 + \[Tau]), 
   Li[1 - (ab[3, 4, 7, 8]*ab[4, 5, 6, 7])/(ab[3, 4, 6, 7]*ab[4, 5, 7, 8])] + 
    (-2*Li[1 - ((\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
             ab[3, 4, 7, 8])*ab[4, 5, 6, 7])/(ab[3, 4, 6, 7]*
           (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
             ab[4, 5, 7, 8]))] + 
      log[(ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
         (ab[1, 2, 3, 8]*ab[2, 3, 5, 6]*ab[3, 4, 6, 7]*ab[4, 5, 7, 8])]*
       log[(ab[3, 4, 7, 8]*ab[4, 5, 6, 7])/(ab[3, 4, 6, 7]*ab[4, 5, 7, 8])] - 
      log[(ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
         (ab[2, 3, 5, 6]*ab[3, 4, 6, 7]*(\[Tau]*ab[1, 4, 5, 8]*
            ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]*
       log[((\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
            ab[3, 4, 7, 8])*ab[4, 5, 6, 7])/(ab[3, 4, 6, 7]*
          (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
            ab[4, 5, 7, 8]))] - log[\[Tau]]*
       log[((\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
            ab[3, 4, 7, 8])*ab[4, 5, 7, 8])/(ab[3, 4, 7, 8]*
          (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
            ab[4, 5, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 6]]*
  R[1, 2, 3, 7, 8] + 
 int[1 + \[Tau], Li[1 - (ab[1, 3, 4, 8]*ab[4, 5, 6, 7])/
       (ab[1, 4, 5, 8]*ab[3, 4, 6, 7])] - 
    Li[1 - ((\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[3, 4, 7, 8])*ab[4, 5, 6, 7])/(ab[3, 4, 6, 7]*
        (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[4, 5, 7, 8]))] - 
    (log[(\[Tau]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
        (ab[2, 3, 5, 6]*ab[3, 4, 6, 7]*(\[Tau]*ab[1, 4, 5, 8]*
           ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
          (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 6]]*R[1, 2, 3, 7, 8] + 
 int[1 + \[Tau], (log[(ab[1, 3, 4, 8]*ab[4, 5, 6, 7])/
       (ab[1, 4, 5, 8]*ab[3, 4, 6, 7])]*
     log[1 + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(\[Tau]*ab[1, 4, 5, 8]*
         ab[2, 3, 7, 8])])/2]*Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 6]]*
  R[1, 2, 3, 7, 8] + int[\[Tau]/(1 + \[Tau]), 
   -(log[(\[Tau]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
        (ab[3, 4, 6, 7]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]*
      log[((\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8])*ab[5, 6, 7, 8])/(ab[4, 5, 7, 8]*
         (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[1, 2, 3, 7, 8] + 
 int[1 + \[Tau], -(log[(\[Tau]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
        (ab[3, 4, 6, 7]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 3, 7, 8] + 
 int[1 + \[Tau], (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/
       (ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
     log[1 + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(\[Tau]*ab[1, 5, 6, 8]*
         ab[2, 3, 7, 8])])/2]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[1, 2, 3, 7, 8] + 
 intt1[((3*ab[1, 6, 7, cap[{8, 2}, {1, 4, 5}]]^2*ab[2, 3, 7, 8]*
       ((1 + t)^2*ab[1, 2, 7, cap[{6, 8}, {4, 5, 7}]]*
         ab[1, 6, 7, cap[{8, 2}, {1, 4, 5}]] - 4*t*ab[1, 2, 4, 5]*
         ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[4, 5, 6, 7])*
       ((Log[(2*ab[1, 2, 3, 8]*((1 + t)*ab[1, 2, 7, cap[{6, 8}, {4, 5, 7}]]*
               ab[1, 6, 7, cap[{8, 2}, {1, 4, 5}]] - 2*ab[1, 2, 4, 5]*ab[1, 
                2, 7, 8]*ab[1, 6, 7, 8]*ab[4, 5, 6, 7]))/((-1 + t^2)*
             ab[1, 6, 7, cap[{8, 2}, {1, 4, 5}]]^2*ab[2, 3, 7, 8])] + 
          Log[(ab[1, 2, 4, 5]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8])/
            (ab[1, 2, 3, 8]*ab[1, 2, 6, 7]*ab[4, 5, 7, 8])])*
         Log[(ab[1, 2, 7, 8]*ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*
            ab[4, 5, 7, 8])] + 2*PolyLog[2, 
          1 - (ab[1, 2, 7, 8]*ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*
             ab[4, 5, 7, 8])]))/(((1 + t)*ab[1, 2, 7, cap[{6, 8}, {4, 5, 7}]]*
         ab[1, 6, 7, cap[{8, 2}, {1, 4, 5}]] - 2*ab[1, 2, 4, 5]*
         ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[4, 5, 6, 7])*
       (2*(1 + t)*ab[1, 2, 3, 8]*ab[1, 2, 7, cap[{6, 8}, {4, 5, 7}]]*
         ab[1, 6, 7, cap[{8, 2}, {1, 4, 5}]] + (-1 + t^2)*
         ab[1, 6, 7, cap[{8, 2}, {1, 4, 5}]]^2*ab[2, 3, 7, 8] - 
        4*ab[1, 2, 3, 8]*ab[1, 2, 4, 5]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
         ab[4, 5, 6, 7])) + (ab[1, 2, 7, cap[{4, 5}, {6, 7, 8}]]*
       ab[1, 6, 7, cap[{4, 5}, {1, 2, 8}]]*
       (Pi^2 + 6*Log[((1 + t)*(-(ab[1, 2, 6, 7]*ab[1, 4, 5, 8]) + 
             ab[1, 2, 4, 5]*ab[1, 6, 7, 8]))/
           (-((1 + t)*ab[1, 2, 6, 7]*ab[1, 4, 5, 8]) + 
            (-1 + t)*ab[1, 2, 4, 5]*ab[1, 6, 7, 8])]*
         Log[((-1 + t)*ab[1, 2, 4, 5]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
             ab[4, 5, 6, 7] + (1 + t)*ab[1, 2, 6, 7]*ab[1, 4, 5, 7]*
             ab[6, 7, 8, cap[{1, 2}, {4, 5, 8}]])/(ab[1, 2, 6, 7]*
            ((-1 + t)*ab[1, 6, 7, cap[{8, 2}, {1, 4, 5}]]*ab[4, 5, 7, 8] + 
             2*ab[1, 4, 5, 7]*ab[6, 7, 8, cap[{1, 2}, {4, 5, 8}]]))] - 
        3*Log[(2*ab[1, 2, 4, 5]*ab[1, 6, 7, 8]*((-1 + t)*ab[1, 2, 4, 5]*
              ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[4, 5, 6, 7] + 
             (1 + t)*ab[1, 2, 6, 7]*ab[1, 4, 5, 7]*ab[6, 7, 8, cap[{1, 2}, 
                {4, 5, 8}]]))/(ab[1, 2, 6, 7]*((1 + t)*ab[1, 2, 6, 7]*
              ab[1, 4, 5, 8] - (-1 + t)*ab[1, 2, 4, 5]*ab[1, 6, 7, 8])*
            ((-1 + t)*ab[1, 6, 7, cap[{8, 2}, {1, 4, 5}]]*ab[4, 5, 7, 8] + 
             2*ab[1, 4, 5, 7]*ab[6, 7, 8, cap[{1, 2}, {4, 5, 8}]]))]*
         Log[((1 + t)*(1 - (ab[1, 2, 4, 5]*ab[1, 6, 7, 8])/(ab[1, 2, 6, 7]*ab[
                1, 4, 5, 8]))*(1 - ((-1 + t)*ab[1, 2, 4, 5]*ab[1, 2, 7, 8]*
                ab[1, 6, 7, 8]*ab[4, 5, 6, 7] + (1 + t)*ab[1, 2, 6, 7]*
                ab[1, 4, 5, 7]*ab[6, 7, 8, cap[{1, 2}, {4, 5, 8}]])/
              (ab[1, 2, 6, 7]*((-1 + t)*ab[1, 6, 7, cap[{8, 2}, {1, 4, 5}]]*
                 ab[4, 5, 7, 8] + 2*ab[1, 4, 5, 7]*ab[6, 7, 8, cap[{1, 2}, 
                   {4, 5, 8}]]))))/(1 + t - ((-1 + t)*ab[1, 2, 4, 5]*
              ab[1, 6, 7, 8])/(ab[1, 2, 6, 7]*ab[1, 4, 5, 8]))] - 
        6*PolyLog[2, ((1 + t)*(-(ab[1, 2, 6, 7]*ab[1, 4, 5, 8]) + 
             ab[1, 2, 4, 5]*ab[1, 6, 7, 8]))/
           (-((1 + t)*ab[1, 2, 6, 7]*ab[1, 4, 5, 8]) + 
            (-1 + t)*ab[1, 2, 4, 5]*ab[1, 6, 7, 8])] - 
        6*PolyLog[2, ((-1 + t)*ab[1, 2, 4, 5]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
             ab[4, 5, 6, 7] + (1 + t)*ab[1, 2, 6, 7]*ab[1, 4, 5, 7]*
             ab[6, 7, 8, cap[{1, 2}, {4, 5, 8}]])/(ab[1, 2, 6, 7]*
            ((-1 + t)*ab[1, 6, 7, cap[{8, 2}, {1, 4, 5}]]*ab[4, 5, 7, 8] + 
             2*ab[1, 4, 5, 7]*ab[6, 7, 8, cap[{1, 2}, {4, 5, 8}]]))]))/
      ((-1 + t)*ab[1, 2, 7, cap[{4, 5}, {6, 7, 8}]]*
        ab[1, 6, 7, cap[{4, 5}, {1, 2, 8}]] + 2*ab[1, 2, 6, 7]*ab[1, 4, 5, 7]*
        ab[cap[{4, 5}, {1, 2, 8}], 6, 7, 8]))/6]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 7] + 
 int[\[Tau]/(1 + \[Tau]), 
   -(log[(\[Tau]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
        (ab[3, 4, 6, 7]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]*
      log[((\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8])*ab[5, 6, 7, 8])/(ab[4, 5, 7, 8]*
         (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[1, 2, 4, 5, 7] + 
 int[1 + \[Tau], -(log[(\[Tau]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
        (ab[3, 4, 6, 7]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 7] - 
 int[1 + \[Tau], 
   (-(log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
       log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
           (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))]) - 
     log[(\[Tau]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
        (ab[3, 4, 6, 7]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 7] + 
 int[1 + \[Tau], (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/
       (ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
     log[1 + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(\[Tau]*ab[1, 5, 6, 8]*
         ab[2, 3, 7, 8])])/2]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[1, 2, 4, 5, 7] - 
 int[(\[Tau] - (ab[1, 2, 3, 8]*ab[1, 2, 4, 7]*ab[5, 6, 7, 8])/
      (ab[2, 3, 7, 8]*ab[cap[{1, 8}, {1, 2, 4}], 5, 6, 7]))/(1 + \[Tau]), 
   (-Li[1] - log[(\[Tau]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
        (ab[3, 4, 6, 7]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]*
      log[((\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8])*ab[5, 6, 7, 8])/(ab[4, 5, 7, 8]*
         (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[1, 2, 4, 5, 7] + int[\[Tau]/(1 + \[Tau]), Li[\[Tau]/(1 + \[Tau])]]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   -Li[(ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
    Li[(ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/((1 + \[Tau])*ab[1, 3, 4, 8]*
       ab[2, 3, 7, 8])]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[1, 2, 4, 5, 8] + int[\[Tau]/(1 + \[Tau]), 
   Li[(\[Tau]*ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/
     (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[3, 4, 7, 8])]]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   -Li[(ab[1, 5, 7, 8]*ab[4, 5, 6, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
    Li[(ab[1, 2, 3, 8]*ab[1, 5, 7, 8]*ab[4, 5, 6, 8])/
      (ab[1, 5, 6, 8]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
        ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[1, 2, 4, 5, 8] + int[\[Tau]/(1 + \[Tau]), 
   Li[(\[Tau]*ab[2, 3, 7, 8]*(ab[1, 4, 5, 8]*ab[3, 4, 7, 8] - 
       ab[1, 3, 4, 8]*ab[4, 5, 7, 8]))/(ab[3, 4, 7, 8]*
      (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
        ab[4, 5, 7, 8]))]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[1, 2, 4, 5, 8] + int[\[Tau]/(1 + \[Tau]), 
   Li[(ab[1, 2, 3, 8]*(ab[1, 4, 5, 8]*ab[3, 4, 7, 8] - 
        ab[1, 3, 4, 8]*ab[4, 5, 7, 8]))/(ab[1, 4, 5, 8]*
       (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
         ab[3, 4, 7, 8]))] - Li[1 - (ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/
       (ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[1, 2, 4, 5, 8] + int[\[Tau]/(1 + \[Tau]), 
   Li[(\[Tau]*ab[1, 5, 7, 8]*ab[2, 3, 7, 8]*ab[4, 5, 6, 8])/
     (ab[4, 5, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
       ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[1, 2, 4, 5, 8] + int[\[Tau]/(1 + \[Tau]), 
   -Li[1] + Li[(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
      (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
        ab[5, 6, 7, 8])]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[1, 2, 4, 5, 8] + int[\[Tau]/(1 + \[Tau]), 
   -(log[1 + \[Tau]]*log[(ab[1, 2, 3, 4]*ab[1, 4, 5, 8])/
        (ab[1, 2, 4, 5]*ab[1, 3, 4, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   -(log[1 + \[Tau]]*log[(ab[1, 2, 4, 5]*ab[1, 5, 6, 8])/
        (ab[1, 2, 5, 6]*ab[1, 4, 5, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   (log[1 + \[Tau]]*log[((1 + \[Tau]^(-1))*ab[1, 2, 6, 7]*ab[1, 3, 4, 8])/
       (ab[1, 2, 3, 4]*ab[1, 6, 7, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   -(log[1 + \[Tau]]*log[(ab[1, 2, 5, 6]*ab[1, 6, 7, 8])/
        (ab[1, 2, 6, 7]*ab[1, 5, 6, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   (log[(\[Tau]*ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5])/
       (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*(\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))]*
     log[((1 + \[Tau])*ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
       (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
         ab[3, 4, 7, 8])])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[1, 2, 4, 5, 8] + int[\[Tau]/(1 + \[Tau]), 
   (log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5])/
        (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
      log[(1 + (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[3, 4, 7, 8]))/(1 + \[Tau])] - log[1 + \[Tau]]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   (log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 7, 8]*
        ab[3, 4, 5, 6])/(ab[1, 2, 6, 7]*ab[2, 3, 5, 6]*ab[3, 4, 7, 8]*
        (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[4, 5, 7, 8]))]*log[((\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[3, 4, 7, 8])*ab[4, 5, 7, 8])/
       (ab[3, 4, 7, 8]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   (-(log[(ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[3, 4, 5, 6])/
         (ab[1, 2, 6, 7]*ab[1, 4, 5, 8]*ab[2, 3, 5, 6]*ab[3, 4, 7, 8])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
          ab[3, 4, 7, 8])]) + 
     log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*
         ab[3, 4, 5, 6])/(ab[1, 2, 6, 7]*ab[1, 4, 5, 8]*ab[2, 3, 5, 6]*
         (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[3, 4, 7, 8]))]*log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
          (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))/(\[Tau] + 
         (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))])/
    2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   -(log[(ab[1, 2, 7, 8]*ab[2, 3, 6, 7])/(ab[1, 2, 6, 7]*ab[2, 3, 7, 8])]*
      log[1 + (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8])])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[1, 2, 4, 5, 8] + int[\[Tau]/(1 + \[Tau]), 
   -(log[(ab[2, 3, 7, 8]*ab[3, 4, 6, 7])/(ab[2, 3, 6, 7]*ab[3, 4, 7, 8])]*
      log[1 + (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8])])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[1, 2, 4, 5, 8] + int[\[Tau]/(1 + \[Tau]), 
   (log[(ab[1, 2, 7, 8]*ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[4, 5, 7, 8])]*
     log[1 + (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
         ab[5, 6, 7, 8])])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[1, 2, 4, 5, 8] + int[\[Tau]/(1 + \[Tau]), 
   -(log[(ab[3, 4, 7, 8]*ab[4, 5, 6, 7])/(ab[3, 4, 6, 7]*ab[4, 5, 7, 8])]*
      log[1 + (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8])])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[1, 2, 4, 5, 8] + int[\[Tau]/(1 + \[Tau]), 
   (log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6]*
        ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[3, 4, 6, 7]*ab[4, 5, 7, 8]*
        (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8]))]*log[((\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[4, 5, 7, 8])*ab[5, 6, 7, 8])/
       (ab[4, 5, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   (-(log[(ab[1, 2, 7, 8]*ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[4, 5, 7, 8])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8])]) + log[\[Tau]]*log[(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
        (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8])] + 
     log[(ab[1, 2, 6, 7]*ab[4, 5, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*
           ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))/
        (ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])]*
      log[\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
          ab[2, 3, 7, 8])])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[1, 2, 4, 5, 8] + int[\[Tau]/(1 + \[Tau]), 
   (-(log[(ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
         (ab[1, 2, 6, 7]*ab[1, 5, 6, 8]*ab[3, 4, 6, 7]*ab[4, 5, 7, 8])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
          ab[4, 5, 7, 8])]) + 
     log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[3, 4, 5, 6]*
         ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[1, 5, 6, 8]*ab[3, 4, 6, 7]*
         (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8]))]*log[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))/(\[Tau] + 
         (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))])/
    2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 8] + 
 int[1 + \[Tau], -Li[1] + Li[\[Tau]/(1 + \[Tau])]]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 8] + 
 int[1 + \[Tau], Li[(ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/
     ((1 + \[Tau])*ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 8] + 
 int[1 + \[Tau], -Li[(ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/
       (ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
    Li[(\[Tau]*ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/
      (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
        ab[3, 4, 7, 8])]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[1, 2, 4, 5, 8] + 
 int[1 + \[Tau], Li[(ab[1, 2, 3, 8]*ab[1, 5, 7, 8]*ab[4, 5, 6, 8])/
     (ab[1, 5, 6, 8]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
       ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[1, 2, 4, 5, 8] + 
 int[1 + \[Tau], Li[(ab[1, 2, 3, 8]*(ab[1, 4, 5, 8]*ab[3, 4, 7, 8] - 
       ab[1, 3, 4, 8]*ab[4, 5, 7, 8]))/(ab[1, 4, 5, 8]*
      (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
        ab[3, 4, 7, 8]))]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[1, 2, 4, 5, 8] + 
 int[1 + \[Tau], Li[(\[Tau]*ab[2, 3, 7, 8]*(ab[1, 4, 5, 8]*ab[3, 4, 7, 8] - 
        ab[1, 3, 4, 8]*ab[4, 5, 7, 8]))/(ab[3, 4, 7, 8]*
       (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
         ab[4, 5, 7, 8]))] - Li[1 - (ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/
       (ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[1, 2, 4, 5, 8] + 
 int[1 + \[Tau], -Li[(ab[1, 5, 7, 8]*ab[4, 5, 6, 8])/
       (ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
    Li[(\[Tau]*ab[1, 5, 7, 8]*ab[2, 3, 7, 8]*ab[4, 5, 6, 8])/
      (ab[4, 5, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
        ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[1, 2, 4, 5, 8] + 
 int[1 + \[Tau], Li[(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
     (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 8] + 
 int[1 + \[Tau], (log[\[Tau]/(1 + \[Tau])]*
     log[(ab[1, 2, 3, 4]*ab[1, 4, 5, 8])/(ab[1, 2, 4, 5]*ab[1, 3, 4, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 8] + 
 int[1 + \[Tau], (log[\[Tau]/(1 + \[Tau])]*
     log[(ab[1, 2, 4, 5]*ab[1, 5, 6, 8])/(ab[1, 2, 5, 6]*ab[1, 4, 5, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 8] + 
 int[1 + \[Tau], -(log[\[Tau]/(1 + \[Tau])]*
      log[((1 + \[Tau])*ab[1, 2, 6, 7]*ab[1, 3, 4, 8])/
        (ab[1, 2, 3, 4]*ab[1, 6, 7, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 8] + 
 int[1 + \[Tau], (log[\[Tau]/(1 + \[Tau])]*
     log[(ab[1, 2, 5, 6]*ab[1, 6, 7, 8])/(ab[1, 2, 6, 7]*ab[1, 5, 6, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 8] + 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
       (ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
         (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 8] + 
 int[1 + \[Tau], (log[(\[Tau]*ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
        ab[2, 3, 4, 5])/(ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*
        (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[3, 4, 7, 8]))]*log[(1 + \[Tau])/
       (\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
          ab[2, 3, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[1, 2, 4, 5, 8] + 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
        ab[2, 3, 4, 5])/((1 + \[Tau])*ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*
        ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
     log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
          ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 8] + 
 int[1 + \[Tau], (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/
       (ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
         (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 8] + 
 int[1 + \[Tau], (log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*
        ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/(ab[1, 2, 6, 7]*ab[2, 3, 5, 6]*
        ab[3, 4, 7, 8]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]*
     log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
          ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
         (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 8] + 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
        ab[2, 3, 4, 5]*ab[3, 4, 5, 6])/(ab[1, 2, 6, 7]*ab[1, 4, 5, 8]*
        ab[2, 3, 5, 6]*(\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))]*
     log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
          ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
         (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 8] + 
 int[1 + \[Tau], (log[(ab[1, 2, 7, 8]*ab[2, 3, 6, 7])/
       (ab[1, 2, 6, 7]*ab[2, 3, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 8] + 
 int[1 + \[Tau], (log[(ab[2, 3, 7, 8]*ab[3, 4, 6, 7])/
       (ab[2, 3, 6, 7]*ab[3, 4, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 8] + 
 int[1 + \[Tau], (log[(ab[3, 4, 7, 8]*ab[4, 5, 6, 7])/
       (ab[3, 4, 6, 7]*ab[4, 5, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 8] + 
 int[1 + \[Tau], (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/
       (ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 8] + 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[4, 5, 6, 7]*
        ab[5, 6, 7, 8])/(ab[1, 2, 6, 7]*ab[4, 5, 7, 8]*
        (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8]))]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 8] + 
 int[1 + \[Tau], (log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*
        ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[3, 4, 6, 7]*
        ab[4, 5, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]*
     log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
          ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 8] + 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
        ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[1, 5, 6, 8]*
        ab[3, 4, 6, 7]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]*
     log[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
          ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
         (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 8] + 
 int[1 + \[Tau], (log[(ab[1, 2, 7, 8]*ab[4, 5, 6, 7])/
       (ab[1, 2, 6, 7]*ab[4, 5, 7, 8])]*
     log[1 + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(\[Tau]*ab[1, 5, 6, 8]*
         ab[2, 3, 7, 8])])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[1, 2, 4, 5, 8] + int[\[Tau]/(1 + \[Tau]), 
   (log[1 + (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
         ab[5, 6, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   -Li[(ab[1, 2, 3, 8]*(ab[1, 5, 6, 8]*ab[4, 5, 7, 8] - 
         ab[1, 4, 5, 8]*ab[5, 6, 7, 8]))/(ab[1, 5, 6, 8]*
        (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[4, 5, 7, 8]))] + Li[1 - (ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/
       (ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
    (log[(ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
         (ab[1, 2, 6, 7]*ab[1, 5, 6, 8]*ab[3, 4, 6, 7]*ab[4, 5, 7, 8])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      log[(ab[1, 2, 6, 7]*ab[1, 5, 6, 8]*ab[3, 4, 6, 7]*
          (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
            ab[4, 5, 7, 8]))/(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
          ab[3, 4, 5, 6]*ab[4, 5, 6, 7])]*
       log[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
            ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
           (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 8] - 
 int[1 + \[Tau], -Li[1] + Li[\[Tau]/(1 + \[Tau])]]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 8] - 
 int[1 + \[Tau], Li[(ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/
     ((1 + \[Tau])*ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 8] - 
 int[1 + \[Tau], -Li[(ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/
       (ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
    Li[(\[Tau]*ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/
      (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
        ab[3, 4, 7, 8])]]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[1, 2, 4, 5, 8] - 
 int[1 + \[Tau], Li[(ab[1, 2, 3, 8]*ab[1, 4, 7, 8]*ab[3, 4, 5, 8])/
     (ab[1, 4, 5, 8]*(\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
       ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))]]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[1, 2, 4, 5, 8] - 
 int[1 + \[Tau], Li[(ab[1, 2, 3, 8]*ab[1, 5, 7, 8]*ab[4, 5, 6, 8])/
     (ab[1, 5, 6, 8]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
       ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[1, 2, 4, 5, 8] - 
 int[1 + \[Tau], Li[(\[Tau]*ab[2, 3, 7, 8]*(ab[1, 4, 5, 8]*ab[3, 4, 7, 8] - 
        ab[1, 3, 4, 8]*ab[4, 5, 7, 8]))/(ab[3, 4, 7, 8]*
       (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
         ab[4, 5, 7, 8]))] - Li[1 - (ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/
       (ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[1, 2, 4, 5, 8] - 
 int[1 + \[Tau], -Li[(ab[1, 5, 7, 8]*ab[4, 5, 6, 8])/
       (ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
    Li[(\[Tau]*ab[1, 5, 7, 8]*ab[2, 3, 7, 8]*ab[4, 5, 6, 8])/
      (ab[4, 5, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
        ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[1, 2, 4, 5, 8] - 
 int[1 + \[Tau], Li[(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
     (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 8] - 
 int[1 + \[Tau], -(log[\[Tau]/(1 + \[Tau])]*log[1 + \[Tau]])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 8] - 
 int[1 + \[Tau], (log[\[Tau]/(1 + \[Tau])]*
     log[(ab[1, 2, 3, 4]*ab[1, 4, 5, 8])/(ab[1, 2, 4, 5]*ab[1, 3, 4, 8])])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 8] - 
 int[1 + \[Tau], (log[\[Tau]/(1 + \[Tau])]*
     log[(ab[1, 2, 4, 5]*ab[1, 5, 6, 8])/(ab[1, 2, 5, 6]*ab[1, 4, 5, 8])])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 8] - 
 int[1 + \[Tau], (log[\[Tau]/(1 + \[Tau])]*
     log[(ab[1, 2, 3, 4]*ab[1, 6, 7, 8])/(ab[1, 2, 6, 7]*ab[1, 3, 4, 8])])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 8] - 
 int[1 + \[Tau], (log[\[Tau]/(1 + \[Tau])]*
     log[(ab[1, 2, 5, 6]*ab[1, 6, 7, 8])/(ab[1, 2, 6, 7]*ab[1, 5, 6, 8])])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 8] - 
 int[1 + \[Tau], 
   (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
      log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))] + 
     log[(\[Tau]*ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5])/
        (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*(\[Tau]*ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))]*
      log[(1 + \[Tau])/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 8] - 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
        ab[2, 3, 4, 5])/((1 + \[Tau])*ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*
        ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
     log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
          ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 8] - 
 int[1 + \[Tau], 
   (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
      log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
          (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))] + 
     log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 7, 8]*
         ab[3, 4, 5, 6])/(ab[1, 2, 6, 7]*ab[2, 3, 5, 6]*ab[3, 4, 7, 8]*
         (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8]))]*log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))/(\[Tau] + 
         (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))])/
    2]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 8] - 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
        ab[2, 3, 4, 5]*ab[3, 4, 5, 6])/(ab[1, 2, 6, 7]*ab[1, 4, 5, 8]*
        ab[2, 3, 5, 6]*(\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))]*
     log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
          ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
         (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 8] - 
 int[1 + \[Tau], (log[(ab[1, 2, 7, 8]*ab[2, 3, 6, 7])/
       (ab[1, 2, 6, 7]*ab[2, 3, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 8] - 
 int[1 + \[Tau], (log[(ab[2, 3, 7, 8]*ab[3, 4, 6, 7])/
       (ab[2, 3, 6, 7]*ab[3, 4, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 8] - 
 int[1 + \[Tau], (log[(ab[3, 4, 7, 8]*ab[4, 5, 6, 7])/
       (ab[3, 4, 6, 7]*ab[4, 5, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 8] + 
 int[1 + \[Tau], (log[1 + (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/
        (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 8] - 
 2*int[1 + \[Tau], 
   -(log[(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(\[Tau]*ab[1, 5, 6, 8]*
          ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
      log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 8] - 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[4, 5, 6, 7]*
        ab[5, 6, 7, 8])/(ab[1, 2, 6, 7]*ab[4, 5, 7, 8]*
        (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8]))]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 8] - 
 int[1 + \[Tau], 
   (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
      log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))] + 
     log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6]*
         ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[3, 4, 6, 7]*ab[4, 5, 7, 8]*
         (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8]))]*log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
          (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))/(\[Tau] + 
         (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/
    2]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 8] - 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
        ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[1, 5, 6, 8]*
        ab[3, 4, 6, 7]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]*
     log[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
          ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
         (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), Li[\[Tau]/(1 + \[Tau])]]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   Li[(ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/((1 + \[Tau])*ab[1, 3, 4, 8]*
      ab[2, 3, 7, 8])]]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[1, 2, 4, 5, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   Li[(\[Tau]*ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/
     (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[3, 4, 7, 8])]]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   Li[(ab[1, 2, 3, 8]*ab[1, 4, 7, 8]*ab[3, 4, 5, 8])/
     (ab[1, 4, 5, 8]*(\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
       ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))]]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[1, 2, 4, 5, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   Li[(ab[1, 2, 3, 8]*ab[1, 5, 7, 8]*ab[4, 5, 6, 8])/
     (ab[1, 5, 6, 8]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
       ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[1, 2, 4, 5, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   Li[(\[Tau]*ab[2, 3, 7, 8]*(ab[1, 4, 5, 8]*ab[3, 4, 7, 8] - 
       ab[1, 3, 4, 8]*ab[4, 5, 7, 8]))/(ab[3, 4, 7, 8]*
      (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
        ab[4, 5, 7, 8]))]]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[1, 2, 4, 5, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   Li[(\[Tau]*ab[1, 5, 7, 8]*ab[2, 3, 7, 8]*ab[4, 5, 6, 8])/
     (ab[4, 5, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
       ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[1, 2, 4, 5, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   Li[(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
      ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[1, 2, 4, 5, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   -(log[1 + \[Tau]]*log[(\[Tau]*ab[1, 2, 3, 4]*ab[1, 6, 7, 8])/
        ((1 + \[Tau])*ab[1, 2, 6, 7]*ab[1, 3, 4, 8])])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (log[(ab[1, 2, 3, 4]*ab[1, 4, 5, 8])/(ab[1, 2, 4, 5]*ab[1, 3, 4, 8])]*
     log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[3, 4, 5, 6])/
       ((1 + \[Tau])*ab[1, 2, 4, 5]*ab[1, 3, 4, 8]*ab[2, 3, 5, 6]*
        ab[2, 3, 7, 8])])/2]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[1, 2, 4, 5, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (log[(\[Tau]*ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5])/
       (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*(\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))]*
     log[((1 + \[Tau])*ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
       (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
         ab[3, 4, 7, 8])])/2]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[1, 2, 4, 5, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5])/
       ((1 + \[Tau])*ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*ab[1, 3, 4, 8]*
        ab[2, 3, 7, 8])]*log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
         (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (log[(ab[1, 2, 4, 5]*ab[1, 5, 6, 8])/(ab[1, 2, 5, 6]*ab[1, 4, 5, 8])]*
     log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
       ((1 + \[Tau])*ab[1, 2, 5, 6]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8]*
        ab[3, 4, 6, 7])])/2]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[1, 2, 4, 5, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 7, 8]*
        ab[3, 4, 5, 6])/(ab[1, 2, 6, 7]*ab[2, 3, 5, 6]*ab[3, 4, 7, 8]*
        (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[4, 5, 7, 8]))]*log[((\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[3, 4, 7, 8])*ab[4, 5, 7, 8])/
       (ab[3, 4, 7, 8]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*
        ab[3, 4, 5, 6])/(ab[1, 2, 6, 7]*ab[1, 4, 5, 8]*ab[2, 3, 5, 6]*
        (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[3, 4, 7, 8]))]*log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
         (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))/(\[Tau] + 
        (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (log[(ab[1, 2, 5, 6]*ab[1, 6, 7, 8])/(ab[1, 2, 6, 7]*ab[1, 5, 6, 8])]*
     log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])/
       ((1 + \[Tau])*ab[1, 2, 6, 7]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8]*
        ab[4, 5, 7, 8])])/2]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[1, 2, 4, 5, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (log[(ab[1, 2, 7, 8]*ab[2, 3, 6, 7])/(ab[1, 2, 6, 7]*ab[2, 3, 7, 8])]*
     log[(\[Tau]*ab[1, 2, 3, 4]*ab[1, 2, 3, 8]*ab[1, 6, 7, 8]*ab[5, 6, 7, 8])/
       (ab[1, 2, 6, 7]*ab[1, 3, 4, 8]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (log[(ab[2, 3, 7, 8]*ab[3, 4, 6, 7])/(ab[2, 3, 6, 7]*ab[3, 4, 7, 8])]*
     log[(\[Tau]*ab[1, 2, 3, 4]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 7, 8]*
        ab[5, 6, 7, 8])/(ab[1, 2, 4, 5]*ab[2, 3, 6, 7]*ab[3, 4, 7, 8]*
        (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[1, 2, 4, 5, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (log[(ab[3, 4, 7, 8]*ab[4, 5, 6, 7])/(ab[3, 4, 6, 7]*ab[4, 5, 7, 8])]*
     log[(\[Tau]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6]*
        ab[5, 6, 7, 8])/(ab[2, 3, 5, 6]*ab[3, 4, 6, 7]*ab[4, 5, 7, 8]*
        (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[1, 2, 4, 5, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6]*
        ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[3, 4, 6, 7]*ab[4, 5, 7, 8]*
        (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8]))]*log[((\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[4, 5, 7, 8])*ab[5, 6, 7, 8])/
       (ab[4, 5, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])/
       (ab[1, 2, 6, 7]*ab[4, 5, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 8] - 
 2*int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (-Li[1] - log[(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
        (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8])]*
      log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[3, 4, 5, 6]*
        ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[1, 5, 6, 8]*ab[3, 4, 6, 7]*
        (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[4, 5, 7, 8]))]*log[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))/(\[Tau] + 
        (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   -Li[(ab[1, 2, 3, 8]*(ab[1, 5, 6, 8]*ab[4, 5, 7, 8] - 
         ab[1, 4, 5, 8]*ab[5, 6, 7, 8]))/(ab[1, 5, 6, 8]*
        (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[4, 5, 7, 8]))] + 
    (log[(ab[1, 2, 6, 7]*ab[1, 5, 6, 8]*ab[3, 4, 6, 7]*
         (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8]))/(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
         ab[3, 4, 5, 6]*ab[4, 5, 6, 7])]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
          (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 8] + 
 intdone[log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
      ab[5, 6, 7, 8])], Li[1] + Li[(ab[1, 2, 4, 8]*ab[1, 3, 4, 5])/
      (ab[1, 2, 4, 5]*ab[1, 3, 4, 8])] + 
    Li[(ab[1, 2, 5, 8]*ab[1, 4, 5, 6])/(ab[1, 2, 5, 6]*ab[1, 4, 5, 8])] + 
    Li[(ab[1, 2, 6, 8]*ab[1, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[1, 5, 6, 8])] + 
    Li[(ab[1, 2, 3, 5]*ab[2, 4, 5, 6])/(ab[1, 2, 4, 5]*ab[2, 3, 5, 6])] + 
    Li[(ab[1, 2, 3, 6]*ab[2, 5, 6, 7])/(ab[1, 2, 5, 6]*ab[2, 3, 6, 7])] + 
    Li[(ab[1, 2, 3, 7]*ab[2, 6, 7, 8])/(ab[1, 2, 6, 7]*ab[2, 3, 7, 8])] + 
    Li[(ab[2, 3, 4, 6]*ab[3, 5, 6, 7])/(ab[2, 3, 5, 6]*ab[3, 4, 6, 7])] + 
    Li[(ab[2, 3, 4, 7]*ab[3, 6, 7, 8])/(ab[2, 3, 6, 7]*ab[3, 4, 7, 8])] + 
    Li[(ab[3, 4, 5, 7]*ab[4, 6, 7, 8])/(ab[3, 4, 6, 7]*ab[4, 5, 7, 8])] + 
    (log[(ab[1, 2, 5, 6]*ab[2, 3, 4, 5])/(ab[1, 2, 4, 5]*ab[2, 3, 5, 6])]*
      log[(ab[1, 2, 3, 4]*ab[1, 2, 3, 8]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
        (ab[1, 2, 4, 5]*ab[1, 3, 4, 8]*ab[2, 3, 5, 6]*ab[3, 4, 6, 7])])/2 + 
    (log[(ab[1, 2, 6, 7]*ab[2, 3, 5, 6])/(ab[1, 2, 5, 6]*ab[2, 3, 6, 7])]*
      log[(ab[1, 2, 3, 4]*ab[1, 2, 3, 8]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])/
        (ab[1, 2, 5, 6]*ab[1, 3, 4, 8]*ab[2, 3, 6, 7]*ab[4, 5, 7, 8])])/2 + 
    (log[(ab[2, 3, 6, 7]*ab[3, 4, 5, 6])/(ab[2, 3, 5, 6]*ab[3, 4, 6, 7])]*
      log[(ab[1, 2, 3, 4]*ab[2, 3, 4, 5]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])/
        (ab[1, 2, 4, 5]*ab[2, 3, 5, 6]*ab[3, 4, 6, 7]*ab[4, 5, 7, 8])])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 2, 4, 5, 8] - 
 int[\[Tau]/(1 + \[Tau]), 
   (log[1 + \[Tau]]*log[(ab[1, 2, 3, 4]*ab[1, 4, 5, 8])/
       (ab[1, 2, 4, 5]*ab[1, 3, 4, 8])])/2]*
  Qlog[ab[7, 8, 1, 6]/ab[7, 8, 1, cap[{4, 5}, {1, 2, 8}]]]*R[1, 2, 4, 5, 8] - 
 int[\[Tau]/(1 + \[Tau]), 
   (log[(ab[1, 2, 4, 5]*ab[1, 6, 7, 8])/(ab[1, 2, 6, 7]*ab[1, 4, 5, 8])]*
     log[((1 + \[Tau])*ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
       (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
         ab[4, 5, 7, 8])])/2]*
  Qlog[ab[7, 8, 1, 6]/ab[7, 8, 1, cap[{4, 5}, {1, 2, 8}]]]*R[1, 2, 4, 5, 8] + 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[cap[{4, 5}, {1, 2, 8}], 
        6, 7, 8])/(ab[1, cap[{4, 5}, {1, 2, 8}], 6, 8]*ab[2, 3, 7, 8])), 
   (-Li[1] + log[(ab[1, 2, 3, 4]*ab[1, 4, 5, 8])/(ab[1, 2, 4, 5]*
         ab[1, 3, 4, 8])]*log[((1 + \[Tau])*ab[1, 2, 4, 5]*ab[2, 3, 7, 8])/
        (ab[1, 2, 7, 8]*ab[2, 3, 4, 5])])/2]*
  Qlog[ab[7, 8, 1, 6]/ab[7, 8, 1, cap[{4, 5}, {1, 2, 8}]]]*R[1, 2, 4, 5, 8] + 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[cap[{4, 5}, {1, 2, 8}], 
        6, 7, 8])/(ab[1, cap[{4, 5}, {1, 2, 8}], 6, 8]*ab[2, 3, 7, 8])), 
   (-Li[1] - log[(ab[1, 2, 4, 5]*ab[1, 6, 7, 8])/(ab[1, 2, 6, 7]*
         ab[1, 4, 5, 8])]*log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
          (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 6]/ab[7, 8, 1, cap[{4, 5}, {1, 2, 8}]]]*R[1, 2, 4, 5, 8] + 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[cap[{4, 5}, {1, 2, 8}], 6, 7, 8])/
      (ab[1, cap[{4, 5}, {1, 2, 8}], 6, 8]*ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (-Li[1] + log[(ab[1, 2, 3, 4]*ab[1, 4, 5, 8])/(ab[1, 2, 4, 5]*
         ab[1, 3, 4, 8])]*log[((1 + \[Tau])*ab[1, 2, 4, 5]*ab[2, 3, 7, 8])/
        (ab[1, 2, 7, 8]*ab[2, 3, 4, 5])])/2]*
  Qlog[ab[7, 8, 1, 6]/ab[7, 8, 1, cap[{4, 5}, {1, 2, 8}]]]*R[1, 2, 4, 5, 8] + 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[cap[{4, 5}, {1, 2, 8}], 6, 7, 8])/
      (ab[1, cap[{4, 5}, {1, 2, 8}], 6, 8]*ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (-Li[1] - log[(ab[1, 2, 4, 5]*ab[1, 6, 7, 8])/(ab[1, 2, 6, 7]*
         ab[1, 4, 5, 8])]*log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
          (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 6]/ab[7, 8, 1, cap[{4, 5}, {1, 2, 8}]]]*R[1, 2, 4, 5, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   Li[1 - (ab[1, 2, 3, 4]*ab[4, 5, 7, 8])/(ab[1, 2, 4, 5]*ab[3, 4, 7, 8])] + 
    (-2*Li[1 - (ab[1, 2, 3, 4]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
            ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))/(ab[1, 2, 4, 5]*
           (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
             ab[3, 4, 7, 8]))] + 
      log[(ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[3, 4, 5, 6])/
         (ab[1, 2, 4, 5]*ab[2, 3, 5, 6]*ab[3, 4, 7, 8])]*
       log[(ab[1, 2, 3, 4]*ab[4, 5, 7, 8])/(ab[1, 2, 4, 5]*ab[3, 4, 7, 8])] - 
      log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[3, 4, 5, 6])/
         (ab[1, 2, 4, 5]*ab[2, 3, 5, 6]*(\[Tau]*ab[1, 3, 4, 8]*
            ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))]*
       log[(ab[1, 2, 3, 4]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
           ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))/(ab[1, 2, 4, 5]*
          (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
            ab[3, 4, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[1, 2, 4, 7, 8] + 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 4]*ab[1, 4, 5, 8])/
       (ab[1, 2, 4, 5]*ab[1, 3, 4, 8])]*
     log[1 + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(\[Tau]*ab[1, 3, 4, 8]*
         ab[2, 3, 7, 8])])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[1, 2, 4, 7, 8] + 
 int[1 + \[Tau], Li[1 - (ab[1, 2, 3, 4]*ab[1, 4, 5, 8])/
       (ab[1, 2, 4, 5]*ab[1, 3, 4, 8])] - 
    Li[1 - (ab[1, 2, 3, 4]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))/(ab[1, 2, 4, 5]*
        (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[3, 4, 7, 8]))] + 
    (log[(ab[1, 2, 4, 5]*ab[2, 3, 5, 6]*(\[Tau]*ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))/
        (ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[3, 4, 5, 6])]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 4, 7, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   Li[1 - (ab[1, 2, 4, 5]*ab[5, 6, 7, 8])/(ab[1, 2, 5, 6]*ab[4, 5, 7, 8])] + 
    (-2*Li[1 - (ab[1, 2, 4, 5]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
            ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))/(ab[1, 2, 5, 6]*
           (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
             ab[4, 5, 7, 8]))] + 
      log[(ab[1, 2, 7, 8]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
         (ab[1, 2, 5, 6]*ab[3, 4, 6, 7]*ab[4, 5, 7, 8])]*
       log[(ab[1, 2, 4, 5]*ab[5, 6, 7, 8])/(ab[1, 2, 5, 6]*ab[4, 5, 7, 8])] - 
      log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
         (ab[1, 2, 5, 6]*ab[3, 4, 6, 7]*(\[Tau]*ab[1, 4, 5, 8]*
            ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]*
       log[(ab[1, 2, 4, 5]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
           ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))/(ab[1, 2, 5, 6]*
          (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
            ab[4, 5, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[1, 2, 5, 7, 8] + 
 int[1 + \[Tau], (log[(ab[1, 2, 4, 5]*ab[1, 5, 6, 8])/
       (ab[1, 2, 5, 6]*ab[1, 4, 5, 8])]*
     log[1 + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(\[Tau]*ab[1, 4, 5, 8]*
         ab[2, 3, 7, 8])])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[1, 2, 5, 7, 8] + 
 int[1 + \[Tau], Li[1 - (ab[1, 2, 4, 5]*ab[1, 5, 6, 8])/
       (ab[1, 2, 5, 6]*ab[1, 4, 5, 8])] - 
    Li[1 - (ab[1, 2, 4, 5]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))/(ab[1, 2, 5, 6]*
        (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[4, 5, 7, 8]))] + 
    (log[(ab[1, 2, 5, 6]*ab[3, 4, 6, 7]*(\[Tau]*ab[1, 4, 5, 8]*
           ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))/
        (ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
          (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 2, 5, 7, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   (log[1 + \[Tau]]*log[(ab[1, 2, 5, 6]*ab[1, 6, 7, 8])/
       (ab[1, 2, 6, 7]*ab[1, 5, 6, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 3, 4, 5, 6] + 
 int[1 + \[Tau], (log[1 + \[Tau]^(-1)]*log[(ab[1, 2, 5, 6]*ab[1, 6, 7, 8])/
       (ab[1, 2, 6, 7]*ab[1, 5, 6, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 3, 4, 5, 6] + 
 int[\[Tau]/(1 + \[Tau]), 
   (log[1 + \[Tau]]*log[(ab[1, 2, 3, 4]*ab[1, 5, 6, 8])/
       (ab[1, 2, 5, 6]*ab[1, 3, 4, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, cap[{5, 6}, {1, 3, 4}]]]*R[1, 3, 4, 5, 6] + 
 int[1 + \[Tau], (log[1 + \[Tau]^(-1)]*log[(ab[1, 2, 3, 4]*ab[1, 5, 6, 8])/
       (ab[1, 2, 5, 6]*ab[1, 3, 4, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, cap[{5, 6}, {1, 3, 4}]]]*R[1, 3, 4, 5, 6] - 
 intt3[(ab[1, 2, 5, 6]*ab[3, 4, 7, 8]*
     ((3*ab[1, 2, 3, 8]*(-4*t*ab[1, 2, 3, 4]*ab[1, 2, 5, 6]*ab[1, 5, 6, 8]*
          ab[3, 4, 5, 6]*ab[3, 4, 7, 8]*ab[7, 8, 1, 2] + 
         ((1 + t)^2*ab[1, 2, 5, 6]^2*ab[3, 4, 7, 8]^2 + 
           (ab[1, 2, 3, 4]*ab[5, 6, 7, 8] - ab[3, 4, 5, 6]*ab[7, 8, 1, 2])^
            2 - 2*(1 + t)*ab[1, 2, 5, 6]*ab[3, 4, 7, 8]*
            (ab[1, 2, 3, 4]*ab[5, 6, 7, 8] + ab[3, 4, 5, 6]*ab[7, 8, 1, 2]))*
          ab[8, 1, 2, cap[{4, 3}, {5, 6, 1}]])*
        (Log[(ab[1, 2, 3, 4]*ab[1, 5, 6, 8])/(ab[1, 2, 5, 6]*ab[1, 3, 4, 8])]*
          (Log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[3, 4, 5, 6])/
             (ab[1, 2, 5, 6]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] - 
           Log[-(ab[1, 2, 3, 8]*((-1 + t^2)*ab[1, 2, 5, 6]^2*ab[3, 4, 7, 8]^
                  2 - (ab[1, 2, 3, 4]*ab[5, 6, 7, 8] - ab[3, 4, 5, 6]*
                   ab[7, 8, 1, 2])^2 + 2*ab[1, 2, 5, 6]*ab[3, 4, 7, 8]*
                 (ab[1, 2, 3, 4]*ab[5, 6, 7, 8] + ab[3, 4, 5, 6]*ab[7, 8, 1, 
                    2])))/(2*ab[2, 3, 7, 8]*(2*ab[1, 2, 3, 4]*ab[1, 5, 6, 8]*
                ab[3, 4, 5, 6]*ab[7, 8, 1, 2] + (-((1 + t)*ab[1, 2, 5, 6]*
                   ab[3, 4, 7, 8]) + ab[1, 2, 3, 4]*ab[5, 6, 7, 8] + 
                 ab[3, 4, 5, 6]*ab[7, 8, 1, 2])*ab[8, 1, 2, cap[{4, 3}, 
                  {5, 6, 1}]]))]) + 2*PolyLog[2, 
           1 - (ab[1, 2, 3, 4]*ab[1, 5, 6, 8])/(ab[1, 2, 5, 6]*
              ab[1, 3, 4, 8])]))/(4*ab[1, 2, 3, 4]*ab[1, 5, 6, 8]*
         ab[2, 3, 7, 8]*ab[3, 4, 5, 6]*ab[7, 8, 1, 2] + 
        ab[1, 2, 3, 8]*(-((-1 + t^2)*ab[1, 2, 5, 6]^2*ab[3, 4, 7, 8]^2) + 
          (ab[1, 2, 3, 4]*ab[5, 6, 7, 8] - ab[3, 4, 5, 6]*ab[7, 8, 1, 2])^2 - 
          2*ab[1, 2, 5, 6]*ab[3, 4, 7, 8]*(ab[1, 2, 3, 4]*ab[5, 6, 7, 8] + 
            ab[3, 4, 5, 6]*ab[7, 8, 1, 2])) - 2*ab[2, 3, 7, 8]*
         ((1 + t)*ab[1, 2, 5, 6]*ab[3, 4, 7, 8] - ab[1, 2, 3, 4]*
           ab[5, 6, 7, 8] - ab[3, 4, 5, 6]*ab[7, 8, 1, 2])*
         ab[8, 1, 2, cap[{4, 3}, {5, 6, 1}]]) + 
      ((4*ab[1, 2, 3, 4]*ab[1, 5, 6, 8]^2*ab[3, 4, 5, 6]*ab[7, 8, 1, 2]*
          (-(ab[1, 2, 5, 6]*ab[3, 4, 7, 8]) + ab[1, 2, 3, 4]*ab[5, 6, 7, 8] + 
           ab[3, 4, 5, 6]*ab[7, 8, 1, 2]) + ab[1, 5, 6, 8]*
          ((3 + 2*t - t^2)*ab[1, 2, 5, 6]^2*ab[3, 4, 7, 8]^2 + 
           3*ab[1, 2, 3, 4]^2*ab[5, 6, 7, 8]^2 + 10*ab[1, 2, 3, 4]*
            ab[3, 4, 5, 6]*ab[5, 6, 7, 8]*ab[7, 8, 1, 2] + 
           3*ab[3, 4, 5, 6]^2*ab[7, 8, 1, 2]^2 - 2*(3 + t)*ab[1, 2, 5, 6]*
            ab[3, 4, 7, 8]*(ab[1, 2, 3, 4]*ab[5, 6, 7, 8] + 
             ab[3, 4, 5, 6]*ab[7, 8, 1, 2]))*ab[8, 1, 2, 
           cap[{4, 3}, {5, 6, 1}]] - 4*ab[5, 6, 7, 8]*
          ((1 + t)*ab[1, 2, 5, 6]*ab[3, 4, 7, 8] - ab[1, 2, 3, 4]*
            ab[5, 6, 7, 8] - ab[3, 4, 5, 6]*ab[7, 8, 1, 2])*
          ab[8, 1, 2, cap[{4, 3}, {5, 6, 1}]]^2)*
        (Pi^2 + 6*Log[(-(ab[1, 2, 7, 8]*ab[3, 4, 5, 6]) + 
             (1 + t)*ab[1, 2, 5, 6]*ab[3, 4, 7, 8] - ab[1, 2, 3, 4]*
              ab[5, 6, 7, 8])/(ab[1, 2, 7, 8]*ab[3, 4, 5, 6] + 
             (1 + t)*ab[1, 2, 5, 6]*ab[3, 4, 7, 8] - ab[1, 2, 3, 4]*
              ab[5, 6, 7, 8])]*Log[((1 + t)*ab[1, 2, 5, 6]^2*ab[1, 3, 4, 8]*
              ab[3, 4, 7, 8] + ab[1, 2, 3, 4]*ab[1, 5, 6, 8]*
              (-(ab[1, 2, 7, 8]*ab[3, 4, 5, 6]) + ab[1, 2, 3, 4]*
                ab[5, 6, 7, 8]) - ab[1, 2, 5, 6]*(ab[1, 2, 7, 8]*
                ab[1, 3, 4, 8]*ab[3, 4, 5, 6] + ab[1, 2, 3, 4]*
                ((1 + t)*ab[1, 5, 6, 8]*ab[3, 4, 7, 8] + ab[1, 3, 4, 8]*
                  ab[5, 6, 7, 8])))/(ab[1, 2, 5, 6]*(-(ab[1, 2, 7, 8]*
                ab[1, 3, 4, 8]*ab[3, 4, 5, 6]) + (1 + t)*ab[1, 2, 5, 6]*ab[1, 
                3, 4, 8]*ab[3, 4, 7, 8] + ab[1, 2, 3, 4]*(-2*ab[1, 5, 6, 8]*
                 ab[3, 4, 7, 8] + ab[1, 3, 4, 8]*ab[5, 6, 7, 8])))] - 
         3*Log[(ab[1, 2, 3, 4]*(ab[1, 2, 7, 8]*ab[3, 4, 5, 6] - 
              (1 + t)*ab[1, 2, 5, 6]*ab[3, 4, 7, 8] + ab[1, 2, 3, 4]*ab[5, 6, 
                7, 8])*(-(ab[1, 2, 7, 8]*ab[1, 5, 6, 8]*ab[3, 4, 5, 6]) + 
              ab[1, 2, 3, 4]*ab[1, 5, 6, 8]*ab[5, 6, 7, 8] + ab[1, 2, 5, 6]*(
                -((-1 + t)*ab[1, 5, 6, 8]*ab[3, 4, 7, 8]) - 2*ab[1, 3, 4, 8]*
                 ab[5, 6, 7, 8])))/(ab[1, 2, 5, 6]*(ab[1, 2, 7, 8]*ab[3, 4, 
                5, 6] + (1 + t)*ab[1, 2, 5, 6]*ab[3, 4, 7, 8] - 
              ab[1, 2, 3, 4]*ab[5, 6, 7, 8])*(-(ab[1, 2, 7, 8]*ab[1, 3, 4, 8]*
                ab[3, 4, 5, 6]) + (1 + t)*ab[1, 2, 5, 6]*ab[1, 3, 4, 8]*ab[3, 
                4, 7, 8] + ab[1, 2, 3, 4]*(-2*ab[1, 5, 6, 8]*ab[3, 4, 7, 8] + 
                ab[1, 3, 4, 8]*ab[5, 6, 7, 8])))]*
          Log[(-2*ab[1, 2, 7, 8]*ab[3, 4, 5, 6]*(-((1 + t)*ab[1, 2, 5, 6]^2*
                ab[1, 3, 4, 8]*ab[3, 4, 7, 8]) + ab[1, 2, 3, 4]*ab[1, 5, 6, 
                8]*(ab[1, 2, 7, 8]*ab[3, 4, 5, 6] - ab[1, 2, 3, 4]*
                 ab[5, 6, 7, 8]) + ab[1, 2, 5, 6]*(ab[1, 2, 7, 8]*
                 ab[1, 3, 4, 8]*ab[3, 4, 5, 6] + ab[1, 2, 3, 4]*
                 ((1 + t)*ab[1, 5, 6, 8]*ab[3, 4, 7, 8] + ab[1, 3, 4, 8]*
                   ab[5, 6, 7, 8]))))/(ab[1, 2, 5, 6]*
             (ab[1, 2, 7, 8]*ab[3, 4, 5, 6] + (1 + t)*ab[1, 2, 5, 6]*ab[3, 4, 
                7, 8] - ab[1, 2, 3, 4]*ab[5, 6, 7, 8])*
             (-(ab[1, 2, 7, 8]*ab[1, 3, 4, 8]*ab[3, 4, 5, 6]) + 
              (1 + t)*ab[1, 2, 5, 6]*ab[1, 3, 4, 8]*ab[3, 4, 7, 8] + 
              ab[1, 2, 3, 4]*(-2*ab[1, 5, 6, 8]*ab[3, 4, 7, 8] + 
                ab[1, 3, 4, 8]*ab[5, 6, 7, 8])))] - 
         6*PolyLog[2, (-(ab[1, 2, 7, 8]*ab[3, 4, 5, 6]) + 
             (1 + t)*ab[1, 2, 5, 6]*ab[3, 4, 7, 8] - ab[1, 2, 3, 4]*
              ab[5, 6, 7, 8])/(ab[1, 2, 7, 8]*ab[3, 4, 5, 6] + 
             (1 + t)*ab[1, 2, 5, 6]*ab[3, 4, 7, 8] - ab[1, 2, 3, 4]*
              ab[5, 6, 7, 8])] - 6*PolyLog[2, 
           ((1 + t)*ab[1, 2, 5, 6]^2*ab[1, 3, 4, 8]*ab[3, 4, 7, 8] + 
             ab[1, 2, 3, 4]*ab[1, 5, 6, 8]*(-(ab[1, 2, 7, 8]*ab[3, 4, 5, 
                  6]) + ab[1, 2, 3, 4]*ab[5, 6, 7, 8]) - ab[1, 2, 5, 6]*
              (ab[1, 2, 7, 8]*ab[1, 3, 4, 8]*ab[3, 4, 5, 6] + ab[1, 2, 3, 4]*
                ((1 + t)*ab[1, 5, 6, 8]*ab[3, 4, 7, 8] + ab[1, 3, 4, 8]*
                  ab[5, 6, 7, 8])))/(ab[1, 2, 5, 6]*(-(ab[1, 2, 7, 8]*
                ab[1, 3, 4, 8]*ab[3, 4, 5, 6]) + (1 + t)*ab[1, 2, 5, 6]*ab[1, 
                3, 4, 8]*ab[3, 4, 7, 8] + ab[1, 2, 3, 4]*(-2*ab[1, 5, 6, 8]*
                 ab[3, 4, 7, 8] + ab[1, 3, 4, 8]*ab[5, 6, 7, 8])))]))/
       (((1 + t)*ab[1, 2, 5, 6]*ab[3, 4, 7, 8] - ab[1, 2, 3, 4]*
          ab[5, 6, 7, 8] - ab[3, 4, 5, 6]*ab[7, 8, 1, 2])*
        (ab[1, 5, 6, 8]*((-1 + t)*ab[1, 2, 5, 6]*ab[3, 4, 7, 8] + 
           ab[1, 2, 3, 4]*ab[5, 6, 7, 8] + ab[3, 4, 5, 6]*ab[7, 8, 1, 2]) + 
         2*ab[5, 6, 7, 8]*ab[8, 1, 2, cap[{4, 3}, {5, 6, 1}]]))))/
    (6*(2*ab[1, 2, 3, 4]*ab[1, 5, 6, 8]*ab[3, 4, 5, 6]*ab[7, 8, 1, 2] + 
      (-((1 + t)*ab[1, 2, 5, 6]*ab[3, 4, 7, 8]) + ab[1, 2, 3, 4]*
         ab[5, 6, 7, 8] + ab[3, 4, 5, 6]*ab[7, 8, 1, 2])*
       ab[8, 1, 2, cap[{4, 3}, {5, 6, 1}]])), 
   1 - (ab[1, 2, 3, 4]*ab[5, 6, 7, 8])/(ab[1, 2, 5, 6]*ab[3, 4, 7, 8]) - 
    (ab[3, 4, 5, 6]*ab[7, 8, 1, 2])/(ab[1, 2, 5, 6]*ab[3, 4, 7, 8])]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, cap[{5, 6}, {1, 3, 4}]]]*R[1, 3, 4, 5, 6] - 
 int[1 + \[Tau], (log[((1 + \[Tau])*ab[1, 2, 4, 5]*ab[2, 3, 7, 8])/
       (ab[1, 2, 7, 8]*ab[2, 3, 4, 5])]*
     log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
          ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[1, 3, 4, 5, 8] - 
 int[1 + \[Tau], 
   (-(log[(ab[1, 2, 3, 4]*ab[1, 4, 5, 8])/(ab[1, 2, 4, 5]*ab[1, 3, 4, 8])]*
       log[(1 + \[Tau])/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
           (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))]) - 
     log[((1 + \[Tau])*ab[1, 2, 3, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
        (ab[2, 3, 5, 6]*(\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[1, 3, 4, 5, 8] - 
 int[1 + \[Tau], 
   (log[(ab[1, 5, 6, 8]*ab[2, 3, 4, 5])/(ab[1, 4, 5, 8]*ab[2, 3, 5, 6])]*
      log[(ab[1, 3, 4, 8]*ab[4, 5, 6, 7])/(ab[1, 4, 5, 8]*ab[3, 4, 6, 7])] - 
     log[((\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[3, 4, 7, 8])*ab[4, 5, 6, 7])/(ab[3, 4, 6, 7]*
         (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8]))]*
      log[(ab[2, 3, 4, 5]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))/(ab[2, 3, 5, 6]*
         (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*
  R[1, 3, 4, 5, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (-Li[1] - log[((1 + \[Tau])*ab[1, 2, 3, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
        (ab[2, 3, 5, 6]*(\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))]*
      log[(ab[1, 2, 3, 4]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))/(ab[1, 2, 4, 5]*
         (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[3, 4, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*
  R[1, 3, 4, 5, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (-Li[1] - log[((\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[3, 4, 7, 8])*ab[4, 5, 6, 7])/
        (ab[3, 4, 6, 7]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]*
      log[(ab[2, 3, 4, 5]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))/(ab[2, 3, 5, 6]*
         (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*
  R[1, 3, 4, 5, 8] + 
 intdone[log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
      ab[5, 6, 7, 8])], -Li[1]/2 - 
    (log[(ab[1, 5, 6, 8]*ab[2, 3, 4, 5])/(ab[1, 4, 5, 8]*ab[2, 3, 5, 6])]*
      log[(ab[1, 3, 4, 8]*ab[4, 5, 6, 7])/(ab[1, 4, 5, 8]*ab[3, 4, 6, 7])])/
     2]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 3, 4, 5, 8] + 
 intdone[log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
      ab[5, 6, 7, 8])], -Li[1]/2 - 
    (log[(ab[1, 2, 3, 4]*ab[1, 4, 5, 8])/(ab[1, 2, 4, 5]*ab[1, 3, 4, 8])]*
      log[(ab[1, 2, 3, 8]*ab[3, 4, 5, 6])/(ab[1, 3, 4, 8]*ab[2, 3, 5, 6])])/
     2]*Qlog[ab[7, 8, 1, 6]/ab[7, 8, 1, cap[{4, 5}, {1, 3, 8}]]]*
  R[1, 3, 4, 5, 8] + int[\[Tau]/(1 + \[Tau]), 
   (log[1 + \[Tau]]*log[(ab[1, 2, 3, 4]*ab[1, 6, 7, 8])/
       (ab[1, 2, 6, 7]*ab[1, 3, 4, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 3, 4, 6, 7] + 
 int[1 + \[Tau], (log[1 + \[Tau]^(-1)]*log[(ab[1, 2, 3, 4]*ab[1, 6, 7, 8])/
       (ab[1, 2, 6, 7]*ab[1, 3, 4, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 3, 4, 6, 7] + 
 intt1[-(Pi^2 + 6*Log[((1 + t)*(-(ab[1, 2, 6, 7]*ab[1, 3, 4, 8]) + 
           ab[1, 2, 3, 4]*ab[1, 6, 7, 8]))/
         (-((1 + t)*ab[1, 2, 6, 7]*ab[1, 3, 4, 8]) + (-1 + t)*ab[1, 2, 3, 4]*
           ab[1, 6, 7, 8])]*Log[((-1 + t)*ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*
           ab[1, 6, 7, 8]*ab[3, 4, 6, 7] + (1 + t)*ab[1, 2, 6, 7]*
           ab[1, 3, 4, 7]*ab[6, 7, 8, cap[{1, 2}, {3, 4, 8}]])/
         (ab[1, 2, 6, 7]*((-1 + t)*ab[1, 6, 7, cap[{8, 2}, {1, 3, 4}]]*
            ab[3, 4, 7, 8] + 2*ab[1, 3, 4, 7]*ab[6, 7, 8, cap[{1, 2}, 
              {3, 4, 8}]]))] - 
      3*Log[(2*ab[1, 2, 3, 4]*ab[1, 6, 7, 8]*((-1 + t)*ab[1, 2, 3, 4]*
            ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[3, 4, 6, 7] + 
           (1 + t)*ab[1, 2, 6, 7]*ab[1, 3, 4, 7]*ab[6, 7, 8, 
             cap[{1, 2}, {3, 4, 8}]]))/(ab[1, 2, 6, 7]*
          ((1 + t)*ab[1, 2, 6, 7]*ab[1, 3, 4, 8] - (-1 + t)*ab[1, 2, 3, 4]*
            ab[1, 6, 7, 8])*((-1 + t)*ab[1, 6, 7, cap[{8, 2}, {1, 3, 4}]]*
            ab[3, 4, 7, 8] + 2*ab[1, 3, 4, 7]*ab[6, 7, 8, cap[{1, 2}, 
              {3, 4, 8}]]))]*
       Log[((1 + t)*(1 - (ab[1, 2, 3, 4]*ab[1, 6, 7, 8])/(ab[1, 2, 6, 7]*
             ab[1, 3, 4, 8]))*(1 - ((-1 + t)*ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*
              ab[1, 6, 7, 8]*ab[3, 4, 6, 7] + (1 + t)*ab[1, 2, 6, 7]*
              ab[1, 3, 4, 7]*ab[6, 7, 8, cap[{1, 2}, {3, 4, 8}]])/
            (ab[1, 2, 6, 7]*((-1 + t)*ab[1, 6, 7, cap[{8, 2}, {1, 3, 4}]]*ab[
                3, 4, 7, 8] + 2*ab[1, 3, 4, 7]*ab[6, 7, 8, cap[{1, 2}, 
                 {3, 4, 8}]]))))/(1 + t - ((-1 + t)*ab[1, 2, 3, 4]*
            ab[1, 6, 7, 8])/(ab[1, 2, 6, 7]*ab[1, 3, 4, 8]))] - 
      6*PolyLog[2, ((1 + t)*(-(ab[1, 2, 6, 7]*ab[1, 3, 4, 8]) + 
           ab[1, 2, 3, 4]*ab[1, 6, 7, 8]))/
         (-((1 + t)*ab[1, 2, 6, 7]*ab[1, 3, 4, 8]) + (-1 + t)*ab[1, 2, 3, 4]*
           ab[1, 6, 7, 8])] + (3*ab[1, 2, 3, 8]*
        ((1 + t)^2*ab[1, 2, 7, cap[{6, 8}, {3, 4, 7}]]*
          ab[1, 6, 7, cap[{8, 2}, {1, 3, 4}]] - 4*t*ab[1, 2, 3, 4]*
          ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[3, 4, 6, 7])*
        (Log[(ab[1, 2, 3, 4]*ab[1, 6, 7, 8])/(ab[1, 2, 6, 7]*ab[1, 3, 4, 8])]*
          (Log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[3, 4, 6, 7])/
             (ab[1, 2, 6, 7]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] - 
           Log[(2*ab[1, 2, 3, 8]*((1 + t)*ab[1, 2, 7, cap[{6, 8}, {3, 4, 7}]]*
                ab[1, 6, 7, cap[{8, 2}, {1, 3, 4}]] - 2*ab[1, 2, 3, 4]*
                ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[3, 4, 6, 7]))/
             ((-1 + t^2)*ab[1, 6, 7, cap[{8, 2}, {1, 3, 4}]]^2*
              ab[2, 3, 7, 8])]) + 2*PolyLog[2, 
           1 - (ab[1, 2, 3, 4]*ab[1, 6, 7, 8])/(ab[1, 2, 6, 7]*
              ab[1, 3, 4, 8])]))/(2*(1 + t)*ab[1, 2, 3, 8]*
         ab[1, 2, 7, cap[{6, 8}, {3, 4, 7}]]*ab[1, 6, 7, 
          cap[{8, 2}, {1, 3, 4}]] + (-1 + t^2)*
         ab[1, 6, 7, cap[{8, 2}, {1, 3, 4}]]^2*ab[2, 3, 7, 8] - 
        4*ab[1, 2, 3, 4]*ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
         ab[3, 4, 6, 7]) - 
      6*PolyLog[2, ((-1 + t)*ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
           ab[3, 4, 6, 7] + (1 + t)*ab[1, 2, 6, 7]*ab[1, 3, 4, 7]*
           ab[6, 7, 8, cap[{1, 2}, {3, 4, 8}]])/(ab[1, 2, 6, 7]*
          ((-1 + t)*ab[1, 6, 7, cap[{8, 2}, {1, 3, 4}]]*ab[3, 4, 7, 8] + 
           2*ab[1, 3, 4, 7]*ab[6, 7, 8, cap[{1, 2}, {3, 4, 8}]]))])/
    (3*(-1 + t^2))]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 3, 4, 6, 7] - 
 int[1 + \[Tau], Li[1 - (ab[1, 6, 7, 8]*ab[3, 4, 5, 6])/
       (ab[1, 5, 6, 8]*ab[3, 4, 6, 7])] + 
    (-2*Li[1 - (\[Tau]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
          (ab[3, 4, 6, 7]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
            ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))] + 
      log[(ab[1, 6, 7, 8]*ab[3, 4, 5, 6])/(ab[1, 5, 6, 8]*ab[3, 4, 6, 7])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[3, 4, 6, 7]*ab[4, 5, 7, 8])] - 
      log[(\[Tau]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
         (ab[3, 4, 6, 7]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
           ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]*
       log[((\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
            ab[3, 4, 7, 8])*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])/
         (ab[3, 4, 6, 7]*ab[4, 5, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*
            ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[1, 3, 4, 6, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 6, 7, 8])/(ab[1, 4, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   -Li[1 - (\[Tau]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
        (ab[3, 4, 6, 7]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))] - 
    (log[(\[Tau]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
        (ab[3, 4, 6, 7]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]*
      log[((\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[3, 4, 7, 8])*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])/
        (ab[3, 4, 6, 7]*ab[4, 5, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*
           ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[1, 3, 4, 6, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   (log[(ab[3, 4, 7, 8]*ab[4, 5, 6, 7])/(ab[3, 4, 6, 7]*ab[4, 5, 7, 8])]*
     log[1 + (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
         ab[5, 6, 7, 8])])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*
  R[1, 3, 4, 7, 8] + int[\[Tau]/(1 + \[Tau]), 
   -(log[(ab[1, 2, 7, 8]*ab[3, 4, 6, 7])/(ab[1, 2, 6, 7]*ab[3, 4, 7, 8])]*
      log[((\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[3, 4, 7, 8])*ab[5, 6, 7, 8])/(ab[3, 4, 7, 8]*
         (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*
  R[1, 3, 4, 7, 8] + 
 int[1 + \[Tau], 
   -(log[(ab[1, 2, 7, 8]*ab[3, 4, 6, 7])/(ab[1, 2, 6, 7]*ab[3, 4, 7, 8])]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[1, 3, 4, 7, 8] + 
 int[1 + \[Tau], (log[(ab[3, 4, 7, 8]*ab[4, 5, 6, 7])/
       (ab[3, 4, 6, 7]*ab[4, 5, 7, 8])]*
     log[1 + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(\[Tau]*ab[1, 5, 6, 8]*
         ab[2, 3, 7, 8])])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*
  R[1, 3, 4, 7, 8] + int[\[Tau]/(1 + \[Tau]), 
   -(log[(ab[1, 2, 7, 8]*ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[4, 5, 7, 8])]*
      log[((\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8])*ab[5, 6, 7, 8])/(ab[4, 5, 7, 8]*
         (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 5]]*
  R[1, 3, 4, 7, 8] + 
 int[1 + \[Tau], 
   -(log[(ab[1, 2, 7, 8]*ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[4, 5, 7, 8])]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 5]]*R[1, 3, 4, 7, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   (log[(ab[1, 2, 3, 4]*ab[1, 6, 7, 8])/(ab[1, 2, 6, 7]*ab[1, 3, 4, 8])]*
     log[((1 + \[Tau])*ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
       (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
         ab[3, 4, 7, 8])])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[1, 3, 4, 7, 8] + int[\[Tau]/(1 + \[Tau]), 
   Li[1] - Li[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
      (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
        ab[3, 4, 7, 8])] + 
    (log[\[Tau]]*log[1 + (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8])/
          (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])] + 
      log[(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])]*
       log[(ab[1, 2, 7, 8]*ab[3, 4, 6, 7])/(ab[1, 2, 6, 7]*ab[3, 4, 7, 8])] + 
      log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[3, 4, 6, 7])/
         (ab[1, 2, 6, 7]*(\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
           ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))]*
       log[\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[1, 3, 4, 7, 8] + 
 int[1 + \[Tau], -Li[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
      (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
        ab[3, 4, 7, 8])]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[1, 3, 4, 7, 8] + 
 int[1 + \[Tau], 
   (log[(ab[1, 2, 6, 7]*(\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))/(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*
        ab[3, 4, 6, 7])]*log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
         (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 3, 4, 7, 8] + 
 int[1 + \[Tau], 
   -(log[(ab[1, 2, 3, 4]*ab[1, 6, 7, 8])/(ab[1, 2, 6, 7]*ab[1, 3, 4, 8])]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 3, 4, 7, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   Li[1 - (ab[3, 4, 7, 8]*ab[4, 5, 6, 7])/(ab[3, 4, 6, 7]*ab[4, 5, 7, 8])] + 
    (-2*Li[1 - ((\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
             ab[3, 4, 7, 8])*ab[4, 5, 6, 7])/(ab[3, 4, 6, 7]*
           (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
             ab[4, 5, 7, 8]))] + 
      log[(ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
         (ab[1, 2, 3, 8]*ab[2, 3, 5, 6]*ab[3, 4, 6, 7]*ab[4, 5, 7, 8])]*
       log[(ab[3, 4, 7, 8]*ab[4, 5, 6, 7])/(ab[3, 4, 6, 7]*ab[4, 5, 7, 8])] - 
      log[(ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
         (ab[2, 3, 5, 6]*ab[3, 4, 6, 7]*(\[Tau]*ab[1, 4, 5, 8]*
            ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]*
       log[((\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
            ab[3, 4, 7, 8])*ab[4, 5, 6, 7])/(ab[3, 4, 6, 7]*
          (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
            ab[4, 5, 7, 8]))] - log[\[Tau]]*
       log[((\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
            ab[3, 4, 7, 8])*ab[4, 5, 7, 8])/(ab[3, 4, 7, 8]*
          (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
            ab[4, 5, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 6]]*
  R[1, 3, 4, 7, 8] + 
 int[1 + \[Tau], Li[1 - (ab[1, 3, 4, 8]*ab[4, 5, 6, 7])/
       (ab[1, 4, 5, 8]*ab[3, 4, 6, 7])] - 
    Li[1 - ((\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[3, 4, 7, 8])*ab[4, 5, 6, 7])/(ab[3, 4, 6, 7]*
        (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[4, 5, 7, 8]))] - 
    (log[(\[Tau]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
        (ab[2, 3, 5, 6]*ab[3, 4, 6, 7]*(\[Tau]*ab[1, 4, 5, 8]*
           ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
          (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 6]]*R[1, 3, 4, 7, 8] + 
 int[1 + \[Tau], (log[(ab[1, 3, 4, 8]*ab[4, 5, 6, 7])/
       (ab[1, 4, 5, 8]*ab[3, 4, 6, 7])]*
     log[1 + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(\[Tau]*ab[1, 4, 5, 8]*
         ab[2, 3, 7, 8])])/2]*Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 6]]*
  R[1, 3, 4, 7, 8] + int[\[Tau]/(1 + \[Tau]), 
   -(log[(\[Tau]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
        (ab[3, 4, 6, 7]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]*
      log[((\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8])*ab[5, 6, 7, 8])/(ab[4, 5, 7, 8]*
         (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[1, 3, 4, 7, 8] + 
 int[1 + \[Tau], -(log[(\[Tau]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
        (ab[3, 4, 6, 7]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, 3, 4, 7, 8] + 
 int[1 + \[Tau], (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/
       (ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
     log[1 + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(\[Tau]*ab[1, 5, 6, 8]*
         ab[2, 3, 7, 8])])/2]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[1, 3, 4, 7, 8] - 
 int[1 + \[Tau], (log[((1 + \[Tau])*ab[1, 2, 4, 5]*ab[2, 3, 7, 8])/
       (ab[1, 2, 7, 8]*ab[2, 3, 4, 5])]*
     log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
          ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[1, 3, 5, 6, 8] - 
 int[1 + \[Tau], Li[1 - (ab[1, 2, 3, 8]*ab[3, 4, 5, 6])/
       (ab[1, 3, 4, 8]*ab[2, 3, 5, 6])] + 
    (-2*Li[1 - ((1 + \[Tau])*ab[1, 2, 3, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
          (ab[2, 3, 5, 6]*(\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
            ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))] + 
      log[(ab[1, 2, 3, 4]*ab[1, 5, 6, 8]*ab[2, 3, 4, 5])/
         (ab[1, 2, 4, 5]*ab[1, 3, 4, 8]*ab[2, 3, 5, 6])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 5, 6])/(ab[1, 3, 4, 8]*ab[2, 3, 5, 6])] - 
      log[((1 + \[Tau])*ab[1, 2, 3, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
         (ab[2, 3, 5, 6]*(\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
           ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))]*
       log[(ab[1, 2, 3, 4]*ab[2, 3, 4, 5]*(\[Tau]*ab[1, 5, 6, 8]*
            ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))/
         (ab[1, 2, 4, 5]*ab[2, 3, 5, 6]*(\[Tau]*ab[1, 3, 4, 8]*
            ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[1, 3, 5, 6, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   -Li[1 - ((1 + \[Tau])*ab[1, 2, 3, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
        (ab[2, 3, 5, 6]*(\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))] - 
    (log[((1 + \[Tau])*ab[1, 2, 3, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
        (ab[2, 3, 5, 6]*(\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))]*
      log[(ab[1, 2, 3, 4]*ab[2, 3, 4, 5]*(\[Tau]*ab[1, 5, 6, 8]*
           ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))/
        (ab[1, 2, 4, 5]*ab[2, 3, 5, 6]*(\[Tau]*ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[1, 3, 5, 6, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   (log[1 + \[Tau]]*log[(ab[1, 2, 4, 5]*ab[1, 6, 7, 8])/
       (ab[1, 2, 6, 7]*ab[1, 4, 5, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 4, 5, 6, 7] + 
 int[1 + \[Tau], (log[1 + \[Tau]^(-1)]*log[(ab[1, 2, 4, 5]*ab[1, 6, 7, 8])/
       (ab[1, 2, 6, 7]*ab[1, 4, 5, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 4, 5, 6, 7] + 
 intt1[-(Pi^2 + 6*Log[((1 + t)*(-(ab[1, 2, 6, 7]*ab[1, 4, 5, 8]) + 
           ab[1, 2, 4, 5]*ab[1, 6, 7, 8]))/
         (-((1 + t)*ab[1, 2, 6, 7]*ab[1, 4, 5, 8]) + (-1 + t)*ab[1, 2, 4, 5]*
           ab[1, 6, 7, 8])]*Log[((-1 + t)*ab[1, 2, 4, 5]*ab[1, 2, 7, 8]*
           ab[1, 6, 7, 8]*ab[4, 5, 6, 7] + (1 + t)*ab[1, 2, 6, 7]*
           ab[1, 4, 5, 7]*ab[6, 7, 8, cap[{1, 2}, {4, 5, 8}]])/
         (ab[1, 2, 6, 7]*((-1 + t)*ab[1, 6, 7, cap[{8, 2}, {1, 4, 5}]]*
            ab[4, 5, 7, 8] + 2*ab[1, 4, 5, 7]*ab[6, 7, 8, cap[{1, 2}, 
              {4, 5, 8}]]))] - 
      3*Log[(2*ab[1, 2, 4, 5]*ab[1, 6, 7, 8]*((-1 + t)*ab[1, 2, 4, 5]*
            ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[4, 5, 6, 7] + 
           (1 + t)*ab[1, 2, 6, 7]*ab[1, 4, 5, 7]*ab[6, 7, 8, 
             cap[{1, 2}, {4, 5, 8}]]))/(ab[1, 2, 6, 7]*
          ((1 + t)*ab[1, 2, 6, 7]*ab[1, 4, 5, 8] - (-1 + t)*ab[1, 2, 4, 5]*
            ab[1, 6, 7, 8])*((-1 + t)*ab[1, 6, 7, cap[{8, 2}, {1, 4, 5}]]*
            ab[4, 5, 7, 8] + 2*ab[1, 4, 5, 7]*ab[6, 7, 8, cap[{1, 2}, 
              {4, 5, 8}]]))]*
       Log[((1 + t)*(1 - (ab[1, 2, 4, 5]*ab[1, 6, 7, 8])/(ab[1, 2, 6, 7]*
             ab[1, 4, 5, 8]))*(1 - ((-1 + t)*ab[1, 2, 4, 5]*ab[1, 2, 7, 8]*
              ab[1, 6, 7, 8]*ab[4, 5, 6, 7] + (1 + t)*ab[1, 2, 6, 7]*
              ab[1, 4, 5, 7]*ab[6, 7, 8, cap[{1, 2}, {4, 5, 8}]])/
            (ab[1, 2, 6, 7]*((-1 + t)*ab[1, 6, 7, cap[{8, 2}, {1, 4, 5}]]*ab[
                4, 5, 7, 8] + 2*ab[1, 4, 5, 7]*ab[6, 7, 8, cap[{1, 2}, 
                 {4, 5, 8}]]))))/(1 + t - ((-1 + t)*ab[1, 2, 4, 5]*
            ab[1, 6, 7, 8])/(ab[1, 2, 6, 7]*ab[1, 4, 5, 8]))] - 
      6*PolyLog[2, ((1 + t)*(-(ab[1, 2, 6, 7]*ab[1, 4, 5, 8]) + 
           ab[1, 2, 4, 5]*ab[1, 6, 7, 8]))/
         (-((1 + t)*ab[1, 2, 6, 7]*ab[1, 4, 5, 8]) + (-1 + t)*ab[1, 2, 4, 5]*
           ab[1, 6, 7, 8])] + (3*ab[1, 2, 3, 8]*
        ((1 + t)^2*ab[1, 2, 7, cap[{6, 8}, {4, 5, 7}]]*
          ab[1, 6, 7, cap[{8, 2}, {1, 4, 5}]] - 4*t*ab[1, 2, 4, 5]*
          ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[4, 5, 6, 7])*
        (Log[(ab[1, 2, 4, 5]*ab[1, 6, 7, 8])/(ab[1, 2, 6, 7]*ab[1, 4, 5, 8])]*
          (Log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[4, 5, 6, 7])/
             (ab[1, 2, 6, 7]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8])] - 
           Log[(2*ab[1, 2, 3, 8]*((1 + t)*ab[1, 2, 7, cap[{6, 8}, {4, 5, 7}]]*
                ab[1, 6, 7, cap[{8, 2}, {1, 4, 5}]] - 2*ab[1, 2, 4, 5]*
                ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[4, 5, 6, 7]))/
             ((-1 + t^2)*ab[1, 6, 7, cap[{8, 2}, {1, 4, 5}]]^2*
              ab[2, 3, 7, 8])]) + 2*PolyLog[2, 
           1 - (ab[1, 2, 4, 5]*ab[1, 6, 7, 8])/(ab[1, 2, 6, 7]*
              ab[1, 4, 5, 8])]))/(2*(1 + t)*ab[1, 2, 3, 8]*
         ab[1, 2, 7, cap[{6, 8}, {4, 5, 7}]]*ab[1, 6, 7, 
          cap[{8, 2}, {1, 4, 5}]] + (-1 + t^2)*
         ab[1, 6, 7, cap[{8, 2}, {1, 4, 5}]]^2*ab[2, 3, 7, 8] - 
        4*ab[1, 2, 3, 8]*ab[1, 2, 4, 5]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
         ab[4, 5, 6, 7]) - 
      6*PolyLog[2, ((-1 + t)*ab[1, 2, 4, 5]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
           ab[4, 5, 6, 7] + (1 + t)*ab[1, 2, 6, 7]*ab[1, 4, 5, 7]*
           ab[6, 7, 8, cap[{1, 2}, {4, 5, 8}]])/(ab[1, 2, 6, 7]*
          ((-1 + t)*ab[1, 6, 7, cap[{8, 2}, {1, 4, 5}]]*ab[4, 5, 7, 8] + 
           2*ab[1, 4, 5, 7]*ab[6, 7, 8, cap[{1, 2}, {4, 5, 8}]]))])/
    (3*(-1 + t^2))]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 4, 5, 6, 7] - 
 int[1 + \[Tau], 
   (log[(ab[1, 5, 6, 8]*ab[2, 3, 4, 5])/(ab[1, 4, 5, 8]*ab[2, 3, 5, 6])]*
      log[(ab[1, 3, 4, 8]*ab[4, 5, 6, 7])/(ab[1, 4, 5, 8]*ab[3, 4, 6, 7])] - 
     log[((\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[3, 4, 7, 8])*ab[4, 5, 6, 7])/(ab[3, 4, 6, 7]*
         (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8]))]*
      log[(ab[2, 3, 4, 5]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))/(ab[2, 3, 5, 6]*
         (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*
  R[1, 4, 5, 6, 8] - 
 int[1 + \[Tau], 
   (-(log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
       log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
           (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))]) - 
     log[(\[Tau]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
        (ab[3, 4, 6, 7]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[1, 4, 5, 6, 8] - 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 4]*ab[1, 4, 5, 8])/
       (ab[1, 2, 4, 5]*ab[1, 3, 4, 8])]*
     log[1 + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(\[Tau]*ab[1, 3, 4, 8]*
         ab[2, 3, 7, 8])])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 4]]*
  R[1, 4, 5, 6, 8] - 
 int[1 + \[Tau], Li[1 - (ab[1, 2, 3, 4]*ab[1, 4, 5, 8])/
       (ab[1, 2, 4, 5]*ab[1, 3, 4, 8])] - 
    Li[1 - (ab[1, 2, 3, 4]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))/(ab[1, 2, 4, 5]*
        (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[3, 4, 7, 8]))] + 
    (log[(ab[1, 2, 4, 5]*ab[2, 3, 5, 6]*(\[Tau]*ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))/
        (ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[3, 4, 5, 6])]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 4]]*R[1, 4, 5, 6, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[2, 4, 7, 8])/(ab[1, 2, 4, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   -Li[1 - (ab[1, 2, 3, 4]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))/(ab[1, 2, 4, 5]*
         (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[3, 4, 7, 8]))] - 
    (log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[3, 4, 5, 6])/
        (ab[1, 2, 4, 5]*ab[2, 3, 5, 6]*(\[Tau]*ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))]*
      log[(ab[1, 2, 3, 4]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))/(ab[1, 2, 4, 5]*
         (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[3, 4, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 4]]*
  R[1, 4, 5, 6, 8] - 
 int[1 + \[Tau], 
   (log[(ab[1, 5, 6, 8]*ab[2, 3, 4, 5])/(ab[1, 4, 5, 8]*ab[2, 3, 5, 6])]*
      log[(ab[1, 3, 4, 8]*ab[4, 5, 6, 7])/(ab[1, 4, 5, 8]*ab[3, 4, 6, 7])] - 
     log[((\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[3, 4, 7, 8])*ab[4, 5, 6, 7])/(ab[3, 4, 6, 7]*
         (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8]))]*
      log[(ab[2, 3, 4, 5]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))/(ab[2, 3, 5, 6]*
         (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 4]]*
  R[1, 4, 5, 6, 8] - 
 int[1 + \[Tau], 
   (-(log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
       log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
           (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))]) - 
     log[(\[Tau]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
        (ab[3, 4, 6, 7]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 4]]*R[1, 4, 5, 6, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (-Li[1] - log[(\[Tau]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
        (ab[3, 4, 6, 7]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]*
      log[((\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8])*ab[5, 6, 7, 8])/(ab[4, 5, 7, 8]*
         (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 4]]*
  R[1, 4, 5, 6, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (-Li[1] - log[((\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[3, 4, 7, 8])*ab[4, 5, 6, 7])/
        (ab[3, 4, 6, 7]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]*
      log[(ab[2, 3, 4, 5]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))/(ab[2, 3, 5, 6]*
         (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 4]]*
  R[1, 4, 5, 6, 8] + int[\[Tau]/(1 + \[Tau]), 
   (log[1 + \[Tau]]*log[(ab[1, 2, 3, 4]*ab[1, 4, 5, 8])/
       (ab[1, 2, 4, 5]*ab[1, 3, 4, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, cap[{5, 6}, {1, 4, 8}]]]*R[1, 4, 5, 6, 8] + 
 int[1 + \[Tau], (log[1 + \[Tau]^(-1)]*log[(ab[1, 2, 3, 4]*ab[1, 4, 5, 8])/
       (ab[1, 2, 4, 5]*ab[1, 3, 4, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, cap[{5, 6}, {1, 4, 8}]]]*R[1, 4, 5, 6, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   -(log[(ab[1, 2, 7, 8]*ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[4, 5, 7, 8])]*
      log[((\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8])*ab[5, 6, 7, 8])/(ab[4, 5, 7, 8]*
         (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 4]]*
  R[1, 4, 5, 7, 8] + 
 int[1 + \[Tau], 
   -(log[(ab[1, 2, 7, 8]*ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[4, 5, 7, 8])]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 4]]*R[1, 4, 5, 7, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   (log[(ab[1, 2, 4, 5]*ab[1, 6, 7, 8])/(ab[1, 2, 6, 7]*ab[1, 4, 5, 8])]*
     log[((1 + \[Tau])*ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
       (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
         ab[4, 5, 7, 8])])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[1, 4, 5, 7, 8] + int[\[Tau]/(1 + \[Tau]), 
   Li[1] - Li[(ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
      (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
        ab[4, 5, 7, 8])] + 
    (log[\[Tau]]*log[1 + (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8])/
          (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])] + 
      log[(ab[1, 4, 5, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[4, 5, 7, 8])]*
       log[(ab[1, 2, 7, 8]*ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[4, 5, 7, 8])] + 
      log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[4, 5, 6, 7])/
         (ab[1, 2, 6, 7]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
           ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]*
       log[\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[2, 3, 7, 8])])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[1, 4, 5, 7, 8] + 
 int[1 + \[Tau], -Li[(ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
      (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
        ab[4, 5, 7, 8])]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[1, 4, 5, 7, 8] + 
 int[1 + \[Tau], 
   (log[(ab[1, 2, 6, 7]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))/(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*
        ab[4, 5, 6, 7])]*log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
         (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 4, 5, 7, 8] + 
 int[1 + \[Tau], 
   -(log[(ab[1, 2, 4, 5]*ab[1, 6, 7, 8])/(ab[1, 2, 6, 7]*ab[1, 4, 5, 8])]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 4, 5, 7, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   -(log[(\[Tau]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
        (ab[3, 4, 6, 7]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]*
      log[((\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8])*ab[5, 6, 7, 8])/(ab[4, 5, 7, 8]*
         (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 6]]*
  R[1, 4, 5, 7, 8] + 
 int[1 + \[Tau], -(log[(\[Tau]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
        (ab[3, 4, 6, 7]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 6]]*R[1, 4, 5, 7, 8] + 
 int[1 + \[Tau], (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/
       (ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
     log[1 + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(\[Tau]*ab[1, 5, 6, 8]*
         ab[2, 3, 7, 8])])/2]*Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 6]]*
  R[1, 4, 5, 7, 8] + int[\[Tau]/(1 + \[Tau]), 
   (log[1 + \[Tau]]*log[(ab[1, 2, 3, 4]*ab[1, 4, 5, 8])/
       (ab[1, 2, 4, 5]*ab[1, 3, 4, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 4, 6, 7, 8] + 
 int[1 + \[Tau], (log[1 + \[Tau]^(-1)]*log[(ab[1, 2, 3, 4]*ab[1, 4, 5, 8])/
       (ab[1, 2, 4, 5]*ab[1, 3, 4, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 4, 6, 7, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   (log[(ab[1, 2, 5, 6]*ab[1, 6, 7, 8])/(ab[1, 2, 6, 7]*ab[1, 5, 6, 8])]*
     log[((1 + \[Tau])*ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
       (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
         ab[5, 6, 7, 8])])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 5]]*
  R[1, 5, 6, 7, 8] + 
 int[1 + \[Tau], 
   -(log[(ab[1, 2, 5, 6]*ab[1, 6, 7, 8])/(ab[1, 2, 6, 7]*ab[1, 5, 6, 8])]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 5]]*R[1, 5, 6, 7, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   (log[1 + \[Tau]]*log[(ab[1, 2, 4, 5]*ab[1, 5, 6, 8])/
       (ab[1, 2, 5, 6]*ab[1, 4, 5, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 5, 6, 7, 8] + 
 int[\[Tau]/(1 + \[Tau]), Li[1] - Li[(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
      (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
        ab[5, 6, 7, 8])] + 
    (log[\[Tau]]*log[1 + (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/
          (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      log[(ab[1, 2, 7, 8]*ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[4, 5, 7, 8])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])/
         (ab[1, 2, 6, 7]*ab[4, 5, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*
            ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]*
       log[\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[2, 3, 7, 8])])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[1, 5, 6, 7, 8] + 
 int[1 + \[Tau], -Li[(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
      (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
        ab[5, 6, 7, 8])]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[1, 5, 6, 7, 8] + 
 int[1 + \[Tau], (log[1 + \[Tau]^(-1)]*log[(ab[1, 2, 4, 5]*ab[1, 5, 6, 8])/
       (ab[1, 2, 5, 6]*ab[1, 4, 5, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 5, 6, 7, 8] + 
 int[1 + \[Tau], 
   (log[(ab[1, 2, 6, 7]*ab[4, 5, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*
          ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))/
       (ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[1, 5, 6, 7, 8] + 
 int[(\[Tau] - ab[1, cap[{7, 8}, {4, 5, 6}], 2, 3]/
      (ab[1, 4, 5, 6]*ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (-Li[1] - log[(\[Tau]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
        (ab[3, 4, 6, 7]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]*
      log[((\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8])*ab[5, 6, 7, 8])/(ab[4, 5, 7, 8]*
         (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*
  R[1, cap[{2, 3}, {7, 8, 1}], 4, 5, 6] + 
 int[(\[Tau] - ab[1, cap[{7, 8}, {4, 5, 6}], 2, 3]/
      (ab[1, 4, 5, 6]*ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (-Li[1] - log[((\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[3, 4, 7, 8])*ab[4, 5, 6, 7])/
        (ab[3, 4, 6, 7]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]*
      log[(ab[2, 3, 4, 5]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))/(ab[2, 3, 5, 6]*
         (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*
  R[1, cap[{2, 3}, {7, 8, 1}], 4, 5, 6] - 
 int[(\[Tau] + (-(ab[1, 2, 3, 8]*ab[4, 5, 6, 7]) + ab[1, 2, 3, 7]*
        ab[4, 5, 6, 8])/(ab[1, 4, 5, 6]*ab[2, 3, 7, 8]))/
    (\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8])), 
   (-Li[1] - log[(\[Tau]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
        (ab[3, 4, 6, 7]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]*
      log[((\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8])*ab[5, 6, 7, 8])/(ab[4, 5, 7, 8]*
         (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*
  R[1, cap[{2, 3}, {7, 8, 1}], 4, 5, 6] - 
 int[(\[Tau] + (-(ab[1, 2, 3, 8]*ab[4, 5, 6, 7]) + ab[1, 2, 3, 7]*
        ab[4, 5, 6, 8])/(ab[1, 4, 5, 6]*ab[2, 3, 7, 8]))/
    (\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8])), 
   (-Li[1] - log[((\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[3, 4, 7, 8])*ab[4, 5, 6, 7])/
        (ab[3, 4, 6, 7]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]*
      log[(ab[2, 3, 4, 5]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))/(ab[2, 3, 5, 6]*
         (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*
  R[1, cap[{2, 3}, {7, 8, 1}], 4, 5, 6] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (-Li[1] + log[((1 + \[Tau])*ab[1, 2, 4, 5]*ab[2, 3, 7, 8])/
        (ab[1, 2, 7, 8]*ab[2, 3, 4, 5])]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[1, cap[{2, 3}, {7, 8, 1}], 4, 5, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (-Li[1] - log[(\[Tau]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
        (ab[3, 4, 6, 7]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]*
      log[((\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8])*ab[5, 6, 7, 8])/(ab[4, 5, 7, 8]*
         (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*
  R[1, cap[{2, 3}, {7, 8, 1}], 4, 5, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (-Li[1] - log[((\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[3, 4, 7, 8])*ab[4, 5, 6, 7])/
        (ab[3, 4, 6, 7]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]*
      log[(ab[2, 3, 4, 5]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))/(ab[2, 3, 5, 6]*
         (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*
  R[1, cap[{2, 3}, {7, 8, 1}], 4, 5, 8] + 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 6, 7, 8])/(ab[1, 4, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (-Li[1] - log[(\[Tau]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
        (ab[3, 4, 6, 7]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]*
      log[((\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8])*ab[5, 6, 7, 8])/(ab[4, 5, 7, 8]*
         (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*
  R[1, cap[{2, 3}, {7, 8, 1}], 4, 6, 8] + 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 6, 7, 8])/(ab[1, 4, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (-Li[1] - log[((\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[3, 4, 7, 8])*ab[4, 5, 6, 7])/
        (ab[3, 4, 6, 7]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]*
      log[(ab[2, 3, 4, 5]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))/(ab[2, 3, 5, 6]*
         (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*
  R[1, cap[{2, 3}, {7, 8, 1}], 4, 6, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (-Li[1] + log[((1 + \[Tau])*ab[1, 2, 4, 5]*ab[2, 3, 7, 8])/
        (ab[1, 2, 7, 8]*ab[2, 3, 4, 5])]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[1, cap[{2, 3}, {7, 8, 1}], 5, 6, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (-Li[1] - log[(\[Tau]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
        (ab[3, 4, 6, 7]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]*
      log[((\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8])*ab[5, 6, 7, 8])/(ab[4, 5, 7, 8]*
         (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*
  R[1, cap[{2, 3}, {7, 8, 1}], 5, 6, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (-Li[1] - log[((\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[3, 4, 7, 8])*ab[4, 5, 6, 7])/
        (ab[3, 4, 6, 7]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]*
      log[(ab[2, 3, 4, 5]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))/(ab[2, 3, 5, 6]*
         (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*
  R[1, cap[{2, 3}, {7, 8, 1}], 5, 6, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[2, 4, 7, 8])/
      (ab[1, 2, 4, 8]*ab[2, 3, 7, 8])), 
   -Li[1 - (ab[1, 2, 3, 4]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))/(ab[1, 2, 4, 5]*
         (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[3, 4, 7, 8]))] - 
    (log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[3, 4, 5, 6])/
        (ab[1, 2, 4, 5]*ab[2, 3, 5, 6]*(\[Tau]*ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))]*
      log[(ab[1, 2, 3, 4]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))/(ab[1, 2, 4, 5]*
         (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[3, 4, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 4]]*
  R[1, cap[{2, 4}, {7, 8, 1}], 5, 6, 8] - 
 int[1 + \[Tau], 
   -(log[(ab[1, 2, 3, 4]*ab[1, 6, 7, 8])/(ab[1, 2, 6, 7]*ab[1, 3, 4, 8])]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 4]]*R[1, cap[{3, 4}, {1, 8, 7}], 5, 6, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (-Li[1] - log[(ab[1, 2, 3, 4]*ab[1, 6, 7, 8])/(ab[1, 2, 6, 7]*
         ab[1, 3, 4, 8])]*log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 4]]*R[1, cap[{3, 4}, {1, 8, 7}], 5, 6, 8] + 
 int[1 + \[Tau], 
   -(log[(ab[1, 2, 7, 8]*ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[4, 5, 7, 8])]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*R[1, cap[{4, 5}, {7, 8, 1}], 2, 3, 7] + 
 int[(\[Tau] + (ab[1, 2, 3, 7]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 7]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (-Li[1] - log[(ab[1, 2, 7, 8]*ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*
         ab[4, 5, 7, 8])]*log[((\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[4, 5, 7, 8])*ab[5, 6, 7, 8])/
        (ab[4, 5, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*R[1, cap[{4, 5}, {7, 8, 1}], 2, 3, 7] - 
 int[1 + \[Tau], 
   -Li[(1 - (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))/
       (1 + \[Tau])] + 
    (log[((1 + \[Tau])*ab[1, 2, 6, 7]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8])/
        (ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5])]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*R[1, cap[{4, 5}, {7, 8, 1}], 2, 3, 8] - 
 int[1 + \[Tau], 
   -(log[(ab[1, 2, 7, 8]*ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[4, 5, 7, 8])]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*R[1, cap[{4, 5}, {7, 8, 1}], 2, 3, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   -Li[(1 - (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))/
       (1 + \[Tau])] + 
    (log[((1 + \[Tau])*ab[1, 2, 6, 7]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8])/
        (ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5])]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*R[1, cap[{4, 5}, {7, 8, 1}], 2, 3, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (-Li[1] - log[(ab[1, 2, 7, 8]*ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*
         ab[4, 5, 7, 8])]*log[((\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[4, 5, 7, 8])*ab[5, 6, 7, 8])/
        (ab[4, 5, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*R[1, cap[{4, 5}, {7, 8, 1}], 2, 3, 8] + 
 int[1 + \[Tau], Li[1 - (ab[1, 3, 4, 8]*ab[4, 5, 6, 7])/
       (ab[1, 4, 5, 8]*ab[3, 4, 6, 7])] + 
    (-2*Li[1 - ((\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
             ab[3, 4, 7, 8])*ab[4, 5, 6, 7])/(ab[3, 4, 6, 7]*
           (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
             ab[4, 5, 7, 8]))] + 
      log[(ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[3, 4, 5, 6])/
         (ab[1, 4, 5, 8]*ab[2, 3, 5, 6]*ab[3, 4, 6, 7])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 6, 7])/(ab[1, 4, 5, 8]*ab[3, 4, 6, 7])] - 
      log[(\[Tau]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 7, 8]*
          ab[3, 4, 5, 6])/(ab[2, 3, 5, 6]*ab[3, 4, 6, 7]*
          (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
            ab[4, 5, 7, 8]))]*log[((\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
           ab[1, 2, 3, 8]*ab[3, 4, 7, 8])*ab[4, 5, 6, 7])/
         (ab[3, 4, 6, 7]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
           ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 6]]*R[1, cap[{4, 6}, {7, 8, 1}], 2, 3, 7] + 
 int[(\[Tau] + (ab[1, 2, 3, 7]*ab[4, 6, 7, 8])/(ab[1, 4, 6, 7]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   -Li[1 - ((\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[3, 4, 7, 8])*ab[4, 5, 6, 7])/(ab[3, 4, 6, 7]*
         (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8]))] - 
    (log[(\[Tau]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
        (ab[2, 3, 5, 6]*ab[3, 4, 6, 7]*(\[Tau]*ab[1, 4, 5, 8]*
           ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]*
      log[((\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[3, 4, 7, 8])*ab[4, 5, 6, 7])/(ab[3, 4, 6, 7]*
         (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 6]]*
  R[1, cap[{4, 6}, {7, 8, 1}], 2, 3, 7] - 
 int[1 + \[Tau], Li[1 - (ab[1, 3, 4, 8]*ab[4, 5, 6, 7])/
       (ab[1, 4, 5, 8]*ab[3, 4, 6, 7])] + 
    (-2*Li[1 - ((\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
             ab[3, 4, 7, 8])*ab[4, 5, 6, 7])/(ab[3, 4, 6, 7]*
           (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
             ab[4, 5, 7, 8]))] + 
      log[(ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[3, 4, 5, 6])/
         (ab[1, 4, 5, 8]*ab[2, 3, 5, 6]*ab[3, 4, 6, 7])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 6, 7])/(ab[1, 4, 5, 8]*ab[3, 4, 6, 7])] - 
      log[(\[Tau]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 7, 8]*
          ab[3, 4, 5, 6])/(ab[2, 3, 5, 6]*ab[3, 4, 6, 7]*
          (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
            ab[4, 5, 7, 8]))]*log[((\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
           ab[1, 2, 3, 8]*ab[3, 4, 7, 8])*ab[4, 5, 6, 7])/
         (ab[3, 4, 6, 7]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
           ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 6]]*R[1, cap[{4, 6}, {7, 8, 1}], 2, 3, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 6, 7, 8])/(ab[1, 4, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   -Li[1 - ((\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[3, 4, 7, 8])*ab[4, 5, 6, 7])/(ab[3, 4, 6, 7]*
         (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8]))] - 
    (log[(\[Tau]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
        (ab[2, 3, 5, 6]*ab[3, 4, 6, 7]*(\[Tau]*ab[1, 4, 5, 8]*
           ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]*
      log[((\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[3, 4, 7, 8])*ab[4, 5, 6, 7])/(ab[3, 4, 6, 7]*
         (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 6]]*
  R[1, cap[{4, 6}, {7, 8, 1}], 2, 3, 8] + 
 int[1 + \[Tau], 
   (-(log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
       log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
           (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))]) - 
     log[(\[Tau]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
        (ab[3, 4, 6, 7]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, cap[{5, 6}, {7, 8, 1}], 2, 3, 7] + 
 int[(\[Tau] + (ab[1, 2, 3, 7]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 7]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (-Li[1] - log[(\[Tau]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
        (ab[3, 4, 6, 7]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]*
      log[((\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8])*ab[5, 6, 7, 8])/(ab[4, 5, 7, 8]*
         (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[1, cap[{5, 6}, {7, 8, 1}], 2, 3, 7] - 
 int[(\[Tau] + (ab[1, 2, 3, 7]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 7]*
       ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
      (ab[1, 5, 6, 8]*ab[2, 3, 7, 8])), 
   (-Li[1] - log[(\[Tau]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
        (ab[3, 4, 6, 7]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]*
      log[((\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8])*ab[5, 6, 7, 8])/(ab[4, 5, 7, 8]*
         (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[1, cap[{5, 6}, {7, 8, 1}], 2, 3, 7] - 
 int[1 + \[Tau], 
   (-(log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
       log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
           (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))]) - 
     log[(\[Tau]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
        (ab[3, 4, 6, 7]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, cap[{5, 6}, {7, 8, 1}], 2, 3, 8] - 
 int[1 + \[Tau], 
   -Li[(1 - (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))/
       (1 + \[Tau])] + 
    (log[((1 + \[Tau])*ab[1, 2, 6, 7]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/
        (ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 5, 6])]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, cap[{5, 6}, {7, 8, 1}], 2, 3, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (-Li[1] - log[(\[Tau]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
        (ab[3, 4, 6, 7]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]*
      log[((\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8])*ab[5, 6, 7, 8])/(ab[4, 5, 7, 8]*
         (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[1, cap[{5, 6}, {7, 8, 1}], 2, 3, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   -Li[(1 - (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))/
       (1 + \[Tau])] + 
    (log[((1 + \[Tau])*ab[1, 2, 6, 7]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/
        (ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 5, 6])]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, cap[{5, 6}, {7, 8, 1}], 2, 3, 8] + 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[1, 2, 4, 7]*ab[5, 6, 7, 8])/
      (ab[1, 2, 4, 8]*ab[1, 5, 6, 7]*ab[2, 3, 7, 8]))/
    (\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8])), 
   (-Li[1] - log[(\[Tau]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
        (ab[3, 4, 6, 7]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]*
      log[((\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8])*ab[5, 6, 7, 8])/(ab[4, 5, 7, 8]*
         (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[1, cap[{5, 6}, {7, 8, 1}], 2, 4, 7] + 
 int[1 + \[Tau], 
   (-(log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
       log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
           (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))]) - 
     log[(\[Tau]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
        (ab[3, 4, 6, 7]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, cap[{5, 6}, {7, 8, 1}], 3, 4, 7] + 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[1, 3, 4, 7]*ab[5, 6, 7, 8])/
      (ab[1, 3, 4, 8]*ab[1, 5, 6, 7]*ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (-Li[1] - log[(\[Tau]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
        (ab[3, 4, 6, 7]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]*
      log[((\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8])*ab[5, 6, 7, 8])/(ab[4, 5, 7, 8]*
         (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[1, cap[{5, 6}, {7, 8, 1}], 3, 4, 7] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[1, 3, 4, 7]*ab[5, 6, 7, 8])/
      (ab[1, 3, 4, 8]*ab[1, 5, 6, 7]*ab[2, 3, 7, 8]))/
    (\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8])), 
   (-Li[1] - log[(\[Tau]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
        (ab[3, 4, 6, 7]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]*
      log[((\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8])*ab[5, 6, 7, 8])/(ab[4, 5, 7, 8]*
         (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[1, cap[{5, 6}, {7, 8, 1}], 3, 4, 7] - 
 int[1 + \[Tau], 
   (-(log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
       log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
           (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))]) - 
     log[(\[Tau]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
        (ab[3, 4, 6, 7]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, cap[{5, 6}, {7, 8, 1}], 3, 4, 8] - 
 int[1 + \[Tau], 
   -Li[(ab[1, 2, 3, 8]*(ab[1, 5, 6, 8]*ab[3, 4, 7, 8] - 
         ab[1, 3, 4, 8]*ab[5, 6, 7, 8]))/(ab[1, 5, 6, 8]*
        (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[3, 4, 7, 8]))] + 
    (log[(ab[1, 2, 6, 7]*ab[1, 5, 6, 8]*(\[Tau]*ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))/
        (ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[3, 4, 5, 6])]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, cap[{5, 6}, {7, 8, 1}], 3, 4, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (-Li[1] - log[(\[Tau]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
        (ab[3, 4, 6, 7]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]*
      log[((\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8])*ab[5, 6, 7, 8])/(ab[4, 5, 7, 8]*
         (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[1, cap[{5, 6}, {7, 8, 1}], 3, 4, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   -Li[(ab[1, 2, 3, 8]*(ab[1, 5, 6, 8]*ab[3, 4, 7, 8] - 
         ab[1, 3, 4, 8]*ab[5, 6, 7, 8]))/(ab[1, 5, 6, 8]*
        (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[3, 4, 7, 8]))] + 
    (log[(ab[1, 2, 6, 7]*ab[1, 5, 6, 8]*(\[Tau]*ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))/
        (ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[3, 4, 5, 6])]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[1, cap[{5, 6}, {7, 8, 1}], 3, 4, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   -(log[(\[Tau]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
        (ab[3, 4, 6, 7]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]*
      log[((\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8])*ab[5, 6, 7, 8])/(ab[4, 5, 7, 8]*
         (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[2, 3, 4, 5, 7] + 
 int[1 + \[Tau], -(log[(\[Tau]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
        (ab[3, 4, 6, 7]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 7] - 
 int[1 + \[Tau], 
   (-(log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
       log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
           (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))]) - 
     log[(\[Tau]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
        (ab[3, 4, 6, 7]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 7] + 
 int[1 + \[Tau], (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/
       (ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
     log[1 + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(\[Tau]*ab[1, 5, 6, 8]*
         ab[2, 3, 7, 8])])/2]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[2, 3, 4, 5, 7] - 
 int[(\[Tau] - (ab[1, 2, 3, 8]*ab[2, 3, 4, 7]*ab[5, 6, 7, 8])/
      (ab[2, 3, 7, 8]*ab[cap[{1, 8}, {2, 3, 4}], 5, 6, 7]))/(1 + \[Tau]), 
   (-Li[1] - log[(\[Tau]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
        (ab[3, 4, 6, 7]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]*
      log[((\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8])*ab[5, 6, 7, 8])/(ab[4, 5, 7, 8]*
         (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[2, 3, 4, 5, 7] + 
 intt3[-(ab[1, 4, 5, 8]*ab[2, 3, 6, 7]*
      (3*ab[2, 3, 7, 8]*(4*t*ab[1, 4, 5, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*
          ab[2, 3, 6, 7]*ab[2, 3, 7, 8]*ab[4, 5, 6, 7] - 
         ab[2, 3, 7, cap[{4, 5}, {6, 7, 8}]]*(ab[1, 6, 7, 8]^2*
            ab[2, 3, 4, 5]^2 + ((1 + t)*ab[1, 4, 5, 8]*ab[2, 3, 6, 7] - 
             ab[1, 2, 3, 8]*ab[4, 5, 6, 7])^2 - 2*ab[1, 6, 7, 8]*
            ab[2, 3, 4, 5]*((1 + t)*ab[1, 4, 5, 8]*ab[2, 3, 6, 7] + 
             ab[1, 2, 3, 8]*ab[4, 5, 6, 7])))*
        ((Log[(2*ab[1, 2, 3, 8]*(2*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*
                ab[2, 3, 7, 8]*ab[4, 5, 6, 7] + ab[2, 3, 7, cap[{4, 5}, 
                  {6, 7, 8}]]*(ab[1, 6, 7, 8]*ab[2, 3, 4, 5] - (1 + t)*
                  ab[1, 4, 5, 8]*ab[2, 3, 6, 7] + ab[1, 2, 3, 8]*ab[4, 5, 6, 
                   7])))/(ab[2, 3, 7, 8]*(ab[1, 6, 7, 8]^2*ab[2, 3, 4, 5]^2 - 
               (-1 + t^2)*ab[1, 4, 5, 8]^2*ab[2, 3, 6, 7]^2 - 2*ab[1, 2, 3, 
                 8]*ab[1, 4, 5, 8]*ab[2, 3, 6, 7]*ab[4, 5, 6, 7] + 
               ab[1, 2, 3, 8]^2*ab[4, 5, 6, 7]^2 - 2*ab[1, 6, 7, 8]*
                ab[2, 3, 4, 5]*(ab[1, 4, 5, 8]*ab[2, 3, 6, 7] + 
                 ab[1, 2, 3, 8]*ab[4, 5, 6, 7])))] + 
           Log[(ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 7, 8])/
             (ab[1, 2, 3, 8]*ab[2, 3, 6, 7]*ab[4, 5, 7, 8])])*
          Log[(ab[2, 3, 7, 8]*ab[4, 5, 6, 7])/(ab[2, 3, 6, 7]*
             ab[4, 5, 7, 8])] + 2*PolyLog[2, 
           1 - (ab[2, 3, 7, 8]*ab[4, 5, 6, 7])/(ab[2, 3, 6, 7]*
              ab[4, 5, 7, 8])]) + (4*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*
          ab[2, 3, 7, 8]^2*ab[4, 5, 6, 7]*(ab[1, 6, 7, 8]*ab[2, 3, 4, 5] - 
           ab[1, 4, 5, 8]*ab[2, 3, 6, 7] + ab[1, 2, 3, 8]*ab[4, 5, 6, 7]) + 
         4*ab[1, 2, 3, 8]*ab[2, 3, 7, cap[{4, 5}, {6, 7, 8}]]^2*
          (ab[1, 6, 7, 8]*ab[2, 3, 4, 5] - (1 + t)*ab[1, 4, 5, 8]*
            ab[2, 3, 6, 7] + ab[1, 2, 3, 8]*ab[4, 5, 6, 7]) - 
         ab[2, 3, 7, 8]*ab[2, 3, 7, cap[{4, 5}, {6, 7, 8}]]*
          (-3*ab[1, 6, 7, 8]^2*ab[2, 3, 4, 5]^2 + (-3 - 2*t + t^2)*
            ab[1, 4, 5, 8]^2*ab[2, 3, 6, 7]^2 + 2*(3 + t)*ab[1, 2, 3, 8]*
            ab[1, 4, 5, 8]*ab[2, 3, 6, 7]*ab[4, 5, 6, 7] - 
           3*ab[1, 2, 3, 8]^2*ab[4, 5, 6, 7]^2 + 2*ab[1, 6, 7, 8]*
            ab[2, 3, 4, 5]*((3 + t)*ab[1, 4, 5, 8]*ab[2, 3, 6, 7] - 
             5*ab[1, 2, 3, 8]*ab[4, 5, 6, 7])))*
        (Pi^2 + 6*Log[(-(ab[1, 6, 7, 8]*ab[2, 3, 4, 5]) + 
             (1 + t)*ab[1, 4, 5, 8]*ab[2, 3, 6, 7] - ab[1, 2, 3, 8]*
              ab[4, 5, 6, 7])/(ab[1, 6, 7, 8]*ab[2, 3, 4, 5] + 
             (1 + t)*ab[1, 4, 5, 8]*ab[2, 3, 6, 7] - ab[1, 2, 3, 8]*
              ab[4, 5, 6, 7])]*Log[(-2*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*
              ab[2, 3, 7, 8]*ab[4, 5, 6, 7] + ab[2, 3, 7, cap[{4, 5}, 
                {6, 7, 8}]]*(-(ab[1, 6, 7, 8]*ab[2, 3, 4, 5]) + (1 + t)*
                ab[1, 4, 5, 8]*ab[2, 3, 6, 7] - ab[1, 2, 3, 8]*ab[4, 5, 6, 
                 7]))/(ab[2, 3, 6, 7]*(2*ab[2, 3, 8, cap[{4, 5}, {1, 7, 8}]]*
               ab[4, 5, 6, 7] + (-(ab[1, 6, 7, 8]*ab[2, 3, 4, 5]) + 
                (1 + t)*ab[1, 4, 5, 8]*ab[2, 3, 6, 7] - ab[1, 2, 3, 8]*
                 ab[4, 5, 6, 7])*ab[4, 5, 7, 8]))] - 
         3*Log[(-2*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*(2*ab[1, 6, 7, 8]*ab[2, 3, 
                4, 5]*ab[2, 3, 7, 8]*ab[4, 5, 6, 7] + ab[2, 3, 7, 
                cap[{4, 5}, {6, 7, 8}]]*(ab[1, 6, 7, 8]*ab[2, 3, 4, 5] - 
                (1 + t)*ab[1, 4, 5, 8]*ab[2, 3, 6, 7] + ab[1, 2, 3, 8]*
                 ab[4, 5, 6, 7])))/(ab[2, 3, 6, 7]*(ab[1, 6, 7, 8]*ab[2, 3, 
                4, 5] + (1 + t)*ab[1, 4, 5, 8]*ab[2, 3, 6, 7] - 
              ab[1, 2, 3, 8]*ab[4, 5, 6, 7])*(2*ab[2, 3, 8, cap[{4, 5}, 
                 {1, 7, 8}]]*ab[4, 5, 6, 7] + (-(ab[1, 6, 7, 8]*ab[2, 3, 4, 
                   5]) + (1 + t)*ab[1, 4, 5, 8]*ab[2, 3, 6, 7] - 
                ab[1, 2, 3, 8]*ab[4, 5, 6, 7])*ab[4, 5, 7, 8]))]*
          Log[((-(ab[1, 6, 7, 8]*ab[2, 3, 4, 5]) + (1 + t)*ab[1, 4, 5, 8]*ab[
                2, 3, 6, 7] - ab[1, 2, 3, 8]*ab[4, 5, 6, 7])*
             (2*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 7, 8]*ab[4, 5, 6, 7] + 
              2*ab[2, 3, 6, 7]*ab[2, 3, 8, cap[{4, 5}, {1, 7, 8}]]*ab[4, 5, 
                6, 7] + ab[2, 3, 7, cap[{4, 5}, {6, 7, 8}]]*(ab[1, 6, 7, 8]*
                 ab[2, 3, 4, 5] - (1 + t)*ab[1, 4, 5, 8]*ab[2, 3, 6, 7] + 
                ab[1, 2, 3, 8]*ab[4, 5, 6, 7]) - ab[1, 6, 7, 8]*ab[2, 3, 4, 
                5]*ab[2, 3, 6, 7]*ab[4, 5, 7, 8] + ab[1, 4, 5, 8]*
               ab[2, 3, 6, 7]^2*ab[4, 5, 7, 8] + t*ab[1, 4, 5, 8]*
               ab[2, 3, 6, 7]^2*ab[4, 5, 7, 8] - ab[1, 2, 3, 8]*ab[2, 3, 6, 
                7]*ab[4, 5, 6, 7]*ab[4, 5, 7, 8]))/(ab[2, 3, 6, 7]*
             (ab[1, 6, 7, 8]*ab[2, 3, 4, 5] + (1 + t)*ab[1, 4, 5, 8]*ab[2, 3, 
                6, 7] - ab[1, 2, 3, 8]*ab[4, 5, 6, 7])*
             (2*ab[2, 3, 8, cap[{4, 5}, {1, 7, 8}]]*ab[4, 5, 6, 7] + 
              (-(ab[1, 6, 7, 8]*ab[2, 3, 4, 5]) + (1 + t)*ab[1, 4, 5, 8]*
                 ab[2, 3, 6, 7] - ab[1, 2, 3, 8]*ab[4, 5, 6, 7])*ab[4, 5, 7, 
                8]))] - 6*PolyLog[2, (-(ab[1, 6, 7, 8]*ab[2, 3, 4, 5]) + 
             (1 + t)*ab[1, 4, 5, 8]*ab[2, 3, 6, 7] - ab[1, 2, 3, 8]*
              ab[4, 5, 6, 7])/(ab[1, 6, 7, 8]*ab[2, 3, 4, 5] + 
             (1 + t)*ab[1, 4, 5, 8]*ab[2, 3, 6, 7] - ab[1, 2, 3, 8]*
              ab[4, 5, 6, 7])] - 6*PolyLog[2, 
           ((-2*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 7, 8]*ab[4, 5, 6, 7] + 
              ab[2, 3, 7, cap[{4, 5}, {6, 7, 8}]]*(-(ab[1, 6, 7, 8]*
                  ab[2, 3, 4, 5]) + (1 + t)*ab[1, 4, 5, 8]*ab[2, 3, 6, 7] - 
                ab[1, 2, 3, 8]*ab[4, 5, 6, 7]))*(-(ab[2, 3, 7, 8]*
                ab[4, 5, 6, 7]) + ab[2, 3, 6, 7]*ab[4, 5, 7, 8]))/
            (ab[2, 3, 6, 7]*ab[2, 3, 7, cap[{4, 5}, {6, 7, 8}]]*
             (2*ab[2, 3, 8, cap[{4, 5}, {1, 7, 8}]]*ab[4, 5, 6, 7] + 
              (-(ab[1, 6, 7, 8]*ab[2, 3, 4, 5]) + (1 + t)*ab[1, 4, 5, 8]*
                 ab[2, 3, 6, 7] - ab[1, 2, 3, 8]*ab[4, 5, 6, 7])*ab[4, 5, 7, 
                8]))])))/(6*(ab[1, 6, 7, 8]*ab[2, 3, 4, 5] - 
      (1 + t)*ab[1, 4, 5, 8]*ab[2, 3, 6, 7] + ab[1, 2, 3, 8]*ab[4, 5, 6, 7])*
     (2*ab[1, 2, 3, 8]*ab[2, 3, 7, cap[{4, 5}, {6, 7, 8}]] + 
      ab[2, 3, 7, 8]*(ab[1, 6, 7, 8]*ab[2, 3, 4, 5] + (-1 + t)*ab[1, 4, 5, 8]*
         ab[2, 3, 6, 7] + ab[1, 2, 3, 8]*ab[4, 5, 6, 7]))*
     (2*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 7, 8]*ab[4, 5, 6, 7] + 
      ab[2, 3, 7, cap[{4, 5}, {6, 7, 8}]]*(ab[1, 6, 7, 8]*ab[2, 3, 4, 5] - 
        (1 + t)*ab[1, 4, 5, 8]*ab[2, 3, 6, 7] + ab[1, 2, 3, 8]*
         ab[4, 5, 6, 7]))), 1 - (ab[1, 6, 7, 8]*ab[2, 3, 4, 5])/
     (ab[1, 4, 5, 8]*ab[2, 3, 6, 7]) - (ab[1, 2, 3, 8]*ab[4, 5, 6, 7])/
     (ab[1, 4, 5, 8]*ab[2, 3, 6, 7])]*
  Qlog[ab[7, 8, 1, 6]/ab[7, 8, 1, cap[{2, 3}, {4, 5, 7}]]]*R[2, 3, 4, 5, 7] + 
 int[\[Tau]/(1 + \[Tau]), Li[\[Tau]/(1 + \[Tau])]]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   -Li[(ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
    Li[(ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/((1 + \[Tau])*ab[1, 3, 4, 8]*
       ab[2, 3, 7, 8])]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[2, 3, 4, 5, 8] + int[\[Tau]/(1 + \[Tau]), 
   Li[(\[Tau]*ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/
     (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[3, 4, 7, 8])]]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   -Li[(ab[1, 5, 7, 8]*ab[4, 5, 6, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
    Li[(ab[1, 2, 3, 8]*ab[1, 5, 7, 8]*ab[4, 5, 6, 8])/
      (ab[1, 5, 6, 8]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
        ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[2, 3, 4, 5, 8] + int[\[Tau]/(1 + \[Tau]), 
   Li[(\[Tau]*ab[2, 3, 7, 8]*(ab[1, 4, 5, 8]*ab[3, 4, 7, 8] - 
       ab[1, 3, 4, 8]*ab[4, 5, 7, 8]))/(ab[3, 4, 7, 8]*
      (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
        ab[4, 5, 7, 8]))]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[2, 3, 4, 5, 8] + int[\[Tau]/(1 + \[Tau]), 
   Li[(ab[1, 2, 3, 8]*(ab[1, 4, 5, 8]*ab[3, 4, 7, 8] - 
        ab[1, 3, 4, 8]*ab[4, 5, 7, 8]))/(ab[1, 4, 5, 8]*
       (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
         ab[3, 4, 7, 8]))] - Li[1 - (ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/
       (ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[2, 3, 4, 5, 8] + int[\[Tau]/(1 + \[Tau]), 
   Li[(\[Tau]*ab[1, 5, 7, 8]*ab[2, 3, 7, 8]*ab[4, 5, 6, 8])/
     (ab[4, 5, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
       ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[2, 3, 4, 5, 8] + int[\[Tau]/(1 + \[Tau]), 
   -Li[1] + Li[(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
      (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
        ab[5, 6, 7, 8])]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[2, 3, 4, 5, 8] + int[\[Tau]/(1 + \[Tau]), 
   -(log[1 + \[Tau]]*log[(ab[1, 2, 3, 4]*ab[1, 4, 5, 8])/
        (ab[1, 2, 4, 5]*ab[1, 3, 4, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   -(log[1 + \[Tau]]*log[(ab[1, 2, 4, 5]*ab[1, 5, 6, 8])/
        (ab[1, 2, 5, 6]*ab[1, 4, 5, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   (log[1 + \[Tau]]*log[((1 + \[Tau]^(-1))*ab[1, 2, 6, 7]*ab[1, 3, 4, 8])/
       (ab[1, 2, 3, 4]*ab[1, 6, 7, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   -(log[1 + \[Tau]]*log[(ab[1, 2, 5, 6]*ab[1, 6, 7, 8])/
        (ab[1, 2, 6, 7]*ab[1, 5, 6, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   (log[(\[Tau]*ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5])/
       (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*(\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))]*
     log[((1 + \[Tau])*ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
       (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
         ab[3, 4, 7, 8])])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[2, 3, 4, 5, 8] + int[\[Tau]/(1 + \[Tau]), 
   (log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5])/
        (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
      log[(1 + (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[3, 4, 7, 8]))/(1 + \[Tau])] - log[1 + \[Tau]]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   (log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 7, 8]*
        ab[3, 4, 5, 6])/(ab[1, 2, 6, 7]*ab[2, 3, 5, 6]*ab[3, 4, 7, 8]*
        (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[4, 5, 7, 8]))]*log[((\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[3, 4, 7, 8])*ab[4, 5, 7, 8])/
       (ab[3, 4, 7, 8]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   (-(log[(ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[3, 4, 5, 6])/
         (ab[1, 2, 6, 7]*ab[1, 4, 5, 8]*ab[2, 3, 5, 6]*ab[3, 4, 7, 8])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
          ab[3, 4, 7, 8])]) + 
     log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*
         ab[3, 4, 5, 6])/(ab[1, 2, 6, 7]*ab[1, 4, 5, 8]*ab[2, 3, 5, 6]*
         (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[3, 4, 7, 8]))]*log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
          (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))/(\[Tau] + 
         (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))])/
    2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   -(log[(ab[1, 2, 7, 8]*ab[2, 3, 6, 7])/(ab[1, 2, 6, 7]*ab[2, 3, 7, 8])]*
      log[1 + (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8])])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[2, 3, 4, 5, 8] + int[\[Tau]/(1 + \[Tau]), 
   -(log[(ab[2, 3, 7, 8]*ab[3, 4, 6, 7])/(ab[2, 3, 6, 7]*ab[3, 4, 7, 8])]*
      log[1 + (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8])])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[2, 3, 4, 5, 8] + int[\[Tau]/(1 + \[Tau]), 
   (log[(ab[1, 2, 7, 8]*ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[4, 5, 7, 8])]*
     log[1 + (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
         ab[5, 6, 7, 8])])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[2, 3, 4, 5, 8] + int[\[Tau]/(1 + \[Tau]), 
   -(log[(ab[3, 4, 7, 8]*ab[4, 5, 6, 7])/(ab[3, 4, 6, 7]*ab[4, 5, 7, 8])]*
      log[1 + (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8])])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[2, 3, 4, 5, 8] + int[\[Tau]/(1 + \[Tau]), 
   (log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6]*
        ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[3, 4, 6, 7]*ab[4, 5, 7, 8]*
        (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8]))]*log[((\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[4, 5, 7, 8])*ab[5, 6, 7, 8])/
       (ab[4, 5, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   (-(log[(ab[1, 2, 7, 8]*ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[4, 5, 7, 8])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8])]) + log[\[Tau]]*log[(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
        (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8])] + 
     log[(ab[1, 2, 6, 7]*ab[4, 5, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*
           ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))/
        (ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])]*
      log[\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
          ab[2, 3, 7, 8])])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[2, 3, 4, 5, 8] + int[\[Tau]/(1 + \[Tau]), 
   (-(log[(ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
         (ab[1, 2, 6, 7]*ab[1, 5, 6, 8]*ab[3, 4, 6, 7]*ab[4, 5, 7, 8])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
          ab[4, 5, 7, 8])]) + 
     log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[3, 4, 5, 6]*
         ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[1, 5, 6, 8]*ab[3, 4, 6, 7]*
         (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8]))]*log[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))/(\[Tau] + 
         (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))])/
    2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 8] + 
 int[1 + \[Tau], -Li[1] + Li[\[Tau]/(1 + \[Tau])]]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 8] + 
 int[1 + \[Tau], Li[(ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/
     ((1 + \[Tau])*ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 8] + 
 int[1 + \[Tau], -Li[(ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/
       (ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
    Li[(\[Tau]*ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/
      (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
        ab[3, 4, 7, 8])]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[2, 3, 4, 5, 8] + 
 int[1 + \[Tau], Li[(ab[1, 2, 3, 8]*ab[1, 5, 7, 8]*ab[4, 5, 6, 8])/
     (ab[1, 5, 6, 8]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
       ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[2, 3, 4, 5, 8] + 
 int[1 + \[Tau], Li[(ab[1, 2, 3, 8]*(ab[1, 4, 5, 8]*ab[3, 4, 7, 8] - 
       ab[1, 3, 4, 8]*ab[4, 5, 7, 8]))/(ab[1, 4, 5, 8]*
      (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
        ab[3, 4, 7, 8]))]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[2, 3, 4, 5, 8] + 
 int[1 + \[Tau], Li[(\[Tau]*ab[2, 3, 7, 8]*(ab[1, 4, 5, 8]*ab[3, 4, 7, 8] - 
        ab[1, 3, 4, 8]*ab[4, 5, 7, 8]))/(ab[3, 4, 7, 8]*
       (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
         ab[4, 5, 7, 8]))] - Li[1 - (ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/
       (ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[2, 3, 4, 5, 8] + 
 int[1 + \[Tau], -Li[(ab[1, 5, 7, 8]*ab[4, 5, 6, 8])/
       (ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
    Li[(\[Tau]*ab[1, 5, 7, 8]*ab[2, 3, 7, 8]*ab[4, 5, 6, 8])/
      (ab[4, 5, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
        ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[2, 3, 4, 5, 8] + 
 int[1 + \[Tau], Li[(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
     (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 8] + 
 int[1 + \[Tau], (log[\[Tau]/(1 + \[Tau])]*
     log[(ab[1, 2, 3, 4]*ab[1, 4, 5, 8])/(ab[1, 2, 4, 5]*ab[1, 3, 4, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 8] + 
 int[1 + \[Tau], (log[\[Tau]/(1 + \[Tau])]*
     log[(ab[1, 2, 4, 5]*ab[1, 5, 6, 8])/(ab[1, 2, 5, 6]*ab[1, 4, 5, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 8] + 
 int[1 + \[Tau], -(log[\[Tau]/(1 + \[Tau])]*
      log[((1 + \[Tau])*ab[1, 2, 6, 7]*ab[1, 3, 4, 8])/
        (ab[1, 2, 3, 4]*ab[1, 6, 7, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 8] + 
 int[1 + \[Tau], (log[\[Tau]/(1 + \[Tau])]*
     log[(ab[1, 2, 5, 6]*ab[1, 6, 7, 8])/(ab[1, 2, 6, 7]*ab[1, 5, 6, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 8] + 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
       (ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
         (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 8] + 
 int[1 + \[Tau], (log[(\[Tau]*ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
        ab[2, 3, 4, 5])/(ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*
        (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[3, 4, 7, 8]))]*log[(1 + \[Tau])/
       (\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
          ab[2, 3, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[2, 3, 4, 5, 8] + 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
        ab[2, 3, 4, 5])/((1 + \[Tau])*ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*
        ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
     log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
          ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 8] + 
 int[1 + \[Tau], (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/
       (ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
         (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 8] + 
 int[1 + \[Tau], (log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*
        ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/(ab[1, 2, 6, 7]*ab[2, 3, 5, 6]*
        ab[3, 4, 7, 8]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]*
     log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
          ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
         (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 8] + 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
        ab[2, 3, 4, 5]*ab[3, 4, 5, 6])/(ab[1, 2, 6, 7]*ab[1, 4, 5, 8]*
        ab[2, 3, 5, 6]*(\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))]*
     log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
          ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
         (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 8] + 
 int[1 + \[Tau], (log[(ab[1, 2, 7, 8]*ab[2, 3, 6, 7])/
       (ab[1, 2, 6, 7]*ab[2, 3, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 8] + 
 int[1 + \[Tau], (log[(ab[2, 3, 7, 8]*ab[3, 4, 6, 7])/
       (ab[2, 3, 6, 7]*ab[3, 4, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 8] + 
 int[1 + \[Tau], (log[(ab[3, 4, 7, 8]*ab[4, 5, 6, 7])/
       (ab[3, 4, 6, 7]*ab[4, 5, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 8] + 
 int[1 + \[Tau], (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/
       (ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 8] + 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[4, 5, 6, 7]*
        ab[5, 6, 7, 8])/(ab[1, 2, 6, 7]*ab[4, 5, 7, 8]*
        (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8]))]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 8] + 
 int[1 + \[Tau], (log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*
        ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[3, 4, 6, 7]*
        ab[4, 5, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]*
     log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
          ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 8] + 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
        ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[1, 5, 6, 8]*
        ab[3, 4, 6, 7]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]*
     log[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
          ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
         (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 8] + 
 int[1 + \[Tau], (log[(ab[1, 2, 7, 8]*ab[4, 5, 6, 7])/
       (ab[1, 2, 6, 7]*ab[4, 5, 7, 8])]*
     log[1 + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(\[Tau]*ab[1, 5, 6, 8]*
         ab[2, 3, 7, 8])])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[2, 3, 4, 5, 8] + int[\[Tau]/(1 + \[Tau]), 
   (log[1 + (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
         ab[5, 6, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   -Li[(ab[1, 2, 3, 8]*(ab[1, 5, 6, 8]*ab[4, 5, 7, 8] - 
         ab[1, 4, 5, 8]*ab[5, 6, 7, 8]))/(ab[1, 5, 6, 8]*
        (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[4, 5, 7, 8]))] + Li[1 - (ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/
       (ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
    (log[(ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
         (ab[1, 2, 6, 7]*ab[1, 5, 6, 8]*ab[3, 4, 6, 7]*ab[4, 5, 7, 8])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      log[(ab[1, 2, 6, 7]*ab[1, 5, 6, 8]*ab[3, 4, 6, 7]*
          (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
            ab[4, 5, 7, 8]))/(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
          ab[3, 4, 5, 6]*ab[4, 5, 6, 7])]*
       log[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
            ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
           (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 8] - 
 int[1 + \[Tau], -Li[1] + Li[\[Tau]/(1 + \[Tau])]]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 8] - 
 int[1 + \[Tau], Li[(ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/
     ((1 + \[Tau])*ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 8] - 
 int[1 + \[Tau], -Li[(ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/
       (ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
    Li[(\[Tau]*ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/
      (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
        ab[3, 4, 7, 8])]]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[2, 3, 4, 5, 8] - 
 int[1 + \[Tau], -Li[(ab[1, 4, 7, 8]*ab[3, 4, 5, 8])/
       (ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
    Li[(\[Tau]*ab[1, 4, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 8])/
      (ab[3, 4, 7, 8]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
        ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[2, 3, 4, 5, 8] - 
 int[1 + \[Tau], Li[(ab[1, 2, 3, 8]*ab[1, 5, 7, 8]*ab[4, 5, 6, 8])/
     (ab[1, 5, 6, 8]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
       ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[2, 3, 4, 5, 8] - 
 int[1 + \[Tau], Li[(ab[1, 2, 3, 8]*(ab[1, 4, 5, 8]*ab[3, 4, 7, 8] - 
       ab[1, 3, 4, 8]*ab[4, 5, 7, 8]))/(ab[1, 4, 5, 8]*
      (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
        ab[3, 4, 7, 8]))]]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[2, 3, 4, 5, 8] - 
 int[1 + \[Tau], -Li[(ab[1, 5, 7, 8]*ab[4, 5, 6, 8])/
       (ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
    Li[(\[Tau]*ab[1, 5, 7, 8]*ab[2, 3, 7, 8]*ab[4, 5, 6, 8])/
      (ab[4, 5, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
        ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[2, 3, 4, 5, 8] - 
 int[1 + \[Tau], Li[(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
     (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 8] - 
 int[1 + \[Tau], -(log[\[Tau]/(1 + \[Tau])]*log[1 + \[Tau]])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 8] - 
 int[1 + \[Tau], (log[\[Tau]/(1 + \[Tau])]*
     log[(ab[1, 2, 3, 4]*ab[1, 4, 5, 8])/(ab[1, 2, 4, 5]*ab[1, 3, 4, 8])])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 8] - 
 int[1 + \[Tau], (log[\[Tau]/(1 + \[Tau])]*
     log[(ab[1, 2, 4, 5]*ab[1, 5, 6, 8])/(ab[1, 2, 5, 6]*ab[1, 4, 5, 8])])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 8] - 
 int[1 + \[Tau], (log[\[Tau]/(1 + \[Tau])]*
     log[(ab[1, 2, 3, 4]*ab[1, 6, 7, 8])/(ab[1, 2, 6, 7]*ab[1, 3, 4, 8])])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 8] - 
 int[1 + \[Tau], (log[\[Tau]/(1 + \[Tau])]*
     log[(ab[1, 2, 5, 6]*ab[1, 6, 7, 8])/(ab[1, 2, 6, 7]*ab[1, 5, 6, 8])])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 8] - 
 int[1 + \[Tau], 
   (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
      log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))] + 
     log[(\[Tau]*ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5])/
        (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*(\[Tau]*ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))]*
      log[(1 + \[Tau])/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 8] - 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
        ab[2, 3, 4, 5])/((1 + \[Tau])*ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*
        ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
     log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
          ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 8] - 
 int[1 + \[Tau], 
   (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
      log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
          (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))] + 
     log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 7, 8]*
         ab[3, 4, 5, 6])/(ab[1, 2, 6, 7]*ab[2, 3, 5, 6]*ab[3, 4, 7, 8]*
         (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8]))]*log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))/(\[Tau] + 
         (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))])/
    2]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 8] - 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
        ab[2, 3, 4, 5]*ab[3, 4, 5, 6])/(ab[1, 2, 6, 7]*ab[1, 4, 5, 8]*
        ab[2, 3, 5, 6]*(\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))]*
     log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
          ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
         (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 8] - 
 int[1 + \[Tau], (log[(ab[1, 2, 7, 8]*ab[2, 3, 6, 7])/
       (ab[1, 2, 6, 7]*ab[2, 3, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 8] - 
 int[1 + \[Tau], (log[(ab[2, 3, 7, 8]*ab[3, 4, 6, 7])/
       (ab[2, 3, 6, 7]*ab[3, 4, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 8] - 
 int[1 + \[Tau], (log[(ab[3, 4, 7, 8]*ab[4, 5, 6, 7])/
       (ab[3, 4, 6, 7]*ab[4, 5, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 8] + 
 int[1 + \[Tau], (log[1 + (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/
        (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 8] - 
 2*int[1 + \[Tau], 
   -(log[(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(\[Tau]*ab[1, 5, 6, 8]*
          ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
      log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 8] - 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[4, 5, 6, 7]*
        ab[5, 6, 7, 8])/(ab[1, 2, 6, 7]*ab[4, 5, 7, 8]*
        (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8]))]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 8] - 
 int[1 + \[Tau], 
   (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
      log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))] + 
     log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6]*
         ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[3, 4, 6, 7]*ab[4, 5, 7, 8]*
         (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8]))]*log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
          (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))/(\[Tau] + 
         (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/
    2]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 8] - 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
        ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[1, 5, 6, 8]*
        ab[3, 4, 6, 7]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]*
     log[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
          ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
         (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), Li[\[Tau]/(1 + \[Tau])]]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   Li[(ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/((1 + \[Tau])*ab[1, 3, 4, 8]*
      ab[2, 3, 7, 8])]]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[2, 3, 4, 5, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   Li[(\[Tau]*ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/
     (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[3, 4, 7, 8])]]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   Li[(\[Tau]*ab[1, 4, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 8])/
     (ab[3, 4, 7, 8]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
       ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[2, 3, 4, 5, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   Li[(ab[1, 2, 3, 8]*ab[1, 5, 7, 8]*ab[4, 5, 6, 8])/
     (ab[1, 5, 6, 8]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
       ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[2, 3, 4, 5, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   Li[(ab[1, 2, 3, 8]*(ab[1, 4, 5, 8]*ab[3, 4, 7, 8] - 
       ab[1, 3, 4, 8]*ab[4, 5, 7, 8]))/(ab[1, 4, 5, 8]*
      (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
        ab[3, 4, 7, 8]))]]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[2, 3, 4, 5, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   Li[(\[Tau]*ab[1, 5, 7, 8]*ab[2, 3, 7, 8]*ab[4, 5, 6, 8])/
     (ab[4, 5, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
       ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[2, 3, 4, 5, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   Li[(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
      ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[2, 3, 4, 5, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   -(log[1 + \[Tau]]*log[(\[Tau]*ab[1, 2, 3, 4]*ab[1, 6, 7, 8])/
        ((1 + \[Tau])*ab[1, 2, 6, 7]*ab[1, 3, 4, 8])])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (log[(ab[1, 2, 3, 4]*ab[1, 4, 5, 8])/(ab[1, 2, 4, 5]*ab[1, 3, 4, 8])]*
     log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[3, 4, 5, 6])/
       ((1 + \[Tau])*ab[1, 2, 4, 5]*ab[1, 3, 4, 8]*ab[2, 3, 5, 6]*
        ab[2, 3, 7, 8])])/2]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[2, 3, 4, 5, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (log[(\[Tau]*ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5])/
       (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*(\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))]*
     log[((1 + \[Tau])*ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
       (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
         ab[3, 4, 7, 8])])/2]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[2, 3, 4, 5, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5])/
       ((1 + \[Tau])*ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*ab[1, 3, 4, 8]*
        ab[2, 3, 7, 8])]*log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
         (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (log[(ab[1, 2, 4, 5]*ab[1, 5, 6, 8])/(ab[1, 2, 5, 6]*ab[1, 4, 5, 8])]*
     log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
       ((1 + \[Tau])*ab[1, 2, 5, 6]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8]*
        ab[3, 4, 6, 7])])/2]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[2, 3, 4, 5, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 7, 8]*
        ab[3, 4, 5, 6])/(ab[1, 2, 6, 7]*ab[2, 3, 5, 6]*ab[3, 4, 7, 8]*
        (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[4, 5, 7, 8]))]*log[((\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[3, 4, 7, 8])*ab[4, 5, 7, 8])/
       (ab[3, 4, 7, 8]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*
        ab[3, 4, 5, 6])/(ab[1, 2, 6, 7]*ab[1, 4, 5, 8]*ab[2, 3, 5, 6]*
        (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[3, 4, 7, 8]))]*log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
         (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))/(\[Tau] + 
        (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (log[(ab[1, 2, 5, 6]*ab[1, 6, 7, 8])/(ab[1, 2, 6, 7]*ab[1, 5, 6, 8])]*
     log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])/
       ((1 + \[Tau])*ab[1, 2, 6, 7]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8]*
        ab[4, 5, 7, 8])])/2]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[2, 3, 4, 5, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (log[(ab[1, 2, 7, 8]*ab[2, 3, 6, 7])/(ab[1, 2, 6, 7]*ab[2, 3, 7, 8])]*
     log[(\[Tau]*ab[1, 2, 3, 4]*ab[1, 2, 3, 8]*ab[1, 6, 7, 8]*ab[5, 6, 7, 8])/
       (ab[1, 2, 6, 7]*ab[1, 3, 4, 8]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (log[(ab[2, 3, 7, 8]*ab[3, 4, 6, 7])/(ab[2, 3, 6, 7]*ab[3, 4, 7, 8])]*
     log[(\[Tau]*ab[1, 2, 3, 4]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 7, 8]*
        ab[5, 6, 7, 8])/(ab[1, 2, 4, 5]*ab[2, 3, 6, 7]*ab[3, 4, 7, 8]*
        (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[2, 3, 4, 5, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (log[(ab[3, 4, 7, 8]*ab[4, 5, 6, 7])/(ab[3, 4, 6, 7]*ab[4, 5, 7, 8])]*
     log[(\[Tau]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6]*
        ab[5, 6, 7, 8])/(ab[2, 3, 5, 6]*ab[3, 4, 6, 7]*ab[4, 5, 7, 8]*
        (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[2, 3, 4, 5, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6]*
        ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[3, 4, 6, 7]*ab[4, 5, 7, 8]*
        (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8]))]*log[((\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[4, 5, 7, 8])*ab[5, 6, 7, 8])/
       (ab[4, 5, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])/
       (ab[1, 2, 6, 7]*ab[4, 5, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 8] - 
 2*int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (-Li[1] - log[(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
        (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8])]*
      log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[3, 4, 5, 6]*
        ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[1, 5, 6, 8]*ab[3, 4, 6, 7]*
        (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[4, 5, 7, 8]))]*log[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))/(\[Tau] + 
        (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   -Li[(ab[1, 2, 3, 8]*(ab[1, 5, 6, 8]*ab[4, 5, 7, 8] - 
         ab[1, 4, 5, 8]*ab[5, 6, 7, 8]))/(ab[1, 5, 6, 8]*
        (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[4, 5, 7, 8]))] + 
    (log[(ab[1, 2, 6, 7]*ab[1, 5, 6, 8]*ab[3, 4, 6, 7]*
         (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8]))/(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
         ab[3, 4, 5, 6]*ab[4, 5, 6, 7])]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
          (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 8] + 
 intdone[log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
      ab[5, 6, 7, 8])], Li[1] + Li[(ab[1, 2, 4, 8]*ab[1, 3, 4, 5])/
      (ab[1, 2, 4, 5]*ab[1, 3, 4, 8])] + 
    Li[(ab[1, 2, 5, 8]*ab[1, 4, 5, 6])/(ab[1, 2, 5, 6]*ab[1, 4, 5, 8])] + 
    Li[(ab[1, 2, 6, 8]*ab[1, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[1, 5, 6, 8])] + 
    Li[(ab[1, 2, 3, 5]*ab[2, 4, 5, 6])/(ab[1, 2, 4, 5]*ab[2, 3, 5, 6])] + 
    Li[(ab[1, 2, 3, 6]*ab[2, 5, 6, 7])/(ab[1, 2, 5, 6]*ab[2, 3, 6, 7])] + 
    Li[(ab[1, 2, 3, 7]*ab[2, 6, 7, 8])/(ab[1, 2, 6, 7]*ab[2, 3, 7, 8])] + 
    Li[(ab[2, 3, 4, 6]*ab[3, 5, 6, 7])/(ab[2, 3, 5, 6]*ab[3, 4, 6, 7])] + 
    Li[(ab[2, 3, 4, 7]*ab[3, 6, 7, 8])/(ab[2, 3, 6, 7]*ab[3, 4, 7, 8])] + 
    Li[(ab[3, 4, 5, 7]*ab[4, 6, 7, 8])/(ab[3, 4, 6, 7]*ab[4, 5, 7, 8])] + 
    (log[(ab[1, 2, 5, 6]*ab[2, 3, 4, 5])/(ab[1, 2, 4, 5]*ab[2, 3, 5, 6])]*
      log[(ab[1, 2, 3, 4]*ab[1, 2, 3, 8]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
        (ab[1, 2, 4, 5]*ab[1, 3, 4, 8]*ab[2, 3, 5, 6]*ab[3, 4, 6, 7])])/2 + 
    (log[(ab[1, 2, 6, 7]*ab[2, 3, 5, 6])/(ab[1, 2, 5, 6]*ab[2, 3, 6, 7])]*
      log[(ab[1, 2, 3, 4]*ab[1, 2, 3, 8]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])/
        (ab[1, 2, 5, 6]*ab[1, 3, 4, 8]*ab[2, 3, 6, 7]*ab[4, 5, 7, 8])])/2 + 
    (log[(ab[2, 3, 6, 7]*ab[3, 4, 5, 6])/(ab[2, 3, 5, 6]*ab[3, 4, 6, 7])]*
      log[(ab[1, 2, 3, 4]*ab[2, 3, 4, 5]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])/
        (ab[1, 2, 4, 5]*ab[2, 3, 5, 6]*ab[3, 4, 6, 7]*ab[4, 5, 7, 8])])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[2, 3, 4, 5, 8] - 
 int[\[Tau]/(1 + \[Tau]), 
   Li[1 - (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[2, 3, 7, 8])] + 
    (-2*Li[(1 - (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
            ab[2, 3, 7, 8]))/(1 + \[Tau])] + 
      log[(ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5])/
         (ab[1, 2, 6, 7]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8])]*
       log[((1 + \[Tau])*ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
         (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8])] + log[1 + \[Tau]]*
       log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
            ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 6]/ab[7, 8, 1, cap[{4, 5}, {2, 3, 8}]]]*R[2, 3, 4, 5, 8] + 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[cap[{4, 5}, {2, 3, 8}], 
        6, 7, 8])/(ab[1, cap[{4, 5}, {2, 3, 8}], 6, 8]*ab[2, 3, 7, 8])), 
   -Li[(1 - (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))/
       (1 + \[Tau])] + 
    (log[((1 + \[Tau])*ab[1, 2, 6, 7]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8])/
        (ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5])]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 6]/ab[7, 8, 1, cap[{4, 5}, {2, 3, 8}]]]*R[2, 3, 4, 5, 8] + 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[cap[{4, 5}, {2, 3, 8}], 6, 7, 8])/
      (ab[1, cap[{4, 5}, {2, 3, 8}], 6, 8]*ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   -Li[(1 - (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))/
       (1 + \[Tau])] + 
    (log[((1 + \[Tau])*ab[1, 2, 6, 7]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8])/
        (ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5])]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 6]/ab[7, 8, 1, cap[{4, 5}, {2, 3, 8}]]]*R[2, 3, 4, 5, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   (log[(ab[1, 2, 7, 8]*ab[2, 3, 4, 5])/(ab[1, 2, 4, 5]*ab[2, 3, 7, 8])]*
      log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
     log[((1 + \[Tau])*ab[1, 2, 4, 5]*ab[2, 3, 7, 8])/
        (ab[1, 2, 7, 8]*ab[2, 3, 4, 5])]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[2, 3, 4, 7, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   (log[(ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/(ab[2, 3, 5, 6]*ab[3, 4, 7, 8])]*
      log[(ab[1, 2, 3, 4]*ab[4, 5, 7, 8])/(ab[1, 2, 4, 5]*ab[3, 4, 7, 8])] - 
     log[((1 + \[Tau])*ab[1, 2, 3, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
        (ab[2, 3, 5, 6]*(\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))]*
      log[(ab[1, 2, 3, 4]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))/(ab[1, 2, 4, 5]*
         (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[3, 4, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 6]]*
  R[2, 3, 4, 7, 8] + int[\[Tau]/(1 + \[Tau]), 
   Li[1 - (ab[2, 3, 4, 5]*ab[5, 6, 7, 8])/(ab[2, 3, 5, 6]*ab[4, 5, 7, 8])] + 
    (-2*Li[1 - (ab[2, 3, 4, 5]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
            ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))/(ab[2, 3, 5, 6]*
           (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
             ab[4, 5, 7, 8]))] + 
      log[(ab[2, 3, 7, 8]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
         (ab[2, 3, 5, 6]*ab[3, 4, 6, 7]*ab[4, 5, 7, 8])]*
       log[(ab[2, 3, 4, 5]*ab[5, 6, 7, 8])/(ab[2, 3, 5, 6]*ab[4, 5, 7, 8])] - 
      log[((1 + \[Tau])*ab[1, 2, 3, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6]*
          ab[4, 5, 6, 7])/(ab[2, 3, 5, 6]*ab[3, 4, 6, 7]*
          (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
            ab[4, 5, 7, 8]))]*
       log[(ab[2, 3, 4, 5]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
           ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))/(ab[2, 3, 5, 6]*
          (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
            ab[4, 5, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[2, 3, 5, 7, 8] - 
 int[1 + \[Tau], Li[1 - (ab[1, 5, 6, 8]*ab[2, 3, 4, 5])/
       (ab[1, 4, 5, 8]*ab[2, 3, 5, 6])] + 
    (-2*Li[1 - (ab[2, 3, 4, 5]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
            ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))/(ab[2, 3, 5, 6]*
           (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
             ab[4, 5, 7, 8]))] + log[(ab[1, 5, 6, 8]*ab[2, 3, 4, 5])/
         (ab[1, 4, 5, 8]*ab[2, 3, 5, 6])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
         (ab[1, 4, 5, 8]*ab[2, 3, 5, 6]*ab[3, 4, 6, 7])] - 
      log[((1 + \[Tau])*ab[1, 2, 3, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6]*
          ab[4, 5, 6, 7])/(ab[2, 3, 5, 6]*ab[3, 4, 6, 7]*
          (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
            ab[4, 5, 7, 8]))]*
       log[(ab[2, 3, 4, 5]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
           ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))/(ab[2, 3, 5, 6]*
          (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
            ab[4, 5, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[2, 3, 5, 7, 8] + 
 int[1 + \[Tau], 
   (2*Li[1 - (ab[1, 5, 6, 8]*ab[2, 3, 4, 5])/(ab[1, 4, 5, 8]*
          ab[2, 3, 5, 6])] - 
     2*Li[1 - (ab[2, 3, 4, 5]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
           ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))/(ab[2, 3, 5, 6]*
          (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
            ab[4, 5, 7, 8]))] - log[(ab[1, 5, 6, 8]*ab[2, 3, 4, 5])/
        (ab[1, 4, 5, 8]*ab[2, 3, 5, 6])]*
      log[(1 + \[Tau])/(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
          (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))] - 
     log[(ab[1, 2, 3, 8]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
        (ab[1, 4, 5, 8]*ab[2, 3, 5, 6]*ab[3, 4, 6, 7])]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
          (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))] - 
     log[(1 + \[Tau])/(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
          (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
          (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[2, 3, 5, 7, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   Li[1 - (ab[1, 2, 7, 8]*ab[2, 3, 4, 5])/(ab[1, 2, 4, 5]*ab[2, 3, 7, 8])] + 
    (-2*Li[1 - (ab[1, 2, 7, 8]*ab[2, 3, 4, 5])/((1 + \[Tau])*ab[1, 2, 4, 5]*
           ab[2, 3, 7, 8])] + log[(ab[1, 2, 7, 8]*ab[2, 3, 4, 5])/
         (ab[1, 2, 4, 5]*ab[2, 3, 7, 8])]*
       log[(ab[1, 2, 3, 4]*ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
         (ab[1, 2, 4, 5]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      log[((1 + \[Tau])*ab[1, 2, 4, 5]*ab[2, 3, 7, 8])/(ab[1, 2, 7, 8]*
          ab[2, 3, 4, 5])]*log[(ab[1, 2, 3, 4]*(\[Tau]*ab[1, 4, 5, 8]*
            ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))/
         ((1 + \[Tau])*ab[1, 2, 4, 5]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[2, 4, 5, 7, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[2, 4, 7, 8])/(ab[1, 2, 4, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   -Li[1 - (ab[1, 2, 7, 8]*ab[2, 3, 4, 5])/((1 + \[Tau])*ab[1, 2, 4, 5]*
         ab[2, 3, 7, 8])] + 
    (log[((1 + \[Tau])*ab[1, 2, 4, 5]*ab[2, 3, 7, 8])/
        (ab[1, 2, 7, 8]*ab[2, 3, 4, 5])]*
      log[(ab[1, 2, 3, 4]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))/((1 + \[Tau])*ab[1, 2, 4, 5]*
         ab[1, 3, 4, 8]*ab[2, 3, 7, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[2, 4, 5, 7, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   (log[(ab[2, 3, 7, 8]*ab[3, 4, 6, 7])/(ab[2, 3, 6, 7]*ab[3, 4, 7, 8])]*
     log[1 + (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
         ab[5, 6, 7, 8])])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*
  R[3, 4, 5, 6, 7] + int[\[Tau]/(1 + \[Tau]), 
   (log[(ab[3, 4, 7, 8]*ab[4, 5, 6, 7])/(ab[3, 4, 6, 7]*ab[4, 5, 7, 8])]*
     log[1 + (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
         ab[5, 6, 7, 8])])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*
  R[3, 4, 5, 6, 7] - 
 int[1 + \[Tau], 
   (-2*Li[(\[Tau]*(ab[1, 3, 4, 8]*ab[2, 3, 7, 8] - ab[1, 2, 3, 8]*
           ab[3, 4, 7, 8]))/(\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[3, 4, 7, 8])] + 
     2*Li[1 - (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
          ab[2, 3, 7, 8])] - log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
        (ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
      log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))] - 
     log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5])/
        (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
      log[(1 + \[Tau])/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))] - 
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))]*
      log[(1 + \[Tau])/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[3, 4, 5, 6, 7] - 
 int[1 + \[Tau], (log[((1 + \[Tau])*ab[1, 2, 4, 5]*ab[2, 3, 7, 8])/
       (ab[1, 2, 7, 8]*ab[2, 3, 4, 5])]*
     log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
          ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[3, 4, 5, 6, 7] - 
 int[1 + \[Tau], 
   -(log[(ab[2, 3, 7, 8]*ab[3, 4, 6, 7])/(ab[2, 3, 6, 7]*ab[3, 4, 7, 8])]*
      log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[3, 4, 5, 6, 7] - 
 int[1 + \[Tau], 
   -(log[(ab[3, 4, 7, 8]*ab[4, 5, 6, 7])/(ab[3, 4, 6, 7]*ab[4, 5, 7, 8])]*
      log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[3, 4, 5, 6, 7] + 
 int[1 + \[Tau], (log[(ab[2, 3, 7, 8]*ab[3, 4, 6, 7])/
       (ab[2, 3, 6, 7]*ab[3, 4, 7, 8])]*
     log[1 + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(\[Tau]*ab[1, 5, 6, 8]*
         ab[2, 3, 7, 8])])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*
  R[3, 4, 5, 6, 7] + 
 int[1 + \[Tau], (log[(ab[3, 4, 7, 8]*ab[4, 5, 6, 7])/
       (ab[3, 4, 6, 7]*ab[4, 5, 7, 8])]*
     log[1 + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(\[Tau]*ab[1, 5, 6, 8]*
         ab[2, 3, 7, 8])])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*
  R[3, 4, 5, 6, 7] - int[1 + \[Tau], -Li[1] + Li[\[Tau]/(1 + \[Tau])]]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[3, 4, 5, 6, 8] - 
 int[1 + \[Tau], Li[(ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/
     ((1 + \[Tau])*ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[3, 4, 5, 6, 8] - 
 int[1 + \[Tau], -Li[(ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/
       (ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
    Li[(\[Tau]*ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/
      (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
        ab[3, 4, 7, 8])]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*
  R[3, 4, 5, 6, 8] - 
 int[1 + \[Tau], Li[(ab[1, 2, 3, 8]*ab[1, 5, 7, 8]*ab[4, 5, 6, 8])/
     (ab[1, 5, 6, 8]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
       ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*
  R[3, 4, 5, 6, 8] - 
 int[1 + \[Tau], Li[(ab[1, 2, 3, 8]*(ab[1, 4, 5, 8]*ab[3, 4, 7, 8] - 
       ab[1, 3, 4, 8]*ab[4, 5, 7, 8]))/(ab[1, 4, 5, 8]*
      (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
        ab[3, 4, 7, 8]))]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*
  R[3, 4, 5, 6, 8] - 
 int[1 + \[Tau], Li[(\[Tau]*ab[2, 3, 7, 8]*(ab[1, 4, 5, 8]*ab[3, 4, 7, 8] - 
        ab[1, 3, 4, 8]*ab[4, 5, 7, 8]))/(ab[3, 4, 7, 8]*
       (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
         ab[4, 5, 7, 8]))] - Li[1 - (ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/
       (ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*
  R[3, 4, 5, 6, 8] - 
 int[1 + \[Tau], -Li[(ab[1, 5, 7, 8]*ab[4, 5, 6, 8])/
       (ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
    Li[(\[Tau]*ab[1, 5, 7, 8]*ab[2, 3, 7, 8]*ab[4, 5, 6, 8])/
      (ab[4, 5, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
        ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*
  R[3, 4, 5, 6, 8] - 
 int[1 + \[Tau], Li[(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
     (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[3, 4, 5, 6, 8] - 
 int[1 + \[Tau], -(log[\[Tau]/(1 + \[Tau])]*log[1 + \[Tau]])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[3, 4, 5, 6, 8] - 
 int[1 + \[Tau], (log[\[Tau]/(1 + \[Tau])]*
     log[(ab[1, 2, 3, 4]*ab[1, 4, 5, 8])/(ab[1, 2, 4, 5]*ab[1, 3, 4, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[3, 4, 5, 6, 8] - 
 int[1 + \[Tau], (log[\[Tau]/(1 + \[Tau])]*
     log[(ab[1, 2, 4, 5]*ab[1, 5, 6, 8])/(ab[1, 2, 5, 6]*ab[1, 4, 5, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[3, 4, 5, 6, 8] - 
 int[1 + \[Tau], (log[\[Tau]/(1 + \[Tau])]*
     log[(ab[1, 2, 3, 4]*ab[1, 6, 7, 8])/(ab[1, 2, 6, 7]*ab[1, 3, 4, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[3, 4, 5, 6, 8] - 
 int[1 + \[Tau], (log[\[Tau]/(1 + \[Tau])]*
     log[(ab[1, 2, 5, 6]*ab[1, 6, 7, 8])/(ab[1, 2, 6, 7]*ab[1, 5, 6, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[3, 4, 5, 6, 8] - 
 int[1 + \[Tau], 
   (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
      log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))] + 
     log[(\[Tau]*ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5])/
        (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*(\[Tau]*ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))]*
      log[(1 + \[Tau])/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[3, 4, 5, 6, 8] - 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
        ab[2, 3, 4, 5])/((1 + \[Tau])*ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*
        ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
     log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
          ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[3, 4, 5, 6, 8] - 
 int[1 + \[Tau], 
   (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
      log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
          (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))] + 
     log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 7, 8]*
         ab[3, 4, 5, 6])/(ab[1, 2, 6, 7]*ab[2, 3, 5, 6]*ab[3, 4, 7, 8]*
         (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8]))]*log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))/(\[Tau] + 
         (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))])/
    2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[3, 4, 5, 6, 8] - 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
        ab[2, 3, 4, 5]*ab[3, 4, 5, 6])/(ab[1, 2, 6, 7]*ab[1, 4, 5, 8]*
        ab[2, 3, 5, 6]*(\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))]*
     log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
          ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
         (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[3, 4, 5, 6, 8] - 
 int[1 + \[Tau], 
   -Li[(\[Tau]*ab[2, 3, 7, 8]*(ab[1, 5, 6, 8]*ab[3, 4, 7, 8] - 
         ab[1, 3, 4, 8]*ab[5, 6, 7, 8]))/(ab[3, 4, 7, 8]*
        (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8]))] + Li[1 - (ab[1, 3, 4, 8]*ab[5, 6, 7, 8])/
       (ab[1, 5, 6, 8]*ab[3, 4, 7, 8])] + 
    (log[(ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[3, 4, 5, 6])/
         (ab[1, 2, 6, 7]*ab[1, 5, 6, 8]*ab[3, 4, 7, 8])]*
       log[(ab[1, 3, 4, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[3, 4, 7, 8])] - 
      log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*
          ab[3, 4, 5, 6])/(ab[1, 2, 6, 7]*ab[3, 4, 7, 8]*
          (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
            ab[5, 6, 7, 8]))]*log[((\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
           ab[1, 2, 3, 8]*ab[3, 4, 7, 8])*ab[5, 6, 7, 8])/
         (ab[3, 4, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
           ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[3, 4, 5, 6, 8] - 
 int[1 + \[Tau], (log[(ab[1, 2, 7, 8]*ab[2, 3, 6, 7])/
       (ab[1, 2, 6, 7]*ab[2, 3, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[3, 4, 5, 6, 8] - 
 int[1 + \[Tau], (log[(ab[2, 3, 7, 8]*ab[3, 4, 6, 7])/
       (ab[2, 3, 6, 7]*ab[3, 4, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[3, 4, 5, 6, 8] - 
 int[1 + \[Tau], (log[(ab[3, 4, 7, 8]*ab[4, 5, 6, 7])/
       (ab[3, 4, 6, 7]*ab[4, 5, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[3, 4, 5, 6, 8] - 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[4, 5, 6, 7]*
        ab[5, 6, 7, 8])/(ab[1, 2, 6, 7]*ab[4, 5, 7, 8]*
        (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8]))]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[3, 4, 5, 6, 8] - 
 int[1 + \[Tau], 
   (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
      log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))] + 
     log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6]*
         ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[3, 4, 6, 7]*ab[4, 5, 7, 8]*
         (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8]))]*log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
          (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))/(\[Tau] + 
         (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/
    2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[3, 4, 5, 6, 8] - 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
        ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[1, 5, 6, 8]*
        ab[3, 4, 6, 7]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]*
     log[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
          ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
         (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[3, 4, 5, 6, 8] + 
 int[\[Tau]/(1 + \[Tau]), Li[\[Tau]/(1 + \[Tau])]]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[3, 4, 5, 6, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   -Li[(ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
    Li[(ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/((1 + \[Tau])*ab[1, 3, 4, 8]*
       ab[2, 3, 7, 8])]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[3, 4, 5, 6, 8] + int[\[Tau]/(1 + \[Tau]), 
   Li[(\[Tau]*ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/
     (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[3, 4, 7, 8])]]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[3, 4, 5, 6, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   -Li[(ab[1, 5, 7, 8]*ab[4, 5, 6, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
    Li[(ab[1, 2, 3, 8]*ab[1, 5, 7, 8]*ab[4, 5, 6, 8])/
      (ab[1, 5, 6, 8]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
        ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[3, 4, 5, 6, 8] + int[\[Tau]/(1 + \[Tau]), 
   Li[(\[Tau]*ab[2, 3, 7, 8]*(ab[1, 4, 5, 8]*ab[3, 4, 7, 8] - 
       ab[1, 3, 4, 8]*ab[4, 5, 7, 8]))/(ab[3, 4, 7, 8]*
      (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
        ab[4, 5, 7, 8]))]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[3, 4, 5, 6, 8] + int[\[Tau]/(1 + \[Tau]), 
   Li[(ab[1, 2, 3, 8]*(ab[1, 4, 5, 8]*ab[3, 4, 7, 8] - 
        ab[1, 3, 4, 8]*ab[4, 5, 7, 8]))/(ab[1, 4, 5, 8]*
       (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
         ab[3, 4, 7, 8]))] - Li[1 - (ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/
       (ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[3, 4, 5, 6, 8] + int[\[Tau]/(1 + \[Tau]), 
   Li[(\[Tau]*ab[1, 5, 7, 8]*ab[2, 3, 7, 8]*ab[4, 5, 6, 8])/
     (ab[4, 5, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
       ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[3, 4, 5, 6, 8] + int[\[Tau]/(1 + \[Tau]), 
   -Li[1] + Li[(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
      (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
        ab[5, 6, 7, 8])]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[3, 4, 5, 6, 8] + int[\[Tau]/(1 + \[Tau]), 
   -(log[1 + \[Tau]]*log[(ab[1, 2, 3, 4]*ab[1, 4, 5, 8])/
        (ab[1, 2, 4, 5]*ab[1, 3, 4, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[3, 4, 5, 6, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   -(log[1 + \[Tau]]*log[(ab[1, 2, 4, 5]*ab[1, 5, 6, 8])/
        (ab[1, 2, 5, 6]*ab[1, 4, 5, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[3, 4, 5, 6, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   (log[1 + \[Tau]]*log[((1 + \[Tau]^(-1))*ab[1, 2, 6, 7]*ab[1, 3, 4, 8])/
       (ab[1, 2, 3, 4]*ab[1, 6, 7, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[3, 4, 5, 6, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   -(log[1 + \[Tau]]*log[(ab[1, 2, 5, 6]*ab[1, 6, 7, 8])/
        (ab[1, 2, 6, 7]*ab[1, 5, 6, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[3, 4, 5, 6, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   (log[(\[Tau]*ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5])/
       (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*(\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))]*
     log[((1 + \[Tau])*ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
       (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
         ab[3, 4, 7, 8])])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[3, 4, 5, 6, 8] + int[\[Tau]/(1 + \[Tau]), 
   (log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5])/
        (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
      log[(1 + (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[3, 4, 7, 8]))/(1 + \[Tau])] - log[1 + \[Tau]]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[3, 4, 5, 6, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   (log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 7, 8]*
        ab[3, 4, 5, 6])/(ab[1, 2, 6, 7]*ab[2, 3, 5, 6]*ab[3, 4, 7, 8]*
        (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[4, 5, 7, 8]))]*log[((\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[3, 4, 7, 8])*ab[4, 5, 7, 8])/
       (ab[3, 4, 7, 8]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[3, 4, 5, 6, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   (-(log[(ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[3, 4, 5, 6])/
         (ab[1, 2, 6, 7]*ab[1, 4, 5, 8]*ab[2, 3, 5, 6]*ab[3, 4, 7, 8])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
          ab[3, 4, 7, 8])]) + 
     log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*
         ab[3, 4, 5, 6])/(ab[1, 2, 6, 7]*ab[1, 4, 5, 8]*ab[2, 3, 5, 6]*
         (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[3, 4, 7, 8]))]*log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
          (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))/(\[Tau] + 
         (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))])/
    2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[3, 4, 5, 6, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   -(log[(ab[1, 2, 7, 8]*ab[2, 3, 6, 7])/(ab[1, 2, 6, 7]*ab[2, 3, 7, 8])]*
      log[1 + (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8])])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[3, 4, 5, 6, 8] + int[\[Tau]/(1 + \[Tau]), 
   -(log[(ab[2, 3, 7, 8]*ab[3, 4, 6, 7])/(ab[2, 3, 6, 7]*ab[3, 4, 7, 8])]*
      log[1 + (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8])])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[3, 4, 5, 6, 8] + int[\[Tau]/(1 + \[Tau]), 
   (log[(ab[1, 2, 7, 8]*ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[4, 5, 7, 8])]*
     log[1 + (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
         ab[5, 6, 7, 8])])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[3, 4, 5, 6, 8] + int[\[Tau]/(1 + \[Tau]), 
   -(log[(ab[3, 4, 7, 8]*ab[4, 5, 6, 7])/(ab[3, 4, 6, 7]*ab[4, 5, 7, 8])]*
      log[1 + (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8])])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[3, 4, 5, 6, 8] + int[\[Tau]/(1 + \[Tau]), 
   (log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6]*
        ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[3, 4, 6, 7]*ab[4, 5, 7, 8]*
        (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8]))]*log[((\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[4, 5, 7, 8])*ab[5, 6, 7, 8])/
       (ab[4, 5, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[3, 4, 5, 6, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   (-(log[(ab[1, 2, 7, 8]*ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[4, 5, 7, 8])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8])]) + log[\[Tau]]*log[(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
        (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8])] + 
     log[(ab[1, 2, 6, 7]*ab[4, 5, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*
           ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))/
        (ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])]*
      log[\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
          ab[2, 3, 7, 8])])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[3, 4, 5, 6, 8] + int[\[Tau]/(1 + \[Tau]), 
   (-(log[(ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
         (ab[1, 2, 6, 7]*ab[1, 5, 6, 8]*ab[3, 4, 6, 7]*ab[4, 5, 7, 8])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
          ab[4, 5, 7, 8])]) + 
     log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[3, 4, 5, 6]*
         ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[1, 5, 6, 8]*ab[3, 4, 6, 7]*
         (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8]))]*log[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))/(\[Tau] + 
         (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))])/
    2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[3, 4, 5, 6, 8] + 
 int[1 + \[Tau], -Li[1] + Li[\[Tau]/(1 + \[Tau])]]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[3, 4, 5, 6, 8] + 
 int[1 + \[Tau], Li[(ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/
     ((1 + \[Tau])*ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[3, 4, 5, 6, 8] + 
 int[1 + \[Tau], -Li[(ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/
       (ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
    Li[(\[Tau]*ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/
      (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
        ab[3, 4, 7, 8])]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[3, 4, 5, 6, 8] + 
 int[1 + \[Tau], Li[(ab[1, 2, 3, 8]*ab[1, 5, 7, 8]*ab[4, 5, 6, 8])/
     (ab[1, 5, 6, 8]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
       ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[3, 4, 5, 6, 8] + 
 int[1 + \[Tau], Li[(ab[1, 2, 3, 8]*(ab[1, 4, 5, 8]*ab[3, 4, 7, 8] - 
       ab[1, 3, 4, 8]*ab[4, 5, 7, 8]))/(ab[1, 4, 5, 8]*
      (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
        ab[3, 4, 7, 8]))]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[3, 4, 5, 6, 8] + 
 int[1 + \[Tau], Li[(\[Tau]*ab[2, 3, 7, 8]*(ab[1, 4, 5, 8]*ab[3, 4, 7, 8] - 
        ab[1, 3, 4, 8]*ab[4, 5, 7, 8]))/(ab[3, 4, 7, 8]*
       (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
         ab[4, 5, 7, 8]))] - Li[1 - (ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/
       (ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[3, 4, 5, 6, 8] + 
 int[1 + \[Tau], -Li[(ab[1, 5, 7, 8]*ab[4, 5, 6, 8])/
       (ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
    Li[(\[Tau]*ab[1, 5, 7, 8]*ab[2, 3, 7, 8]*ab[4, 5, 6, 8])/
      (ab[4, 5, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
        ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[3, 4, 5, 6, 8] + 
 int[1 + \[Tau], Li[(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
     (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[3, 4, 5, 6, 8] + 
 int[1 + \[Tau], (log[\[Tau]/(1 + \[Tau])]*
     log[(ab[1, 2, 3, 4]*ab[1, 4, 5, 8])/(ab[1, 2, 4, 5]*ab[1, 3, 4, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[3, 4, 5, 6, 8] + 
 int[1 + \[Tau], (log[\[Tau]/(1 + \[Tau])]*
     log[(ab[1, 2, 4, 5]*ab[1, 5, 6, 8])/(ab[1, 2, 5, 6]*ab[1, 4, 5, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[3, 4, 5, 6, 8] + 
 int[1 + \[Tau], -(log[\[Tau]/(1 + \[Tau])]*
      log[((1 + \[Tau])*ab[1, 2, 6, 7]*ab[1, 3, 4, 8])/
        (ab[1, 2, 3, 4]*ab[1, 6, 7, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[3, 4, 5, 6, 8] + 
 int[1 + \[Tau], (log[\[Tau]/(1 + \[Tau])]*
     log[(ab[1, 2, 5, 6]*ab[1, 6, 7, 8])/(ab[1, 2, 6, 7]*ab[1, 5, 6, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[3, 4, 5, 6, 8] + 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
       (ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
         (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[3, 4, 5, 6, 8] + 
 int[1 + \[Tau], (log[(\[Tau]*ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
        ab[2, 3, 4, 5])/(ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*
        (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[3, 4, 7, 8]))]*log[(1 + \[Tau])/
       (\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
          ab[2, 3, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[3, 4, 5, 6, 8] + 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
        ab[2, 3, 4, 5])/((1 + \[Tau])*ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*
        ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
     log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
          ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[3, 4, 5, 6, 8] + 
 int[1 + \[Tau], (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/
       (ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
         (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[3, 4, 5, 6, 8] + 
 int[1 + \[Tau], (log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*
        ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/(ab[1, 2, 6, 7]*ab[2, 3, 5, 6]*
        ab[3, 4, 7, 8]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]*
     log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
          ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
         (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[3, 4, 5, 6, 8] + 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
        ab[2, 3, 4, 5]*ab[3, 4, 5, 6])/(ab[1, 2, 6, 7]*ab[1, 4, 5, 8]*
        ab[2, 3, 5, 6]*(\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))]*
     log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
          ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
         (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[3, 4, 5, 6, 8] + 
 int[1 + \[Tau], (log[(ab[1, 2, 7, 8]*ab[2, 3, 6, 7])/
       (ab[1, 2, 6, 7]*ab[2, 3, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[3, 4, 5, 6, 8] + 
 int[1 + \[Tau], (log[(ab[2, 3, 7, 8]*ab[3, 4, 6, 7])/
       (ab[2, 3, 6, 7]*ab[3, 4, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[3, 4, 5, 6, 8] + 
 int[1 + \[Tau], (log[(ab[3, 4, 7, 8]*ab[4, 5, 6, 7])/
       (ab[3, 4, 6, 7]*ab[4, 5, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[3, 4, 5, 6, 8] + 
 int[1 + \[Tau], (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/
       (ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[3, 4, 5, 6, 8] + 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[4, 5, 6, 7]*
        ab[5, 6, 7, 8])/(ab[1, 2, 6, 7]*ab[4, 5, 7, 8]*
        (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8]))]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[3, 4, 5, 6, 8] + 
 int[1 + \[Tau], (log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*
        ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[3, 4, 6, 7]*
        ab[4, 5, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]*
     log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
          ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[3, 4, 5, 6, 8] + 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
        ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[1, 5, 6, 8]*
        ab[3, 4, 6, 7]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]*
     log[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
          ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
         (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[3, 4, 5, 6, 8] + 
 int[1 + \[Tau], (log[(ab[1, 2, 7, 8]*ab[4, 5, 6, 7])/
       (ab[1, 2, 6, 7]*ab[4, 5, 7, 8])]*
     log[1 + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(\[Tau]*ab[1, 5, 6, 8]*
         ab[2, 3, 7, 8])])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[3, 4, 5, 6, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*(ab[2, 4, 7, 8]*ab[3, 5, 6, 8] - 
        ab[2, 3, 7, 8]*ab[4, 5, 6, 8]))/(ab[2, 3, 7, 8]*
       (ab[1, 2, 4, 8]*ab[3, 5, 6, 8] - ab[1, 2, 3, 8]*ab[4, 5, 6, 8])))/
    (\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8])), 
   (-Li[1] + log[((1 + \[Tau])*ab[1, 2, 4, 5]*ab[2, 3, 7, 8])/
        (ab[1, 2, 7, 8]*ab[2, 3, 4, 5])]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, cap[{3, 4}, {5, 6, 8}]]]*R[3, 4, 5, 6, 8] + 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[cap[{3, 4}, {5, 6, 8}], 2, 7, 8])/
      (ab[1, cap[{3, 4}, {5, 6, 8}], 2, 8]*ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (-Li[1] + log[((1 + \[Tau])*ab[1, 2, 4, 5]*ab[2, 3, 7, 8])/
        (ab[1, 2, 7, 8]*ab[2, 3, 4, 5])]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, cap[{3, 4}, {5, 6, 8}]]]*R[3, 4, 5, 6, 8] - 
 int[1 + \[Tau], 
   (-2*Li[(\[Tau]*(ab[1, 3, 4, 8]*ab[2, 3, 7, 8] - ab[1, 2, 3, 8]*
           ab[3, 4, 7, 8]))/(\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[3, 4, 7, 8])] + 
     2*Li[1 - (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
          ab[2, 3, 7, 8])] - log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
        (ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
      log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))] - 
     log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5])/
        (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
      log[(1 + \[Tau])/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))] - 
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))]*
      log[(1 + \[Tau])/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[3, 4, 5, 7, 8] - 
 int[1 + \[Tau], (log[((1 + \[Tau])*ab[1, 2, 4, 5]*ab[2, 3, 7, 8])/
       (ab[1, 2, 7, 8]*ab[2, 3, 4, 5])]*
     log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
          ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[3, 4, 5, 7, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   Li[1 - (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
    (-2*Li[(1 - (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
            ab[2, 3, 7, 8]))/(1 + \[Tau])] + 
      log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5])/
         (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
       log[((1 + \[Tau])*ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
         (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[3, 4, 7, 8])] + log[1 + \[Tau]]*
       log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
            ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 6]]*R[3, 4, 5, 7, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   (log[(ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/(ab[2, 3, 5, 6]*ab[3, 4, 7, 8])]*
      log[(ab[1, 2, 3, 4]*ab[4, 5, 7, 8])/(ab[1, 2, 4, 5]*ab[3, 4, 7, 8])] - 
     log[((1 + \[Tau])*ab[1, 2, 3, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
        (ab[2, 3, 5, 6]*(\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))]*
      log[(ab[1, 2, 3, 4]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))/(ab[1, 2, 4, 5]*
         (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[3, 4, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 6]]*
  R[3, 4, 5, 7, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   -Li[(1 - (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))/
       (1 + \[Tau])] + 
    (log[((1 + \[Tau])*ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*ab[1, 3, 4, 8]*
         ab[2, 3, 7, 8])/(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
         ab[2, 3, 4, 5])]*log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 6]]*R[3, 4, 5, 7, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (-Li[1] - log[((1 + \[Tau])*ab[1, 2, 3, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
        (ab[2, 3, 5, 6]*(\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))]*
      log[(ab[1, 2, 3, 4]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))/(ab[1, 2, 4, 5]*
         (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[3, 4, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 6]]*
  R[3, 4, 5, 7, 8] + int[\[Tau]/(1 + \[Tau]), 
   (log[(ab[3, 4, 7, 8]*ab[4, 5, 6, 7])/(ab[3, 4, 6, 7]*ab[4, 5, 7, 8])]*
      log[(ab[2, 3, 4, 5]*ab[5, 6, 7, 8])/(ab[2, 3, 5, 6]*ab[4, 5, 7, 8])] - 
     log[((\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[3, 4, 7, 8])*ab[4, 5, 6, 7])/(ab[3, 4, 6, 7]*
         (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8]))]*
      log[(ab[2, 3, 4, 5]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))/(ab[2, 3, 5, 6]*
         (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[3, 4, 5, 7, 8] - 
 int[1 + \[Tau], 
   (log[(ab[1, 5, 6, 8]*ab[2, 3, 4, 5])/(ab[1, 4, 5, 8]*ab[2, 3, 5, 6])]*
      log[(ab[1, 3, 4, 8]*ab[4, 5, 6, 7])/(ab[1, 4, 5, 8]*ab[3, 4, 6, 7])] - 
     log[((\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[3, 4, 7, 8])*ab[4, 5, 6, 7])/(ab[3, 4, 6, 7]*
         (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8]))]*
      log[(ab[2, 3, 4, 5]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))/(ab[2, 3, 5, 6]*
         (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[3, 4, 5, 7, 8] + 
 int[1 + \[Tau], 
   (-(log[(ab[1, 5, 6, 8]*ab[2, 3, 4, 5])/(ab[1, 4, 5, 8]*ab[2, 3, 5, 6])]*
       log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
            ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
           (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))]) - 
     log[((\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[3, 4, 7, 8])*ab[4, 5, 6, 7])/(ab[3, 4, 6, 7]*
         (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8]))]*log[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))/(\[Tau] + 
         (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))])/
    2]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[3, 4, 5, 7, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (-Li[1] - log[((\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[3, 4, 7, 8])*ab[4, 5, 6, 7])/
        (ab[3, 4, 6, 7]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]*
      log[(ab[2, 3, 4, 5]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))/(ab[2, 3, 5, 6]*
         (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[3, 4, 5, 7, 8] + int[\[Tau]/(1 + \[Tau]), 
   (log[(ab[3, 4, 7, 8]*ab[4, 5, 6, 7])/(ab[3, 4, 6, 7]*ab[4, 5, 7, 8])]*
     log[1 + (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
         ab[5, 6, 7, 8])])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*
  R[3, 4, 6, 7, 8] - int[1 + \[Tau], -Li[1] + Li[\[Tau]/(1 + \[Tau])]]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[3, 4, 6, 7, 8] - 
 int[1 + \[Tau], Li[(ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/
     ((1 + \[Tau])*ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[3, 4, 6, 7, 8] - 
 int[1 + \[Tau], -Li[(ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/
       (ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
    Li[(\[Tau]*ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/
      (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
        ab[3, 4, 7, 8])]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*
  R[3, 4, 6, 7, 8] - 
 int[1 + \[Tau], Li[(ab[1, 2, 3, 8]*ab[1, 5, 7, 8]*ab[4, 5, 6, 8])/
     (ab[1, 5, 6, 8]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
       ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*
  R[3, 4, 6, 7, 8] - 
 int[1 + \[Tau], Li[(ab[1, 2, 3, 8]*(ab[1, 4, 5, 8]*ab[3, 4, 7, 8] - 
       ab[1, 3, 4, 8]*ab[4, 5, 7, 8]))/(ab[1, 4, 5, 8]*
      (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
        ab[3, 4, 7, 8]))]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*
  R[3, 4, 6, 7, 8] - 
 int[1 + \[Tau], Li[(\[Tau]*ab[2, 3, 7, 8]*(ab[1, 4, 5, 8]*ab[3, 4, 7, 8] - 
        ab[1, 3, 4, 8]*ab[4, 5, 7, 8]))/(ab[3, 4, 7, 8]*
       (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
         ab[4, 5, 7, 8]))] - Li[1 - (ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/
       (ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*
  R[3, 4, 6, 7, 8] - 
 int[1 + \[Tau], -Li[(ab[1, 5, 7, 8]*ab[4, 5, 6, 8])/
       (ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
    Li[(\[Tau]*ab[1, 5, 7, 8]*ab[2, 3, 7, 8]*ab[4, 5, 6, 8])/
      (ab[4, 5, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
        ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*
  R[3, 4, 6, 7, 8] - 
 int[1 + \[Tau], Li[(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
     (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[3, 4, 6, 7, 8] - 
 int[1 + \[Tau], -(log[\[Tau]/(1 + \[Tau])]*log[1 + \[Tau]])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[3, 4, 6, 7, 8] - 
 int[1 + \[Tau], (log[\[Tau]/(1 + \[Tau])]*
     log[(ab[1, 2, 3, 4]*ab[1, 4, 5, 8])/(ab[1, 2, 4, 5]*ab[1, 3, 4, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[3, 4, 6, 7, 8] - 
 int[1 + \[Tau], (log[\[Tau]/(1 + \[Tau])]*
     log[(ab[1, 2, 4, 5]*ab[1, 5, 6, 8])/(ab[1, 2, 5, 6]*ab[1, 4, 5, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[3, 4, 6, 7, 8] - 
 int[1 + \[Tau], (log[\[Tau]/(1 + \[Tau])]*
     log[(ab[1, 2, 3, 4]*ab[1, 6, 7, 8])/(ab[1, 2, 6, 7]*ab[1, 3, 4, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[3, 4, 6, 7, 8] - 
 int[1 + \[Tau], (log[\[Tau]/(1 + \[Tau])]*
     log[(ab[1, 2, 5, 6]*ab[1, 6, 7, 8])/(ab[1, 2, 6, 7]*ab[1, 5, 6, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[3, 4, 6, 7, 8] - 
 int[1 + \[Tau], 
   (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
      log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))] + 
     log[(\[Tau]*ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5])/
        (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*(\[Tau]*ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))]*
      log[(1 + \[Tau])/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[3, 4, 6, 7, 8] - 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
        ab[2, 3, 4, 5])/((1 + \[Tau])*ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*
        ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
     log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
          ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[3, 4, 6, 7, 8] - 
 int[1 + \[Tau], 
   (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
      log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
          (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))] + 
     log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 7, 8]*
         ab[3, 4, 5, 6])/(ab[1, 2, 6, 7]*ab[2, 3, 5, 6]*ab[3, 4, 7, 8]*
         (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8]))]*log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))/(\[Tau] + 
         (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))])/
    2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[3, 4, 6, 7, 8] - 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
        ab[2, 3, 4, 5]*ab[3, 4, 5, 6])/(ab[1, 2, 6, 7]*ab[1, 4, 5, 8]*
        ab[2, 3, 5, 6]*(\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))]*
     log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
          ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
         (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[3, 4, 6, 7, 8] - 
 int[1 + \[Tau], (log[(ab[1, 2, 7, 8]*ab[2, 3, 6, 7])/
       (ab[1, 2, 6, 7]*ab[2, 3, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[3, 4, 6, 7, 8] - 
 int[1 + \[Tau], (log[(ab[2, 3, 7, 8]*ab[3, 4, 6, 7])/
       (ab[2, 3, 6, 7]*ab[3, 4, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[3, 4, 6, 7, 8] - 
 int[1 + \[Tau], 
   -(log[(ab[3, 4, 7, 8]*ab[4, 5, 6, 7])/(ab[3, 4, 6, 7]*ab[4, 5, 7, 8])]*
      log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[3, 4, 6, 7, 8] - 
 int[1 + \[Tau], (log[(ab[3, 4, 7, 8]*ab[4, 5, 6, 7])/
       (ab[3, 4, 6, 7]*ab[4, 5, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[3, 4, 6, 7, 8] - 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[4, 5, 6, 7]*
        ab[5, 6, 7, 8])/(ab[1, 2, 6, 7]*ab[4, 5, 7, 8]*
        (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8]))]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[3, 4, 6, 7, 8] - 
 int[1 + \[Tau], 
   -(log[(ab[1, 2, 7, 8]*ab[3, 4, 6, 7])/(ab[1, 2, 6, 7]*ab[3, 4, 7, 8])]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[3, 4, 6, 7, 8] - 
 int[1 + \[Tau], 
   (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
      log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))] + 
     log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6]*
         ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[3, 4, 6, 7]*ab[4, 5, 7, 8]*
         (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8]))]*log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
          (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))/(\[Tau] + 
         (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/
    2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[3, 4, 6, 7, 8] - 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
        ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[1, 5, 6, 8]*
        ab[3, 4, 6, 7]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]*
     log[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
          ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
         (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[3, 4, 6, 7, 8] + 
 int[1 + \[Tau], (log[(ab[3, 4, 7, 8]*ab[4, 5, 6, 7])/
       (ab[3, 4, 6, 7]*ab[4, 5, 7, 8])]*
     log[1 + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(\[Tau]*ab[1, 5, 6, 8]*
         ab[2, 3, 7, 8])])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*
  R[3, 4, 6, 7, 8] + int[\[Tau]/(1 + \[Tau]), Li[\[Tau]/(1 + \[Tau])]]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[3, 4, 6, 7, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   -Li[(ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
    Li[(ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/((1 + \[Tau])*ab[1, 3, 4, 8]*
       ab[2, 3, 7, 8])]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[3, 4, 6, 7, 8] + int[\[Tau]/(1 + \[Tau]), 
   Li[(\[Tau]*ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/
     (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[3, 4, 7, 8])]]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[3, 4, 6, 7, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   -Li[(ab[1, 5, 7, 8]*ab[4, 5, 6, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
    Li[(ab[1, 2, 3, 8]*ab[1, 5, 7, 8]*ab[4, 5, 6, 8])/
      (ab[1, 5, 6, 8]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
        ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[3, 4, 6, 7, 8] + int[\[Tau]/(1 + \[Tau]), 
   Li[(\[Tau]*ab[2, 3, 7, 8]*(ab[1, 4, 5, 8]*ab[3, 4, 7, 8] - 
       ab[1, 3, 4, 8]*ab[4, 5, 7, 8]))/(ab[3, 4, 7, 8]*
      (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
        ab[4, 5, 7, 8]))]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[3, 4, 6, 7, 8] + int[\[Tau]/(1 + \[Tau]), 
   Li[(ab[1, 2, 3, 8]*(ab[1, 4, 5, 8]*ab[3, 4, 7, 8] - 
        ab[1, 3, 4, 8]*ab[4, 5, 7, 8]))/(ab[1, 4, 5, 8]*
       (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
         ab[3, 4, 7, 8]))] - Li[1 - (ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/
       (ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[3, 4, 6, 7, 8] + int[\[Tau]/(1 + \[Tau]), 
   Li[(\[Tau]*ab[1, 5, 7, 8]*ab[2, 3, 7, 8]*ab[4, 5, 6, 8])/
     (ab[4, 5, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
       ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[3, 4, 6, 7, 8] + int[\[Tau]/(1 + \[Tau]), 
   -Li[1] + Li[(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
      (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
        ab[5, 6, 7, 8])]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[3, 4, 6, 7, 8] + int[\[Tau]/(1 + \[Tau]), 
   -(log[1 + \[Tau]]*log[(ab[1, 2, 3, 4]*ab[1, 4, 5, 8])/
        (ab[1, 2, 4, 5]*ab[1, 3, 4, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[3, 4, 6, 7, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   -(log[1 + \[Tau]]*log[(ab[1, 2, 4, 5]*ab[1, 5, 6, 8])/
        (ab[1, 2, 5, 6]*ab[1, 4, 5, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[3, 4, 6, 7, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   (log[1 + \[Tau]]*log[((1 + \[Tau]^(-1))*ab[1, 2, 6, 7]*ab[1, 3, 4, 8])/
       (ab[1, 2, 3, 4]*ab[1, 6, 7, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[3, 4, 6, 7, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   -(log[1 + \[Tau]]*log[(ab[1, 2, 5, 6]*ab[1, 6, 7, 8])/
        (ab[1, 2, 6, 7]*ab[1, 5, 6, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[3, 4, 6, 7, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   (log[(\[Tau]*ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5])/
       (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*(\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))]*
     log[((1 + \[Tau])*ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
       (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
         ab[3, 4, 7, 8])])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[3, 4, 6, 7, 8] + int[\[Tau]/(1 + \[Tau]), 
   (log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5])/
        (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
      log[(1 + (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[3, 4, 7, 8]))/(1 + \[Tau])] - log[1 + \[Tau]]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[3, 4, 6, 7, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   (log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 7, 8]*
        ab[3, 4, 5, 6])/(ab[1, 2, 6, 7]*ab[2, 3, 5, 6]*ab[3, 4, 7, 8]*
        (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[4, 5, 7, 8]))]*log[((\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[3, 4, 7, 8])*ab[4, 5, 7, 8])/
       (ab[3, 4, 7, 8]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[3, 4, 6, 7, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   (-(log[(ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[3, 4, 5, 6])/
         (ab[1, 2, 6, 7]*ab[1, 4, 5, 8]*ab[2, 3, 5, 6]*ab[3, 4, 7, 8])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
          ab[3, 4, 7, 8])]) + 
     log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*
         ab[3, 4, 5, 6])/(ab[1, 2, 6, 7]*ab[1, 4, 5, 8]*ab[2, 3, 5, 6]*
         (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[3, 4, 7, 8]))]*log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
          (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))/(\[Tau] + 
         (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))])/
    2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[3, 4, 6, 7, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   -(log[(ab[1, 2, 7, 8]*ab[2, 3, 6, 7])/(ab[1, 2, 6, 7]*ab[2, 3, 7, 8])]*
      log[1 + (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8])])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[3, 4, 6, 7, 8] + int[\[Tau]/(1 + \[Tau]), 
   -(log[(ab[2, 3, 7, 8]*ab[3, 4, 6, 7])/(ab[2, 3, 6, 7]*ab[3, 4, 7, 8])]*
      log[1 + (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8])])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[3, 4, 6, 7, 8] + int[\[Tau]/(1 + \[Tau]), 
   -(log[(ab[3, 4, 7, 8]*ab[4, 5, 6, 7])/(ab[3, 4, 6, 7]*ab[4, 5, 7, 8])]*
      log[1 + (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8])])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[3, 4, 6, 7, 8] + int[\[Tau]/(1 + \[Tau]), 
   (log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6]*
        ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[3, 4, 6, 7]*ab[4, 5, 7, 8]*
        (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8]))]*log[((\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[4, 5, 7, 8])*ab[5, 6, 7, 8])/
       (ab[4, 5, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[3, 4, 6, 7, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   (-(log[(ab[1, 2, 7, 8]*ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[4, 5, 7, 8])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8])]) + log[\[Tau]]*log[(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
        (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8])] + 
     log[(ab[1, 2, 6, 7]*ab[4, 5, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*
           ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))/
        (ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])]*
      log[\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
          ab[2, 3, 7, 8])])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[3, 4, 6, 7, 8] + int[\[Tau]/(1 + \[Tau]), 
   (-(log[(ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
         (ab[1, 2, 6, 7]*ab[1, 5, 6, 8]*ab[3, 4, 6, 7]*ab[4, 5, 7, 8])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
          ab[4, 5, 7, 8])]) + 
     log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[3, 4, 5, 6]*
         ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[1, 5, 6, 8]*ab[3, 4, 6, 7]*
         (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8]))]*log[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))/(\[Tau] + 
         (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))])/
    2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[3, 4, 6, 7, 8] + 
 int[1 + \[Tau], -Li[1] + Li[\[Tau]/(1 + \[Tau])]]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[3, 4, 6, 7, 8] + 
 int[1 + \[Tau], Li[(ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/
     ((1 + \[Tau])*ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[3, 4, 6, 7, 8] + 
 int[1 + \[Tau], -Li[(ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/
       (ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
    Li[(\[Tau]*ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/
      (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
        ab[3, 4, 7, 8])]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[3, 4, 6, 7, 8] + 
 int[1 + \[Tau], Li[(ab[1, 2, 3, 8]*ab[1, 5, 7, 8]*ab[4, 5, 6, 8])/
     (ab[1, 5, 6, 8]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
       ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[3, 4, 6, 7, 8] + 
 int[1 + \[Tau], Li[(ab[1, 2, 3, 8]*(ab[1, 4, 5, 8]*ab[3, 4, 7, 8] - 
       ab[1, 3, 4, 8]*ab[4, 5, 7, 8]))/(ab[1, 4, 5, 8]*
      (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
        ab[3, 4, 7, 8]))]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[3, 4, 6, 7, 8] + 
 int[1 + \[Tau], Li[(\[Tau]*ab[2, 3, 7, 8]*(ab[1, 4, 5, 8]*ab[3, 4, 7, 8] - 
        ab[1, 3, 4, 8]*ab[4, 5, 7, 8]))/(ab[3, 4, 7, 8]*
       (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
         ab[4, 5, 7, 8]))] - Li[1 - (ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/
       (ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[3, 4, 6, 7, 8] + 
 int[1 + \[Tau], -Li[(ab[1, 5, 7, 8]*ab[4, 5, 6, 8])/
       (ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
    Li[(\[Tau]*ab[1, 5, 7, 8]*ab[2, 3, 7, 8]*ab[4, 5, 6, 8])/
      (ab[4, 5, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
        ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[3, 4, 6, 7, 8] + 
 int[1 + \[Tau], Li[(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
     (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[3, 4, 6, 7, 8] + 
 int[1 + \[Tau], (log[\[Tau]/(1 + \[Tau])]*
     log[(ab[1, 2, 3, 4]*ab[1, 4, 5, 8])/(ab[1, 2, 4, 5]*ab[1, 3, 4, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[3, 4, 6, 7, 8] + 
 int[1 + \[Tau], (log[\[Tau]/(1 + \[Tau])]*
     log[(ab[1, 2, 4, 5]*ab[1, 5, 6, 8])/(ab[1, 2, 5, 6]*ab[1, 4, 5, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[3, 4, 6, 7, 8] + 
 int[1 + \[Tau], -(log[\[Tau]/(1 + \[Tau])]*
      log[((1 + \[Tau])*ab[1, 2, 6, 7]*ab[1, 3, 4, 8])/
        (ab[1, 2, 3, 4]*ab[1, 6, 7, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[3, 4, 6, 7, 8] + 
 int[1 + \[Tau], (log[\[Tau]/(1 + \[Tau])]*
     log[(ab[1, 2, 5, 6]*ab[1, 6, 7, 8])/(ab[1, 2, 6, 7]*ab[1, 5, 6, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[3, 4, 6, 7, 8] + 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
       (ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
         (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[3, 4, 6, 7, 8] + 
 int[1 + \[Tau], (log[(\[Tau]*ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
        ab[2, 3, 4, 5])/(ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*
        (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[3, 4, 7, 8]))]*log[(1 + \[Tau])/
       (\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
          ab[2, 3, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[3, 4, 6, 7, 8] + 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
        ab[2, 3, 4, 5])/((1 + \[Tau])*ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*
        ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
     log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
          ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[3, 4, 6, 7, 8] + 
 int[1 + \[Tau], (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/
       (ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
         (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[3, 4, 6, 7, 8] + 
 int[1 + \[Tau], (log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*
        ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/(ab[1, 2, 6, 7]*ab[2, 3, 5, 6]*
        ab[3, 4, 7, 8]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]*
     log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
          ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
         (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[3, 4, 6, 7, 8] + 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
        ab[2, 3, 4, 5]*ab[3, 4, 5, 6])/(ab[1, 2, 6, 7]*ab[1, 4, 5, 8]*
        ab[2, 3, 5, 6]*(\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))]*
     log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
          ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
         (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[3, 4, 6, 7, 8] + 
 int[1 + \[Tau], (log[(ab[1, 2, 7, 8]*ab[2, 3, 6, 7])/
       (ab[1, 2, 6, 7]*ab[2, 3, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[3, 4, 6, 7, 8] + 
 int[1 + \[Tau], (log[(ab[2, 3, 7, 8]*ab[3, 4, 6, 7])/
       (ab[2, 3, 6, 7]*ab[3, 4, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[3, 4, 6, 7, 8] + 
 int[1 + \[Tau], (log[(ab[3, 4, 7, 8]*ab[4, 5, 6, 7])/
       (ab[3, 4, 6, 7]*ab[4, 5, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[3, 4, 6, 7, 8] + 
 int[1 + \[Tau], (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/
       (ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[3, 4, 6, 7, 8] + 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[4, 5, 6, 7]*
        ab[5, 6, 7, 8])/(ab[1, 2, 6, 7]*ab[4, 5, 7, 8]*
        (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8]))]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[3, 4, 6, 7, 8] + 
 int[1 + \[Tau], (log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*
        ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[3, 4, 6, 7]*
        ab[4, 5, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]*
     log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
          ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[3, 4, 6, 7, 8] + 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
        ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[1, 5, 6, 8]*
        ab[3, 4, 6, 7]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]*
     log[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
          ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
         (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[3, 4, 6, 7, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[2, 6, 7, 8]*ab[3, 4, 7, 8])/
      (ab[2, 3, 7, 8]*(ab[1, 2, 4, 8]*ab[3, 6, 7, 8] - 
        ab[1, 2, 3, 8]*ab[4, 6, 7, 8])))/(1 + \[Tau]), 
   (-Li[1] + log[((1 + \[Tau])*ab[1, 2, 4, 5]*ab[2, 3, 7, 8])/
        (ab[1, 2, 7, 8]*ab[2, 3, 4, 5])]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[3, 4, 6, 7, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   (log[(ab[1, 2, 7, 8]*ab[3, 4, 6, 7])/(ab[1, 2, 6, 7]*ab[3, 4, 7, 8])]*
     log[1 + (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
         ab[5, 6, 7, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, cap[{3, 4}, {6, 7, 8}]]]*R[3, 4, 6, 7, 8] + 
 int[1 + \[Tau], (log[(ab[1, 2, 7, 8]*ab[3, 4, 6, 7])/
       (ab[1, 2, 6, 7]*ab[3, 4, 7, 8])]*
     log[1 + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(\[Tau]*ab[1, 5, 6, 8]*
         ab[2, 3, 7, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, cap[{3, 4}, {6, 7, 8}]]]*R[3, 4, 6, 7, 8] + 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[cap[{3, 4}, {6, 7, 8}], 2, 7, 8])/
      (ab[1, cap[{3, 4}, {6, 7, 8}], 2, 8]*ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (-Li[1] + log[((1 + \[Tau])*ab[1, 2, 4, 5]*ab[2, 3, 7, 8])/
        (ab[1, 2, 7, 8]*ab[2, 3, 4, 5])]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, cap[{3, 4}, {6, 7, 8}]]]*R[3, 4, 6, 7, 8] - 
 int[1 + \[Tau], 
   (-2*Li[(\[Tau]*(ab[1, 3, 4, 8]*ab[2, 3, 7, 8] - ab[1, 2, 3, 8]*
           ab[3, 4, 7, 8]))/(\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[3, 4, 7, 8])] + 
     2*Li[1 - (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
          ab[2, 3, 7, 8])] - log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
        (ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
      log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))] - 
     log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5])/
        (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
      log[(1 + \[Tau])/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))] - 
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))]*
      log[(1 + \[Tau])/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[3, 5, 6, 7, 8] - 
 int[1 + \[Tau], (log[((1 + \[Tau])*ab[1, 2, 4, 5]*ab[2, 3, 7, 8])/
       (ab[1, 2, 7, 8]*ab[2, 3, 4, 5])]*
     log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
          ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[3, 5, 6, 7, 8] - 
 int[1 + \[Tau], -Li[1] + Li[\[Tau]/(1 + \[Tau])]]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[4, 5, 6, 7, 8] - 
 int[1 + \[Tau], Li[(ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/
     ((1 + \[Tau])*ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[4, 5, 6, 7, 8] - 
 int[1 + \[Tau], -Li[(ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/
       (ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
    Li[(\[Tau]*ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/
      (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
        ab[3, 4, 7, 8])]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*
  R[4, 5, 6, 7, 8] - 
 int[1 + \[Tau], Li[(ab[1, 2, 3, 8]*ab[1, 5, 7, 8]*ab[4, 5, 6, 8])/
     (ab[1, 5, 6, 8]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
       ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*
  R[4, 5, 6, 7, 8] - 
 int[1 + \[Tau], Li[(ab[1, 2, 3, 8]*(ab[1, 4, 5, 8]*ab[3, 4, 7, 8] - 
       ab[1, 3, 4, 8]*ab[4, 5, 7, 8]))/(ab[1, 4, 5, 8]*
      (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
        ab[3, 4, 7, 8]))]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*
  R[4, 5, 6, 7, 8] - 
 int[1 + \[Tau], Li[(\[Tau]*ab[2, 3, 7, 8]*(ab[1, 4, 5, 8]*ab[3, 4, 7, 8] - 
        ab[1, 3, 4, 8]*ab[4, 5, 7, 8]))/(ab[3, 4, 7, 8]*
       (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
         ab[4, 5, 7, 8]))] - Li[1 - (ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/
       (ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*
  R[4, 5, 6, 7, 8] - 
 int[1 + \[Tau], -Li[(ab[1, 5, 7, 8]*ab[4, 5, 6, 8])/
       (ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
    Li[(\[Tau]*ab[1, 5, 7, 8]*ab[2, 3, 7, 8]*ab[4, 5, 6, 8])/
      (ab[4, 5, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
        ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*
  R[4, 5, 6, 7, 8] - 
 int[1 + \[Tau], Li[(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
     (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[4, 5, 6, 7, 8] - 
 int[1 + \[Tau], -(log[\[Tau]/(1 + \[Tau])]*log[1 + \[Tau]])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[4, 5, 6, 7, 8] - 
 int[1 + \[Tau], (log[\[Tau]/(1 + \[Tau])]*
     log[(ab[1, 2, 3, 4]*ab[1, 4, 5, 8])/(ab[1, 2, 4, 5]*ab[1, 3, 4, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[4, 5, 6, 7, 8] - 
 int[1 + \[Tau], (log[\[Tau]/(1 + \[Tau])]*
     log[(ab[1, 2, 4, 5]*ab[1, 5, 6, 8])/(ab[1, 2, 5, 6]*ab[1, 4, 5, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[4, 5, 6, 7, 8] - 
 int[1 + \[Tau], (log[\[Tau]/(1 + \[Tau])]*
     log[(ab[1, 2, 3, 4]*ab[1, 6, 7, 8])/(ab[1, 2, 6, 7]*ab[1, 3, 4, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[4, 5, 6, 7, 8] - 
 int[1 + \[Tau], (log[\[Tau]/(1 + \[Tau])]*
     log[(ab[1, 2, 5, 6]*ab[1, 6, 7, 8])/(ab[1, 2, 6, 7]*ab[1, 5, 6, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[4, 5, 6, 7, 8] - 
 int[1 + \[Tau], 
   (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
      log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))] + 
     log[(\[Tau]*ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5])/
        (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*(\[Tau]*ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))]*
      log[(1 + \[Tau])/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[4, 5, 6, 7, 8] - 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
        ab[2, 3, 4, 5])/((1 + \[Tau])*ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*
        ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
     log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
          ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[4, 5, 6, 7, 8] - 
 int[1 + \[Tau], 
   -Li[(\[Tau]*ab[2, 3, 7, 8]*(ab[1, 4, 5, 8]*ab[3, 4, 7, 8] - 
         ab[1, 3, 4, 8]*ab[4, 5, 7, 8]))/(ab[3, 4, 7, 8]*
        (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[4, 5, 7, 8]))] + Li[1 - (ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/
       (ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
    (log[(ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[3, 4, 5, 6])/
         (ab[1, 2, 6, 7]*ab[1, 4, 5, 8]*ab[2, 3, 5, 6]*ab[3, 4, 7, 8])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] - 
      log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 7, 8]*
          ab[3, 4, 5, 6])/(ab[1, 2, 6, 7]*ab[2, 3, 5, 6]*ab[3, 4, 7, 8]*
          (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
            ab[4, 5, 7, 8]))]*log[((\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
           ab[1, 2, 3, 8]*ab[3, 4, 7, 8])*ab[4, 5, 7, 8])/
         (ab[3, 4, 7, 8]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
           ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[4, 5, 6, 7, 8] - 
 int[1 + \[Tau], 
   (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
      log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
          (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))] + 
     log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 7, 8]*
         ab[3, 4, 5, 6])/(ab[1, 2, 6, 7]*ab[2, 3, 5, 6]*ab[3, 4, 7, 8]*
         (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8]))]*log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))/(\[Tau] + 
         (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))])/
    2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[4, 5, 6, 7, 8] - 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
        ab[2, 3, 4, 5]*ab[3, 4, 5, 6])/(ab[1, 2, 6, 7]*ab[1, 4, 5, 8]*
        ab[2, 3, 5, 6]*(\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))]*
     log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
          ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
         (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[4, 5, 6, 7, 8] - 
 int[1 + \[Tau], (log[(ab[1, 2, 7, 8]*ab[2, 3, 6, 7])/
       (ab[1, 2, 6, 7]*ab[2, 3, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[4, 5, 6, 7, 8] - 
 int[1 + \[Tau], (log[(ab[2, 3, 7, 8]*ab[3, 4, 6, 7])/
       (ab[2, 3, 6, 7]*ab[3, 4, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[4, 5, 6, 7, 8] - 
 int[1 + \[Tau], (log[(ab[3, 4, 7, 8]*ab[4, 5, 6, 7])/
       (ab[3, 4, 6, 7]*ab[4, 5, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[4, 5, 6, 7, 8] - 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[4, 5, 6, 7]*
        ab[5, 6, 7, 8])/(ab[1, 2, 6, 7]*ab[4, 5, 7, 8]*
        (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8]))]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[4, 5, 6, 7, 8] - 
 int[1 + \[Tau], 
   -(log[(ab[1, 2, 7, 8]*ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[4, 5, 7, 8])]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[4, 5, 6, 7, 8] - 
 int[1 + \[Tau], 
   (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
      log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))] + 
     log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6]*
         ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[3, 4, 6, 7]*ab[4, 5, 7, 8]*
         (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8]))]*log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
          (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))/(\[Tau] + 
         (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/
    2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[4, 5, 6, 7, 8] - 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
        ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[1, 5, 6, 8]*
        ab[3, 4, 6, 7]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]*
     log[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
          ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
         (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[4, 5, 6, 7, 8] - 
 int[(1 + \[Tau])/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
      (ab[1, 3, 4, 8]*ab[2, 3, 7, 8])), 
   (-Li[1] + log[((1 + \[Tau])*ab[1, 2, 4, 5]*ab[2, 3, 7, 8])/
        (ab[1, 2, 7, 8]*ab[2, 3, 4, 5])]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[4, 5, 6, 7, 8] - 
 int[(1 + \[Tau])/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
      (ab[1, 3, 4, 8]*ab[2, 3, 7, 8])), 
   (-Li[1] - log[((1 + \[Tau])*ab[1, 2, 3, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
        (ab[2, 3, 5, 6]*(\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))]*
      log[(ab[1, 2, 3, 4]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))/(ab[1, 2, 4, 5]*
         (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[3, 4, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*
  R[4, 5, 6, 7, 8] + int[\[Tau]/(1 + \[Tau]), 
   (log[1 + \[Tau]]*log[(ab[1, 2, 3, 4]*ab[1, 4, 5, 8])/
       (ab[1, 2, 4, 5]*ab[1, 3, 4, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 4]]*R[4, 5, 6, 7, 8] + 
 int[1 + \[Tau], (log[1 + \[Tau]^(-1)]*log[(ab[1, 2, 3, 4]*ab[1, 4, 5, 8])/
       (ab[1, 2, 4, 5]*ab[1, 3, 4, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 4]]*R[4, 5, 6, 7, 8] - 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 4]*ab[1, 4, 5, 8])/
       (ab[1, 2, 4, 5]*ab[1, 3, 4, 8])]*
     log[1 + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(\[Tau]*ab[1, 3, 4, 8]*
         ab[2, 3, 7, 8])])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 4]]*
  R[4, 5, 6, 7, 8] - 
 int[1 + \[Tau], Li[1 - (ab[1, 2, 3, 4]*ab[1, 4, 5, 8])/
       (ab[1, 2, 4, 5]*ab[1, 3, 4, 8])] - 
    Li[1 - (ab[1, 2, 3, 4]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))/(ab[1, 2, 4, 5]*
        (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[3, 4, 7, 8]))] + 
    (log[(ab[1, 2, 4, 5]*ab[2, 3, 5, 6]*(\[Tau]*ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))/
        (ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[3, 4, 5, 6])]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 4]]*R[4, 5, 6, 7, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[2, 4, 7, 8])/(ab[1, 2, 4, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   -Li[1 - (ab[1, 2, 3, 4]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))/(ab[1, 2, 4, 5]*
         (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[3, 4, 7, 8]))] - 
    (log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[3, 4, 5, 6])/
        (ab[1, 2, 4, 5]*ab[2, 3, 5, 6]*(\[Tau]*ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))]*
      log[(ab[1, 2, 3, 4]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))/(ab[1, 2, 4, 5]*
         (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[3, 4, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 4]]*
  R[4, 5, 6, 7, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
       ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[2, 4, 7, 8])/
      (ab[1, 2, 4, 8]*ab[2, 3, 7, 8])), 
   (-Li[1] + log[((1 + \[Tau])*ab[1, 2, 4, 5]*ab[2, 3, 7, 8])/
        (ab[1, 2, 7, 8]*ab[2, 3, 4, 5])]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 4]]*R[4, 5, 6, 7, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
       ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[2, 4, 7, 8])/
      (ab[1, 2, 4, 8]*ab[2, 3, 7, 8])), 
   (-Li[1] - log[((1 + \[Tau])*ab[1, 2, 3, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
        (ab[2, 3, 5, 6]*(\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))]*
      log[(ab[1, 2, 3, 4]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))/(ab[1, 2, 4, 5]*
         (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[3, 4, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 4]]*
  R[4, 5, 6, 7, 8] - int[1 + \[Tau], -Li[1] + Li[\[Tau]/(1 + \[Tau])]]*
  Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 4]]*R[4, 5, 6, 7, 8] - 
 int[1 + \[Tau], Li[(ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/
     ((1 + \[Tau])*ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]]*
  Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 4]]*R[4, 5, 6, 7, 8] - 
 int[1 + \[Tau], -Li[(ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/
       (ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
    Li[(\[Tau]*ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/
      (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
        ab[3, 4, 7, 8])]]*Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 4]]*
  R[4, 5, 6, 7, 8] - 
 int[1 + \[Tau], Li[(ab[1, 2, 3, 8]*ab[1, 5, 7, 8]*ab[4, 5, 6, 8])/
     (ab[1, 5, 6, 8]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
       ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]]*Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 4]]*
  R[4, 5, 6, 7, 8] - 
 int[1 + \[Tau], Li[(ab[1, 2, 3, 8]*(ab[1, 4, 5, 8]*ab[3, 4, 7, 8] - 
       ab[1, 3, 4, 8]*ab[4, 5, 7, 8]))/(ab[1, 4, 5, 8]*
      (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
        ab[3, 4, 7, 8]))]]*Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 4]]*
  R[4, 5, 6, 7, 8] - 
 int[1 + \[Tau], Li[(\[Tau]*ab[2, 3, 7, 8]*(ab[1, 4, 5, 8]*ab[3, 4, 7, 8] - 
        ab[1, 3, 4, 8]*ab[4, 5, 7, 8]))/(ab[3, 4, 7, 8]*
       (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
         ab[4, 5, 7, 8]))] - Li[1 - (ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/
       (ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]]*Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 4]]*
  R[4, 5, 6, 7, 8] - 
 int[1 + \[Tau], -Li[(ab[1, 5, 7, 8]*ab[4, 5, 6, 8])/
       (ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
    Li[(\[Tau]*ab[1, 5, 7, 8]*ab[2, 3, 7, 8]*ab[4, 5, 6, 8])/
      (ab[4, 5, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
        ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]]*Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 4]]*
  R[4, 5, 6, 7, 8] - 
 int[1 + \[Tau], Li[(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
     (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]]*
  Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 4]]*R[4, 5, 6, 7, 8] - 
 int[1 + \[Tau], -(log[\[Tau]/(1 + \[Tau])]*log[1 + \[Tau]])/2]*
  Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 4]]*R[4, 5, 6, 7, 8] - 
 int[1 + \[Tau], (log[\[Tau]/(1 + \[Tau])]*
     log[(ab[1, 2, 3, 4]*ab[1, 4, 5, 8])/(ab[1, 2, 4, 5]*ab[1, 3, 4, 8])])/2]*
  Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 4]]*R[4, 5, 6, 7, 8] - 
 int[1 + \[Tau], (log[\[Tau]/(1 + \[Tau])]*
     log[(ab[1, 2, 4, 5]*ab[1, 5, 6, 8])/(ab[1, 2, 5, 6]*ab[1, 4, 5, 8])])/2]*
  Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 4]]*R[4, 5, 6, 7, 8] - 
 int[1 + \[Tau], (log[\[Tau]/(1 + \[Tau])]*
     log[(ab[1, 2, 3, 4]*ab[1, 6, 7, 8])/(ab[1, 2, 6, 7]*ab[1, 3, 4, 8])])/2]*
  Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 4]]*R[4, 5, 6, 7, 8] - 
 int[1 + \[Tau], (log[\[Tau]/(1 + \[Tau])]*
     log[(ab[1, 2, 5, 6]*ab[1, 6, 7, 8])/(ab[1, 2, 6, 7]*ab[1, 5, 6, 8])])/2]*
  Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 4]]*R[4, 5, 6, 7, 8] - 
 int[1 + \[Tau], 
   (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
      log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))] + 
     log[(\[Tau]*ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5])/
        (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*(\[Tau]*ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))]*
      log[(1 + \[Tau])/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 4]]*R[4, 5, 6, 7, 8] - 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
        ab[2, 3, 4, 5])/((1 + \[Tau])*ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*
        ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
     log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
          ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 4]]*R[4, 5, 6, 7, 8] - 
 int[1 + \[Tau], 
   -Li[(\[Tau]*ab[2, 3, 7, 8]*(ab[1, 4, 5, 8]*ab[3, 4, 7, 8] - 
         ab[1, 3, 4, 8]*ab[4, 5, 7, 8]))/(ab[3, 4, 7, 8]*
        (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[4, 5, 7, 8]))] + Li[1 - (ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/
       (ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
    (log[(ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[3, 4, 5, 6])/
         (ab[1, 2, 6, 7]*ab[1, 4, 5, 8]*ab[2, 3, 5, 6]*ab[3, 4, 7, 8])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] - 
      log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 7, 8]*
          ab[3, 4, 5, 6])/(ab[1, 2, 6, 7]*ab[2, 3, 5, 6]*ab[3, 4, 7, 8]*
          (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
            ab[4, 5, 7, 8]))]*log[((\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
           ab[1, 2, 3, 8]*ab[3, 4, 7, 8])*ab[4, 5, 7, 8])/
         (ab[3, 4, 7, 8]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
           ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 4]]*R[4, 5, 6, 7, 8] - 
 int[1 + \[Tau], 
   (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
      log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
          (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))] + 
     log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 7, 8]*
         ab[3, 4, 5, 6])/(ab[1, 2, 6, 7]*ab[2, 3, 5, 6]*ab[3, 4, 7, 8]*
         (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8]))]*log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))/(\[Tau] + 
         (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))])/
    2]*Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 4]]*R[4, 5, 6, 7, 8] - 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
        ab[2, 3, 4, 5]*ab[3, 4, 5, 6])/(ab[1, 2, 6, 7]*ab[1, 4, 5, 8]*
        ab[2, 3, 5, 6]*(\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))]*
     log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
          ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
         (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 4]]*R[4, 5, 6, 7, 8] - 
 int[1 + \[Tau], (log[(ab[1, 2, 7, 8]*ab[2, 3, 6, 7])/
       (ab[1, 2, 6, 7]*ab[2, 3, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 4]]*R[4, 5, 6, 7, 8] - 
 int[1 + \[Tau], (log[(ab[2, 3, 7, 8]*ab[3, 4, 6, 7])/
       (ab[2, 3, 6, 7]*ab[3, 4, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 4]]*R[4, 5, 6, 7, 8] - 
 int[1 + \[Tau], (log[(ab[3, 4, 7, 8]*ab[4, 5, 6, 7])/
       (ab[3, 4, 6, 7]*ab[4, 5, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 4]]*R[4, 5, 6, 7, 8] - 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[4, 5, 6, 7]*
        ab[5, 6, 7, 8])/(ab[1, 2, 6, 7]*ab[4, 5, 7, 8]*
        (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8]))]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 4]]*R[4, 5, 6, 7, 8] - 
 int[1 + \[Tau], 
   -(log[(ab[1, 2, 7, 8]*ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[4, 5, 7, 8])]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 4]]*R[4, 5, 6, 7, 8] - 
 int[1 + \[Tau], 
   (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
      log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))] + 
     log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6]*
         ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[3, 4, 6, 7]*ab[4, 5, 7, 8]*
         (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8]))]*log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
          (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))/(\[Tau] + 
         (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/
    2]*Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 4]]*R[4, 5, 6, 7, 8] - 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
        ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[1, 5, 6, 8]*
        ab[3, 4, 6, 7]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]*
     log[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
          ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
         (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 4]]*R[4, 5, 6, 7, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), Li[\[Tau]/(1 + \[Tau])]]*
  Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 4]]*R[4, 5, 6, 7, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   Li[(ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/((1 + \[Tau])*ab[1, 3, 4, 8]*
      ab[2, 3, 7, 8])]]*Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 4]]*
  R[4, 5, 6, 7, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   Li[(\[Tau]*ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/
     (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[3, 4, 7, 8])]]*
  Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 4]]*R[4, 5, 6, 7, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   Li[(ab[1, 2, 3, 8]*ab[1, 5, 7, 8]*ab[4, 5, 6, 8])/
     (ab[1, 5, 6, 8]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
       ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]]*Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 4]]*
  R[4, 5, 6, 7, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   Li[(ab[1, 2, 3, 8]*(ab[1, 4, 5, 8]*ab[3, 4, 7, 8] - 
       ab[1, 3, 4, 8]*ab[4, 5, 7, 8]))/(ab[1, 4, 5, 8]*
      (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
        ab[3, 4, 7, 8]))]]*Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 4]]*
  R[4, 5, 6, 7, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   Li[(\[Tau]*ab[2, 3, 7, 8]*(ab[1, 4, 5, 8]*ab[3, 4, 7, 8] - 
       ab[1, 3, 4, 8]*ab[4, 5, 7, 8]))/(ab[3, 4, 7, 8]*
      (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
        ab[4, 5, 7, 8]))]]*Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 4]]*
  R[4, 5, 6, 7, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   Li[(\[Tau]*ab[1, 5, 7, 8]*ab[2, 3, 7, 8]*ab[4, 5, 6, 8])/
     (ab[4, 5, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
       ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]]*Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 4]]*
  R[4, 5, 6, 7, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   Li[(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
      ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]]*Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 4]]*
  R[4, 5, 6, 7, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   -(log[1 + \[Tau]]*log[(\[Tau]*ab[1, 2, 3, 4]*ab[1, 6, 7, 8])/
        ((1 + \[Tau])*ab[1, 2, 6, 7]*ab[1, 3, 4, 8])])/2]*
  Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 4]]*R[4, 5, 6, 7, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (log[(ab[1, 2, 3, 4]*ab[1, 4, 5, 8])/(ab[1, 2, 4, 5]*ab[1, 3, 4, 8])]*
     log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[3, 4, 5, 6])/
       ((1 + \[Tau])*ab[1, 2, 4, 5]*ab[1, 3, 4, 8]*ab[2, 3, 5, 6]*
        ab[2, 3, 7, 8])])/2]*Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 4]]*
  R[4, 5, 6, 7, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (log[(\[Tau]*ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5])/
       (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*(\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))]*
     log[((1 + \[Tau])*ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
       (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
         ab[3, 4, 7, 8])])/2]*Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 4]]*
  R[4, 5, 6, 7, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5])/
       ((1 + \[Tau])*ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*ab[1, 3, 4, 8]*
        ab[2, 3, 7, 8])]*log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
         (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 4]]*R[4, 5, 6, 7, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (log[(ab[1, 2, 4, 5]*ab[1, 5, 6, 8])/(ab[1, 2, 5, 6]*ab[1, 4, 5, 8])]*
     log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
       ((1 + \[Tau])*ab[1, 2, 5, 6]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8]*
        ab[3, 4, 6, 7])])/2]*Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 4]]*
  R[4, 5, 6, 7, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 7, 8]*
        ab[3, 4, 5, 6])/(ab[1, 2, 6, 7]*ab[2, 3, 5, 6]*ab[3, 4, 7, 8]*
        (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[4, 5, 7, 8]))]*log[((\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[3, 4, 7, 8])*ab[4, 5, 7, 8])/
       (ab[3, 4, 7, 8]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 4]]*R[4, 5, 6, 7, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   -Li[(\[Tau]*ab[2, 3, 7, 8]*(ab[1, 4, 5, 8]*ab[3, 4, 7, 8] - 
         ab[1, 3, 4, 8]*ab[4, 5, 7, 8]))/(ab[3, 4, 7, 8]*
        (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[4, 5, 7, 8]))] - 
    (log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 7, 8]*
         ab[3, 4, 5, 6])/(ab[1, 2, 6, 7]*ab[2, 3, 5, 6]*ab[3, 4, 7, 8]*
         (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8]))]*log[((\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[3, 4, 7, 8])*ab[4, 5, 7, 8])/
        (ab[3, 4, 7, 8]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 4]]*R[4, 5, 6, 7, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*
        ab[3, 4, 5, 6])/(ab[1, 2, 6, 7]*ab[1, 4, 5, 8]*ab[2, 3, 5, 6]*
        (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[3, 4, 7, 8]))]*log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
         (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))/(\[Tau] + 
        (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 4]]*R[4, 5, 6, 7, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (log[(ab[1, 2, 5, 6]*ab[1, 6, 7, 8])/(ab[1, 2, 6, 7]*ab[1, 5, 6, 8])]*
     log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])/
       ((1 + \[Tau])*ab[1, 2, 6, 7]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8]*
        ab[4, 5, 7, 8])])/2]*Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 4]]*
  R[4, 5, 6, 7, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (log[(ab[1, 2, 7, 8]*ab[2, 3, 6, 7])/(ab[1, 2, 6, 7]*ab[2, 3, 7, 8])]*
     log[(\[Tau]*ab[1, 2, 3, 4]*ab[1, 2, 3, 8]*ab[1, 6, 7, 8]*ab[5, 6, 7, 8])/
       (ab[1, 2, 6, 7]*ab[1, 3, 4, 8]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 4]]*R[4, 5, 6, 7, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (log[(ab[2, 3, 7, 8]*ab[3, 4, 6, 7])/(ab[2, 3, 6, 7]*ab[3, 4, 7, 8])]*
     log[(\[Tau]*ab[1, 2, 3, 4]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 7, 8]*
        ab[5, 6, 7, 8])/(ab[1, 2, 4, 5]*ab[2, 3, 6, 7]*ab[3, 4, 7, 8]*
        (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 4]]*
  R[4, 5, 6, 7, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (log[(ab[3, 4, 7, 8]*ab[4, 5, 6, 7])/(ab[3, 4, 6, 7]*ab[4, 5, 7, 8])]*
     log[(\[Tau]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6]*
        ab[5, 6, 7, 8])/(ab[2, 3, 5, 6]*ab[3, 4, 6, 7]*ab[4, 5, 7, 8]*
        (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 4]]*
  R[4, 5, 6, 7, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6]*
        ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[3, 4, 6, 7]*ab[4, 5, 7, 8]*
        (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8]))]*log[((\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[4, 5, 7, 8])*ab[5, 6, 7, 8])/
       (ab[4, 5, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 4]]*R[4, 5, 6, 7, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (-Li[1] - log[(ab[1, 2, 7, 8]*ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*
         ab[4, 5, 7, 8])]*log[((\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[4, 5, 7, 8])*ab[5, 6, 7, 8])/
        (ab[4, 5, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 4]]*R[4, 5, 6, 7, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])/
       (ab[1, 2, 6, 7]*ab[4, 5, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 4]]*R[4, 5, 6, 7, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[3, 4, 5, 6]*
        ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[1, 5, 6, 8]*ab[3, 4, 6, 7]*
        (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[4, 5, 7, 8]))]*log[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))/(\[Tau] + 
        (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 4]]*R[4, 5, 6, 7, 8] + 
 intdone[log[(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
      ab[3, 4, 7, 8])], Li[1]/2 + Li[(ab[1, 2, 4, 8]*ab[1, 3, 4, 5])/
      (ab[1, 2, 4, 5]*ab[1, 3, 4, 8])] + 
    Li[(ab[1, 2, 5, 8]*ab[1, 4, 5, 6])/(ab[1, 2, 5, 6]*ab[1, 4, 5, 8])] + 
    Li[(ab[1, 2, 6, 8]*ab[1, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[1, 5, 6, 8])] + 
    Li[(ab[1, 2, 3, 5]*ab[2, 4, 5, 6])/(ab[1, 2, 4, 5]*ab[2, 3, 5, 6])] + 
    Li[(ab[1, 2, 3, 6]*ab[2, 5, 6, 7])/(ab[1, 2, 5, 6]*ab[2, 3, 6, 7])] + 
    Li[(ab[1, 2, 3, 7]*ab[2, 6, 7, 8])/(ab[1, 2, 6, 7]*ab[2, 3, 7, 8])] + 
    Li[(ab[2, 3, 4, 6]*ab[3, 5, 6, 7])/(ab[2, 3, 5, 6]*ab[3, 4, 6, 7])] + 
    Li[(ab[2, 3, 4, 7]*ab[3, 6, 7, 8])/(ab[2, 3, 6, 7]*ab[3, 4, 7, 8])] + 
    Li[(ab[3, 4, 5, 7]*ab[4, 6, 7, 8])/(ab[3, 4, 6, 7]*ab[4, 5, 7, 8])] + 
    (log[(ab[1, 2, 5, 6]*ab[2, 3, 4, 5])/(ab[1, 2, 4, 5]*ab[2, 3, 5, 6])]*
      log[(ab[1, 2, 3, 4]*ab[1, 2, 3, 8]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
        (ab[1, 2, 4, 5]*ab[1, 3, 4, 8]*ab[2, 3, 5, 6]*ab[3, 4, 6, 7])])/2 - 
    (log[(ab[3, 4, 7, 8]*ab[4, 5, 6, 7])/(ab[3, 4, 6, 7]*ab[4, 5, 7, 8])]*
      log[(ab[2, 3, 4, 5]*ab[5, 6, 7, 8])/(ab[2, 3, 5, 6]*ab[4, 5, 7, 8])])/
     2 + (log[(ab[1, 2, 6, 7]*ab[2, 3, 5, 6])/(ab[1, 2, 5, 6]*
         ab[2, 3, 6, 7])]*log[(ab[1, 2, 3, 4]*ab[1, 2, 3, 8]*ab[4, 5, 6, 7]*
         ab[5, 6, 7, 8])/(ab[1, 2, 5, 6]*ab[1, 3, 4, 8]*ab[2, 3, 6, 7]*
         ab[4, 5, 7, 8])])/2 + 
    (log[(ab[2, 3, 6, 7]*ab[3, 4, 5, 6])/(ab[2, 3, 5, 6]*ab[3, 4, 6, 7])]*
      log[(ab[1, 2, 3, 4]*ab[2, 3, 4, 5]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])/
        (ab[1, 2, 4, 5]*ab[2, 3, 5, 6]*ab[3, 4, 6, 7]*ab[4, 5, 7, 8])])/2]*
  Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 4]]*R[4, 5, 6, 7, 8] + 
 int[\[Tau]/(1 + \[Tau]), Li[\[Tau]/(1 + \[Tau])]]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[4, 5, 6, 7, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   -Li[(ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
    Li[(ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/((1 + \[Tau])*ab[1, 3, 4, 8]*
       ab[2, 3, 7, 8])]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[4, 5, 6, 7, 8] + int[\[Tau]/(1 + \[Tau]), 
   Li[(\[Tau]*ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/
     (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[3, 4, 7, 8])]]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[4, 5, 6, 7, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   -Li[(ab[1, 5, 7, 8]*ab[4, 5, 6, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
    Li[(ab[1, 2, 3, 8]*ab[1, 5, 7, 8]*ab[4, 5, 6, 8])/
      (ab[1, 5, 6, 8]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
        ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[4, 5, 6, 7, 8] + int[\[Tau]/(1 + \[Tau]), 
   Li[(\[Tau]*ab[2, 3, 7, 8]*(ab[1, 4, 5, 8]*ab[3, 4, 7, 8] - 
       ab[1, 3, 4, 8]*ab[4, 5, 7, 8]))/(ab[3, 4, 7, 8]*
      (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
        ab[4, 5, 7, 8]))]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[4, 5, 6, 7, 8] + int[\[Tau]/(1 + \[Tau]), 
   Li[(ab[1, 2, 3, 8]*(ab[1, 4, 5, 8]*ab[3, 4, 7, 8] - 
        ab[1, 3, 4, 8]*ab[4, 5, 7, 8]))/(ab[1, 4, 5, 8]*
       (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
         ab[3, 4, 7, 8]))] - Li[1 - (ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/
       (ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[4, 5, 6, 7, 8] + int[\[Tau]/(1 + \[Tau]), 
   Li[(\[Tau]*ab[1, 5, 7, 8]*ab[2, 3, 7, 8]*ab[4, 5, 6, 8])/
     (ab[4, 5, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
       ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[4, 5, 6, 7, 8] + int[\[Tau]/(1 + \[Tau]), 
   -Li[1] + Li[(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
      (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
        ab[5, 6, 7, 8])]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[4, 5, 6, 7, 8] + int[\[Tau]/(1 + \[Tau]), 
   -(log[1 + \[Tau]]*log[(ab[1, 2, 3, 4]*ab[1, 4, 5, 8])/
        (ab[1, 2, 4, 5]*ab[1, 3, 4, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[4, 5, 6, 7, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   -(log[1 + \[Tau]]*log[(ab[1, 2, 4, 5]*ab[1, 5, 6, 8])/
        (ab[1, 2, 5, 6]*ab[1, 4, 5, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[4, 5, 6, 7, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   (log[1 + \[Tau]]*log[((1 + \[Tau]^(-1))*ab[1, 2, 6, 7]*ab[1, 3, 4, 8])/
       (ab[1, 2, 3, 4]*ab[1, 6, 7, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[4, 5, 6, 7, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   -(log[1 + \[Tau]]*log[(ab[1, 2, 5, 6]*ab[1, 6, 7, 8])/
        (ab[1, 2, 6, 7]*ab[1, 5, 6, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[4, 5, 6, 7, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   (log[(\[Tau]*ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5])/
       (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*(\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))]*
     log[((1 + \[Tau])*ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
       (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
         ab[3, 4, 7, 8])])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[4, 5, 6, 7, 8] + int[\[Tau]/(1 + \[Tau]), 
   (log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5])/
        (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
      log[(1 + (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[3, 4, 7, 8]))/(1 + \[Tau])] - log[1 + \[Tau]]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[4, 5, 6, 7, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   (log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 7, 8]*
        ab[3, 4, 5, 6])/(ab[1, 2, 6, 7]*ab[2, 3, 5, 6]*ab[3, 4, 7, 8]*
        (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[4, 5, 7, 8]))]*log[((\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[3, 4, 7, 8])*ab[4, 5, 7, 8])/
       (ab[3, 4, 7, 8]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[4, 5, 6, 7, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   (-(log[(ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[3, 4, 5, 6])/
         (ab[1, 2, 6, 7]*ab[1, 4, 5, 8]*ab[2, 3, 5, 6]*ab[3, 4, 7, 8])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
          ab[3, 4, 7, 8])]) + 
     log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*
         ab[3, 4, 5, 6])/(ab[1, 2, 6, 7]*ab[1, 4, 5, 8]*ab[2, 3, 5, 6]*
         (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[3, 4, 7, 8]))]*log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
          (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))/(\[Tau] + 
         (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))])/
    2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[4, 5, 6, 7, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   -(log[(ab[1, 2, 7, 8]*ab[2, 3, 6, 7])/(ab[1, 2, 6, 7]*ab[2, 3, 7, 8])]*
      log[1 + (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8])])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[4, 5, 6, 7, 8] + int[\[Tau]/(1 + \[Tau]), 
   -(log[(ab[2, 3, 7, 8]*ab[3, 4, 6, 7])/(ab[2, 3, 6, 7]*ab[3, 4, 7, 8])]*
      log[1 + (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8])])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[4, 5, 6, 7, 8] + int[\[Tau]/(1 + \[Tau]), 
   -(log[(ab[3, 4, 7, 8]*ab[4, 5, 6, 7])/(ab[3, 4, 6, 7]*ab[4, 5, 7, 8])]*
      log[1 + (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8])])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[4, 5, 6, 7, 8] + int[\[Tau]/(1 + \[Tau]), 
   (log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6]*
        ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[3, 4, 6, 7]*ab[4, 5, 7, 8]*
        (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8]))]*log[((\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[4, 5, 7, 8])*ab[5, 6, 7, 8])/
       (ab[4, 5, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[4, 5, 6, 7, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   (-(log[(ab[1, 2, 7, 8]*ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[4, 5, 7, 8])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8])]) + log[\[Tau]]*log[(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
        (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8])] + 
     log[(ab[1, 2, 6, 7]*ab[4, 5, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*
           ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))/
        (ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])]*
      log[\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
          ab[2, 3, 7, 8])])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[4, 5, 6, 7, 8] + int[\[Tau]/(1 + \[Tau]), 
   (-(log[(ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
         (ab[1, 2, 6, 7]*ab[1, 5, 6, 8]*ab[3, 4, 6, 7]*ab[4, 5, 7, 8])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
          ab[4, 5, 7, 8])]) + 
     log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[3, 4, 5, 6]*
         ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[1, 5, 6, 8]*ab[3, 4, 6, 7]*
         (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8]))]*log[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))/(\[Tau] + 
         (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))])/
    2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[4, 5, 6, 7, 8] + 
 int[1 + \[Tau], -Li[1] + Li[\[Tau]/(1 + \[Tau])]]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[4, 5, 6, 7, 8] + 
 int[1 + \[Tau], Li[(ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/
     ((1 + \[Tau])*ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[4, 5, 6, 7, 8] + 
 int[1 + \[Tau], -Li[(ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/
       (ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
    Li[(\[Tau]*ab[1, 3, 7, 8]*ab[2, 3, 4, 8])/
      (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
        ab[3, 4, 7, 8])]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[4, 5, 6, 7, 8] + 
 int[1 + \[Tau], Li[(ab[1, 2, 3, 8]*ab[1, 5, 7, 8]*ab[4, 5, 6, 8])/
     (ab[1, 5, 6, 8]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
       ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[4, 5, 6, 7, 8] + 
 int[1 + \[Tau], Li[(ab[1, 2, 3, 8]*(ab[1, 4, 5, 8]*ab[3, 4, 7, 8] - 
       ab[1, 3, 4, 8]*ab[4, 5, 7, 8]))/(ab[1, 4, 5, 8]*
      (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
        ab[3, 4, 7, 8]))]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[4, 5, 6, 7, 8] + 
 int[1 + \[Tau], Li[(\[Tau]*ab[2, 3, 7, 8]*(ab[1, 4, 5, 8]*ab[3, 4, 7, 8] - 
        ab[1, 3, 4, 8]*ab[4, 5, 7, 8]))/(ab[3, 4, 7, 8]*
       (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
         ab[4, 5, 7, 8]))] - Li[1 - (ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/
       (ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[4, 5, 6, 7, 8] + 
 int[1 + \[Tau], -Li[(ab[1, 5, 7, 8]*ab[4, 5, 6, 8])/
       (ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
    Li[(\[Tau]*ab[1, 5, 7, 8]*ab[2, 3, 7, 8]*ab[4, 5, 6, 8])/
      (ab[4, 5, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
        ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[4, 5, 6, 7, 8] + 
 int[1 + \[Tau], Li[(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
     (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[4, 5, 6, 7, 8] + 
 int[1 + \[Tau], (log[\[Tau]/(1 + \[Tau])]*
     log[(ab[1, 2, 3, 4]*ab[1, 4, 5, 8])/(ab[1, 2, 4, 5]*ab[1, 3, 4, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[4, 5, 6, 7, 8] + 
 int[1 + \[Tau], (log[\[Tau]/(1 + \[Tau])]*
     log[(ab[1, 2, 4, 5]*ab[1, 5, 6, 8])/(ab[1, 2, 5, 6]*ab[1, 4, 5, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[4, 5, 6, 7, 8] + 
 int[1 + \[Tau], -(log[\[Tau]/(1 + \[Tau])]*
      log[((1 + \[Tau])*ab[1, 2, 6, 7]*ab[1, 3, 4, 8])/
        (ab[1, 2, 3, 4]*ab[1, 6, 7, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[4, 5, 6, 7, 8] + 
 int[1 + \[Tau], (log[\[Tau]/(1 + \[Tau])]*
     log[(ab[1, 2, 5, 6]*ab[1, 6, 7, 8])/(ab[1, 2, 6, 7]*ab[1, 5, 6, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[4, 5, 6, 7, 8] + 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
       (ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
         (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[4, 5, 6, 7, 8] + 
 int[1 + \[Tau], (log[(\[Tau]*ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
        ab[2, 3, 4, 5])/(ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*
        (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[3, 4, 7, 8]))]*log[(1 + \[Tau])/
       (\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
          ab[2, 3, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  R[4, 5, 6, 7, 8] + 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
        ab[2, 3, 4, 5])/((1 + \[Tau])*ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*
        ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
     log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
          ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[4, 5, 6, 7, 8] + 
 int[1 + \[Tau], (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/
       (ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
         (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[4, 5, 6, 7, 8] + 
 int[1 + \[Tau], (log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*
        ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/(ab[1, 2, 6, 7]*ab[2, 3, 5, 6]*
        ab[3, 4, 7, 8]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]*
     log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
          ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
         (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[4, 5, 6, 7, 8] + 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
        ab[2, 3, 4, 5]*ab[3, 4, 5, 6])/(ab[1, 2, 6, 7]*ab[1, 4, 5, 8]*
        ab[2, 3, 5, 6]*(\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))]*
     log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
          ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
         (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[4, 5, 6, 7, 8] + 
 int[1 + \[Tau], (log[(ab[1, 2, 7, 8]*ab[2, 3, 6, 7])/
       (ab[1, 2, 6, 7]*ab[2, 3, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[4, 5, 6, 7, 8] + 
 int[1 + \[Tau], (log[(ab[2, 3, 7, 8]*ab[3, 4, 6, 7])/
       (ab[2, 3, 6, 7]*ab[3, 4, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[4, 5, 6, 7, 8] + 
 int[1 + \[Tau], (log[(ab[3, 4, 7, 8]*ab[4, 5, 6, 7])/
       (ab[3, 4, 6, 7]*ab[4, 5, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[4, 5, 6, 7, 8] + 
 int[1 + \[Tau], (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/
       (ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[4, 5, 6, 7, 8] + 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[4, 5, 6, 7]*
        ab[5, 6, 7, 8])/(ab[1, 2, 6, 7]*ab[4, 5, 7, 8]*
        (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8]))]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[4, 5, 6, 7, 8] + 
 int[1 + \[Tau], (log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*
        ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[3, 4, 6, 7]*
        ab[4, 5, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]*
     log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
          ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[4, 5, 6, 7, 8] + 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 8]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
        ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[1, 5, 6, 8]*
        ab[3, 4, 6, 7]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
         ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]*
     log[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
          ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
         (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[4, 5, 6, 7, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[2, 6, 7, 8]*ab[4, 5, 7, 8])/
      (ab[2, 3, 7, 8]*(ab[1, 2, 5, 8]*ab[4, 6, 7, 8] - 
        ab[1, 2, 4, 8]*ab[5, 6, 7, 8])))/
    (\[Tau] + (ab[1, 2, 3, 8]*ab[2, 4, 7, 8])/(ab[1, 2, 4, 8]*
       ab[2, 3, 7, 8])), 
   -Li[1 - (ab[1, 2, 7, 8]*ab[2, 3, 4, 5])/((1 + \[Tau])*ab[1, 2, 4, 5]*
         ab[2, 3, 7, 8])] + 
    (log[((1 + \[Tau])*ab[1, 2, 4, 5]*ab[2, 3, 7, 8])/
        (ab[1, 2, 7, 8]*ab[2, 3, 4, 5])]*
      log[(ab[1, 2, 3, 4]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))/((1 + \[Tau])*ab[1, 2, 4, 5]*
         ab[1, 3, 4, 8]*ab[2, 3, 7, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*R[4, 5, 6, 7, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 6, 7, 8]*ab[4, 5, 7, 8])/
      (ab[2, 3, 7, 8]*(ab[1, 3, 5, 8]*ab[4, 6, 7, 8] - 
        ab[1, 3, 4, 8]*ab[5, 6, 7, 8])))/
    (\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
       ab[2, 3, 7, 8])), 
   -Li[(1 - (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))/
       (1 + \[Tau])] + 
    (log[((1 + \[Tau])*ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*ab[1, 3, 4, 8]*
         ab[2, 3, 7, 8])/(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
         ab[2, 3, 4, 5])]*log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 6]]*R[4, 5, 6, 7, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 6, 7, 8]*ab[4, 5, 7, 8])/
      (ab[2, 3, 7, 8]*(ab[1, 3, 5, 8]*ab[4, 6, 7, 8] - 
        ab[1, 3, 4, 8]*ab[5, 6, 7, 8])))/
    (\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
       ab[2, 3, 7, 8])), 
   (-Li[1] - log[((1 + \[Tau])*ab[1, 2, 3, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
        (ab[2, 3, 5, 6]*(\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))]*
      log[(ab[1, 2, 3, 4]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))/(ab[1, 2, 4, 5]*
         (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[3, 4, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 6]]*
  R[4, 5, 6, 7, 8] + int[\[Tau]/(1 + \[Tau]), 
   (log[(ab[1, 2, 7, 8]*ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[4, 5, 7, 8])]*
     log[1 + (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
         ab[5, 6, 7, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, cap[{4, 5}, {6, 7, 8}]]]*R[4, 5, 6, 7, 8] + 
 int[1 + \[Tau], (log[(ab[1, 2, 7, 8]*ab[4, 5, 6, 7])/
       (ab[1, 2, 6, 7]*ab[4, 5, 7, 8])]*
     log[1 + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(\[Tau]*ab[1, 5, 6, 8]*
         ab[2, 3, 7, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, cap[{4, 5}, {6, 7, 8}]]]*R[4, 5, 6, 7, 8] + 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[cap[{4, 5}, {6, 7, 8}], 2, 7, 8])/
      (ab[1, cap[{4, 5}, {6, 7, 8}], 2, 8]*ab[2, 3, 7, 8]))/
    (\[Tau] + (ab[1, 2, 3, 8]*ab[2, 4, 7, 8])/(ab[1, 2, 4, 8]*
       ab[2, 3, 7, 8])), 
   -Li[1 - (ab[1, 2, 7, 8]*ab[2, 3, 4, 5])/((1 + \[Tau])*ab[1, 2, 4, 5]*
         ab[2, 3, 7, 8])] + 
    (log[((1 + \[Tau])*ab[1, 2, 4, 5]*ab[2, 3, 7, 8])/
        (ab[1, 2, 7, 8]*ab[2, 3, 4, 5])]*
      log[(ab[1, 2, 3, 4]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))/((1 + \[Tau])*ab[1, 2, 4, 5]*
         ab[1, 3, 4, 8]*ab[2, 3, 7, 8])])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, cap[{4, 5}, {6, 7, 8}]]]*R[4, 5, 6, 7, 8] + 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[cap[{4, 5}, {6, 7, 8}], 3, 7, 8])/
      (ab[1, cap[{4, 5}, {6, 7, 8}], 3, 8]*ab[2, 3, 7, 8]))/
    (\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
       ab[2, 3, 7, 8])), 
   -Li[(1 - (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))/
       (1 + \[Tau])] + 
    (log[((1 + \[Tau])*ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*ab[1, 3, 4, 8]*
         ab[2, 3, 7, 8])/(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*
         ab[2, 3, 4, 5])]*log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, cap[{4, 5}, {6, 7, 8}]]]*R[4, 5, 6, 7, 8] + 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[cap[{4, 5}, {6, 7, 8}], 3, 7, 8])/
      (ab[1, cap[{4, 5}, {6, 7, 8}], 3, 8]*ab[2, 3, 7, 8]))/
    (\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
       ab[2, 3, 7, 8])), 
   (-Li[1] - log[((1 + \[Tau])*ab[1, 2, 3, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
        (ab[2, 3, 5, 6]*(\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))]*
      log[(ab[1, 2, 3, 4]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))/(ab[1, 2, 4, 5]*
         (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[3, 4, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, cap[{4, 5}, {6, 7, 8}]]]*R[4, 5, 6, 7, 8] + 
 Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*
  (intdone[-(Li[1]*log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]) - 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[4, 5, 2, 3]*ab[5, 6, 1, 2])/(ab[4, 5, 1, 2]*ab[5, 6, 2, 3])]*
        log[(ab[1, 2, 3, 4]*ab[4, 5, 6, 7])/(ab[4, 5, 1, 2]*ab[6, 7, 3, 4])])/
       2 - (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]*log[(ab[5, 6, 3, 4]*ab[6, 7, 1, 2])/
          (ab[5, 6, 1, 2]*ab[6, 7, 3, 4])]*
        log[(ab[1, 2, 4, 5]*ab[5, 6, 7, 8])/(ab[5, 6, 1, 2]*ab[7, 8, 4, 5])])/
       2]*R[1, 2, 4, 5, 6] + 
   intdone[-(Li[1 - (ab[4, 5, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*
            ab[7, 8, 4, 5])]*log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]) - 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[4, 5, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 4, 5])]*
        log[(ab[1, 2, 4, 5]*ab[7, 8, 5, 6]*ab[8, 1, 6, 7])/
          (ab[1, 2, 6, 7]*ab[7, 8, 4, 5]*ab[8, 1, 5, 6])])/2]*
    R[1, 2, 4, 5, 7] + 
   intdone[-(Li[1]*log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]) - 
      Li[1 - (ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] - 
      (log[(ab[1, 2, 7, 8]*ab[2, 3, 4, 5])/(ab[1, 2, 4, 5]*ab[2, 3, 7, 8])]*
        log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])])/
       2 - (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]*log[(ab[5, 6, 3, 4]*ab[6, 7, 4, 5]*ab[6, 7, 8, 1]*
           ab[7, 8, 1, 2])/(ab[5, 6, 8, 1]*ab[6, 7, 1, 2]*ab[6, 7, 3, 4]*
           ab[7, 8, 4, 5])]*log[(ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/
          (ab[5, 6, 8, 1]*ab[7, 8, 4, 5])])/2 - 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[4, 5, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 4, 5])]*
        log[(ab[1, 2, 4, 5]*ab[8, 1, 6, 7])/(ab[1, 2, 6, 7]*ab[8, 1, 4, 5])])/
       2]*R[1, 2, 4, 5, 8] + 
   intdone[-(Li[1 - (ab[1, 2, 3, 4]*ab[4, 5, 6, 7])/(ab[4, 5, 1, 2]*
            ab[6, 7, 3, 4])]*log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]) - 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[1, 2, 3, 4]*ab[4, 5, 6, 7])/(ab[4, 5, 1, 2]*ab[6, 7, 3, 4])]*
        log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[6, 7, 1, 2])/
          (ab[4, 5, 1, 2]*ab[5, 6, 2, 3]*ab[6, 7, 3, 4])])/2]*
    R[1, 2, 4, 6, 7] + 
   intdone[-(Li[1 - (ab[1, 2, 3, 4]*ab[4, 5, 7, 8])/(ab[4, 5, 1, 2]*
            ab[7, 8, 3, 4])]*log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]) - 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[1, 2, 3, 4]*ab[4, 5, 7, 8])/(ab[4, 5, 1, 2]*ab[7, 8, 3, 4])]*
        log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[7, 8, 1, 2])/
          (ab[4, 5, 1, 2]*ab[5, 6, 2, 3]*ab[7, 8, 3, 4])])/2]*
    R[1, 2, 4, 7, 8] + 
   intdone[-(Li[1]*log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]) - 
      Li[1 - (ab[2, 3, 4, 5]*ab[5, 6, 1, 2])/(ab[2, 3, 5, 6]*ab[4, 5, 1, 2])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] - 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
          (ab[2, 3, 5, 6]*ab[3, 4, 6, 7]*ab[3, 4, 8, 1]*ab[4, 5, 1, 2])]*
        log[(ab[2, 3, 4, 5]*ab[5, 6, 1, 2])/(ab[2, 3, 5, 6]*ab[4, 5, 1, 2])])/
       2 - (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]*log[(ab[5, 6, 3, 4]*ab[6, 7, 1, 2])/
          (ab[5, 6, 1, 2]*ab[6, 7, 3, 4])]*
        log[(ab[1, 2, 4, 5]*ab[5, 6, 7, 8])/(ab[5, 6, 1, 2]*ab[7, 8, 4, 5])])/
       2 - (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]*log[(ab[6, 7, 4, 5]*ab[7, 8, 1, 2])/
          (ab[6, 7, 1, 2]*ab[7, 8, 4, 5])]*
        log[(ab[1, 2, 5, 6]*ab[6, 7, 8, 1])/(ab[6, 7, 1, 2]*ab[8, 1, 5, 6])])/
       2]*R[1, 2, 5, 6, 7] + 
   intdone[-(Li[1]*log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]) - 
      (log[(ab[1, 2, 7, 8]*ab[2, 3, 5, 6])/(ab[1, 2, 5, 6]*ab[2, 3, 7, 8])]*
        log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[1, 2, 3, 4]*ab[5, 6, 8, 1])/(ab[1, 2, 5, 6]*ab[3, 4, 8, 1])])/
       2 - (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]*log[(ab[5, 6, 7, 8]*ab[8, 1, 2, 3])/
          (ab[2, 3, 7, 8]*ab[8, 1, 5, 6])]*
        log[(ab[1, 2, 5, 6]*ab[8, 1, 6, 7])/(ab[1, 2, 6, 7]*ab[8, 1, 5, 6])])/
       2]*R[1, 2, 5, 6, 8] + 
   intdone[-(Li[1 - (ab[2, 3, 4, 5]*ab[5, 6, 1, 2])/(ab[2, 3, 5, 6]*
            ab[4, 5, 1, 2])]*log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]) - 
      Li[1 - (ab[1, 2, 4, 5]*ab[5, 6, 7, 8])/(ab[5, 6, 1, 2]*ab[7, 8, 4, 5])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] - 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
          (ab[2, 3, 5, 6]*ab[3, 4, 6, 7]*ab[3, 4, 8, 1]*ab[4, 5, 1, 2])]*
        log[(ab[2, 3, 4, 5]*ab[5, 6, 1, 2])/(ab[2, 3, 5, 6]*ab[4, 5, 1, 2])])/
       2 - (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]*log[(ab[1, 2, 4, 5]*ab[5, 6, 7, 8])/
          (ab[5, 6, 1, 2]*ab[7, 8, 4, 5])]*
        log[(ab[5, 6, 3, 4]*ab[6, 7, 4, 5]*ab[7, 8, 1, 2])/
          (ab[5, 6, 1, 2]*ab[6, 7, 3, 4]*ab[7, 8, 4, 5])])/2]*
    R[1, 2, 5, 7, 8] + 
   intdone[-(Li[1]*log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]) - 
      Li[1 - (ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/(ab[2, 3, 6, 7]*ab[5, 6, 1, 2])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] - 
      Li[1 - (ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] - 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])/
          (ab[2, 3, 6, 7]*ab[3, 4, 8, 1]*ab[4, 5, 7, 8]*ab[5, 6, 1, 2])]*
        log[(ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/(ab[2, 3, 6, 7]*ab[5, 6, 1, 2])])/
       2 - (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]*log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[4, 5, 6, 7]*
           ab[5, 6, 7, 8])/(ab[3, 4, 6, 7]*ab[4, 5, 1, 2]*ab[4, 5, 7, 8]*
           ab[5, 6, 2, 3])]*log[(ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/
          (ab[3, 4, 6, 7]*ab[5, 6, 2, 3])])/2 - 
      (log[(ab[1, 2, 7, 8]*ab[2, 3, 6, 7])/(ab[1, 2, 6, 7]*ab[2, 3, 7, 8])]*
        log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[1, 2, 3, 4]*ab[6, 7, 8, 1])/(ab[1, 2, 6, 7]*ab[3, 4, 8, 1])])/
       2 - (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]*log[(ab[6, 7, 4, 5]*ab[7, 8, 1, 2])/
          (ab[6, 7, 1, 2]*ab[7, 8, 4, 5])]*
        log[(ab[1, 2, 5, 6]*ab[6, 7, 8, 1])/(ab[6, 7, 1, 2]*ab[8, 1, 5, 6])])/
       2]*R[1, 2, 6, 7, 8] + 
   intdone[Li[1 - (ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*
           ab[3, 4, 8, 1])]*log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
         (ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      Li[1 - (ab[2, 3, 4, 5]*ab[5, 6, 1, 2])/(ab[2, 3, 5, 6]*ab[4, 5, 1, 2])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] - 
      Li[1 - (ab[1, 2, 3, 4]*ab[5, 6, 8, 1])/(ab[1, 2, 5, 6]*ab[3, 4, 8, 1])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      Li[1 - (ab[1, 2, 4, 5]*ab[5, 6, 8, 1])/(ab[1, 2, 5, 6]*ab[4, 5, 8, 1])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      Li[1 - (ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/(ab[2, 3, 6, 7]*ab[5, 6, 1, 2])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      Li[1 - (ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      Li[1 - (ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      Li[1 - (ab[3, 4, 6, 7]*ab[7, 8, 2, 3])/(ab[3, 4, 7, 8]*ab[6, 7, 2, 3])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      Li[1 - (ab[4, 5, 6, 7]*ab[7, 8, 3, 4])/(ab[4, 5, 7, 8]*ab[6, 7, 3, 4])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      Li[1 - (ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      Li[1 - (ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/(ab[4, 5, 8, 1]*ab[7, 8, 3, 4])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      Li[1 - (ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6])/
          (ab[1, 2, 4, 5]*ab[2, 3, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 8, 1])]*
        log[(ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])])/
       2 + (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]*log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[3, 4, 5, 6]*
           ab[4, 5, 6, 7])/(ab[2, 3, 5, 6]*ab[3, 4, 6, 7]*ab[3, 4, 8, 1]*
           ab[4, 5, 1, 2])]*log[(ab[2, 3, 4, 5]*ab[5, 6, 1, 2])/
          (ab[2, 3, 5, 6]*ab[4, 5, 1, 2])])/2 - 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[1, 2, 7, 8]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6])/
          (ab[1, 2, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 8, 1])]*
        log[(ab[1, 2, 3, 4]*ab[5, 6, 8, 1])/(ab[1, 2, 5, 6]*ab[3, 4, 8, 1])])/
       2 + (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]*log[(ab[1, 2, 7, 8]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6]*
           ab[4, 5, 6, 7])/(ab[1, 2, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 6, 7]*
           ab[4, 5, 8, 1])]*log[(ab[1, 2, 4, 5]*ab[5, 6, 8, 1])/
          (ab[1, 2, 5, 6]*ab[4, 5, 8, 1])])/2 + 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])/
          (ab[2, 3, 6, 7]*ab[3, 4, 8, 1]*ab[4, 5, 7, 8]*ab[5, 6, 1, 2])]*
        log[(ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/(ab[2, 3, 6, 7]*ab[5, 6, 1, 2])])/
       2 + (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]*log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[4, 5, 6, 7]*
           ab[5, 6, 7, 8])/(ab[3, 4, 6, 7]*ab[4, 5, 1, 2]*ab[4, 5, 7, 8]*
           ab[5, 6, 2, 3])]*log[(ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/
          (ab[3, 4, 6, 7]*ab[5, 6, 2, 3])])/2 + 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[5, 6, 7, 8]*ab[6, 7, 8, 1])/
          (ab[3, 4, 7, 8]*ab[4, 5, 1, 2]*ab[5, 6, 8, 1]*ab[6, 7, 2, 3])]*
        log[(ab[3, 4, 6, 7]*ab[7, 8, 2, 3])/(ab[3, 4, 7, 8]*ab[6, 7, 2, 3])])/
       2 + (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]*log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[5, 6, 7, 8]*
           ab[6, 7, 8, 1])/(ab[4, 5, 7, 8]*ab[5, 6, 2, 3]*ab[5, 6, 8, 1]*
           ab[6, 7, 3, 4])]*log[(ab[4, 5, 6, 7]*ab[7, 8, 3, 4])/
          (ab[4, 5, 7, 8]*ab[6, 7, 3, 4])])/2 + 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[6, 7, 8, 1]*ab[7, 8, 1, 2])/
          (ab[4, 5, 8, 1]*ab[5, 6, 2, 3]*ab[6, 7, 1, 2]*ab[7, 8, 3, 4])]*
        log[(ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/(ab[4, 5, 8, 1]*ab[7, 8, 3, 4])])/
       2 + (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]*log[(ab[5, 6, 3, 4]*ab[6, 7, 4, 5]*ab[6, 7, 8, 1]*
           ab[7, 8, 1, 2])/(ab[5, 6, 8, 1]*ab[6, 7, 1, 2]*ab[6, 7, 3, 4]*
           ab[7, 8, 4, 5])]*log[(ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/
          (ab[5, 6, 8, 1]*ab[7, 8, 4, 5])])/2 + 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
        log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[8, 1, 6, 7])/
          (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*ab[2, 3, 7, 8]*ab[8, 1, 3, 4])])/2 + 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
        log[(ab[1, 2, 3, 4]*ab[7, 8, 5, 6]*ab[8, 1, 2, 3]*ab[8, 1, 6, 7])/
          (ab[1, 2, 6, 7]*ab[7, 8, 2, 3]*ab[8, 1, 3, 4]*ab[8, 1, 5, 6])])/2]*
    R[1, 3, 4, 5, 6] + 
   intdone[-(Li[1]*log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]) - 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[3, 4, 1, 2]*ab[4, 5, 8, 1])/(ab[3, 4, 8, 1]*ab[4, 5, 1, 2])]*
        log[(ab[3, 4, 5, 6]*ab[8, 1, 2, 3])/(ab[3, 4, 8, 1]*ab[5, 6, 2, 3])])/
       2 - (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]*log[(ab[4, 5, 2, 3]*ab[5, 6, 8, 1])/
          (ab[4, 5, 8, 1]*ab[5, 6, 2, 3])]*
        log[(ab[4, 5, 6, 7]*ab[8, 1, 3, 4])/(ab[4, 5, 8, 1]*ab[6, 7, 3, 4])])/
       2]*R[1, 3, 4, 5, 8] + 
   intdone[Li[1 - (ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*
           ab[3, 4, 8, 1])]*log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
         (ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      Li[1 - (ab[2, 3, 4, 5]*ab[5, 6, 1, 2])/(ab[2, 3, 5, 6]*ab[4, 5, 1, 2])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      Li[1 - (ab[1, 2, 4, 5]*ab[5, 6, 8, 1])/(ab[1, 2, 5, 6]*ab[4, 5, 8, 1])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      Li[1 - (ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/(ab[2, 3, 6, 7]*ab[5, 6, 1, 2])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      Li[1 - (ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] - 
      Li[1 - (ab[1, 2, 3, 4]*ab[6, 7, 8, 1])/(ab[1, 2, 6, 7]*ab[3, 4, 8, 1])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      Li[1 - (ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      Li[1 - (ab[3, 4, 6, 7]*ab[7, 8, 2, 3])/(ab[3, 4, 7, 8]*ab[6, 7, 2, 3])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      Li[1 - (ab[4, 5, 6, 7]*ab[7, 8, 3, 4])/(ab[4, 5, 7, 8]*ab[6, 7, 3, 4])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      Li[1 - (ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      Li[1 - (ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/(ab[4, 5, 8, 1]*ab[7, 8, 3, 4])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      Li[1 - (ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      Li[1 - (ab[1, 2, 5, 6]*ab[6, 7, 8, 1])/(ab[6, 7, 1, 2]*ab[8, 1, 5, 6])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6])/
          (ab[1, 2, 4, 5]*ab[2, 3, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 8, 1])]*
        log[(ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])])/
       2 + (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]*log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[3, 4, 5, 6]*
           ab[4, 5, 6, 7])/(ab[2, 3, 5, 6]*ab[3, 4, 6, 7]*ab[3, 4, 8, 1]*
           ab[4, 5, 1, 2])]*log[(ab[2, 3, 4, 5]*ab[5, 6, 1, 2])/
          (ab[2, 3, 5, 6]*ab[4, 5, 1, 2])])/2 + 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[1, 2, 7, 8]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
          (ab[1, 2, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 6, 7]*ab[4, 5, 8, 1])]*
        log[(ab[1, 2, 4, 5]*ab[5, 6, 8, 1])/(ab[1, 2, 5, 6]*ab[4, 5, 8, 1])])/
       2 + (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]*log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[4, 5, 6, 7]*
           ab[5, 6, 7, 8])/(ab[2, 3, 6, 7]*ab[3, 4, 8, 1]*ab[4, 5, 7, 8]*
           ab[5, 6, 1, 2])]*log[(ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/
          (ab[2, 3, 6, 7]*ab[5, 6, 1, 2])])/2 + 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])/
          (ab[3, 4, 6, 7]*ab[4, 5, 1, 2]*ab[4, 5, 7, 8]*ab[5, 6, 2, 3])]*
        log[(ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])])/
       2 - (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]*log[(ab[1, 2, 7, 8]*ab[2, 3, 8, 1]*
           ab[3, 4, 6, 7])/(ab[1, 2, 6, 7]*ab[2, 3, 7, 8]*ab[3, 4, 8, 1])]*
        log[(ab[1, 2, 3, 4]*ab[6, 7, 8, 1])/(ab[1, 2, 6, 7]*ab[3, 4, 8, 1])])/
       2 + (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]*log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[5, 6, 7, 8]*
           ab[6, 7, 8, 1])/(ab[3, 4, 7, 8]*ab[4, 5, 1, 2]*ab[5, 6, 8, 1]*
           ab[6, 7, 2, 3])]*log[(ab[3, 4, 6, 7]*ab[7, 8, 2, 3])/
          (ab[3, 4, 7, 8]*ab[6, 7, 2, 3])])/2 + 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[5, 6, 7, 8]*ab[6, 7, 8, 1])/
          (ab[4, 5, 7, 8]*ab[5, 6, 2, 3]*ab[5, 6, 8, 1]*ab[6, 7, 3, 4])]*
        log[(ab[4, 5, 6, 7]*ab[7, 8, 3, 4])/(ab[4, 5, 7, 8]*ab[6, 7, 3, 4])])/
       2 + (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]*log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[6, 7, 8, 1]*
           ab[7, 8, 1, 2])/(ab[4, 5, 8, 1]*ab[5, 6, 2, 3]*ab[6, 7, 1, 2]*
           ab[7, 8, 3, 4])]*log[(ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/
          (ab[4, 5, 8, 1]*ab[7, 8, 3, 4])])/2 + 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[5, 6, 3, 4]*ab[6, 7, 4, 5]*ab[6, 7, 8, 1]*ab[7, 8, 1, 2])/
          (ab[5, 6, 8, 1]*ab[6, 7, 1, 2]*ab[6, 7, 3, 4]*ab[7, 8, 4, 5])]*
        log[(ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])])/
       2 + (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]*log[(ab[1, 2, 5, 6]*ab[6, 7, 8, 1])/
          (ab[6, 7, 1, 2]*ab[8, 1, 5, 6])]*
        log[(ab[6, 7, 4, 5]*ab[7, 8, 1, 2]*ab[7, 8, 5, 6]*ab[8, 1, 2, 3])/
          (ab[6, 7, 1, 2]*ab[7, 8, 2, 3]*ab[7, 8, 4, 5]*ab[8, 1, 5, 6])])/2 + 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
        log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[8, 1, 6, 7])/
          (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*ab[2, 3, 7, 8]*ab[8, 1, 3, 4])])/2 + 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
        log[(ab[1, 2, 3, 4]*ab[7, 8, 5, 6]*ab[8, 1, 2, 3]*ab[8, 1, 6, 7])/
          (ab[1, 2, 6, 7]*ab[7, 8, 2, 3]*ab[8, 1, 3, 4]*ab[8, 1, 5, 6])])/2]*
    R[1, 3, 4, 6, 7] + 
   intdone[-(Li[1 - (ab[3, 4, 5, 6]*ab[6, 7, 8, 1])/(ab[6, 7, 3, 4]*
            ab[8, 1, 5, 6])]*log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]) - 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[3, 4, 5, 6]*ab[6, 7, 8, 1])/(ab[6, 7, 3, 4]*ab[8, 1, 5, 6])]*
        log[(ab[6, 7, 4, 5]*ab[7, 8, 5, 6]*ab[8, 1, 3, 4])/
          (ab[6, 7, 3, 4]*ab[7, 8, 4, 5]*ab[8, 1, 5, 6])])/2]*
    R[1, 3, 4, 6, 8] + 
   intdone[-(Li[1]*log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]) + 
      Li[1 - (ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      Li[1 - (ab[2, 3, 4, 5]*ab[5, 6, 1, 2])/(ab[2, 3, 5, 6]*ab[4, 5, 1, 2])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      Li[1 - (ab[1, 2, 4, 5]*ab[5, 6, 8, 1])/(ab[1, 2, 5, 6]*ab[4, 5, 8, 1])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      Li[1 - (ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/(ab[2, 3, 6, 7]*ab[5, 6, 1, 2])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      Li[1 - (ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      Li[1 - (ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      Li[1 - (ab[3, 4, 6, 7]*ab[7, 8, 2, 3])/(ab[3, 4, 7, 8]*ab[6, 7, 2, 3])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      Li[1 - (ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      Li[1 - (ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/(ab[4, 5, 8, 1]*ab[7, 8, 3, 4])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      Li[1 - (ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      Li[1 - (ab[1, 2, 5, 6]*ab[6, 7, 8, 1])/(ab[6, 7, 1, 2]*ab[8, 1, 5, 6])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6])/
          (ab[1, 2, 4, 5]*ab[2, 3, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 8, 1])]*
        log[(ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])])/
       2 + (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]*log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[3, 4, 5, 6]*
           ab[4, 5, 6, 7])/(ab[2, 3, 5, 6]*ab[3, 4, 6, 7]*ab[3, 4, 8, 1]*
           ab[4, 5, 1, 2])]*log[(ab[2, 3, 4, 5]*ab[5, 6, 1, 2])/
          (ab[2, 3, 5, 6]*ab[4, 5, 1, 2])])/2 + 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[1, 2, 7, 8]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
          (ab[1, 2, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 6, 7]*ab[4, 5, 8, 1])]*
        log[(ab[1, 2, 4, 5]*ab[5, 6, 8, 1])/(ab[1, 2, 5, 6]*ab[4, 5, 8, 1])])/
       2 + (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]*log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[4, 5, 6, 7]*
           ab[5, 6, 7, 8])/(ab[2, 3, 6, 7]*ab[3, 4, 8, 1]*ab[4, 5, 7, 8]*
           ab[5, 6, 1, 2])]*log[(ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/
          (ab[2, 3, 6, 7]*ab[5, 6, 1, 2])])/2 + 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])/
          (ab[3, 4, 6, 7]*ab[4, 5, 1, 2]*ab[4, 5, 7, 8]*ab[5, 6, 2, 3])]*
        log[(ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])])/
       2 + (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]*log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[5, 6, 7, 8]*
           ab[6, 7, 8, 1])/(ab[3, 4, 7, 8]*ab[4, 5, 1, 2]*ab[5, 6, 8, 1]*
           ab[6, 7, 2, 3])]*log[(ab[3, 4, 6, 7]*ab[7, 8, 2, 3])/
          (ab[3, 4, 7, 8]*ab[6, 7, 2, 3])])/2 + 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[6, 7, 8, 1]*ab[7, 8, 1, 2])/
          (ab[4, 5, 8, 1]*ab[5, 6, 2, 3]*ab[6, 7, 1, 2]*ab[7, 8, 3, 4])]*
        log[(ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/(ab[4, 5, 8, 1]*ab[7, 8, 3, 4])])/
       2 + (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]*log[(ab[5, 6, 3, 4]*ab[6, 7, 4, 5]*ab[6, 7, 8, 1]*
           ab[7, 8, 1, 2])/(ab[5, 6, 8, 1]*ab[6, 7, 1, 2]*ab[6, 7, 3, 4]*
           ab[7, 8, 4, 5])]*log[(ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/
          (ab[5, 6, 8, 1]*ab[7, 8, 4, 5])])/2 + 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[1, 2, 5, 6]*ab[6, 7, 8, 1])/(ab[6, 7, 1, 2]*ab[8, 1, 5, 6])]*
        log[(ab[6, 7, 4, 5]*ab[7, 8, 1, 2]*ab[7, 8, 5, 6]*ab[8, 1, 2, 3])/
          (ab[6, 7, 1, 2]*ab[7, 8, 2, 3]*ab[7, 8, 4, 5]*ab[8, 1, 5, 6])])/2 - 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[3, 4, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 3, 4])]*
        log[(ab[7, 8, 5, 6]*ab[8, 1, 3, 4])/(ab[7, 8, 3, 4]*ab[8, 1, 5, 6])])/
       2 - (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]*log[(ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/
          (ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
        log[(ab[1, 2, 3, 4]*ab[8, 1, 6, 7])/(ab[1, 2, 6, 7]*ab[8, 1, 3, 4])])/
       2 + (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]*log[(ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/
          (ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
        log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[8, 1, 6, 7])/
          (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*ab[2, 3, 7, 8]*ab[8, 1, 3, 4])])/2 + 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
        log[(ab[1, 2, 3, 4]*ab[7, 8, 5, 6]*ab[8, 1, 2, 3]*ab[8, 1, 6, 7])/
          (ab[1, 2, 6, 7]*ab[7, 8, 2, 3]*ab[8, 1, 3, 4]*ab[8, 1, 5, 6])])/2]*
    R[1, 3, 4, 7, 8] + 
   intdone[-(Li[1 - (ab[3, 4, 5, 6]*ab[8, 1, 2, 3])/(ab[3, 4, 8, 1]*
            ab[5, 6, 2, 3])]*log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]) - 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[5, 6, 8, 1])/
          (ab[3, 4, 8, 1]*ab[4, 5, 1, 2]*ab[5, 6, 2, 3])]*
        log[(ab[3, 4, 5, 6]*ab[8, 1, 2, 3])/(ab[3, 4, 8, 1]*ab[5, 6, 2, 3])])/
       2]*R[1, 3, 5, 6, 8] + 
   intdone[-(Li[1 - (ab[3, 4, 6, 7]*ab[8, 1, 2, 3])/(ab[3, 4, 8, 1]*
            ab[6, 7, 2, 3])]*log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]) - 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[6, 7, 8, 1])/
          (ab[3, 4, 8, 1]*ab[4, 5, 1, 2]*ab[6, 7, 2, 3])]*
        log[(ab[3, 4, 6, 7]*ab[8, 1, 2, 3])/(ab[3, 4, 8, 1]*ab[6, 7, 2, 3])])/
       2]*R[1, 3, 6, 7, 8] + 
   intdone[Li[1 - (ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*
           ab[3, 4, 8, 1])]*log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
         (ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      Li[1 - (ab[2, 3, 4, 5]*ab[5, 6, 1, 2])/(ab[2, 3, 5, 6]*ab[4, 5, 1, 2])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      Li[1 - (ab[1, 2, 4, 5]*ab[5, 6, 8, 1])/(ab[1, 2, 5, 6]*ab[4, 5, 8, 1])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      Li[1 - (ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/(ab[2, 3, 6, 7]*ab[5, 6, 1, 2])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      Li[1 - (ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] - 
      Li[1 - (ab[1, 2, 4, 5]*ab[6, 7, 8, 1])/(ab[1, 2, 6, 7]*ab[4, 5, 8, 1])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      Li[1 - (ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      Li[1 - (ab[3, 4, 6, 7]*ab[7, 8, 2, 3])/(ab[3, 4, 7, 8]*ab[6, 7, 2, 3])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      Li[1 - (ab[4, 5, 6, 7]*ab[7, 8, 3, 4])/(ab[4, 5, 7, 8]*ab[6, 7, 3, 4])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      Li[1 - (ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      Li[1 - (ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/(ab[4, 5, 8, 1]*ab[7, 8, 3, 4])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      Li[1 - (ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      Li[1 - (ab[1, 2, 5, 6]*ab[6, 7, 8, 1])/(ab[6, 7, 1, 2]*ab[8, 1, 5, 6])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6])/
          (ab[1, 2, 4, 5]*ab[2, 3, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 8, 1])]*
        log[(ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])])/
       2 + (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]*log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[3, 4, 5, 6]*
           ab[4, 5, 6, 7])/(ab[2, 3, 5, 6]*ab[3, 4, 6, 7]*ab[3, 4, 8, 1]*
           ab[4, 5, 1, 2])]*log[(ab[2, 3, 4, 5]*ab[5, 6, 1, 2])/
          (ab[2, 3, 5, 6]*ab[4, 5, 1, 2])])/2 + 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[1, 2, 7, 8]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
          (ab[1, 2, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 6, 7]*ab[4, 5, 8, 1])]*
        log[(ab[1, 2, 4, 5]*ab[5, 6, 8, 1])/(ab[1, 2, 5, 6]*ab[4, 5, 8, 1])])/
       2 + (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]*log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[4, 5, 6, 7]*
           ab[5, 6, 7, 8])/(ab[2, 3, 6, 7]*ab[3, 4, 8, 1]*ab[4, 5, 7, 8]*
           ab[5, 6, 1, 2])]*log[(ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/
          (ab[2, 3, 6, 7]*ab[5, 6, 1, 2])])/2 + 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])/
          (ab[3, 4, 6, 7]*ab[4, 5, 1, 2]*ab[4, 5, 7, 8]*ab[5, 6, 2, 3])]*
        log[(ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])])/
       2 - (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]*log[(ab[1, 2, 7, 8]*ab[2, 3, 8, 1]*
           ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[2, 3, 7, 8]*ab[4, 5, 8, 1])]*
        log[(ab[1, 2, 4, 5]*ab[6, 7, 8, 1])/(ab[1, 2, 6, 7]*ab[4, 5, 8, 1])])/
       2 + (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]*log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[5, 6, 7, 8]*
           ab[6, 7, 8, 1])/(ab[3, 4, 7, 8]*ab[4, 5, 1, 2]*ab[5, 6, 8, 1]*
           ab[6, 7, 2, 3])]*log[(ab[3, 4, 6, 7]*ab[7, 8, 2, 3])/
          (ab[3, 4, 7, 8]*ab[6, 7, 2, 3])])/2 + 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[5, 6, 7, 8]*ab[6, 7, 8, 1])/
          (ab[4, 5, 7, 8]*ab[5, 6, 2, 3]*ab[5, 6, 8, 1]*ab[6, 7, 3, 4])]*
        log[(ab[4, 5, 6, 7]*ab[7, 8, 3, 4])/(ab[4, 5, 7, 8]*ab[6, 7, 3, 4])])/
       2 + (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]*log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[6, 7, 8, 1]*
           ab[7, 8, 1, 2])/(ab[4, 5, 8, 1]*ab[5, 6, 2, 3]*ab[6, 7, 1, 2]*
           ab[7, 8, 3, 4])]*log[(ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/
          (ab[4, 5, 8, 1]*ab[7, 8, 3, 4])])/2 + 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[5, 6, 3, 4]*ab[6, 7, 4, 5]*ab[6, 7, 8, 1]*ab[7, 8, 1, 2])/
          (ab[5, 6, 8, 1]*ab[6, 7, 1, 2]*ab[6, 7, 3, 4]*ab[7, 8, 4, 5])]*
        log[(ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])])/
       2 + (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]*log[(ab[1, 2, 5, 6]*ab[6, 7, 8, 1])/
          (ab[6, 7, 1, 2]*ab[8, 1, 5, 6])]*
        log[(ab[6, 7, 4, 5]*ab[7, 8, 1, 2]*ab[7, 8, 5, 6]*ab[8, 1, 2, 3])/
          (ab[6, 7, 1, 2]*ab[7, 8, 2, 3]*ab[7, 8, 4, 5]*ab[8, 1, 5, 6])])/2 + 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
        log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[8, 1, 6, 7])/
          (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*ab[2, 3, 7, 8]*ab[8, 1, 3, 4])])/2 + 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
        log[(ab[1, 2, 3, 4]*ab[7, 8, 5, 6]*ab[8, 1, 2, 3]*ab[8, 1, 6, 7])/
          (ab[1, 2, 6, 7]*ab[7, 8, 2, 3]*ab[8, 1, 3, 4]*ab[8, 1, 5, 6])])/2]*
    R[1, 4, 5, 6, 7] + 
   intdone[-(Li[1]*log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]) - 
      Li[1 - (ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] - 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6])/
          (ab[1, 2, 4, 5]*ab[2, 3, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 8, 1])]*
        log[(ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])])/
       2 - (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]*log[(ab[4, 5, 2, 3]*ab[5, 6, 8, 1])/
          (ab[4, 5, 8, 1]*ab[5, 6, 2, 3])]*
        log[(ab[4, 5, 6, 7]*ab[8, 1, 3, 4])/(ab[4, 5, 8, 1]*ab[6, 7, 3, 4])])/
       2 - (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]*log[(ab[5, 6, 3, 4]*ab[6, 7, 8, 1])/
          (ab[5, 6, 8, 1]*ab[6, 7, 3, 4])]*
        log[(ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])])/
       2]*R[1, 4, 5, 6, 8] + 
   intdone[-(Li[1]*log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]) + 
      Li[1 - (ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      Li[1 - (ab[2, 3, 4, 5]*ab[5, 6, 1, 2])/(ab[2, 3, 5, 6]*ab[4, 5, 1, 2])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      Li[1 - (ab[1, 2, 4, 5]*ab[5, 6, 8, 1])/(ab[1, 2, 5, 6]*ab[4, 5, 8, 1])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      Li[1 - (ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/(ab[2, 3, 6, 7]*ab[5, 6, 1, 2])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      Li[1 - (ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      Li[1 - (ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      Li[1 - (ab[3, 4, 6, 7]*ab[7, 8, 2, 3])/(ab[3, 4, 7, 8]*ab[6, 7, 2, 3])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      Li[1 - (ab[4, 5, 6, 7]*ab[7, 8, 3, 4])/(ab[4, 5, 7, 8]*ab[6, 7, 3, 4])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      Li[1 - (ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      Li[1 - (ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/(ab[4, 5, 8, 1]*ab[7, 8, 3, 4])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      Li[1 - (ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      Li[1 - (ab[1, 2, 5, 6]*ab[6, 7, 8, 1])/(ab[6, 7, 1, 2]*ab[8, 1, 5, 6])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6])/
          (ab[1, 2, 4, 5]*ab[2, 3, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 8, 1])]*
        log[(ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])])/
       2 + (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]*log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[3, 4, 5, 6]*
           ab[4, 5, 6, 7])/(ab[2, 3, 5, 6]*ab[3, 4, 6, 7]*ab[3, 4, 8, 1]*
           ab[4, 5, 1, 2])]*log[(ab[2, 3, 4, 5]*ab[5, 6, 1, 2])/
          (ab[2, 3, 5, 6]*ab[4, 5, 1, 2])])/2 + 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[1, 2, 7, 8]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
          (ab[1, 2, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 6, 7]*ab[4, 5, 8, 1])]*
        log[(ab[1, 2, 4, 5]*ab[5, 6, 8, 1])/(ab[1, 2, 5, 6]*ab[4, 5, 8, 1])])/
       2 + (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]*log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[4, 5, 6, 7]*
           ab[5, 6, 7, 8])/(ab[2, 3, 6, 7]*ab[3, 4, 8, 1]*ab[4, 5, 7, 8]*
           ab[5, 6, 1, 2])]*log[(ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/
          (ab[2, 3, 6, 7]*ab[5, 6, 1, 2])])/2 + 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])/
          (ab[3, 4, 6, 7]*ab[4, 5, 1, 2]*ab[4, 5, 7, 8]*ab[5, 6, 2, 3])]*
        log[(ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])])/
       2 + (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]*log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[5, 6, 7, 8]*
           ab[6, 7, 8, 1])/(ab[3, 4, 7, 8]*ab[4, 5, 1, 2]*ab[5, 6, 8, 1]*
           ab[6, 7, 2, 3])]*log[(ab[3, 4, 6, 7]*ab[7, 8, 2, 3])/
          (ab[3, 4, 7, 8]*ab[6, 7, 2, 3])])/2 + 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[5, 6, 7, 8]*ab[6, 7, 8, 1])/
          (ab[4, 5, 7, 8]*ab[5, 6, 2, 3]*ab[5, 6, 8, 1]*ab[6, 7, 3, 4])]*
        log[(ab[4, 5, 6, 7]*ab[7, 8, 3, 4])/(ab[4, 5, 7, 8]*ab[6, 7, 3, 4])])/
       2 + (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]*log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[6, 7, 8, 1]*
           ab[7, 8, 1, 2])/(ab[4, 5, 8, 1]*ab[5, 6, 2, 3]*ab[6, 7, 1, 2]*
           ab[7, 8, 3, 4])]*log[(ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/
          (ab[4, 5, 8, 1]*ab[7, 8, 3, 4])])/2 + 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[5, 6, 3, 4]*ab[6, 7, 4, 5]*ab[6, 7, 8, 1]*ab[7, 8, 1, 2])/
          (ab[5, 6, 8, 1]*ab[6, 7, 1, 2]*ab[6, 7, 3, 4]*ab[7, 8, 4, 5])]*
        log[(ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])])/
       2 + (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]*log[(ab[1, 2, 5, 6]*ab[6, 7, 8, 1])/
          (ab[6, 7, 1, 2]*ab[8, 1, 5, 6])]*
        log[(ab[6, 7, 4, 5]*ab[7, 8, 1, 2]*ab[7, 8, 5, 6]*ab[8, 1, 2, 3])/
          (ab[6, 7, 1, 2]*ab[7, 8, 2, 3]*ab[7, 8, 4, 5]*ab[8, 1, 5, 6])])/2 - 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[4, 5, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 4, 5])]*
        log[(ab[7, 8, 5, 6]*ab[8, 1, 4, 5])/(ab[7, 8, 4, 5]*ab[8, 1, 5, 6])])/
       2 + (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]*log[(ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/
          (ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
        log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[8, 1, 6, 7])/
          (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*ab[2, 3, 7, 8]*ab[8, 1, 3, 4])])/2 - 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[4, 5, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 4, 5])]*
        log[(ab[1, 2, 4, 5]*ab[8, 1, 6, 7])/(ab[1, 2, 6, 7]*ab[8, 1, 4, 5])])/
       2 + (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]*log[(ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/
          (ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
        log[(ab[1, 2, 3, 4]*ab[7, 8, 5, 6]*ab[8, 1, 2, 3]*ab[8, 1, 6, 7])/
          (ab[1, 2, 6, 7]*ab[7, 8, 2, 3]*ab[8, 1, 3, 4]*ab[8, 1, 5, 6])])/2]*
    R[1, 4, 5, 7, 8] + 
   intdone[-(Li[1 - (ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*
            ab[3, 4, 8, 1])]*log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]) - 
      Li[1 - (ab[4, 5, 6, 7]*ab[8, 1, 3, 4])/(ab[4, 5, 8, 1]*ab[6, 7, 3, 4])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] - 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6])/
          (ab[1, 2, 4, 5]*ab[2, 3, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 8, 1])]*
        log[(ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])])/
       2 - (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]*log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*
           ab[6, 7, 8, 1])/(ab[4, 5, 8, 1]*ab[5, 6, 2, 3]*ab[6, 7, 3, 4])]*
        log[(ab[4, 5, 6, 7]*ab[8, 1, 3, 4])/(ab[4, 5, 8, 1]*ab[6, 7, 3, 4])])/
       2]*R[1, 4, 6, 7, 8] + 
   intdone[-(Li[1]*log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]) + 
      Li[1 - (ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      Li[1 - (ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/(ab[2, 3, 6, 7]*ab[5, 6, 1, 2])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      Li[1 - (ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      Li[1 - (ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      Li[1 - (ab[3, 4, 6, 7]*ab[7, 8, 2, 3])/(ab[3, 4, 7, 8]*ab[6, 7, 2, 3])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      Li[1 - (ab[4, 5, 6, 7]*ab[7, 8, 3, 4])/(ab[4, 5, 7, 8]*ab[6, 7, 3, 4])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      Li[1 - (ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      Li[1 - (ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/(ab[4, 5, 8, 1]*ab[7, 8, 3, 4])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      Li[1 - (ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      Li[1 - (ab[1, 2, 5, 6]*ab[6, 7, 8, 1])/(ab[6, 7, 1, 2]*ab[8, 1, 5, 6])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] + 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6])/
          (ab[1, 2, 4, 5]*ab[2, 3, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 8, 1])]*
        log[(ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])])/
       2 + (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]*log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[4, 5, 6, 7]*
           ab[5, 6, 7, 8])/(ab[2, 3, 6, 7]*ab[3, 4, 8, 1]*ab[4, 5, 7, 8]*
           ab[5, 6, 1, 2])]*log[(ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/
          (ab[2, 3, 6, 7]*ab[5, 6, 1, 2])])/2 + 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])/
          (ab[3, 4, 6, 7]*ab[4, 5, 1, 2]*ab[4, 5, 7, 8]*ab[5, 6, 2, 3])]*
        log[(ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])])/
       2 + (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]*log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[5, 6, 7, 8]*
           ab[6, 7, 8, 1])/(ab[3, 4, 7, 8]*ab[4, 5, 1, 2]*ab[5, 6, 8, 1]*
           ab[6, 7, 2, 3])]*log[(ab[3, 4, 6, 7]*ab[7, 8, 2, 3])/
          (ab[3, 4, 7, 8]*ab[6, 7, 2, 3])])/2 + 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[5, 6, 7, 8]*ab[6, 7, 8, 1])/
          (ab[4, 5, 7, 8]*ab[5, 6, 2, 3]*ab[5, 6, 8, 1]*ab[6, 7, 3, 4])]*
        log[(ab[4, 5, 6, 7]*ab[7, 8, 3, 4])/(ab[4, 5, 7, 8]*ab[6, 7, 3, 4])])/
       2 + (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]*log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[6, 7, 8, 1]*
           ab[7, 8, 1, 2])/(ab[4, 5, 8, 1]*ab[5, 6, 2, 3]*ab[6, 7, 1, 2]*
           ab[7, 8, 3, 4])]*log[(ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/
          (ab[4, 5, 8, 1]*ab[7, 8, 3, 4])])/2 - 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[5, 6, 3, 4]*ab[6, 7, 8, 1])/(ab[5, 6, 8, 1]*ab[6, 7, 3, 4])]*
        log[(ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])])/
       2 + (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]*log[(ab[5, 6, 3, 4]*ab[6, 7, 4, 5]*ab[6, 7, 8, 1]*
           ab[7, 8, 1, 2])/(ab[5, 6, 8, 1]*ab[6, 7, 1, 2]*ab[6, 7, 3, 4]*
           ab[7, 8, 4, 5])]*log[(ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/
          (ab[5, 6, 8, 1]*ab[7, 8, 4, 5])])/2 + 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[1, 2, 5, 6]*ab[6, 7, 8, 1])/(ab[6, 7, 1, 2]*ab[8, 1, 5, 6])]*
        log[(ab[6, 7, 4, 5]*ab[7, 8, 1, 2]*ab[7, 8, 5, 6]*ab[8, 1, 2, 3])/
          (ab[6, 7, 1, 2]*ab[7, 8, 2, 3]*ab[7, 8, 4, 5]*ab[8, 1, 5, 6])])/2 + 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
        log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[8, 1, 6, 7])/
          (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*ab[2, 3, 7, 8]*ab[8, 1, 3, 4])])/2 - 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[5, 6, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 5, 6])]*
        log[(ab[1, 2, 5, 6]*ab[8, 1, 6, 7])/(ab[1, 2, 6, 7]*ab[8, 1, 5, 6])])/
       2 + (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]*log[(ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/
          (ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
        log[(ab[1, 2, 3, 4]*ab[7, 8, 5, 6]*ab[8, 1, 2, 3]*ab[8, 1, 6, 7])/
          (ab[1, 2, 6, 7]*ab[7, 8, 2, 3]*ab[8, 1, 3, 4]*ab[8, 1, 5, 6])])/2]*
    R[1, 5, 6, 7, 8] + 
   intdone[-(Li[1 - (ab[2, 3, 4, 5]*ab[6, 7, 1, 2])/(ab[2, 3, 6, 7]*
            ab[4, 5, 1, 2])]*log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]) - 
      Li[1 - (ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] - 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[4, 5, 6, 7])/
          (ab[2, 3, 6, 7]*ab[3, 4, 8, 1]*ab[4, 5, 1, 2])]*
        log[(ab[2, 3, 4, 5]*ab[6, 7, 1, 2])/(ab[2, 3, 6, 7]*ab[4, 5, 1, 2])])/
       2 - (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]*log[(ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/
          (ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
        log[(ab[1, 2, 3, 4]*ab[7, 8, 5, 6]*ab[8, 1, 2, 3]*ab[8, 1, 6, 7])/
          (ab[1, 2, 6, 7]*ab[7, 8, 2, 3]*ab[8, 1, 3, 4]*ab[8, 1, 5, 6])])/2]*
    R[2, 4, 5, 6, 7] + 
   intdone[-(Li[1 - (ab[2, 3, 4, 5]*ab[7, 8, 1, 2])/(ab[2, 3, 7, 8]*
            ab[4, 5, 1, 2])]*log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]) - 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[4, 5, 7, 8])/
          (ab[2, 3, 7, 8]*ab[3, 4, 8, 1]*ab[4, 5, 1, 2])]*
        log[(ab[2, 3, 4, 5]*ab[7, 8, 1, 2])/(ab[2, 3, 7, 8]*ab[4, 5, 1, 2])])/
       2]*R[2, 4, 5, 7, 8] + 
   intdone[-(Li[1 - (ab[2, 3, 5, 6]*ab[7, 8, 1, 2])/(ab[2, 3, 7, 8]*
            ab[5, 6, 1, 2])]*log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]) - 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[5, 6, 7, 8])/
          (ab[2, 3, 7, 8]*ab[3, 4, 8, 1]*ab[5, 6, 1, 2])]*
        log[(ab[2, 3, 5, 6]*ab[7, 8, 1, 2])/(ab[2, 3, 7, 8]*ab[5, 6, 1, 2])])/
       2]*R[2, 5, 6, 7, 8] + 
   intdone[-(Li[1]*log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]) - 
      Li[1 - (ab[3, 4, 6, 7]*ab[7, 8, 2, 3])/(ab[3, 4, 7, 8]*ab[6, 7, 2, 3])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] - 
      Li[1 - (ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] - 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[3, 4, 1, 2]*ab[4, 5, 6, 7])/(ab[3, 4, 6, 7]*ab[4, 5, 1, 2])]*
        log[(ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])])/
       2 - (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]*log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[5, 6, 7, 8]*
           ab[6, 7, 8, 1])/(ab[3, 4, 7, 8]*ab[4, 5, 1, 2]*ab[5, 6, 8, 1]*
           ab[6, 7, 2, 3])]*log[(ab[3, 4, 6, 7]*ab[7, 8, 2, 3])/
          (ab[3, 4, 7, 8]*ab[6, 7, 2, 3])])/2 - 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[6, 7, 4, 5]*ab[7, 8, 3, 4])/(ab[6, 7, 3, 4]*ab[7, 8, 4, 5])]*
        log[(ab[3, 4, 5, 6]*ab[6, 7, 8, 1])/(ab[6, 7, 3, 4]*ab[8, 1, 5, 6])])/
       2 - (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]*log[(ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/
          (ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
        log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[8, 1, 6, 7])/
          (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*ab[2, 3, 7, 8]*ab[8, 1, 3, 4])])/2]*
    R[3, 4, 5, 6, 7] + 
   intdone[-(Li[1 - (ab[5, 6, 7, 8]*ab[8, 1, 3, 4])/(ab[3, 4, 7, 8]*
            ab[8, 1, 5, 6])]*log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]) - 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[5, 6, 7, 8]*ab[8, 1, 3, 4])/(ab[3, 4, 7, 8]*ab[8, 1, 5, 6])]*
        log[(ab[1, 2, 7, 8]*ab[3, 4, 5, 6]*ab[8, 1, 6, 7])/
          (ab[1, 2, 6, 7]*ab[3, 4, 7, 8]*ab[8, 1, 5, 6])])/2]*
    R[3, 4, 5, 6, 8] + 
   intdone[-(Li[1]*log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]) - 
      Li[1 - (ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] - 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[3, 4, 1, 2]*ab[4, 5, 7, 8])/(ab[3, 4, 7, 8]*ab[4, 5, 1, 2])]*
        log[(ab[3, 4, 5, 6]*ab[7, 8, 2, 3])/(ab[3, 4, 7, 8]*ab[5, 6, 2, 3])])/
       2 - (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]*log[(ab[4, 5, 2, 3]*ab[5, 6, 7, 8])/
          (ab[4, 5, 7, 8]*ab[5, 6, 2, 3])]*
        log[(ab[4, 5, 6, 7]*ab[7, 8, 3, 4])/(ab[4, 5, 7, 8]*ab[6, 7, 3, 4])])/
       2 - (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]*log[(ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/
          (ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
        log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[8, 1, 6, 7])/
          (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*ab[2, 3, 7, 8]*ab[8, 1, 3, 4])])/2]*
    R[3, 4, 5, 7, 8] + 
   intdone[-(Li[1]*log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]) - 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[6, 7, 4, 5]*ab[7, 8, 3, 4])/(ab[6, 7, 3, 4]*ab[7, 8, 4, 5])]*
        log[(ab[3, 4, 5, 6]*ab[6, 7, 8, 1])/(ab[6, 7, 3, 4]*ab[8, 1, 5, 6])])/
       2 - (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]*log[(ab[3, 4, 6, 7]*ab[7, 8, 1, 2])/
          (ab[1, 2, 6, 7]*ab[7, 8, 3, 4])]*
        log[(ab[7, 8, 5, 6]*ab[8, 1, 3, 4])/(ab[7, 8, 3, 4]*ab[8, 1, 5, 6])])/
       2]*R[3, 4, 6, 7, 8] + 
   intdone[-(Li[1 - (ab[3, 4, 5, 6]*ab[7, 8, 2, 3])/(ab[3, 4, 7, 8]*
            ab[5, 6, 2, 3])]*log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]) - 
      Li[1 - (ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] - 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[5, 6, 7, 8])/
          (ab[3, 4, 7, 8]*ab[4, 5, 1, 2]*ab[5, 6, 2, 3])]*
        log[(ab[3, 4, 5, 6]*ab[7, 8, 2, 3])/(ab[3, 4, 7, 8]*ab[5, 6, 2, 3])])/
       2 - (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]*log[(ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/
          (ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
        log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[8, 1, 6, 7])/
          (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*ab[2, 3, 7, 8]*ab[8, 1, 3, 4])])/2]*
    R[3, 5, 6, 7, 8] + 
   intdone[-(Li[1]*log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]) - 
      Li[1 - (ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] - 
      Li[1 - (ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/(ab[4, 5, 8, 1]*ab[7, 8, 3, 4])]*
       log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])] - 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6])/
          (ab[1, 2, 4, 5]*ab[2, 3, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 8, 1])]*
        log[(ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])])/
       2 - (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]*log[(ab[4, 5, 2, 3]*ab[5, 6, 7, 8])/
          (ab[4, 5, 7, 8]*ab[5, 6, 2, 3])]*
        log[(ab[4, 5, 6, 7]*ab[7, 8, 3, 4])/(ab[4, 5, 7, 8]*ab[6, 7, 3, 4])])/
       2 - (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8])]*log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[6, 7, 8, 1]*
           ab[7, 8, 1, 2])/(ab[4, 5, 8, 1]*ab[5, 6, 2, 3]*ab[6, 7, 1, 2]*
           ab[7, 8, 3, 4])]*log[(ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/
          (ab[4, 5, 8, 1]*ab[7, 8, 3, 4])])/2 - 
      (log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*ab[2, 3, 7, 8])]*
        log[(ab[4, 5, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 4, 5])]*
        log[(ab[7, 8, 5, 6]*ab[8, 1, 4, 5])/(ab[7, 8, 4, 5]*ab[8, 1, 5, 6])])/
       2]*R[4, 5, 6, 7, 8]) + Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 4]]*
  (intdone[-(Li[1]*log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]) + 
      Li[1 - (ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[2, 3, 4, 5]*ab[5, 6, 1, 2])/(ab[2, 3, 5, 6]*ab[4, 5, 1, 2])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[1, 2, 4, 5]*ab[5, 6, 8, 1])/(ab[1, 2, 5, 6]*ab[4, 5, 8, 1])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/(ab[2, 3, 6, 7]*ab[5, 6, 1, 2])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[3, 4, 6, 7]*ab[7, 8, 2, 3])/(ab[3, 4, 7, 8]*ab[6, 7, 2, 3])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[4, 5, 6, 7]*ab[7, 8, 3, 4])/(ab[4, 5, 7, 8]*ab[6, 7, 3, 4])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/(ab[4, 5, 8, 1]*ab[7, 8, 3, 4])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      (log[(ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6])/
          (ab[1, 2, 4, 5]*ab[2, 3, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 8, 1])]*
        log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])])/
       2 - (log[(ab[2, 3, 8, 1]*ab[3, 4, 5, 6])/(ab[2, 3, 5, 6]*
           ab[3, 4, 8, 1])]*log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/
          (ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[2, 3, 4, 5]*ab[5, 6, 1, 2])/(ab[2, 3, 5, 6]*ab[4, 5, 1, 2])])/
       2 + (log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
          (ab[2, 3, 5, 6]*ab[3, 4, 6, 7]*ab[3, 4, 8, 1]*ab[4, 5, 1, 2])]*
        log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[2, 3, 4, 5]*ab[5, 6, 1, 2])/(ab[2, 3, 5, 6]*ab[4, 5, 1, 2])])/
       2 - (log[(ab[1, 2, 7, 8]*ab[2, 3, 5, 6])/(ab[1, 2, 5, 6]*
           ab[2, 3, 7, 8])]*log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/
          (ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[1, 2, 3, 4]*ab[5, 6, 8, 1])/(ab[1, 2, 5, 6]*ab[3, 4, 8, 1])])/
       2 + (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[1, 2, 7, 8]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6]*
           ab[4, 5, 6, 7])/(ab[1, 2, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 6, 7]*
           ab[4, 5, 8, 1])]*log[(ab[1, 2, 4, 5]*ab[5, 6, 8, 1])/
          (ab[1, 2, 5, 6]*ab[4, 5, 8, 1])])/2 + 
      (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])/
          (ab[2, 3, 6, 7]*ab[3, 4, 8, 1]*ab[4, 5, 7, 8]*ab[5, 6, 1, 2])]*
        log[(ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/(ab[2, 3, 6, 7]*ab[5, 6, 1, 2])])/
       2 + (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[4, 5, 6, 7]*
           ab[5, 6, 7, 8])/(ab[3, 4, 6, 7]*ab[4, 5, 1, 2]*ab[4, 5, 7, 8]*
           ab[5, 6, 2, 3])]*log[(ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/
          (ab[3, 4, 6, 7]*ab[5, 6, 2, 3])])/2 + 
      (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[5, 6, 7, 8]*ab[6, 7, 8, 1])/
          (ab[3, 4, 7, 8]*ab[4, 5, 1, 2]*ab[5, 6, 8, 1]*ab[6, 7, 2, 3])]*
        log[(ab[3, 4, 6, 7]*ab[7, 8, 2, 3])/(ab[3, 4, 7, 8]*ab[6, 7, 2, 3])])/
       2 + (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[5, 6, 7, 8]*
           ab[6, 7, 8, 1])/(ab[4, 5, 7, 8]*ab[5, 6, 2, 3]*ab[5, 6, 8, 1]*
           ab[6, 7, 3, 4])]*log[(ab[4, 5, 6, 7]*ab[7, 8, 3, 4])/
          (ab[4, 5, 7, 8]*ab[6, 7, 3, 4])])/2 + 
      (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[6, 7, 8, 1]*ab[7, 8, 1, 2])/
          (ab[4, 5, 8, 1]*ab[5, 6, 2, 3]*ab[6, 7, 1, 2]*ab[7, 8, 3, 4])]*
        log[(ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/(ab[4, 5, 8, 1]*ab[7, 8, 3, 4])])/
       2 + (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[5, 6, 3, 4]*ab[6, 7, 4, 5]*ab[6, 7, 8, 1]*
           ab[7, 8, 1, 2])/(ab[5, 6, 8, 1]*ab[6, 7, 1, 2]*ab[6, 7, 3, 4]*
           ab[7, 8, 4, 5])]*log[(ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/
          (ab[5, 6, 8, 1]*ab[7, 8, 4, 5])])/2 + 
      (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
        log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[8, 1, 6, 7])/
          (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*ab[2, 3, 7, 8]*ab[8, 1, 3, 4])])/2 + 
      (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
        log[(ab[1, 2, 3, 4]*ab[7, 8, 5, 6]*ab[8, 1, 2, 3]*ab[8, 1, 6, 7])/
          (ab[1, 2, 6, 7]*ab[7, 8, 2, 3]*ab[8, 1, 3, 4]*ab[8, 1, 5, 6])])/2]*
    R[1, 2, 3, 5, 6] + 
   intdone[-(Li[1 - (ab[2, 3, 4, 5]*ab[5, 6, 8, 1])/(ab[5, 6, 2, 3]*
            ab[8, 1, 4, 5])]*log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/
          (ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]) - 
      (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[2, 3, 4, 5]*ab[5, 6, 8, 1])/(ab[5, 6, 2, 3]*ab[8, 1, 4, 5])]*
        log[(ab[5, 6, 3, 4]*ab[6, 7, 4, 5]*ab[8, 1, 2, 3])/
          (ab[5, 6, 2, 3]*ab[6, 7, 3, 4]*ab[8, 1, 4, 5])])/2]*
    R[1, 2, 3, 5, 8] + 
   intdone[-(Li[1]*log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]) + 
      Li[1 - (ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[2, 3, 4, 5]*ab[5, 6, 1, 2])/(ab[2, 3, 5, 6]*ab[4, 5, 1, 2])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[1, 2, 4, 5]*ab[5, 6, 8, 1])/(ab[1, 2, 5, 6]*ab[4, 5, 8, 1])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/(ab[2, 3, 6, 7]*ab[5, 6, 1, 2])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[3, 4, 6, 7]*ab[7, 8, 2, 3])/(ab[3, 4, 7, 8]*ab[6, 7, 2, 3])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[4, 5, 6, 7]*ab[7, 8, 3, 4])/(ab[4, 5, 7, 8]*ab[6, 7, 3, 4])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/(ab[4, 5, 8, 1]*ab[7, 8, 3, 4])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[1, 2, 5, 6]*ab[6, 7, 8, 1])/(ab[6, 7, 1, 2]*ab[8, 1, 5, 6])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      (log[(ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6])/
          (ab[1, 2, 4, 5]*ab[2, 3, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 8, 1])]*
        log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])])/
       2 + (log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
          (ab[2, 3, 5, 6]*ab[3, 4, 6, 7]*ab[3, 4, 8, 1]*ab[4, 5, 1, 2])]*
        log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[2, 3, 4, 5]*ab[5, 6, 1, 2])/(ab[2, 3, 5, 6]*ab[4, 5, 1, 2])])/
       2 + (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[1, 2, 7, 8]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6]*
           ab[4, 5, 6, 7])/(ab[1, 2, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 6, 7]*
           ab[4, 5, 8, 1])]*log[(ab[1, 2, 4, 5]*ab[5, 6, 8, 1])/
          (ab[1, 2, 5, 6]*ab[4, 5, 8, 1])])/2 - 
      (log[(ab[2, 3, 8, 1]*ab[3, 4, 6, 7])/(ab[2, 3, 6, 7]*ab[3, 4, 8, 1])]*
        log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[2, 3, 4, 5]*ab[6, 7, 1, 2])/(ab[2, 3, 6, 7]*ab[4, 5, 1, 2])])/
       2 + (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[4, 5, 6, 7]*
           ab[5, 6, 7, 8])/(ab[2, 3, 6, 7]*ab[3, 4, 8, 1]*ab[4, 5, 7, 8]*
           ab[5, 6, 1, 2])]*log[(ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/
          (ab[2, 3, 6, 7]*ab[5, 6, 1, 2])])/2 + 
      (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])/
          (ab[3, 4, 6, 7]*ab[4, 5, 1, 2]*ab[4, 5, 7, 8]*ab[5, 6, 2, 3])]*
        log[(ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])])/
       2 - (log[(ab[1, 2, 7, 8]*ab[2, 3, 6, 7])/(ab[1, 2, 6, 7]*
           ab[2, 3, 7, 8])]*log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/
          (ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[1, 2, 3, 4]*ab[6, 7, 8, 1])/(ab[1, 2, 6, 7]*ab[3, 4, 8, 1])])/
       2 + (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[5, 6, 7, 8]*
           ab[6, 7, 8, 1])/(ab[3, 4, 7, 8]*ab[4, 5, 1, 2]*ab[5, 6, 8, 1]*
           ab[6, 7, 2, 3])]*log[(ab[3, 4, 6, 7]*ab[7, 8, 2, 3])/
          (ab[3, 4, 7, 8]*ab[6, 7, 2, 3])])/2 + 
      (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[5, 6, 7, 8]*ab[6, 7, 8, 1])/
          (ab[4, 5, 7, 8]*ab[5, 6, 2, 3]*ab[5, 6, 8, 1]*ab[6, 7, 3, 4])]*
        log[(ab[4, 5, 6, 7]*ab[7, 8, 3, 4])/(ab[4, 5, 7, 8]*ab[6, 7, 3, 4])])/
       2 + (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[6, 7, 8, 1]*
           ab[7, 8, 1, 2])/(ab[4, 5, 8, 1]*ab[5, 6, 2, 3]*ab[6, 7, 1, 2]*
           ab[7, 8, 3, 4])]*log[(ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/
          (ab[4, 5, 8, 1]*ab[7, 8, 3, 4])])/2 + 
      (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[5, 6, 3, 4]*ab[6, 7, 4, 5]*ab[6, 7, 8, 1]*ab[7, 8, 1, 2])/
          (ab[5, 6, 8, 1]*ab[6, 7, 1, 2]*ab[6, 7, 3, 4]*ab[7, 8, 4, 5])]*
        log[(ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])])/
       2 + (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[1, 2, 5, 6]*ab[6, 7, 8, 1])/
          (ab[6, 7, 1, 2]*ab[8, 1, 5, 6])]*
        log[(ab[6, 7, 4, 5]*ab[7, 8, 1, 2]*ab[7, 8, 5, 6]*ab[8, 1, 2, 3])/
          (ab[6, 7, 1, 2]*ab[7, 8, 2, 3]*ab[7, 8, 4, 5]*ab[8, 1, 5, 6])])/2 + 
      (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
        log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[8, 1, 6, 7])/
          (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*ab[2, 3, 7, 8]*ab[8, 1, 3, 4])])/2 + 
      (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
        log[(ab[1, 2, 3, 4]*ab[7, 8, 5, 6]*ab[8, 1, 2, 3]*ab[8, 1, 6, 7])/
          (ab[1, 2, 6, 7]*ab[7, 8, 2, 3]*ab[8, 1, 3, 4]*ab[8, 1, 5, 6])])/2]*
    R[1, 2, 3, 6, 7] + 
   intdone[-(Li[1 - (ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*
            ab[5, 6, 2, 3])]*log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/
          (ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]) - 
      Li[1 - (ab[2, 3, 5, 6]*ab[6, 7, 8, 1])/(ab[6, 7, 2, 3]*ab[8, 1, 5, 6])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] - 
      (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])/
          (ab[3, 4, 6, 7]*ab[4, 5, 1, 2]*ab[4, 5, 7, 8]*ab[5, 6, 2, 3])]*
        log[(ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])])/
       2 - (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[2, 3, 5, 6]*ab[6, 7, 8, 1])/
          (ab[6, 7, 2, 3]*ab[8, 1, 5, 6])]*
        log[(ab[6, 7, 4, 5]*ab[7, 8, 5, 6]*ab[8, 1, 2, 3])/
          (ab[6, 7, 2, 3]*ab[7, 8, 4, 5]*ab[8, 1, 5, 6])])/2]*
    R[1, 2, 3, 6, 8] + 
   intdone[-(Li[1]*log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]) + 
      Li[1 - (ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[2, 3, 4, 5]*ab[5, 6, 1, 2])/(ab[2, 3, 5, 6]*ab[4, 5, 1, 2])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[1, 2, 4, 5]*ab[5, 6, 8, 1])/(ab[1, 2, 5, 6]*ab[4, 5, 8, 1])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/(ab[2, 3, 6, 7]*ab[5, 6, 1, 2])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/(ab[4, 5, 8, 1]*ab[7, 8, 3, 4])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[1, 2, 5, 6]*ab[6, 7, 8, 1])/(ab[6, 7, 1, 2]*ab[8, 1, 5, 6])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      (log[(ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6])/
          (ab[1, 2, 4, 5]*ab[2, 3, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 8, 1])]*
        log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])])/
       2 + (log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
          (ab[2, 3, 5, 6]*ab[3, 4, 6, 7]*ab[3, 4, 8, 1]*ab[4, 5, 1, 2])]*
        log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[2, 3, 4, 5]*ab[5, 6, 1, 2])/(ab[2, 3, 5, 6]*ab[4, 5, 1, 2])])/
       2 + (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[1, 2, 7, 8]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6]*
           ab[4, 5, 6, 7])/(ab[1, 2, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 6, 7]*
           ab[4, 5, 8, 1])]*log[(ab[1, 2, 4, 5]*ab[5, 6, 8, 1])/
          (ab[1, 2, 5, 6]*ab[4, 5, 8, 1])])/2 + 
      (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])/
          (ab[2, 3, 6, 7]*ab[3, 4, 8, 1]*ab[4, 5, 7, 8]*ab[5, 6, 1, 2])]*
        log[(ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/(ab[2, 3, 6, 7]*ab[5, 6, 1, 2])])/
       2 + (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[4, 5, 6, 7]*
           ab[5, 6, 7, 8])/(ab[3, 4, 6, 7]*ab[4, 5, 1, 2]*ab[4, 5, 7, 8]*
           ab[5, 6, 2, 3])]*log[(ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/
          (ab[3, 4, 6, 7]*ab[5, 6, 2, 3])])/2 - 
      (log[(ab[2, 3, 8, 1]*ab[3, 4, 7, 8])/(ab[2, 3, 7, 8]*ab[3, 4, 8, 1])]*
        log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[2, 3, 4, 5]*ab[7, 8, 1, 2])/(ab[2, 3, 7, 8]*ab[4, 5, 1, 2])])/
       2 + (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[6, 7, 8, 1]*
           ab[7, 8, 1, 2])/(ab[4, 5, 8, 1]*ab[5, 6, 2, 3]*ab[6, 7, 1, 2]*
           ab[7, 8, 3, 4])]*log[(ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/
          (ab[4, 5, 8, 1]*ab[7, 8, 3, 4])])/2 + 
      (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[5, 6, 3, 4]*ab[6, 7, 4, 5]*ab[6, 7, 8, 1]*ab[7, 8, 1, 2])/
          (ab[5, 6, 8, 1]*ab[6, 7, 1, 2]*ab[6, 7, 3, 4]*ab[7, 8, 4, 5])]*
        log[(ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])])/
       2 - (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/
          (ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
        log[(ab[7, 8, 5, 6]*ab[8, 1, 2, 3])/(ab[7, 8, 2, 3]*ab[8, 1, 5, 6])])/
       2 + (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[1, 2, 5, 6]*ab[6, 7, 8, 1])/
          (ab[6, 7, 1, 2]*ab[8, 1, 5, 6])]*
        log[(ab[6, 7, 4, 5]*ab[7, 8, 1, 2]*ab[7, 8, 5, 6]*ab[8, 1, 2, 3])/
          (ab[6, 7, 1, 2]*ab[7, 8, 2, 3]*ab[7, 8, 4, 5]*ab[8, 1, 5, 6])])/2 + 
      (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
        log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[8, 1, 6, 7])/
          (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*ab[2, 3, 7, 8]*ab[8, 1, 3, 4])])/2 + 
      (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
        log[(ab[1, 2, 3, 4]*ab[7, 8, 5, 6]*ab[8, 1, 2, 3]*ab[8, 1, 6, 7])/
          (ab[1, 2, 6, 7]*ab[7, 8, 2, 3]*ab[8, 1, 3, 4]*ab[8, 1, 5, 6])])/2]*
    R[1, 2, 3, 7, 8] + 
   intdone[-(Li[1]*log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]) - 
      Li[1 - (ab[2, 3, 4, 5]*ab[5, 6, 1, 2])/(ab[2, 3, 5, 6]*ab[4, 5, 1, 2])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] - 
      (log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
          (ab[2, 3, 5, 6]*ab[3, 4, 6, 7]*ab[3, 4, 8, 1]*ab[4, 5, 1, 2])]*
        log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[2, 3, 4, 5]*ab[5, 6, 1, 2])/(ab[2, 3, 5, 6]*ab[4, 5, 1, 2])])/
       2 - (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[5, 6, 3, 4]*ab[6, 7, 1, 2])/
          (ab[5, 6, 1, 2]*ab[6, 7, 3, 4])]*
        log[(ab[1, 2, 4, 5]*ab[5, 6, 7, 8])/(ab[5, 6, 1, 2]*ab[7, 8, 4, 5])])/
       2 - (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[6, 7, 4, 5]*ab[7, 8, 1, 2])/
          (ab[6, 7, 1, 2]*ab[7, 8, 4, 5])]*
        log[(ab[1, 2, 5, 6]*ab[6, 7, 8, 1])/(ab[6, 7, 1, 2]*ab[8, 1, 5, 6])])/
       2]*R[1, 2, 5, 6, 7] + 
   intdone[-(Li[1]*log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]) - 
      (log[(ab[1, 2, 7, 8]*ab[2, 3, 5, 6])/(ab[1, 2, 5, 6]*ab[2, 3, 7, 8])]*
        log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[1, 2, 3, 4]*ab[5, 6, 8, 1])/(ab[1, 2, 5, 6]*ab[3, 4, 8, 1])])/
       2 - (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[5, 6, 7, 8]*ab[8, 1, 2, 3])/
          (ab[2, 3, 7, 8]*ab[8, 1, 5, 6])]*
        log[(ab[1, 2, 5, 6]*ab[8, 1, 6, 7])/(ab[1, 2, 6, 7]*ab[8, 1, 5, 6])])/
       2]*R[1, 2, 5, 6, 8] + 
   intdone[-(Li[1 - (ab[2, 3, 4, 5]*ab[5, 6, 1, 2])/(ab[2, 3, 5, 6]*
            ab[4, 5, 1, 2])]*log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/
          (ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]) - 
      Li[1 - (ab[1, 2, 4, 5]*ab[5, 6, 7, 8])/(ab[5, 6, 1, 2]*ab[7, 8, 4, 5])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] - 
      (log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
          (ab[2, 3, 5, 6]*ab[3, 4, 6, 7]*ab[3, 4, 8, 1]*ab[4, 5, 1, 2])]*
        log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[2, 3, 4, 5]*ab[5, 6, 1, 2])/(ab[2, 3, 5, 6]*ab[4, 5, 1, 2])])/
       2 - (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[1, 2, 4, 5]*ab[5, 6, 7, 8])/
          (ab[5, 6, 1, 2]*ab[7, 8, 4, 5])]*
        log[(ab[5, 6, 3, 4]*ab[6, 7, 4, 5]*ab[7, 8, 1, 2])/
          (ab[5, 6, 1, 2]*ab[6, 7, 3, 4]*ab[7, 8, 4, 5])])/2]*
    R[1, 2, 5, 7, 8] + 
   intdone[-(Li[1]*log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]) - 
      Li[1 - (ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/(ab[2, 3, 6, 7]*ab[5, 6, 1, 2])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] - 
      Li[1 - (ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] - 
      (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])/
          (ab[2, 3, 6, 7]*ab[3, 4, 8, 1]*ab[4, 5, 7, 8]*ab[5, 6, 1, 2])]*
        log[(ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/(ab[2, 3, 6, 7]*ab[5, 6, 1, 2])])/
       2 - (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[4, 5, 6, 7]*
           ab[5, 6, 7, 8])/(ab[3, 4, 6, 7]*ab[4, 5, 1, 2]*ab[4, 5, 7, 8]*
           ab[5, 6, 2, 3])]*log[(ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/
          (ab[3, 4, 6, 7]*ab[5, 6, 2, 3])])/2 - 
      (log[(ab[1, 2, 7, 8]*ab[2, 3, 6, 7])/(ab[1, 2, 6, 7]*ab[2, 3, 7, 8])]*
        log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[1, 2, 3, 4]*ab[6, 7, 8, 1])/(ab[1, 2, 6, 7]*ab[3, 4, 8, 1])])/
       2 - (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[6, 7, 4, 5]*ab[7, 8, 1, 2])/
          (ab[6, 7, 1, 2]*ab[7, 8, 4, 5])]*
        log[(ab[1, 2, 5, 6]*ab[6, 7, 8, 1])/(ab[6, 7, 1, 2]*ab[8, 1, 5, 6])])/
       2]*R[1, 2, 6, 7, 8] + 
   intdone[Li[1 - (ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*
           ab[3, 4, 8, 1])]*log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/
         (ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[2, 3, 4, 5]*ab[5, 6, 1, 2])/(ab[2, 3, 5, 6]*ab[4, 5, 1, 2])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] - 
      Li[1 - (ab[1, 2, 3, 4]*ab[5, 6, 8, 1])/(ab[1, 2, 5, 6]*ab[3, 4, 8, 1])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[1, 2, 4, 5]*ab[5, 6, 8, 1])/(ab[1, 2, 5, 6]*ab[4, 5, 8, 1])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/(ab[2, 3, 6, 7]*ab[5, 6, 1, 2])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[3, 4, 6, 7]*ab[7, 8, 2, 3])/(ab[3, 4, 7, 8]*ab[6, 7, 2, 3])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[4, 5, 6, 7]*ab[7, 8, 3, 4])/(ab[4, 5, 7, 8]*ab[6, 7, 3, 4])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/(ab[4, 5, 8, 1]*ab[7, 8, 3, 4])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      (log[(ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6])/
          (ab[1, 2, 4, 5]*ab[2, 3, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 8, 1])]*
        log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])])/
       2 + (log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
          (ab[2, 3, 5, 6]*ab[3, 4, 6, 7]*ab[3, 4, 8, 1]*ab[4, 5, 1, 2])]*
        log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[2, 3, 4, 5]*ab[5, 6, 1, 2])/(ab[2, 3, 5, 6]*ab[4, 5, 1, 2])])/
       2 - (log[(ab[1, 2, 7, 8]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6])/
          (ab[1, 2, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 8, 1])]*
        log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[1, 2, 3, 4]*ab[5, 6, 8, 1])/(ab[1, 2, 5, 6]*ab[3, 4, 8, 1])])/
       2 + (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[1, 2, 7, 8]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6]*
           ab[4, 5, 6, 7])/(ab[1, 2, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 6, 7]*
           ab[4, 5, 8, 1])]*log[(ab[1, 2, 4, 5]*ab[5, 6, 8, 1])/
          (ab[1, 2, 5, 6]*ab[4, 5, 8, 1])])/2 + 
      (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])/
          (ab[2, 3, 6, 7]*ab[3, 4, 8, 1]*ab[4, 5, 7, 8]*ab[5, 6, 1, 2])]*
        log[(ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/(ab[2, 3, 6, 7]*ab[5, 6, 1, 2])])/
       2 + (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[4, 5, 6, 7]*
           ab[5, 6, 7, 8])/(ab[3, 4, 6, 7]*ab[4, 5, 1, 2]*ab[4, 5, 7, 8]*
           ab[5, 6, 2, 3])]*log[(ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/
          (ab[3, 4, 6, 7]*ab[5, 6, 2, 3])])/2 + 
      (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[5, 6, 7, 8]*ab[6, 7, 8, 1])/
          (ab[3, 4, 7, 8]*ab[4, 5, 1, 2]*ab[5, 6, 8, 1]*ab[6, 7, 2, 3])]*
        log[(ab[3, 4, 6, 7]*ab[7, 8, 2, 3])/(ab[3, 4, 7, 8]*ab[6, 7, 2, 3])])/
       2 + (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[5, 6, 7, 8]*
           ab[6, 7, 8, 1])/(ab[4, 5, 7, 8]*ab[5, 6, 2, 3]*ab[5, 6, 8, 1]*
           ab[6, 7, 3, 4])]*log[(ab[4, 5, 6, 7]*ab[7, 8, 3, 4])/
          (ab[4, 5, 7, 8]*ab[6, 7, 3, 4])])/2 + 
      (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[6, 7, 8, 1]*ab[7, 8, 1, 2])/
          (ab[4, 5, 8, 1]*ab[5, 6, 2, 3]*ab[6, 7, 1, 2]*ab[7, 8, 3, 4])]*
        log[(ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/(ab[4, 5, 8, 1]*ab[7, 8, 3, 4])])/
       2 + (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[5, 6, 3, 4]*ab[6, 7, 4, 5]*ab[6, 7, 8, 1]*
           ab[7, 8, 1, 2])/(ab[5, 6, 8, 1]*ab[6, 7, 1, 2]*ab[6, 7, 3, 4]*
           ab[7, 8, 4, 5])]*log[(ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/
          (ab[5, 6, 8, 1]*ab[7, 8, 4, 5])])/2 + 
      (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
        log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[8, 1, 6, 7])/
          (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*ab[2, 3, 7, 8]*ab[8, 1, 3, 4])])/2 + 
      (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
        log[(ab[1, 2, 3, 4]*ab[7, 8, 5, 6]*ab[8, 1, 2, 3]*ab[8, 1, 6, 7])/
          (ab[1, 2, 6, 7]*ab[7, 8, 2, 3]*ab[8, 1, 3, 4]*ab[8, 1, 5, 6])])/2]*
    R[1, 3, 4, 5, 6] + 
   intdone[-(Li[1]*log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]) - 
      (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[3, 4, 1, 2]*ab[4, 5, 8, 1])/(ab[3, 4, 8, 1]*ab[4, 5, 1, 2])]*
        log[(ab[3, 4, 5, 6]*ab[8, 1, 2, 3])/(ab[3, 4, 8, 1]*ab[5, 6, 2, 3])])/
       2 - (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[4, 5, 2, 3]*ab[5, 6, 8, 1])/
          (ab[4, 5, 8, 1]*ab[5, 6, 2, 3])]*
        log[(ab[4, 5, 6, 7]*ab[8, 1, 3, 4])/(ab[4, 5, 8, 1]*ab[6, 7, 3, 4])])/
       2]*R[1, 3, 4, 5, 8] + 
   intdone[Li[1 - (ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*
           ab[3, 4, 8, 1])]*log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/
         (ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[2, 3, 4, 5]*ab[5, 6, 1, 2])/(ab[2, 3, 5, 6]*ab[4, 5, 1, 2])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[1, 2, 4, 5]*ab[5, 6, 8, 1])/(ab[1, 2, 5, 6]*ab[4, 5, 8, 1])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/(ab[2, 3, 6, 7]*ab[5, 6, 1, 2])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] - 
      Li[1 - (ab[1, 2, 3, 4]*ab[6, 7, 8, 1])/(ab[1, 2, 6, 7]*ab[3, 4, 8, 1])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[3, 4, 6, 7]*ab[7, 8, 2, 3])/(ab[3, 4, 7, 8]*ab[6, 7, 2, 3])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[4, 5, 6, 7]*ab[7, 8, 3, 4])/(ab[4, 5, 7, 8]*ab[6, 7, 3, 4])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/(ab[4, 5, 8, 1]*ab[7, 8, 3, 4])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[1, 2, 5, 6]*ab[6, 7, 8, 1])/(ab[6, 7, 1, 2]*ab[8, 1, 5, 6])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      (log[(ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6])/
          (ab[1, 2, 4, 5]*ab[2, 3, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 8, 1])]*
        log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])])/
       2 + (log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
          (ab[2, 3, 5, 6]*ab[3, 4, 6, 7]*ab[3, 4, 8, 1]*ab[4, 5, 1, 2])]*
        log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[2, 3, 4, 5]*ab[5, 6, 1, 2])/(ab[2, 3, 5, 6]*ab[4, 5, 1, 2])])/
       2 + (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[1, 2, 7, 8]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6]*
           ab[4, 5, 6, 7])/(ab[1, 2, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 6, 7]*
           ab[4, 5, 8, 1])]*log[(ab[1, 2, 4, 5]*ab[5, 6, 8, 1])/
          (ab[1, 2, 5, 6]*ab[4, 5, 8, 1])])/2 + 
      (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])/
          (ab[2, 3, 6, 7]*ab[3, 4, 8, 1]*ab[4, 5, 7, 8]*ab[5, 6, 1, 2])]*
        log[(ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/(ab[2, 3, 6, 7]*ab[5, 6, 1, 2])])/
       2 + (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[4, 5, 6, 7]*
           ab[5, 6, 7, 8])/(ab[3, 4, 6, 7]*ab[4, 5, 1, 2]*ab[4, 5, 7, 8]*
           ab[5, 6, 2, 3])]*log[(ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/
          (ab[3, 4, 6, 7]*ab[5, 6, 2, 3])])/2 - 
      (log[(ab[1, 2, 7, 8]*ab[2, 3, 8, 1]*ab[3, 4, 6, 7])/
          (ab[1, 2, 6, 7]*ab[2, 3, 7, 8]*ab[3, 4, 8, 1])]*
        log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[1, 2, 3, 4]*ab[6, 7, 8, 1])/(ab[1, 2, 6, 7]*ab[3, 4, 8, 1])])/
       2 + (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[5, 6, 7, 8]*
           ab[6, 7, 8, 1])/(ab[3, 4, 7, 8]*ab[4, 5, 1, 2]*ab[5, 6, 8, 1]*
           ab[6, 7, 2, 3])]*log[(ab[3, 4, 6, 7]*ab[7, 8, 2, 3])/
          (ab[3, 4, 7, 8]*ab[6, 7, 2, 3])])/2 + 
      (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[5, 6, 7, 8]*ab[6, 7, 8, 1])/
          (ab[4, 5, 7, 8]*ab[5, 6, 2, 3]*ab[5, 6, 8, 1]*ab[6, 7, 3, 4])]*
        log[(ab[4, 5, 6, 7]*ab[7, 8, 3, 4])/(ab[4, 5, 7, 8]*ab[6, 7, 3, 4])])/
       2 + (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[6, 7, 8, 1]*
           ab[7, 8, 1, 2])/(ab[4, 5, 8, 1]*ab[5, 6, 2, 3]*ab[6, 7, 1, 2]*
           ab[7, 8, 3, 4])]*log[(ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/
          (ab[4, 5, 8, 1]*ab[7, 8, 3, 4])])/2 + 
      (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[5, 6, 3, 4]*ab[6, 7, 4, 5]*ab[6, 7, 8, 1]*ab[7, 8, 1, 2])/
          (ab[5, 6, 8, 1]*ab[6, 7, 1, 2]*ab[6, 7, 3, 4]*ab[7, 8, 4, 5])]*
        log[(ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])])/
       2 + (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[1, 2, 5, 6]*ab[6, 7, 8, 1])/
          (ab[6, 7, 1, 2]*ab[8, 1, 5, 6])]*
        log[(ab[6, 7, 4, 5]*ab[7, 8, 1, 2]*ab[7, 8, 5, 6]*ab[8, 1, 2, 3])/
          (ab[6, 7, 1, 2]*ab[7, 8, 2, 3]*ab[7, 8, 4, 5]*ab[8, 1, 5, 6])])/2 + 
      (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
        log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[8, 1, 6, 7])/
          (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*ab[2, 3, 7, 8]*ab[8, 1, 3, 4])])/2 + 
      (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
        log[(ab[1, 2, 3, 4]*ab[7, 8, 5, 6]*ab[8, 1, 2, 3]*ab[8, 1, 6, 7])/
          (ab[1, 2, 6, 7]*ab[7, 8, 2, 3]*ab[8, 1, 3, 4]*ab[8, 1, 5, 6])])/2]*
    R[1, 3, 4, 6, 7] + 
   intdone[-(Li[1 - (ab[3, 4, 5, 6]*ab[6, 7, 8, 1])/(ab[6, 7, 3, 4]*
            ab[8, 1, 5, 6])]*log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/
          (ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]) - 
      (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[3, 4, 5, 6]*ab[6, 7, 8, 1])/(ab[6, 7, 3, 4]*ab[8, 1, 5, 6])]*
        log[(ab[6, 7, 4, 5]*ab[7, 8, 5, 6]*ab[8, 1, 3, 4])/
          (ab[6, 7, 3, 4]*ab[7, 8, 4, 5]*ab[8, 1, 5, 6])])/2]*
    R[1, 3, 4, 6, 8] + 
   intdone[-(Li[1]*log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]) + 
      Li[1 - (ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[2, 3, 4, 5]*ab[5, 6, 1, 2])/(ab[2, 3, 5, 6]*ab[4, 5, 1, 2])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[1, 2, 4, 5]*ab[5, 6, 8, 1])/(ab[1, 2, 5, 6]*ab[4, 5, 8, 1])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/(ab[2, 3, 6, 7]*ab[5, 6, 1, 2])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[3, 4, 6, 7]*ab[7, 8, 2, 3])/(ab[3, 4, 7, 8]*ab[6, 7, 2, 3])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/(ab[4, 5, 8, 1]*ab[7, 8, 3, 4])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[1, 2, 5, 6]*ab[6, 7, 8, 1])/(ab[6, 7, 1, 2]*ab[8, 1, 5, 6])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      (log[(ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6])/
          (ab[1, 2, 4, 5]*ab[2, 3, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 8, 1])]*
        log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])])/
       2 + (log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
          (ab[2, 3, 5, 6]*ab[3, 4, 6, 7]*ab[3, 4, 8, 1]*ab[4, 5, 1, 2])]*
        log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[2, 3, 4, 5]*ab[5, 6, 1, 2])/(ab[2, 3, 5, 6]*ab[4, 5, 1, 2])])/
       2 + (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[1, 2, 7, 8]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6]*
           ab[4, 5, 6, 7])/(ab[1, 2, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 6, 7]*
           ab[4, 5, 8, 1])]*log[(ab[1, 2, 4, 5]*ab[5, 6, 8, 1])/
          (ab[1, 2, 5, 6]*ab[4, 5, 8, 1])])/2 + 
      (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])/
          (ab[2, 3, 6, 7]*ab[3, 4, 8, 1]*ab[4, 5, 7, 8]*ab[5, 6, 1, 2])]*
        log[(ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/(ab[2, 3, 6, 7]*ab[5, 6, 1, 2])])/
       2 + (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[4, 5, 6, 7]*
           ab[5, 6, 7, 8])/(ab[3, 4, 6, 7]*ab[4, 5, 1, 2]*ab[4, 5, 7, 8]*
           ab[5, 6, 2, 3])]*log[(ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/
          (ab[3, 4, 6, 7]*ab[5, 6, 2, 3])])/2 + 
      (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[5, 6, 7, 8]*ab[6, 7, 8, 1])/
          (ab[3, 4, 7, 8]*ab[4, 5, 1, 2]*ab[5, 6, 8, 1]*ab[6, 7, 2, 3])]*
        log[(ab[3, 4, 6, 7]*ab[7, 8, 2, 3])/(ab[3, 4, 7, 8]*ab[6, 7, 2, 3])])/
       2 + (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[6, 7, 8, 1]*
           ab[7, 8, 1, 2])/(ab[4, 5, 8, 1]*ab[5, 6, 2, 3]*ab[6, 7, 1, 2]*
           ab[7, 8, 3, 4])]*log[(ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/
          (ab[4, 5, 8, 1]*ab[7, 8, 3, 4])])/2 + 
      (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[5, 6, 3, 4]*ab[6, 7, 4, 5]*ab[6, 7, 8, 1]*ab[7, 8, 1, 2])/
          (ab[5, 6, 8, 1]*ab[6, 7, 1, 2]*ab[6, 7, 3, 4]*ab[7, 8, 4, 5])]*
        log[(ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])])/
       2 + (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[1, 2, 5, 6]*ab[6, 7, 8, 1])/
          (ab[6, 7, 1, 2]*ab[8, 1, 5, 6])]*
        log[(ab[6, 7, 4, 5]*ab[7, 8, 1, 2]*ab[7, 8, 5, 6]*ab[8, 1, 2, 3])/
          (ab[6, 7, 1, 2]*ab[7, 8, 2, 3]*ab[7, 8, 4, 5]*ab[8, 1, 5, 6])])/2 - 
      (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[3, 4, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 3, 4])]*
        log[(ab[7, 8, 5, 6]*ab[8, 1, 3, 4])/(ab[7, 8, 3, 4]*ab[8, 1, 5, 6])])/
       2 - (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/
          (ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
        log[(ab[1, 2, 3, 4]*ab[8, 1, 6, 7])/(ab[1, 2, 6, 7]*ab[8, 1, 3, 4])])/
       2 + (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/
          (ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
        log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[8, 1, 6, 7])/
          (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*ab[2, 3, 7, 8]*ab[8, 1, 3, 4])])/2 + 
      (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
        log[(ab[1, 2, 3, 4]*ab[7, 8, 5, 6]*ab[8, 1, 2, 3]*ab[8, 1, 6, 7])/
          (ab[1, 2, 6, 7]*ab[7, 8, 2, 3]*ab[8, 1, 3, 4]*ab[8, 1, 5, 6])])/2]*
    R[1, 3, 4, 7, 8] + 
   intdone[-(Li[1 - (ab[3, 4, 5, 6]*ab[8, 1, 2, 3])/(ab[3, 4, 8, 1]*
            ab[5, 6, 2, 3])]*log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/
          (ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]) - 
      (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[5, 6, 8, 1])/
          (ab[3, 4, 8, 1]*ab[4, 5, 1, 2]*ab[5, 6, 2, 3])]*
        log[(ab[3, 4, 5, 6]*ab[8, 1, 2, 3])/(ab[3, 4, 8, 1]*ab[5, 6, 2, 3])])/
       2]*R[1, 3, 5, 6, 8] + 
   intdone[-(Li[1 - (ab[3, 4, 6, 7]*ab[8, 1, 2, 3])/(ab[3, 4, 8, 1]*
            ab[6, 7, 2, 3])]*log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/
          (ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]) - 
      (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[6, 7, 8, 1])/
          (ab[3, 4, 8, 1]*ab[4, 5, 1, 2]*ab[6, 7, 2, 3])]*
        log[(ab[3, 4, 6, 7]*ab[8, 1, 2, 3])/(ab[3, 4, 8, 1]*ab[6, 7, 2, 3])])/
       2]*R[1, 3, 6, 7, 8] + 
   intdone[Li[1 - (ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*
           ab[3, 4, 8, 1])]*log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/
         (ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[2, 3, 4, 5]*ab[5, 6, 1, 2])/(ab[2, 3, 5, 6]*ab[4, 5, 1, 2])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[1, 2, 4, 5]*ab[5, 6, 8, 1])/(ab[1, 2, 5, 6]*ab[4, 5, 8, 1])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/(ab[2, 3, 6, 7]*ab[5, 6, 1, 2])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] - 
      Li[1 - (ab[1, 2, 4, 5]*ab[6, 7, 8, 1])/(ab[1, 2, 6, 7]*ab[4, 5, 8, 1])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[3, 4, 6, 7]*ab[7, 8, 2, 3])/(ab[3, 4, 7, 8]*ab[6, 7, 2, 3])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[4, 5, 6, 7]*ab[7, 8, 3, 4])/(ab[4, 5, 7, 8]*ab[6, 7, 3, 4])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/(ab[4, 5, 8, 1]*ab[7, 8, 3, 4])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[1, 2, 5, 6]*ab[6, 7, 8, 1])/(ab[6, 7, 1, 2]*ab[8, 1, 5, 6])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      (log[(ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6])/
          (ab[1, 2, 4, 5]*ab[2, 3, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 8, 1])]*
        log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])])/
       2 + (log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
          (ab[2, 3, 5, 6]*ab[3, 4, 6, 7]*ab[3, 4, 8, 1]*ab[4, 5, 1, 2])]*
        log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[2, 3, 4, 5]*ab[5, 6, 1, 2])/(ab[2, 3, 5, 6]*ab[4, 5, 1, 2])])/
       2 + (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[1, 2, 7, 8]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6]*
           ab[4, 5, 6, 7])/(ab[1, 2, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 6, 7]*
           ab[4, 5, 8, 1])]*log[(ab[1, 2, 4, 5]*ab[5, 6, 8, 1])/
          (ab[1, 2, 5, 6]*ab[4, 5, 8, 1])])/2 + 
      (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])/
          (ab[2, 3, 6, 7]*ab[3, 4, 8, 1]*ab[4, 5, 7, 8]*ab[5, 6, 1, 2])]*
        log[(ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/(ab[2, 3, 6, 7]*ab[5, 6, 1, 2])])/
       2 + (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[4, 5, 6, 7]*
           ab[5, 6, 7, 8])/(ab[3, 4, 6, 7]*ab[4, 5, 1, 2]*ab[4, 5, 7, 8]*
           ab[5, 6, 2, 3])]*log[(ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/
          (ab[3, 4, 6, 7]*ab[5, 6, 2, 3])])/2 - 
      (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[1, 2, 7, 8]*ab[2, 3, 8, 1]*ab[4, 5, 6, 7])/
          (ab[1, 2, 6, 7]*ab[2, 3, 7, 8]*ab[4, 5, 8, 1])]*
        log[(ab[1, 2, 4, 5]*ab[6, 7, 8, 1])/(ab[1, 2, 6, 7]*ab[4, 5, 8, 1])])/
       2 + (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[5, 6, 7, 8]*
           ab[6, 7, 8, 1])/(ab[3, 4, 7, 8]*ab[4, 5, 1, 2]*ab[5, 6, 8, 1]*
           ab[6, 7, 2, 3])]*log[(ab[3, 4, 6, 7]*ab[7, 8, 2, 3])/
          (ab[3, 4, 7, 8]*ab[6, 7, 2, 3])])/2 + 
      (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[5, 6, 7, 8]*ab[6, 7, 8, 1])/
          (ab[4, 5, 7, 8]*ab[5, 6, 2, 3]*ab[5, 6, 8, 1]*ab[6, 7, 3, 4])]*
        log[(ab[4, 5, 6, 7]*ab[7, 8, 3, 4])/(ab[4, 5, 7, 8]*ab[6, 7, 3, 4])])/
       2 + (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[6, 7, 8, 1]*
           ab[7, 8, 1, 2])/(ab[4, 5, 8, 1]*ab[5, 6, 2, 3]*ab[6, 7, 1, 2]*
           ab[7, 8, 3, 4])]*log[(ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/
          (ab[4, 5, 8, 1]*ab[7, 8, 3, 4])])/2 + 
      (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[5, 6, 3, 4]*ab[6, 7, 4, 5]*ab[6, 7, 8, 1]*ab[7, 8, 1, 2])/
          (ab[5, 6, 8, 1]*ab[6, 7, 1, 2]*ab[6, 7, 3, 4]*ab[7, 8, 4, 5])]*
        log[(ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])])/
       2 + (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[1, 2, 5, 6]*ab[6, 7, 8, 1])/
          (ab[6, 7, 1, 2]*ab[8, 1, 5, 6])]*
        log[(ab[6, 7, 4, 5]*ab[7, 8, 1, 2]*ab[7, 8, 5, 6]*ab[8, 1, 2, 3])/
          (ab[6, 7, 1, 2]*ab[7, 8, 2, 3]*ab[7, 8, 4, 5]*ab[8, 1, 5, 6])])/2 + 
      (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
        log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[8, 1, 6, 7])/
          (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*ab[2, 3, 7, 8]*ab[8, 1, 3, 4])])/2 + 
      (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
        log[(ab[1, 2, 3, 4]*ab[7, 8, 5, 6]*ab[8, 1, 2, 3]*ab[8, 1, 6, 7])/
          (ab[1, 2, 6, 7]*ab[7, 8, 2, 3]*ab[8, 1, 3, 4]*ab[8, 1, 5, 6])])/2]*
    R[1, 4, 5, 6, 7] + 
   intdone[-(Li[1]*log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]) - 
      Li[1 - (ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] - 
      (log[(ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6])/
          (ab[1, 2, 4, 5]*ab[2, 3, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 8, 1])]*
        log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])])/
       2 - (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[4, 5, 2, 3]*ab[5, 6, 8, 1])/
          (ab[4, 5, 8, 1]*ab[5, 6, 2, 3])]*
        log[(ab[4, 5, 6, 7]*ab[8, 1, 3, 4])/(ab[4, 5, 8, 1]*ab[6, 7, 3, 4])])/
       2 - (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[5, 6, 3, 4]*ab[6, 7, 8, 1])/
          (ab[5, 6, 8, 1]*ab[6, 7, 3, 4])]*
        log[(ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])])/
       2]*R[1, 4, 5, 6, 8] + 
   intdone[-(Li[1]*log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]) + 
      Li[1 - (ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[2, 3, 4, 5]*ab[5, 6, 1, 2])/(ab[2, 3, 5, 6]*ab[4, 5, 1, 2])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[1, 2, 4, 5]*ab[5, 6, 8, 1])/(ab[1, 2, 5, 6]*ab[4, 5, 8, 1])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/(ab[2, 3, 6, 7]*ab[5, 6, 1, 2])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[3, 4, 6, 7]*ab[7, 8, 2, 3])/(ab[3, 4, 7, 8]*ab[6, 7, 2, 3])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[4, 5, 6, 7]*ab[7, 8, 3, 4])/(ab[4, 5, 7, 8]*ab[6, 7, 3, 4])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/(ab[4, 5, 8, 1]*ab[7, 8, 3, 4])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[1, 2, 5, 6]*ab[6, 7, 8, 1])/(ab[6, 7, 1, 2]*ab[8, 1, 5, 6])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      (log[(ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6])/
          (ab[1, 2, 4, 5]*ab[2, 3, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 8, 1])]*
        log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])])/
       2 + (log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
          (ab[2, 3, 5, 6]*ab[3, 4, 6, 7]*ab[3, 4, 8, 1]*ab[4, 5, 1, 2])]*
        log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[2, 3, 4, 5]*ab[5, 6, 1, 2])/(ab[2, 3, 5, 6]*ab[4, 5, 1, 2])])/
       2 + (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[1, 2, 7, 8]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6]*
           ab[4, 5, 6, 7])/(ab[1, 2, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 6, 7]*
           ab[4, 5, 8, 1])]*log[(ab[1, 2, 4, 5]*ab[5, 6, 8, 1])/
          (ab[1, 2, 5, 6]*ab[4, 5, 8, 1])])/2 + 
      (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])/
          (ab[2, 3, 6, 7]*ab[3, 4, 8, 1]*ab[4, 5, 7, 8]*ab[5, 6, 1, 2])]*
        log[(ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/(ab[2, 3, 6, 7]*ab[5, 6, 1, 2])])/
       2 + (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[4, 5, 6, 7]*
           ab[5, 6, 7, 8])/(ab[3, 4, 6, 7]*ab[4, 5, 1, 2]*ab[4, 5, 7, 8]*
           ab[5, 6, 2, 3])]*log[(ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/
          (ab[3, 4, 6, 7]*ab[5, 6, 2, 3])])/2 + 
      (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[5, 6, 7, 8]*ab[6, 7, 8, 1])/
          (ab[3, 4, 7, 8]*ab[4, 5, 1, 2]*ab[5, 6, 8, 1]*ab[6, 7, 2, 3])]*
        log[(ab[3, 4, 6, 7]*ab[7, 8, 2, 3])/(ab[3, 4, 7, 8]*ab[6, 7, 2, 3])])/
       2 + (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[5, 6, 7, 8]*
           ab[6, 7, 8, 1])/(ab[4, 5, 7, 8]*ab[5, 6, 2, 3]*ab[5, 6, 8, 1]*
           ab[6, 7, 3, 4])]*log[(ab[4, 5, 6, 7]*ab[7, 8, 3, 4])/
          (ab[4, 5, 7, 8]*ab[6, 7, 3, 4])])/2 + 
      (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[6, 7, 8, 1]*ab[7, 8, 1, 2])/
          (ab[4, 5, 8, 1]*ab[5, 6, 2, 3]*ab[6, 7, 1, 2]*ab[7, 8, 3, 4])]*
        log[(ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/(ab[4, 5, 8, 1]*ab[7, 8, 3, 4])])/
       2 + (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[5, 6, 3, 4]*ab[6, 7, 4, 5]*ab[6, 7, 8, 1]*
           ab[7, 8, 1, 2])/(ab[5, 6, 8, 1]*ab[6, 7, 1, 2]*ab[6, 7, 3, 4]*
           ab[7, 8, 4, 5])]*log[(ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/
          (ab[5, 6, 8, 1]*ab[7, 8, 4, 5])])/2 + 
      (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[1, 2, 5, 6]*ab[6, 7, 8, 1])/(ab[6, 7, 1, 2]*ab[8, 1, 5, 6])]*
        log[(ab[6, 7, 4, 5]*ab[7, 8, 1, 2]*ab[7, 8, 5, 6]*ab[8, 1, 2, 3])/
          (ab[6, 7, 1, 2]*ab[7, 8, 2, 3]*ab[7, 8, 4, 5]*ab[8, 1, 5, 6])])/2 - 
      (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[4, 5, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 4, 5])]*
        log[(ab[7, 8, 5, 6]*ab[8, 1, 4, 5])/(ab[7, 8, 4, 5]*ab[8, 1, 5, 6])])/
       2 + (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/
          (ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
        log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[8, 1, 6, 7])/
          (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*ab[2, 3, 7, 8]*ab[8, 1, 3, 4])])/2 - 
      (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[4, 5, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 4, 5])]*
        log[(ab[1, 2, 4, 5]*ab[8, 1, 6, 7])/(ab[1, 2, 6, 7]*ab[8, 1, 4, 5])])/
       2 + (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/
          (ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
        log[(ab[1, 2, 3, 4]*ab[7, 8, 5, 6]*ab[8, 1, 2, 3]*ab[8, 1, 6, 7])/
          (ab[1, 2, 6, 7]*ab[7, 8, 2, 3]*ab[8, 1, 3, 4]*ab[8, 1, 5, 6])])/2]*
    R[1, 4, 5, 7, 8] + 
   intdone[-(Li[1 - (ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*
            ab[3, 4, 8, 1])]*log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/
          (ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]) - 
      Li[1 - (ab[4, 5, 6, 7]*ab[8, 1, 3, 4])/(ab[4, 5, 8, 1]*ab[6, 7, 3, 4])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] - 
      (log[(ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6])/
          (ab[1, 2, 4, 5]*ab[2, 3, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 8, 1])]*
        log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])])/
       2 - (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*
           ab[6, 7, 8, 1])/(ab[4, 5, 8, 1]*ab[5, 6, 2, 3]*ab[6, 7, 3, 4])]*
        log[(ab[4, 5, 6, 7]*ab[8, 1, 3, 4])/(ab[4, 5, 8, 1]*ab[6, 7, 3, 4])])/
       2]*R[1, 4, 6, 7, 8] + 
   intdone[-(Li[1]*log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]) + 
      Li[1 - (ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/(ab[2, 3, 6, 7]*ab[5, 6, 1, 2])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[3, 4, 6, 7]*ab[7, 8, 2, 3])/(ab[3, 4, 7, 8]*ab[6, 7, 2, 3])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[4, 5, 6, 7]*ab[7, 8, 3, 4])/(ab[4, 5, 7, 8]*ab[6, 7, 3, 4])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/(ab[4, 5, 8, 1]*ab[7, 8, 3, 4])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      Li[1 - (ab[1, 2, 5, 6]*ab[6, 7, 8, 1])/(ab[6, 7, 1, 2]*ab[8, 1, 5, 6])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] + 
      (log[(ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6])/
          (ab[1, 2, 4, 5]*ab[2, 3, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 8, 1])]*
        log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])])/
       2 + (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[4, 5, 6, 7]*
           ab[5, 6, 7, 8])/(ab[2, 3, 6, 7]*ab[3, 4, 8, 1]*ab[4, 5, 7, 8]*
           ab[5, 6, 1, 2])]*log[(ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/
          (ab[2, 3, 6, 7]*ab[5, 6, 1, 2])])/2 + 
      (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])/
          (ab[3, 4, 6, 7]*ab[4, 5, 1, 2]*ab[4, 5, 7, 8]*ab[5, 6, 2, 3])]*
        log[(ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])])/
       2 + (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[5, 6, 7, 8]*
           ab[6, 7, 8, 1])/(ab[3, 4, 7, 8]*ab[4, 5, 1, 2]*ab[5, 6, 8, 1]*
           ab[6, 7, 2, 3])]*log[(ab[3, 4, 6, 7]*ab[7, 8, 2, 3])/
          (ab[3, 4, 7, 8]*ab[6, 7, 2, 3])])/2 + 
      (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[5, 6, 7, 8]*ab[6, 7, 8, 1])/
          (ab[4, 5, 7, 8]*ab[5, 6, 2, 3]*ab[5, 6, 8, 1]*ab[6, 7, 3, 4])]*
        log[(ab[4, 5, 6, 7]*ab[7, 8, 3, 4])/(ab[4, 5, 7, 8]*ab[6, 7, 3, 4])])/
       2 + (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[6, 7, 8, 1]*
           ab[7, 8, 1, 2])/(ab[4, 5, 8, 1]*ab[5, 6, 2, 3]*ab[6, 7, 1, 2]*
           ab[7, 8, 3, 4])]*log[(ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/
          (ab[4, 5, 8, 1]*ab[7, 8, 3, 4])])/2 - 
      (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[5, 6, 3, 4]*ab[6, 7, 8, 1])/(ab[5, 6, 8, 1]*ab[6, 7, 3, 4])]*
        log[(ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])])/
       2 + (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[5, 6, 3, 4]*ab[6, 7, 4, 5]*ab[6, 7, 8, 1]*
           ab[7, 8, 1, 2])/(ab[5, 6, 8, 1]*ab[6, 7, 1, 2]*ab[6, 7, 3, 4]*
           ab[7, 8, 4, 5])]*log[(ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/
          (ab[5, 6, 8, 1]*ab[7, 8, 4, 5])])/2 + 
      (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[1, 2, 5, 6]*ab[6, 7, 8, 1])/(ab[6, 7, 1, 2]*ab[8, 1, 5, 6])]*
        log[(ab[6, 7, 4, 5]*ab[7, 8, 1, 2]*ab[7, 8, 5, 6]*ab[8, 1, 2, 3])/
          (ab[6, 7, 1, 2]*ab[7, 8, 2, 3]*ab[7, 8, 4, 5]*ab[8, 1, 5, 6])])/2 + 
      (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
        log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[8, 1, 6, 7])/
          (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*ab[2, 3, 7, 8]*ab[8, 1, 3, 4])])/2 - 
      (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[5, 6, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 5, 6])]*
        log[(ab[1, 2, 5, 6]*ab[8, 1, 6, 7])/(ab[1, 2, 6, 7]*ab[8, 1, 5, 6])])/
       2 + (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/
          (ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
        log[(ab[1, 2, 3, 4]*ab[7, 8, 5, 6]*ab[8, 1, 2, 3]*ab[8, 1, 6, 7])/
          (ab[1, 2, 6, 7]*ab[7, 8, 2, 3]*ab[8, 1, 3, 4]*ab[8, 1, 5, 6])])/2]*
    R[1, 5, 6, 7, 8] + 
   intdone[-(Li[1]*log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]) - 
      (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[5, 6, 3, 4]*ab[6, 7, 2, 3])/(ab[5, 6, 2, 3]*ab[6, 7, 3, 4])]*
        log[(ab[2, 3, 4, 5]*ab[5, 6, 7, 8])/(ab[5, 6, 2, 3]*ab[7, 8, 4, 5])])/
       2 - (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[6, 7, 4, 5]*ab[7, 8, 2, 3])/
          (ab[6, 7, 2, 3]*ab[7, 8, 4, 5])]*
        log[(ab[2, 3, 5, 6]*ab[6, 7, 8, 1])/(ab[6, 7, 2, 3]*ab[8, 1, 5, 6])])/
       2]*R[2, 3, 5, 6, 7] + 
   intdone[-(Li[1 - (ab[5, 6, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*
            ab[8, 1, 5, 6])]*log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/
          (ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]) - 
      (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[5, 6, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 5, 6])]*
        log[(ab[1, 2, 7, 8]*ab[2, 3, 5, 6]*ab[8, 1, 6, 7])/
          (ab[1, 2, 6, 7]*ab[2, 3, 7, 8]*ab[8, 1, 5, 6])])/2]*
    R[2, 3, 5, 6, 8] + 
   intdone[-(Li[1 - (ab[2, 3, 4, 5]*ab[5, 6, 7, 8])/(ab[5, 6, 2, 3]*
            ab[7, 8, 4, 5])]*log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/
          (ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]) - 
      (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[2, 3, 4, 5]*ab[5, 6, 7, 8])/(ab[5, 6, 2, 3]*ab[7, 8, 4, 5])]*
        log[(ab[5, 6, 3, 4]*ab[6, 7, 4, 5]*ab[7, 8, 2, 3])/
          (ab[5, 6, 2, 3]*ab[6, 7, 3, 4]*ab[7, 8, 4, 5])])/2]*
    R[2, 3, 5, 7, 8] + 
   intdone[-(Li[1]*log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]) - 
      Li[1 - (ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] - 
      (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])/
          (ab[3, 4, 6, 7]*ab[4, 5, 1, 2]*ab[4, 5, 7, 8]*ab[5, 6, 2, 3])]*
        log[(ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])])/
       2 - (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[6, 7, 4, 5]*ab[7, 8, 2, 3])/
          (ab[6, 7, 2, 3]*ab[7, 8, 4, 5])]*
        log[(ab[2, 3, 5, 6]*ab[6, 7, 8, 1])/(ab[6, 7, 2, 3]*ab[8, 1, 5, 6])])/
       2 - (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/
          (ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
        log[(ab[7, 8, 5, 6]*ab[8, 1, 2, 3])/(ab[7, 8, 2, 3]*ab[8, 1, 5, 6])])/
       2]*R[2, 3, 6, 7, 8] + 
   intdone[-(Li[1 - (ab[2, 3, 5, 6]*ab[7, 8, 1, 2])/(ab[2, 3, 7, 8]*
            ab[5, 6, 1, 2])]*log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/
          (ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]) - 
      (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[5, 6, 7, 8])/
          (ab[2, 3, 7, 8]*ab[3, 4, 8, 1]*ab[5, 6, 1, 2])]*
        log[(ab[2, 3, 5, 6]*ab[7, 8, 1, 2])/(ab[2, 3, 7, 8]*ab[5, 6, 1, 2])])/
       2]*R[2, 5, 6, 7, 8] + 
   intdone[-(Li[1]*log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]) - 
      Li[1 - (ab[3, 4, 6, 7]*ab[7, 8, 2, 3])/(ab[3, 4, 7, 8]*ab[6, 7, 2, 3])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] - 
      Li[1 - (ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] - 
      (log[(ab[3, 4, 1, 2]*ab[4, 5, 6, 7])/(ab[3, 4, 6, 7]*ab[4, 5, 1, 2])]*
        log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])])/
       2 - (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[5, 6, 7, 8]*
           ab[6, 7, 8, 1])/(ab[3, 4, 7, 8]*ab[4, 5, 1, 2]*ab[5, 6, 8, 1]*
           ab[6, 7, 2, 3])]*log[(ab[3, 4, 6, 7]*ab[7, 8, 2, 3])/
          (ab[3, 4, 7, 8]*ab[6, 7, 2, 3])])/2 - 
      (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[6, 7, 4, 5]*ab[7, 8, 3, 4])/(ab[6, 7, 3, 4]*ab[7, 8, 4, 5])]*
        log[(ab[3, 4, 5, 6]*ab[6, 7, 8, 1])/(ab[6, 7, 3, 4]*ab[8, 1, 5, 6])])/
       2 - (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/
          (ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
        log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[8, 1, 6, 7])/
          (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*ab[2, 3, 7, 8]*ab[8, 1, 3, 4])])/2]*
    R[3, 4, 5, 6, 7] + 
   intdone[-(Li[1 - (ab[5, 6, 7, 8]*ab[8, 1, 3, 4])/(ab[3, 4, 7, 8]*
            ab[8, 1, 5, 6])]*log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/
          (ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]) - 
      (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[5, 6, 7, 8]*ab[8, 1, 3, 4])/(ab[3, 4, 7, 8]*ab[8, 1, 5, 6])]*
        log[(ab[1, 2, 7, 8]*ab[3, 4, 5, 6]*ab[8, 1, 6, 7])/
          (ab[1, 2, 6, 7]*ab[3, 4, 7, 8]*ab[8, 1, 5, 6])])/2]*
    R[3, 4, 5, 6, 8] + 
   intdone[-(Li[1]*log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]) - 
      Li[1 - (ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] - 
      (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[3, 4, 1, 2]*ab[4, 5, 7, 8])/(ab[3, 4, 7, 8]*ab[4, 5, 1, 2])]*
        log[(ab[3, 4, 5, 6]*ab[7, 8, 2, 3])/(ab[3, 4, 7, 8]*ab[5, 6, 2, 3])])/
       2 - (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[4, 5, 2, 3]*ab[5, 6, 7, 8])/
          (ab[4, 5, 7, 8]*ab[5, 6, 2, 3])]*
        log[(ab[4, 5, 6, 7]*ab[7, 8, 3, 4])/(ab[4, 5, 7, 8]*ab[6, 7, 3, 4])])/
       2 - (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/
          (ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
        log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[8, 1, 6, 7])/
          (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*ab[2, 3, 7, 8]*ab[8, 1, 3, 4])])/2]*
    R[3, 4, 5, 7, 8] + 
   intdone[-(Li[1]*log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]) - 
      (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[6, 7, 4, 5]*ab[7, 8, 3, 4])/(ab[6, 7, 3, 4]*ab[7, 8, 4, 5])]*
        log[(ab[3, 4, 5, 6]*ab[6, 7, 8, 1])/(ab[6, 7, 3, 4]*ab[8, 1, 5, 6])])/
       2 - (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[3, 4, 6, 7]*ab[7, 8, 1, 2])/
          (ab[1, 2, 6, 7]*ab[7, 8, 3, 4])]*
        log[(ab[7, 8, 5, 6]*ab[8, 1, 3, 4])/(ab[7, 8, 3, 4]*ab[8, 1, 5, 6])])/
       2]*R[3, 4, 6, 7, 8] + 
   intdone[-(Li[1 - (ab[3, 4, 5, 6]*ab[7, 8, 2, 3])/(ab[3, 4, 7, 8]*
            ab[5, 6, 2, 3])]*log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/
          (ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]) - 
      Li[1 - (ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] - 
      (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[5, 6, 7, 8])/
          (ab[3, 4, 7, 8]*ab[4, 5, 1, 2]*ab[5, 6, 2, 3])]*
        log[(ab[3, 4, 5, 6]*ab[7, 8, 2, 3])/(ab[3, 4, 7, 8]*ab[5, 6, 2, 3])])/
       2 - (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/
          (ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
        log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[8, 1, 6, 7])/
          (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*ab[2, 3, 7, 8]*ab[8, 1, 3, 4])])/2]*
    R[3, 5, 6, 7, 8] + 
   intdone[-(Li[1]*log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]) - 
      Li[1 - (ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] - 
      Li[1 - (ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/(ab[4, 5, 8, 1]*ab[7, 8, 3, 4])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])] - 
      (log[(ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6])/
          (ab[1, 2, 4, 5]*ab[2, 3, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 8, 1])]*
        log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])])/
       2 - (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[4, 5, 2, 3]*ab[5, 6, 7, 8])/
          (ab[4, 5, 7, 8]*ab[5, 6, 2, 3])]*
        log[(ab[4, 5, 6, 7]*ab[7, 8, 3, 4])/(ab[4, 5, 7, 8]*ab[6, 7, 3, 4])])/
       2 - (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[3, 4, 7, 8])]*log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[6, 7, 8, 1]*
           ab[7, 8, 1, 2])/(ab[4, 5, 8, 1]*ab[5, 6, 2, 3]*ab[6, 7, 1, 2]*
           ab[7, 8, 3, 4])]*log[(ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/
          (ab[4, 5, 8, 1]*ab[7, 8, 3, 4])])/2 - 
      (log[(ab[1, 3, 4, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[3, 4, 7, 8])]*
        log[(ab[4, 5, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 4, 5])]*
        log[(ab[7, 8, 5, 6]*ab[8, 1, 4, 5])/(ab[7, 8, 4, 5]*ab[8, 1, 5, 6])])/
       2]*R[4, 5, 6, 7, 8]) + Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 6]]*
  (intdone[-(Li[1]*log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]) + 
      Li[1 - (ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[2, 3, 4, 5]*ab[5, 6, 1, 2])/(ab[2, 3, 5, 6]*ab[4, 5, 1, 2])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/(ab[2, 3, 6, 7]*ab[5, 6, 1, 2])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[3, 4, 6, 7]*ab[7, 8, 2, 3])/(ab[3, 4, 7, 8]*ab[6, 7, 2, 3])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[4, 5, 6, 7]*ab[7, 8, 3, 4])/(ab[4, 5, 7, 8]*ab[6, 7, 3, 4])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/(ab[4, 5, 8, 1]*ab[7, 8, 3, 4])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] - 
      (log[(ab[1, 2, 7, 8]*ab[2, 3, 4, 5])/(ab[1, 2, 4, 5]*ab[2, 3, 7, 8])]*
        log[(ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])]*
        log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])])/
       2 + (log[(ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6])/
          (ab[1, 2, 4, 5]*ab[2, 3, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 8, 1])]*
        log[(ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])]*
        log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])])/
       2 + (log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
          (ab[2, 3, 5, 6]*ab[3, 4, 6, 7]*ab[3, 4, 8, 1]*ab[4, 5, 1, 2])]*
        log[(ab[2, 3, 4, 5]*ab[5, 6, 1, 2])/(ab[2, 3, 5, 6]*ab[4, 5, 1, 2])]*
        log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])])/
       2 + (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]*log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[4, 5, 6, 7]*
           ab[5, 6, 7, 8])/(ab[2, 3, 6, 7]*ab[3, 4, 8, 1]*ab[4, 5, 7, 8]*
           ab[5, 6, 1, 2])]*log[(ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/
          (ab[2, 3, 6, 7]*ab[5, 6, 1, 2])])/2 + 
      (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])/
          (ab[3, 4, 6, 7]*ab[4, 5, 1, 2]*ab[4, 5, 7, 8]*ab[5, 6, 2, 3])]*
        log[(ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])])/
       2 - (log[(ab[4, 5, 2, 3]*ab[5, 6, 1, 2])/(ab[4, 5, 1, 2]*
           ab[5, 6, 2, 3])]*log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/
          (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[1, 2, 3, 4]*ab[4, 5, 6, 7])/(ab[4, 5, 1, 2]*ab[6, 7, 3, 4])])/
       2 + (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]*log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[5, 6, 7, 8]*
           ab[6, 7, 8, 1])/(ab[3, 4, 7, 8]*ab[4, 5, 1, 2]*ab[5, 6, 8, 1]*
           ab[6, 7, 2, 3])]*log[(ab[3, 4, 6, 7]*ab[7, 8, 2, 3])/
          (ab[3, 4, 7, 8]*ab[6, 7, 2, 3])])/2 + 
      (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[5, 6, 7, 8]*ab[6, 7, 8, 1])/
          (ab[4, 5, 7, 8]*ab[5, 6, 2, 3]*ab[5, 6, 8, 1]*ab[6, 7, 3, 4])]*
        log[(ab[4, 5, 6, 7]*ab[7, 8, 3, 4])/(ab[4, 5, 7, 8]*ab[6, 7, 3, 4])])/
       2 + (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]*log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[6, 7, 8, 1]*
           ab[7, 8, 1, 2])/(ab[4, 5, 8, 1]*ab[5, 6, 2, 3]*ab[6, 7, 1, 2]*
           ab[7, 8, 3, 4])]*log[(ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/
          (ab[4, 5, 8, 1]*ab[7, 8, 3, 4])])/2 + 
      (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[5, 6, 3, 4]*ab[6, 7, 4, 5]*ab[6, 7, 8, 1]*ab[7, 8, 1, 2])/
          (ab[5, 6, 8, 1]*ab[6, 7, 1, 2]*ab[6, 7, 3, 4]*ab[7, 8, 4, 5])]*
        log[(ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])])/
       2 + (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]*log[(ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/
          (ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
        log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[8, 1, 6, 7])/
          (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*ab[2, 3, 7, 8]*ab[8, 1, 3, 4])])/2 + 
      (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
        log[(ab[1, 2, 3, 4]*ab[7, 8, 5, 6]*ab[8, 1, 2, 3]*ab[8, 1, 6, 7])/
          (ab[1, 2, 6, 7]*ab[7, 8, 2, 3]*ab[8, 1, 3, 4]*ab[8, 1, 5, 6])])/2]*
    R[1, 2, 3, 4, 5] + 
   intdone[-(Li[1 - (ab[3, 4, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*
            ab[7, 8, 3, 4])]*log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/
          (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]) - 
      Li[1 - (ab[4, 5, 6, 7]*ab[7, 8, 3, 4])/(ab[4, 5, 7, 8]*ab[6, 7, 3, 4])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] - 
      (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[5, 6, 7, 8]*ab[6, 7, 8, 1])/
          (ab[4, 5, 7, 8]*ab[5, 6, 2, 3]*ab[5, 6, 8, 1]*ab[6, 7, 3, 4])]*
        log[(ab[4, 5, 6, 7]*ab[7, 8, 3, 4])/(ab[4, 5, 7, 8]*ab[6, 7, 3, 4])])/
       2 - (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]*log[(ab[3, 4, 6, 7]*ab[7, 8, 1, 2])/
          (ab[1, 2, 6, 7]*ab[7, 8, 3, 4])]*
        log[(ab[1, 2, 3, 4]*ab[7, 8, 5, 6]*ab[8, 1, 6, 7])/
          (ab[1, 2, 6, 7]*ab[7, 8, 3, 4]*ab[8, 1, 5, 6])])/2]*
    R[1, 2, 3, 4, 7] + 
   intdone[-(Li[1]*log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]) - 
      Li[1 - (ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/(ab[4, 5, 8, 1]*ab[7, 8, 3, 4])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] - 
      Li[1 - (ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] - 
      (log[(ab[3, 4, 1, 2]*ab[4, 5, 8, 1])/(ab[3, 4, 8, 1]*ab[4, 5, 1, 2])]*
        log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[3, 4, 5, 6]*ab[8, 1, 2, 3])/(ab[3, 4, 8, 1]*ab[5, 6, 2, 3])])/
       2 - (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]*log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[6, 7, 8, 1]*
           ab[7, 8, 1, 2])/(ab[4, 5, 8, 1]*ab[5, 6, 2, 3]*ab[6, 7, 1, 2]*
           ab[7, 8, 3, 4])]*log[(ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/
          (ab[4, 5, 8, 1]*ab[7, 8, 3, 4])])/2 - 
      (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[5, 6, 3, 4]*ab[6, 7, 4, 5]*ab[6, 7, 8, 1]*ab[7, 8, 1, 2])/
          (ab[5, 6, 8, 1]*ab[6, 7, 1, 2]*ab[6, 7, 3, 4]*ab[7, 8, 4, 5])]*
        log[(ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])])/
       2 - (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]*log[(ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/
          (ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
        log[(ab[1, 2, 3, 4]*ab[8, 1, 6, 7])/(ab[1, 2, 6, 7]*ab[8, 1, 3, 4])])/
       2]*R[1, 2, 3, 4, 8] + 
   intdone[-(Li[1 - (ab[2, 3, 4, 5]*ab[5, 6, 8, 1])/(ab[5, 6, 2, 3]*
            ab[8, 1, 4, 5])]*log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/
          (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]) - 
      (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[2, 3, 4, 5]*ab[5, 6, 8, 1])/(ab[5, 6, 2, 3]*ab[8, 1, 4, 5])]*
        log[(ab[5, 6, 3, 4]*ab[6, 7, 4, 5]*ab[8, 1, 2, 3])/
          (ab[5, 6, 2, 3]*ab[6, 7, 3, 4]*ab[8, 1, 4, 5])])/2]*
    R[1, 2, 3, 5, 8] + 
   intdone[-(Li[1]*log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]) + 
      Li[1 - (ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[2, 3, 4, 5]*ab[5, 6, 1, 2])/(ab[2, 3, 5, 6]*ab[4, 5, 1, 2])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[1, 2, 4, 5]*ab[5, 6, 8, 1])/(ab[1, 2, 5, 6]*ab[4, 5, 8, 1])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/(ab[2, 3, 6, 7]*ab[5, 6, 1, 2])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/(ab[4, 5, 8, 1]*ab[7, 8, 3, 4])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[1, 2, 5, 6]*ab[6, 7, 8, 1])/(ab[6, 7, 1, 2]*ab[8, 1, 5, 6])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      (log[(ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6])/
          (ab[1, 2, 4, 5]*ab[2, 3, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 8, 1])]*
        log[(ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])]*
        log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])])/
       2 + (log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
          (ab[2, 3, 5, 6]*ab[3, 4, 6, 7]*ab[3, 4, 8, 1]*ab[4, 5, 1, 2])]*
        log[(ab[2, 3, 4, 5]*ab[5, 6, 1, 2])/(ab[2, 3, 5, 6]*ab[4, 5, 1, 2])]*
        log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])])/
       2 + (log[(ab[1, 2, 7, 8]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
          (ab[1, 2, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 6, 7]*ab[4, 5, 8, 1])]*
        log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[1, 2, 4, 5]*ab[5, 6, 8, 1])/(ab[1, 2, 5, 6]*ab[4, 5, 8, 1])])/
       2 + (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]*log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[4, 5, 6, 7]*
           ab[5, 6, 7, 8])/(ab[2, 3, 6, 7]*ab[3, 4, 8, 1]*ab[4, 5, 7, 8]*
           ab[5, 6, 1, 2])]*log[(ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/
          (ab[2, 3, 6, 7]*ab[5, 6, 1, 2])])/2 + 
      (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])/
          (ab[3, 4, 6, 7]*ab[4, 5, 1, 2]*ab[4, 5, 7, 8]*ab[5, 6, 2, 3])]*
        log[(ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])])/
       2 - (log[(ab[2, 3, 8, 1]*ab[3, 4, 7, 8])/(ab[2, 3, 7, 8]*
           ab[3, 4, 8, 1])]*log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/
          (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[2, 3, 4, 5]*ab[7, 8, 1, 2])/(ab[2, 3, 7, 8]*ab[4, 5, 1, 2])])/
       2 + (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]*log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[6, 7, 8, 1]*
           ab[7, 8, 1, 2])/(ab[4, 5, 8, 1]*ab[5, 6, 2, 3]*ab[6, 7, 1, 2]*
           ab[7, 8, 3, 4])]*log[(ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/
          (ab[4, 5, 8, 1]*ab[7, 8, 3, 4])])/2 + 
      (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[5, 6, 3, 4]*ab[6, 7, 4, 5]*ab[6, 7, 8, 1]*ab[7, 8, 1, 2])/
          (ab[5, 6, 8, 1]*ab[6, 7, 1, 2]*ab[6, 7, 3, 4]*ab[7, 8, 4, 5])]*
        log[(ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])])/
       2 - (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]*log[(ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/
          (ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
        log[(ab[7, 8, 5, 6]*ab[8, 1, 2, 3])/(ab[7, 8, 2, 3]*ab[8, 1, 5, 6])])/
       2 + (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]*log[(ab[1, 2, 5, 6]*ab[6, 7, 8, 1])/
          (ab[6, 7, 1, 2]*ab[8, 1, 5, 6])]*
        log[(ab[6, 7, 4, 5]*ab[7, 8, 1, 2]*ab[7, 8, 5, 6]*ab[8, 1, 2, 3])/
          (ab[6, 7, 1, 2]*ab[7, 8, 2, 3]*ab[7, 8, 4, 5]*ab[8, 1, 5, 6])])/2 + 
      (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
        log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[8, 1, 6, 7])/
          (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*ab[2, 3, 7, 8]*ab[8, 1, 3, 4])])/2 + 
      (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
        log[(ab[1, 2, 3, 4]*ab[7, 8, 5, 6]*ab[8, 1, 2, 3]*ab[8, 1, 6, 7])/
          (ab[1, 2, 6, 7]*ab[7, 8, 2, 3]*ab[8, 1, 3, 4]*ab[8, 1, 5, 6])])/2]*
    R[1, 2, 3, 7, 8] + 
   intdone[-(Li[1 - (ab[4, 5, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*
            ab[7, 8, 4, 5])]*log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/
          (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]) - 
      (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[4, 5, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 4, 5])]*
        log[(ab[1, 2, 4, 5]*ab[7, 8, 5, 6]*ab[8, 1, 6, 7])/
          (ab[1, 2, 6, 7]*ab[7, 8, 4, 5]*ab[8, 1, 5, 6])])/2]*
    R[1, 2, 4, 5, 7] + 
   intdone[-(Li[1]*log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]) - 
      Li[1 - (ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] - 
      (log[(ab[1, 2, 7, 8]*ab[2, 3, 4, 5])/(ab[1, 2, 4, 5]*ab[2, 3, 7, 8])]*
        log[(ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])]*
        log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])])/
       2 - (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]*log[(ab[5, 6, 3, 4]*ab[6, 7, 4, 5]*ab[6, 7, 8, 1]*
           ab[7, 8, 1, 2])/(ab[5, 6, 8, 1]*ab[6, 7, 1, 2]*ab[6, 7, 3, 4]*
           ab[7, 8, 4, 5])]*log[(ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/
          (ab[5, 6, 8, 1]*ab[7, 8, 4, 5])])/2 - 
      (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[4, 5, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 4, 5])]*
        log[(ab[1, 2, 4, 5]*ab[8, 1, 6, 7])/(ab[1, 2, 6, 7]*ab[8, 1, 4, 5])])/
       2]*R[1, 2, 4, 5, 8] + 
   intdone[-(Li[1 - (ab[1, 2, 3, 4]*ab[4, 5, 7, 8])/(ab[4, 5, 1, 2]*
            ab[7, 8, 3, 4])]*log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/
          (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]) - 
      (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[1, 2, 3, 4]*ab[4, 5, 7, 8])/(ab[4, 5, 1, 2]*ab[7, 8, 3, 4])]*
        log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[7, 8, 1, 2])/
          (ab[4, 5, 1, 2]*ab[5, 6, 2, 3]*ab[7, 8, 3, 4])])/2]*
    R[1, 2, 4, 7, 8] + 
   intdone[-(Li[1 - (ab[2, 3, 4, 5]*ab[5, 6, 1, 2])/(ab[2, 3, 5, 6]*
            ab[4, 5, 1, 2])]*log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/
          (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]) - 
      Li[1 - (ab[1, 2, 4, 5]*ab[5, 6, 7, 8])/(ab[5, 6, 1, 2]*ab[7, 8, 4, 5])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] - 
      (log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
          (ab[2, 3, 5, 6]*ab[3, 4, 6, 7]*ab[3, 4, 8, 1]*ab[4, 5, 1, 2])]*
        log[(ab[2, 3, 4, 5]*ab[5, 6, 1, 2])/(ab[2, 3, 5, 6]*ab[4, 5, 1, 2])]*
        log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])])/
       2 - (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]*log[(ab[1, 2, 4, 5]*ab[5, 6, 7, 8])/
          (ab[5, 6, 1, 2]*ab[7, 8, 4, 5])]*
        log[(ab[5, 6, 3, 4]*ab[6, 7, 4, 5]*ab[7, 8, 1, 2])/
          (ab[5, 6, 1, 2]*ab[6, 7, 3, 4]*ab[7, 8, 4, 5])])/2]*
    R[1, 2, 5, 7, 8] + 
   intdone[Li[1 - (ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*
           ab[3, 4, 8, 1])]*log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/
         (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[2, 3, 4, 5]*ab[5, 6, 1, 2])/(ab[2, 3, 5, 6]*ab[4, 5, 1, 2])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] - 
      Li[1 - (ab[1, 2, 3, 4]*ab[5, 6, 8, 1])/(ab[1, 2, 5, 6]*ab[3, 4, 8, 1])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[1, 2, 4, 5]*ab[5, 6, 8, 1])/(ab[1, 2, 5, 6]*ab[4, 5, 8, 1])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/(ab[2, 3, 6, 7]*ab[5, 6, 1, 2])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[3, 4, 6, 7]*ab[7, 8, 2, 3])/(ab[3, 4, 7, 8]*ab[6, 7, 2, 3])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[4, 5, 6, 7]*ab[7, 8, 3, 4])/(ab[4, 5, 7, 8]*ab[6, 7, 3, 4])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/(ab[4, 5, 8, 1]*ab[7, 8, 3, 4])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      (log[(ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6])/
          (ab[1, 2, 4, 5]*ab[2, 3, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 8, 1])]*
        log[(ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])]*
        log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])])/
       2 + (log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
          (ab[2, 3, 5, 6]*ab[3, 4, 6, 7]*ab[3, 4, 8, 1]*ab[4, 5, 1, 2])]*
        log[(ab[2, 3, 4, 5]*ab[5, 6, 1, 2])/(ab[2, 3, 5, 6]*ab[4, 5, 1, 2])]*
        log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])])/
       2 - (log[(ab[1, 2, 7, 8]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6])/
          (ab[1, 2, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 8, 1])]*
        log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[1, 2, 3, 4]*ab[5, 6, 8, 1])/(ab[1, 2, 5, 6]*ab[3, 4, 8, 1])])/
       2 + (log[(ab[1, 2, 7, 8]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
          (ab[1, 2, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 6, 7]*ab[4, 5, 8, 1])]*
        log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[1, 2, 4, 5]*ab[5, 6, 8, 1])/(ab[1, 2, 5, 6]*ab[4, 5, 8, 1])])/
       2 + (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]*log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[4, 5, 6, 7]*
           ab[5, 6, 7, 8])/(ab[2, 3, 6, 7]*ab[3, 4, 8, 1]*ab[4, 5, 7, 8]*
           ab[5, 6, 1, 2])]*log[(ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/
          (ab[2, 3, 6, 7]*ab[5, 6, 1, 2])])/2 + 
      (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])/
          (ab[3, 4, 6, 7]*ab[4, 5, 1, 2]*ab[4, 5, 7, 8]*ab[5, 6, 2, 3])]*
        log[(ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])])/
       2 + (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]*log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[5, 6, 7, 8]*
           ab[6, 7, 8, 1])/(ab[3, 4, 7, 8]*ab[4, 5, 1, 2]*ab[5, 6, 8, 1]*
           ab[6, 7, 2, 3])]*log[(ab[3, 4, 6, 7]*ab[7, 8, 2, 3])/
          (ab[3, 4, 7, 8]*ab[6, 7, 2, 3])])/2 + 
      (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[5, 6, 7, 8]*ab[6, 7, 8, 1])/
          (ab[4, 5, 7, 8]*ab[5, 6, 2, 3]*ab[5, 6, 8, 1]*ab[6, 7, 3, 4])]*
        log[(ab[4, 5, 6, 7]*ab[7, 8, 3, 4])/(ab[4, 5, 7, 8]*ab[6, 7, 3, 4])])/
       2 + (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]*log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[6, 7, 8, 1]*
           ab[7, 8, 1, 2])/(ab[4, 5, 8, 1]*ab[5, 6, 2, 3]*ab[6, 7, 1, 2]*
           ab[7, 8, 3, 4])]*log[(ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/
          (ab[4, 5, 8, 1]*ab[7, 8, 3, 4])])/2 + 
      (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[5, 6, 3, 4]*ab[6, 7, 4, 5]*ab[6, 7, 8, 1]*ab[7, 8, 1, 2])/
          (ab[5, 6, 8, 1]*ab[6, 7, 1, 2]*ab[6, 7, 3, 4]*ab[7, 8, 4, 5])]*
        log[(ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])])/
       2 + (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]*log[(ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/
          (ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
        log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[8, 1, 6, 7])/
          (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*ab[2, 3, 7, 8]*ab[8, 1, 3, 4])])/2 + 
      (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
        log[(ab[1, 2, 3, 4]*ab[7, 8, 5, 6]*ab[8, 1, 2, 3]*ab[8, 1, 6, 7])/
          (ab[1, 2, 6, 7]*ab[7, 8, 2, 3]*ab[8, 1, 3, 4]*ab[8, 1, 5, 6])])/2]*
    R[1, 3, 4, 5, 6] + 
   intdone[-(Li[1]*log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]) - 
      (log[(ab[3, 4, 1, 2]*ab[4, 5, 8, 1])/(ab[3, 4, 8, 1]*ab[4, 5, 1, 2])]*
        log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[3, 4, 5, 6]*ab[8, 1, 2, 3])/(ab[3, 4, 8, 1]*ab[5, 6, 2, 3])])/
       2 - (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]*log[(ab[4, 5, 2, 3]*ab[5, 6, 8, 1])/
          (ab[4, 5, 8, 1]*ab[5, 6, 2, 3])]*
        log[(ab[4, 5, 6, 7]*ab[8, 1, 3, 4])/(ab[4, 5, 8, 1]*ab[6, 7, 3, 4])])/
       2]*R[1, 3, 4, 5, 8] + 
   intdone[Li[1 - (ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*
           ab[3, 4, 8, 1])]*log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/
         (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[2, 3, 4, 5]*ab[5, 6, 1, 2])/(ab[2, 3, 5, 6]*ab[4, 5, 1, 2])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[1, 2, 4, 5]*ab[5, 6, 8, 1])/(ab[1, 2, 5, 6]*ab[4, 5, 8, 1])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/(ab[2, 3, 6, 7]*ab[5, 6, 1, 2])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] - 
      Li[1 - (ab[1, 2, 3, 4]*ab[6, 7, 8, 1])/(ab[1, 2, 6, 7]*ab[3, 4, 8, 1])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[3, 4, 6, 7]*ab[7, 8, 2, 3])/(ab[3, 4, 7, 8]*ab[6, 7, 2, 3])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[4, 5, 6, 7]*ab[7, 8, 3, 4])/(ab[4, 5, 7, 8]*ab[6, 7, 3, 4])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/(ab[4, 5, 8, 1]*ab[7, 8, 3, 4])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[1, 2, 5, 6]*ab[6, 7, 8, 1])/(ab[6, 7, 1, 2]*ab[8, 1, 5, 6])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      (log[(ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6])/
          (ab[1, 2, 4, 5]*ab[2, 3, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 8, 1])]*
        log[(ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])]*
        log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])])/
       2 + (log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
          (ab[2, 3, 5, 6]*ab[3, 4, 6, 7]*ab[3, 4, 8, 1]*ab[4, 5, 1, 2])]*
        log[(ab[2, 3, 4, 5]*ab[5, 6, 1, 2])/(ab[2, 3, 5, 6]*ab[4, 5, 1, 2])]*
        log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])])/
       2 + (log[(ab[1, 2, 7, 8]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
          (ab[1, 2, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 6, 7]*ab[4, 5, 8, 1])]*
        log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[1, 2, 4, 5]*ab[5, 6, 8, 1])/(ab[1, 2, 5, 6]*ab[4, 5, 8, 1])])/
       2 + (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]*log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[4, 5, 6, 7]*
           ab[5, 6, 7, 8])/(ab[2, 3, 6, 7]*ab[3, 4, 8, 1]*ab[4, 5, 7, 8]*
           ab[5, 6, 1, 2])]*log[(ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/
          (ab[2, 3, 6, 7]*ab[5, 6, 1, 2])])/2 + 
      (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])/
          (ab[3, 4, 6, 7]*ab[4, 5, 1, 2]*ab[4, 5, 7, 8]*ab[5, 6, 2, 3])]*
        log[(ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])])/
       2 - (log[(ab[1, 2, 7, 8]*ab[2, 3, 8, 1]*ab[3, 4, 6, 7])/
          (ab[1, 2, 6, 7]*ab[2, 3, 7, 8]*ab[3, 4, 8, 1])]*
        log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[1, 2, 3, 4]*ab[6, 7, 8, 1])/(ab[1, 2, 6, 7]*ab[3, 4, 8, 1])])/
       2 + (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]*log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[5, 6, 7, 8]*
           ab[6, 7, 8, 1])/(ab[3, 4, 7, 8]*ab[4, 5, 1, 2]*ab[5, 6, 8, 1]*
           ab[6, 7, 2, 3])]*log[(ab[3, 4, 6, 7]*ab[7, 8, 2, 3])/
          (ab[3, 4, 7, 8]*ab[6, 7, 2, 3])])/2 + 
      (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[5, 6, 7, 8]*ab[6, 7, 8, 1])/
          (ab[4, 5, 7, 8]*ab[5, 6, 2, 3]*ab[5, 6, 8, 1]*ab[6, 7, 3, 4])]*
        log[(ab[4, 5, 6, 7]*ab[7, 8, 3, 4])/(ab[4, 5, 7, 8]*ab[6, 7, 3, 4])])/
       2 + (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]*log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[6, 7, 8, 1]*
           ab[7, 8, 1, 2])/(ab[4, 5, 8, 1]*ab[5, 6, 2, 3]*ab[6, 7, 1, 2]*
           ab[7, 8, 3, 4])]*log[(ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/
          (ab[4, 5, 8, 1]*ab[7, 8, 3, 4])])/2 + 
      (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[5, 6, 3, 4]*ab[6, 7, 4, 5]*ab[6, 7, 8, 1]*ab[7, 8, 1, 2])/
          (ab[5, 6, 8, 1]*ab[6, 7, 1, 2]*ab[6, 7, 3, 4]*ab[7, 8, 4, 5])]*
        log[(ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])])/
       2 + (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]*log[(ab[1, 2, 5, 6]*ab[6, 7, 8, 1])/
          (ab[6, 7, 1, 2]*ab[8, 1, 5, 6])]*
        log[(ab[6, 7, 4, 5]*ab[7, 8, 1, 2]*ab[7, 8, 5, 6]*ab[8, 1, 2, 3])/
          (ab[6, 7, 1, 2]*ab[7, 8, 2, 3]*ab[7, 8, 4, 5]*ab[8, 1, 5, 6])])/2 + 
      (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
        log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[8, 1, 6, 7])/
          (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*ab[2, 3, 7, 8]*ab[8, 1, 3, 4])])/2 + 
      (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
        log[(ab[1, 2, 3, 4]*ab[7, 8, 5, 6]*ab[8, 1, 2, 3]*ab[8, 1, 6, 7])/
          (ab[1, 2, 6, 7]*ab[7, 8, 2, 3]*ab[8, 1, 3, 4]*ab[8, 1, 5, 6])])/2]*
    R[1, 3, 4, 6, 7] + 
   intdone[-(Li[1 - (ab[3, 4, 5, 6]*ab[6, 7, 8, 1])/(ab[6, 7, 3, 4]*
            ab[8, 1, 5, 6])]*log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/
          (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]) - 
      (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[3, 4, 5, 6]*ab[6, 7, 8, 1])/(ab[6, 7, 3, 4]*ab[8, 1, 5, 6])]*
        log[(ab[6, 7, 4, 5]*ab[7, 8, 5, 6]*ab[8, 1, 3, 4])/
          (ab[6, 7, 3, 4]*ab[7, 8, 4, 5]*ab[8, 1, 5, 6])])/2]*
    R[1, 3, 4, 6, 8] + 
   intdone[-(Li[1]*log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]) + 
      Li[1 - (ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[2, 3, 4, 5]*ab[5, 6, 1, 2])/(ab[2, 3, 5, 6]*ab[4, 5, 1, 2])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[1, 2, 4, 5]*ab[5, 6, 8, 1])/(ab[1, 2, 5, 6]*ab[4, 5, 8, 1])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/(ab[2, 3, 6, 7]*ab[5, 6, 1, 2])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[3, 4, 6, 7]*ab[7, 8, 2, 3])/(ab[3, 4, 7, 8]*ab[6, 7, 2, 3])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/(ab[4, 5, 8, 1]*ab[7, 8, 3, 4])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[1, 2, 5, 6]*ab[6, 7, 8, 1])/(ab[6, 7, 1, 2]*ab[8, 1, 5, 6])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      (log[(ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6])/
          (ab[1, 2, 4, 5]*ab[2, 3, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 8, 1])]*
        log[(ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])]*
        log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])])/
       2 + (log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
          (ab[2, 3, 5, 6]*ab[3, 4, 6, 7]*ab[3, 4, 8, 1]*ab[4, 5, 1, 2])]*
        log[(ab[2, 3, 4, 5]*ab[5, 6, 1, 2])/(ab[2, 3, 5, 6]*ab[4, 5, 1, 2])]*
        log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])])/
       2 + (log[(ab[1, 2, 7, 8]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
          (ab[1, 2, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 6, 7]*ab[4, 5, 8, 1])]*
        log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[1, 2, 4, 5]*ab[5, 6, 8, 1])/(ab[1, 2, 5, 6]*ab[4, 5, 8, 1])])/
       2 + (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]*log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[4, 5, 6, 7]*
           ab[5, 6, 7, 8])/(ab[2, 3, 6, 7]*ab[3, 4, 8, 1]*ab[4, 5, 7, 8]*
           ab[5, 6, 1, 2])]*log[(ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/
          (ab[2, 3, 6, 7]*ab[5, 6, 1, 2])])/2 + 
      (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])/
          (ab[3, 4, 6, 7]*ab[4, 5, 1, 2]*ab[4, 5, 7, 8]*ab[5, 6, 2, 3])]*
        log[(ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])])/
       2 + (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]*log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[5, 6, 7, 8]*
           ab[6, 7, 8, 1])/(ab[3, 4, 7, 8]*ab[4, 5, 1, 2]*ab[5, 6, 8, 1]*
           ab[6, 7, 2, 3])]*log[(ab[3, 4, 6, 7]*ab[7, 8, 2, 3])/
          (ab[3, 4, 7, 8]*ab[6, 7, 2, 3])])/2 + 
      (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[6, 7, 8, 1]*ab[7, 8, 1, 2])/
          (ab[4, 5, 8, 1]*ab[5, 6, 2, 3]*ab[6, 7, 1, 2]*ab[7, 8, 3, 4])]*
        log[(ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/(ab[4, 5, 8, 1]*ab[7, 8, 3, 4])])/
       2 + (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]*log[(ab[5, 6, 3, 4]*ab[6, 7, 4, 5]*ab[6, 7, 8, 1]*
           ab[7, 8, 1, 2])/(ab[5, 6, 8, 1]*ab[6, 7, 1, 2]*ab[6, 7, 3, 4]*
           ab[7, 8, 4, 5])]*log[(ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/
          (ab[5, 6, 8, 1]*ab[7, 8, 4, 5])])/2 + 
      (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[1, 2, 5, 6]*ab[6, 7, 8, 1])/(ab[6, 7, 1, 2]*ab[8, 1, 5, 6])]*
        log[(ab[6, 7, 4, 5]*ab[7, 8, 1, 2]*ab[7, 8, 5, 6]*ab[8, 1, 2, 3])/
          (ab[6, 7, 1, 2]*ab[7, 8, 2, 3]*ab[7, 8, 4, 5]*ab[8, 1, 5, 6])])/2 - 
      (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[3, 4, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 3, 4])]*
        log[(ab[7, 8, 5, 6]*ab[8, 1, 3, 4])/(ab[7, 8, 3, 4]*ab[8, 1, 5, 6])])/
       2 - (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]*log[(ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/
          (ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
        log[(ab[1, 2, 3, 4]*ab[8, 1, 6, 7])/(ab[1, 2, 6, 7]*ab[8, 1, 3, 4])])/
       2 + (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]*log[(ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/
          (ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
        log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[8, 1, 6, 7])/
          (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*ab[2, 3, 7, 8]*ab[8, 1, 3, 4])])/2 + 
      (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
        log[(ab[1, 2, 3, 4]*ab[7, 8, 5, 6]*ab[8, 1, 2, 3]*ab[8, 1, 6, 7])/
          (ab[1, 2, 6, 7]*ab[7, 8, 2, 3]*ab[8, 1, 3, 4]*ab[8, 1, 5, 6])])/2]*
    R[1, 3, 4, 7, 8] + 
   intdone[-(Li[1 - (ab[3, 4, 5, 6]*ab[8, 1, 2, 3])/(ab[3, 4, 8, 1]*
            ab[5, 6, 2, 3])]*log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/
          (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]) - 
      (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[5, 6, 8, 1])/
          (ab[3, 4, 8, 1]*ab[4, 5, 1, 2]*ab[5, 6, 2, 3])]*
        log[(ab[3, 4, 5, 6]*ab[8, 1, 2, 3])/(ab[3, 4, 8, 1]*ab[5, 6, 2, 3])])/
       2]*R[1, 3, 5, 6, 8] + 
   intdone[-(Li[1 - (ab[3, 4, 6, 7]*ab[8, 1, 2, 3])/(ab[3, 4, 8, 1]*
            ab[6, 7, 2, 3])]*log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/
          (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]) - 
      (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[6, 7, 8, 1])/
          (ab[3, 4, 8, 1]*ab[4, 5, 1, 2]*ab[6, 7, 2, 3])]*
        log[(ab[3, 4, 6, 7]*ab[8, 1, 2, 3])/(ab[3, 4, 8, 1]*ab[6, 7, 2, 3])])/
       2]*R[1, 3, 6, 7, 8] + 
   intdone[Li[1 - (ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*
           ab[3, 4, 8, 1])]*log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/
         (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[2, 3, 4, 5]*ab[5, 6, 1, 2])/(ab[2, 3, 5, 6]*ab[4, 5, 1, 2])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[1, 2, 4, 5]*ab[5, 6, 8, 1])/(ab[1, 2, 5, 6]*ab[4, 5, 8, 1])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/(ab[2, 3, 6, 7]*ab[5, 6, 1, 2])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] - 
      Li[1 - (ab[1, 2, 4, 5]*ab[6, 7, 8, 1])/(ab[1, 2, 6, 7]*ab[4, 5, 8, 1])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[3, 4, 6, 7]*ab[7, 8, 2, 3])/(ab[3, 4, 7, 8]*ab[6, 7, 2, 3])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[4, 5, 6, 7]*ab[7, 8, 3, 4])/(ab[4, 5, 7, 8]*ab[6, 7, 3, 4])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/(ab[4, 5, 8, 1]*ab[7, 8, 3, 4])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[1, 2, 5, 6]*ab[6, 7, 8, 1])/(ab[6, 7, 1, 2]*ab[8, 1, 5, 6])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      (log[(ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6])/
          (ab[1, 2, 4, 5]*ab[2, 3, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 8, 1])]*
        log[(ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])]*
        log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])])/
       2 + (log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
          (ab[2, 3, 5, 6]*ab[3, 4, 6, 7]*ab[3, 4, 8, 1]*ab[4, 5, 1, 2])]*
        log[(ab[2, 3, 4, 5]*ab[5, 6, 1, 2])/(ab[2, 3, 5, 6]*ab[4, 5, 1, 2])]*
        log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])])/
       2 + (log[(ab[1, 2, 7, 8]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
          (ab[1, 2, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 6, 7]*ab[4, 5, 8, 1])]*
        log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[1, 2, 4, 5]*ab[5, 6, 8, 1])/(ab[1, 2, 5, 6]*ab[4, 5, 8, 1])])/
       2 + (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]*log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[4, 5, 6, 7]*
           ab[5, 6, 7, 8])/(ab[2, 3, 6, 7]*ab[3, 4, 8, 1]*ab[4, 5, 7, 8]*
           ab[5, 6, 1, 2])]*log[(ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/
          (ab[2, 3, 6, 7]*ab[5, 6, 1, 2])])/2 + 
      (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])/
          (ab[3, 4, 6, 7]*ab[4, 5, 1, 2]*ab[4, 5, 7, 8]*ab[5, 6, 2, 3])]*
        log[(ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])])/
       2 - (log[(ab[1, 2, 7, 8]*ab[2, 3, 8, 1]*ab[4, 5, 6, 7])/
          (ab[1, 2, 6, 7]*ab[2, 3, 7, 8]*ab[4, 5, 8, 1])]*
        log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[1, 2, 4, 5]*ab[6, 7, 8, 1])/(ab[1, 2, 6, 7]*ab[4, 5, 8, 1])])/
       2 + (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]*log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[5, 6, 7, 8]*
           ab[6, 7, 8, 1])/(ab[3, 4, 7, 8]*ab[4, 5, 1, 2]*ab[5, 6, 8, 1]*
           ab[6, 7, 2, 3])]*log[(ab[3, 4, 6, 7]*ab[7, 8, 2, 3])/
          (ab[3, 4, 7, 8]*ab[6, 7, 2, 3])])/2 + 
      (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[5, 6, 7, 8]*ab[6, 7, 8, 1])/
          (ab[4, 5, 7, 8]*ab[5, 6, 2, 3]*ab[5, 6, 8, 1]*ab[6, 7, 3, 4])]*
        log[(ab[4, 5, 6, 7]*ab[7, 8, 3, 4])/(ab[4, 5, 7, 8]*ab[6, 7, 3, 4])])/
       2 + (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]*log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[6, 7, 8, 1]*
           ab[7, 8, 1, 2])/(ab[4, 5, 8, 1]*ab[5, 6, 2, 3]*ab[6, 7, 1, 2]*
           ab[7, 8, 3, 4])]*log[(ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/
          (ab[4, 5, 8, 1]*ab[7, 8, 3, 4])])/2 + 
      (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[5, 6, 3, 4]*ab[6, 7, 4, 5]*ab[6, 7, 8, 1]*ab[7, 8, 1, 2])/
          (ab[5, 6, 8, 1]*ab[6, 7, 1, 2]*ab[6, 7, 3, 4]*ab[7, 8, 4, 5])]*
        log[(ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])])/
       2 + (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]*log[(ab[1, 2, 5, 6]*ab[6, 7, 8, 1])/
          (ab[6, 7, 1, 2]*ab[8, 1, 5, 6])]*
        log[(ab[6, 7, 4, 5]*ab[7, 8, 1, 2]*ab[7, 8, 5, 6]*ab[8, 1, 2, 3])/
          (ab[6, 7, 1, 2]*ab[7, 8, 2, 3]*ab[7, 8, 4, 5]*ab[8, 1, 5, 6])])/2 + 
      (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
        log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[8, 1, 6, 7])/
          (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*ab[2, 3, 7, 8]*ab[8, 1, 3, 4])])/2 + 
      (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
        log[(ab[1, 2, 3, 4]*ab[7, 8, 5, 6]*ab[8, 1, 2, 3]*ab[8, 1, 6, 7])/
          (ab[1, 2, 6, 7]*ab[7, 8, 2, 3]*ab[8, 1, 3, 4]*ab[8, 1, 5, 6])])/2]*
    R[1, 4, 5, 6, 7] + 
   intdone[-(Li[1]*log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]) - 
      Li[1 - (ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] - 
      (log[(ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6])/
          (ab[1, 2, 4, 5]*ab[2, 3, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 8, 1])]*
        log[(ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])]*
        log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])])/
       2 - (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]*log[(ab[4, 5, 2, 3]*ab[5, 6, 8, 1])/
          (ab[4, 5, 8, 1]*ab[5, 6, 2, 3])]*
        log[(ab[4, 5, 6, 7]*ab[8, 1, 3, 4])/(ab[4, 5, 8, 1]*ab[6, 7, 3, 4])])/
       2 - (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]*log[(ab[5, 6, 3, 4]*ab[6, 7, 8, 1])/
          (ab[5, 6, 8, 1]*ab[6, 7, 3, 4])]*
        log[(ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])])/
       2]*R[1, 4, 5, 6, 8] + 
   intdone[-(Li[1]*log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]) + 
      Li[1 - (ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[2, 3, 4, 5]*ab[5, 6, 1, 2])/(ab[2, 3, 5, 6]*ab[4, 5, 1, 2])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[1, 2, 4, 5]*ab[5, 6, 8, 1])/(ab[1, 2, 5, 6]*ab[4, 5, 8, 1])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/(ab[2, 3, 6, 7]*ab[5, 6, 1, 2])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[3, 4, 6, 7]*ab[7, 8, 2, 3])/(ab[3, 4, 7, 8]*ab[6, 7, 2, 3])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[4, 5, 6, 7]*ab[7, 8, 3, 4])/(ab[4, 5, 7, 8]*ab[6, 7, 3, 4])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/(ab[4, 5, 8, 1]*ab[7, 8, 3, 4])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[1, 2, 5, 6]*ab[6, 7, 8, 1])/(ab[6, 7, 1, 2]*ab[8, 1, 5, 6])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      (log[(ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6])/
          (ab[1, 2, 4, 5]*ab[2, 3, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 8, 1])]*
        log[(ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])]*
        log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])])/
       2 + (log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
          (ab[2, 3, 5, 6]*ab[3, 4, 6, 7]*ab[3, 4, 8, 1]*ab[4, 5, 1, 2])]*
        log[(ab[2, 3, 4, 5]*ab[5, 6, 1, 2])/(ab[2, 3, 5, 6]*ab[4, 5, 1, 2])]*
        log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])])/
       2 + (log[(ab[1, 2, 7, 8]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
          (ab[1, 2, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 6, 7]*ab[4, 5, 8, 1])]*
        log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[1, 2, 4, 5]*ab[5, 6, 8, 1])/(ab[1, 2, 5, 6]*ab[4, 5, 8, 1])])/
       2 + (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]*log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[4, 5, 6, 7]*
           ab[5, 6, 7, 8])/(ab[2, 3, 6, 7]*ab[3, 4, 8, 1]*ab[4, 5, 7, 8]*
           ab[5, 6, 1, 2])]*log[(ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/
          (ab[2, 3, 6, 7]*ab[5, 6, 1, 2])])/2 + 
      (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])/
          (ab[3, 4, 6, 7]*ab[4, 5, 1, 2]*ab[4, 5, 7, 8]*ab[5, 6, 2, 3])]*
        log[(ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])])/
       2 + (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]*log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[5, 6, 7, 8]*
           ab[6, 7, 8, 1])/(ab[3, 4, 7, 8]*ab[4, 5, 1, 2]*ab[5, 6, 8, 1]*
           ab[6, 7, 2, 3])]*log[(ab[3, 4, 6, 7]*ab[7, 8, 2, 3])/
          (ab[3, 4, 7, 8]*ab[6, 7, 2, 3])])/2 + 
      (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[5, 6, 7, 8]*ab[6, 7, 8, 1])/
          (ab[4, 5, 7, 8]*ab[5, 6, 2, 3]*ab[5, 6, 8, 1]*ab[6, 7, 3, 4])]*
        log[(ab[4, 5, 6, 7]*ab[7, 8, 3, 4])/(ab[4, 5, 7, 8]*ab[6, 7, 3, 4])])/
       2 + (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]*log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[6, 7, 8, 1]*
           ab[7, 8, 1, 2])/(ab[4, 5, 8, 1]*ab[5, 6, 2, 3]*ab[6, 7, 1, 2]*
           ab[7, 8, 3, 4])]*log[(ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/
          (ab[4, 5, 8, 1]*ab[7, 8, 3, 4])])/2 + 
      (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[5, 6, 3, 4]*ab[6, 7, 4, 5]*ab[6, 7, 8, 1]*ab[7, 8, 1, 2])/
          (ab[5, 6, 8, 1]*ab[6, 7, 1, 2]*ab[6, 7, 3, 4]*ab[7, 8, 4, 5])]*
        log[(ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])])/
       2 + (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]*log[(ab[1, 2, 5, 6]*ab[6, 7, 8, 1])/
          (ab[6, 7, 1, 2]*ab[8, 1, 5, 6])]*
        log[(ab[6, 7, 4, 5]*ab[7, 8, 1, 2]*ab[7, 8, 5, 6]*ab[8, 1, 2, 3])/
          (ab[6, 7, 1, 2]*ab[7, 8, 2, 3]*ab[7, 8, 4, 5]*ab[8, 1, 5, 6])])/2 - 
      (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[4, 5, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 4, 5])]*
        log[(ab[7, 8, 5, 6]*ab[8, 1, 4, 5])/(ab[7, 8, 4, 5]*ab[8, 1, 5, 6])])/
       2 + (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]*log[(ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/
          (ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
        log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[8, 1, 6, 7])/
          (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*ab[2, 3, 7, 8]*ab[8, 1, 3, 4])])/2 - 
      (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[4, 5, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 4, 5])]*
        log[(ab[1, 2, 4, 5]*ab[8, 1, 6, 7])/(ab[1, 2, 6, 7]*ab[8, 1, 4, 5])])/
       2 + (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]*log[(ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/
          (ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
        log[(ab[1, 2, 3, 4]*ab[7, 8, 5, 6]*ab[8, 1, 2, 3]*ab[8, 1, 6, 7])/
          (ab[1, 2, 6, 7]*ab[7, 8, 2, 3]*ab[8, 1, 3, 4]*ab[8, 1, 5, 6])])/2]*
    R[1, 4, 5, 7, 8] + 
   intdone[-(Li[1 - (ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*
            ab[3, 4, 8, 1])]*log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/
          (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]) - 
      Li[1 - (ab[4, 5, 6, 7]*ab[8, 1, 3, 4])/(ab[4, 5, 8, 1]*ab[6, 7, 3, 4])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] - 
      (log[(ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6])/
          (ab[1, 2, 4, 5]*ab[2, 3, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 8, 1])]*
        log[(ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])]*
        log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])])/
       2 - (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]*log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*
           ab[6, 7, 8, 1])/(ab[4, 5, 8, 1]*ab[5, 6, 2, 3]*ab[6, 7, 3, 4])]*
        log[(ab[4, 5, 6, 7]*ab[8, 1, 3, 4])/(ab[4, 5, 8, 1]*ab[6, 7, 3, 4])])/
       2]*R[1, 4, 6, 7, 8] + 
   intdone[-(Li[1]*log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]) + 
      Li[1 - (ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/(ab[2, 3, 6, 7]*ab[5, 6, 1, 2])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[3, 4, 6, 7]*ab[7, 8, 2, 3])/(ab[3, 4, 7, 8]*ab[6, 7, 2, 3])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[4, 5, 6, 7]*ab[7, 8, 3, 4])/(ab[4, 5, 7, 8]*ab[6, 7, 3, 4])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/(ab[4, 5, 8, 1]*ab[7, 8, 3, 4])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      Li[1 - (ab[1, 2, 5, 6]*ab[6, 7, 8, 1])/(ab[6, 7, 1, 2]*ab[8, 1, 5, 6])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
      (log[(ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6])/
          (ab[1, 2, 4, 5]*ab[2, 3, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 8, 1])]*
        log[(ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])]*
        log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])])/
       2 + (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]*log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[4, 5, 6, 7]*
           ab[5, 6, 7, 8])/(ab[2, 3, 6, 7]*ab[3, 4, 8, 1]*ab[4, 5, 7, 8]*
           ab[5, 6, 1, 2])]*log[(ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/
          (ab[2, 3, 6, 7]*ab[5, 6, 1, 2])])/2 + 
      (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])/
          (ab[3, 4, 6, 7]*ab[4, 5, 1, 2]*ab[4, 5, 7, 8]*ab[5, 6, 2, 3])]*
        log[(ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])])/
       2 + (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]*log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[5, 6, 7, 8]*
           ab[6, 7, 8, 1])/(ab[3, 4, 7, 8]*ab[4, 5, 1, 2]*ab[5, 6, 8, 1]*
           ab[6, 7, 2, 3])]*log[(ab[3, 4, 6, 7]*ab[7, 8, 2, 3])/
          (ab[3, 4, 7, 8]*ab[6, 7, 2, 3])])/2 + 
      (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[5, 6, 7, 8]*ab[6, 7, 8, 1])/
          (ab[4, 5, 7, 8]*ab[5, 6, 2, 3]*ab[5, 6, 8, 1]*ab[6, 7, 3, 4])]*
        log[(ab[4, 5, 6, 7]*ab[7, 8, 3, 4])/(ab[4, 5, 7, 8]*ab[6, 7, 3, 4])])/
       2 + (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]*log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[6, 7, 8, 1]*
           ab[7, 8, 1, 2])/(ab[4, 5, 8, 1]*ab[5, 6, 2, 3]*ab[6, 7, 1, 2]*
           ab[7, 8, 3, 4])]*log[(ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/
          (ab[4, 5, 8, 1]*ab[7, 8, 3, 4])])/2 - 
      (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[5, 6, 3, 4]*ab[6, 7, 8, 1])/(ab[5, 6, 8, 1]*ab[6, 7, 3, 4])]*
        log[(ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])])/
       2 + (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]*log[(ab[5, 6, 3, 4]*ab[6, 7, 4, 5]*ab[6, 7, 8, 1]*
           ab[7, 8, 1, 2])/(ab[5, 6, 8, 1]*ab[6, 7, 1, 2]*ab[6, 7, 3, 4]*
           ab[7, 8, 4, 5])]*log[(ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/
          (ab[5, 6, 8, 1]*ab[7, 8, 4, 5])])/2 + 
      (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[1, 2, 5, 6]*ab[6, 7, 8, 1])/(ab[6, 7, 1, 2]*ab[8, 1, 5, 6])]*
        log[(ab[6, 7, 4, 5]*ab[7, 8, 1, 2]*ab[7, 8, 5, 6]*ab[8, 1, 2, 3])/
          (ab[6, 7, 1, 2]*ab[7, 8, 2, 3]*ab[7, 8, 4, 5]*ab[8, 1, 5, 6])])/2 + 
      (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
        log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[8, 1, 6, 7])/
          (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*ab[2, 3, 7, 8]*ab[8, 1, 3, 4])])/2 - 
      (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[5, 6, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 5, 6])]*
        log[(ab[1, 2, 5, 6]*ab[8, 1, 6, 7])/(ab[1, 2, 6, 7]*ab[8, 1, 5, 6])])/
       2 + (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]*log[(ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/
          (ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
        log[(ab[1, 2, 3, 4]*ab[7, 8, 5, 6]*ab[8, 1, 2, 3]*ab[8, 1, 6, 7])/
          (ab[1, 2, 6, 7]*ab[7, 8, 2, 3]*ab[8, 1, 3, 4]*ab[8, 1, 5, 6])])/2]*
    R[1, 5, 6, 7, 8] + 
   intdone[-(Li[1 - (ab[4, 5, 6, 7]*ab[7, 8, 2, 3])/(ab[2, 3, 6, 7]*
            ab[7, 8, 4, 5])]*log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/
          (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]) - 
      (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[4, 5, 6, 7]*ab[7, 8, 2, 3])/(ab[2, 3, 6, 7]*ab[7, 8, 4, 5])]*
        log[(ab[2, 3, 4, 5]*ab[7, 8, 5, 6]*ab[8, 1, 6, 7])/
          (ab[2, 3, 6, 7]*ab[7, 8, 4, 5]*ab[8, 1, 5, 6])])/2]*
    R[2, 3, 4, 5, 7] + 
   intdone[-(Li[1 - (ab[4, 5, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*
            ab[8, 1, 4, 5])]*log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/
          (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]) - 
      Li[1 - (ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] - 
      (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[5, 6, 3, 4]*ab[6, 7, 4, 5]*ab[6, 7, 8, 1]*ab[7, 8, 1, 2])/
          (ab[5, 6, 8, 1]*ab[6, 7, 1, 2]*ab[6, 7, 3, 4]*ab[7, 8, 4, 5])]*
        log[(ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])])/
       2 - (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]*log[(ab[4, 5, 7, 8]*ab[8, 1, 2, 3])/
          (ab[2, 3, 7, 8]*ab[8, 1, 4, 5])]*
        log[(ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[8, 1, 6, 7])/
          (ab[1, 2, 6, 7]*ab[2, 3, 7, 8]*ab[8, 1, 4, 5])])/2]*
    R[2, 3, 4, 5, 8] + 
   intdone[-(Li[1]*log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]) - 
      (log[(ab[2, 3, 8, 1]*ab[3, 4, 7, 8])/(ab[2, 3, 7, 8]*ab[3, 4, 8, 1])]*
        log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[2, 3, 4, 5]*ab[7, 8, 1, 2])/(ab[2, 3, 7, 8]*ab[4, 5, 1, 2])])/
       2 - (log[(ab[3, 4, 1, 2]*ab[4, 5, 7, 8])/(ab[3, 4, 7, 8]*
           ab[4, 5, 1, 2])]*log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/
          (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[3, 4, 5, 6]*ab[7, 8, 2, 3])/(ab[3, 4, 7, 8]*ab[5, 6, 2, 3])])/
       2]*R[2, 3, 4, 7, 8] + 
   intdone[-(Li[1 - (ab[2, 3, 4, 5]*ab[5, 6, 7, 8])/(ab[5, 6, 2, 3]*
            ab[7, 8, 4, 5])]*log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/
          (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]) - 
      (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[2, 3, 4, 5]*ab[5, 6, 7, 8])/(ab[5, 6, 2, 3]*ab[7, 8, 4, 5])]*
        log[(ab[5, 6, 3, 4]*ab[6, 7, 4, 5]*ab[7, 8, 2, 3])/
          (ab[5, 6, 2, 3]*ab[6, 7, 3, 4]*ab[7, 8, 4, 5])])/2]*
    R[2, 3, 5, 7, 8] + 
   intdone[-(Li[1 - (ab[2, 3, 4, 5]*ab[7, 8, 1, 2])/(ab[2, 3, 7, 8]*
            ab[4, 5, 1, 2])]*log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/
          (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]) - 
      (log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[4, 5, 7, 8])/
          (ab[2, 3, 7, 8]*ab[3, 4, 8, 1]*ab[4, 5, 1, 2])]*
        log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[2, 3, 4, 5]*ab[7, 8, 1, 2])/(ab[2, 3, 7, 8]*ab[4, 5, 1, 2])])/
       2]*R[2, 4, 5, 7, 8] + 
   intdone[-(Li[1]*log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]) - 
      Li[1 - (ab[3, 4, 6, 7]*ab[7, 8, 2, 3])/(ab[3, 4, 7, 8]*ab[6, 7, 2, 3])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] - 
      Li[1 - (ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] - 
      (log[(ab[3, 4, 1, 2]*ab[4, 5, 6, 7])/(ab[3, 4, 6, 7]*ab[4, 5, 1, 2])]*
        log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])])/
       2 - (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]*log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[5, 6, 7, 8]*
           ab[6, 7, 8, 1])/(ab[3, 4, 7, 8]*ab[4, 5, 1, 2]*ab[5, 6, 8, 1]*
           ab[6, 7, 2, 3])]*log[(ab[3, 4, 6, 7]*ab[7, 8, 2, 3])/
          (ab[3, 4, 7, 8]*ab[6, 7, 2, 3])])/2 - 
      (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[6, 7, 4, 5]*ab[7, 8, 3, 4])/(ab[6, 7, 3, 4]*ab[7, 8, 4, 5])]*
        log[(ab[3, 4, 5, 6]*ab[6, 7, 8, 1])/(ab[6, 7, 3, 4]*ab[8, 1, 5, 6])])/
       2 - (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]*log[(ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/
          (ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
        log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[8, 1, 6, 7])/
          (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*ab[2, 3, 7, 8]*ab[8, 1, 3, 4])])/2]*
    R[3, 4, 5, 6, 7] + 
   intdone[-(Li[1 - (ab[5, 6, 7, 8]*ab[8, 1, 3, 4])/(ab[3, 4, 7, 8]*
            ab[8, 1, 5, 6])]*log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/
          (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]) - 
      (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[5, 6, 7, 8]*ab[8, 1, 3, 4])/(ab[3, 4, 7, 8]*ab[8, 1, 5, 6])]*
        log[(ab[1, 2, 7, 8]*ab[3, 4, 5, 6]*ab[8, 1, 6, 7])/
          (ab[1, 2, 6, 7]*ab[3, 4, 7, 8]*ab[8, 1, 5, 6])])/2]*
    R[3, 4, 5, 6, 8] + 
   intdone[-(Li[1]*log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]) - 
      Li[1 - (ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] - 
      (log[(ab[3, 4, 1, 2]*ab[4, 5, 7, 8])/(ab[3, 4, 7, 8]*ab[4, 5, 1, 2])]*
        log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[3, 4, 5, 6]*ab[7, 8, 2, 3])/(ab[3, 4, 7, 8]*ab[5, 6, 2, 3])])/
       2 - (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]*log[(ab[4, 5, 2, 3]*ab[5, 6, 7, 8])/
          (ab[4, 5, 7, 8]*ab[5, 6, 2, 3])]*
        log[(ab[4, 5, 6, 7]*ab[7, 8, 3, 4])/(ab[4, 5, 7, 8]*ab[6, 7, 3, 4])])/
       2 - (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]*log[(ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/
          (ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
        log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[8, 1, 6, 7])/
          (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*ab[2, 3, 7, 8]*ab[8, 1, 3, 4])])/2]*
    R[3, 4, 5, 7, 8] + 
   intdone[-(Li[1]*log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]) - 
      (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[6, 7, 4, 5]*ab[7, 8, 3, 4])/(ab[6, 7, 3, 4]*ab[7, 8, 4, 5])]*
        log[(ab[3, 4, 5, 6]*ab[6, 7, 8, 1])/(ab[6, 7, 3, 4]*ab[8, 1, 5, 6])])/
       2 - (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]*log[(ab[3, 4, 6, 7]*ab[7, 8, 1, 2])/
          (ab[1, 2, 6, 7]*ab[7, 8, 3, 4])]*
        log[(ab[7, 8, 5, 6]*ab[8, 1, 3, 4])/(ab[7, 8, 3, 4]*ab[8, 1, 5, 6])])/
       2]*R[3, 4, 6, 7, 8] + 
   intdone[-(Li[1 - (ab[3, 4, 5, 6]*ab[7, 8, 2, 3])/(ab[3, 4, 7, 8]*
            ab[5, 6, 2, 3])]*log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/
          (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]) - 
      Li[1 - (ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] - 
      (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[5, 6, 7, 8])/
          (ab[3, 4, 7, 8]*ab[4, 5, 1, 2]*ab[5, 6, 2, 3])]*
        log[(ab[3, 4, 5, 6]*ab[7, 8, 2, 3])/(ab[3, 4, 7, 8]*ab[5, 6, 2, 3])])/
       2 - (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]*log[(ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/
          (ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
        log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[8, 1, 6, 7])/
          (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*ab[2, 3, 7, 8]*ab[8, 1, 3, 4])])/2]*
    R[3, 5, 6, 7, 8] + 
   intdone[-(Li[1]*log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]) - 
      Li[1 - (ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] - 
      Li[1 - (ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/(ab[4, 5, 8, 1]*ab[7, 8, 3, 4])]*
       log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] - 
      (log[(ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6])/
          (ab[1, 2, 4, 5]*ab[2, 3, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 8, 1])]*
        log[(ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])]*
        log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])])/
       2 - (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]*log[(ab[4, 5, 2, 3]*ab[5, 6, 7, 8])/
          (ab[4, 5, 7, 8]*ab[5, 6, 2, 3])]*
        log[(ab[4, 5, 6, 7]*ab[7, 8, 3, 4])/(ab[4, 5, 7, 8]*ab[6, 7, 3, 4])])/
       2 - (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])]*log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[6, 7, 8, 1]*
           ab[7, 8, 1, 2])/(ab[4, 5, 8, 1]*ab[5, 6, 2, 3]*ab[6, 7, 1, 2]*
           ab[7, 8, 3, 4])]*log[(ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/
          (ab[4, 5, 8, 1]*ab[7, 8, 3, 4])])/2 - 
      (log[(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])]*
        log[(ab[4, 5, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 4, 5])]*
        log[(ab[7, 8, 5, 6]*ab[8, 1, 4, 5])/(ab[7, 8, 4, 5]*ab[8, 1, 5, 6])])/
       2]*R[4, 5, 6, 7, 8]) + Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 5]]*
  (intdone[-(Li[1 - (ab[3, 4, 5, 6]*ab[6, 7, 1, 2])/(ab[1, 2, 5, 6]*
            ab[6, 7, 3, 4])]*log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]) - 
      (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[3, 4, 5, 6]*ab[6, 7, 1, 2])/(ab[1, 2, 5, 6]*ab[6, 7, 3, 4])]*
        log[(ab[1, 2, 3, 4]*ab[6, 7, 4, 5]*ab[7, 8, 5, 6])/
          (ab[1, 2, 5, 6]*ab[6, 7, 3, 4]*ab[7, 8, 4, 5])])/2]*
    R[1, 2, 3, 4, 6] + 
   intdone[-(Li[1 - (ab[3, 4, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*
            ab[7, 8, 3, 4])]*log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]) - 
      Li[1 - (ab[4, 5, 6, 7]*ab[7, 8, 3, 4])/(ab[4, 5, 7, 8]*ab[6, 7, 3, 4])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] - 
      (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[5, 6, 7, 8]*ab[6, 7, 8, 1])/
          (ab[4, 5, 7, 8]*ab[5, 6, 2, 3]*ab[5, 6, 8, 1]*ab[6, 7, 3, 4])]*
        log[(ab[4, 5, 6, 7]*ab[7, 8, 3, 4])/(ab[4, 5, 7, 8]*ab[6, 7, 3, 4])])/
       2 - (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]*log[(ab[3, 4, 6, 7]*ab[7, 8, 1, 2])/
          (ab[1, 2, 6, 7]*ab[7, 8, 3, 4])]*
        log[(ab[1, 2, 3, 4]*ab[7, 8, 5, 6]*ab[8, 1, 6, 7])/
          (ab[1, 2, 6, 7]*ab[7, 8, 3, 4]*ab[8, 1, 5, 6])])/2]*
    R[1, 2, 3, 4, 7] + 
   intdone[-(Li[1]*log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]) - 
      Li[1 - (ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/(ab[4, 5, 8, 1]*ab[7, 8, 3, 4])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] - 
      Li[1 - (ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] - 
      (log[(ab[3, 4, 1, 2]*ab[4, 5, 8, 1])/(ab[3, 4, 8, 1]*ab[4, 5, 1, 2])]*
        log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[3, 4, 5, 6]*ab[8, 1, 2, 3])/(ab[3, 4, 8, 1]*ab[5, 6, 2, 3])])/
       2 - (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]*log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[6, 7, 8, 1]*
           ab[7, 8, 1, 2])/(ab[4, 5, 8, 1]*ab[5, 6, 2, 3]*ab[6, 7, 1, 2]*
           ab[7, 8, 3, 4])]*log[(ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/
          (ab[4, 5, 8, 1]*ab[7, 8, 3, 4])])/2 - 
      (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[5, 6, 3, 4]*ab[6, 7, 4, 5]*ab[6, 7, 8, 1]*ab[7, 8, 1, 2])/
          (ab[5, 6, 8, 1]*ab[6, 7, 1, 2]*ab[6, 7, 3, 4]*ab[7, 8, 4, 5])]*
        log[(ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])])/
       2 - (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]*log[(ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/
          (ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
        log[(ab[1, 2, 3, 4]*ab[8, 1, 6, 7])/(ab[1, 2, 6, 7]*ab[8, 1, 3, 4])])/
       2]*R[1, 2, 3, 4, 8] + 
   intdone[-(Li[1]*log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]) + 
      Li[1 - (ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[2, 3, 4, 5]*ab[5, 6, 1, 2])/(ab[2, 3, 5, 6]*ab[4, 5, 1, 2])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[1, 2, 4, 5]*ab[5, 6, 8, 1])/(ab[1, 2, 5, 6]*ab[4, 5, 8, 1])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/(ab[2, 3, 6, 7]*ab[5, 6, 1, 2])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[3, 4, 6, 7]*ab[7, 8, 2, 3])/(ab[3, 4, 7, 8]*ab[6, 7, 2, 3])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[4, 5, 6, 7]*ab[7, 8, 3, 4])/(ab[4, 5, 7, 8]*ab[6, 7, 3, 4])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/(ab[4, 5, 8, 1]*ab[7, 8, 3, 4])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[1, 2, 5, 6]*ab[6, 7, 8, 1])/(ab[6, 7, 1, 2]*ab[8, 1, 5, 6])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      (log[(ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6])/
          (ab[1, 2, 4, 5]*ab[2, 3, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 8, 1])]*
        log[(ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])]*
        log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])])/
       2 + (log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
          (ab[2, 3, 5, 6]*ab[3, 4, 6, 7]*ab[3, 4, 8, 1]*ab[4, 5, 1, 2])]*
        log[(ab[2, 3, 4, 5]*ab[5, 6, 1, 2])/(ab[2, 3, 5, 6]*ab[4, 5, 1, 2])]*
        log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])])/
       2 + (log[(ab[1, 2, 7, 8]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
          (ab[1, 2, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 6, 7]*ab[4, 5, 8, 1])]*
        log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[1, 2, 4, 5]*ab[5, 6, 8, 1])/(ab[1, 2, 5, 6]*ab[4, 5, 8, 1])])/
       2 - (log[(ab[2, 3, 8, 1]*ab[3, 4, 6, 7])/(ab[2, 3, 6, 7]*
           ab[3, 4, 8, 1])]*log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[2, 3, 4, 5]*ab[6, 7, 1, 2])/(ab[2, 3, 6, 7]*ab[4, 5, 1, 2])])/
       2 + (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]*log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[4, 5, 6, 7]*
           ab[5, 6, 7, 8])/(ab[2, 3, 6, 7]*ab[3, 4, 8, 1]*ab[4, 5, 7, 8]*
           ab[5, 6, 1, 2])]*log[(ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/
          (ab[2, 3, 6, 7]*ab[5, 6, 1, 2])])/2 + 
      (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])/
          (ab[3, 4, 6, 7]*ab[4, 5, 1, 2]*ab[4, 5, 7, 8]*ab[5, 6, 2, 3])]*
        log[(ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])])/
       2 - (log[(ab[1, 2, 7, 8]*ab[2, 3, 6, 7])/(ab[1, 2, 6, 7]*
           ab[2, 3, 7, 8])]*log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[1, 2, 3, 4]*ab[6, 7, 8, 1])/(ab[1, 2, 6, 7]*ab[3, 4, 8, 1])])/
       2 + (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]*log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[5, 6, 7, 8]*
           ab[6, 7, 8, 1])/(ab[3, 4, 7, 8]*ab[4, 5, 1, 2]*ab[5, 6, 8, 1]*
           ab[6, 7, 2, 3])]*log[(ab[3, 4, 6, 7]*ab[7, 8, 2, 3])/
          (ab[3, 4, 7, 8]*ab[6, 7, 2, 3])])/2 + 
      (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[5, 6, 7, 8]*ab[6, 7, 8, 1])/
          (ab[4, 5, 7, 8]*ab[5, 6, 2, 3]*ab[5, 6, 8, 1]*ab[6, 7, 3, 4])]*
        log[(ab[4, 5, 6, 7]*ab[7, 8, 3, 4])/(ab[4, 5, 7, 8]*ab[6, 7, 3, 4])])/
       2 + (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]*log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[6, 7, 8, 1]*
           ab[7, 8, 1, 2])/(ab[4, 5, 8, 1]*ab[5, 6, 2, 3]*ab[6, 7, 1, 2]*
           ab[7, 8, 3, 4])]*log[(ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/
          (ab[4, 5, 8, 1]*ab[7, 8, 3, 4])])/2 + 
      (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[5, 6, 3, 4]*ab[6, 7, 4, 5]*ab[6, 7, 8, 1]*ab[7, 8, 1, 2])/
          (ab[5, 6, 8, 1]*ab[6, 7, 1, 2]*ab[6, 7, 3, 4]*ab[7, 8, 4, 5])]*
        log[(ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])])/
       2 + (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]*log[(ab[1, 2, 5, 6]*ab[6, 7, 8, 1])/
          (ab[6, 7, 1, 2]*ab[8, 1, 5, 6])]*
        log[(ab[6, 7, 4, 5]*ab[7, 8, 1, 2]*ab[7, 8, 5, 6]*ab[8, 1, 2, 3])/
          (ab[6, 7, 1, 2]*ab[7, 8, 2, 3]*ab[7, 8, 4, 5]*ab[8, 1, 5, 6])])/2 + 
      (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
        log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[8, 1, 6, 7])/
          (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*ab[2, 3, 7, 8]*ab[8, 1, 3, 4])])/2 + 
      (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
        log[(ab[1, 2, 3, 4]*ab[7, 8, 5, 6]*ab[8, 1, 2, 3]*ab[8, 1, 6, 7])/
          (ab[1, 2, 6, 7]*ab[7, 8, 2, 3]*ab[8, 1, 3, 4]*ab[8, 1, 5, 6])])/2]*
    R[1, 2, 3, 6, 7] + 
   intdone[-(Li[1 - (ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*
            ab[5, 6, 2, 3])]*log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]) - 
      Li[1 - (ab[2, 3, 5, 6]*ab[6, 7, 8, 1])/(ab[6, 7, 2, 3]*ab[8, 1, 5, 6])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] - 
      (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])/
          (ab[3, 4, 6, 7]*ab[4, 5, 1, 2]*ab[4, 5, 7, 8]*ab[5, 6, 2, 3])]*
        log[(ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])])/
       2 - (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]*log[(ab[2, 3, 5, 6]*ab[6, 7, 8, 1])/
          (ab[6, 7, 2, 3]*ab[8, 1, 5, 6])]*
        log[(ab[6, 7, 4, 5]*ab[7, 8, 5, 6]*ab[8, 1, 2, 3])/
          (ab[6, 7, 2, 3]*ab[7, 8, 4, 5]*ab[8, 1, 5, 6])])/2]*
    R[1, 2, 3, 6, 8] + 
   intdone[-(Li[1]*log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]) + 
      Li[1 - (ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[2, 3, 4, 5]*ab[5, 6, 1, 2])/(ab[2, 3, 5, 6]*ab[4, 5, 1, 2])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[1, 2, 4, 5]*ab[5, 6, 8, 1])/(ab[1, 2, 5, 6]*ab[4, 5, 8, 1])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/(ab[2, 3, 6, 7]*ab[5, 6, 1, 2])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/(ab[4, 5, 8, 1]*ab[7, 8, 3, 4])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[1, 2, 5, 6]*ab[6, 7, 8, 1])/(ab[6, 7, 1, 2]*ab[8, 1, 5, 6])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      (log[(ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6])/
          (ab[1, 2, 4, 5]*ab[2, 3, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 8, 1])]*
        log[(ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])]*
        log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])])/
       2 + (log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
          (ab[2, 3, 5, 6]*ab[3, 4, 6, 7]*ab[3, 4, 8, 1]*ab[4, 5, 1, 2])]*
        log[(ab[2, 3, 4, 5]*ab[5, 6, 1, 2])/(ab[2, 3, 5, 6]*ab[4, 5, 1, 2])]*
        log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])])/
       2 + (log[(ab[1, 2, 7, 8]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
          (ab[1, 2, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 6, 7]*ab[4, 5, 8, 1])]*
        log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[1, 2, 4, 5]*ab[5, 6, 8, 1])/(ab[1, 2, 5, 6]*ab[4, 5, 8, 1])])/
       2 + (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]*log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[4, 5, 6, 7]*
           ab[5, 6, 7, 8])/(ab[2, 3, 6, 7]*ab[3, 4, 8, 1]*ab[4, 5, 7, 8]*
           ab[5, 6, 1, 2])]*log[(ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/
          (ab[2, 3, 6, 7]*ab[5, 6, 1, 2])])/2 + 
      (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])/
          (ab[3, 4, 6, 7]*ab[4, 5, 1, 2]*ab[4, 5, 7, 8]*ab[5, 6, 2, 3])]*
        log[(ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])])/
       2 - (log[(ab[2, 3, 8, 1]*ab[3, 4, 7, 8])/(ab[2, 3, 7, 8]*
           ab[3, 4, 8, 1])]*log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[2, 3, 4, 5]*ab[7, 8, 1, 2])/(ab[2, 3, 7, 8]*ab[4, 5, 1, 2])])/
       2 + (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]*log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[6, 7, 8, 1]*
           ab[7, 8, 1, 2])/(ab[4, 5, 8, 1]*ab[5, 6, 2, 3]*ab[6, 7, 1, 2]*
           ab[7, 8, 3, 4])]*log[(ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/
          (ab[4, 5, 8, 1]*ab[7, 8, 3, 4])])/2 + 
      (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[5, 6, 3, 4]*ab[6, 7, 4, 5]*ab[6, 7, 8, 1]*ab[7, 8, 1, 2])/
          (ab[5, 6, 8, 1]*ab[6, 7, 1, 2]*ab[6, 7, 3, 4]*ab[7, 8, 4, 5])]*
        log[(ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])])/
       2 - (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]*log[(ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/
          (ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
        log[(ab[7, 8, 5, 6]*ab[8, 1, 2, 3])/(ab[7, 8, 2, 3]*ab[8, 1, 5, 6])])/
       2 + (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]*log[(ab[1, 2, 5, 6]*ab[6, 7, 8, 1])/
          (ab[6, 7, 1, 2]*ab[8, 1, 5, 6])]*
        log[(ab[6, 7, 4, 5]*ab[7, 8, 1, 2]*ab[7, 8, 5, 6]*ab[8, 1, 2, 3])/
          (ab[6, 7, 1, 2]*ab[7, 8, 2, 3]*ab[7, 8, 4, 5]*ab[8, 1, 5, 6])])/2 + 
      (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
        log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[8, 1, 6, 7])/
          (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*ab[2, 3, 7, 8]*ab[8, 1, 3, 4])])/2 + 
      (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
        log[(ab[1, 2, 3, 4]*ab[7, 8, 5, 6]*ab[8, 1, 2, 3]*ab[8, 1, 6, 7])/
          (ab[1, 2, 6, 7]*ab[7, 8, 2, 3]*ab[8, 1, 3, 4]*ab[8, 1, 5, 6])])/2]*
    R[1, 2, 3, 7, 8] + 
   intdone[-(Li[1 - (ab[1, 2, 3, 4]*ab[4, 5, 6, 7])/(ab[4, 5, 1, 2]*
            ab[6, 7, 3, 4])]*log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]) - 
      (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[1, 2, 3, 4]*ab[4, 5, 6, 7])/(ab[4, 5, 1, 2]*ab[6, 7, 3, 4])]*
        log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[6, 7, 1, 2])/
          (ab[4, 5, 1, 2]*ab[5, 6, 2, 3]*ab[6, 7, 3, 4])])/2]*
    R[1, 2, 4, 6, 7] + 
   intdone[-(Li[1 - (ab[1, 2, 3, 4]*ab[4, 5, 7, 8])/(ab[4, 5, 1, 2]*
            ab[7, 8, 3, 4])]*log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]) - 
      (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[1, 2, 3, 4]*ab[4, 5, 7, 8])/(ab[4, 5, 1, 2]*ab[7, 8, 3, 4])]*
        log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[7, 8, 1, 2])/
          (ab[4, 5, 1, 2]*ab[5, 6, 2, 3]*ab[7, 8, 3, 4])])/2]*
    R[1, 2, 4, 7, 8] + 
   intdone[-(Li[1]*log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]) - 
      Li[1 - (ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/(ab[2, 3, 6, 7]*ab[5, 6, 1, 2])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] - 
      Li[1 - (ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] - 
      (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])/
          (ab[2, 3, 6, 7]*ab[3, 4, 8, 1]*ab[4, 5, 7, 8]*ab[5, 6, 1, 2])]*
        log[(ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/(ab[2, 3, 6, 7]*ab[5, 6, 1, 2])])/
       2 - (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]*log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[4, 5, 6, 7]*
           ab[5, 6, 7, 8])/(ab[3, 4, 6, 7]*ab[4, 5, 1, 2]*ab[4, 5, 7, 8]*
           ab[5, 6, 2, 3])]*log[(ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/
          (ab[3, 4, 6, 7]*ab[5, 6, 2, 3])])/2 - 
      (log[(ab[1, 2, 7, 8]*ab[2, 3, 6, 7])/(ab[1, 2, 6, 7]*ab[2, 3, 7, 8])]*
        log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[1, 2, 3, 4]*ab[6, 7, 8, 1])/(ab[1, 2, 6, 7]*ab[3, 4, 8, 1])])/
       2 - (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]*log[(ab[6, 7, 4, 5]*ab[7, 8, 1, 2])/
          (ab[6, 7, 1, 2]*ab[7, 8, 4, 5])]*
        log[(ab[1, 2, 5, 6]*ab[6, 7, 8, 1])/(ab[6, 7, 1, 2]*ab[8, 1, 5, 6])])/
       2]*R[1, 2, 6, 7, 8] + 
   intdone[Li[1 - (ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*
           ab[3, 4, 8, 1])]*log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[2, 3, 4, 5]*ab[5, 6, 1, 2])/(ab[2, 3, 5, 6]*ab[4, 5, 1, 2])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] - 
      Li[1 - (ab[1, 2, 3, 4]*ab[5, 6, 8, 1])/(ab[1, 2, 5, 6]*ab[3, 4, 8, 1])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[1, 2, 4, 5]*ab[5, 6, 8, 1])/(ab[1, 2, 5, 6]*ab[4, 5, 8, 1])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/(ab[2, 3, 6, 7]*ab[5, 6, 1, 2])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[3, 4, 6, 7]*ab[7, 8, 2, 3])/(ab[3, 4, 7, 8]*ab[6, 7, 2, 3])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[4, 5, 6, 7]*ab[7, 8, 3, 4])/(ab[4, 5, 7, 8]*ab[6, 7, 3, 4])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/(ab[4, 5, 8, 1]*ab[7, 8, 3, 4])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      (log[(ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6])/
          (ab[1, 2, 4, 5]*ab[2, 3, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 8, 1])]*
        log[(ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])]*
        log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])])/
       2 + (log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
          (ab[2, 3, 5, 6]*ab[3, 4, 6, 7]*ab[3, 4, 8, 1]*ab[4, 5, 1, 2])]*
        log[(ab[2, 3, 4, 5]*ab[5, 6, 1, 2])/(ab[2, 3, 5, 6]*ab[4, 5, 1, 2])]*
        log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])])/
       2 - (log[(ab[1, 2, 7, 8]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6])/
          (ab[1, 2, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 8, 1])]*
        log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[1, 2, 3, 4]*ab[5, 6, 8, 1])/(ab[1, 2, 5, 6]*ab[3, 4, 8, 1])])/
       2 + (log[(ab[1, 2, 7, 8]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
          (ab[1, 2, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 6, 7]*ab[4, 5, 8, 1])]*
        log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[1, 2, 4, 5]*ab[5, 6, 8, 1])/(ab[1, 2, 5, 6]*ab[4, 5, 8, 1])])/
       2 + (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]*log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[4, 5, 6, 7]*
           ab[5, 6, 7, 8])/(ab[2, 3, 6, 7]*ab[3, 4, 8, 1]*ab[4, 5, 7, 8]*
           ab[5, 6, 1, 2])]*log[(ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/
          (ab[2, 3, 6, 7]*ab[5, 6, 1, 2])])/2 + 
      (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])/
          (ab[3, 4, 6, 7]*ab[4, 5, 1, 2]*ab[4, 5, 7, 8]*ab[5, 6, 2, 3])]*
        log[(ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])])/
       2 + (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]*log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[5, 6, 7, 8]*
           ab[6, 7, 8, 1])/(ab[3, 4, 7, 8]*ab[4, 5, 1, 2]*ab[5, 6, 8, 1]*
           ab[6, 7, 2, 3])]*log[(ab[3, 4, 6, 7]*ab[7, 8, 2, 3])/
          (ab[3, 4, 7, 8]*ab[6, 7, 2, 3])])/2 + 
      (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[5, 6, 7, 8]*ab[6, 7, 8, 1])/
          (ab[4, 5, 7, 8]*ab[5, 6, 2, 3]*ab[5, 6, 8, 1]*ab[6, 7, 3, 4])]*
        log[(ab[4, 5, 6, 7]*ab[7, 8, 3, 4])/(ab[4, 5, 7, 8]*ab[6, 7, 3, 4])])/
       2 + (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]*log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[6, 7, 8, 1]*
           ab[7, 8, 1, 2])/(ab[4, 5, 8, 1]*ab[5, 6, 2, 3]*ab[6, 7, 1, 2]*
           ab[7, 8, 3, 4])]*log[(ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/
          (ab[4, 5, 8, 1]*ab[7, 8, 3, 4])])/2 + 
      (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[5, 6, 3, 4]*ab[6, 7, 4, 5]*ab[6, 7, 8, 1]*ab[7, 8, 1, 2])/
          (ab[5, 6, 8, 1]*ab[6, 7, 1, 2]*ab[6, 7, 3, 4]*ab[7, 8, 4, 5])]*
        log[(ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])])/
       2 + (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]*log[(ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/
          (ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
        log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[8, 1, 6, 7])/
          (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*ab[2, 3, 7, 8]*ab[8, 1, 3, 4])])/2 + 
      (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
        log[(ab[1, 2, 3, 4]*ab[7, 8, 5, 6]*ab[8, 1, 2, 3]*ab[8, 1, 6, 7])/
          (ab[1, 2, 6, 7]*ab[7, 8, 2, 3]*ab[8, 1, 3, 4]*ab[8, 1, 5, 6])])/2]*
    R[1, 3, 4, 5, 6] + 
   intdone[-(Li[1]*log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]) - 
      (log[(ab[3, 4, 1, 2]*ab[4, 5, 8, 1])/(ab[3, 4, 8, 1]*ab[4, 5, 1, 2])]*
        log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[3, 4, 5, 6]*ab[8, 1, 2, 3])/(ab[3, 4, 8, 1]*ab[5, 6, 2, 3])])/
       2 - (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]*log[(ab[4, 5, 2, 3]*ab[5, 6, 8, 1])/
          (ab[4, 5, 8, 1]*ab[5, 6, 2, 3])]*
        log[(ab[4, 5, 6, 7]*ab[8, 1, 3, 4])/(ab[4, 5, 8, 1]*ab[6, 7, 3, 4])])/
       2]*R[1, 3, 4, 5, 8] + 
   intdone[Li[1 - (ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*
           ab[3, 4, 8, 1])]*log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[2, 3, 4, 5]*ab[5, 6, 1, 2])/(ab[2, 3, 5, 6]*ab[4, 5, 1, 2])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[1, 2, 4, 5]*ab[5, 6, 8, 1])/(ab[1, 2, 5, 6]*ab[4, 5, 8, 1])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/(ab[2, 3, 6, 7]*ab[5, 6, 1, 2])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] - 
      Li[1 - (ab[1, 2, 3, 4]*ab[6, 7, 8, 1])/(ab[1, 2, 6, 7]*ab[3, 4, 8, 1])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[3, 4, 6, 7]*ab[7, 8, 2, 3])/(ab[3, 4, 7, 8]*ab[6, 7, 2, 3])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[4, 5, 6, 7]*ab[7, 8, 3, 4])/(ab[4, 5, 7, 8]*ab[6, 7, 3, 4])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/(ab[4, 5, 8, 1]*ab[7, 8, 3, 4])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[1, 2, 5, 6]*ab[6, 7, 8, 1])/(ab[6, 7, 1, 2]*ab[8, 1, 5, 6])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      (log[(ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6])/
          (ab[1, 2, 4, 5]*ab[2, 3, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 8, 1])]*
        log[(ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])]*
        log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])])/
       2 + (log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
          (ab[2, 3, 5, 6]*ab[3, 4, 6, 7]*ab[3, 4, 8, 1]*ab[4, 5, 1, 2])]*
        log[(ab[2, 3, 4, 5]*ab[5, 6, 1, 2])/(ab[2, 3, 5, 6]*ab[4, 5, 1, 2])]*
        log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])])/
       2 + (log[(ab[1, 2, 7, 8]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
          (ab[1, 2, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 6, 7]*ab[4, 5, 8, 1])]*
        log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[1, 2, 4, 5]*ab[5, 6, 8, 1])/(ab[1, 2, 5, 6]*ab[4, 5, 8, 1])])/
       2 + (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]*log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[4, 5, 6, 7]*
           ab[5, 6, 7, 8])/(ab[2, 3, 6, 7]*ab[3, 4, 8, 1]*ab[4, 5, 7, 8]*
           ab[5, 6, 1, 2])]*log[(ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/
          (ab[2, 3, 6, 7]*ab[5, 6, 1, 2])])/2 + 
      (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])/
          (ab[3, 4, 6, 7]*ab[4, 5, 1, 2]*ab[4, 5, 7, 8]*ab[5, 6, 2, 3])]*
        log[(ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])])/
       2 - (log[(ab[1, 2, 7, 8]*ab[2, 3, 8, 1]*ab[3, 4, 6, 7])/
          (ab[1, 2, 6, 7]*ab[2, 3, 7, 8]*ab[3, 4, 8, 1])]*
        log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[1, 2, 3, 4]*ab[6, 7, 8, 1])/(ab[1, 2, 6, 7]*ab[3, 4, 8, 1])])/
       2 + (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]*log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[5, 6, 7, 8]*
           ab[6, 7, 8, 1])/(ab[3, 4, 7, 8]*ab[4, 5, 1, 2]*ab[5, 6, 8, 1]*
           ab[6, 7, 2, 3])]*log[(ab[3, 4, 6, 7]*ab[7, 8, 2, 3])/
          (ab[3, 4, 7, 8]*ab[6, 7, 2, 3])])/2 + 
      (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[5, 6, 7, 8]*ab[6, 7, 8, 1])/
          (ab[4, 5, 7, 8]*ab[5, 6, 2, 3]*ab[5, 6, 8, 1]*ab[6, 7, 3, 4])]*
        log[(ab[4, 5, 6, 7]*ab[7, 8, 3, 4])/(ab[4, 5, 7, 8]*ab[6, 7, 3, 4])])/
       2 + (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]*log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[6, 7, 8, 1]*
           ab[7, 8, 1, 2])/(ab[4, 5, 8, 1]*ab[5, 6, 2, 3]*ab[6, 7, 1, 2]*
           ab[7, 8, 3, 4])]*log[(ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/
          (ab[4, 5, 8, 1]*ab[7, 8, 3, 4])])/2 + 
      (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[5, 6, 3, 4]*ab[6, 7, 4, 5]*ab[6, 7, 8, 1]*ab[7, 8, 1, 2])/
          (ab[5, 6, 8, 1]*ab[6, 7, 1, 2]*ab[6, 7, 3, 4]*ab[7, 8, 4, 5])]*
        log[(ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])])/
       2 + (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]*log[(ab[1, 2, 5, 6]*ab[6, 7, 8, 1])/
          (ab[6, 7, 1, 2]*ab[8, 1, 5, 6])]*
        log[(ab[6, 7, 4, 5]*ab[7, 8, 1, 2]*ab[7, 8, 5, 6]*ab[8, 1, 2, 3])/
          (ab[6, 7, 1, 2]*ab[7, 8, 2, 3]*ab[7, 8, 4, 5]*ab[8, 1, 5, 6])])/2 + 
      (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
        log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[8, 1, 6, 7])/
          (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*ab[2, 3, 7, 8]*ab[8, 1, 3, 4])])/2 + 
      (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
        log[(ab[1, 2, 3, 4]*ab[7, 8, 5, 6]*ab[8, 1, 2, 3]*ab[8, 1, 6, 7])/
          (ab[1, 2, 6, 7]*ab[7, 8, 2, 3]*ab[8, 1, 3, 4]*ab[8, 1, 5, 6])])/2]*
    R[1, 3, 4, 6, 7] + 
   intdone[-(Li[1 - (ab[3, 4, 5, 6]*ab[6, 7, 8, 1])/(ab[6, 7, 3, 4]*
            ab[8, 1, 5, 6])]*log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]) - 
      (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[3, 4, 5, 6]*ab[6, 7, 8, 1])/(ab[6, 7, 3, 4]*ab[8, 1, 5, 6])]*
        log[(ab[6, 7, 4, 5]*ab[7, 8, 5, 6]*ab[8, 1, 3, 4])/
          (ab[6, 7, 3, 4]*ab[7, 8, 4, 5]*ab[8, 1, 5, 6])])/2]*
    R[1, 3, 4, 6, 8] + 
   intdone[-(Li[1]*log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]) + 
      Li[1 - (ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[2, 3, 4, 5]*ab[5, 6, 1, 2])/(ab[2, 3, 5, 6]*ab[4, 5, 1, 2])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[1, 2, 4, 5]*ab[5, 6, 8, 1])/(ab[1, 2, 5, 6]*ab[4, 5, 8, 1])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/(ab[2, 3, 6, 7]*ab[5, 6, 1, 2])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[3, 4, 6, 7]*ab[7, 8, 2, 3])/(ab[3, 4, 7, 8]*ab[6, 7, 2, 3])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/(ab[4, 5, 8, 1]*ab[7, 8, 3, 4])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[1, 2, 5, 6]*ab[6, 7, 8, 1])/(ab[6, 7, 1, 2]*ab[8, 1, 5, 6])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      (log[(ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6])/
          (ab[1, 2, 4, 5]*ab[2, 3, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 8, 1])]*
        log[(ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])]*
        log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])])/
       2 + (log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
          (ab[2, 3, 5, 6]*ab[3, 4, 6, 7]*ab[3, 4, 8, 1]*ab[4, 5, 1, 2])]*
        log[(ab[2, 3, 4, 5]*ab[5, 6, 1, 2])/(ab[2, 3, 5, 6]*ab[4, 5, 1, 2])]*
        log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])])/
       2 + (log[(ab[1, 2, 7, 8]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
          (ab[1, 2, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 6, 7]*ab[4, 5, 8, 1])]*
        log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[1, 2, 4, 5]*ab[5, 6, 8, 1])/(ab[1, 2, 5, 6]*ab[4, 5, 8, 1])])/
       2 + (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]*log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[4, 5, 6, 7]*
           ab[5, 6, 7, 8])/(ab[2, 3, 6, 7]*ab[3, 4, 8, 1]*ab[4, 5, 7, 8]*
           ab[5, 6, 1, 2])]*log[(ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/
          (ab[2, 3, 6, 7]*ab[5, 6, 1, 2])])/2 + 
      (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])/
          (ab[3, 4, 6, 7]*ab[4, 5, 1, 2]*ab[4, 5, 7, 8]*ab[5, 6, 2, 3])]*
        log[(ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])])/
       2 + (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]*log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[5, 6, 7, 8]*
           ab[6, 7, 8, 1])/(ab[3, 4, 7, 8]*ab[4, 5, 1, 2]*ab[5, 6, 8, 1]*
           ab[6, 7, 2, 3])]*log[(ab[3, 4, 6, 7]*ab[7, 8, 2, 3])/
          (ab[3, 4, 7, 8]*ab[6, 7, 2, 3])])/2 + 
      (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[6, 7, 8, 1]*ab[7, 8, 1, 2])/
          (ab[4, 5, 8, 1]*ab[5, 6, 2, 3]*ab[6, 7, 1, 2]*ab[7, 8, 3, 4])]*
        log[(ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/(ab[4, 5, 8, 1]*ab[7, 8, 3, 4])])/
       2 + (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]*log[(ab[5, 6, 3, 4]*ab[6, 7, 4, 5]*ab[6, 7, 8, 1]*
           ab[7, 8, 1, 2])/(ab[5, 6, 8, 1]*ab[6, 7, 1, 2]*ab[6, 7, 3, 4]*
           ab[7, 8, 4, 5])]*log[(ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/
          (ab[5, 6, 8, 1]*ab[7, 8, 4, 5])])/2 + 
      (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[1, 2, 5, 6]*ab[6, 7, 8, 1])/(ab[6, 7, 1, 2]*ab[8, 1, 5, 6])]*
        log[(ab[6, 7, 4, 5]*ab[7, 8, 1, 2]*ab[7, 8, 5, 6]*ab[8, 1, 2, 3])/
          (ab[6, 7, 1, 2]*ab[7, 8, 2, 3]*ab[7, 8, 4, 5]*ab[8, 1, 5, 6])])/2 - 
      (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[3, 4, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 3, 4])]*
        log[(ab[7, 8, 5, 6]*ab[8, 1, 3, 4])/(ab[7, 8, 3, 4]*ab[8, 1, 5, 6])])/
       2 - (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]*log[(ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/
          (ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
        log[(ab[1, 2, 3, 4]*ab[8, 1, 6, 7])/(ab[1, 2, 6, 7]*ab[8, 1, 3, 4])])/
       2 + (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]*log[(ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/
          (ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
        log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[8, 1, 6, 7])/
          (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*ab[2, 3, 7, 8]*ab[8, 1, 3, 4])])/2 + 
      (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
        log[(ab[1, 2, 3, 4]*ab[7, 8, 5, 6]*ab[8, 1, 2, 3]*ab[8, 1, 6, 7])/
          (ab[1, 2, 6, 7]*ab[7, 8, 2, 3]*ab[8, 1, 3, 4]*ab[8, 1, 5, 6])])/2]*
    R[1, 3, 4, 7, 8] + 
   intdone[-(Li[1 - (ab[3, 4, 5, 6]*ab[8, 1, 2, 3])/(ab[3, 4, 8, 1]*
            ab[5, 6, 2, 3])]*log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]) - 
      (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[5, 6, 8, 1])/
          (ab[3, 4, 8, 1]*ab[4, 5, 1, 2]*ab[5, 6, 2, 3])]*
        log[(ab[3, 4, 5, 6]*ab[8, 1, 2, 3])/(ab[3, 4, 8, 1]*ab[5, 6, 2, 3])])/
       2]*R[1, 3, 5, 6, 8] + 
   intdone[-(Li[1 - (ab[3, 4, 6, 7]*ab[8, 1, 2, 3])/(ab[3, 4, 8, 1]*
            ab[6, 7, 2, 3])]*log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]) - 
      (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[6, 7, 8, 1])/
          (ab[3, 4, 8, 1]*ab[4, 5, 1, 2]*ab[6, 7, 2, 3])]*
        log[(ab[3, 4, 6, 7]*ab[8, 1, 2, 3])/(ab[3, 4, 8, 1]*ab[6, 7, 2, 3])])/
       2]*R[1, 3, 6, 7, 8] + 
   intdone[Li[1 - (ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*
           ab[3, 4, 8, 1])]*log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/
         (ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[2, 3, 4, 5]*ab[5, 6, 1, 2])/(ab[2, 3, 5, 6]*ab[4, 5, 1, 2])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[1, 2, 4, 5]*ab[5, 6, 8, 1])/(ab[1, 2, 5, 6]*ab[4, 5, 8, 1])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/(ab[2, 3, 6, 7]*ab[5, 6, 1, 2])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] - 
      Li[1 - (ab[1, 2, 4, 5]*ab[6, 7, 8, 1])/(ab[1, 2, 6, 7]*ab[4, 5, 8, 1])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[3, 4, 6, 7]*ab[7, 8, 2, 3])/(ab[3, 4, 7, 8]*ab[6, 7, 2, 3])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[4, 5, 6, 7]*ab[7, 8, 3, 4])/(ab[4, 5, 7, 8]*ab[6, 7, 3, 4])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/(ab[4, 5, 8, 1]*ab[7, 8, 3, 4])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[1, 2, 5, 6]*ab[6, 7, 8, 1])/(ab[6, 7, 1, 2]*ab[8, 1, 5, 6])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      (log[(ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6])/
          (ab[1, 2, 4, 5]*ab[2, 3, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 8, 1])]*
        log[(ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])]*
        log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])])/
       2 + (log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
          (ab[2, 3, 5, 6]*ab[3, 4, 6, 7]*ab[3, 4, 8, 1]*ab[4, 5, 1, 2])]*
        log[(ab[2, 3, 4, 5]*ab[5, 6, 1, 2])/(ab[2, 3, 5, 6]*ab[4, 5, 1, 2])]*
        log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])])/
       2 + (log[(ab[1, 2, 7, 8]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
          (ab[1, 2, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 6, 7]*ab[4, 5, 8, 1])]*
        log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[1, 2, 4, 5]*ab[5, 6, 8, 1])/(ab[1, 2, 5, 6]*ab[4, 5, 8, 1])])/
       2 + (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]*log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[4, 5, 6, 7]*
           ab[5, 6, 7, 8])/(ab[2, 3, 6, 7]*ab[3, 4, 8, 1]*ab[4, 5, 7, 8]*
           ab[5, 6, 1, 2])]*log[(ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/
          (ab[2, 3, 6, 7]*ab[5, 6, 1, 2])])/2 + 
      (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])/
          (ab[3, 4, 6, 7]*ab[4, 5, 1, 2]*ab[4, 5, 7, 8]*ab[5, 6, 2, 3])]*
        log[(ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])])/
       2 - (log[(ab[1, 2, 7, 8]*ab[2, 3, 8, 1]*ab[4, 5, 6, 7])/
          (ab[1, 2, 6, 7]*ab[2, 3, 7, 8]*ab[4, 5, 8, 1])]*
        log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[1, 2, 4, 5]*ab[6, 7, 8, 1])/(ab[1, 2, 6, 7]*ab[4, 5, 8, 1])])/
       2 + (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]*log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[5, 6, 7, 8]*
           ab[6, 7, 8, 1])/(ab[3, 4, 7, 8]*ab[4, 5, 1, 2]*ab[5, 6, 8, 1]*
           ab[6, 7, 2, 3])]*log[(ab[3, 4, 6, 7]*ab[7, 8, 2, 3])/
          (ab[3, 4, 7, 8]*ab[6, 7, 2, 3])])/2 + 
      (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[5, 6, 7, 8]*ab[6, 7, 8, 1])/
          (ab[4, 5, 7, 8]*ab[5, 6, 2, 3]*ab[5, 6, 8, 1]*ab[6, 7, 3, 4])]*
        log[(ab[4, 5, 6, 7]*ab[7, 8, 3, 4])/(ab[4, 5, 7, 8]*ab[6, 7, 3, 4])])/
       2 + (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]*log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[6, 7, 8, 1]*
           ab[7, 8, 1, 2])/(ab[4, 5, 8, 1]*ab[5, 6, 2, 3]*ab[6, 7, 1, 2]*
           ab[7, 8, 3, 4])]*log[(ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/
          (ab[4, 5, 8, 1]*ab[7, 8, 3, 4])])/2 + 
      (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[5, 6, 3, 4]*ab[6, 7, 4, 5]*ab[6, 7, 8, 1]*ab[7, 8, 1, 2])/
          (ab[5, 6, 8, 1]*ab[6, 7, 1, 2]*ab[6, 7, 3, 4]*ab[7, 8, 4, 5])]*
        log[(ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])])/
       2 + (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]*log[(ab[1, 2, 5, 6]*ab[6, 7, 8, 1])/
          (ab[6, 7, 1, 2]*ab[8, 1, 5, 6])]*
        log[(ab[6, 7, 4, 5]*ab[7, 8, 1, 2]*ab[7, 8, 5, 6]*ab[8, 1, 2, 3])/
          (ab[6, 7, 1, 2]*ab[7, 8, 2, 3]*ab[7, 8, 4, 5]*ab[8, 1, 5, 6])])/2 + 
      (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
        log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[8, 1, 6, 7])/
          (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*ab[2, 3, 7, 8]*ab[8, 1, 3, 4])])/2 + 
      (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
        log[(ab[1, 2, 3, 4]*ab[7, 8, 5, 6]*ab[8, 1, 2, 3]*ab[8, 1, 6, 7])/
          (ab[1, 2, 6, 7]*ab[7, 8, 2, 3]*ab[8, 1, 3, 4]*ab[8, 1, 5, 6])])/2]*
    R[1, 4, 5, 6, 7] + 
   intdone[-(Li[1]*log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]) - 
      Li[1 - (ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] - 
      (log[(ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6])/
          (ab[1, 2, 4, 5]*ab[2, 3, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 8, 1])]*
        log[(ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])]*
        log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])])/
       2 - (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]*log[(ab[4, 5, 2, 3]*ab[5, 6, 8, 1])/
          (ab[4, 5, 8, 1]*ab[5, 6, 2, 3])]*
        log[(ab[4, 5, 6, 7]*ab[8, 1, 3, 4])/(ab[4, 5, 8, 1]*ab[6, 7, 3, 4])])/
       2 - (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]*log[(ab[5, 6, 3, 4]*ab[6, 7, 8, 1])/
          (ab[5, 6, 8, 1]*ab[6, 7, 3, 4])]*
        log[(ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])])/
       2]*R[1, 4, 5, 6, 8] + 
   intdone[-(Li[1]*log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]) + 
      Li[1 - (ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[2, 3, 4, 5]*ab[5, 6, 1, 2])/(ab[2, 3, 5, 6]*ab[4, 5, 1, 2])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[1, 2, 4, 5]*ab[5, 6, 8, 1])/(ab[1, 2, 5, 6]*ab[4, 5, 8, 1])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/(ab[2, 3, 6, 7]*ab[5, 6, 1, 2])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[3, 4, 6, 7]*ab[7, 8, 2, 3])/(ab[3, 4, 7, 8]*ab[6, 7, 2, 3])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[4, 5, 6, 7]*ab[7, 8, 3, 4])/(ab[4, 5, 7, 8]*ab[6, 7, 3, 4])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/(ab[4, 5, 8, 1]*ab[7, 8, 3, 4])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[1, 2, 5, 6]*ab[6, 7, 8, 1])/(ab[6, 7, 1, 2]*ab[8, 1, 5, 6])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      (log[(ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6])/
          (ab[1, 2, 4, 5]*ab[2, 3, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 8, 1])]*
        log[(ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])]*
        log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])])/
       2 + (log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
          (ab[2, 3, 5, 6]*ab[3, 4, 6, 7]*ab[3, 4, 8, 1]*ab[4, 5, 1, 2])]*
        log[(ab[2, 3, 4, 5]*ab[5, 6, 1, 2])/(ab[2, 3, 5, 6]*ab[4, 5, 1, 2])]*
        log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])])/
       2 + (log[(ab[1, 2, 7, 8]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6]*ab[4, 5, 6, 7])/
          (ab[1, 2, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 6, 7]*ab[4, 5, 8, 1])]*
        log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[1, 2, 4, 5]*ab[5, 6, 8, 1])/(ab[1, 2, 5, 6]*ab[4, 5, 8, 1])])/
       2 + (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]*log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[4, 5, 6, 7]*
           ab[5, 6, 7, 8])/(ab[2, 3, 6, 7]*ab[3, 4, 8, 1]*ab[4, 5, 7, 8]*
           ab[5, 6, 1, 2])]*log[(ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/
          (ab[2, 3, 6, 7]*ab[5, 6, 1, 2])])/2 + 
      (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])/
          (ab[3, 4, 6, 7]*ab[4, 5, 1, 2]*ab[4, 5, 7, 8]*ab[5, 6, 2, 3])]*
        log[(ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])])/
       2 + (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]*log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[5, 6, 7, 8]*
           ab[6, 7, 8, 1])/(ab[3, 4, 7, 8]*ab[4, 5, 1, 2]*ab[5, 6, 8, 1]*
           ab[6, 7, 2, 3])]*log[(ab[3, 4, 6, 7]*ab[7, 8, 2, 3])/
          (ab[3, 4, 7, 8]*ab[6, 7, 2, 3])])/2 + 
      (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[5, 6, 7, 8]*ab[6, 7, 8, 1])/
          (ab[4, 5, 7, 8]*ab[5, 6, 2, 3]*ab[5, 6, 8, 1]*ab[6, 7, 3, 4])]*
        log[(ab[4, 5, 6, 7]*ab[7, 8, 3, 4])/(ab[4, 5, 7, 8]*ab[6, 7, 3, 4])])/
       2 + (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]*log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[6, 7, 8, 1]*
           ab[7, 8, 1, 2])/(ab[4, 5, 8, 1]*ab[5, 6, 2, 3]*ab[6, 7, 1, 2]*
           ab[7, 8, 3, 4])]*log[(ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/
          (ab[4, 5, 8, 1]*ab[7, 8, 3, 4])])/2 + 
      (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[5, 6, 3, 4]*ab[6, 7, 4, 5]*ab[6, 7, 8, 1]*ab[7, 8, 1, 2])/
          (ab[5, 6, 8, 1]*ab[6, 7, 1, 2]*ab[6, 7, 3, 4]*ab[7, 8, 4, 5])]*
        log[(ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])])/
       2 + (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]*log[(ab[1, 2, 5, 6]*ab[6, 7, 8, 1])/
          (ab[6, 7, 1, 2]*ab[8, 1, 5, 6])]*
        log[(ab[6, 7, 4, 5]*ab[7, 8, 1, 2]*ab[7, 8, 5, 6]*ab[8, 1, 2, 3])/
          (ab[6, 7, 1, 2]*ab[7, 8, 2, 3]*ab[7, 8, 4, 5]*ab[8, 1, 5, 6])])/2 - 
      (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[4, 5, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 4, 5])]*
        log[(ab[7, 8, 5, 6]*ab[8, 1, 4, 5])/(ab[7, 8, 4, 5]*ab[8, 1, 5, 6])])/
       2 + (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]*log[(ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/
          (ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
        log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[8, 1, 6, 7])/
          (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*ab[2, 3, 7, 8]*ab[8, 1, 3, 4])])/2 - 
      (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[4, 5, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 4, 5])]*
        log[(ab[1, 2, 4, 5]*ab[8, 1, 6, 7])/(ab[1, 2, 6, 7]*ab[8, 1, 4, 5])])/
       2 + (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]*log[(ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/
          (ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
        log[(ab[1, 2, 3, 4]*ab[7, 8, 5, 6]*ab[8, 1, 2, 3]*ab[8, 1, 6, 7])/
          (ab[1, 2, 6, 7]*ab[7, 8, 2, 3]*ab[8, 1, 3, 4]*ab[8, 1, 5, 6])])/2]*
    R[1, 4, 5, 7, 8] + 
   intdone[-(Li[1 - (ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*
            ab[3, 4, 8, 1])]*log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]) - 
      Li[1 - (ab[4, 5, 6, 7]*ab[8, 1, 3, 4])/(ab[4, 5, 8, 1]*ab[6, 7, 3, 4])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] - 
      (log[(ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6])/
          (ab[1, 2, 4, 5]*ab[2, 3, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 8, 1])]*
        log[(ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])]*
        log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])])/
       2 - (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]*log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*
           ab[6, 7, 8, 1])/(ab[4, 5, 8, 1]*ab[5, 6, 2, 3]*ab[6, 7, 3, 4])]*
        log[(ab[4, 5, 6, 7]*ab[8, 1, 3, 4])/(ab[4, 5, 8, 1]*ab[6, 7, 3, 4])])/
       2]*R[1, 4, 6, 7, 8] + 
   intdone[-(Li[1]*log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]) + 
      Li[1 - (ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/(ab[2, 3, 6, 7]*ab[5, 6, 1, 2])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[3, 4, 6, 7]*ab[7, 8, 2, 3])/(ab[3, 4, 7, 8]*ab[6, 7, 2, 3])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[4, 5, 6, 7]*ab[7, 8, 3, 4])/(ab[4, 5, 7, 8]*ab[6, 7, 3, 4])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/(ab[4, 5, 8, 1]*ab[7, 8, 3, 4])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      Li[1 - (ab[1, 2, 5, 6]*ab[6, 7, 8, 1])/(ab[6, 7, 1, 2]*ab[8, 1, 5, 6])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] + 
      (log[(ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6])/
          (ab[1, 2, 4, 5]*ab[2, 3, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 8, 1])]*
        log[(ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])]*
        log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])])/
       2 + (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]*log[(ab[2, 3, 8, 1]*ab[3, 4, 1, 2]*ab[4, 5, 6, 7]*
           ab[5, 6, 7, 8])/(ab[2, 3, 6, 7]*ab[3, 4, 8, 1]*ab[4, 5, 7, 8]*
           ab[5, 6, 1, 2])]*log[(ab[2, 3, 5, 6]*ab[6, 7, 1, 2])/
          (ab[2, 3, 6, 7]*ab[5, 6, 1, 2])])/2 + 
      (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])/
          (ab[3, 4, 6, 7]*ab[4, 5, 1, 2]*ab[4, 5, 7, 8]*ab[5, 6, 2, 3])]*
        log[(ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])])/
       2 + (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]*log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[5, 6, 7, 8]*
           ab[6, 7, 8, 1])/(ab[3, 4, 7, 8]*ab[4, 5, 1, 2]*ab[5, 6, 8, 1]*
           ab[6, 7, 2, 3])]*log[(ab[3, 4, 6, 7]*ab[7, 8, 2, 3])/
          (ab[3, 4, 7, 8]*ab[6, 7, 2, 3])])/2 + 
      (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[5, 6, 7, 8]*ab[6, 7, 8, 1])/
          (ab[4, 5, 7, 8]*ab[5, 6, 2, 3]*ab[5, 6, 8, 1]*ab[6, 7, 3, 4])]*
        log[(ab[4, 5, 6, 7]*ab[7, 8, 3, 4])/(ab[4, 5, 7, 8]*ab[6, 7, 3, 4])])/
       2 + (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]*log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[6, 7, 8, 1]*
           ab[7, 8, 1, 2])/(ab[4, 5, 8, 1]*ab[5, 6, 2, 3]*ab[6, 7, 1, 2]*
           ab[7, 8, 3, 4])]*log[(ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/
          (ab[4, 5, 8, 1]*ab[7, 8, 3, 4])])/2 - 
      (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[5, 6, 3, 4]*ab[6, 7, 8, 1])/(ab[5, 6, 8, 1]*ab[6, 7, 3, 4])]*
        log[(ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/(ab[5, 6, 8, 1]*ab[7, 8, 4, 5])])/
       2 + (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]*log[(ab[5, 6, 3, 4]*ab[6, 7, 4, 5]*ab[6, 7, 8, 1]*
           ab[7, 8, 1, 2])/(ab[5, 6, 8, 1]*ab[6, 7, 1, 2]*ab[6, 7, 3, 4]*
           ab[7, 8, 4, 5])]*log[(ab[5, 6, 7, 8]*ab[8, 1, 4, 5])/
          (ab[5, 6, 8, 1]*ab[7, 8, 4, 5])])/2 + 
      (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[1, 2, 5, 6]*ab[6, 7, 8, 1])/(ab[6, 7, 1, 2]*ab[8, 1, 5, 6])]*
        log[(ab[6, 7, 4, 5]*ab[7, 8, 1, 2]*ab[7, 8, 5, 6]*ab[8, 1, 2, 3])/
          (ab[6, 7, 1, 2]*ab[7, 8, 2, 3]*ab[7, 8, 4, 5]*ab[8, 1, 5, 6])])/2 + 
      (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
        log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[8, 1, 6, 7])/
          (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*ab[2, 3, 7, 8]*ab[8, 1, 3, 4])])/2 - 
      (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[5, 6, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 5, 6])]*
        log[(ab[1, 2, 5, 6]*ab[8, 1, 6, 7])/(ab[1, 2, 6, 7]*ab[8, 1, 5, 6])])/
       2 + (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]*log[(ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/
          (ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
        log[(ab[1, 2, 3, 4]*ab[7, 8, 5, 6]*ab[8, 1, 2, 3]*ab[8, 1, 6, 7])/
          (ab[1, 2, 6, 7]*ab[7, 8, 2, 3]*ab[8, 1, 3, 4]*ab[8, 1, 5, 6])])/2]*
    R[1, 5, 6, 7, 8] + 
   intdone[-(Li[1]*log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]) - 
      Li[1 - (ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] - 
      (log[(ab[2, 3, 8, 1]*ab[3, 4, 6, 7])/(ab[2, 3, 6, 7]*ab[3, 4, 8, 1])]*
        log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[2, 3, 4, 5]*ab[6, 7, 1, 2])/(ab[2, 3, 6, 7]*ab[4, 5, 1, 2])])/
       2 - (log[(ab[3, 4, 1, 2]*ab[4, 5, 6, 7])/(ab[3, 4, 6, 7]*
           ab[4, 5, 1, 2])]*log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])])/
       2 - (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]*log[(ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/
          (ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
        log[(ab[1, 2, 3, 4]*ab[7, 8, 5, 6]*ab[8, 1, 2, 3]*ab[8, 1, 6, 7])/
          (ab[1, 2, 6, 7]*ab[7, 8, 2, 3]*ab[8, 1, 3, 4]*ab[8, 1, 5, 6])])/2]*
    R[2, 3, 4, 6, 7] + 
   intdone[-(Li[1]*log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]) - 
      (log[(ab[2, 3, 8, 1]*ab[3, 4, 7, 8])/(ab[2, 3, 7, 8]*ab[3, 4, 8, 1])]*
        log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[2, 3, 4, 5]*ab[7, 8, 1, 2])/(ab[2, 3, 7, 8]*ab[4, 5, 1, 2])])/
       2 - (log[(ab[3, 4, 1, 2]*ab[4, 5, 7, 8])/(ab[3, 4, 7, 8]*
           ab[4, 5, 1, 2])]*log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[3, 4, 5, 6]*ab[7, 8, 2, 3])/(ab[3, 4, 7, 8]*ab[5, 6, 2, 3])])/
       2]*R[2, 3, 4, 7, 8] + 
   intdone[-(Li[1]*log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]) - 
      Li[1 - (ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] - 
      (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[4, 5, 6, 7]*ab[5, 6, 7, 8])/
          (ab[3, 4, 6, 7]*ab[4, 5, 1, 2]*ab[4, 5, 7, 8]*ab[5, 6, 2, 3])]*
        log[(ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])])/
       2 - (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]*log[(ab[6, 7, 4, 5]*ab[7, 8, 2, 3])/
          (ab[6, 7, 2, 3]*ab[7, 8, 4, 5])]*
        log[(ab[2, 3, 5, 6]*ab[6, 7, 8, 1])/(ab[6, 7, 2, 3]*ab[8, 1, 5, 6])])/
       2 - (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]*log[(ab[2, 3, 6, 7]*ab[7, 8, 1, 2])/
          (ab[1, 2, 6, 7]*ab[7, 8, 2, 3])]*
        log[(ab[7, 8, 5, 6]*ab[8, 1, 2, 3])/(ab[7, 8, 2, 3]*ab[8, 1, 5, 6])])/
       2]*R[2, 3, 6, 7, 8] + 
   intdone[-(Li[1]*log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]) - 
      Li[1 - (ab[3, 4, 6, 7]*ab[7, 8, 2, 3])/(ab[3, 4, 7, 8]*ab[6, 7, 2, 3])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] - 
      Li[1 - (ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] - 
      (log[(ab[3, 4, 1, 2]*ab[4, 5, 6, 7])/(ab[3, 4, 6, 7]*ab[4, 5, 1, 2])]*
        log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[3, 4, 5, 6]*ab[6, 7, 2, 3])/(ab[3, 4, 6, 7]*ab[5, 6, 2, 3])])/
       2 - (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]*log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[5, 6, 7, 8]*
           ab[6, 7, 8, 1])/(ab[3, 4, 7, 8]*ab[4, 5, 1, 2]*ab[5, 6, 8, 1]*
           ab[6, 7, 2, 3])]*log[(ab[3, 4, 6, 7]*ab[7, 8, 2, 3])/
          (ab[3, 4, 7, 8]*ab[6, 7, 2, 3])])/2 - 
      (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[6, 7, 4, 5]*ab[7, 8, 3, 4])/(ab[6, 7, 3, 4]*ab[7, 8, 4, 5])]*
        log[(ab[3, 4, 5, 6]*ab[6, 7, 8, 1])/(ab[6, 7, 3, 4]*ab[8, 1, 5, 6])])/
       2 - (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]*log[(ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/
          (ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
        log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[8, 1, 6, 7])/
          (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*ab[2, 3, 7, 8]*ab[8, 1, 3, 4])])/2]*
    R[3, 4, 5, 6, 7] + 
   intdone[-(Li[1 - (ab[5, 6, 7, 8]*ab[8, 1, 3, 4])/(ab[3, 4, 7, 8]*
            ab[8, 1, 5, 6])]*log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]) - 
      (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[5, 6, 7, 8]*ab[8, 1, 3, 4])/(ab[3, 4, 7, 8]*ab[8, 1, 5, 6])]*
        log[(ab[1, 2, 7, 8]*ab[3, 4, 5, 6]*ab[8, 1, 6, 7])/
          (ab[1, 2, 6, 7]*ab[3, 4, 7, 8]*ab[8, 1, 5, 6])])/2]*
    R[3, 4, 5, 6, 8] + 
   intdone[-(Li[1]*log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]) - 
      Li[1 - (ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] - 
      (log[(ab[3, 4, 1, 2]*ab[4, 5, 7, 8])/(ab[3, 4, 7, 8]*ab[4, 5, 1, 2])]*
        log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[3, 4, 5, 6]*ab[7, 8, 2, 3])/(ab[3, 4, 7, 8]*ab[5, 6, 2, 3])])/
       2 - (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]*log[(ab[4, 5, 2, 3]*ab[5, 6, 7, 8])/
          (ab[4, 5, 7, 8]*ab[5, 6, 2, 3])]*
        log[(ab[4, 5, 6, 7]*ab[7, 8, 3, 4])/(ab[4, 5, 7, 8]*ab[6, 7, 3, 4])])/
       2 - (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]*log[(ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/
          (ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
        log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[8, 1, 6, 7])/
          (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*ab[2, 3, 7, 8]*ab[8, 1, 3, 4])])/2]*
    R[3, 4, 5, 7, 8] + 
   intdone[-(Li[1]*log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]) - 
      (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[6, 7, 4, 5]*ab[7, 8, 3, 4])/(ab[6, 7, 3, 4]*ab[7, 8, 4, 5])]*
        log[(ab[3, 4, 5, 6]*ab[6, 7, 8, 1])/(ab[6, 7, 3, 4]*ab[8, 1, 5, 6])])/
       2 - (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]*log[(ab[3, 4, 6, 7]*ab[7, 8, 1, 2])/
          (ab[1, 2, 6, 7]*ab[7, 8, 3, 4])]*
        log[(ab[7, 8, 5, 6]*ab[8, 1, 3, 4])/(ab[7, 8, 3, 4]*ab[8, 1, 5, 6])])/
       2]*R[3, 4, 6, 7, 8] + 
   intdone[-(Li[1 - (ab[3, 4, 5, 6]*ab[7, 8, 2, 3])/(ab[3, 4, 7, 8]*
            ab[5, 6, 2, 3])]*log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]) - 
      Li[1 - (ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/(ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] - 
      (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[3, 4, 1, 2]*ab[4, 5, 2, 3]*ab[5, 6, 7, 8])/
          (ab[3, 4, 7, 8]*ab[4, 5, 1, 2]*ab[5, 6, 2, 3])]*
        log[(ab[3, 4, 5, 6]*ab[7, 8, 2, 3])/(ab[3, 4, 7, 8]*ab[5, 6, 2, 3])])/
       2 - (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]*log[(ab[3, 4, 7, 8]*ab[8, 1, 2, 3])/
          (ab[2, 3, 7, 8]*ab[8, 1, 3, 4])]*
        log[(ab[1, 2, 3, 4]*ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[8, 1, 6, 7])/
          (ab[1, 2, 4, 5]*ab[1, 2, 6, 7]*ab[2, 3, 7, 8]*ab[8, 1, 3, 4])])/2]*
    R[3, 5, 6, 7, 8] + 
   intdone[-(Li[1]*log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]) - 
      Li[1 - (ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] - 
      Li[1 - (ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/(ab[4, 5, 8, 1]*ab[7, 8, 3, 4])]*
       log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])] - 
      (log[(ab[1, 2, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 8, 1]*ab[3, 4, 5, 6])/
          (ab[1, 2, 4, 5]*ab[2, 3, 5, 6]*ab[2, 3, 7, 8]*ab[3, 4, 8, 1])]*
        log[(ab[1, 2, 3, 4]*ab[4, 5, 8, 1])/(ab[1, 2, 4, 5]*ab[3, 4, 8, 1])]*
        log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])])/
       2 - (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]*log[(ab[4, 5, 2, 3]*ab[5, 6, 7, 8])/
          (ab[4, 5, 7, 8]*ab[5, 6, 2, 3])]*
        log[(ab[4, 5, 6, 7]*ab[7, 8, 3, 4])/(ab[4, 5, 7, 8]*ab[6, 7, 3, 4])])/
       2 - (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
           ab[4, 5, 7, 8])]*log[(ab[4, 5, 2, 3]*ab[5, 6, 3, 4]*ab[6, 7, 8, 1]*
           ab[7, 8, 1, 2])/(ab[4, 5, 8, 1]*ab[5, 6, 2, 3]*ab[6, 7, 1, 2]*
           ab[7, 8, 3, 4])]*log[(ab[4, 5, 7, 8]*ab[8, 1, 3, 4])/
          (ab[4, 5, 8, 1]*ab[7, 8, 3, 4])])/2 - 
      (log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
        log[(ab[4, 5, 6, 7]*ab[7, 8, 1, 2])/(ab[1, 2, 6, 7]*ab[7, 8, 4, 5])]*
        log[(ab[7, 8, 5, 6]*ab[8, 1, 4, 5])/(ab[7, 8, 4, 5]*ab[8, 1, 5, 6])])/
       2]*R[4, 5, 6, 7, 8]) + 
 int[\[Tau]/(1 + \[Tau]), (log[\[Tau]/(1 + \[Tau])]*log[1 + \[Tau]])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[cap[{2, 3}, {7, 8, 1}], 4, 5, 6, 7] + 
 int[\[Tau]/(1 + \[Tau]), 
   -(log[(ab[1, 2, 7, 8]*ab[2, 3, 6, 7])/(ab[1, 2, 6, 7]*ab[2, 3, 7, 8])]*
      log[((1 + \[Tau])*ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
        (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8])])/2]*Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*
  R[cap[{2, 3}, {7, 8, 1}], 4, 5, 6, 7] - 
 int[1 + \[Tau], (log[\[Tau]/(1 + \[Tau])]*log[1 + \[Tau]])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[cap[{2, 3}, {7, 8, 1}], 4, 5, 6, 7] + 
 int[\[Tau]/(1 + \[Tau]), (log[\[Tau]/(1 + \[Tau])]*log[1 + \[Tau]])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[cap[{2, 3}, {7, 8, 1}], 4, 5, 7, 8] - 
 int[1 + \[Tau], (log[\[Tau]/(1 + \[Tau])]*log[1 + \[Tau]])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[cap[{2, 3}, {7, 8, 1}], 4, 5, 7, 8] + 
 int[\[Tau]/(1 + \[Tau]), (log[\[Tau]/(1 + \[Tau])]*log[1 + \[Tau]])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[cap[{2, 3}, {7, 8, 1}], 5, 6, 7, 8] - 
 int[1 + \[Tau], (log[\[Tau]/(1 + \[Tau])]*log[1 + \[Tau]])/2]*
  Qlog[ab[7, 8, 1, 2]/ab[7, 8, 1, 3]]*R[cap[{2, 3}, {7, 8, 1}], 5, 6, 7, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   (log[1 + (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8])/(ab[1, 2, 3, 8]*
         ab[3, 4, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
         (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 4]]*R[cap[{3, 4}, {7, 8, 1}], 5, 6, 7, 8] + 
 int[1 + \[Tau], (log[1 + (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8])/
        (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])]*
     log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
         (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 4]]*R[cap[{3, 4}, {7, 8, 1}], 5, 6, 7, 8] - 
 2*int[1 + \[Tau], 
   -(log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(\[Tau]*ab[1, 3, 4, 8]*
          ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[3, 4, 7, 8])]*
      log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 4]]*R[cap[{3, 4}, {7, 8, 1}], 5, 6, 7, 8] - 
 int[1 + \[Tau], 
   -(log[(ab[1, 2, 3, 4]*ab[1, 6, 7, 8])/(ab[1, 2, 6, 7]*ab[1, 3, 4, 8])]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 4]]*R[cap[{3, 4}, {7, 8, 1}], 5, 6, 7, 8] - 
 2*int[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (-Li[1] - log[(ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
        (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[3, 4, 7, 8])]*
      log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 4]]*R[cap[{3, 4}, {7, 8, 1}], 5, 6, 7, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (-Li[1] - log[(ab[1, 2, 3, 4]*ab[1, 6, 7, 8])/(ab[1, 2, 6, 7]*
         ab[1, 3, 4, 8])]*log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/
          (ab[1, 3, 4, 8]*ab[2, 3, 7, 8]))/(1 + \[Tau])])/2]*
  Qlog[ab[7, 8, 1, 3]/ab[7, 8, 1, 4]]*R[cap[{3, 4}, {7, 8, 1}], 5, 6, 7, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   -Li[(\[Tau]*(ab[1, 4, 5, 8]*ab[2, 3, 7, 8] - ab[1, 2, 3, 8]*
          ab[4, 5, 7, 8]))/(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
        ab[1, 2, 3, 8]*ab[4, 5, 7, 8])] - 
    (log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5])/
        (ab[1, 2, 6, 7]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]*
      log[((1 + \[Tau])*ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
        (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[4, 5, 7, 8])])/2]*Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*
  R[cap[{4, 5}, {7, 8, 1}], 2, 3, 7, 8] - 
 int[1 + \[Tau], 
   -Li[(\[Tau]*(ab[1, 4, 5, 8]*ab[2, 3, 7, 8] - ab[1, 2, 3, 8]*
          ab[4, 5, 7, 8]))/(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
        ab[1, 2, 3, 8]*ab[4, 5, 7, 8])] + 
    Li[1 - (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[2, 3, 7, 8])] + 
    (log[(ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5])/
         (ab[1, 2, 6, 7]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8])]*
       log[(ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[2, 3, 7, 8])] - 
      log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5])/
         (ab[1, 2, 6, 7]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
           ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]*
       log[((1 + \[Tau])*ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
         (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8])])/2]*Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*
  R[cap[{4, 5}, {7, 8, 1}], 2, 3, 7, 8] + 
 int[1 + \[Tau], 
   -Li[(\[Tau]*(ab[1, 4, 5, 8]*ab[2, 3, 7, 8] - ab[1, 2, 3, 8]*
          ab[4, 5, 7, 8]))/(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
        ab[1, 2, 3, 8]*ab[4, 5, 7, 8])] + 
    Li[1 - (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*ab[2, 3, 7, 8])] - 
    (log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5])/
        (ab[1, 2, 6, 7]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))]*
      log[(1 + \[Tau])/(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
          (ab[1, 4, 5, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*R[cap[{4, 5}, {7, 8, 1}], 2, 3, 7, 8] + 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/
       (ab[1, 4, 5, 8]*ab[2, 3, 7, 8])]*
     log[1 + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(\[Tau]*ab[1, 4, 5, 8]*
         ab[2, 3, 7, 8])])/2]*Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*
  R[cap[{4, 5}, {7, 8, 1}], 2, 3, 7, 8] - 
 int[1 + \[Tau], 
   -(log[(ab[1, 2, 7, 8]*ab[4, 5, 6, 7])/(ab[1, 2, 6, 7]*ab[4, 5, 7, 8])]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 5]]*R[cap[{4, 5}, {7, 8, 1}], 2, 3, 7, 8] - 
 int[1 + \[Tau], Li[1 - (ab[1, 3, 4, 8]*ab[4, 5, 6, 7])/
       (ab[1, 4, 5, 8]*ab[3, 4, 6, 7])] + 
    (-2*Li[1 - ((\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
             ab[3, 4, 7, 8])*ab[4, 5, 6, 7])/(ab[3, 4, 6, 7]*
           (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
             ab[4, 5, 7, 8]))] + 
      log[(ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[3, 4, 5, 6])/
         (ab[1, 4, 5, 8]*ab[2, 3, 5, 6]*ab[3, 4, 6, 7])]*
       log[(ab[1, 3, 4, 8]*ab[4, 5, 6, 7])/(ab[1, 4, 5, 8]*ab[3, 4, 6, 7])] - 
      log[(\[Tau]*ab[1, 6, 7, 8]*ab[2, 3, 4, 5]*ab[2, 3, 7, 8]*
          ab[3, 4, 5, 6])/(ab[2, 3, 5, 6]*ab[3, 4, 6, 7]*
          (\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
            ab[4, 5, 7, 8]))]*log[((\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
           ab[1, 2, 3, 8]*ab[3, 4, 7, 8])*ab[4, 5, 6, 7])/
         (ab[3, 4, 6, 7]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
           ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 4]/ab[7, 8, 1, 6]]*R[cap[{4, 6}, {7, 8, 1}], 2, 3, 7, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[2, 3, 4, 7]*ab[5, 6, 7, 8])/
      (ab[2, 3, 7, 8]*(ab[1, 5, 6, 7]*ab[2, 3, 4, 8] - 
        ab[1, 2, 3, 4]*ab[5, 6, 7, 8])))/
    (\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8])), 
   (-Li[1] - log[(\[Tau]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
        (ab[3, 4, 6, 7]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]*
      log[((\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8])*ab[5, 6, 7, 8])/(ab[4, 5, 7, 8]*
         (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[cap[{5, 6}, {7, 8, 1}], 2, 3, 4, 7] + 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (-Li[1] - log[((1 + \[Tau])*ab[1, 2, 3, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
        (ab[2, 3, 5, 6]*(\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[3, 4, 7, 8]))]*
      log[(ab[1, 2, 3, 4]*(\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[4, 5, 7, 8]))/(ab[1, 2, 4, 5]*
         (\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[3, 4, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[cap[{5, 6}, {7, 8, 1}], 2, 3, 4, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   -Li[(\[Tau]*(ab[1, 5, 6, 8]*ab[2, 3, 7, 8] - ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8]))/(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
        ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] - 
    (log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 5, 6])/
        (ab[1, 2, 6, 7]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]*
      log[((1 + \[Tau])*ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
        (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8])])/2]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[cap[{5, 6}, {7, 8, 1}], 2, 3, 7, 8] - 
 int[1 + \[Tau], 
   -Li[(\[Tau]*(ab[1, 5, 6, 8]*ab[2, 3, 7, 8] - ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8]))/(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
        ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
    Li[1 - (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])] + 
    (log[(ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 5, 6])/
         (ab[1, 2, 6, 7]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8])]*
       log[(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])] - 
      log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 5, 6])/
         (ab[1, 2, 6, 7]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
           ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]*
       log[((1 + \[Tau])*ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
         (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8])])/2]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[cap[{5, 6}, {7, 8, 1}], 2, 3, 7, 8] + 
 int[1 + \[Tau], 
   -Li[(\[Tau]*(ab[1, 5, 6, 8]*ab[2, 3, 7, 8] - ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8]))/(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
        ab[1, 2, 3, 8]*ab[5, 6, 7, 8])] + 
    Li[1 - (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[2, 3, 7, 8])] - 
    (log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 5, 6])/
        (ab[1, 2, 6, 7]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]*
      log[(1 + \[Tau])/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[cap[{5, 6}, {7, 8, 1}], 2, 3, 7, 8] - 
 int[1 + \[Tau], 
   (-(log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
       log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
           (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))]) - 
     log[(\[Tau]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
        (ab[3, 4, 6, 7]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[cap[{5, 6}, {7, 8, 1}], 2, 3, 7, 8] + 
 int[1 + \[Tau], (log[(ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
       (ab[1, 5, 6, 8]*ab[2, 3, 7, 8])]*
     log[1 + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(\[Tau]*ab[1, 5, 6, 8]*
         ab[2, 3, 7, 8])])/2]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[cap[{5, 6}, {7, 8, 1}], 2, 3, 7, 8] + 
 int[\[Tau]/(1 + \[Tau]), 
   -Li[(\[Tau]*ab[2, 3, 7, 8]*(ab[1, 5, 6, 8]*ab[3, 4, 7, 8] - 
         ab[1, 3, 4, 8]*ab[5, 6, 7, 8]))/(ab[3, 4, 7, 8]*
        (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8]))] - 
    (log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
        (ab[1, 2, 6, 7]*ab[3, 4, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*
           ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]*
      log[((\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[3, 4, 7, 8])*ab[5, 6, 7, 8])/(ab[3, 4, 7, 8]*
         (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[cap[{5, 6}, {7, 8, 1}], 3, 4, 7, 8] - 
 int[1 + \[Tau], 
   -Li[(\[Tau]*ab[2, 3, 7, 8]*(ab[1, 5, 6, 8]*ab[3, 4, 7, 8] - 
         ab[1, 3, 4, 8]*ab[5, 6, 7, 8]))/(ab[3, 4, 7, 8]*
        (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8]))] + Li[1 - (ab[1, 3, 4, 8]*ab[5, 6, 7, 8])/
       (ab[1, 5, 6, 8]*ab[3, 4, 7, 8])] + 
    (log[(ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[3, 4, 5, 6])/
         (ab[1, 2, 6, 7]*ab[1, 5, 6, 8]*ab[3, 4, 7, 8])]*
       log[(ab[1, 3, 4, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[3, 4, 7, 8])] - 
      log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*
          ab[3, 4, 5, 6])/(ab[1, 2, 6, 7]*ab[3, 4, 7, 8]*
          (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
            ab[5, 6, 7, 8]))]*log[((\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + 
           ab[1, 2, 3, 8]*ab[3, 4, 7, 8])*ab[5, 6, 7, 8])/
         (ab[3, 4, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
           ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[cap[{5, 6}, {7, 8, 1}], 3, 4, 7, 8] + 
 int[1 + \[Tau], 
   -Li[(\[Tau]*ab[2, 3, 7, 8]*(ab[1, 5, 6, 8]*ab[3, 4, 7, 8] - 
         ab[1, 3, 4, 8]*ab[5, 6, 7, 8]))/(ab[3, 4, 7, 8]*
        (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8]))] + Li[1 - (ab[1, 3, 4, 8]*ab[5, 6, 7, 8])/
       (ab[1, 5, 6, 8]*ab[3, 4, 7, 8])] - 
    (log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
        (ab[1, 2, 6, 7]*ab[3, 4, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*
           ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
           ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[cap[{5, 6}, {7, 8, 1}], 3, 4, 7, 8] - 
 int[1 + \[Tau], 
   (-(log[(ab[1, 4, 5, 8]*ab[5, 6, 7, 8])/(ab[1, 5, 6, 8]*ab[4, 5, 7, 8])]*
       log[\[Tau]/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
           (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))]) - 
     log[(\[Tau]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
        (ab[3, 4, 6, 7]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]*
      log[(\[Tau] + (ab[1, 2, 3, 8]*ab[4, 5, 7, 8])/(ab[1, 4, 5, 8]*
           ab[2, 3, 7, 8]))/(\[Tau] + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/
          (ab[1, 5, 6, 8]*ab[2, 3, 7, 8]))])/2]*
  Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*R[cap[{5, 6}, {7, 8, 1}], 3, 4, 7, 8] + 
 int[1 + \[Tau], (log[(ab[1, 3, 4, 8]*ab[5, 6, 7, 8])/
       (ab[1, 5, 6, 8]*ab[3, 4, 7, 8])]*
     log[1 + (ab[1, 2, 3, 8]*ab[5, 6, 7, 8])/(\[Tau]*ab[1, 5, 6, 8]*
         ab[2, 3, 7, 8])])/2]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[cap[{5, 6}, {7, 8, 1}], 3, 4, 7, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   -Li[(\[Tau]*ab[2, 3, 7, 8]*(ab[1, 5, 6, 8]*ab[3, 4, 7, 8] - 
         ab[1, 3, 4, 8]*ab[5, 6, 7, 8]))/(ab[3, 4, 7, 8]*
        (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
          ab[5, 6, 7, 8]))] - 
    (log[(\[Tau]*ab[1, 2, 7, 8]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
        (ab[1, 2, 6, 7]*ab[3, 4, 7, 8]*(\[Tau]*ab[1, 5, 6, 8]*
           ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]*
      log[((\[Tau]*ab[1, 3, 4, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[3, 4, 7, 8])*ab[5, 6, 7, 8])/(ab[3, 4, 7, 8]*
         (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[cap[{5, 6}, {7, 8, 1}], 3, 4, 7, 8] - 
 int[(\[Tau] + (ab[1, 2, 3, 8]*ab[3, 4, 7, 8])/(ab[1, 3, 4, 8]*
       ab[2, 3, 7, 8]))/(1 + \[Tau]), 
   (-Li[1] - log[(\[Tau]*ab[1, 6, 7, 8]*ab[2, 3, 7, 8]*ab[3, 4, 5, 6])/
        (ab[3, 4, 6, 7]*(\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + 
          ab[1, 2, 3, 8]*ab[5, 6, 7, 8]))]*
      log[((\[Tau]*ab[1, 4, 5, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[4, 5, 7, 8])*ab[5, 6, 7, 8])/(ab[4, 5, 7, 8]*
         (\[Tau]*ab[1, 5, 6, 8]*ab[2, 3, 7, 8] + ab[1, 2, 3, 8]*
           ab[5, 6, 7, 8]))])/2]*Qlog[ab[7, 8, 1, 5]/ab[7, 8, 1, 6]]*
  R[cap[{5, 6}, {7, 8, 1}], 3, 4, 7, 8]