stackmax

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]])))