c[0, 0] = (M*omega^2*x^2)/2 - x*Sin[OMEGA*t]
 
c[1/2, 0] = 0
 
c[1, 0] = (M*omega^2)/12
 
c[1, 1] = (M*omega^2)/6
 
c[3/2, 0] = -(OMEGA*Cos[OMEGA*t])/6
 
c[3/2, 1] = 0
 
c[2, 0] = -(M^2*omega^4*x^2)/24 + (M*omega^2*x*Sin[OMEGA*t])/12 + 
    (OMEGA^2*x*Sin[OMEGA*t])/24 - Sin[OMEGA*t]^2/24
 
c[2, 1] = 0
 
c[2, 2] = 0
 
c[5/2, 0] = 0
 
c[5/2, 1] = 0
 
c[5/2, 2] = 0
 
c[3, 0] = -(M^2*omega^4)/360
 
c[3, 1] = -(M^2*omega^4)/360
 
c[3, 2] = 0
 
c[3, 3] = 0
 
c[7/2, 0] = (M*omega^2*OMEGA*Cos[OMEGA*t])/720 + (OMEGA^3*Cos[OMEGA*t])/240
 
c[7/2, 1] = 0
 
c[7/2, 2] = 0
 
c[7/2, 3] = 0
 
c[4, 0] = (M^3*omega^6*x^2)/240 - (OMEGA^2*Cos[OMEGA*t]^2)/1440 - 
    (M^2*omega^4*x*Sin[OMEGA*t])/120 - (M*omega^2*OMEGA^2*x*Sin[OMEGA*t])/
     480 - (OMEGA^4*x*Sin[OMEGA*t])/1920 + (M*omega^2*Sin[OMEGA*t]^2)/240 + 
    (OMEGA^2*Sin[OMEGA*t]^2)/480
 
c[4, 1] = 0
 
c[4, 2] = 0
 
c[4, 3] = 0
 
c[4, 4] = 0
 
c[9/2, 0] = (M*omega^2*OMEGA*Cos[OMEGA*t])/8064
 
c[9/2, 1] = (M*omega^2*OMEGA*Cos[OMEGA*t])/1008
 
c[9/2, 2] = 0
 
c[9/2, 3] = 0
 
c[9/2, 4] = 0
 
c[5, 0] = (M^3*omega^6)/5670
 
c[5, 1] = (M^3*omega^6)/15120
 
c[5, 2] = 0
 
c[5, 3] = 0
 
c[5, 4] = 0
 
c[5, 5] = 0
 
c[11/2, 0] = -(M^2*omega^4*OMEGA*Cos[OMEGA*t])/40320 - 
    (M*omega^2*OMEGA^3*Cos[OMEGA*t])/40320 - (OMEGA^5*Cos[OMEGA*t])/26880
 
c[11/2, 1] = 0
 
c[11/2, 2] = 0
 
c[11/2, 3] = 0
 
c[11/2, 4] = 0
 
c[11/2, 5] = 0
 
c[6, 0] = (-17*M^4*omega^8*x^2)/40320 + (M*omega^2*OMEGA^2*Cos[OMEGA*t]^2)/
     120960 + (OMEGA^4*Cos[OMEGA*t]^2)/40320 + 
    (17*M^3*omega^6*x*Sin[OMEGA*t])/20160 + 
    (M^2*omega^4*OMEGA^2*x*Sin[OMEGA*t])/5040 + 
    (M*omega^2*OMEGA^4*x*Sin[OMEGA*t])/53760 + (OMEGA^6*x*Sin[OMEGA*t])/
     322560 - (17*M^2*omega^4*Sin[OMEGA*t]^2)/40320 - 
    (M*omega^2*OMEGA^2*Sin[OMEGA*t]^2)/5040 - (OMEGA^4*Sin[OMEGA*t]^2)/20160
 
c[6, 1] = 0
 
c[6, 2] = 0
 
c[6, 3] = 0
 
c[6, 4] = 0
 
c[6, 5] = 0
 
c[6, 6] = 0
 
c[13/2, 0] = (-29*M^2*omega^4*OMEGA*Cos[OMEGA*t])/7741440 - 
    (M*omega^2*OMEGA^3*Cos[OMEGA*t])/552960
 
c[13/2, 1] = -(M^2*omega^4*OMEGA*Cos[OMEGA*t])/30240 - 
    (M*omega^2*OMEGA^3*Cos[OMEGA*t])/51840
 
c[13/2, 2] = 0
 
c[13/2, 3] = 0
 
c[13/2, 4] = 0
 
c[13/2, 5] = 0
 
c[13/2, 6] = 0
 
c[7, 0] = -(M^4*omega^8)/75600 + (5*M*omega^2*OMEGA^2*Cos[OMEGA*t]^2)/4644864
 
c[7, 1] = -(M^4*omega^8)/604800 + (M*omega^2*OMEGA^2*Cos[OMEGA*t]^2)/72576
 
c[7, 2] = 0
 
c[7, 3] = 0
 
c[7, 4] = 0
 
c[7, 5] = 0
 
c[7, 6] = 0
 
c[7, 7] = 0
 
c[15/2, 0] = (-71*M^2*omega^4*OMEGA*Cos[OMEGA*t])/255467520 + 
    (23*M^3*omega^6*OMEGA*Cos[OMEGA*t])/43545600 + 
    (19*M^2*omega^4*OMEGA^3*Cos[OMEGA*t])/43545600 + 
    (M*omega^2*OMEGA^5*Cos[OMEGA*t])/5806080 + (OMEGA^7*Cos[OMEGA*t])/5806080
 
c[15/2, 1] = (-71*M^2*omega^4*OMEGA*Cos[OMEGA*t])/21288960
 
c[15/2, 2] = -(M^2*omega^4*OMEGA*Cos[OMEGA*t])/88704
 
c[15/2, 3] = 0
 
c[15/2, 4] = 0
 
c[15/2, 5] = 0
 
c[15/2, 6] = 0
 
c[15/2, 7] = 0
 
c[8, 0] = (31*M^5*omega^10*x^2)/725760 - 
    (37*M^2*omega^4*OMEGA^2*Cos[OMEGA*t]^2)/261273600 - 
    (M*omega^2*OMEGA^4*Cos[OMEGA*t]^2)/3628800 - (OMEGA^6*Cos[OMEGA*t]^2)/
     2419200 - (31*M^4*omega^8*x*Sin[OMEGA*t])/362880 - 
    (29*M^3*omega^6*OMEGA^2*x*Sin[OMEGA*t])/1451520 - 
    (M^2*omega^4*OMEGA^4*x*Sin[OMEGA*t])/580608 - 
    (M*omega^2*OMEGA^6*x*Sin[OMEGA*t])/11612160 - (OMEGA^8*x*Sin[OMEGA*t])/
     92897280 + (31*M^3*omega^6*Sin[OMEGA*t]^2)/725760 + 
    (29*M^2*omega^4*OMEGA^2*Sin[OMEGA*t]^2)/1451520 + 
    (M*omega^2*OMEGA^4*Sin[OMEGA*t]^2)/241920 + (OMEGA^6*Sin[OMEGA*t]^2)/
     1451520
 
c[8, 1] = 0
 
c[8, 2] = 0
 
c[8, 3] = 0
 
c[8, 4] = 0
 
c[8, 5] = 0
 
c[8, 6] = 0
 
c[8, 7] = 0
 
c[8, 8] = 0
 
c[17/2, 0] = (1123*M^3*omega^6*OMEGA*Cos[OMEGA*t])/11354112000 + 
    (2593*M^2*omega^4*OMEGA^3*Cos[OMEGA*t])/51093504000 + 
    (M*omega^2*OMEGA^5*Cos[OMEGA*t])/94617600
 
c[17/2, 1] = (53*M^3*omega^6*OMEGA*Cos[OMEGA*t])/53222400 + 
    (23*M^2*omega^4*OMEGA^3*Cos[OMEGA*t])/39916800 + 
    (M*omega^2*OMEGA^5*Cos[OMEGA*t])/7096320
 
c[17/2, 2] = 0
 
c[17/2, 3] = 0
 
c[17/2, 4] = 0
 
c[17/2, 5] = 0
 
c[17/2, 6] = 0
 
c[17/2, 7] = 0
 
c[17/2, 8] = 0
 
c[9, 0] = (M^5*omega^10)/935550 - (323*M^2*omega^4*OMEGA^2*Cos[OMEGA*t]^2)/
     8758886400 - (337*M*omega^2*OMEGA^4*Cos[OMEGA*t]^2)/10218700800
 
c[9, 1] = (M^5*omega^10)/23950080 - (13*M^2*omega^4*OMEGA^2*Cos[OMEGA*t]^2)/
     19160064 - (M*omega^2*OMEGA^4*Cos[OMEGA*t]^2)/1995840
 
c[9, 2] = 0
 
c[9, 3] = 0
 
c[9, 4] = 0
 
c[9, 5] = 0
 
c[9, 6] = 0
 
c[9, 7] = 0
 
c[9, 8] = 0
 
c[9, 9] = 0
 
c[19/2, 0] = (1387*M^3*omega^6*OMEGA*Cos[OMEGA*t])/98099527680 - 
    (137*M^4*omega^8*OMEGA*Cos[OMEGA*t])/11496038400 + 
    (31*M^2*omega^4*OMEGA^3*Cos[OMEGA*t])/10121379840 - 
    (109*M^3*omega^6*OMEGA^3*Cos[OMEGA*t])/11496038400 - 
    (23*M^2*omega^4*OMEGA^5*Cos[OMEGA*t])/7664025600 - 
    (M*omega^2*OMEGA^7*Cos[OMEGA*t])/1532805120 - (OMEGA^9*Cos[OMEGA*t])/
     2043740160 + (M*omega^2*OMEGA^3*Cos[OMEGA*t]^3)/19160064
 
c[19/2, 1] = (523*M^3*omega^6*OMEGA*Cos[OMEGA*t])/2724986880 + 
    (31*M^2*omega^4*OMEGA^3*Cos[OMEGA*t])/690094080
 
c[19/2, 2] = (M^3*omega^6*OMEGA*Cos[OMEGA*t])/1520640 + 
    (M^2*omega^4*OMEGA^3*Cos[OMEGA*t])/5391360
 
c[19/2, 3] = 0
 
c[19/2, 4] = 0
 
c[19/2, 5] = 0
 
c[19/2, 6] = 0
 
c[19/2, 7] = 0
 
c[19/2, 8] = 0
 
c[19/2, 9] = 0
 
c[10, 0] = (-691*M^6*omega^12*x^2)/159667200 - 
    (6577*M^2*omega^4*OMEGA^2*Cos[OMEGA*t]^2)/2231764254720 + 
    (M^3*omega^6*OMEGA^2*Cos[OMEGA*t]^2)/359251200 + 
    (M^2*omega^4*OMEGA^4*Cos[OMEGA*t]^2)/209018880 + 
    (M*omega^2*OMEGA^6*Cos[OMEGA*t]^2)/239500800 + 
    (OMEGA^8*Cos[OMEGA*t]^2)/239500800 + (691*M^5*omega^10*x*Sin[OMEGA*t])/
     79833600 + (323*M^4*omega^8*OMEGA^2*x*Sin[OMEGA*t])/159667200 + 
    (221*M^3*omega^6*OMEGA^4*x*Sin[OMEGA*t])/1277337600 + 
    (M^2*omega^4*OMEGA^6*x*Sin[OMEGA*t])/127733760 + 
    (M*omega^2*OMEGA^8*x*Sin[OMEGA*t])/4087480320 + 
    (OMEGA^10*x*Sin[OMEGA*t])/40874803200 - (691*M^4*omega^8*Sin[OMEGA*t]^2)/
     159667200 - (323*M^3*omega^6*OMEGA^2*Sin[OMEGA*t]^2)/159667200 - 
    (131*M^2*omega^4*OMEGA^4*Sin[OMEGA*t]^2)/319334400 - 
    (M*omega^2*OMEGA^6*Sin[OMEGA*t]^2)/19958400 - (OMEGA^8*Sin[OMEGA*t]^2)/
     159667200
 
c[10, 1] = (-14071*M^2*omega^4*OMEGA^2*Cos[OMEGA*t]^2)/185980354560
 
c[10, 2] = (-103*M^2*omega^4*OMEGA^2*Cos[OMEGA*t]^2)/387459072
 
c[10, 3] = 0
 
c[10, 4] = 0
 
c[10, 5] = 0
 
c[10, 6] = 0
 
c[10, 7] = 0
 
c[10, 8] = 0
 
c[10, 9] = 0
 
c[10, 10] = 0
 
c[21/2, 0] = (1249*M^3*omega^6*OMEGA*Cos[OMEGA*t])/1115882127360 - 
    (6769117*M^4*omega^8*OMEGA*Cos[OMEGA*t])/2678117105664000 - 
    (84283*M^3*omega^6*OMEGA^3*Cos[OMEGA*t])/63764692992000 - 
    (893*M^2*omega^4*OMEGA^5*Cos[OMEGA*t])/3188234649600 - 
    (M*omega^2*OMEGA^7*Cos[OMEGA*t])/28983951360 + 
    (M*omega^2*OMEGA^3*Cos[OMEGA*t]^3)/362299392
 
c[21/2, 1] = (1249*M^3*omega^6*OMEGA*Cos[OMEGA*t])/69742632960 - 
    (3007*M^4*omega^8*OMEGA*Cos[OMEGA*t])/104613949440 - 
    (2489*M^3*omega^6*OMEGA^3*Cos[OMEGA*t])/149448499200 - 
    (97*M^2*omega^4*OMEGA^5*Cos[OMEGA*t])/24908083200 - 
    (M*omega^2*OMEGA^7*Cos[OMEGA*t])/1811496960 + 
    (M*omega^2*OMEGA^3*Cos[OMEGA*t]^3)/22643712
 
c[21/2, 2] = (211*M^3*omega^6*OMEGA*Cos[OMEGA*t])/2384363520
 
c[21/2, 3] = (M^3*omega^6*OMEGA*Cos[OMEGA*t])/6386688
 
c[21/2, 4] = 0
 
c[21/2, 5] = 0
 
c[21/2, 6] = 0
 
c[21/2, 7] = 0
 
c[21/2, 8] = 0
 
c[21/2, 9] = 0
 
c[21/2, 10] = 0
 
c[11, 0] = (-691*M^6*omega^12)/7662154500 + 
    (2792507*M^3*omega^6*OMEGA^2*Cos[OMEGA*t]^2)/2678117105664000 + 
    (33307*M^2*omega^4*OMEGA^4*Cos[OMEGA*t]^2)/30433148928000 + 
    (6829*M*omega^2*OMEGA^6*Cos[OMEGA*t]^2)/14878428364800
 
c[11, 1] = (-691*M^6*omega^12)/653837184000 + 
    (4409*M^3*omega^6*OMEGA^2*Cos[OMEGA*t]^2)/174356582400 + 
    (3989*M^2*omega^4*OMEGA^4*Cos[OMEGA*t]^2)/174356582400 + 
    (59*M*omega^2*OMEGA^6*Cos[OMEGA*t]^2)/7264857600
 
c[11, 2] = 0
 
c[11, 3] = 0
 
c[11, 4] = 0
 
c[11, 5] = 0
 
c[11, 6] = 0
 
c[11, 7] = 0
 
c[11, 8] = 0
 
c[11, 9] = 0
 
c[11, 10] = 0
 
c[11, 11] = 0
 
c[23/2, 0] = (-473437*M^4*omega^8*OMEGA*Cos[OMEGA*t])/925768876032000 + 
    (1283*M^5*omega^10*OMEGA*Cos[OMEGA*t])/4649508864000 - 
    (9949*M^3*omega^6*OMEGA^3*Cos[OMEGA*t])/66126348288000 + 
    (3037*M^4*omega^8*OMEGA^3*Cos[OMEGA*t])/13948526592000 - 
    (23*M^2*omega^4*OMEGA^5*Cos[OMEGA*t])/1653158707200 + 
    (41*M^3*omega^6*OMEGA^5*Cos[OMEGA*t])/619934515200 + 
    (M^2*omega^4*OMEGA^7*Cos[OMEGA*t])/88562073600 + 
    (M*omega^2*OMEGA^9*Cos[OMEGA*t])/637646929920 + 
    (OMEGA^11*Cos[OMEGA*t])/1062744883200 - 
    (M^2*omega^4*OMEGA^3*Cos[OMEGA*t]^3)/369008640 - 
    (M*omega^2*OMEGA^5*Cos[OMEGA*t]^3)/369008640
 
c[23/2, 1] = (-1253221*M^4*omega^8*OMEGA*Cos[OMEGA*t])/160229228544000 - 
    (1088083*M^3*omega^6*OMEGA^3*Cos[OMEGA*t])/446352850944000 - 
    (23*M^2*omega^4*OMEGA^5*Cos[OMEGA*t])/95374540800
 
c[23/2, 2] = (-13*M^4*omega^8*OMEGA*Cos[OMEGA*t])/465696000 - 
    (167*M^3*omega^6*OMEGA^3*Cos[OMEGA*t])/16605388800 - 
    (M^2*omega^4*OMEGA^5*Cos[OMEGA*t])/851558400
 
c[23/2, 3] = 0
 
c[23/2, 4] = 0
 
c[23/2, 5] = 0
 
c[23/2, 6] = 0
 
c[23/2, 7] = 0
 
c[23/2, 8] = 0
 
c[23/2, 9] = 0
 
c[23/2, 10] = 0
 
c[23/2, 11] = 0
 
c[12, 0] = (5461*M^7*omega^14*x^2)/12454041600 + 
    (505693*M^3*omega^6*OMEGA^2*Cos[OMEGA*t]^2)/2999491158343680 - 
    (14617*M^4*omega^8*OMEGA^2*Cos[OMEGA*t]^2)/251073478656000 + 
    (29291*M^2*omega^4*OMEGA^4*Cos[OMEGA*t]^2)/357082280755200 - 
    (3019*M^3*omega^6*OMEGA^4*Cos[OMEGA*t]^2)/31384184832000 - 
    (127*M^2*omega^4*OMEGA^6*Cos[OMEGA*t]^2)/1743565824000 - 
    (M*omega^2*OMEGA^8*Cos[OMEGA*t]^2)/26153487360 - 
    (OMEGA^10*Cos[OMEGA*t]^2)/34871316480 + 
    (M*omega^2*OMEGA^4*Cos[OMEGA*t]^4)/5977939968 - 
    (5461*M^6*omega^12*x*Sin[OMEGA*t])/6227020800 - 
    (1021*M^5*omega^10*OMEGA^2*x*Sin[OMEGA*t])/4981616640 - 
    (349*M^4*omega^8*OMEGA^4*x*Sin[OMEGA*t])/19926466560 - 
    (313*M^3*omega^6*OMEGA^6*x*Sin[OMEGA*t])/398529331200 - 
    (M^2*omega^4*OMEGA^8*x*Sin[OMEGA*t])/45546209280 - 
    (M*omega^2*OMEGA^10*x*Sin[OMEGA*t])/2125489766400 - 
    (OMEGA^12*x*Sin[OMEGA*t])/25505877196800 + 
    (5461*M^5*omega^10*Sin[OMEGA*t]^2)/12454041600 + 
    (1021*M^4*omega^8*OMEGA^2*Sin[OMEGA*t]^2)/4981616640 + 
    (1033*M^3*omega^6*OMEGA^4*Sin[OMEGA*t]^2)/24908083200 + 
    (61*M^2*omega^4*OMEGA^6*Sin[OMEGA*t]^2)/12454041600 + 
    (M*omega^2*OMEGA^8*Sin[OMEGA*t]^2)/2490808320 + 
    (OMEGA^10*Sin[OMEGA*t]^2)/24908083200
 
c[12, 1] = (534509*M^3*omega^6*OMEGA^2*Cos[OMEGA*t]^2)/96137537126400 + 
    (211817*M^2*omega^4*OMEGA^4*Cos[OMEGA*t]^2)/89270570188800
 
c[12, 2] = (103*M^3*omega^6*OMEGA^2*Cos[OMEGA*t]^2)/4843238400 + 
    (1399*M^2*omega^4*OMEGA^4*Cos[OMEGA*t]^2)/149448499200
 
c[12, 3] = 0
 
c[12, 4] = 0
 
c[12, 5] = 0
 
c[12, 6] = 0
 
c[12, 7] = 0
 
c[12, 8] = 0
 
c[12, 9] = 0
 
c[12, 10] = 0
 
c[12, 11] = 0
 
c[12, 12] = 0
 
c[25/2, 0] = (-27389293*M^4*omega^8*OMEGA*Cos[OMEGA*t])/342798989524992000 + 
    (287138153*M^5*omega^10*OMEGA*Cos[OMEGA*t])/4499236737515520000 - 
    (13543*M^3*omega^6*OMEGA^3*Cos[OMEGA*t])/1321447351910400 + 
    (8457443*M^4*omega^8*OMEGA^3*Cos[OMEGA*t])/249957596528640000 + 
    (54107*M^3*omega^6*OMEGA^5*Cos[OMEGA*t])/7498727895859200 + 
    (2339*M^2*omega^4*OMEGA^7*Cos[OMEGA*t])/2678117105664000 + 
    (M*omega^2*OMEGA^9*Cos[OMEGA*t])/13733933875200 - 
    (2131*M^2*omega^4*OMEGA^3*Cos[OMEGA*t]^3)/4057753190400 - 
    (M*omega^2*OMEGA^5*Cos[OMEGA*t]^3)/7947878400
 
c[25/2, 1] = (-61243817*M^4*omega^8*OMEGA*Cos[OMEGA*t])/42849873690624000 + 
    (2071*M^5*omega^10*OMEGA*Cos[OMEGA*t])/2561974272000 - 
    (94801*M^3*omega^6*OMEGA^3*Cos[OMEGA*t])/495542756966400 + 
    (3287*M^4*omega^8*OMEGA^3*Cos[OMEGA*t])/6974263296000 + 
    (9151*M^3*omega^6*OMEGA^5*Cos[OMEGA*t])/83691159552000 + 
    (43*M^2*omega^4*OMEGA^7*Cos[OMEGA*t])/2988969984000 + 
    (M*omega^2*OMEGA^9*Cos[OMEGA*t])/735746457600 - 
    (2551*M^2*omega^4*OMEGA^3*Cos[OMEGA*t]^3)/523069747200 - 
    (M*omega^2*OMEGA^5*Cos[OMEGA*t]^3)/425779200
 
c[25/2, 2] = (-24529*M^4*omega^8*OMEGA*Cos[OMEGA*t])/3329438515200 - 
    (61*M^3*omega^6*OMEGA^3*Cos[OMEGA*t])/55616471040
 
c[25/2, 3] = -(M^4*omega^8*OMEGA*Cos[OMEGA*t])/76640256 - 
    (M^3*omega^6*OMEGA^3*Cos[OMEGA*t])/439934976
 
c[25/2, 4] = 0
 
c[25/2, 5] = 0
 
c[25/2, 6] = 0
 
c[25/2, 7] = 0
 
c[25/2, 8] = 0
 
c[25/2, 9] = 0
 
c[25/2, 10] = 0
 
c[25/2, 11] = 0
 
c[25/2, 12] = 0
 
c[13, 0] = (M^7*omega^14)/127702575 + (12714593*M^3*omega^6*OMEGA^2*
      Cos[OMEGA*t]^2)/1019826993836851200 - 
    (8357339*M^4*omega^8*OMEGA^2*Cos[OMEGA*t]^2)/299949115834368000 - 
    (12245*M^3*omega^6*OMEGA^4*Cos[OMEGA*t]^2)/399932154445824 - 
    (84967*M^2*omega^4*OMEGA^6*Cos[OMEGA*t]^2)/5768252227584000 - 
    (20737*M*omega^2*OMEGA^8*Cos[OMEGA*t]^2)/5356234211328000 + 
    (M*omega^2*OMEGA^4*Cos[OMEGA*t]^4)/67629219840
 
c[13, 1] = (M^7*omega^14)/37362124800 + 
    (8689673*M^3*omega^6*OMEGA^2*Cos[OMEGA*t]^2)/18211196318515200 - 
    (88217*M^4*omega^8*OMEGA^2*Cos[OMEGA*t]^2)/104613949440000 - 
    (1237*M^3*omega^6*OMEGA^4*Cos[OMEGA*t]^2)/1508855040000 - 
    (4531*M^2*omega^4*OMEGA^6*Cos[OMEGA*t]^2)/13076743680000 - 
    (41*M*omega^2*OMEGA^8*Cos[OMEGA*t]^2)/523069747200 + 
    (M*omega^2*OMEGA^4*Cos[OMEGA*t]^4)/2717245440
 
c[13, 2] = (45677*M^3*omega^6*OMEGA^2*Cos[OMEGA*t]^2)/15565125058560
 
c[13, 3] = (47*M^3*omega^6*OMEGA^2*Cos[OMEGA*t]^2)/9120190464
 
c[13, 4] = 0
 
c[13, 5] = 0
 
c[13, 6] = 0
 
c[13, 7] = 0
 
c[13, 8] = 0
 
c[13, 9] = 0
 
c[13, 10] = 0
 
c[13, 11] = 0
 
c[13, 12] = 0
 
c[13, 13] = 0
 
c[27/2, 0] = (-4262989*M^4*omega^8*OMEGA*Cos[OMEGA*t])/651318080097484800 + 
    (98972982181*M^5*omega^10*OMEGA*Cos[OMEGA*t])/6118961963021107200000 - 
    (97709*M^6*omega^12*OMEGA*Cos[OMEGA*t])/15064408719360000 + 
    (784837289*M^4*omega^8*OMEGA^3*Cos[OMEGA*t])/145689570548121600000 - 
    (1399*M^5*omega^10*OMEGA^3*Cos[OMEGA*t])/273898340352000 + 
    (9663737*M^3*omega^6*OMEGA^5*Cos[OMEGA*t])/14568957054812160000 - 
    (15443*M^4*omega^8*OMEGA^5*Cos[OMEGA*t])/10042939146240000 + 
    (137*M^2*omega^4*OMEGA^7*Cos[OMEGA*t])/3784144689561600 - 
    (101*M^3*omega^6*OMEGA^7*Cos[OMEGA*t])/401717565849600 - 
    (31*M^2*omega^4*OMEGA^9*Cos[OMEGA*t])/1147764473856000 - 
    (M*omega^2*OMEGA^11*Cos[OMEGA*t])/382588157952000 - 
    (OMEGA^13*Cos[OMEGA*t])/765176315904000 - 
    (54119*M^2*omega^4*OMEGA^3*Cos[OMEGA*t]^3)/1867815007027200 + 
    (109*M^3*omega^6*OMEGA^3*Cos[OMEGA*t]^3)/1072963584000 + 
    (17009*M^2*omega^4*OMEGA^5*Cos[OMEGA*t]^3)/125536739328000 + 
    (1103*M*omega^2*OMEGA^7*Cos[OMEGA*t]^3)/16738231910400
 
c[27/2, 1] = (-4262989*M^4*omega^8*OMEGA*Cos[OMEGA*t])/32565904004874240 + 
    (7672803751*M^5*omega^10*OMEGA*Cos[OMEGA*t])/27813463468277760000 + 
    (703291009*M^4*omega^8*OMEGA^3*Cos[OMEGA*t])/7284478527406080000 + 
    (9100697*M^3*omega^6*OMEGA^5*Cos[OMEGA*t])/728447852740608000 + 
    (137*M^2*omega^4*OMEGA^7*Cos[OMEGA*t])/189207234478080 - 
    (54119*M^2*omega^4*OMEGA^3*Cos[OMEGA*t]^3)/93390750351360
 
c[27/2, 2] = (-25261*M^4*omega^8*OMEGA*Cos[OMEGA*t])/30838924247040 + 
    (367597*M^5*omega^10*OMEGA*Cos[OMEGA*t])/355687428096000 + 
    (10429*M^4*omega^8*OMEGA^3*Cos[OMEGA*t])/25406244864000 + 
    (817*M^3*omega^6*OMEGA^5*Cos[OMEGA*t])/13549997260800 + 
    (M^2*omega^4*OMEGA^7*Cos[OMEGA*t])/246363586560 - 
    (529*M^2*omega^4*OMEGA^3*Cos[OMEGA*t]^3)/237124952064
 
c[27/2, 3] = (-8713*M^4*omega^8*OMEGA*Cos[OMEGA*t])/3914171154432
 
c[27/2, 4] = -(M^4*omega^8*OMEGA*Cos[OMEGA*t])/416047104
 
c[27/2, 5] = 0
 
c[27/2, 6] = 0
 
c[27/2, 7] = 0
 
c[27/2, 8] = 0
 
c[27/2, 9] = 0
 
c[27/2, 10] = 0
 
c[27/2, 11] = 0
 
c[27/2, 12] = 0
 
c[27/2, 13] = 0
 
c[14, 0] = (-929569*M^8*omega^16*x^2)/20922789888000 - 
    (49238405609*M^4*omega^8*OMEGA^2*Cos[OMEGA*t]^2)/7342754355625328640000 + 
    (2279*M^5*omega^10*OMEGA^2*Cos[OMEGA*t]^2)/1807729046323200 - 
    (399935533*M^3*omega^6*OMEGA^4*Cos[OMEGA*t]^2)/87413742328872960000 + 
    (92671*M^4*omega^8*OMEGA^4*Cos[OMEGA*t]^2)/45193226158080000 - 
    (17889581*M^2*omega^4*OMEGA^6*Cos[OMEGA*t]^2)/17482748465774592000 + 
    (401*M^3*omega^6*OMEGA^6*Cos[OMEGA*t]^2)/269007298560000 + 
    (503*M^2*omega^4*OMEGA^8*Cos[OMEGA*t]^2)/753220435968000 + 
    (M*omega^2*OMEGA^10*Cos[OMEGA*t]^2)/4184557977600 + 
    (OMEGA^12*Cos[OMEGA*t]^2)/6974263296000 - 
    (47*M^2*omega^4*OMEGA^4*Cos[OMEGA*t]^4)/5380145971200 - 
    (M*omega^2*OMEGA^6*Cos[OMEGA*t]^4)/89669099520 + 
    (929569*M^7*omega^14*x*Sin[OMEGA*t])/10461394944000 + 
    (217241*M^6*omega^12*OMEGA^2*x*Sin[OMEGA*t])/10461394944000 + 
    (74251*M^5*omega^10*OMEGA^4*x*Sin[OMEGA*t])/41845579776000 + 
    (6653*M^4*omega^8*OMEGA^6*x*Sin[OMEGA*t])/83691159552000 + 
    (421*M^3*omega^6*OMEGA^8*x*Sin[OMEGA*t])/191294078976000 + 
    (M^2*omega^4*OMEGA^10*x*Sin[OMEGA*t])/23911759872000 + 
    (M*omega^2*OMEGA^12*x*Sin[OMEGA*t])/1530352631808000 + 
    (OMEGA^14*x*Sin[OMEGA*t])/21424936845312000 - 
    (929569*M^6*omega^12*Sin[OMEGA*t]^2)/20922789888000 - 
    (217241*M^5*omega^10*OMEGA^2*Sin[OMEGA*t]^2)/10461394944000 - 
    (29299*M^4*omega^8*OMEGA^4*Sin[OMEGA*t]^2)/6974263296000 - 
    (431*M^3*omega^6*OMEGA^6*Sin[OMEGA*t]^2)/871782912000 - 
    (M^2*omega^4*OMEGA^8*Sin[OMEGA*t]^2)/25830604800 - 
    (M*omega^2*OMEGA^10*Sin[OMEGA*t]^2)/435891456000 - 
    (OMEGA^12*Sin[OMEGA*t]^2)/5230697472000
 
c[14, 1] = (-1229675303*M^4*omega^8*OMEGA^2*Cos[OMEGA*t]^2)/
     4532564417052672000 - (242296777*M^3*omega^6*OMEGA^4*Cos[OMEGA*t]^2)/
     1456895705481216000 - (1924877*M^2*omega^4*OMEGA^6*Cos[OMEGA*t]^2)/
     58275828219248640
 
c[14, 2] = (-17971*M^4*omega^8*OMEGA^2*Cos[OMEGA*t]^2)/15808330137600 - 
    (75533*M^3*omega^6*OMEGA^4*Cos[OMEGA*t]^2)/106706228428800 - 
    (1291*M^2*omega^4*OMEGA^6*Cos[OMEGA*t]^2)/8892185702400
 
c[14, 3] = 0
 
c[14, 4] = 0
 
c[14, 5] = 0
 
c[14, 6] = 0
 
c[14, 7] = 0
 
c[14, 8] = 0
 
c[14, 9] = 0
 
c[14, 10] = 0
 
c[14, 11] = 0
 
c[14, 12] = 0
 
c[14, 13] = 0
 
c[14, 14] = 0
 
c[29/2, 0] = (45709648847*M^5*omega^10*OMEGA*Cos[OMEGA*t])/
     12401096245056110592000 - (5230425149*M^6*omega^12*OMEGA*Cos[OMEGA*t])/
     3263446380277923840000 + (634086631*M^4*omega^8*OMEGA^3*Cos[OMEGA*t])/
     885792588932579328000 - (4203923173*M^5*omega^10*OMEGA^3*Cos[OMEGA*t])/
     4895169570416885760000 + (48019*M^3*omega^6*OMEGA^5*Cos[OMEGA*t])/
     1230267484628582400 - (1005143*M^4*omega^8*OMEGA^5*Cos[OMEGA*t])/
     5439077300463206400 - (43319*M^3*omega^6*OMEGA^7*Cos[OMEGA*t])/
     1942527607308288000 - (2069*M^2*omega^4*OMEGA^9*Cos[OMEGA*t])/
     1165516564384972800 - (M*omega^2*OMEGA^11*Cos[OMEGA*t])/
     9250131463372800 + (274093013*M^3*omega^6*OMEGA^3*Cos[OMEGA*t]^3)/
     8158615950694809600 + (3887789*M^2*omega^4*OMEGA^5*Cos[OMEGA*t]^3)/
     158934076961587200 + (1103*M*omega^2*OMEGA^7*Cos[OMEGA*t]^3)/
     404693251522560
 
c[29/2, 1] = (13608607429*M^5*omega^10*OMEGA*Cos[OMEGA*t])/
     186016443675841658880 - (9533*M^6*omega^12*OMEGA*Cos[OMEGA*t])/
     426824913715200 + (4883565053*M^4*omega^8*OMEGA^3*Cos[OMEGA*t])/
     332172220849717248000 - (83*M^5*omega^10*OMEGA^3*Cos[OMEGA*t])/
     6335063654400 + (48019*M^3*omega^6*OMEGA^5*Cos[OMEGA*t])/
     57668788341964800 - (2479*M^4*omega^8*OMEGA^5*Cos[OMEGA*t])/
     812999835648000 - (409*M^3*omega^6*OMEGA^7*Cos[OMEGA*t])/
     1034727063552000 - (M^2*omega^4*OMEGA^9*Cos[OMEGA*t])/29563630387200 - 
    (M*omega^2*OMEGA^11*Cos[OMEGA*t])/433599912345600 + 
    (14029*M^3*omega^6*OMEGA^3*Cos[OMEGA*t]^3)/47424990412800 + 
    (5903*M^2*omega^4*OMEGA^5*Cos[OMEGA*t]^3)/23712495206400 + 
    (1103*M*omega^2*OMEGA^7*Cos[OMEGA*t]^3)/18969996165120
 
c[29/2, 2] = (4174838231*M^5*omega^10*OMEGA*Cos[OMEGA*t])/
     10521292063113216000 + (14457669467*M^4*omega^8*OMEGA^3*Cos[OMEGA*t])/
     166086110424858624000 + (1417*M^3*omega^6*OMEGA^5*Cos[OMEGA*t])/
     260944743628800
 
c[29/2, 3] = (1459*M^5*omega^10*OMEGA*Cos[OMEGA*t])/2038630809600 + 
    (461*M^4*omega^8*OMEGA^3*Cos[OMEGA*t])/2574499479552 + 
    (M^3*omega^6*OMEGA^5*Cos[OMEGA*t])/77662126080
 
c[29/2, 4] = 0
 
c[29/2, 5] = 0
 
c[29/2, 6] = 0
 
c[29/2, 7] = 0
 
c[29/2, 8] = 0
 
c[29/2, 9] = 0
 
c[29/2, 10] = 0
 
c[29/2, 11] = 0
 
c[29/2, 12] = 0
 
c[29/2, 13] = 0
 
c[29/2, 14] = 0
 
c[15, 0] = (-3617*M^8*omega^16)/5210265060000 - 
    (279659041*M^4*omega^8*OMEGA^2*Cos[OMEGA*t]^2)/279723975452393472000 + 
    (21350139751*M^5*omega^10*OMEGA^2*Cos[OMEGA*t]^2)/
     29371017422501314560000 - (34686013*M^3*omega^6*OMEGA^4*Cos[OMEGA*t]^2)/
     106295110671909519360 + (5988908033*M^4*omega^8*OMEGA^4*Cos[OMEGA*t]^2)/
     7342754355625328640000 + (1497633043*M^3*omega^6*OMEGA^6*Cos[OMEGA*t]^2)/
     3671377177812664320000 + (955901*M^2*omega^4*OMEGA^8*Cos[OMEGA*t]^2)/
     7946703848079360000 + (35561*M*omega^2*OMEGA^10*Cos[OMEGA*t]^2)/
     1589340769615872000 - (865607*M^2*omega^4*OMEGA^4*Cos[OMEGA*t]^4)/
     374630324266598400 - (32927*M*omega^2*OMEGA^6*Cos[OMEGA*t]^4)/
     36422392637030400
 
c[15, 1] = (-3617*M^8*omega^16)/5335311421440000 - 
    (1619589347*M^4*omega^8*OMEGA^2*Cos[OMEGA*t]^2)/34965496931549184000 + 
    (6777763*M^5*omega^10*OMEGA^2*Cos[OMEGA*t]^2)/256094948229120000 - 
    (301836193*M^3*omega^6*OMEGA^4*Cos[OMEGA*t]^2)/22144814723314483200 + 
    (244351*M^4*omega^8*OMEGA^4*Cos[OMEGA*t]^2)/9146248151040000 + 
    (384179*M^3*omega^6*OMEGA^6*Cos[OMEGA*t]^2)/32011868528640000 + 
    (83*M^2*omega^4*OMEGA^8*Cos[OMEGA*t]^2)/26347216896000 + 
    (109*M*omega^2*OMEGA^10*Cos[OMEGA*t]^2)/213412456857600 - 
    (4577*M^2*omega^4*OMEGA^4*Cos[OMEGA*t]^4)/91462481510400 - 
    (43*M*omega^2*OMEGA^6*Cos[OMEGA*t]^4)/1693749657600
 
c[15, 2] = (-11935937*M^4*omega^8*OMEGA^2*Cos[OMEGA*t]^2)/38423623001702400 - 
    (9090392917*M^3*omega^6*OMEGA^4*Cos[OMEGA*t]^2)/99651666254915174400
 
c[15, 3] = (-611*M^4*omega^8*OMEGA^2*Cos[OMEGA*t]^2)/1094422855680 - 
    (841*M^3*omega^6*OMEGA^4*Cos[OMEGA*t]^2)/4827186524160
 
c[15, 4] = 0
 
c[15, 5] = 0
 
c[15, 6] = 0
 
c[15, 7] = 0
 
c[15, 8] = 0
 
c[15, 9] = 0
 
c[15, 10] = 0
 
c[15, 11] = 0
 
c[15, 12] = 0
 
c[15, 13] = 0
 
c[15, 14] = 0
 
c[15, 15] = 0
 
c[31/2, 0] = (447702979*M^5*omega^10*OMEGA*Cos[OMEGA*t])/
     745930601206382592000 - (2665139731669*M^6*omega^12*OMEGA*Cos[OMEGA*t])/
     5580493310275249766400000 + (946639*M^7*omega^14*OMEGA*Cos[OMEGA*t])/
     6146278757498880000 + (502849*M^4*omega^8*OMEGA^3*Cos[OMEGA*t])/
     9641279879538278400 - (475229252581*M^5*omega^10*OMEGA^3*Cos[OMEGA*t])/
     2790246655137624883200000 + (21289*M^6*omega^12*OMEGA^3*Cos[OMEGA*t])/
     175607964499968000 - (243263899*M^4*omega^8*OMEGA^5*Cos[OMEGA*t])/
     10334246870880092160000 + (21319*M^5*omega^10*OMEGA^5*Cos[OMEGA*t])/
     585359881666560000 - (744967*M^3*omega^6*OMEGA^7*Cos[OMEGA*t])/
     442896294466289664000 + (967*M^4*omega^8*OMEGA^7*Cos[OMEGA*t])/
     163900766866636800 - (53*M^2*omega^4*OMEGA^9*Cos[OMEGA*t])/
     851723643204403200 + (1987*M^3*omega^6*OMEGA^9*Cos[OMEGA*t])/
     3278015337332736000 + (M^2*omega^4*OMEGA^11*Cos[OMEGA*t])/
     22299424063488000 + (M*omega^2*OMEGA^13*Cos[OMEGA*t])/
     312191936888832000 + (OMEGA^15*Cos[OMEGA*t])/728447852740608000 + 
    (6873029951*M^3*omega^6*OMEGA^3*Cos[OMEGA*t]^3)/1395123327568812441600 - 
    (2572411*M^4*omega^8*OMEGA^3*Cos[OMEGA*t]^3)/768284844687360000 + 
    (60341357*M^2*omega^4*OMEGA^5*Cos[OMEGA*t]^3)/49825833127457587200 - 
    (225403*M^3*omega^6*OMEGA^5*Cos[OMEGA*t]^3)/45193226158080000 - 
    (1622281*M^2*omega^4*OMEGA^7*Cos[OMEGA*t]^3)/512189896458240000 - 
    (9301*M*omega^2*OMEGA^9*Cos[OMEGA*t]^3)/9312543571968000 + 
    (M*omega^2*OMEGA^5*Cos[OMEGA*t]^5)/1108636139520
 
c[31/2, 1] = (24836991563*M^5*omega^10*OMEGA*Cos[OMEGA*t])/
     1875796070680756224000 - (1074825184141*M^6*omega^12*OMEGA*Cos[OMEGA*t])/
     119581999505898209280000 + (502849*M^4*omega^8*OMEGA^3*Cos[OMEGA*t])/
     425350582920806400 - (1403952502363*M^5*omega^10*OMEGA^3*Cos[OMEGA*t])/
     418536998270643732480000 - (6750042133*M^4*omega^8*OMEGA^5*Cos[OMEGA*t])/
     13951233275688124416000 - (35989007*M^3*omega^6*OMEGA^7*Cos[OMEGA*t])/
     996516662549151744000 - (53*M^2*omega^4*OMEGA^9*Cos[OMEGA*t])/
     37576043082547200 + (278827649*M^3*omega^6*OMEGA^3*Cos[OMEGA*t]^3)/
     3523038705981849600 + (60341357*M^2*omega^4*OMEGA^5*Cos[OMEGA*t]^3)/
     2198198520329011200
 
c[31/2, 2] = (8424439*M^5*omega^10*OMEGA*Cos[OMEGA*t])/96670587027456000 - 
    (2295641*M^6*omega^12*OMEGA*Cos[OMEGA*t])/64877386884710400 + 
    (5026133*M^4*omega^8*OMEGA^3*Cos[OMEGA*t])/602579992471142400 - 
    (160421*M^5*omega^10*OMEGA^3*Cos[OMEGA*t])/10812897814118400 - 
    (64607*M^4*omega^8*OMEGA^5*Cos[OMEGA*t])/27032244535296000 - 
    (6169*M^3*omega^6*OMEGA^7*Cos[OMEGA*t])/30893993754624000 - 
    (M^2*omega^4*OMEGA^9*Cos[OMEGA*t])/111833461555200 + 
    (1727507*M^3*omega^6*OMEGA^3*Cos[OMEGA*t]^3)/6307523724902400 + 
    (18409*M^2*omega^4*OMEGA^5*Cos[OMEGA*t]^3)/159013203148800
 
c[31/2, 3] = (145340009*M^5*omega^10*OMEGA*Cos[OMEGA*t])/601216689320755200 + 
    (739*M^4*omega^8*OMEGA^3*Cos[OMEGA*t])/28831578587136
 
c[31/2, 4] = (13*M^5*omega^10*OMEGA*Cos[OMEGA*t])/49925652480 + 
    (M^4*omega^8*OMEGA^3*Cos[OMEGA*t])/31675318272
 
c[31/2, 5] = 0
 
c[31/2, 6] = 0
 
c[31/2, 7] = 0
 
c[31/2, 8] = 0
 
c[31/2, 9] = 0
 
c[31/2, 10] = 0
 
c[31/2, 11] = 0
 
c[31/2, 12] = 0
 
c[31/2, 13] = 0
 
c[31/2, 14] = 0
 
c[31/2, 15] = 0
 
c[16, 0] = (3202291*M^9*omega^18*x^2)/711374856192000 - 
    (181975967*M^4*omega^8*OMEGA^2*Cos[OMEGA*t]^2)/2505527608695010099200 + 
    (3850556552747*M^5*omega^10*OMEGA^2*Cos[OMEGA*t]^2)/
     16741479930825749299200000 - (1030037*M^6*omega^12*OMEGA^2*
      Cos[OMEGA*t]^2)/36877672544993280000 + 
    (1500451998973*M^4*omega^8*OMEGA^4*Cos[OMEGA*t]^2)/
     8370739965412874649600000 - (207751*M^5*omega^10*OMEGA^4*Cos[OMEGA*t]^2)/
     4609709068124160000 + (1333907347*M^3*omega^6*OMEGA^6*Cos[OMEGA*t]^2)/
     23916399901179641856000 - (42503*M^4*omega^8*OMEGA^6*Cos[OMEGA*t]^2)/
     1317059733749760000 + (30733823*M^2*omega^4*OMEGA^8*Cos[OMEGA*t]^2)/
     3986066650196606976000 - (71*M^3*omega^6*OMEGA^8*Cos[OMEGA*t]^2)/
     5121898964582400 - (641*M^2*omega^4*OMEGA^10*Cos[OMEGA*t]^2)/
     153656968937472000 - (M*omega^2*OMEGA^12*Cos[OMEGA*t]^2)/
     914624815104000 - (OMEGA^14*Cos[OMEGA*t]^2)/1829249630208000 - 
    (11732219*M^2*omega^4*OMEGA^4*Cos[OMEGA*t]^4)/66434444169943449600 + 
    (5521*M^3*omega^6*OMEGA^4*Cos[OMEGA*t]^4)/17072996548608000 + 
    (7331*M^2*omega^4*OMEGA^6*Cos[OMEGA*t]^4)/12804747411456000 + 
    (19*M*omega^2*OMEGA^8*Cos[OMEGA*t]^4)/53353114214400 - 
    (3202291*M^8*omega^16*x*Sin[OMEGA*t])/355687428096000 - 
    (2993509*M^7*omega^14*OMEGA^2*x*Sin[OMEGA*t])/1422749712384000 - 
    (42631*M^6*omega^12*OMEGA^4*x*Sin[OMEGA*t])/237124952064000 - 
    (45833*M^5*omega^10*OMEGA^6*x*Sin[OMEGA*t])/5690998849536000 - 
    (10141*M^4*omega^8*OMEGA^8*x*Sin[OMEGA*t])/45527990796288000 - 
    (109*M^3*omega^6*OMEGA^10*x*Sin[OMEGA*t])/26015994740736000 - 
    (M^2*omega^4*OMEGA^12*x*Sin[OMEGA*t])/17343996493824000 - 
    (M*omega^2*OMEGA^14*x*Sin[OMEGA*t])/1456895705481216000 - 
    (OMEGA^16*x*Sin[OMEGA*t])/23310331287699456000 + 
    (3202291*M^7*omega^14*Sin[OMEGA*t]^2)/711374856192000 + 
    (2993509*M^6*omega^12*OMEGA^2*Sin[OMEGA*t]^2)/1422749712384000 + 
    (10093*M^5*omega^10*OMEGA^4*Sin[OMEGA*t]^2)/23712495206400 + 
    (10177*M^4*omega^8*OMEGA^6*Sin[OMEGA*t]^2)/203249958912000 + 
    (347*M^3*omega^6*OMEGA^8*Sin[OMEGA*t]^2)/88921857024000 + 
    (311*M^2*omega^4*OMEGA^10*Sin[OMEGA*t]^2)/1422749712384000 + 
    (M*omega^2*OMEGA^12*Sin[OMEGA*t]^2)/101624979456000 + 
    (OMEGA^14*Sin[OMEGA*t]^2)/1422749712384000
 
c[16, 1] = (-81814753*M^4*omega^8*OMEGA^2*Cos[OMEGA*t]^2)/
     22289552074447257600 + (384579553*M^5*omega^10*OMEGA^2*Cos[OMEGA*t]^2)/
     34795444009697280000 + (3294119686223*M^4*omega^8*OMEGA^4*
      Cos[OMEGA*t]^2)/418536998270643732480000 + 
    (66365582953*M^3*omega^6*OMEGA^6*Cos[OMEGA*t]^2)/
     29895499876474552320000 + (1128131*M^2*omega^4*OMEGA^8*Cos[OMEGA*t]^2)/
     4100891615428608000 - (7570571*M^2*omega^4*OMEGA^4*Cos[OMEGA*t]^4)/
     1107240736165724160
 
c[16, 2] = (-388784813*M^4*omega^8*OMEGA^2*Cos[OMEGA*t]^2)/
     12537873041876582400 + (1642601*M^5*omega^10*OMEGA^2*Cos[OMEGA*t]^2)/
     32438693442355200 + (3543763*M^4*omega^8*OMEGA^4*Cos[OMEGA*t]^2)/
     97316080327065600 + (423239*M^3*omega^6*OMEGA^6*Cos[OMEGA*t]^2)/
     40548366802944000 + (1031*M^2*omega^4*OMEGA^8*Cos[OMEGA*t]^2)/
     772349843865600 - (229*M^2*omega^4*OMEGA^4*Cos[OMEGA*t]^4)/7723498438656
 
c[16, 3] = (-13440401*M^4*omega^8*OMEGA^2*Cos[OMEGA*t]^2)/144667765867806720
 
c[16, 4] = (-7585*M^4*omega^8*OMEGA^2*Cos[OMEGA*t]^2)/75347794722816
 
c[16, 5] = 0
 
c[16, 6] = 0
 
c[16, 7] = 0
 
c[16, 8] = 0
 
c[16, 9] = 0
 
c[16, 10] = 0
 
c[16, 11] = 0
 
c[16, 12] = 0
 
c[16, 13] = 0
 
c[16, 14] = 0
 
c[16, 15] = 0
 
c[16, 16] = 0
 
c[33/2, 0] = (9508056731*M^5*omega^10*OMEGA*Cos[OMEGA*t])/
     189830562352892529868800 - (37541625722989*M^6*omega^12*OMEGA*
      Cos[OMEGA*t])/267863678893211988787200000 + 
    (848964952307*M^7*omega^14*OMEGA*Cos[OMEGA*t])/
     21147132544200946483200000 - (208910819651*M^5*omega^10*OMEGA^3*
      Cos[OMEGA*t])/6377706640314571161600000 + 
    (1452442694089*M^6*omega^12*OMEGA^3*Cos[OMEGA*t])/
     66965919723302997196800000 - (77517539*M^4*omega^8*OMEGA^5*Cos[OMEGA*t])/
     28989575637793505280000 + (242425703*M^5*omega^10*OMEGA^5*Cos[OMEGA*t])/
     51512245941002305536000 - (7129*M^3*omega^6*OMEGA^7*Cos[OMEGA*t])/
     82827358965124300800 + (136584347*M^4*omega^8*OMEGA^7*Cos[OMEGA*t])/
     239163999011796418560000 + (6833*M^3*omega^6*OMEGA^9*Cos[OMEGA*t])/
     151850158102727884800 + (2909*M^2*omega^4*OMEGA^11*Cos[OMEGA*t])/
     1138876185770459136000 + (M*omega^2*OMEGA^13*Cos[OMEGA*t])/
     8374089601253376000 + (45849809*M^3*omega^6*OMEGA^3*Cos[OMEGA*t]^3)/
     160205549577279897600 - (967297512959*M^4*omega^8*OMEGA^3*
      Cos[OMEGA*t]^3)/627805497405965598720000 - 
    (3878201464481*M^3*omega^6*OMEGA^5*Cos[OMEGA*t]^3)/
     2511221989623862394880000 - (13153717957*M^2*omega^4*OMEGA^7*
      Cos[OMEGA*t]^3)/24619823427684925440000 - 
    (9301*M*omega^2*OMEGA^9*Cos[OMEGA*t]^3)/249795286401024000 + 
    (M*omega^2*OMEGA^5*Cos[OMEGA*t]^5)/29737534095360
 
c[33/2, 1] = (9508056731*M^5*omega^10*OMEGA*Cos[OMEGA*t])/
     7909606764703855411200 - (34155041228999*M^6*omega^12*OMEGA*
      Cos[OMEGA*t])/11160986620550499532800000 + 
    (1048589*M^7*omega^14*OMEGA*Cos[OMEGA*t])/1720958052099686400 - 
    (587463007603*M^5*omega^10*OMEGA^3*Cos[OMEGA*t])/
     797213330039321395200000 + (5243723*M^6*omega^12*OMEGA^3*Cos[OMEGA*t])/
     14597412049059840000 - (823881529*M^4*omega^8*OMEGA^5*Cos[OMEGA*t])/
     13286888833988689920000 + (6539693*M^5*omega^10*OMEGA^5*Cos[OMEGA*t])/
     77852864261652480000 - (7129*M^3*omega^6*OMEGA^7*Cos[OMEGA*t])/
     3451139956880179200 + (424219*M^4*omega^8*OMEGA^7*Cos[OMEGA*t])/
     38926432130826240000 + (56921*M^3*omega^6*OMEGA^9*Cos[OMEGA*t])/
     62282291409321984000 + (41*M^2*omega^4*OMEGA^11*Cos[OMEGA*t])/
     741455850110976000 + (M*omega^2*OMEGA^13*Cos[OMEGA*t])/
     348920400052224000 + (45849809*M^3*omega^6*OMEGA^3*Cos[OMEGA*t]^3)/
     6675231232386662400 - (16193903*M^4*omega^8*OMEGA^3*Cos[OMEGA*t]^3)/
     1161157776629760000 - (1501051579*M^3*omega^6*OMEGA^5*Cos[OMEGA*t]^3)/
     102181884343418880000 - (201506917*M^2*omega^4*OMEGA^7*Cos[OMEGA*t]^3)/
     34060628114472960000 - (9301*M*omega^2*OMEGA^9*Cos[OMEGA*t]^3)/
     10408136933376000 + (M*omega^2*OMEGA^5*Cos[OMEGA*t]^5)/1239063920640
 
c[33/2, 2] = (1322192633*M^5*omega^10*OMEGA*Cos[OMEGA*t])/
     146474199346367692800 - (19534250913509*M^6*omega^12*OMEGA*Cos[OMEGA*t])/
     1116098662055049953280000 - (51865043767*M^5*omega^10*OMEGA^3*
      Cos[OMEGA*t])/11388761857704591360000 - 
    (8746163*M^4*omega^8*OMEGA^5*Cos[OMEGA*t])/21090299736489984000 - 
    (457*M^3*omega^6*OMEGA^7*Cos[OMEGA*t])/30273157516492800 + 
    (6925843*M^3*omega^6*OMEGA^3*Cos[OMEGA*t]^3)/163172319013896192
 
c[33/2, 3] = (270529937*M^5*omega^10*OMEGA*Cos[OMEGA*t])/
     8651132398894841856 - (562871*M^6*omega^12*OMEGA*Cos[OMEGA*t])/
     17377871486976000 - (14191*M^5*omega^10*OMEGA^3*Cos[OMEGA*t])/
     1497170466570240 - (9001*M^4*omega^8*OMEGA^5*Cos[OMEGA*t])/
     9268198126387200 - (M^3*omega^6*OMEGA^7*Cos[OMEGA*t])/24833449525248 + 
    (7519*M^3*omega^6*OMEGA^3*Cos[OMEGA*t]^3)/92952981209088
 
c[33/2, 4] = (19301*M^5*omega^10*OMEGA*Cos[OMEGA*t])/357396199243776
 
c[33/2, 5] = (M^5*omega^10*OMEGA*Cos[OMEGA*t])/25517555712
 
c[33/2, 6] = 0
 
c[33/2, 7] = 0
 
c[33/2, 8] = 0
 
c[33/2, 9] = 0
 
c[33/2, 10] = 0
 
c[33/2, 11] = 0
 
c[33/2, 12] = 0
 
c[33/2, 13] = 0
 
c[33/2, 14] = 0
 
c[33/2, 15] = 0
 
c[33/2, 16] = 0
 
c[17, 0] = (43867*M^9*omega^18)/701627318642250 + 
    (211480829684057*M^5*omega^10*OMEGA^2*Cos[OMEGA*t]^2)/
     4125100654955464627322880000 - (1075328054687*M^6*omega^12*OMEGA^2*
      Cos[OMEGA*t]^2)/57399359762831140454400000 + 
    (2825130846539*M^4*omega^8*OMEGA^4*Cos[OMEGA*t]^2)/
     110493767543449945374720000 - (158275678441*M^5*omega^10*OMEGA^4*
      Cos[OMEGA*t]^2)/7440657747033666355200000 + 
    (37235277767*M^3*omega^6*OMEGA^6*Cos[OMEGA*t]^2)/
     9821668226084439588864000 - (1633077202781*M^4*omega^8*OMEGA^6*
      Cos[OMEGA*t]^2)/150673319377431743692800000 - 
    (16574027033*M^3*omega^6*OMEGA^8*Cos[OMEGA*t]^2)/
     5022443979247724789760000 - (483862343*M^2*omega^4*OMEGA^10*
      Cos[OMEGA*t]^2)/717491997035389255680000 - 
    (252587*M*omega^2*OMEGA^12*Cos[OMEGA*t]^2)/2657377766797737984000 + 
    (144318625889*M^3*omega^6*OMEGA^4*Cos[OMEGA*t]^4)/
     1004488795849544957952000 + (10246783249*M^2*omega^4*OMEGA^6*
      Cos[OMEGA*t]^4)/71749199703538925568000 + 
    (6625651*M*omega^2*OMEGA^8*Cos[OMEGA*t]^4)/249129165637287936000
 
c[17, 1] = (43867*M^9*omega^18)/2554547108585472000 + 
    (12314868429047*M^5*omega^10*OMEGA^2*Cos[OMEGA*t]^2)/
     4407158819396863918080000 - (32999951*M^6*omega^12*OMEGA^2*
      Cos[OMEGA*t]^2)/41285609835724800000 + 
    (478410137*M^4*omega^8*OMEGA^4*Cos[OMEGA*t]^2)/374666909259202560000 - 
    (52752971*M^5*omega^10*OMEGA^4*Cos[OMEGA*t]^2)/63863677714636800000 + 
    (275892649*M^3*omega^6*OMEGA^6*Cos[OMEGA*t]^2)/1604847749360202547200 - 
    (195913127*M^4*omega^8*OMEGA^6*Cos[OMEGA*t]^2)/510909421717094400000 - 
    (2479*M^3*omega^6*OMEGA^8*Cos[OMEGA*t]^2)/23393288540160000 - 
    (47381*M^2*omega^4*OMEGA^10*Cos[OMEGA*t]^2)/2432902008176640000 - 
    (M*omega^2*OMEGA^12*Cos[OMEGA*t]^2)/413758844928000 + 
    (1108049*M^3*omega^6*OMEGA^4*Cos[OMEGA*t]^4)/324386934423552000 + 
    (813517*M^2*omega^4*OMEGA^6*Cos[OMEGA*t]^4)/243290200817664000 + 
    (313*M*omega^2*OMEGA^8*Cos[OMEGA*t]^4)/375447840768000
 
c[17, 2] = (20622788413*M^5*omega^10*OMEGA^2*Cos[OMEGA*t]^2)/
     1010044038058868736000 + (77568654797*M^4*omega^8*OMEGA^4*
      Cos[OMEGA*t]^2)/8370739965412874649600 + 
    (23201148037*M^3*omega^6*OMEGA^6*Cos[OMEGA*t]^2)/18601644367584165888000
 
c[17, 3] = (153101579*M^5*omega^10*OMEGA^2*Cos[OMEGA*t]^2)/
     4034874407406796800 + (13528873*M^4*omega^8*OMEGA^4*Cos[OMEGA*t]^2)/
     749333818518405120 + (968197*M^3*omega^6*OMEGA^6*Cos[OMEGA*t]^2)/
     374666909259202560
 
c[17, 4] = 0
 
c[17, 5] = 0
 
c[17, 6] = 0
 
c[17, 7] = 0
 
c[17, 8] = 0
 
c[17, 9] = 0
 
c[17, 10] = 0
 
c[17, 11] = 0
 
c[17, 12] = 0
 
c[17, 13] = 0
 
c[17, 14] = 0
 
c[17, 15] = 0
 
c[17, 16] = 0
 
c[17, 17] = 0
 
c[35/2, 0] = (-21304156702766689*M^6*omega^12*OMEGA*Cos[OMEGA*t])/
     632515433759837909522841600000 + (5586013598733509*M^7*omega^14*OMEGA*
      Cos[OMEGA*t])/412510065495546462732288000000 - 
    (704659*M^8*omega^16*OMEGA*Cos[OMEGA*t])/191217561344409600000 - 
    (14187457138559*M^5*omega^10*OMEGA^3*Cos[OMEGA*t])/
     3011978255999228140584960000 + (13516161262063*M^6*omega^12*OMEGA^3*
      Cos[OMEGA*t])/2678636788932119887872000000 - 
    (162109*M^7*omega^14*OMEGA^3*Cos[OMEGA*t])/55894364085288960000 - 
    (725796893*M^4*omega^8*OMEGA^5*Cos[OMEGA*t])/4183303133332261306368000 + 
    (2371517593*M^5*omega^10*OMEGA^5*Cos[OMEGA*t])/
     3188853320157285580800000 - (6327941*M^6*omega^12*OMEGA^5*Cos[OMEGA*t])/
     7266267331087564800000 + (330517849*M^4*omega^8*OMEGA^7*Cos[OMEGA*t])/
     5580493310275249766400000 - (167*M^5*omega^10*OMEGA^7*Cos[OMEGA*t])/
     1186329360177561600 + (600931*M^3*omega^6*OMEGA^9*Cos[OMEGA*t])/
     212590221343819038720000 - (11897*M^4*omega^8*OMEGA^9*Cos[OMEGA*t])/
     830430552124293120000 + (181*M^2*omega^4*OMEGA^11*Cos[OMEGA*t])/
     2362113570486878208000 - (841*M^3*omega^6*OMEGA^11*Cos[OMEGA*t])/
     830430552124293120000 - (M^2*omega^4*OMEGA^13*Cos[OMEGA*t])/
     18251220925808640000 - (M*omega^2*OMEGA^15*Cos[OMEGA*t])/
     332172220849717248000 - (OMEGA^17*Cos[OMEGA*t])/885792588932579328000 - 
    (2551054443533*M^4*omega^8*OMEGA^3*Cos[OMEGA*t]^3)/
     6875167758259107712204800 + (210754429*M^5*omega^10*OMEGA^3*
      Cos[OMEGA*t]^3)/2043637686868377600000 - 
    (109366214589329*M^3*omega^6*OMEGA^5*Cos[OMEGA*t]^3)/
     515637581869433078415360000 + (221890049*M^4*omega^8*OMEGA^5*
      Cos[OMEGA*t]^3)/1362425124578918400000 - 
    (6939725423*M^2*omega^4*OMEGA^7*Cos[OMEGA*t]^3)/
     289358912384642580480000 + (85018537*M^3*omega^6*OMEGA^7*Cos[OMEGA*t]^3)/
     743140977043046400000 + (125801419*M^2*omega^4*OMEGA^9*Cos[OMEGA*t]^3)/
     2724850249157836800000 + (925751*M*omega^2*OMEGA^11*Cos[OMEGA*t]^3)/
     87195207973050777600 - (383*M^2*omega^4*OMEGA^5*Cos[OMEGA*t]^5)/
     2994340933140480 - (37*M*omega^2*OMEGA^7*Cos[OMEGA*t]^5)/487799901388800
 
c[35/2, 1] = (-128695345265047447*M^6*omega^12*OMEGA*Cos[OMEGA*t])/
     158128858439959477380710400000 + (5746432393777657*M^7*omega^14*OMEGA*
      Cos[OMEGA*t])/20625503274777323136614400000 - 
    (1190118441751*M^5*omega^10*OMEGA^3*Cos[OMEGA*t])/
     10221645665155751608320000 + (14514815922587*M^6*omega^12*OMEGA^3*
      Cos[OMEGA*t])/133931839446605994393600000 - 
    (725796893*M^4*omega^8*OMEGA^5*Cos[OMEGA*t])/165130386842062946304000 + 
    (92700315997*M^5*omega^10*OMEGA^5*Cos[OMEGA*t])/
     5580493310275249766400000 + (479035813*M^4*omega^8*OMEGA^7*Cos[OMEGA*t])/
     348780831892203110400000 + (3622163*M^3*omega^6*OMEGA^9*Cos[OMEGA*t])/
     53147555335954759680000 + (181*M^2*omega^4*OMEGA^11*Cos[OMEGA*t])/
     93241325150797824000 - (552769949551*M^4*omega^8*OMEGA^3*Cos[OMEGA*t]^3)/
     94439117558504226816000 - (52734974470993*M^3*omega^6*OMEGA^5*
      Cos[OMEGA*t]^3)/14323266163039807733760000 - 
    (6939725423*M^2*omega^4*OMEGA^7*Cos[OMEGA*t]^3)/11422062330972733440000
 
c[35/2, 2] = (-14887188730811659*M^6*omega^12*OMEGA*Cos[OMEGA*t])/
     2635480973999324623011840000 + (67654297*M^7*omega^14*OMEGA*
      Cos[OMEGA*t])/58771279883796480000 - 
    (19372188256969*M^5*omega^10*OMEGA^3*Cos[OMEGA*t])/
     22589836919994211054387200 + (45393683*M^6*omega^12*OMEGA^3*
      Cos[OMEGA*t])/90828341638594560000 - 
    (676750801*M^4*omega^8*OMEGA^5*Cos[OMEGA*t])/19609233437494974873600 + 
    (11117*M^5*omega^10*OMEGA^5*Cos[OMEGA*t])/131065428049920000 + 
    (117109*M^4*omega^8*OMEGA^7*Cos[OMEGA*t])/15138056939765760000 + 
    (8821*M^3*omega^6*OMEGA^9*Cos[OMEGA*t])/20760763803107328000 + 
    (M^2*omega^4*OMEGA^11*Cos[OMEGA*t])/72844785274060800 - 
    (1722382621*M^4*omega^8*OMEGA^3*Cos[OMEGA*t]^3)/87422278827147264000 - 
    (21595801781*M^3*omega^6*OMEGA^5*Cos[OMEGA*t]^3)/1573601018888650752000 - 
    (1555277*M^2*omega^4*OMEGA^7*Cos[OMEGA*t]^3)/557717887254528000
 
c[35/2, 3] = (-823704753449*M^6*omega^12*OMEGA*Cos[OMEGA*t])/
     51108228325778758041600 - (2156760218597*M^5*omega^10*OMEGA^3*
      Cos[OMEGA*t])/806779889999793251942400 - 
    (74927*M^4*omega^8*OMEGA^5*Cos[OMEGA*t])/633782593325629440
 
c[35/2, 4] = (-5633*M^6*omega^12*OMEGA*Cos[OMEGA*t])/321521201971200 - 
    (19891*M^5*omega^10*OMEGA^3*Cos[OMEGA*t])/6090530197340160 - 
    (M^4*omega^8*OMEGA^5*Cos[OMEGA*t])/6124213370880
 
c[35/2, 5] = 0
 
c[35/2, 6] = 0
 
c[35/2, 7] = 0
 
c[35/2, 8] = 0
 
c[35/2, 9] = 0
 
c[35/2, 10] = 0
 
c[35/2, 11] = 0
 
c[35/2, 12] = 0
 
c[35/2, 13] = 0
 
c[35/2, 14] = 0
 
c[35/2, 15] = 0
 
c[35/2, 16] = 0
 
c[35/2, 17] = 0
 
c[18, 0] = (-221930581*M^10*omega^20*x^2)/486580401635328000 + 
    (2400430477759793*M^5*omega^10*OMEGA^2*Cos[OMEGA*t]^2)/
     321123220216533092526981120000 - (410340427827791*M^6*omega^12*OMEGA^2*
      Cos[OMEGA*t]^2)/56251372567574517645312000000 + 
    (92576279*M^7*omega^14*OMEGA^2*Cos[OMEGA*t]^2)/147141913454523187200000 + 
    (1099035029843*M^4*omega^8*OMEGA^4*Cos[OMEGA*t]^2)/
     602395651199845628116992000 - (52326017338003*M^5*omega^10*OMEGA^4*
      Cos[OMEGA*t]^2)/8593959697823884640256000000 + 
    (27026249*M^6*omega^12*OMEGA^4*Cos[OMEGA*t]^2)/26753075173549670400000 - 
    (166881524691443*M^4*omega^8*OMEGA^6*Cos[OMEGA*t]^2)/
     77345637280414961762304000000 + (26412293*M^5*omega^10*OMEGA^6*
      Cos[OMEGA*t]^2)/36785478363630796800000 - 
    (569739413*M^3*omega^6*OMEGA^8*Cos[OMEGA*t]^2)/
     1384633678489347686400000 + (414097*M^4*omega^8*OMEGA^8*Cos[OMEGA*t]^2)/
     1362425124578918400000 - (978031603*M^2*omega^4*OMEGA^10*Cos[OMEGA*t]^2)/
     24554170565211098972160000 + (26857*M^3*omega^6*OMEGA^10*Cos[OMEGA*t]^2)/
     306545653030256640000 + (53*M^2*omega^4*OMEGA^12*Cos[OMEGA*t]^2)/
     2780459437916160000 + (M*omega^2*OMEGA^14*Cos[OMEGA*t]^2)/
     260668072304640000 + (OMEGA^16*Cos[OMEGA*t]^2)/608225502044160000 + 
    (1340595803269*M^3*omega^6*OMEGA^4*Cos[OMEGA*t]^4)/
     51563758186943307841536000 - (1829857*M^4*omega^8*OMEGA^4*
      Cos[OMEGA*t]^4)/175168944588718080000 + 
    (3432316963*M^2*omega^4*OMEGA^6*Cos[OMEGA*t]^4)/
     334829598616514985984000 - (7747*M^3*omega^6*OMEGA^6*Cos[OMEGA*t]^4)/
     368001984430080000 - (457*M^2*omega^4*OMEGA^8*Cos[OMEGA*t]^4)/
     25519951134720000 - (529*M*omega^2*OMEGA^10*Cos[OMEGA*t]^4)/
     72987060245299200 + (M*omega^2*OMEGA^6*Cos[OMEGA*t]^6)/505538079621120 + 
    (221930581*M^9*omega^18*x*Sin[OMEGA*t])/243290200817664000 + 
    (2116951*M^8*omega^16*OMEGA^2*x*Sin[OMEGA*t])/9930212278272000 + 
    (70907569*M^7*omega^14*OMEGA^4*x*Sin[OMEGA*t])/3892643213082624000 + 
    (3176357*M^6*omega^12*OMEGA^6*x*Sin[OMEGA*t])/3892643213082624000 + 
    (28109*M^5*omega^10*OMEGA^8*x*Sin[OMEGA*t])/1245645828186439680 + 
    (8803*M^4*omega^8*OMEGA^10*x*Sin[OMEGA*t])/20760763803107328000 + 
    (137*M^3*omega^6*OMEGA^12*x*Sin[OMEGA*t])/23726587203551232000 + 
    (M^2*omega^4*OMEGA^14*x*Sin[OMEGA*t])/16608611042485862400 + 
    (M*omega^2*OMEGA^16*x*Sin[OMEGA*t])/1771585177865158656000 + 
    (OMEGA^18*x*Sin[OMEGA*t])/31888533201572855808000 - 
    (221930581*M^8*omega^16*Sin[OMEGA*t]^2)/486580401635328000 - 
    (2116951*M^7*omega^14*OMEGA^2*Sin[OMEGA*t]^2)/9930212278272000 - 
    (13989601*M^6*omega^12*OMEGA^4*Sin[OMEGA*t]^2)/324386934423552000 - 
    (49369*M^5*omega^10*OMEGA^6*Sin[OMEGA*t]^2)/9731608032706560 - 
    (54937*M^4*omega^8*OMEGA^8*Sin[OMEGA*t]^2)/139022971895808000 - 
    (10709*M^3*omega^6*OMEGA^10*Sin[OMEGA*t]^2)/486580401635328000 - 
    (43*M^2*omega^4*OMEGA^12*Sin[OMEGA*t]^2)/46340990631936000 - 
    (M*omega^2*OMEGA^14*Sin[OMEGA*t]^2)/30411275102208000 - 
    (OMEGA^16*Sin[OMEGA*t]^2)/486580401635328000
 
c[18, 1] = (9023581883784191*M^5*omega^10*OMEGA^2*Cos[OMEGA*t]^2)/
     20463734621641814719856640000 - (94868661361181*M^6*omega^12*OMEGA^2*
      Cos[OMEGA*t]^2)/233320172791598678016000000 + 
    (2619011697529*M^4*omega^8*OMEGA^4*Cos[OMEGA*t]^2)/
     26576278729404954181632000 - (6069753838414481*M^5*omega^10*OMEGA^4*
      Cos[OMEGA*t]^2)/19336409320103740440576000000 - 
    (1978359551601689*M^4*omega^8*OMEGA^6*Cos[OMEGA*t]^2)/
     19336409320103740440576000000 - (273330427597*M^3*omega^6*OMEGA^8*
      Cos[OMEGA*t]^2)/15346356603256936857600000 - 
    (1912293073*M^2*omega^4*OMEGA^10*Cos[OMEGA*t]^2)/
     1227708528260554948608000 + (4402765192729*M^3*omega^6*OMEGA^4*
      Cos[OMEGA*t]^4)/4296979848911942320128000 + 
    (36488803469*M^2*omega^4*OMEGA^6*Cos[OMEGA*t]^4)/83707399654128746496000
 
c[18, 2] = (4140535897258987*M^5*omega^10*OMEGA^2*Cos[OMEGA*t]^2)/
     1023186731082090735992832000 - (107209*M^6*omega^12*OMEGA^2*
      Cos[OMEGA*t]^2)/52875645419520000 + 
    (60141592702391*M^4*omega^8*OMEGA^4*Cos[OMEGA*t]^2)/
     67769510759982633163161600 - (3383966371*M^5*omega^10*OMEGA^4*
      Cos[OMEGA*t]^2)/2145819571211796480000 - 
    (24511580453*M^4*omega^8*OMEGA^6*Cos[OMEGA*t]^2)/
     47208030566659522560000 - (10315873*M^3*omega^6*OMEGA^8*Cos[OMEGA*t]^2)/
     112400072777760768000 - (53149*M^2*omega^4*OMEGA^10*Cos[OMEGA*t]^2)/
     6422861301586329600 + (154942111*M^3*omega^6*OMEGA^4*Cos[OMEGA*t]^4)/
     34968911530858905600 + (115961*M^2*omega^4*OMEGA^6*Cos[OMEGA*t]^4)/
     56767713524121600
 
c[18, 3] = (7064106737953*M^5*omega^10*OMEGA^2*Cos[OMEGA*t]^2)/
     562190511583566338457600 + (16913696753*M^4*omega^8*OMEGA^4*
      Cos[OMEGA*t]^2)/5976147333331801866240
 
c[18, 4] = (25789*M^5*omega^10*OMEGA^2*Cos[OMEGA*t]^2)/1890544667590656 + 
    (139277*M^4*omega^8*OMEGA^4*Cos[OMEGA*t]^2)/42633711381381120
 
c[18, 5] = 0
 
c[18, 6] = 0
 
c[18, 7] = 0
 
c[18, 8] = 0
 
c[18, 9] = 0
 
c[18, 10] = 0
 
c[18, 11] = 0
 
c[18, 12] = 0
 
c[18, 13] = 0
 
c[18, 14] = 0
 
c[18, 15] = 0
 
c[18, 16] = 0
 
c[18, 17] = 0
 
c[18, 18] = 0
 
c[37/2, 0] = (-972545131063309*M^6*omega^12*OMEGA*Cos[OMEGA*t])/
     173489947545555540897693696000 + (209717739873304682561*M^7*omega^14*
      OMEGA*Cos[OMEGA*t])/43833319559556767129932922880000000 - 
    (784973286945187*M^8*omega^16*OMEGA*Cos[OMEGA*t])/
     781598018833666982019072000000 - (2603087401*M^5*omega^10*OMEGA^3*
      Cos[OMEGA*t])/7285208177775910846464000 + 
    (118004927634587869*M^6*omega^12*OMEGA^3*Cos[OMEGA*t])/
     94877315063975686428426240000000 - (270352188779461*M^7*omega^14*OMEGA^3*
      Cos[OMEGA*t])/495012078594655755278745600000 + 
    (25052845589087*M^5*omega^10*OMEGA^5*Cos[OMEGA*t])/
     206255032747773231366144000000 - (73832043661171*M^6*omega^12*OMEGA^5*
      Cos[OMEGA*t])/618765098243319694098432000000 + 
    (15707729803*M^4*omega^8*OMEGA^7*Cos[OMEGA*t])/
     2710780430399305326526464000 - (11712467009*M^5*omega^10*OMEGA^7*
      Cos[OMEGA*t])/803591036679635966361600000 + 
    (30577*M^3*omega^6*OMEGA^9*Cos[OMEGA*t])/241344411538399690752000 - 
    (7911457*M^4*omega^8*OMEGA^9*Cos[OMEGA*t])/6868299458800307404800000 - 
    (663049*M^3*omega^6*OMEGA^11*Cos[OMEGA*t])/10302449188200461107200000 - 
    (6571*M^2*omega^4*OMEGA^13*Cos[OMEGA*t])/2391639990117964185600000 - 
    (M*omega^2*OMEGA^15*Cos[OMEGA*t])/9790339140833771520000 - 
    (277605469826040683*M^4*omega^8*OMEGA^3*Cos[OMEGA*t]^3)/
     5479164944944595891241615360000 + (3483554329711123*M^5*omega^10*OMEGA^3*
      Cos[OMEGA*t]^3)/58009227960311221321728000000 - 
    (729807542441161*M^3*omega^6*OMEGA^5*Cos[OMEGA*t]^3)/
     65228154106483284419543040000 + (59843306954009*M^4*omega^8*OMEGA^5*
      Cos[OMEGA*t]^3)/853076881769282666496000000 + 
    (2566301739228103*M^3*omega^6*OMEGA^7*Cos[OMEGA*t]^3)/
     77345637280414961762304000000 + (281913749417809*M^2*omega^4*OMEGA^9*
      Cos[OMEGA*t]^3)/38672818640207480881152000000 + 
    (925751*M*omega^2*OMEGA^11*Cos[OMEGA*t]^3)/2569964024468865024000 - 
    (1345433*M^2*omega^4*OMEGA^5*Cos[OMEGA*t]^5)/52563516266328883200 - 
    (703*M*omega^2*OMEGA^7*Cos[OMEGA*t]^5)/273167944777728000
 
c[37/2, 1] = (-1631524429141*M^6*omega^12*OMEGA*Cos[OMEGA*t])/
     11121150483689457749852160 + (124933196433466064569*M^7*omega^14*OMEGA*
      Cos[OMEGA*t])/1095832988988919178248323072000000 - 
    (51948229*M^8*omega^16*OMEGA*Cos[OMEGA*t])/3155089762182758400000 - 
    (2603087401*M^5*omega^10*OMEGA^3*Cos[OMEGA*t])/273195306666596656742400 + 
    (12749195039676959*M^6*omega^12*OMEGA^3*Cos[OMEGA*t])/
     418576389988128028360704000000 - (233698573*M^7*omega^14*OMEGA^3*
      Cos[OMEGA*t])/23978682192588963840000 + 
    (5249847480991*M^5*omega^10*OMEGA^5*Cos[OMEGA*t])/
     1718791939564776928051200000 - (68603149*M^6*omega^12*OMEGA^5*
      Cos[OMEGA*t])/29973352740736204800000 + 
    (260199139*M^4*omega^8*OMEGA^7*Cos[OMEGA*t])/1737679763076477773414400 - 
    (185617*M^5*omega^10*OMEGA^7*Cos[OMEGA*t])/622822914093219840000 + 
    (30577*M^3*omega^6*OMEGA^9*Cos[OMEGA*t])/9050415432689988403200 - 
    (217709*M^4*omega^8*OMEGA^9*Cos[OMEGA*t])/8719520797305077760000 - 
    (25709*M^3*omega^6*OMEGA^11*Cos[OMEGA*t])/17439041594610155520000 - 
    (83*M^2*omega^4*OMEGA^13*Cos[OMEGA*t])/1245645828186439680000 - 
    (M*omega^2*OMEGA^15*Cos[OMEGA*t])/367137717781266432000 - 
    (50197900850828239*M^4*omega^8*OMEGA^3*Cos[OMEGA*t]^3)/
     45659707874538299093680128000 + (270146277241*M^5*omega^10*OMEGA^3*
      Cos[OMEGA*t]^3)/472080305666595225600000 - 
    (729807542441161*M^3*omega^6*OMEGA^5*Cos[OMEGA*t]^3)/
     2446055778993123165732864000 + (160517187977*M^4*omega^8*OMEGA^5*
      Cos[OMEGA*t]^3)/236040152833297612800000 + 
    (91627900099*M^3*omega^6*OMEGA^7*Cos[OMEGA*t]^3)/
     269760174666625843200000 + (9162361441*M^2*omega^4*OMEGA^9*
      Cos[OMEGA*t]^3)/104906734592576716800000 + 
    (925751*M*omega^2*OMEGA^11*Cos[OMEGA*t]^3)/96373650917582438400 - 
    (613*M^2*omega^4*OMEGA^5*Cos[OMEGA*t]^5)/2245755699855360 - 
    (703*M*omega^2*OMEGA^7*Cos[OMEGA*t]^5)/10243797929164800
 
c[37/2, 2] = (-17622247427753*M^6*omega^12*OMEGA*Cos[OMEGA*t])/
     15186444988231402389504000 + (1195175234399459609*M^7*omega^14*OMEGA*
      Cos[OMEGA*t])/1739417442839554251187814400000 - 
    (4634669003*M^5*omega^10*OMEGA^3*Cos[OMEGA*t])/58541851428556426444800 + 
    (392908575834997*M^6*omega^12*OMEGA^3*Cos[OMEGA*t])/
     1993220904705371563622400000 + (27389491711*M^5*omega^10*OMEGA^5*
      Cos[OMEGA*t])/1292324766590057840640000 + 
    (9007179677*M^4*omega^8*OMEGA^7*Cos[OMEGA*t])/8067798899997932519424000 + 
    (4159*M^3*omega^6*OMEGA^9*Cos[OMEGA*t])/152107822398151065600 - 
    (348670821542717*M^4*omega^8*OMEGA^3*Cos[OMEGA*t]^3)/
     54356795088736070349619200 - (5478098021971*M^3*omega^6*OMEGA^5*
      Cos[OMEGA*t]^3)/2740678743969885899980800
 
c[37/2, 3] = (-1570730800013*M^6*omega^12*OMEGA*Cos[OMEGA*t])/
     379661124705785059737600 + (54140680151*M^7*omega^14*OMEGA*Cos[OMEGA*t])/
     41363226782215962624000 - (40394677*M^5*omega^10*OMEGA^3*Cos[OMEGA*t])/
     133049662337628241920 + (28111861*M^6*omega^12*OMEGA^3*Cos[OMEGA*t])/
     67148095425675264000 + (77867*M^5*omega^10*OMEGA^5*Cos[OMEGA*t])/
     1557057285233049600 + (2143*M^4*omega^8*OMEGA^7*Cos[OMEGA*t])/
     730863623680819200 + (M^3*omega^6*OMEGA^9*Cos[OMEGA*t])/
     12346414155694080 - (35970787*M^4*omega^8*OMEGA^3*Cos[OMEGA*t]^3)/
     3077621040343449600 - (1688983*M^3*omega^6*OMEGA^5*Cos[OMEGA*t]^3)/
     413797786936934400
 
c[37/2, 4] = (-30148111639*M^6*omega^12*OMEGA*Cos[OMEGA*t])/
     4172100271492143513600 - (5377*M^5*omega^10*OMEGA^3*Cos[OMEGA*t])/
     9226105147883520
 
c[37/2, 5] = -(M^6*omega^12*OMEGA*Cos[OMEGA*t])/191381667840 - 
    (M^5*omega^10*OMEGA^3*Cos[OMEGA*t])/2111687884800
 
c[37/2, 6] = 0
 
c[37/2, 7] = 0
 
c[37/2, 8] = 0
 
c[37/2, 9] = 0
 
c[37/2, 10] = 0
 
c[37/2, 11] = 0
 
c[37/2, 12] = 0
 
c[37/2, 13] = 0
 
c[37/2, 14] = 0
 
c[37/2, 15] = 0
 
c[37/2, 16] = 0
 
c[37/2, 17] = 0
 
c[37/2, 18] = 0
 
c[19, 0] = (-174611*M^10*omega^20)/30626589305812500 + 
    (1901915059897*M^5*omega^10*OMEGA^2*Cos[OMEGA*t]^2)/
     3508068792281453951975424000 - (18845423379854179049*M^6*omega^12*
      OMEGA^2*Cos[OMEGA*t]^2)/8766663911911353425986584576000000 + 
    (7120317392666567*M^7*omega^14*OMEGA^2*Cos[OMEGA*t]^2)/
     14850362357839672658362368000000 - 
    (89684938673058247*M^5*omega^10*OMEGA^4*Cos[OMEGA*t]^2)/
     69576697713582170047512576000000 + 
    (1663931930933*M^6*omega^12*OMEGA^4*Cos[OMEGA*t]^2)/
     3033162246290782814208000000 - (32174283964153*M^4*omega^8*OMEGA^6*
      Cos[OMEGA*t]^2)/110439202719971698488115200000 + 
    (149914189285397*M^5*omega^10*OMEGA^6*Cos[OMEGA*t]^2)/
     530370084208559737798656000000 - (79811665649*M^3*omega^6*OMEGA^8*
      Cos[OMEGA*t]^2)/3011978255999228140584960000 + 
    (5783179709*M^4*omega^8*OMEGA^8*Cos[OMEGA*t]^2)/
     66107382290952958771200000 + (25221697091*M^3*omega^6*OMEGA^10*
      Cos[OMEGA*t]^2)/1375033551651821542440960000 + 
    (256471739*M^2*omega^4*OMEGA^12*Cos[OMEGA*t]^2)/
     92078139619541621145600000 + (1832387*M*omega^2*OMEGA^14*Cos[OMEGA*t]^2)/
     5893000935650663753318400 + (128024623681*M^3*omega^6*OMEGA^4*
      Cos[OMEGA*t]^4)/68093766792327047675904000 - 
    (603046632419233*M^4*omega^8*OMEGA^4*Cos[OMEGA*t]^4)/
     92814764736497954114764800000 - (409623603731609*M^3*omega^6*OMEGA^6*
      Cos[OMEGA*t]^4)/46407382368248977057382400000 - 
    (16333201694713*M^2*omega^4*OMEGA^8*Cos[OMEGA*t]^4)/
     3867281864020748088115200000 - (629094233*M*omega^2*OMEGA^10*
      Cos[OMEGA*t]^4)/1255610994811931197440000 + 
    (M*omega^2*OMEGA^6*Cos[OMEGA*t]^6)/7686008812339200
 
c[19, 1] = (-174611*M^10*omega^20)/401428831349145600000 + 
    (2973244444193*M^5*omega^10*OMEGA^2*Cos[OMEGA*t]^2)/
     87701719807036348799385600 - (29565627943790143087*M^6*omega^12*OMEGA^2*
      Cos[OMEGA*t]^2)/219166597797783835649664614400000 + 
    (26632321691*M^7*omega^14*OMEGA^2*Cos[OMEGA*t]^2)/
     1132992733599828541440000 - (4756033916837527*M^5*omega^10*OMEGA^4*
      Cos[OMEGA*t]^2)/63379582937473636682956800000 + 
    (55940586739*M^6*omega^12*OMEGA^4*Cos[OMEGA*t]^2)/
     2265985467199657082880000 - (166295146138267*M^4*omega^8*OMEGA^6*
      Cos[OMEGA*t]^2)/10649494547997270925639680000 + 
    (6630805021*M^5*omega^10*OMEGA^6*Cos[OMEGA*t]^2)/
     566496366799914270720000 - (46269082949*M^3*omega^6*OMEGA^8*
      Cos[OMEGA*t]^2)/35668163557885596401664000 + 
    (6549043*M^4*omega^8*OMEGA^8*Cos[OMEGA*t]^2)/1967001273610813440000 + 
    (30156899*M^3*omega^6*OMEGA^10*Cos[OMEGA*t]^2)/47208030566659522560000 + 
    (2173*M^2*omega^4*OMEGA^12*Cos[OMEGA*t]^2)/24703312698408960000 + 
    (M*omega^2*OMEGA^14*Cos[OMEGA*t]^2)/114693951814041600 + 
    (858598567*M^3*omega^6*OMEGA^4*Cos[OMEGA*t]^4)/8729970101580390727680 - 
    (2052804869*M^4*omega^8*OMEGA^4*Cos[OMEGA*t]^4)/11802007641664880640000 - 
    (1315540217*M^3*omega^6*OMEGA^6*Cos[OMEGA*t]^4)/5901003820832440320000 - 
    (418430017*M^2*omega^4*OMEGA^8*Cos[OMEGA*t]^4)/3934002547221626880000 - 
    (177427*M*omega^2*OMEGA^10*Cos[OMEGA*t]^4)/10218188434341888000 + 
    (M*omega^2*OMEGA^6*Cos[OMEGA*t]^6)/208162738667520
 
c[19, 2] = (249694154737*M^5*omega^10*OMEGA^2*Cos[OMEGA*t]^2)/
     696045395293939276185600 - (372256686688406677*M^6*omega^12*OMEGA^2*
      Cos[OMEGA*t]^2)/347883488567910850237562880000 - 
    (26411342144095679*M^5*omega^10*OMEGA^4*Cos[OMEGA*t]^2)/
     44727877101588537887686656000 - (1517718545950799*M^4*omega^8*OMEGA^6*
      Cos[OMEGA*t]^2)/12424410305996816079912960000 - 
    (14154557117*M^3*omega^6*OMEGA^8*Cos[OMEGA*t]^2)/
     1394434377777420435456000 + (669660707*M^3*omega^6*OMEGA^4*
      Cos[OMEGA*t]^4)/900711200956706979840
 
c[19, 3] = (544759921*M^5*omega^10*OMEGA^2*Cos[OMEGA*t]^2)/
     377503959224502190080 - (99708056771*M^6*omega^12*OMEGA^2*
      Cos[OMEGA*t]^2)/48257097912585289728000 - 
    (568103*M^5*omega^10*OMEGA^4*Cos[OMEGA*t]^2)/478741050720092160 - 
    (1364479*M^4*omega^8*OMEGA^6*Cos[OMEGA*t]^2)/5302977792591790080 - 
    (11*M^3*omega^6*OMEGA^8*Cos[OMEGA*t]^2)/484473992970240 + 
    (1537*M^3*omega^6*OMEGA^4*Cos[OMEGA*t]^4)/1047143788314624
 
c[19, 4] = (169744919*M^5*omega^10*OMEGA^2*Cos[OMEGA*t]^2)/
    63885285407223447552
 
c[19, 5] = (7003*M^5*omega^10*OMEGA^2*Cos[OMEGA*t]^2)/3536733221683200
 
c[19, 6] = 0
 
c[19, 7] = 0
 
c[19, 8] = 0
 
c[19, 9] = 0
 
c[19, 10] = 0
 
c[19, 11] = 0
 
c[19, 12] = 0
 
c[19, 13] = 0
 
c[19, 14] = 0
 
c[19, 15] = 0
 
c[19, 16] = 0
 
c[19, 17] = 0
 
c[19, 18] = 0
 
c[19, 19] = 0
 
c[39/2, 0] = (-896292101*M^6*omega^12*OMEGA*Cos[OMEGA*t])/
     1893374959571707310899200 + (1300892313568721*M^7*omega^14*OMEGA*
      Cos[OMEGA*t])/867449737727777704488468480000 - 
    (39353688524192015899*M^8*omega^16*OMEGA*Cos[OMEGA*t])/
     105199966942936241111839014912000000 + 
    (5359554763*M^9*omega^18*OMEGA*Cos[OMEGA*t])/60426279125324188876800000 + 
    (6189594632909*M^6*omega^12*OMEGA^3*Cos[OMEGA*t])/
     23572003742602655013273600000 - (7561482663679493621*M^7*omega^14*
      OMEGA^3*Cos[OMEGA*t])/52599983471468120555919507456000000 + 
    (3090091*M^8*omega^16*OMEGA^3*Cos[OMEGA*t])/44268336355548856320000 + 
    (6702696460553*M^5*omega^10*OMEGA^5*Cos[OMEGA*t])/
     433724868863888852244234240000 - (74476104054043*M^6*omega^12*OMEGA^5*
      Cos[OMEGA*t])/3371793812273597471533301760000 + 
    (120606883*M^7*omega^14*OMEGA^5*Cos[OMEGA*t])/5754883726221351321600000 + 
    (772457*M^4*omega^8*OMEGA^7*Cos[OMEGA*t])/2299098165194216020377600 - 
    (483743444081*M^5*omega^10*OMEGA^7*Cos[OMEGA*t])/
     258756313810842781168435200000 + (5455843*M^6*omega^12*OMEGA^7*
      Cos[OMEGA*t])/1611367443341978370048000 - 
    (3410501069*M^4*omega^8*OMEGA^9*Cos[OMEGA*t])/
     34500841841445704155791360000 + (365287*M^5*omega^10*OMEGA^9*
      Cos[OMEGA*t])/1062440072533172551680000 - 
    (27823*M^3*omega^6*OMEGA^11*Cos[OMEGA*t])/8152723098945279177523200 + 
    (31*M^4*omega^8*OMEGA^11*Cos[OMEGA*t])/1287806148525057638400 - 
    (29*M^2*omega^4*OMEGA^13*Cos[OMEGA*t])/406779776470483992576000 + 
    (347*M^3*omega^6*OMEGA^13*Cos[OMEGA*t])/279024665513762488320000 + 
    (43*M^2*omega^4*OMEGA^15*Cos[OMEGA*t])/837073996541287464960000 + 
    (M*omega^2*OMEGA^17*Cos[OMEGA*t])/446439464822019981312000 + 
    (OMEGA^19*Cos[OMEGA*t])/1339318394466059943936000 - 
    (220890710221549*M^4*omega^8*OMEGA^3*Cos[OMEGA*t]^3)/
     71564603362541660620298649600 + (328938972760153913*M^5*omega^10*OMEGA^3*
      Cos[OMEGA*t]^3)/16437494834833787673724846080000 - 
    (3836616947*M^6*omega^12*OMEGA^3*Cos[OMEGA*t]^3)/
     1258880815110920601600000 + (10138349942085011*M^4*omega^8*OMEGA^5*
      Cos[OMEGA*t]^3)/635265500863141552607723520000 - 
    (45789269*M^5*omega^10*OMEGA^5*Cos[OMEGA*t]^3)/9174030231577559040000 + 
    (93924880697401463*M^3*omega^6*OMEGA^7*Cos[OMEGA*t]^3)/
     21916659779778383564966461440000 - 
    (1970401*M^4*omega^8*OMEGA^7*Cos[OMEGA*t]^3)/532640410695106560000 + 
    (3602903368781*M^2*omega^4*OMEGA^9*Cos[OMEGA*t]^3)/
     12042120758119990969761792000 - (24726060677*M^3*omega^6*OMEGA^9*
      Cos[OMEGA*t]^3)/15106569781331047219200000 - 
    (9520678471*M^2*omega^4*OMEGA^11*Cos[OMEGA*t]^3)/
     20142093041774729625600000 - (9733781*M*omega^2*OMEGA^13*Cos[OMEGA*t]^3)/
     115097674524427026432000 - (281854777*M^2*omega^4*OMEGA^5*
      Cos[OMEGA*t]^5)/260651964461471666012160 + 
    (15939617*M^3*omega^6*OMEGA^5*Cos[OMEGA*t]^5)/1798401164444172288000 + 
    (18975953*M^2*omega^4*OMEGA^7*Cos[OMEGA*t]^5)/1798401164444172288000 + 
    (25793*M*omega^2*OMEGA^9*Cos[OMEGA*t]^5)/8384154612793344000
 
c[39/2, 1] = (-896292101*M^6*omega^12*OMEGA*Cos[OMEGA*t])/
     67620534270418118246400 + (897607488002096117*M^7*omega^14*OMEGA*
      Cos[OMEGA*t])/22770555615354164742822297600000 - 
    (895995444603192979*M^8*omega^16*OMEGA*Cos[OMEGA*t])/
     107346905043812490930447974400000 + 
    (1909021166092603*M^6*omega^12*OMEGA^3*Cos[OMEGA*t])/
     271078043039930532652646400000 - (139547858529584291*M^7*omega^14*
      OMEGA^3*Cos[OMEGA*t])/41746018628149302028507545600000 + 
    (45873727697951*M^5*omega^10*OMEGA^5*Cos[OMEGA*t])/
     108431217215972213061058560000 - (30679878286159*M^6*omega^12*OMEGA^5*
      Cos[OMEGA*t])/57554253623367603899596800000 + 
    (5407199*M^4*omega^8*OMEGA^7*Cos[OMEGA*t])/574774541298554005094400 - 
    (431567178733*M^5*omega^10*OMEGA^7*Cos[OMEGA*t])/
     9241296921815813613158400000 - (349556303*M^4*omega^8*OMEGA^9*
      Cos[OMEGA*t])/136908102545419460935680000 - 
    (17678021*M^3*omega^6*OMEGA^11*Cos[OMEGA*t])/
     193627173599950380466176000 - (29*M^2*omega^4*OMEGA^13*Cos[OMEGA*t])/
     14527849159660142592000 - (220890710221549*M^4*omega^8*OMEGA^3*
      Cos[OMEGA*t]^3)/2555878691519345022153523200 + 
    (763967950861252061*M^5*omega^10*OMEGA^3*Cos[OMEGA*t]^3)/
     2348213547833398239103549440000 + (3220163666319157*M^4*omega^8*OMEGA^5*
      Cos[OMEGA*t]^3)/12011322495311499944263680000 + 
    (62520686635030817*M^3*omega^6*OMEGA^7*Cos[OMEGA*t]^3)/
     782737849277799413034516480000 + (3602903368781*M^2*omega^4*OMEGA^9*
      Cos[OMEGA*t]^3)/430075741361428248920064000 - 
    (281854777*M^2*omega^4*OMEGA^5*Cos[OMEGA*t]^5)/9308998730766845214720
 
c[39/2, 2] = (-9018946393*M^6*omega^12*OMEGA*Cos[OMEGA*t])/
     77879205067853345587200 + (182477720628946097*M^7*omega^14*OMEGA*
      Cos[OMEGA*t])/632515433759837909522841600000 - 
    (3320168503*M^8*omega^16*OMEGA*Cos[OMEGA*t])/91918281738257694720000 + 
    (920872710980219*M^6*omega^12*OMEGA^3*Cos[OMEGA*t])/
     16942377689995658290790400000 - (8862498119*M^7*omega^14*OMEGA^3*
      Cos[OMEGA*t])/551509690429546168320000 + 
    (10384762306333*M^5*omega^10*OMEGA^5*Cos[OMEGA*t])/
     3011978255999228140584960000 - (207494701*M^6*omega^12*OMEGA^5*
      Cos[OMEGA*t])/73534625390606155776000 + 
    (55103*M^4*omega^8*OMEGA^7*Cos[OMEGA*t])/677343735537016504320 - 
    (4522879*M^5*omega^10*OMEGA^7*Cos[OMEGA*t])/16712414861501399040000 - 
    (463*M^4*omega^8*OMEGA^9*Cos[OMEGA*t])/28649854048288112640 - 
    (269*M^3*omega^6*OMEGA^11*Cos[OMEGA*t])/424442282196860928000 - 
    (M^2*omega^4*OMEGA^13*Cos[OMEGA*t])/64201353609609216000 - 
    (30949362361171*M^4*omega^8*OMEGA^3*Cos[OMEGA*t]^3)/
     45179673839988422108774400 + (56777174903*M^5*omega^10*OMEGA^3*
      Cos[OMEGA*t]^3)/51704033477769953280000 + 
    (8267554927*M^4*omega^8*OMEGA^5*Cos[OMEGA*t]^3)/8583278284847185920000 + 
    (924701698127*M^3*omega^6*OMEGA^7*Cos[OMEGA*t]^3)/
     2895425874755117383680000 + (163895269*M^2*omega^4*OMEGA^9*
      Cos[OMEGA*t]^3)/3939354931639615488000 - 
    (9887*M^2*omega^4*OMEGA^5*Cos[OMEGA*t]^5)/68869841462231040
 
c[39/2, 3] = (-121168383991*M^6*omega^12*OMEGA*Cos[OMEGA*t])/
     253107416470523373158400 + (11514917070153073*M^7*omega^14*OMEGA*
      Cos[OMEGA*t])/13553902151996526632632320000 + 
    (16786054709243*M^6*omega^12*OMEGA^3*Cos[OMEGA*t])/
     96813586799975190233088000 + (769889965279*M^5*omega^10*OMEGA^5*
      Cos[OMEGA*t])/64542391199983460155392000 + 
    (5357*M^4*omega^8*OMEGA^7*Cos[OMEGA*t])/17437338729499852800 - 
    (1063056685463*M^4*omega^8*OMEGA^3*Cos[OMEGA*t]^3)/
     491083411304221979443200
 
c[39/2, 4] = (-3166734203*M^6*omega^12*OMEGA*Cos[OMEGA*t])/
     2966102536763945779200 + (359827327*M^7*omega^14*OMEGA*Cos[OMEGA*t])/
     383703402432430080000 + (1484621*M^6*omega^12*OMEGA^3*Cos[OMEGA*t])/
     6976425498771456000 + (10819*M^5*omega^10*OMEGA^5*Cos[OMEGA*t])/
     664421476073472000 + (M^4*omega^8*OMEGA^7*Cos[OMEGA*t])/
     2128581387878400 - (37851271*M^4*omega^8*OMEGA^3*Cos[OMEGA*t]^3)/
     14986676370368102400
 
c[39/2, 5] = (-1804861*M^6*omega^12*OMEGA*Cos[OMEGA*t])/1412429779411402752
 
c[39/2, 6] = -(M^6*omega^12*OMEGA*Cos[OMEGA*t])/1503216009216
 
c[39/2, 7] = 0
 
c[39/2, 8] = 0
 
c[39/2, 9] = 0
 
c[39/2, 10] = 0
 
c[39/2, 11] = 0
 
c[39/2, 12] = 0
 
c[39/2, 13] = 0
 
c[39/2, 14] = 0
 
c[39/2, 15] = 0
 
c[39/2, 16] = 0
 
c[39/2, 17] = 0
 
c[39/2, 18] = 0
 
c[39/2, 19] = 0
 
c[_, _] = 0
