finalnew = (6 d kd u^2 (-12 d^2 ka (2 ka + 
         L (kd + I \[Omega]))^2 \[Omega] (I kd + \[Omega]) Cos[(-1)^(
         1/4) L Sqrt[\[Omega]/d]] + \[Omega] (ka^4 L^3 \[Omega]^2 - 
         24 d^3 ka (kd^2 + \[Omega]^2) + 
         d^2 (-24 ka^3 (kd - 2 \[Omega]) + 
            24 ka^2 L (-kd^2 + \[Omega]^2) - 
            6 ka L^2 (kd - 2 \[Omega]) (kd^2 + \[Omega]^2) + 
            L^3 (kd^2 + \[Omega]^2)^2) - 
         2 d ka^2 L^2 \[Omega] (3 ka \[Omega] + 
            2 L (kd^2 - kd \[Omega] + \[Omega]^2))) Cos[
        Sqrt[2] L Sqrt[\[Omega]/d]] + 
      Sqrt[\[Omega]] (-12 d^2 ka (2 ka + 
            L (kd - 
               I \[Omega]))^2 Sqrt[\[Omega]] (-I kd + \[Omega]) \
Cosh[(-1)^(1/4) L Sqrt[\[Omega]/d]] + 
         Sqrt[\[Omega]] (-ka^4 L^3 \[Omega]^2 + 
            24 d^3 ka (kd^2 + \[Omega]^2) + 
            d^2 (24 ka^2 L (kd - \[Omega]) (kd + \[Omega]) + 
               24 ka^3 (kd + 2 \[Omega]) + 
               6 ka L^2 (kd + 2 \[Omega]) (kd^2 + \[Omega]^2) - 
               L^3 (kd^2 + \[Omega]^2)^2) + 
            2 d ka^2 L^2 \[Omega] (3 ka \[Omega] - 
               2 L (kd^2 + kd \[Omega] + \[Omega]^2))) Cosh[
           Sqrt[2] L Sqrt[\[Omega]/d]] + 
         Sqrt[
          d] (6 (-1)^(3/4)
              d ka^2 \[Omega] (8 d kd + 
               L \[Omega] (4 I ka - L \[Omega])) Sin[(-1)^(1/4)
                L Sqrt[\[Omega]/d]] + 
            Sqrt[2] (2 ka^3 L^3 (kd - \[Omega]) \[Omega]^2 - 
               3 d^2 (4 ka L (kd + \[Omega]) (kd^2 + \[Omega]^2) + 
                  L^2 (kd^2 + \[Omega]^2)^2 + 
                  4 ka^2 (kd^2 - 2 kd \[Omega] + 3 \[Omega]^2)) + 
               d ka \[Omega] (12 ka^3 + 12 ka^2 L (kd + \[Omega]) - 
                  2 L^3 (kd - \[Omega]) (kd^2 + \[Omega]^2) + 
                  3 ka L^2 (kd^2 - 2 kd \[Omega] + 
                    3 \[Omega]^2))) Sin[Sqrt[2] L Sqrt[\[Omega]/d]] - 
            6 (-1)^(1/4)
              d (ka^2 \[Omega] (-I (2 ka + kd L)^2 + 
                  2 kd L^2 \[Omega]) + 
               d (4 ka L (kd - I \[Omega])^2 (kd + I \[Omega]) + 
                  4 ka^2 (kd - \[Omega]) (kd + \[Omega]) + 
                  kd^2 L^2 (kd^2 + 2 \[Omega]^2))) Sin[((-1)^(1/4)
                L \[Omega])/Sqrt[d \[Omega]]] + 
            6 (-1)^(3/4)
              d^2 L^2 \[Omega]^4 Sinh[(-1)^(3/4) L Sqrt[\[Omega]/d]] +
             Sqrt[2] (-2 ka^3 L^3 \[Omega]^2 (kd + \[Omega]) + 
               3 d^2 (4 ka L (kd - \[Omega]) (kd^2 + \[Omega]^2) + 
                  L^2 (kd^2 + \[Omega]^2)^2 + 
                  4 ka^2 (kd^2 + 2 kd \[Omega] + 3 \[Omega]^2)) + 
               d ka \[Omega] (12 ka^3 + 12 ka^2 L (kd - \[Omega]) - 
                  2 L^3 (kd + \[Omega]) (kd^2 + \[Omega]^2) + 
                  3 ka L^2 (kd^2 + 2 kd \[Omega] + 
                    3 \[Omega]^2))) Sinh[
              Sqrt[2] L Sqrt[\[Omega]/d]] + 
            6 (-1)^(1/4)
              d (2 ka + 
               L (kd - I \[Omega]))^2 (d (kd + I \[Omega])^2 + 
               I ka^2 \[Omega]) Sinh[((-1)^(1/4) L \[Omega])/Sqrt[
              d \[Omega]]]))))/(L^4 (2 ka + 
      kd L) \[Omega]^3 ((ka^4 \[Omega]^2 + 
         d^2 (kd^2 + \[Omega]^2)^2 - 
         4 d ka^2 \[Omega] (kd^2 - kd \[Omega] + \[Omega]^2)) Cos[
        Sqrt[2] L Sqrt[\[Omega]/d]] - (ka^4 \[Omega]^2 + 
         d^2 (kd^2 + \[Omega]^2)^2 + 
         4 d ka^2 \[Omega] (kd^2 + kd \[Omega] + \[Omega]^2)) Cosh[
        Sqrt[2] L Sqrt[\[Omega]/d]] - 
      2 Sqrt[2]
        ka ((d^(3/2) (kd - \[Omega]) \[Omega]^(5/2) - 
            kd^2 (d \[Omega])^(3/2) + kd^3 Sqrt[d^3 \[Omega]] - 
            ka^2 kd Sqrt[d \[Omega]^3] + ka^2 Sqrt[d \[Omega]^5]) Sin[
           Sqrt[2] L Sqrt[\[Omega]/d]] + (kd^2 (d \[Omega])^(3/2) + 
            kd^3 Sqrt[d^3 \[Omega]] + ka^2 kd Sqrt[d \[Omega]^3] + 
            ka^2 Sqrt[d \[Omega]^5] + 
            d^(3/2) \[Omega]^(5/2) (kd + \[Omega])) Sinh[
           Sqrt[2] L Sqrt[\[Omega]/d]])))