-
-
Save pukpr/fcc9ba38c5f92bde0b53dc95c44ff7dc to your computer and use it in GitHub Desktop.
function DTW_Distance(X, Y: in Data_Pairs; Window_Size: Positive) return Long_Float is | |
N : Positive := X'Length; | |
type Real_Array is array(X'First - Window_Size .. X'Last + Window_Size) of Long_Float; | |
DTW_Current, DTW_Previous : Real_Array := (others => Long_Float'Last); | |
begin | |
DTW_Previous(X'First) := 0.0; | |
for I in X'First .. X'Last loop | |
DTW_Current(X'First) := Long_Float'Last; -- Reset current row | |
for J in Integer'Max(X'First, I - Window_Size) .. Integer'Min(X'Last, I + Window_Size) loop | |
declare | |
Cost : Long_Float := Abs(X(I).Value - Y(J).Value); | |
Min_Cost : Long_Float; | |
J_Previous : Integer := Integer'Max(J - 1, Y'First); | |
begin | |
-- Compute minimum cost considering the DTW constraint | |
Min_Cost := Long_Float'Min( Long_Float'Min( | |
DTW_Previous(J_Previous), | |
DTW_Current(J_Previous)), | |
(if J > Y'First then DTW_Previous(J) else Long_Float'Last) | |
); | |
DTW_Current(J) := Cost + Min_Cost; | |
end; | |
end loop; | |
-- Swap the rows | |
DTW_Previous := DTW_Current; | |
end loop; | |
return 1.0/DTW_Current(N); | |
end DTW_Distance; |
-0.00492024185 :offset:
0.00010797187 :bg:
0.38293433305 :impA:
0.00000000000 :impB:
-0.25020864107 :impC:
-6.05238020011:delA:
0.40108977232:delB:
5.59707274492:asym:
25.70105618509:ann1:
-25.91153550621:ann2:
6.97328477955:sem1:
4.41118135196:sem2:
0.00000681545:year:
-0.26206449689:IR:
-0.00621766881 :mA:
-0.06169818791 :mP:
-0.00174674255 :shiftT:
3.97447280797 :init:
---- Tidal ----
9.10846048884, 0.00000000000, -0.12657354295, 1, -100, 2.78451965764581E-03
27.32166155400, -1.05052412316, -1.16534073921, 2, -502498, 2.09102135286770E-04
27.09267692660, 0.00000000000, 388.88328197908, 3, -100, 2.56273786573239E-03
7.08840416402, 0.00000000000, -0.00015722181, 4, -100, 5.92946297898359E-03
6.85248390316, 0.00000000000, -1.14248858385, 5, -100, 4.02042052291495E-03
13.60611040750, -0.16271950132, -7.46548479781, 6, -1666, 1.03938909099611E-02
13.66083077700, 0.03392821481, 0.00000000000, 7, -88, 2.82850640854756E-01
3396.73824406533, -0.23419142648, 1.05386903616, 8, -24453, 9.61658143731111E-04
9.12068919638, 0.00000000000, -0.36445295411, 9, -100, 3.49815334901444E-02
13.77727494300, 0.26012170393, 7.30088810511, 10, 1793, 1.37394448097478E-02
6793.47648813065, 0.56143575678, 0.13364403608, 11, 69822, 8.02945952880463E-04
27.55454988600, -0.07673159645, -7.09089096371, 12, -190, 8.56391439554938E-02
27.66676714572, 0.07715647056, -1.97462527621, 13, 965, 7.24259812886263E-03
27.44323926226, 0.10329942103, -0.75741743556, 14, 2187, 4.51610473917296E-03
1616.30271425126, -0.81308001912, -0.37437466338, 15, -466937, 1.74168030048775E-04
6.85940288609, 0.00000000000, -0.00681324164, 16, -100, 1.48739559767528E-02
7.09580802495, 0.00000000000, 7.82534889876, 17, -100, 1.71071118060148E-02
9.55688270241, 0.00000000000, -5.86980670281, 18, -100, 1.53933272410734E-02
9.13295078376, 0.00000000000, 2.49332475490, 19, -100, 8.56347999538049E-02
2190.35004466729, -0.39672414619, 0.72980855944, 20, -66817, 5.94635740479373E-04
27.21222081500, -3.88267377106, 1.88258610030, 21, -247272, 1.57084176491640E-03
9.18484996200, 0.00000000000, -1.23137152741, 22, -100, 2.30043071843251E-03
14.76531556950, 0.28597901283, -2.25945386250, 23, 1038, 2.51318123522465E-02
27.10365333842, 0.50914189025, 1.44793978441, 24, 18255, 2.77388129632719E-03
9.54345721969, 0.00000000000, -0.03401818429, 25, -100, 6.39847100716882E-03
13.63341568476, -0.04056889761, 0.74526578405, 26, -131, 1.29658410665521E-01
26.98505934729, 0.00000000000, 12.70066391193, 27, -100, 3.25822970632731E-03
13.69115772864, 0.05991760987, 7.40843258950, 28, 1989, 2.86806922493642E-03
13.66362090133, 0.02689993930, -0.00000000000, 29, -32, 3.94293239097219E-02
121.74996507182, 0.00058772341, 0.00000000000, 30, -84, 3.76966810656669E-03
13.71880577217, 0.06827499335, 1.63764783143, 31, 6741, 9.97959603714491E-04
3232.60542850251, 0.15061856705, 1.59446983322, 32, 15230, 9.82531753367313E-04
---- LTE ----
0.00000000000 :trend:
0.00000000000 :accel:
5.75923120128 :K0:
-51.53603492246 :level:
-0.01985192015, 26.40458851750, 1.53849653828 1
-0.09925960074, 147.76600448694, 0.63077984977 5
-0.19851920149, 65.26159274898, 1.22978054634 10
-1.05215176788, 82.27879929358, 1.57985202978 53
-0.67496528505, 72.85182223860, -1.96203495867 34
CC 0.7854807792 0.8694321069 6 1
-0.03014148209:dLOD:
PS C:\Users\pp\github\pukpr\GeoEnergyMath\qbo> ..\io\backup qbo30dtw9nonlin1bCCslope1965-1980c-modulate2_tropphase1-wow3b-harmmHighccDRACPPwow.5gwow4
QBO 50
-0.00491381574 :offset:
0.00010336716 :bg:
0.97414303924 :impA:
0.00000000000 :impB:
-0.35326854189 :impC:
-6.05750520676:delA:
0.36512732273:delB:
5.60511166336:asym:
20.05568536080:ann1:
-7.64379082933:ann2:
-25.14045761882:sem1:
3.64730203070:sem2:
0.00000610268:year:
-0.47968685061:IR:
-0.00421995470 :mA:
-0.06078556595 :mP:
-0.00172253840 :shiftT:
4.56029049797 :init:
---- Tidal ----
9.10846048884, 0.00000000000, -0.12177411590, 1, -100, 2.78451965764581E-03
27.32166155400, -1.06189872906, -1.15089871381, 2, -507937, 2.09102135286770E-04
27.09267692660, 0.00000000000, 395.71680682000, 3, -100, 2.56273786573239E-03
7.08840416456, 0.00000000000, -0.00014273759, 4, -100, 5.92946297898359E-03
6.85248390316, 0.00000000000, -1.14247924321, 5, -100, 4.02042052291495E-03
13.60611040750, -0.16164871068, -7.52163149376, 6, -1655, 1.03938909099611E-02
13.66083077700, 0.04382558455, 0.00000000000, 7, -85, 2.82850640854756E-01
3396.73824406533, -0.23749313890, 1.25323190851, 8, -24796, 9.61658143731111E-04
9.12068919638, 0.00000000000, -0.37497679769, 9, -100, 3.49815334901444E-02
13.77727494300, 0.27476949921, 7.06195965325, 10, 1900, 1.37394448097478E-02
6793.47648813065, 0.55961868566, 0.16119110202, 11, 69596, 8.02945952880463E-04
27.55454988600, -0.08746944584, -7.09622444863, 12, -202, 8.56391439554938E-02
27.66676714572, 0.07452179899, -1.81808090132, 13, 929, 7.24259812886263E-03
27.44323926226, 0.11450024629, -0.85206773316, 14, 2435, 4.51610473917296E-03
1616.30271425126, -0.78264456052, -0.55063890553, 15, -449462, 1.74168030048775E-04
6.85940288609, 0.00000000000, -0.00699997075, 16, -100, 1.48739559767528E-02
7.09580802549, 0.00000000000, 7.82534889876, 17, -100, 1.71071118060148E-02
9.55688270339, 0.00000000000, -14.36091980531, 18, -100, 1.53933272410734E-02
9.13295078376, 0.00000000000, 2.12166585493, 19, -100, 8.56347999538049E-02
2190.35004466729, -0.36462736019, 0.67829229367, 20, -61419, 5.94635740479373E-04
27.21222081500, -3.94641013217, 1.88710545410, 21, -251329, 1.57084176491640E-03
9.18484996200, 0.00000000000, -1.22685055578, 22, -100, 2.30043071843251E-03
14.76531557183, 0.29691531024, -2.24752198459, 23, 1081, 2.51318123522465E-02
27.10365333842, 0.49637863853, 1.48655127907, 24, 17795, 2.77388129632719E-03
9.54345722066, 0.00000000000, -0.03403874535, 25, -100, 6.39847100716882E-03
13.63341568476, -0.05029462756, 0.83025051983, 26, -139, 1.29658410665521E-01
26.98505934729, 0.00000000000, 12.70047190125, 27, -100, 3.25822970632731E-03
13.69115772864, 0.06887137921, 7.46332424172, 28, 2301, 2.86806922493642E-03
13.66362090133, 0.02699126530, -0.00000000000, 29, -32, 3.94293239097219E-02
121.74996483423, 0.00000000000, 0.00000000000, 30, -100, 3.76966810656669E-03
13.71880577217, 0.05888350516, 2.13713344191, 31, 5800, 9.97959603714491E-04
3232.60542850251, 0.14614253501, 1.54129623216, 32, 14774, 9.82531753367313E-04
---- LTE ----
0.00000000000 :trend:
0.00000000000 :accel:
3.59289422821 :K0:
3.77861545791 :level:
-0.02152806341, 14.50226607547, 2.07735760852 1
-0.68889802916, 34.88885263185, 1.05117503625 32
-1.14098736080, 80.04440362509, -0.83414177878 53
-0.19375257070, 31.19635311135, 1.91060886148 9
-0.08611225365, 40.29190611880, -1.11557084615 4
DTW 0.6053955437 0.7182575374 8 1
-0.03113165690:dLOD:
PS C:\Users\pp\github\pukpr\GeoEnergyMath\qbo> ..\io\backup qbo50dtw9nonlin1bCCslope1965-1980c-modulate2_tropphase1-wow3b-harmmHighccDRACPPwow.5gwow4lockdtw
-0.00488488935 :offset:
0.00010412766 :bg:
0.98909665176 :impA:
0.00000000000 :impB:
-0.37080088981 :impC:
-6.06005259827:delA:
0.36512732273:delB:
5.60456169467:asym:
4.79353173508:ann1:
-8.16854926954:ann2:
-12.81622934756:sem1:
5.67387645926:sem2:
0.00000341254:year:
-0.42697647989:IR:
-0.00364884575 :mA:
-0.06080693139 :mP:
-0.00172110700 :shiftT:
4.47183655929 :init:
---- Tidal ----
9.10846048884, 0.00000000000, -0.12177411590, 1, -100, 2.78451965764581E-03
27.32166155400, -1.06132965184, -1.15243088745, 2, -507665, 2.09102135286770E-04
27.09267692660, 0.00000000000, 390.89092711025, 3, -100, 2.56273786573239E-03
7.08840416658, 0.00000000000, -0.00014273759, 4, -100, 5.92946297898359E-03
6.85248390316, 0.00000000000, -1.14247924321, 5, -100, 4.02042052291495E-03
13.60611040750, -0.16304226198, -7.51802112432, 6, -1669, 1.03938909099611E-02
13.66083077700, 0.04452582298, 0.00000000000, 7, -84, 2.82850640854756E-01
3396.73824406533, -0.23599639724, 1.22198790978, 8, -24641, 9.61658143731111E-04
9.12068919638, 0.00000000000, -0.37269972292, 9, -100, 3.49815334901444E-02
13.77727494300, 0.27742442493, 7.07378838777, 10, 1919, 1.37394448097478E-02
6793.47648813065, 0.55900051690, 0.16196621366, 11, 69519, 8.02945952880463E-04
27.55454988600, -0.08591982858, -7.07668251589, 12, -200, 8.56391439554938E-02
27.66676714572, 0.07365933898, -1.82591004949, 13, 917, 7.24259812886263E-03
27.44323926226, 0.11293369712, -0.81311565335, 14, 2401, 4.51610473917296E-03
1616.30271425126, -0.77779409204, -0.54806970381, 15, -446677, 1.74168030048775E-04
6.85940288609, 0.00000000000, -0.00700595852, 16, -100, 1.48739559767528E-02
7.09580802752, 0.00000000000, 7.82534889876, 17, -100, 1.71071118060148E-02
9.55688270707, 0.00000000000, -14.36091980531, 18, -100, 1.53933272410734E-02
9.13295078376, 0.00000000000, 2.12168941490, 19, -100, 8.56347999538049E-02
2190.35004466729, -0.37942356999, 0.68584121266, 20, -63908, 5.94635740479373E-04
27.21222081500, -3.93849247724, 1.88706725805, 21, -250825, 1.57084176491640E-03
9.18484996200, 0.00000000000, -1.23267123309, 22, -100, 2.30043071843251E-03
14.76531558062, 0.29906494026, -2.25136705228, 23, 1090, 2.51318123522465E-02
27.10365333842, 0.49567197608, 1.48105315672, 24, 17769, 2.77388129632719E-03
9.54345722434, 0.00000000000, -0.03403874535, 25, -100, 6.39847100716882E-03
13.63341568476, -0.04944856942, 0.84609218583, 26, -138, 1.29658410665521E-01
26.98505934729, 0.00000000000, 12.70047190125, 27, -100, 3.25822970632731E-03
13.69115772864, 0.06682639725, 7.44916889079, 28, 2230, 2.86806922493642E-03
13.66362090133, 0.02734234171, -0.00000000000, 29, -31, 3.94293239097219E-02
121.74996393751, -0.00000000170, 0.00000000000, 30, -100, 3.76966810656669E-03
13.71880577217, 0.05954487913, 2.06303603582, 31, 5867, 9.97959603714491E-04
3232.60542850251, 0.14377975693, 1.55903461877, 32, 14534, 9.82531753367313E-04
---- LTE ----
0.00000000000 :trend:
0.00000000000 :accel:
3.45158522112 :K0:
9.92485530809 :level:
-0.02152098264, 10.53592415132, 1.68988254420 1
-0.68867144445, 35.82837776975, 0.98861326551 32
-1.14061207986, 88.29871919519, -0.98164114108 53
-0.19368884375, 30.99332608037, 1.75975274654 9
-0.08608393056, 35.53159639670, -1.17929375038 4
CC 0.6612785732 0.7772926621 8 1
-0.03126801995:dLOD:
PS C:\Users\pp\github\pukpr\GeoEnergyMath\qbo> ..\io\restore qbo50dtw9nonlin1bCCslope1965-1980c-modulate2_tropphase1-wow3b-harmmHighccDRACPPwow.5gwow4lock
-0.00499461756 :offset:
0.00001705557 :bg:
1.22747006841 :impA:
1.00374776612 :impB:
-0.54515494476 :impC:
-6.09238765994:delA:
0.15876662225:delB:
5.62490157991:asym:
-18.05793053305:ann1:
-11.18103312229:ann2:
-26.01384295557:sem1:
4.87072285572:sem2:
-0.00000151697:year:
-0.47143855108:IR:
-0.00768799665 :mA:
0.05657454798 :mP:
-0.00137510103 :shiftT:
3.77310642151 :init:
---- Tidal ----
9.10846048884, 0.00000000000, -0.12177411590, 1, -100, 2.78451965764581E-03
27.32166155400, -1.06128019805, -1.15257483553, 2, -507642, 2.09102135286770E-04
27.09267692660, 0.00000000000, 389.76461692719, 3, -100, 2.56273786573239E-03
7.08840417030, 0.00000000000, -0.00014273759, 4, -100, 5.92946297898359E-03
6.85248390316, 0.00000000000, -1.14250753914, 5, -100, 4.02042052291495E-03
13.60611040750, -0.16305241767, -7.51837210386, 6, -1669, 1.03938909099611E-02
13.66083077700, 0.04451980158, 0.00000000000, 7, -84, 2.82850640854756E-01
3396.73824406533, -0.23616452012, 1.22079406348, 8, -24658, 9.61658143731111E-04
9.12068919638, 0.00000000000, -0.37269972292, 9, -100, 3.49815334901444E-02
13.77727494300, 0.27732210860, 7.07381127674, 10, 1918, 1.37394448097478E-02
6793.47648813065, 0.55876034672, 0.16196417916, 11, 69489, 8.02945952880463E-04
27.55454988600, -0.08590626370, -7.07505214925, 12, -200, 8.56391439554938E-02
27.66676714572, 0.07364877027, -1.82661075348, 13, 917, 7.24259812886263E-03
27.44323926226, 0.11287288052, -0.81205931225, 14, 2399, 4.51610473917296E-03
1616.30271425126, -0.77782682293, -0.54823014981, 15, -446696, 1.74168030048775E-04
6.85940288609, 0.00000000000, -0.00700577911, 16, -100, 1.48739559767528E-02
7.09580803124, 0.00000000000, 7.82534889876, 17, -100, 1.71071118060148E-02
9.55688271382, 0.00000000000, 11.25729952344, 18, -100, 1.53933272410734E-02
9.13295078376, 0.00000000000, 2.54552032938, 19, -100, 8.56347999538049E-02
2190.35004466729, -0.37934038282, 0.68509777218, 20, -63894, 5.94635740479373E-04
27.21222081500, -3.93882203925, 1.88706107227, 21, -250846, 1.57084176491640E-03
9.18484996200, 0.00000000000, -1.23267123309, 22, -100, 2.30043071843251E-03
14.76531559673, 0.29891106145, -2.25109979491, 23, 1089, 2.51318123522465E-02
27.10365333842, 0.49588404728, 1.48103150425, 24, 17777, 2.77388129632719E-03
9.54345723107, 0.00000000000, -0.03403874535, 25, -100, 6.39847100716882E-03
13.63341568476, -0.04954854714, 0.84654059207, 26, -138, 1.29658410665521E-01
26.98505934729, 0.00000000000, 12.70047190125, 27, -100, 3.25822970632731E-03
13.69115772864, 0.06684527627, 7.44820470022, 28, 2231, 2.86806922493642E-03
13.66362090133, 0.02732140875, -0.00000000000, 29, -31, 3.94293239097219E-02
121.74996229434, -0.00000000006, 0.00000000000, 30, -100, 3.76966810656669E-03
13.71880577217, 0.05947441632, 2.06053702374, 31, 5860, 9.97959603714491E-04
3232.60542850251, 0.14381488241, 1.55868361112, 32, 14537, 9.82531753367313E-04
---- LTE ----
0.00000000000 :trend:
0.00000000000 :accel:
1.46228937317 :K0:
27.34634900225 :level:
0.02138852433, 19.57648435534, 0.05621053938 1
0.68443277855, 25.36742388266, -0.90506812333 32
1.43303113008, 15.50568099250, -0.79701302931 67
76.61369414871, 18.93931542484, 1.71804937384 3582
57.68485011699, 15.24945059393, 1.01897278613 2697
58.19817470091, 18.97954776330, 1.28969931563 2721
DTW 0.8143209996 0.6993767671 1 1
-0.03124877442:dLOD:
PS C:\Users\pp\github\pukpr\GeoEnergyMath\qbo> ..\io\backup qbo70dtw9nonlin1bCCslope1965-1980c-modulate2_tropphase1-wow3b-harmmHighccDRACPPwow.5gwow4lock1dtw
QBO 30
Tried to align more with the 18.6 modulation, removing the strong 4.4y and replacing it with interference of Draconic+ and Anomalistic, leading to the beat of 4.53 = 1/(1/8.85+12/18.6)
0.00191058407 :offset:
-0.00005634248 :bg:
5.06137960862 :impA:
-1.23265062772 :impB:
-0.23741935956 :impC:
-7.64535383712:delA:
0.40050301578:delB:
4.75357076113:asym:
35.64331450367:ann1:
-0.72755501152:ann2:
8.80217676737:sem1:
-1.73442119281:sem2:
0.00000454052:year:
-0.28159791283:IR:
-0.00030182759 :mA:
-0.05912221089 :mP:
-0.00202946592 :shiftT:
6.72040384889 :init:
---- Tidal ----
9.10846048884, 0.00000000000, -0.00812992487, 1, -100, 2.78389545156867E-03
27.32166155400, -1.22088284184, 1.27865879184, 2, -580560, 2.10330076241761E-04
27.09267692660, 0.00000000000, 454.59474108018, 3, -100, 2.55834714402693E-03
7.08840416574, 0.00000000000, -0.00019825799, 4, -100, 5.92982459268319E-03
6.85248390316, 0.00000000000, -0.86639053803, 5, -100, 4.02026635670852E-03
13.60611040750, -0.37048132162, -1.37402123888, 6, -3664, 1.03948495827232E-02
13.66083077700, 0.04575397270, 0.00000000000, 7, -84, 2.82848035633829E-01
3396.73824406533, -0.42382328369, 5.89709658289, 8, -48114, 8.82716385230237E-04
9.12068919638, 0.00000000000, 0.12071268500, 9, -100, 3.49821517280576E-02
13.77727494300, 0.35475665288, -5.85713651516, 10, 2482, 1.37399354501661E-02
6793.47648813065, 0.57351348836, -0.09657611037, 11, 70733, 8.09672470116974E-04
27.55454988600, -0.61433141299, -20.08653125657, 12, -817, 8.56399014837518E-02
27.66676714572, 0.25646421046, -1.72998780806, 13, 3440, 7.24466137063528E-03
27.44323926226, 0.02752646161, 0.71393166993, 14, 510, 4.51534497995516E-03
1616.30271425126, -0.29380825214, 3.64477936767, 15, -20504, 1.43996737104650E-03
6.85940288609, 0.00000000000, -0.00604745373, 16, -100, 1.48743844613416E-02
7.09580802667, 0.00000000000, 3.45305338330, 17, -100, 1.71069181044158E-02
9.55688270553, 0.00000000000, -7.23956539839, 18, -100, 1.53930725197578E-02
9.13295078376, 0.00000000000, -0.35205379817, 19, -100, 8.56344204085288E-02
2190.35004466729, -0.23078845442, -2.85767109080, 20, -33013, 7.01214760698434E-04
27.21222081500, -4.33922309733, 2.19899135520, 21, -276223, 1.57148430824415E-03
9.18484996200, 0.00000000000, -0.23867948870, 22, -100, 2.29977081732398E-03
14.76531557694, 0.55207325997, -5.68365616039, 23, 2097, 2.51325572677795E-02
27.10365333842, 1.36521656804, -1.65429330187, 24, 49076, 2.77619425635132E-03
9.54345722280, 0.00000000000, 0.95503233255, 25, -100, 6.39816026346445E-03
13.63341568476, -0.18546683584, -5.24724492355, 26, -243, 1.29658153799553E-01
26.98505934729, 0.00000000000, 8.48630325169, 27, -100, 3.26005930241243E-03
13.69115772864, 0.15676924413, 6.35343172340, 28, 5365, 2.86860486147658E-03
13.66362090133, 0.16289096080, -0.00000000000, 29, 313, 3.94320500288279E-02
1656.31999626209, 0.36743682898, 1.41812060331, 30, 23970, 1.52652022906254E-03
13.71880577217, 0.50088853111, -2.33218281456, 31, 50059, 9.98605329211078E-04
3232.60542850251, 0.48901741859, 1.62842769180, 32, 56024, 8.71322830450230E-04
---- LTE ----
0.00000000000 :trend:
0.00000000000 :accel:
4.96417997234 :K0:
-73.71751403305 :level:
-0.04815839380, 135.41546583742, 1.98482945671 1
-0.09631678759, 79.39811594133, 1.47202722540 2
-1.15580145109, 53.83149196894, 1.18565425257 24
-0.19263357518, 79.11333489927, -2.48740293672 4
-0.24079196898, 49.13399847234, -2.37388636123 5
-0.62605911934, 72.67241417576, 2.44902183071 13
CC 0.7694682017 0.8869879290 6 1
-0.04231616902:dLOD:
PS C:\Users\pp\github\pukpr\GeoEnergyMath\qbo> notepad enso_opt.exe.resp
PS C:\Users\pp\github\pukpr\GeoEnergyMath\qbo> ..\io\backup qbo30dtw9nonlin1bCCslope1965-1980c-modulate2_tropphase1-wow3b-harmmHighccDRACPPwow.5gwow3-4pt53align18pt6i
Note that the 18.6 year modulation overlays better.
list
4.000000
-0.142618 w_A
2.30E+00
1.14E+00 w_D
9.04E-01
3.05E-01 w_T
9.22E-03
4.10E-02 w_A2
1.29E+00
3.17E-01 w_DD
-6.86E-02
3.66E-01 w_N
-5.42E-02
2.08E-01 w_N2
-9.36E-02
7.38E-01 w_P
-5.14E-02
2.61E-01 w_P2
-1.18E-01
6.25E-01 w_6
5.71E-02
1.99E-01 w_453
-4.95E-02
3.19E-01 w_d2
1.14E+00
6.67E-01 w_t2
-5.22E-01
-5.98E-02 w_a6 18.6 mod of w_a
-8.29E-01
=+$F$2*(1+$F$3SIN(w_at+$F$4)+$F$29SIN(w_a6t+$F$30)+$F$9SIN(w_a2t+$F$10))(1+$F$5COS(w_dt+$F$6)+$F$7COS(w_tt+$F$8)+$F$11COS(w_ddt+$F$12))-$F$2 +$F$13COS(w_Nt+$F$14)+$F$15COS(w_N2t+$F$16)+$F$17COS(w_pt+$F$18)+$F$19COS(w_p2t+$F$20)+$F$21COS(w_6t+$F$22)+$F$23COS(w_453t+$F$24)+$F$25COS(w_d2t+$F$26) +$F$27COS(w_t2*t+$F$28)
QBO
This uses an extra Draconic 27.103 to model a modulated 18.6
Last is the phase on LTE tide list, last 2 terms mild here
CC 0.4949393293 0.7824306067 4 1
-0.01954578311:dLOD:
PS C:\Users\pp\github\pukpr\GeoEnergyMath\qbo> ..\io\backup qbo30dtw9nonlin1bCCslope1965-1980c-modulate2_tropphase1-wow3b-harmmHighccDRACPPwow3c