1.*ArcCos[(2.779678843328201*^44 + 3.700478130052102*^39*
      Csc[0.008726646259971648*T]^2 - 7.400956260104204*^39*
      Cos[0.017453292519943295*T]*Csc[0.008726646259971648*T]^2 +
     3.700478130052102*^39*Cos[Degree*T]^2*
      Csc[0.008726646259971648*T]^2 + 1.4801912520208412*^40*
      Sin[0.008726646259971648*T]^2 - 3.4745985541602507*^43*
      Csc[0.008726646259971648*T]^2*
      Sqrt[1. + 0.0034080282460224004*Sin[0.008726646259971648*T]^
          2 + 1.8147900821385185*^-7*Sin[0.008726646259971648*T]^
          4] + 3.4745985541602507*^43*Cos[0.017453292519943295*T]*
      Csc[0.008726646259971648*T]^2*
      Sqrt[1. + 0.0034080282460224004*Sin[0.008726646259971648*T]^
          2 + 1.8147900821385185*^-7*Sin[0.008726646259971648*T]^
          4] - 1.2946703954128366*^48*
      Sqrt[-1.*Csc[0.008726646259971648*T]^2]*
      Sqrt[-((0.003087457115799976*(-3.82039039073672*^54 -
            2.034483081256874*^50*Cos[Degree*T] +
            1.1934269268469193*^53*Csc[0.008726646259971648*T]^2 -
            1.192918251908044*^53*Cos[Degree*T]*
             Csc[0.008726646259971648*T]^2 - 5.087020231557064*^49*
             Cos[Degree*T]^2*Csc[0.008726646259971648*T]^2 +
            2.708428049600824*^45*Cos[Degree*T]^3*
             Csc[0.008726646259971648*T]^2 - 2.03437474413489*^50*
             Sin[0.008726646259971648*T]^2 - 1.0833712198403299*^46*
             Cos[Degree*T]*Sin[0.008726646259971648*T]^2))/
          (1.2981032043929765*^55 - 1.4745684716083967*^51*
            Cos[Degree*T] + 3.925862041375746*^46*Cos[Degree*T]^2 -
           2.948979908735139*^51*Sin[0.008726646259971648*T]^2 -
           1.5703448165502989*^47*Sin[0.008726646259971648*T]^4)) -
        (7.4263469*^7*(-3.9709697761831446*^43 +
           1.9855377520648585*^43*Csc[0.008726646259971648*T]^2 -
           1.985590616038145*^43*Cos[Degree*T]*
            Csc[0.008726646259971648*T]^2 + 5.2863973286458595*^38*
            Cos[Degree*T]^2*Csc[0.008726646259971648*T]^2 -
           2.1145589314583444*^39*Sin[0.008726646259971648*T]^2)*
          Sqrt[1. + 0.0034080282460224004*Sin[0.008726646259971648*
                T]^2 + 1.8147900821385185*^-7*
             Sin[0.008726646259971648*T]^4])/
         (1.2981032043929765*^55 - 1.4745684716083967*^51*
           Cos[Degree*T] + 3.925862041375746*^46*Cos[Degree*T]^2 -
          2.948979908735139*^51*Sin[0.008726646259971648*T]^2 -
          1.5703448165502989*^47*Sin[0.008726646259971648*T]^4)] +
     6.89380989666786*^43*Cos[0.017453292519943295*T]*
      Sqrt[-1.*Csc[0.008726646259971648*T]^2]*
      Sqrt[-((0.003087457115799976*(-3.82039039073672*^54 -
            2.034483081256874*^50*Cos[Degree*T] +
            1.1934269268469193*^53*Csc[0.008726646259971648*T]^2 -
            1.192918251908044*^53*Cos[Degree*T]*
             Csc[0.008726646259971648*T]^2 - 5.087020231557064*^49*
             Cos[Degree*T]^2*Csc[0.008726646259971648*T]^2 +
            2.708428049600824*^45*Cos[Degree*T]^3*
             Csc[0.008726646259971648*T]^2 - 2.03437474413489*^50*
             Sin[0.008726646259971648*T]^2 - 1.0833712198403299*^46*
             Cos[Degree*T]*Sin[0.008726646259971648*T]^2))/
          (1.2981032043929765*^55 - 1.4745684716083967*^51*
            Cos[Degree*T] + 3.925862041375746*^46*Cos[Degree*T]^2 -
           2.948979908735139*^51*Sin[0.008726646259971648*T]^2 -
           1.5703448165502989*^47*Sin[0.008726646259971648*T]^4)) -
        (7.4263469*^7*(-3.9709697761831446*^43 +
           1.9855377520648585*^43*Csc[0.008726646259971648*T]^2 -
           1.985590616038145*^43*Cos[Degree*T]*
            Csc[0.008726646259971648*T]^2 + 5.2863973286458595*^38*
            Cos[Degree*T]^2*Csc[0.008726646259971648*T]^2 -
           2.1145589314583444*^39*Sin[0.008726646259971648*T]^2)*
          Sqrt[1. + 0.0034080282460224004*Sin[0.008726646259971648*
                T]^2 + 1.8147900821385185*^-7*
             Sin[0.008726646259971648*T]^4])/
         (1.2981032043929765*^55 - 1.4745684716083967*^51*
           Cos[Degree*T] + 3.925862041375746*^46*Cos[Degree*T]^2 -
          2.948979908735139*^51*Sin[0.008726646259971648*T]^2 -
          1.5703448165502989*^47*Sin[0.008726646259971648*T]^4)] +
     3.2365036432846747*^47*Sqrt[-1.*Csc[0.008726646259971648*T]^2]*
      Sqrt[1. + 0.0034080282460224004*Sin[0.008726646259971648*T]^
          2 + 1.8147900821385185*^-7*Sin[0.008726646259971648*T]^4]*
      Sqrt[-((0.003087457115799976*(-3.82039039073672*^54 -
            2.034483081256874*^50*Cos[Degree*T] +
            1.1934269268469193*^53*Csc[0.008726646259971648*T]^2 -
            1.192918251908044*^53*Cos[Degree*T]*
             Csc[0.008726646259971648*T]^2 - 5.087020231557064*^49*
             Cos[Degree*T]^2*Csc[0.008726646259971648*T]^2 +
            2.708428049600824*^45*Cos[Degree*T]^3*
             Csc[0.008726646259971648*T]^2 - 2.03437474413489*^50*
             Sin[0.008726646259971648*T]^2 - 1.0833712198403299*^46*
             Cos[Degree*T]*Sin[0.008726646259971648*T]^2))/
          (1.2981032043929765*^55 - 1.4745684716083967*^51*
            Cos[Degree*T] + 3.925862041375746*^46*Cos[Degree*T]^2 -
           2.948979908735139*^51*Sin[0.008726646259971648*T]^2 -
           1.5703448165502989*^47*Sin[0.008726646259971648*T]^4)) -
        (7.4263469*^7*(-3.9709697761831446*^43 +
           1.9855377520648585*^43*Csc[0.008726646259971648*T]^2 -
           1.985590616038145*^43*Cos[Degree*T]*
            Csc[0.008726646259971648*T]^2 + 5.2863973286458595*^38*
            Cos[Degree*T]^2*Csc[0.008726646259971648*T]^2 -
           2.1145589314583444*^39*Sin[0.008726646259971648*T]^2)*
          Sqrt[1. + 0.0034080282460224004*Sin[0.008726646259971648*
                T]^2 + 1.8147900821385185*^-7*
             Sin[0.008726646259971648*T]^4])/
         (1.2981032043929765*^55 - 1.4745684716083967*^51*
           Cos[Degree*T] + 3.925862041375746*^46*Cos[Degree*T]^2 -
          2.948979908735139*^51*Sin[0.008726646259971648*T]^2 -
          1.5703448165502989*^47*Sin[0.008726646259971648*T]^4)])/
    (2.779678843328201*^44 + 5.137405920210434*^48*
      Csc[0.008726646259971648*T]^2 - 2.7356196647286034*^44*
      Cos[0.017453292519943295*T]*Csc[0.008726646259971648*T]^2 +
     3.700478130052102*^39*Cos[Degree*T]^2*
      Csc[0.008726646259971648*T]^2 + 1.4801912520208412*^40*
      Sin[0.008726646259971648*T]^2 - 1.2843178364716513*^48*
      Csc[0.008726646259971648*T]^2*
      Sqrt[1. + 0.0034080282460224004*Sin[0.008726646259971648*T]^
          2 + 1.8147900821385185*^-7*Sin[0.008726646259971648*T]^
          4] + 3.4745985541602507*^43*Cos[0.017453292519943295*T]*
      Csc[0.008726646259971648*T]^2*
      Sqrt[1. + 0.0034080282460224004*Sin[0.008726646259971648*T]^
          2 + 1.8147900821385185*^-7*Sin[0.008726646259971648*T]^
          4])]

Converted by Mathematica      July 25, 2001