Play[2 Piecewise[{{0, 0.0000000 < t < 5.9687500}, {If[ Abs[SawtoothWave[329.62799 t]] > Abs[Sin[10 (t - 5.9687500)]], f = Sin[41.203499 (t - 5.9687500)], f = SquareWave[164.81400 t]], 5.9687500 < t < 6.3750000}, {If[ Abs[SawtoothWave[261.69800 t]] > Abs[Sin[10 (t - 6.3750000)]], f = Sin[32.712250 (t - 6.3750000)], f = SquareWave[130.84900 t]], 6.3750000 < t < 6.7812500}, {If[ Abs[SawtoothWave[220.00000 t]] > Abs[Sin[10 (t - 6.7812500)]], f = Sin[27.500000 (t - 6.7812500)], f = SquareWave[110.00000 t]], 6.7812500 < t < 7.1875000}, {If[ Abs[SawtoothWave[329.62799 t]] > Abs[Sin[10 (t - 7.1875000)]], f = Sin[41.203499 (t - 7.1875000)], f = SquareWave[164.81400 t]], 7.1875000 < t < 7.8437500}, {If[ Abs[SawtoothWave[174.61400 t]] > Abs[Sin[10 (t - 7.8437500)]], f = Sin[21.826750 (t - 7.8437500)], f = SquareWave[87.306999 t]], 7.8437500 < t < 7.9687500}, {If[ Abs[SawtoothWave[329.62799 t]] > Abs[Sin[10 (t - 7.9687500)]], f = Sin[41.203499 (t - 7.9687500)], f = SquareWave[164.81400 t]], 7.9687500 < t < 8.3750000}, {If[ Abs[SawtoothWave[261.69800 t]] > Abs[Sin[10 (t - 8.3750000)]], f = Sin[32.712250 (t - 8.3750000)], f = SquareWave[130.84900 t]], 8.3750000 < t < 8.7812500}, {If[ Abs[SawtoothWave[220.00000 t]] > Abs[Sin[10 (t - 8.7812500)]], f = Sin[27.500000 (t - 8.7812500)], f = SquareWave[110.00000 t]], 8.7812500 < t < 9.1875000}, {If[ Abs[SawtoothWave[329.62799 t]] > Abs[Sin[10 (t - 9.1875000)]], f = Sin[41.203499 (t - 9.1875000)], f = SquareWave[164.81400 t]], 9.1875000 < t < 9.8437500}, {If[ Abs[SawtoothWave[174.61400 t]] > Abs[Sin[10 (t - 9.8437500)]], f = Sin[21.826750 (t - 9.8437500)], f = SquareWave[87.306999 t]], 9.8437500 < t < 9.9687500}, {If[ Abs[SawtoothWave[329.62799 t]] > Abs[Sin[10 (t - 9.9687500)]], f = Sin[41.203499 (t - 9.9687500)], f = SquareWave[164.81400 t]], 9.9687500 < t < 10.375000}, {If[ Abs[SawtoothWave[261.69800 t]] > Abs[Sin[10 (t - 10.375000)]], f = Sin[32.712250 (t - 10.375000)], f = SquareWave[130.84900 t]], 10.375000 < t < 10.781250}, {If[ Abs[SawtoothWave[220.00000 t]] > Abs[Sin[10 (t - 10.781250)]], f = Sin[27.500000 (t - 10.781250)], f = SquareWave[110.00000 t]], 10.781250 < t < 11.187500}, {If[ Abs[SawtoothWave[329.62799 t]] > Abs[Sin[10 (t - 11.187500)]], f = Sin[41.203499 (t - 11.187500)], f = SquareWave[164.81400 t]], 11.187500 < t < 11.843750}, {If[ Abs[SawtoothWave[174.61400 t]] > Abs[Sin[10 (t - 11.843750)]], f = Sin[21.826750 (t - 11.843750)], f = SquareWave[87.306999 t]], 11.843750 < t < 11.968750}, {If[ Abs[SawtoothWave[329.62799 t]] > Abs[Sin[10 (t - 11.968750)]], f = Sin[41.203499 (t - 11.968750)], f = SquareWave[164.81400 t]], 11.968750 < t < 12.093750}, {0, 12.093750 < t < 12.218750}, {If[ Abs[SawtoothWave[329.62799 t]] > Abs[Sin[10 (t - 12.218750)]], f = Sin[41.203499 (t - 12.218750)], f = SquareWave[164.81400 t]], 12.218750 < t < 12.343750}, {0, 12.343750 < t < 12.468750}, {If[ Abs[SawtoothWave[329.62799 t]] > Abs[Sin[10 (t - 12.468750)]], f = Sin[41.203499 (t - 12.468750)], f = SquareWave[164.81400 t]], 12.468750 < t < 12.593750}, {0, 12.593750 < t < 12.718750}, {If[ Abs[SawtoothWave[329.62799 t]] > Abs[Sin[10 (t - 12.718750)]], f = Sin[41.203499 (t - 12.718750)], f = SquareWave[164.81400 t]], 12.718750 < t < 12.843750}, {0, 12.843750 < t < 12.968750}, {If[ Abs[SawtoothWave[329.62799 t]] > Abs[Sin[10 (t - 12.968750)]], f = Sin[41.203499 (t - 12.968750)], f = SquareWave[164.81400 t]], 12.968750 < t < 13.093750}, {0, 13.093750 < t < 13.218750}, {If[ Abs[SawtoothWave[329.62799 t]] > Abs[Sin[10 (t - 13.218750)]], f = Sin[41.203499 (t - 13.218750)], f = SquareWave[164.81400 t]], 13.218750 < t < 13.343750}, {0, 13.343750 < t < 13.468750}, {If[ Abs[SawtoothWave[329.62799 t]] > Abs[Sin[10 (t - 13.468750)]], f = Sin[41.203499 (t - 13.468750)], f = SquareWave[164.81400 t]], 13.468750 < t < 13.593750}, {0, 13.593750 < t < 13.718750}, {If[ Abs[SawtoothWave[329.62799 t]] > Abs[Sin[10 (t - 13.718750)]], f = Sin[41.203499 (t - 13.718750)], f = SquareWave[164.81400 t]], 13.718750 < t < 13.843750}, {0, 13.843750 < t < 13.968750}, {If[ Abs[SawtoothWave[220.00000 t]] > Abs[Sin[10 (t - 13.968750)]], f = Sin[27.500000 (t - 13.968750)], f = SquareWave[110.00000 t]], 13.968750 < t < 14.375000}, {If[ Abs[SawtoothWave[261.69800 t]] > Abs[Sin[10 (t - 14.375000)]], f = Sin[32.712250 (t - 14.375000)], f = SquareWave[130.84900 t]], 14.375000 < t < 14.781250}, {If[ Abs[SawtoothWave[329.62799 t]] > Abs[Sin[10 (t - 14.781250)]], f = Sin[41.203499 (t - 14.781250)], f = SquareWave[164.81400 t]], 14.781250 < t < 15.718750}, {0, 15.718750 < t < 15.968750}, {If[ Abs[SawtoothWave[220.00000 t]] > Abs[Sin[10 (t - 15.968750)]], f = Sin[27.500000 (t - 15.968750)], f = SquareWave[110.00000 t]], 15.968750 < t < 16.375000}, {If[ Abs[SawtoothWave[261.69800 t]] > Abs[Sin[10 (t - 16.375000)]], f = Sin[32.712250 (t - 16.375000)], f = SquareWave[130.84900 t]], 16.375000 < t < 16.781250}, {If[ Abs[SawtoothWave[329.62799 t]] > Abs[Sin[10 (t - 16.781250)]], f = Sin[41.203499 (t - 16.781250)], f = SquareWave[164.81400 t]], 16.781250 < t < 17.718750}, {0, 17.718750 < t < 17.968750}, {If[ Abs[SawtoothWave[220.00000 t]] > Abs[Sin[10 (t - 17.968750)]], f = Sin[27.500000 (t - 17.968750)], f = SquareWave[110.00000 t]], 17.968750 < t < 18.375000}, {If[ Abs[SawtoothWave[261.69800 t]] > Abs[Sin[10 (t - 18.375000)]], f = Sin[32.712250 (t - 18.375000)], f = SquareWave[130.84900 t]], 18.375000 < t < 18.781250}, {If[ Abs[SawtoothWave[329.62799 t]] > Abs[Sin[10 (t - 18.781250)]], f = Sin[41.203499 (t - 18.781250)], f = SquareWave[164.81400 t]], 18.781250 < t < 19.968750}, {0, 19.968750 < t < 25.968750}, {If[ Abs[SawtoothWave[329.62799 t]] > Abs[Sin[10 (t - 25.968750)]], f = Sin[41.203499 (t - 25.968750)], f = SquareWave[164.81400 t]], 25.968750 < t < 26.968750}, {If[ Abs[SawtoothWave[220.00000 t]] > Abs[Sin[10 (t - 26.968750)]], f = Sin[27.500000 (t - 26.968750)], f = SquareWave[110.00000 t]], 26.968750 < t < 27.968750}, {If[ Abs[SawtoothWave[329.62799 t]] > Abs[Sin[10 (t - 27.968750)]], f = Sin[41.203499 (t - 27.968750)], f = SquareWave[164.81400 t]], 27.968750 < t < 28.968750}, {If[ Abs[SawtoothWave[220.00000 t]] > Abs[Sin[10 (t - 28.968750)]], f = Sin[27.500000 (t - 28.968750)], f = SquareWave[110.00000 t]], 28.968750 < t < 29.968750}, {If[ Abs[SawtoothWave[329.62799 t]] > Abs[Sin[10 (t - 29.968750)]], f = Sin[41.203499 (t - 29.968750)], f = SquareWave[164.81400 t]], 29.968750 < t < 30.968750}, {If[ Abs[SawtoothWave[220.00000 t]] > Abs[Sin[10 (t - 30.968750)]], f = Sin[27.500000 (t - 30.968750)], f = SquareWave[110.00000 t]], 30.968750 < t < 31.968750}, {If[ Abs[SawtoothWave[329.62799 t]] > Abs[Sin[10 (t - 31.968750)]], f = Sin[41.203499 (t - 31.968750)], f = SquareWave[164.81400 t]], 31.968750 < t < 32.968750}, {If[ Abs[SawtoothWave[220.00000 t]] > Abs[Sin[10 (t - 32.968750)]], f = Sin[27.500000 (t - 32.968750)], f = SquareWave[110.00000 t]], 32.968750 < t < 33.968750}, {If[ Abs[SawtoothWave[329.62799 t]] > Abs[Sin[10 (t - 33.968750)]], f = Sin[41.203499 (t - 33.968750)], f = SquareWave[164.81400 t]], 33.968750 < t < 34.187500}, {If[ Abs[SawtoothWave[493.88300 t]] > Abs[Sin[10 (t - 34.187500)]], f = Sin[61.735374 (t - 34.187500)], f = SquareWave[246.94150 t]], 34.187500 < t < 34.218750}, {If[ Abs[SawtoothWave[329.62799 t]] > Abs[Sin[10 (t - 34.218750)]], f = Sin[41.203499 (t - 34.218750)], f = SquareWave[164.81400 t]], 34.218750 < t < 34.437500}, {If[ Abs[SawtoothWave[493.88300 t]] > Abs[Sin[10 (t - 34.437500)]], f = Sin[61.735374 (t - 34.437500)], f = SquareWave[246.94150 t]], 34.437500 < t < 34.468750}, {If[ Abs[SawtoothWave[329.62799 t]] > Abs[Sin[10 (t - 34.468750)]], f = Sin[41.203499 (t - 34.468750)], f = SquareWave[164.81400 t]], 34.468750 < t < 34.687500}, {If[ Abs[SawtoothWave[493.88300 t]] > Abs[Sin[10 (t - 34.687500)]], f = Sin[61.735374 (t - 34.687500)], f = SquareWave[246.94150 t]], 34.687500 < t < 34.718750}, {If[ Abs[SawtoothWave[329.62799 t]] > Abs[Sin[10 (t - 34.718750)]], f = Sin[41.203499 (t - 34.718750)], f = SquareWave[164.81400 t]], 34.718750 < t < 34.937500}, {If[ Abs[SawtoothWave[493.88300 t]] > Abs[Sin[10 (t - 34.937500)]], f = Sin[61.735374 (t - 34.937500)], f = SquareWave[246.94150 t]], 34.937500 < t < 34.968750}, {If[ Abs[SawtoothWave[220.00000 t]] > Abs[Sin[10 (t - 34.968750)]], f = Sin[27.500000 (t - 34.968750)], f = SquareWave[110.00000 t]], 34.968750 < t < 35.187500}, {If[ Abs[SawtoothWave[493.88300 t]] > Abs[Sin[10 (t - 35.187500)]], f = Sin[61.735374 (t - 35.187500)], f = SquareWave[246.94150 t]], 35.187500 < t < 35.218750}, {If[ Abs[SawtoothWave[220.00000 t]] > Abs[Sin[10 (t - 35.218750)]], f = Sin[27.500000 (t - 35.218750)], f = SquareWave[110.00000 t]], 35.218750 < t < 35.437500}, {If[ Abs[SawtoothWave[493.88300 t]] > Abs[Sin[10 (t - 35.437500)]], f = Sin[61.735374 (t - 35.437500)], f = SquareWave[246.94150 t]], 35.437500 < t < 35.468750}, {If[ Abs[SawtoothWave[220.00000 t]] > Abs[Sin[10 (t - 35.468750)]], f = Sin[27.500000 (t - 35.468750)], f = SquareWave[110.00000 t]], 35.468750 < t < 35.687500}, {If[ Abs[SawtoothWave[493.88300 t]] > Abs[Sin[10 (t - 35.687500)]], f = Sin[61.735374 (t - 35.687500)], f = SquareWave[246.94150 t]], 35.687500 < t < 35.718750}, {If[ Abs[SawtoothWave[220.00000 t]] > Abs[Sin[10 (t - 35.718750)]], f = Sin[27.500000 (t - 35.718750)], f = SquareWave[110.00000 t]], 35.718750 < t < 35.937500}, {If[ Abs[SawtoothWave[493.88300 t]] > Abs[Sin[10 (t - 35.937500)]], f = Sin[61.735374 (t - 35.937500)], f = SquareWave[246.94150 t]], 35.937500 < t < 35.968750}, {0, 35.968750 < t < 43.968750}, {If[ Abs[SawtoothWave[329.62799 t]] > Abs[Sin[10 (t - 43.968750)]], f = Sin[41.203499 (t - 43.968750)], f = SquareWave[164.81400 t]], 43.968750 < t < 44.500000}, {0, 44.500000 < t < 44.968750}, {If[ Abs[SawtoothWave[220.00000 t]] > Abs[Sin[10 (t - 44.968750)]], f = Sin[27.500000 (t - 44.968750)], f = SquareWave[110.00000 t]], 44.968750 < t < 45.968750}, {If[ Abs[SawtoothWave[329.62799 t]] > Abs[Sin[10 (t - 45.968750)]], f = Sin[41.203499 (t - 45.968750)], f = SquareWave[164.81400 t]], 45.968750 < t < 46.500000}, {0, 46.500000 < t < 46.968750}, {If[ Abs[SawtoothWave[220.00000 t]] > Abs[Sin[10 (t - 46.968750)]], f = Sin[27.500000 (t - 46.968750)], f = SquareWave[110.00000 t]], 46.968750 < t < 47.968750}, {If[ Abs[SawtoothWave[329.62799 t]] > Abs[Sin[10 (t - 47.968750)]], f = Sin[41.203499 (t - 47.968750)], f = SquareWave[164.81400 t]], 47.968750 < t < 48.500000}, {0, 48.500000 < t < 48.968750}, {If[ Abs[SawtoothWave[220.00000 t]] > Abs[Sin[10 (t - 48.968750)]], f = Sin[27.500000 (t - 48.968750)], f = SquareWave[110.00000 t]], 48.968750 < t < 49.968750}, {If[ Abs[SawtoothWave[329.62799 t]] > Abs[Sin[10 (t - 49.968750)]], f = Sin[41.203499 (t - 49.968750)], f = SquareWave[164.81400 t]], 49.968750 < t < 50.500000}, {0, 50.500000 < t < 50.968750}, {If[ Abs[SawtoothWave[220.00000 t]] > Abs[Sin[10 (t - 50.968750)]], f = Sin[27.500000 (t - 50.968750)], f = SquareWave[110.00000 t]], 50.968750 < t < 51.968750}, {If[ Abs[SawtoothWave[329.62799 t]] > Abs[Sin[10 (t - 51.968750)]], f = Sin[41.203499 (t - 51.968750)], f = SquareWave[164.81400 t]], 51.968750 < t < 52.500000}, {0, 52.500000 < t < 52.968750}, {If[ Abs[SawtoothWave[220.00000 t]] > Abs[Sin[10 (t - 52.968750)]], f = Sin[27.500000 (t - 52.968750)], f = SquareWave[110.00000 t]], 52.968750 < t < 53.968750}, {0, 53.968750 < t < 64.031250}}] + 10 Piecewise[{{((1 - Log[(5 - (t - 0.0000000))^(5 - (t - 0.0000000))])* Sin[440 (5 - (t - 0.0000000)) + (5 - (t - 0.0000000))^2 SawtoothWave[ 400/(5 - (t - 0.0000000)) Cos[ Sin[5 - (t - 0.0000000)]]]])/7.01859, 0.0000000 < t < 0.50000000}, {(((Log[8] - Log[t + 7 - 0.50000000])^20)* SquareWave[ Sin[(t + 7 - 0.50000000)^2 SawtoothWave[ 400/(t + 7 - 0.50000000) Cos[ Sin[5 - 2 Sqrt[(t + 7 - 0.50000000)]]]]] + Cos[40 (t + 7 - 0.50000000)]])/(3.76468*10^(-18)), 0.50000000 < t < 0.75000000}, {((1 - Log[(4 - (t - 0.75000000))^(4 - (t - 0.75000000))])* Sin[440 (4 - (t - 0.75000000)) + (4 - (t - 0.75000000))^2 SawtoothWave[ 400/(4 - (t - 0.75000000)) Cos[ Sin[4 - (t - 0.75000000)]]]])/7, 0.75000000 < t < 1.9687500}, {((1 - Log[(5 - (t - 1.9687500))^(5 - (t - 1.9687500))])* Sin[440 (5 - (t - 1.9687500)) + (5 - (t - 1.9687500))^2 SawtoothWave[ 400/(5 - (t - 1.9687500)) Cos[ Sin[5 - (t - 1.9687500)]]]])/7.01859, 1.9687500 < t < 2.4687500}, {(((Log[8] - Log[t + 7 - 2.4687500])^20)* SquareWave[ Sin[(t + 7 - 2.4687500)^2 SawtoothWave[ 400/(t + 7 - 2.4687500) Cos[ Sin[5 - 2 Sqrt[(t + 7 - 2.4687500)]]]]] + Cos[40 (t + 7 - 2.4687500)]])/(3.76468*10^(-18)), 2.4687500 < t < 2.7187500}, {((1 - Log[(4 - (t - 2.7187500))^(4 - (t - 2.7187500))])* Sin[440 (4 - (t - 2.7187500)) + (4 - (t - 2.7187500))^2 SawtoothWave[ 400/(4 - (t - 2.7187500)) Cos[ Sin[4 - (t - 2.7187500)]]]])/7, 2.7187500 < t < 3.9687500}, {((1 - Log[(5 - (t - 3.9687500))^(5 - (t - 3.9687500))])* Sin[440 (5 - (t - 3.9687500)) + (5 - (t - 3.9687500))^2 SawtoothWave[ 400/(5 - (t - 3.9687500)) Cos[ Sin[5 - (t - 3.9687500)]]]])/7.01859, 3.9687500 < t < 4.4687500}, {(((Log[8] - Log[t + 7 - 4.4687500])^20)* SquareWave[ Sin[(t + 7 - 4.4687500)^2 SawtoothWave[ 400/(t + 7 - 4.4687500) Cos[ Sin[5 - 2 Sqrt[(t + 7 - 4.4687500)]]]]] + Cos[40 (t + 7 - 4.4687500)]])/(3.76468*10^(-18)), 4.4687500 < t < 4.7187500}, {((1 - Log[(4 - (t - 4.7187500))^(4 - (t - 4.7187500))])* Sin[440 (4 - (t - 4.7187500)) + (4 - (t - 4.7187500))^2 SawtoothWave[ 400/(4 - (t - 4.7187500)) Cos[ Sin[4 - (t - 4.7187500)]]]])/7, 4.7187500 < t < 5.9687500}, {((1 - Log[(5 - (t - 5.9687500))^(5 - (t - 5.9687500))])* Sin[440 (5 - (t - 5.9687500)) + (5 - (t - 5.9687500))^2 SawtoothWave[ 400/(5 - (t - 5.9687500)) Cos[ Sin[5 - (t - 5.9687500)]]]])/7.01859, 5.9687500 < t < 6.4687500}, {(((Log[8] - Log[t + 7 - 6.4687500])^20)* SquareWave[ Sin[(t + 7 - 6.4687500)^2 SawtoothWave[ 400/(t + 7 - 6.4687500) Cos[ Sin[5 - 2 Sqrt[(t + 7 - 6.4687500)]]]]] + Cos[40 (t + 7 - 6.4687500)]])/(3.76468*10^(-18)), 6.4687500 < t < 6.7187500}, {((1 - Log[(4 - (t - 6.7187500))^(4 - (t - 6.7187500))])* Sin[440 (4 - (t - 6.7187500)) + (4 - (t - 6.7187500))^2 SawtoothWave[ 400/(4 - (t - 6.7187500)) Cos[ Sin[4 - (t - 6.7187500)]]]])/7, 6.7187500 < t < 7.7187500}, {((1 - Log[(t - 7.7187500)^(t - 7.7187500)])* Sin[440 (t - 7.7187500) SawtoothWave[ 400/(t - 7.7187500)]])/1.21065, 7.7187500 < t < 7.9687500}, {((1 - Log[(4 - (t - 7.9687500))^(4 - (t - 7.9687500))])* Sin[440 (4 - (t - 7.9687500)) + (4 - (t - 7.9687500))^2 SawtoothWave[ 400/(4 - (t - 7.9687500)) Cos[ Sin[4 - (t - 7.9687500)]]]])/7, 7.9687500 < t < 8.4687500}, {((1 - Log[(t - 8.4687500)^(t - 8.4687500)])* Sin[440 (t - 8.4687500) SawtoothWave[ 400/(t - 8.4687500)]])/1.21065, 8.4687500 < t < 8.5312500}, {(((Log[8] - Log[t + 7 - 8.5312500])^20)* SquareWave[ Sin[(t + 7 - 8.5312500)^2 SawtoothWave[ 400/(t + 7 - 8.5312500) Cos[ Sin[5 - 2 Sqrt[(t + 7 - 8.5312500)]]]]] + Cos[40 (t + 7 - 8.5312500)]])/(3.76468*10^(-18)), 8.5312500 < t < 8.7187500}, {((1 - Log[(4 - (t - 8.7187500))^(4 - (t - 8.7187500))])* Sin[440 (4 - (t - 8.7187500)) + (4 - (t - 8.7187500))^2 SawtoothWave[ 400/(4 - (t - 8.7187500)) Cos[ Sin[4 - (t - 8.7187500)]]]])/7, 8.7187500 < t < 9.9375000}, {0, 9.9375000 < t < 9.9687500}, {((1 - Log[(4 - (t - 9.9687500))^(4 - (t - 9.9687500))])* Sin[440 (4 - (t - 9.9687500)) + (4 - (t - 9.9687500))^2 SawtoothWave[ 400/(4 - (t - 9.9687500)) Cos[ Sin[4 - (t - 9.9687500)]]]])/7, 9.9687500 < t < 10.468750}, {((1 - Log[(t - 10.468750)^(t - 10.468750)])* Sin[440 (t - 10.468750) SawtoothWave[ 400/(t - 10.468750)]])/1.21065, 10.468750 < t < 10.531250}, {(((Log[8] - Log[t + 7 - 10.531250])^20)* SquareWave[ Sin[(t + 7 - 10.531250)^2 SawtoothWave[ 400/(t + 7 - 10.531250) Cos[ Sin[5 - 2 Sqrt[(t + 7 - 10.531250)]]]]] + Cos[40 (t + 7 - 10.531250)]])/(3.76468*10^(-18)), 10.531250 < t < 10.718750}, {((1 - Log[(4 - (t - 10.718750))^(4 - (t - 10.718750))])* Sin[440 (4 - (t - 10.718750)) + (4 - (t - 10.718750))^2 SawtoothWave[ 400/(4 - (t - 10.718750)) Cos[ Sin[4 - (t - 10.718750)]]]])/7, 10.718750 < t < 11.625000}, {((1 - Log[(t - 11.625000)^(t - 11.625000)])* Sin[440 (t - 11.625000) SawtoothWave[ 400/(t - 11.625000)]])/1.21065, 11.625000 < t < 11.656250}, {((1 - Log[(4 - (t - 11.656250))^(4 - (t - 11.656250))])* Sin[440 (4 - (t - 11.656250)) + (4 - (t - 11.656250))^2 SawtoothWave[ 400/(4 - (t - 11.656250)) Cos[ Sin[4 - (t - 11.656250)]]]])/7, 11.656250 < t < 11.718750}, {((1 - Log[(t - 11.718750)^(t - 11.718750)])* Sin[440 (t - 11.718750) SawtoothWave[ 400/(t - 11.718750)]])/1.21065, 11.718750 < t < 11.968750}, {((1 - Log[(4 - (t - 11.968750))^(4 - (t - 11.968750))])* Sin[440 (4 - (t - 11.968750)) + (4 - (t - 11.968750))^2 SawtoothWave[ 400/(4 - (t - 11.968750)) Cos[ Sin[4 - (t - 11.968750)]]]])/7, 11.968750 < t < 12.468750}, {((1 - Log[(t - 12.468750)^(t - 12.468750)])* Sin[440 (t - 12.468750) SawtoothWave[ 400/(t - 12.468750)]])/1.21065, 12.468750 < t < 12.531250}, {(((Log[8] - Log[t + 7 - 12.531250])^20)* SquareWave[ Sin[(t + 7 - 12.531250)^2 SawtoothWave[ 400/(t + 7 - 12.531250) Cos[ Sin[5 - 2 Sqrt[(t + 7 - 12.531250)]]]]] + Cos[40 (t + 7 - 12.531250)]])/(3.76468*10^(-18)), 12.531250 < t < 12.718750}, {((1 - Log[(4 - (t - 12.718750))^(4 - (t - 12.718750))])* Sin[440 (4 - (t - 12.718750)) + (4 - (t - 12.718750))^2 SawtoothWave[ 400/(4 - (t - 12.718750)) Cos[ Sin[4 - (t - 12.718750)]]]])/7, 12.718750 < t < 13.968750}, {((1 - Log[(5 - (t - 13.968750))^(5 - (t - 13.968750))])* Sin[440 (5 - (t - 13.968750)) + (5 - (t - 13.968750))^2 SawtoothWave[ 400/(5 - (t - 13.968750)) Cos[ Sin[5 - (t - 13.968750)]]]])/7.01859, 13.968750 < t < 14.468750}, {(((Log[8] - Log[t + 7 - 14.468750])^20)* SquareWave[ Sin[(t + 7 - 14.468750)^2 SawtoothWave[ 400/(t + 7 - 14.468750) Cos[ Sin[5 - 2 Sqrt[(t + 7 - 14.468750)]]]]] + Cos[40 (t + 7 - 14.468750)]])/(3.76468*10^(-18)), 14.468750 < t < 14.531250}, {0, 14.531250 < t < 14.562500}, {(((Log[8] - Log[t + 7 - 14.562500])^20)* SquareWave[ Sin[(t + 7 - 14.562500)^2 SawtoothWave[ 400/(t + 7 - 14.562500) Cos[ Sin[5 - 2 Sqrt[(t + 7 - 14.562500)]]]]] + Cos[40 (t + 7 - 14.562500)]])/(3.76468*10^(-18)), 14.562500 < t < 14.625000}, {0, 14.625000 < t < 14.656250}, {(((Log[8] - Log[t + 7 - 14.656250])^20)* SquareWave[ Sin[(t + 7 - 14.656250)^2 SawtoothWave[ 400/(t + 7 - 14.656250) Cos[ Sin[5 - 2 Sqrt[(t + 7 - 14.656250)]]]]] + Cos[40 (t + 7 - 14.656250)]])/(3.76468*10^(-18)), 14.656250 < t < 14.718750}, {((1 - Log[(5 - (t - 14.718750))^(5 - (t - 14.718750))])* Sin[440 (5 - (t - 14.718750)) + (5 - (t - 14.718750))^2 SawtoothWave[ 400/(5 - (t - 14.718750)) Cos[ Sin[5 - (t - 14.718750)]]]])/7.01859, 14.718750 < t < 14.750000}, {((1 - Log[(4 - (t - 14.750000))^(4 - (t - 14.750000))])* Sin[440 (4 - (t - 14.750000)) + (4 - (t - 14.750000))^2 SawtoothWave[ 400/(4 - (t - 14.750000)) Cos[ Sin[4 - (t - 14.750000)]]]])/7, 14.750000 < t < 14.781250}, {((1 - Log[(5 - (t - 14.781250))^(5 - (t - 14.781250))])* Sin[440 (5 - (t - 14.781250)) + (5 - (t - 14.781250))^2 SawtoothWave[ 400/(5 - (t - 14.781250)) Cos[ Sin[5 - (t - 14.781250)]]]])/7.01859, 14.781250 < t < 14.812500}, {((1 - Log[(4 - (t - 14.812500))^(4 - (t - 14.812500))])* Sin[440 (4 - (t - 14.812500)) + (4 - (t - 14.812500))^2 SawtoothWave[ 400/(4 - (t - 14.812500)) Cos[ Sin[4 - (t - 14.812500)]]]])/7, 14.812500 < t < 14.843750}, {((1 - Log[(5 - (t - 14.843750))^(5 - (t - 14.843750))])* Sin[440 (5 - (t - 14.843750)) + (5 - (t - 14.843750))^2 SawtoothWave[ 400/(5 - (t - 14.843750)) Cos[ Sin[5 - (t - 14.843750)]]]])/7.01859, 14.843750 < t < 14.875000}, {((1 - Log[(4 - (t - 14.875000))^(4 - (t - 14.875000))])* Sin[440 (4 - (t - 14.875000)) + (4 - (t - 14.875000))^2 SawtoothWave[ 400/(4 - (t - 14.875000)) Cos[ Sin[4 - (t - 14.875000)]]]])/7, 14.875000 < t < 14.906250}, {((1 - Log[(5 - (t - 14.906250))^(5 - (t - 14.906250))])* Sin[440 (5 - (t - 14.906250)) + (5 - (t - 14.906250))^2 SawtoothWave[ 400/(5 - (t - 14.906250)) Cos[ Sin[5 - (t - 14.906250)]]]])/7.01859, 14.906250 < t < 14.937500}, {((1 - Log[(4 - (t - 14.937500))^(4 - (t - 14.937500))])* Sin[440 (4 - (t - 14.937500)) + (4 - (t - 14.937500))^2 SawtoothWave[ 400/(4 - (t - 14.937500)) Cos[ Sin[4 - (t - 14.937500)]]]])/7, 14.937500 < t < 14.968750}, {((1 - Log[(5 - (t - 14.968750))^(5 - (t - 14.968750))])* Sin[440 (5 - (t - 14.968750)) + (5 - (t - 14.968750))^2 SawtoothWave[ 400/(5 - (t - 14.968750)) Cos[ Sin[5 - (t - 14.968750)]]]])/7.01859, 14.968750 < t < 15.000000}, {((1 - Log[(4 - (t - 15.000000))^(4 - (t - 15.000000))])* Sin[440 (4 - (t - 15.000000)) + (4 - (t - 15.000000))^2 SawtoothWave[ 400/(4 - (t - 15.000000)) Cos[ Sin[4 - (t - 15.000000)]]]])/7, 15.000000 < t < 15.031250}, {((1 - Log[(5 - (t - 15.031250))^(5 - (t - 15.031250))])* Sin[440 (5 - (t - 15.031250)) + (5 - (t - 15.031250))^2 SawtoothWave[ 400/(5 - (t - 15.031250)) Cos[ Sin[5 - (t - 15.031250)]]]])/7.01859, 15.031250 < t < 15.062500}, {((1 - Log[(4 - (t - 15.062500))^(4 - (t - 15.062500))])* Sin[440 (4 - (t - 15.062500)) + (4 - (t - 15.062500))^2 SawtoothWave[ 400/(4 - (t - 15.062500)) Cos[ Sin[4 - (t - 15.062500)]]]])/7, 15.062500 < t < 15.093750}, {((1 - Log[(5 - (t - 15.093750))^(5 - (t - 15.093750))])* Sin[440 (5 - (t - 15.093750)) + (5 - (t - 15.093750))^2 SawtoothWave[ 400/(5 - (t - 15.093750)) Cos[ Sin[5 - (t - 15.093750)]]]])/7.01859, 15.093750 < t < 15.125000}, {((1 - Log[(4 - (t - 15.125000))^(4 - (t - 15.125000))])* Sin[440 (4 - (t - 15.125000)) + (4 - (t - 15.125000))^2 SawtoothWave[ 400/(4 - (t - 15.125000)) Cos[ Sin[4 - (t - 15.125000)]]]])/7, 15.125000 < t < 15.156250}, {((1 - Log[(5 - (t - 15.156250))^(5 - (t - 15.156250))])* Sin[440 (5 - (t - 15.156250)) + (5 - (t - 15.156250))^2 SawtoothWave[ 400/(5 - (t - 15.156250)) Cos[ Sin[5 - (t - 15.156250)]]]])/7.01859, 15.156250 < t < 15.187500}, {((1 - Log[(4 - (t - 15.187500))^(4 - (t - 15.187500))])* Sin[440 (4 - (t - 15.187500)) + (4 - (t - 15.187500))^2 SawtoothWave[ 400/(4 - (t - 15.187500)) Cos[ Sin[4 - (t - 15.187500)]]]])/7, 15.187500 < t < 15.218750}, {((1 - Log[(5 - (t - 15.218750))^(5 - (t - 15.218750))])* Sin[440 (5 - (t - 15.218750)) + (5 - (t - 15.218750))^2 SawtoothWave[ 400/(5 - (t - 15.218750)) Cos[ Sin[5 - (t - 15.218750)]]]])/7.01859, 15.218750 < t < 15.250000}, {((1 - Log[(4 - (t - 15.250000))^(4 - (t - 15.250000))])* Sin[440 (4 - (t - 15.250000)) + (4 - (t - 15.250000))^2 SawtoothWave[ 400/(4 - (t - 15.250000)) Cos[ Sin[4 - (t - 15.250000)]]]])/7, 15.250000 < t < 15.281250}, {((1 - Log[(5 - (t - 15.281250))^(5 - (t - 15.281250))])* Sin[440 (5 - (t - 15.281250)) + (5 - (t - 15.281250))^2 SawtoothWave[ 400/(5 - (t - 15.281250)) Cos[ Sin[5 - (t - 15.281250)]]]])/7.01859, 15.281250 < t < 15.312500}, {((1 - Log[(4 - (t - 15.312500))^(4 - (t - 15.312500))])* Sin[440 (4 - (t - 15.312500)) + (4 - (t - 15.312500))^2 SawtoothWave[ 400/(4 - (t - 15.312500)) Cos[ Sin[4 - (t - 15.312500)]]]])/7, 15.312500 < t < 15.343750}, {((1 - Log[(5 - (t - 15.343750))^(5 - (t - 15.343750))])* Sin[440 (5 - (t - 15.343750)) + (5 - (t - 15.343750))^2 SawtoothWave[ 400/(5 - (t - 15.343750)) Cos[ Sin[5 - (t - 15.343750)]]]])/7.01859, 15.343750 < t < 15.375000}, {((1 - Log[(4 - (t - 15.375000))^(4 - (t - 15.375000))])* Sin[440 (4 - (t - 15.375000)) + (4 - (t - 15.375000))^2 SawtoothWave[ 400/(4 - (t - 15.375000)) Cos[ Sin[4 - (t - 15.375000)]]]])/7, 15.375000 < t < 15.406250}, {((1 - Log[(5 - (t - 15.406250))^(5 - (t - 15.406250))])* Sin[440 (5 - (t - 15.406250)) + (5 - (t - 15.406250))^2 SawtoothWave[ 400/(5 - (t - 15.406250)) Cos[ Sin[5 - (t - 15.406250)]]]])/7.01859, 15.406250 < t < 15.437500}, {((1 - Log[(4 - (t - 15.437500))^(4 - (t - 15.437500))])* Sin[440 (4 - (t - 15.437500)) + (4 - (t - 15.437500))^2 SawtoothWave[ 400/(4 - (t - 15.437500)) Cos[ Sin[4 - (t - 15.437500)]]]])/7, 15.437500 < t < 15.468750}, {((1 - Log[(5 - (t - 15.468750))^(5 - (t - 15.468750))])* Sin[440 (5 - (t - 15.468750)) + (5 - (t - 15.468750))^2 SawtoothWave[ 400/(5 - (t - 15.468750)) Cos[ Sin[5 - (t - 15.468750)]]]])/7.01859, 15.468750 < t < 15.500000}, {((1 - Log[(4 - (t - 15.500000))^(4 - (t - 15.500000))])* Sin[440 (4 - (t - 15.500000)) + (4 - (t - 15.500000))^2 SawtoothWave[ 400/(4 - (t - 15.500000)) Cos[ Sin[4 - (t - 15.500000)]]]])/7, 15.500000 < t < 15.531250}, {((1 - Log[(5 - (t - 15.531250))^(5 - (t - 15.531250))])* Sin[440 (5 - (t - 15.531250)) + (5 - (t - 15.531250))^2 SawtoothWave[ 400/(5 - (t - 15.531250)) Cos[ Sin[5 - (t - 15.531250)]]]])/7.01859, 15.531250 < t < 15.562500}, {((1 - Log[(4 - (t - 15.562500))^(4 - (t - 15.562500))])* Sin[440 (4 - (t - 15.562500)) + (4 - (t - 15.562500))^2 SawtoothWave[ 400/(4 - (t - 15.562500)) Cos[ Sin[4 - (t - 15.562500)]]]])/7, 15.562500 < t < 15.593750}, {((1 - Log[(5 - (t - 15.593750))^(5 - (t - 15.593750))])* Sin[440 (5 - (t - 15.593750)) + (5 - (t - 15.593750))^2 SawtoothWave[ 400/(5 - (t - 15.593750)) Cos[ Sin[5 - (t - 15.593750)]]]])/7.01859, 15.593750 < t < 15.625000}, {((1 - Log[(4 - (t - 15.625000))^(4 - (t - 15.625000))])* Sin[440 (4 - (t - 15.625000)) + (4 - (t - 15.625000))^2 SawtoothWave[ 400/(4 - (t - 15.625000)) Cos[ Sin[4 - (t - 15.625000)]]]])/7, 15.625000 < t < 15.656250}, {((1 - Log[(5 - (t - 15.656250))^(5 - (t - 15.656250))])* Sin[440 (5 - (t - 15.656250)) + (5 - (t - 15.656250))^2 SawtoothWave[ 400/(5 - (t - 15.656250)) Cos[ Sin[5 - (t - 15.656250)]]]])/7.01859, 15.656250 < t < 15.687500}, {((1 - Log[(4 - (t - 15.687500))^(4 - (t - 15.687500))])* Sin[440 (4 - (t - 15.687500)) + (4 - (t - 15.687500))^2 SawtoothWave[ 400/(4 - (t - 15.687500)) Cos[ Sin[4 - (t - 15.687500)]]]])/7, 15.687500 < t < 15.718750}, {((1 - Log[(t - 15.718750)^(t - 15.718750)])* Sin[440 (t - 15.718750) SawtoothWave[ 400/(t - 15.718750)]])/1.21065, 15.718750 < t < 15.750000}, {((1 - Log[(4 - (t - 15.750000))^(4 - (t - 15.750000))])* Sin[440 (4 - (t - 15.750000)) + (4 - (t - 15.750000))^2 SawtoothWave[ 400/(4 - (t - 15.750000)) Cos[ Sin[4 - (t - 15.750000)]]]])/7, 15.750000 < t < 15.781250}, {((1 - Log[(t - 15.781250)^(t - 15.781250)])* Sin[440 (t - 15.781250) SawtoothWave[ 400/(t - 15.781250)]])/1.21065, 15.781250 < t < 15.812500}, {((1 - Log[(4 - (t - 15.812500))^(4 - (t - 15.812500))])* Sin[440 (4 - (t - 15.812500)) + (4 - (t - 15.812500))^2 SawtoothWave[ 400/(4 - (t - 15.812500)) Cos[ Sin[4 - (t - 15.812500)]]]])/7, 15.812500 < t < 15.843750}, {((1 - Log[(t - 15.843750)^(t - 15.843750)])* Sin[440 (t - 15.843750) SawtoothWave[ 400/(t - 15.843750)]])/1.21065, 15.843750 < t < 15.875000}, {((1 - Log[(4 - (t - 15.875000))^(4 - (t - 15.875000))])* Sin[440 (4 - (t - 15.875000)) + (4 - (t - 15.875000))^2 SawtoothWave[ 400/(4 - (t - 15.875000)) Cos[ Sin[4 - (t - 15.875000)]]]])/7, 15.875000 < t < 15.906250}, {((1 - Log[(t - 15.906250)^(t - 15.906250)])* Sin[440 (t - 15.906250) SawtoothWave[ 400/(t - 15.906250)]])/1.21065, 15.906250 < t < 15.937500}, {((1 - Log[(4 - (t - 15.937500))^(4 - (t - 15.937500))])* Sin[440 (4 - (t - 15.937500)) + (4 - (t - 15.937500))^2 SawtoothWave[ 400/(4 - (t - 15.937500)) Cos[ Sin[4 - (t - 15.937500)]]]])/7, 15.937500 < t < 15.968750}, {((1 - Log[(5 - (t - 15.968750))^(5 - (t - 15.968750))])* Sin[440 (5 - (t - 15.968750)) + (5 - (t - 15.968750))^2 SawtoothWave[ 400/(5 - (t - 15.968750)) Cos[ Sin[5 - (t - 15.968750)]]]])/7.01859, 15.968750 < t < 16.468750}, {(((Log[8] - Log[t + 7 - 16.468750])^20)* SquareWave[ Sin[(t + 7 - 16.468750)^2 SawtoothWave[ 400/(t + 7 - 16.468750) Cos[ Sin[5 - 2 Sqrt[(t + 7 - 16.468750)]]]]] + Cos[40 (t + 7 - 16.468750)]])/(3.76468*10^(-18)), 16.468750 < t < 16.718750}, {((1 - Log[(4 - (t - 16.718750))^(4 - (t - 16.718750))])* Sin[440 (4 - (t - 16.718750)) + (4 - (t - 16.718750))^2 SawtoothWave[ 400/(4 - (t - 16.718750)) Cos[ Sin[4 - (t - 16.718750)]]]])/7, 16.718750 < t < 17.968750}, {((1 - Log[(5 - (t - 17.968750))^(5 - (t - 17.968750))])* Sin[440 (5 - (t - 17.968750)) + (5 - (t - 17.968750))^2 SawtoothWave[ 400/(5 - (t - 17.968750)) Cos[ Sin[5 - (t - 17.968750)]]]])/7.01859, 17.968750 < t < 18.468750}, {(((Log[8] - Log[t + 7 - 18.468750])^20)* SquareWave[ Sin[(t + 7 - 18.468750)^2 SawtoothWave[ 400/(t + 7 - 18.468750) Cos[ Sin[5 - 2 Sqrt[(t + 7 - 18.468750)]]]]] + Cos[40 (t + 7 - 18.468750)]])/(3.76468*10^(-18)), 18.468750 < t < 18.718750}, {((1 - Log[(4 - (t - 18.718750))^(4 - (t - 18.718750))])* Sin[440 (4 - (t - 18.718750)) + (4 - (t - 18.718750))^2 SawtoothWave[ 400/(4 - (t - 18.718750)) Cos[ Sin[4 - (t - 18.718750)]]]])/7, 18.718750 < t < 19.718750}, {(((Log[8] - Log[(t + 7 - 19.718750)])^20)* SquareWave[(t - 19.718750 + 7)^5 SquareWave[((t - 19.718750 + 7)^20 + 5 (t - 19.718750 + 7)) SawtoothWave[ 400/(t - 19.718750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 19.718750 + 7]]]]] + Cos[200 (t - 19.718750 + 7)]])*3.40574*10^17, 19.718750 < t < 19.968750}, {((1 - Log[(5 - (t - 19.968750))^(5 - (t - 19.968750))])* Sin[440 (5 - (t - 19.968750)) + (5 - (t - 19.968750))^2 SawtoothWave[ 400/(5 - (t - 19.968750)) Cos[ Sin[5 - (t - 19.968750)]]]])/7.01859, 19.968750 < t < 20.468750}, {(((Log[8] - Log[t + 7 - 20.468750])^20)* SquareWave[ Sin[(t + 7 - 20.468750)^2 SawtoothWave[ 400/(t + 7 - 20.468750) Cos[ Sin[5 - 2 Sqrt[(t + 7 - 20.468750)]]]]] + Cos[40 (t + 7 - 20.468750)]])/(3.76468*10^(-18)), 20.468750 < t < 20.718750}, {((1 - Log[(4 - (t - 20.718750))^(4 - (t - 20.718750))])* Sin[440 (4 - (t - 20.718750)) + (4 - (t - 20.718750))^2 SawtoothWave[ 400/(4 - (t - 20.718750)) Cos[ Sin[4 - (t - 20.718750)]]]])/7, 20.718750 < t < 21.718750}, {(((Log[8] - Log[(t + 7 - 21.718750)])^20)* SquareWave[(t - 21.718750 + 7)^5 SquareWave[((t - 21.718750 + 7)^20 + 5 (t - 21.718750 + 7)) SawtoothWave[ 400/(t - 21.718750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 21.718750 + 7]]]]] + Cos[200 (t - 21.718750 + 7)]])*3.40574*10^17, 21.718750 < t < 21.968750}, {((1 - Log[(5 - (t - 21.968750))^(5 - (t - 21.968750))])* Sin[440 (5 - (t - 21.968750)) + (5 - (t - 21.968750))^2 SawtoothWave[ 400/(5 - (t - 21.968750)) Cos[ Sin[5 - (t - 21.968750)]]]])/7.01859, 21.968750 < t < 22.468750}, {(((Log[8] - Log[t + 7 - 22.468750])^20)* SquareWave[ Sin[(t + 7 - 22.468750)^2 SawtoothWave[ 400/(t + 7 - 22.468750) Cos[ Sin[5 - 2 Sqrt[(t + 7 - 22.468750)]]]]] + Cos[40 (t + 7 - 22.468750)]])/(3.76468*10^(-18)), 22.468750 < t < 22.718750}, {((1 - Log[(t - 22.718750)^(t - 22.718750)])* Sin[440 (t - 22.718750) SawtoothWave[ 400/(t - 22.718750)]])/1.21065, 22.718750 < t < 23.968750}, {((1 - Log[(5 - (t - 23.968750))^(5 - (t - 23.968750))])* Sin[440 (5 - (t - 23.968750)) + (5 - (t - 23.968750))^2 SawtoothWave[ 400/(5 - (t - 23.968750)) Cos[ Sin[5 - (t - 23.968750)]]]])/7.01859, 23.968750 < t < 24.468750}, {(((Log[8] - Log[t + 7 - 24.468750])^20)* SquareWave[ Sin[(t + 7 - 24.468750)^2 SawtoothWave[ 400/(t + 7 - 24.468750) Cos[ Sin[5 - 2 Sqrt[(t + 7 - 24.468750)]]]]] + Cos[40 (t + 7 - 24.468750)]])/(3.76468*10^(-18)), 24.468750 < t < 24.718750}, {((1 - Log[(4 - (t - 24.718750))^(4 - (t - 24.718750))])* Sin[440 (4 - (t - 24.718750)) + (4 - (t - 24.718750))^2 SawtoothWave[ 400/(4 - (t - 24.718750)) Cos[ Sin[4 - (t - 24.718750)]]]])/7, 24.718750 < t < 25.718750}, {(((Log[8] - Log[(t + 7 - 25.718750)])^20)* SquareWave[(t - 25.718750 + 7)^5 SquareWave[((t - 25.718750 + 7)^20 + 5 (t - 25.718750 + 7)) SawtoothWave[ 400/(t - 25.718750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 25.718750 + 7]]]]] + Cos[200 (t - 25.718750 + 7)]])*3.40574*10^17, 25.718750 < t < 25.968750}, {((1 - Log[(5 - (t - 25.968750))^(5 - (t - 25.968750))])* Sin[440 (5 - (t - 25.968750)) + (5 - (t - 25.968750))^2 SawtoothWave[ 400/(5 - (t - 25.968750)) Cos[ Sin[5 - (t - 25.968750)]]]])/7.01859, 25.968750 < t < 26.468750}, {(((Log[8] - Log[t + 7 - 26.468750])^20)* SquareWave[ Sin[(t + 7 - 26.468750)^2 SawtoothWave[ 400/(t + 7 - 26.468750) Cos[ Sin[5 - 2 Sqrt[(t + 7 - 26.468750)]]]]] + Cos[40 (t + 7 - 26.468750)]])/(3.76468*10^(-18)), 26.468750 < t < 26.718750}, {((1 - Log[(4 - (t - 26.718750))^(4 - (t - 26.718750))])* Sin[440 (4 - (t - 26.718750)) + (4 - (t - 26.718750))^2 SawtoothWave[ 400/(4 - (t - 26.718750)) Cos[ Sin[4 - (t - 26.718750)]]]])/7, 26.718750 < t < 27.718750}, {(((Log[8] - Log[(t + 7 - 27.718750)])^20)* SquareWave[(t - 27.718750 + 7)^5 SquareWave[((t - 27.718750 + 7)^20 + 5 (t - 27.718750 + 7)) SawtoothWave[ 400/(t - 27.718750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 27.718750 + 7]]]]] + Cos[200 (t - 27.718750 + 7)]])*3.40574*10^17, 27.718750 < t < 27.968750}, {((1 - Log[(5 - (t - 27.968750))^(5 - (t - 27.968750))])* Sin[440 (5 - (t - 27.968750)) + (5 - (t - 27.968750))^2 SawtoothWave[ 400/(5 - (t - 27.968750)) Cos[ Sin[5 - (t - 27.968750)]]]])/7.01859, 27.968750 < t < 28.468750}, {(((Log[8] - Log[t + 7 - 28.468750])^20)* SquareWave[ Sin[(t + 7 - 28.468750)^2 SawtoothWave[ 400/(t + 7 - 28.468750) Cos[ Sin[5 - 2 Sqrt[(t + 7 - 28.468750)]]]]] + Cos[40 (t + 7 - 28.468750)]])/(3.76468*10^(-18)), 28.468750 < t < 28.718750}, {((1 - Log[(4 - (t - 28.718750))^(4 - (t - 28.718750))])* Sin[440 (4 - (t - 28.718750)) + (4 - (t - 28.718750))^2 SawtoothWave[ 400/(4 - (t - 28.718750)) Cos[ Sin[4 - (t - 28.718750)]]]])/7, 28.718750 < t < 29.718750}, {(((Log[8] - Log[(t + 7 - 29.718750)])^20)* SquareWave[(t - 29.718750 + 7)^5 SquareWave[((t - 29.718750 + 7)^20 + 5 (t - 29.718750 + 7)) SawtoothWave[ 400/(t - 29.718750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 29.718750 + 7]]]]] + Cos[200 (t - 29.718750 + 7)]])*3.40574*10^17, 29.718750 < t < 29.968750}, {((1 - Log[(4 - (t - 29.968750))^(4 - (t - 29.968750))])* Sin[440 (4 - (t - 29.968750)) + (4 - (t - 29.968750))^2 SawtoothWave[ 400/(4 - (t - 29.968750)) Cos[ Sin[4 - (t - 29.968750)]]]])/7, 29.968750 < t < 30.468750}, {(((Log[8] - Log[t + 7 - 30.468750])^20)* SquareWave[ Sin[(t + 7 - 30.468750)^2 SawtoothWave[ 400/(t + 7 - 30.468750) Cos[ Sin[5 - 2 Sqrt[(t + 7 - 30.468750)]]]]] + Cos[40 (t + 7 - 30.468750)]])/(3.76468*10^(-18)), 30.468750 < t < 30.718750}, {((1 - Log[(4 - (t - 30.718750))^(4 - (t - 30.718750))])* Sin[440 (4 - (t - 30.718750)) + (4 - (t - 30.718750))^2 SawtoothWave[ 400/(4 - (t - 30.718750)) Cos[ Sin[4 - (t - 30.718750)]]]])/7, 30.718750 < t < 31.718750}, {(((Log[8] - Log[(t + 7 - 31.718750)])^20)* SquareWave[(t - 31.718750 + 7)^5 SquareWave[((t - 31.718750 + 7)^20 + 5 (t - 31.718750 + 7)) SawtoothWave[ 400/(t - 31.718750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 31.718750 + 7]]]]] + Cos[200 (t - 31.718750 + 7)]])*3.40574*10^17, 31.718750 < t < 31.968750}, {((1 - Log[(5 - (t - 31.968750))^(5 - (t - 31.968750))])* Sin[440 (5 - (t - 31.968750)) + (5 - (t - 31.968750))^2 SawtoothWave[ 400/(5 - (t - 31.968750)) Cos[ Sin[5 - (t - 31.968750)]]]])/7.01859, 31.968750 < t < 32.468750}, {(((Log[8] - Log[t + 7 - 32.468750])^20)* SquareWave[ Sin[(t + 7 - 32.468750)^2 SawtoothWave[ 400/(t + 7 - 32.468750) Cos[ Sin[5 - 2 Sqrt[(t + 7 - 32.468750)]]]]] + Cos[40 (t + 7 - 32.468750)]])/(3.76468*10^(-18)), 32.468750 < t < 32.718750}, {((1 - Log[(4 - (t - 32.718750))^(4 - (t - 32.718750))])* Sin[440 (4 - (t - 32.718750)) + (4 - (t - 32.718750))^2 SawtoothWave[ 400/(4 - (t - 32.718750)) Cos[ Sin[4 - (t - 32.718750)]]]])/7, 32.718750 < t < 33.968750}, {((1 - Log[(5 - (t - 33.968750))^(5 - (t - 33.968750))])* Sin[440 (5 - (t - 33.968750)) + (5 - (t - 33.968750))^2 SawtoothWave[ 400/(5 - (t - 33.968750)) Cos[ Sin[5 - (t - 33.968750)]]]])/7.01859, 33.968750 < t < 34.468750}, {(((Log[8] - Log[(t + 7 - 34.468750)])^20)* SquareWave[(t - 34.468750 + 7)^5 SquareWave[((t - 34.468750 + 7)^20 + 5 (t - 34.468750 + 7)) SawtoothWave[ 400/(t - 34.468750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 34.468750 + 7]]]]] + Cos[200 (t - 34.468750 + 7)]])*3.40574*10^17, 34.468750 < t < 34.500000}, {(((Log[8] - Log[t + 7 - 34.500000])^20)* SquareWave[ Sin[(t + 7 - 34.500000)^2 SawtoothWave[ 400/(t + 7 - 34.500000) Cos[ Sin[5 - 2 Sqrt[(t + 7 - 34.500000)]]]]] + Cos[40 (t + 7 - 34.500000)]])/(3.76468*10^(-18)), 34.500000 < t < 34.531250}, {(((Log[8] - Log[(t + 7 - 34.531250)])^20)* SquareWave[(t - 34.531250 + 7)^5 SquareWave[((t - 34.531250 + 7)^20 + 5 (t - 34.531250 + 7)) SawtoothWave[ 400/(t - 34.531250 + 7) Cos[ Sin[5 - 7 Sqrt[t - 34.531250 + 7]]]]] + Cos[200 (t - 34.531250 + 7)]])*3.40574*10^17, 34.531250 < t < 34.562500}, {(((Log[8] - Log[t + 7 - 34.562500])^20)* SquareWave[ Sin[(t + 7 - 34.562500)^2 SawtoothWave[ 400/(t + 7 - 34.562500) Cos[ Sin[5 - 2 Sqrt[(t + 7 - 34.562500)]]]]] + Cos[40 (t + 7 - 34.562500)]])/(3.76468*10^(-18)), 34.562500 < t < 34.593750}, {(((Log[8] - Log[(t + 7 - 34.593750)])^20)* SquareWave[(t - 34.593750 + 7)^5 SquareWave[((t - 34.593750 + 7)^20 + 5 (t - 34.593750 + 7)) SawtoothWave[ 400/(t - 34.593750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 34.593750 + 7]]]]] + Cos[200 (t - 34.593750 + 7)]])*3.40574*10^17, 34.593750 < t < 34.625000}, {(((Log[8] - Log[t + 7 - 34.625000])^20)* SquareWave[ Sin[(t + 7 - 34.625000)^2 SawtoothWave[ 400/(t + 7 - 34.625000) Cos[ Sin[5 - 2 Sqrt[(t + 7 - 34.625000)]]]]] + Cos[40 (t + 7 - 34.625000)]])/(3.76468*10^(-18)), 34.625000 < t < 34.656250}, {(((Log[8] - Log[(t + 7 - 34.656250)])^20)* SquareWave[(t - 34.656250 + 7)^5 SquareWave[((t - 34.656250 + 7)^20 + 5 (t - 34.656250 + 7)) SawtoothWave[ 400/(t - 34.656250 + 7) Cos[ Sin[5 - 7 Sqrt[t - 34.656250 + 7]]]]] + Cos[200 (t - 34.656250 + 7)]])*3.40574*10^17, 34.656250 < t < 34.687500}, {(((Log[8] - Log[t + 7 - 34.687500])^20)* SquareWave[ Sin[(t + 7 - 34.687500)^2 SawtoothWave[ 400/(t + 7 - 34.687500) Cos[ Sin[5 - 2 Sqrt[(t + 7 - 34.687500)]]]]] + Cos[40 (t + 7 - 34.687500)]])/(3.76468*10^(-18)), 34.687500 < t < 34.718750}, {(((Log[8] - Log[(t + 7 - 34.718750)])^20)* SquareWave[(t - 34.718750 + 7)^5 SquareWave[((t - 34.718750 + 7)^20 + 5 (t - 34.718750 + 7)) SawtoothWave[ 400/(t - 34.718750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 34.718750 + 7]]]]] + Cos[200 (t - 34.718750 + 7)]])*3.40574*10^17, 34.718750 < t < 34.812500}, {0, 34.812500 < t < 34.843750}, {(((Log[8] - Log[(t + 7 - 34.843750)])^20)* SquareWave[(t - 34.843750 + 7)^5 SquareWave[((t - 34.843750 + 7)^20 + 5 (t - 34.843750 + 7)) SawtoothWave[ 400/(t - 34.843750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 34.843750 + 7]]]]] + Cos[200 (t - 34.843750 + 7)]])*3.40574*10^17, 34.843750 < t < 34.937500}, {0, 34.937500 < t < 34.968750}, {(((Log[8] - Log[(t + 7 - 34.968750)])^20)* SquareWave[(t - 34.968750 + 7)^5 SquareWave[((t - 34.968750 + 7)^20 + 5 (t - 34.968750 + 7)) SawtoothWave[ 400/(t - 34.968750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 34.968750 + 7]]]]] + Cos[200 (t - 34.968750 + 7)]])*3.40574*10^17, 34.968750 < t < 35.062500}, {0, 35.062500 < t < 35.093750}, {(((Log[8] - Log[(t + 7 - 35.093750)])^20)* SquareWave[(t - 35.093750 + 7)^5 SquareWave[((t - 35.093750 + 7)^20 + 5 (t - 35.093750 + 7)) SawtoothWave[ 400/(t - 35.093750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 35.093750 + 7]]]]] + Cos[200 (t - 35.093750 + 7)]])*3.40574*10^17, 35.093750 < t < 35.187500}, {0, 35.187500 < t < 35.218750}, {(((Log[8] - Log[(t + 7 - 35.218750)])^20)* SquareWave[(t - 35.218750 + 7)^5 SquareWave[((t - 35.218750 + 7)^20 + 5 (t - 35.218750 + 7)) SawtoothWave[ 400/(t - 35.218750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 35.218750 + 7]]]]] + Cos[200 (t - 35.218750 + 7)]])*3.40574*10^17, 35.218750 < t < 35.312500}, {0, 35.312500 < t < 35.343750}, {(((Log[8] - Log[(t + 7 - 35.343750)])^20)* SquareWave[(t - 35.343750 + 7)^5 SquareWave[((t - 35.343750 + 7)^20 + 5 (t - 35.343750 + 7)) SawtoothWave[ 400/(t - 35.343750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 35.343750 + 7]]]]] + Cos[200 (t - 35.343750 + 7)]])*3.40574*10^17, 35.343750 < t < 35.437500}, {0, 35.437500 < t < 35.468750}, {(((Log[8] - Log[(t + 7 - 35.468750)])^20)* SquareWave[(t - 35.468750 + 7)^5 SquareWave[((t - 35.468750 + 7)^20 + 5 (t - 35.468750 + 7)) SawtoothWave[ 400/(t - 35.468750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 35.468750 + 7]]]]] + Cos[200 (t - 35.468750 + 7)]])*3.40574*10^17, 35.468750 < t < 35.562500}, {0, 35.562500 < t < 35.593750}, {(((Log[8] - Log[(t + 7 - 35.593750)])^20)* SquareWave[(t - 35.593750 + 7)^5 SquareWave[((t - 35.593750 + 7)^20 + 5 (t - 35.593750 + 7)) SawtoothWave[ 400/(t - 35.593750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 35.593750 + 7]]]]] + Cos[200 (t - 35.593750 + 7)]])*3.40574*10^17, 35.593750 < t < 35.687500}, {0, 35.687500 < t < 35.718750}, {(((Log[8] - Log[(t + 7 - 35.718750)])^20)* SquareWave[(t - 35.718750 + 7)^5 SquareWave[((t - 35.718750 + 7)^20 + 5 (t - 35.718750 + 7)) SawtoothWave[ 400/(t - 35.718750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 35.718750 + 7]]]]] + Cos[200 (t - 35.718750 + 7)]])*3.40574*10^17, 35.718750 < t < 35.812500}, {0, 35.812500 < t < 35.843750}, {(((Log[8] - Log[(t + 7 - 35.843750)])^20)* SquareWave[(t - 35.843750 + 7)^5 SquareWave[((t - 35.843750 + 7)^20 + 5 (t - 35.843750 + 7)) SawtoothWave[ 400/(t - 35.843750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 35.843750 + 7]]]]] + Cos[200 (t - 35.843750 + 7)]])*3.40574*10^17, 35.843750 < t < 35.937500}, {0, 35.937500 < t < 35.968750}, {((1 - Log[(5 - (t - 35.968750))^(5 - (t - 35.968750))])* Sin[440 (5 - (t - 35.968750)) + (5 - (t - 35.968750))^2 SawtoothWave[ 400/(5 - (t - 35.968750)) Cos[ Sin[5 - (t - 35.968750)]]]])/7.01859, 35.968750 < t < 36.468750}, {(((Log[8] - Log[(t + 7 - 36.468750)])^20)* SquareWave[(t - 36.468750 + 7)^5 SquareWave[((t - 36.468750 + 7)^20 + 5 (t - 36.468750 + 7)) SawtoothWave[ 400/(t - 36.468750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 36.468750 + 7]]]]] + Cos[200 (t - 36.468750 + 7)]])*3.40574*10^17, 36.468750 < t < 36.500000}, {(((Log[8] - Log[t + 7 - 36.500000])^20)* SquareWave[ Sin[(t + 7 - 36.500000)^2 SawtoothWave[ 400/(t + 7 - 36.500000) Cos[ Sin[5 - 2 Sqrt[(t + 7 - 36.500000)]]]]] + Cos[40 (t + 7 - 36.500000)]])/(3.76468*10^(-18)), 36.500000 < t < 36.531250}, {(((Log[8] - Log[(t + 7 - 36.531250)])^20)* SquareWave[(t - 36.531250 + 7)^5 SquareWave[((t - 36.531250 + 7)^20 + 5 (t - 36.531250 + 7)) SawtoothWave[ 400/(t - 36.531250 + 7) Cos[ Sin[5 - 7 Sqrt[t - 36.531250 + 7]]]]] + Cos[200 (t - 36.531250 + 7)]])*3.40574*10^17, 36.531250 < t < 36.562500}, {(((Log[8] - Log[t + 7 - 36.562500])^20)* SquareWave[ Sin[(t + 7 - 36.562500)^2 SawtoothWave[ 400/(t + 7 - 36.562500) Cos[ Sin[5 - 2 Sqrt[(t + 7 - 36.562500)]]]]] + Cos[40 (t + 7 - 36.562500)]])/(3.76468*10^(-18)), 36.562500 < t < 36.593750}, {(((Log[8] - Log[(t + 7 - 36.593750)])^20)* SquareWave[(t - 36.593750 + 7)^5 SquareWave[((t - 36.593750 + 7)^20 + 5 (t - 36.593750 + 7)) SawtoothWave[ 400/(t - 36.593750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 36.593750 + 7]]]]] + Cos[200 (t - 36.593750 + 7)]])*3.40574*10^17, 36.593750 < t < 36.625000}, {(((Log[8] - Log[t + 7 - 36.625000])^20)* SquareWave[ Sin[(t + 7 - 36.625000)^2 SawtoothWave[ 400/(t + 7 - 36.625000) Cos[ Sin[5 - 2 Sqrt[(t + 7 - 36.625000)]]]]] + Cos[40 (t + 7 - 36.625000)]])/(3.76468*10^(-18)), 36.625000 < t < 36.656250}, {(((Log[8] - Log[(t + 7 - 36.656250)])^20)* SquareWave[(t - 36.656250 + 7)^5 SquareWave[((t - 36.656250 + 7)^20 + 5 (t - 36.656250 + 7)) SawtoothWave[ 400/(t - 36.656250 + 7) Cos[ Sin[5 - 7 Sqrt[t - 36.656250 + 7]]]]] + Cos[200 (t - 36.656250 + 7)]])*3.40574*10^17, 36.656250 < t < 36.687500}, {(((Log[8] - Log[t + 7 - 36.687500])^20)* SquareWave[ Sin[(t + 7 - 36.687500)^2 SawtoothWave[ 400/(t + 7 - 36.687500) Cos[ Sin[5 - 2 Sqrt[(t + 7 - 36.687500)]]]]] + Cos[40 (t + 7 - 36.687500)]])/(3.76468*10^(-18)), 36.687500 < t < 36.718750}, {(((Log[8] - Log[(t + 7 - 36.718750)])^20)* SquareWave[(t - 36.718750 + 7)^5 SquareWave[((t - 36.718750 + 7)^20 + 5 (t - 36.718750 + 7)) SawtoothWave[ 400/(t - 36.718750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 36.718750 + 7]]]]] + Cos[200 (t - 36.718750 + 7)]])*3.40574*10^17, 36.718750 < t < 36.812500}, {0, 36.812500 < t < 36.843750}, {(((Log[8] - Log[(t + 7 - 36.843750)])^20)* SquareWave[(t - 36.843750 + 7)^5 SquareWave[((t - 36.843750 + 7)^20 + 5 (t - 36.843750 + 7)) SawtoothWave[ 400/(t - 36.843750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 36.843750 + 7]]]]] + Cos[200 (t - 36.843750 + 7)]])*3.40574*10^17, 36.843750 < t < 36.937500}, {0, 36.937500 < t < 36.968750}, {(((Log[8] - Log[(t + 7 - 36.968750)])^20)* SquareWave[(t - 36.968750 + 7)^5 SquareWave[((t - 36.968750 + 7)^20 + 5 (t - 36.968750 + 7)) SawtoothWave[ 400/(t - 36.968750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 36.968750 + 7]]]]] + Cos[200 (t - 36.968750 + 7)]])*3.40574*10^17, 36.968750 < t < 37.062500}, {0, 37.062500 < t < 37.093750}, {(((Log[8] - Log[(t + 7 - 37.093750)])^20)* SquareWave[(t - 37.093750 + 7)^5 SquareWave[((t - 37.093750 + 7)^20 + 5 (t - 37.093750 + 7)) SawtoothWave[ 400/(t - 37.093750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 37.093750 + 7]]]]] + Cos[200 (t - 37.093750 + 7)]])*3.40574*10^17, 37.093750 < t < 37.187500}, {0, 37.187500 < t < 37.218750}, {(((Log[8] - Log[(t + 7 - 37.218750)])^20)* SquareWave[(t - 37.218750 + 7)^5 SquareWave[((t - 37.218750 + 7)^20 + 5 (t - 37.218750 + 7)) SawtoothWave[ 400/(t - 37.218750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 37.218750 + 7]]]]] + Cos[200 (t - 37.218750 + 7)]])*3.40574*10^17, 37.218750 < t < 37.312500}, {0, 37.312500 < t < 37.343750}, {(((Log[8] - Log[(t + 7 - 37.343750)])^20)* SquareWave[(t - 37.343750 + 7)^5 SquareWave[((t - 37.343750 + 7)^20 + 5 (t - 37.343750 + 7)) SawtoothWave[ 400/(t - 37.343750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 37.343750 + 7]]]]] + Cos[200 (t - 37.343750 + 7)]])*3.40574*10^17, 37.343750 < t < 37.437500}, {0, 37.437500 < t < 37.468750}, {(((Log[8] - Log[(t + 7 - 37.468750)])^20)* SquareWave[(t - 37.468750 + 7)^5 SquareWave[((t - 37.468750 + 7)^20 + 5 (t - 37.468750 + 7)) SawtoothWave[ 400/(t - 37.468750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 37.468750 + 7]]]]] + Cos[200 (t - 37.468750 + 7)]])*3.40574*10^17, 37.468750 < t < 37.562500}, {0, 37.562500 < t < 37.593750}, {(((Log[8] - Log[(t + 7 - 37.593750)])^20)* SquareWave[(t - 37.593750 + 7)^5 SquareWave[((t - 37.593750 + 7)^20 + 5 (t - 37.593750 + 7)) SawtoothWave[ 400/(t - 37.593750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 37.593750 + 7]]]]] + Cos[200 (t - 37.593750 + 7)]])*3.40574*10^17, 37.593750 < t < 37.687500}, {0, 37.687500 < t < 37.718750}, {(((Log[8] - Log[(t + 7 - 37.718750)])^20)* SquareWave[(t - 37.718750 + 7)^5 SquareWave[((t - 37.718750 + 7)^20 + 5 (t - 37.718750 + 7)) SawtoothWave[ 400/(t - 37.718750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 37.718750 + 7]]]]] + Cos[200 (t - 37.718750 + 7)]])*3.40574*10^17, 37.718750 < t < 37.812500}, {0, 37.812500 < t < 37.843750}, {(((Log[8] - Log[(t + 7 - 37.843750)])^20)* SquareWave[(t - 37.843750 + 7)^5 SquareWave[((t - 37.843750 + 7)^20 + 5 (t - 37.843750 + 7)) SawtoothWave[ 400/(t - 37.843750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 37.843750 + 7]]]]] + Cos[200 (t - 37.843750 + 7)]])*3.40574*10^17, 37.843750 < t < 37.937500}, {0, 37.937500 < t < 37.968750}, {((1 - Log[(5 - (t - 37.968750))^(5 - (t - 37.968750))])* Sin[440 (5 - (t - 37.968750)) + (5 - (t - 37.968750))^2 SawtoothWave[ 400/(5 - (t - 37.968750)) Cos[ Sin[5 - (t - 37.968750)]]]])/7.01859, 37.968750 < t < 38.468750}, {(((Log[8] - Log[(t + 7 - 38.468750)])^20)* SquareWave[(t - 38.468750 + 7)^5 SquareWave[((t - 38.468750 + 7)^20 + 5 (t - 38.468750 + 7)) SawtoothWave[ 400/(t - 38.468750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 38.468750 + 7]]]]] + Cos[200 (t - 38.468750 + 7)]])*3.40574*10^17, 38.468750 < t < 38.500000}, {(((Log[8] - Log[t + 7 - 38.500000])^20)* SquareWave[ Sin[(t + 7 - 38.500000)^2 SawtoothWave[ 400/(t + 7 - 38.500000) Cos[ Sin[5 - 2 Sqrt[(t + 7 - 38.500000)]]]]] + Cos[40 (t + 7 - 38.500000)]])/(3.76468*10^(-18)), 38.500000 < t < 38.531250}, {(((Log[8] - Log[(t + 7 - 38.531250)])^20)* SquareWave[(t - 38.531250 + 7)^5 SquareWave[((t - 38.531250 + 7)^20 + 5 (t - 38.531250 + 7)) SawtoothWave[ 400/(t - 38.531250 + 7) Cos[ Sin[5 - 7 Sqrt[t - 38.531250 + 7]]]]] + Cos[200 (t - 38.531250 + 7)]])*3.40574*10^17, 38.531250 < t < 38.562500}, {(((Log[8] - Log[t + 7 - 38.562500])^20)* SquareWave[ Sin[(t + 7 - 38.562500)^2 SawtoothWave[ 400/(t + 7 - 38.562500) Cos[ Sin[5 - 2 Sqrt[(t + 7 - 38.562500)]]]]] + Cos[40 (t + 7 - 38.562500)]])/(3.76468*10^(-18)), 38.562500 < t < 38.593750}, {(((Log[8] - Log[(t + 7 - 38.593750)])^20)* SquareWave[(t - 38.593750 + 7)^5 SquareWave[((t - 38.593750 + 7)^20 + 5 (t - 38.593750 + 7)) SawtoothWave[ 400/(t - 38.593750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 38.593750 + 7]]]]] + Cos[200 (t - 38.593750 + 7)]])*3.40574*10^17, 38.593750 < t < 38.625000}, {(((Log[8] - Log[t + 7 - 38.625000])^20)* SquareWave[ Sin[(t + 7 - 38.625000)^2 SawtoothWave[ 400/(t + 7 - 38.625000) Cos[ Sin[5 - 2 Sqrt[(t + 7 - 38.625000)]]]]] + Cos[40 (t + 7 - 38.625000)]])/(3.76468*10^(-18)), 38.625000 < t < 38.656250}, {(((Log[8] - Log[(t + 7 - 38.656250)])^20)* SquareWave[(t - 38.656250 + 7)^5 SquareWave[((t - 38.656250 + 7)^20 + 5 (t - 38.656250 + 7)) SawtoothWave[ 400/(t - 38.656250 + 7) Cos[ Sin[5 - 7 Sqrt[t - 38.656250 + 7]]]]] + Cos[200 (t - 38.656250 + 7)]])*3.40574*10^17, 38.656250 < t < 38.687500}, {(((Log[8] - Log[t + 7 - 38.687500])^20)* SquareWave[ Sin[(t + 7 - 38.687500)^2 SawtoothWave[ 400/(t + 7 - 38.687500) Cos[ Sin[5 - 2 Sqrt[(t + 7 - 38.687500)]]]]] + Cos[40 (t + 7 - 38.687500)]])/(3.76468*10^(-18)), 38.687500 < t < 38.718750}, {(((Log[8] - Log[(t + 7 - 38.718750)])^20)* SquareWave[(t - 38.718750 + 7)^5 SquareWave[((t - 38.718750 + 7)^20 + 5 (t - 38.718750 + 7)) SawtoothWave[ 400/(t - 38.718750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 38.718750 + 7]]]]] + Cos[200 (t - 38.718750 + 7)]])*3.40574*10^17, 38.718750 < t < 38.812500}, {0, 38.812500 < t < 38.843750}, {(((Log[8] - Log[(t + 7 - 38.843750)])^20)* SquareWave[(t - 38.843750 + 7)^5 SquareWave[((t - 38.843750 + 7)^20 + 5 (t - 38.843750 + 7)) SawtoothWave[ 400/(t - 38.843750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 38.843750 + 7]]]]] + Cos[200 (t - 38.843750 + 7)]])*3.40574*10^17, 38.843750 < t < 38.937500}, {0, 38.937500 < t < 38.968750}, {(((Log[8] - Log[(t + 7 - 38.968750)])^20)* SquareWave[(t - 38.968750 + 7)^5 SquareWave[((t - 38.968750 + 7)^20 + 5 (t - 38.968750 + 7)) SawtoothWave[ 400/(t - 38.968750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 38.968750 + 7]]]]] + Cos[200 (t - 38.968750 + 7)]])*3.40574*10^17, 38.968750 < t < 39.062500}, {0, 39.062500 < t < 39.093750}, {(((Log[8] - Log[(t + 7 - 39.093750)])^20)* SquareWave[(t - 39.093750 + 7)^5 SquareWave[((t - 39.093750 + 7)^20 + 5 (t - 39.093750 + 7)) SawtoothWave[ 400/(t - 39.093750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 39.093750 + 7]]]]] + Cos[200 (t - 39.093750 + 7)]])*3.40574*10^17, 39.093750 < t < 39.187500}, {0, 39.187500 < t < 39.218750}, {(((Log[8] - Log[(t + 7 - 39.218750)])^20)* SquareWave[(t - 39.218750 + 7)^5 SquareWave[((t - 39.218750 + 7)^20 + 5 (t - 39.218750 + 7)) SawtoothWave[ 400/(t - 39.218750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 39.218750 + 7]]]]] + Cos[200 (t - 39.218750 + 7)]])*3.40574*10^17, 39.218750 < t < 39.312500}, {0, 39.312500 < t < 39.343750}, {(((Log[8] - Log[(t + 7 - 39.343750)])^20)* SquareWave[(t - 39.343750 + 7)^5 SquareWave[((t - 39.343750 + 7)^20 + 5 (t - 39.343750 + 7)) SawtoothWave[ 400/(t - 39.343750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 39.343750 + 7]]]]] + Cos[200 (t - 39.343750 + 7)]])*3.40574*10^17, 39.343750 < t < 39.437500}, {0, 39.437500 < t < 39.468750}, {(((Log[8] - Log[(t + 7 - 39.468750)])^20)* SquareWave[(t - 39.468750 + 7)^5 SquareWave[((t - 39.468750 + 7)^20 + 5 (t - 39.468750 + 7)) SawtoothWave[ 400/(t - 39.468750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 39.468750 + 7]]]]] + Cos[200 (t - 39.468750 + 7)]])*3.40574*10^17, 39.468750 < t < 39.562500}, {0, 39.562500 < t < 39.593750}, {(((Log[8] - Log[(t + 7 - 39.593750)])^20)* SquareWave[(t - 39.593750 + 7)^5 SquareWave[((t - 39.593750 + 7)^20 + 5 (t - 39.593750 + 7)) SawtoothWave[ 400/(t - 39.593750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 39.593750 + 7]]]]] + Cos[200 (t - 39.593750 + 7)]])*3.40574*10^17, 39.593750 < t < 39.687500}, {0, 39.687500 < t < 39.718750}, {(((Log[8] - Log[(t + 7 - 39.718750)])^20)* SquareWave[(t - 39.718750 + 7)^5 SquareWave[((t - 39.718750 + 7)^20 + 5 (t - 39.718750 + 7)) SawtoothWave[ 400/(t - 39.718750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 39.718750 + 7]]]]] + Cos[200 (t - 39.718750 + 7)]])*3.40574*10^17, 39.718750 < t < 39.812500}, {0, 39.812500 < t < 39.843750}, {(((Log[8] - Log[(t + 7 - 39.843750)])^20)* SquareWave[(t - 39.843750 + 7)^5 SquareWave[((t - 39.843750 + 7)^20 + 5 (t - 39.843750 + 7)) SawtoothWave[ 400/(t - 39.843750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 39.843750 + 7]]]]] + Cos[200 (t - 39.843750 + 7)]])*3.40574*10^17, 39.843750 < t < 39.937500}, {0, 39.937500 < t < 39.968750}, {(((Log[8] - Log[(t + 7 - 39.968750)])^20)* SquareWave[(t - 39.968750 + 7)^5 SquareWave[((t - 39.968750 + 7)^20 + 5 (t - 39.968750 + 7)) SawtoothWave[ 400/(t - 39.968750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 39.968750 + 7]]]]] + Cos[200 (t - 39.968750 + 7)]])*3.40574*10^17, 39.968750 < t < 40.062500}, {0, 40.062500 < t < 40.093750}, {(((Log[8] - Log[(t + 7 - 40.093750)])^20)* SquareWave[(t - 40.093750 + 7)^5 SquareWave[((t - 40.093750 + 7)^20 + 5 (t - 40.093750 + 7)) SawtoothWave[ 400/(t - 40.093750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 40.093750 + 7]]]]] + Cos[200 (t - 40.093750 + 7)]])*3.40574*10^17, 40.093750 < t < 40.187500}, {0, 40.187500 < t < 40.218750}, {(((Log[8] - Log[(t + 7 - 40.218750)])^20)* SquareWave[(t - 40.218750 + 7)^5 SquareWave[((t - 40.218750 + 7)^20 + 5 (t - 40.218750 + 7)) SawtoothWave[ 400/(t - 40.218750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 40.218750 + 7]]]]] + Cos[200 (t - 40.218750 + 7)]])*3.40574*10^17, 40.218750 < t < 40.312500}, {0, 40.312500 < t < 40.343750}, {(((Log[8] - Log[(t + 7 - 40.343750)])^20)* SquareWave[(t - 40.343750 + 7)^5 SquareWave[((t - 40.343750 + 7)^20 + 5 (t - 40.343750 + 7)) SawtoothWave[ 400/(t - 40.343750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 40.343750 + 7]]]]] + Cos[200 (t - 40.343750 + 7)]])*3.40574*10^17, 40.343750 < t < 40.437500}, {0, 40.437500 < t < 40.468750}, {(((Log[8] - Log[(t + 7 - 40.468750)])^20)* SquareWave[(t - 40.468750 + 7)^5 SquareWave[((t - 40.468750 + 7)^20 + 5 (t - 40.468750 + 7)) SawtoothWave[ 400/(t - 40.468750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 40.468750 + 7]]]]] + Cos[200 (t - 40.468750 + 7)]])*3.40574*10^17, 40.468750 < t < 40.562500}, {0, 40.562500 < t < 40.593750}, {(((Log[8] - Log[(t + 7 - 40.593750)])^20)* SquareWave[(t - 40.593750 + 7)^5 SquareWave[((t - 40.593750 + 7)^20 + 5 (t - 40.593750 + 7)) SawtoothWave[ 400/(t - 40.593750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 40.593750 + 7]]]]] + Cos[200 (t - 40.593750 + 7)]])*3.40574*10^17, 40.593750 < t < 40.687500}, {0, 40.687500 < t < 40.718750}, {(((Log[8] - Log[(t + 7 - 40.718750)])^20)* SquareWave[(t - 40.718750 + 7)^5 SquareWave[((t - 40.718750 + 7)^20 + 5 (t - 40.718750 + 7)) SawtoothWave[ 400/(t - 40.718750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 40.718750 + 7]]]]] + Cos[200 (t - 40.718750 + 7)]])*3.40574*10^17, 40.718750 < t < 40.812500}, {0, 40.812500 < t < 40.843750}, {(((Log[8] - Log[(t + 7 - 40.843750)])^20)* SquareWave[(t - 40.843750 + 7)^5 SquareWave[((t - 40.843750 + 7)^20 + 5 (t - 40.843750 + 7)) SawtoothWave[ 400/(t - 40.843750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 40.843750 + 7]]]]] + Cos[200 (t - 40.843750 + 7)]])*3.40574*10^17, 40.843750 < t < 40.937500}, {0, 40.937500 < t < 40.968750}, {(((Log[8] - Log[(t + 7 - 40.968750)])^20)* SquareWave[(t - 40.968750 + 7)^5 SquareWave[((t - 40.968750 + 7)^20 + 5 (t - 40.968750 + 7)) SawtoothWave[ 400/(t - 40.968750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 40.968750 + 7]]]]] + Cos[200 (t - 40.968750 + 7)]])*3.40574*10^17, 40.968750 < t < 41.062500}, {0, 41.062500 < t < 41.093750}, {(((Log[8] - Log[(t + 7 - 41.093750)])^20)* SquareWave[(t - 41.093750 + 7)^5 SquareWave[((t - 41.093750 + 7)^20 + 5 (t - 41.093750 + 7)) SawtoothWave[ 400/(t - 41.093750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 41.093750 + 7]]]]] + Cos[200 (t - 41.093750 + 7)]])*3.40574*10^17, 41.093750 < t < 41.187500}, {0, 41.187500 < t < 41.218750}, {(((Log[8] - Log[(t + 7 - 41.218750)])^20)* SquareWave[(t - 41.218750 + 7)^5 SquareWave[((t - 41.218750 + 7)^20 + 5 (t - 41.218750 + 7)) SawtoothWave[ 400/(t - 41.218750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 41.218750 + 7]]]]] + Cos[200 (t - 41.218750 + 7)]])*3.40574*10^17, 41.218750 < t < 41.312500}, {0, 41.312500 < t < 41.343750}, {(((Log[8] - Log[(t + 7 - 41.343750)])^20)* SquareWave[(t - 41.343750 + 7)^5 SquareWave[((t - 41.343750 + 7)^20 + 5 (t - 41.343750 + 7)) SawtoothWave[ 400/(t - 41.343750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 41.343750 + 7]]]]] + Cos[200 (t - 41.343750 + 7)]])*3.40574*10^17, 41.343750 < t < 41.437500}, {0, 41.437500 < t < 41.468750}, {(((Log[8] - Log[(t + 7 - 41.468750)])^20)* SquareWave[(t - 41.468750 + 7)^5 SquareWave[((t - 41.468750 + 7)^20 + 5 (t - 41.468750 + 7)) SawtoothWave[ 400/(t - 41.468750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 41.468750 + 7]]]]] + Cos[200 (t - 41.468750 + 7)]])*3.40574*10^17, 41.468750 < t < 41.562500}, {0, 41.562500 < t < 41.593750}, {(((Log[8] - Log[(t + 7 - 41.593750)])^20)* SquareWave[(t - 41.593750 + 7)^5 SquareWave[((t - 41.593750 + 7)^20 + 5 (t - 41.593750 + 7)) SawtoothWave[ 400/(t - 41.593750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 41.593750 + 7]]]]] + Cos[200 (t - 41.593750 + 7)]])*3.40574*10^17, 41.593750 < t < 41.687500}, {0, 41.687500 < t < 41.718750}, {(((Log[8] - Log[(t + 7 - 41.718750)])^20)* SquareWave[(t - 41.718750 + 7)^5 SquareWave[((t - 41.718750 + 7)^20 + 5 (t - 41.718750 + 7)) SawtoothWave[ 400/(t - 41.718750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 41.718750 + 7]]]]] + Cos[200 (t - 41.718750 + 7)]])*3.40574*10^17, 41.718750 < t < 41.812500}, {0, 41.812500 < t < 41.843750}, {(((Log[8] - Log[(t + 7 - 41.843750)])^20)* SquareWave[(t - 41.843750 + 7)^5 SquareWave[((t - 41.843750 + 7)^20 + 5 (t - 41.843750 + 7)) SawtoothWave[ 400/(t - 41.843750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 41.843750 + 7]]]]] + Cos[200 (t - 41.843750 + 7)]])*3.40574*10^17, 41.843750 < t < 41.937500}, {0, 41.937500 < t < 41.968750}, {((1 - Log[(5 - (t - 41.968750))^(5 - (t - 41.968750))])* Sin[440 (5 - (t - 41.968750)) + (5 - (t - 41.968750))^2 SawtoothWave[ 400/(5 - (t - 41.968750)) Cos[ Sin[5 - (t - 41.968750)]]]])/7.01859, 41.968750 < t < 42.468750}, {(((Log[8] - Log[(t + 7 - 42.468750)])^20)* SquareWave[(t - 42.468750 + 7)^5 SquareWave[((t - 42.468750 + 7)^20 + 5 (t - 42.468750 + 7)) SawtoothWave[ 400/(t - 42.468750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 42.468750 + 7]]]]] + Cos[200 (t - 42.468750 + 7)]])*3.40574*10^17, 42.468750 < t < 42.500000}, {(((Log[8] - Log[t + 7 - 42.500000])^20)* SquareWave[ Sin[(t + 7 - 42.500000)^2 SawtoothWave[ 400/(t + 7 - 42.500000) Cos[ Sin[5 - 2 Sqrt[(t + 7 - 42.500000)]]]]] + Cos[40 (t + 7 - 42.500000)]])/(3.76468*10^(-18)), 42.500000 < t < 42.531250}, {(((Log[8] - Log[(t + 7 - 42.531250)])^20)* SquareWave[(t - 42.531250 + 7)^5 SquareWave[((t - 42.531250 + 7)^20 + 5 (t - 42.531250 + 7)) SawtoothWave[ 400/(t - 42.531250 + 7) Cos[ Sin[5 - 7 Sqrt[t - 42.531250 + 7]]]]] + Cos[200 (t - 42.531250 + 7)]])*3.40574*10^17, 42.531250 < t < 42.562500}, {(((Log[8] - Log[t + 7 - 42.562500])^20)* SquareWave[ Sin[(t + 7 - 42.562500)^2 SawtoothWave[ 400/(t + 7 - 42.562500) Cos[ Sin[5 - 2 Sqrt[(t + 7 - 42.562500)]]]]] + Cos[40 (t + 7 - 42.562500)]])/(3.76468*10^(-18)), 42.562500 < t < 42.593750}, {(((Log[8] - Log[(t + 7 - 42.593750)])^20)* SquareWave[(t - 42.593750 + 7)^5 SquareWave[((t - 42.593750 + 7)^20 + 5 (t - 42.593750 + 7)) SawtoothWave[ 400/(t - 42.593750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 42.593750 + 7]]]]] + Cos[200 (t - 42.593750 + 7)]])*3.40574*10^17, 42.593750 < t < 42.625000}, {(((Log[8] - Log[t + 7 - 42.625000])^20)* SquareWave[ Sin[(t + 7 - 42.625000)^2 SawtoothWave[ 400/(t + 7 - 42.625000) Cos[ Sin[5 - 2 Sqrt[(t + 7 - 42.625000)]]]]] + Cos[40 (t + 7 - 42.625000)]])/(3.76468*10^(-18)), 42.625000 < t < 42.656250}, {(((Log[8] - Log[(t + 7 - 42.656250)])^20)* SquareWave[(t - 42.656250 + 7)^5 SquareWave[((t - 42.656250 + 7)^20 + 5 (t - 42.656250 + 7)) SawtoothWave[ 400/(t - 42.656250 + 7) Cos[ Sin[5 - 7 Sqrt[t - 42.656250 + 7]]]]] + Cos[200 (t - 42.656250 + 7)]])*3.40574*10^17, 42.656250 < t < 42.687500}, {(((Log[8] - Log[t + 7 - 42.687500])^20)* SquareWave[ Sin[(t + 7 - 42.687500)^2 SawtoothWave[ 400/(t + 7 - 42.687500) Cos[ Sin[5 - 2 Sqrt[(t + 7 - 42.687500)]]]]] + Cos[40 (t + 7 - 42.687500)]])/(3.76468*10^(-18)), 42.687500 < t < 42.718750}, {(((Log[8] - Log[(t + 7 - 42.718750)])^20)* SquareWave[(t - 42.718750 + 7)^5 SquareWave[((t - 42.718750 + 7)^20 + 5 (t - 42.718750 + 7)) SawtoothWave[ 400/(t - 42.718750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 42.718750 + 7]]]]] + Cos[200 (t - 42.718750 + 7)]])*3.40574*10^17, 42.718750 < t < 42.812500}, {0, 42.812500 < t < 42.843750}, {(((Log[8] - Log[(t + 7 - 42.843750)])^20)* SquareWave[(t - 42.843750 + 7)^5 SquareWave[((t - 42.843750 + 7)^20 + 5 (t - 42.843750 + 7)) SawtoothWave[ 400/(t - 42.843750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 42.843750 + 7]]]]] + Cos[200 (t - 42.843750 + 7)]])*3.40574*10^17, 42.843750 < t < 42.937500}, {0, 42.937500 < t < 42.968750}, {(((Log[8] - Log[(t + 7 - 42.968750)])^20)* SquareWave[(t - 42.968750 + 7)^5 SquareWave[((t - 42.968750 + 7)^20 + 5 (t - 42.968750 + 7)) SawtoothWave[ 400/(t - 42.968750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 42.968750 + 7]]]]] + Cos[200 (t - 42.968750 + 7)]])*3.40574*10^17, 42.968750 < t < 43.062500}, {0, 43.062500 < t < 43.093750}, {(((Log[8] - Log[(t + 7 - 43.093750)])^20)* SquareWave[(t - 43.093750 + 7)^5 SquareWave[((t - 43.093750 + 7)^20 + 5 (t - 43.093750 + 7)) SawtoothWave[ 400/(t - 43.093750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 43.093750 + 7]]]]] + Cos[200 (t - 43.093750 + 7)]])*3.40574*10^17, 43.093750 < t < 43.187500}, {0, 43.187500 < t < 43.218750}, {(((Log[8] - Log[(t + 7 - 43.218750)])^20)* SquareWave[(t - 43.218750 + 7)^5 SquareWave[((t - 43.218750 + 7)^20 + 5 (t - 43.218750 + 7)) SawtoothWave[ 400/(t - 43.218750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 43.218750 + 7]]]]] + Cos[200 (t - 43.218750 + 7)]])*3.40574*10^17, 43.218750 < t < 43.312500}, {0, 43.312500 < t < 43.343750}, {(((Log[8] - Log[(t + 7 - 43.343750)])^20)* SquareWave[(t - 43.343750 + 7)^5 SquareWave[((t - 43.343750 + 7)^20 + 5 (t - 43.343750 + 7)) SawtoothWave[ 400/(t - 43.343750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 43.343750 + 7]]]]] + Cos[200 (t - 43.343750 + 7)]])*3.40574*10^17, 43.343750 < t < 43.437500}, {0, 43.437500 < t < 43.468750}, {(((Log[8] - Log[(t + 7 - 43.468750)])^20)* SquareWave[(t - 43.468750 + 7)^5 SquareWave[((t - 43.468750 + 7)^20 + 5 (t - 43.468750 + 7)) SawtoothWave[ 400/(t - 43.468750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 43.468750 + 7]]]]] + Cos[200 (t - 43.468750 + 7)]])*3.40574*10^17, 43.468750 < t < 43.562500}, {0, 43.562500 < t < 43.593750}, {(((Log[8] - Log[(t + 7 - 43.593750)])^20)* SquareWave[(t - 43.593750 + 7)^5 SquareWave[((t - 43.593750 + 7)^20 + 5 (t - 43.593750 + 7)) SawtoothWave[ 400/(t - 43.593750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 43.593750 + 7]]]]] + Cos[200 (t - 43.593750 + 7)]])*3.40574*10^17, 43.593750 < t < 43.687500}, {0, 43.687500 < t < 43.718750}, {(((Log[8] - Log[(t + 7 - 43.718750)])^20)* SquareWave[(t - 43.718750 + 7)^5 SquareWave[((t - 43.718750 + 7)^20 + 5 (t - 43.718750 + 7)) SawtoothWave[ 400/(t - 43.718750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 43.718750 + 7]]]]] + Cos[200 (t - 43.718750 + 7)]])*3.40574*10^17, 43.718750 < t < 43.812500}, {0, 43.812500 < t < 43.843750}, {(((Log[8] - Log[(t + 7 - 43.843750)])^20)* SquareWave[(t - 43.843750 + 7)^5 SquareWave[((t - 43.843750 + 7)^20 + 5 (t - 43.843750 + 7)) SawtoothWave[ 400/(t - 43.843750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 43.843750 + 7]]]]] + Cos[200 (t - 43.843750 + 7)]])*3.40574*10^17, 43.843750 < t < 43.937500}, {0, 43.937500 < t < 43.968750}, {(((Log[8] - Log[(t + 7 - 43.968750)])^20)* SquareWave[(t - 43.968750 + 7)^5 SquareWave[((t - 43.968750 + 7)^20 + 5 (t - 43.968750 + 7)) SawtoothWave[ 400/(t - 43.968750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 43.968750 + 7]]]]] + Cos[200 (t - 43.968750 + 7)]])*3.40574*10^17, 43.968750 < t < 44.437500}, {0, 44.437500 < t < 44.468750}, {(((Log[8] - Log[(t + 7 - 44.468750)])^20)* SquareWave[(t - 44.468750 + 7)^5 SquareWave[((t - 44.468750 + 7)^20 + 5 (t - 44.468750 + 7)) SawtoothWave[ 400/(t - 44.468750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 44.468750 + 7]]]]] + Cos[200 (t - 44.468750 + 7)]])*3.40574*10^17, 44.468750 < t < 44.937500}, {0, 44.937500 < t < 44.968750}, {(((Log[8] - Log[(t + 7 - 44.968750)])^20)* SquareWave[(t - 44.968750 + 7)^5 SquareWave[((t - 44.968750 + 7)^20 + 5 (t - 44.968750 + 7)) SawtoothWave[ 400/(t - 44.968750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 44.968750 + 7]]]]] + Cos[200 (t - 44.968750 + 7)]])*3.40574*10^17, 44.968750 < t < 45.437500}, {0, 45.437500 < t < 45.468750}, {(((Log[8] - Log[(t + 7 - 45.468750)])^20)* SquareWave[(t - 45.468750 + 7)^5 SquareWave[((t - 45.468750 + 7)^20 + 5 (t - 45.468750 + 7)) SawtoothWave[ 400/(t - 45.468750 + 7) Cos[ Sin[5 - 7 Sqrt[t - 45.468750 + 7]]]]] + Cos[200 (t - 45.468750 + 7)]])*3.40574*10^17, 45.468750 < t < 45.968750}, {((1 - Log[(5 - (t - 45.968750))^(5 - (t - 45.968750))])* Sin[440 (5 - (t - 45.968750)) + (5 - (t - 45.968750))^2 SawtoothWave[ 400/(5 - (t - 45.968750)) Cos[ Sin[5 - (t - 45.968750)]]]])/7.01859, 45.968750 < t < 46.468750}, {(((Log[8] - Log[t + 7 - 46.468750])^20)* SquareWave[ Sin[(t + 7 - 46.468750)^2 SawtoothWave[ 400/(t + 7 - 46.468750) Cos[ Sin[5 - 2 Sqrt[(t + 7 - 46.468750)]]]]] + Cos[40 (t + 7 - 46.468750)]])/(3.76468*10^(-18)), 46.468750 < t < 46.718750}, {((1 - Log[(4 - (t - 46.718750))^(4 - (t - 46.718750))])* Sin[440 (4 - (t - 46.718750)) + (4 - (t - 46.718750))^2 SawtoothWave[ 400/(4 - (t - 46.718750)) Cos[ Sin[4 - (t - 46.718750)]]]])/7, 46.718750 < t < 47.968750}, {((1 - Log[(5 - (t - 47.968750))^(5 - (t - 47.968750))])* Sin[440 (5 - (t - 47.968750)) + (5 - (t - 47.968750))^2 SawtoothWave[ 400/(5 - (t - 47.968750)) Cos[ Sin[5 - (t - 47.968750)]]]])/7.01859, 47.968750 < t < 48.468750}, {(((Log[8] - Log[t + 7 - 48.468750])^20)* SquareWave[ Sin[(t + 7 - 48.468750)^2 SawtoothWave[ 400/(t + 7 - 48.468750) Cos[ Sin[5 - 2 Sqrt[(t + 7 - 48.468750)]]]]] + Cos[40 (t + 7 - 48.468750)]])/(3.76468*10^(-18)), 48.468750 < t < 48.718750}, {((1 - Log[(4 - (t - 48.718750))^(4 - (t - 48.718750))])* Sin[440 (4 - (t - 48.718750)) + (4 - (t - 48.718750))^2 SawtoothWave[ 400/(4 - (t - 48.718750)) Cos[ Sin[4 - (t - 48.718750)]]]])/7, 48.718750 < t < 49.718750}, {((1 - Log[(t - 49.718750)^(t - 49.718750)])* Sin[440 (t - 49.718750) SawtoothWave[ 400/(t - 49.718750)]])/1.21065, 49.718750 < t < 49.968750}, {((1 - Log[(5 - (t - 49.968750))^(5 - (t - 49.968750))])* Sin[440 (5 - (t - 49.968750)) + (5 - (t - 49.968750))^2 SawtoothWave[ 400/(5 - (t - 49.968750)) Cos[ Sin[5 - (t - 49.968750)]]]])/7.01859, 49.968750 < t < 50.468750}, {((1 - Log[(t - 50.468750)^(t - 50.468750)])* Sin[440 (t - 50.468750) SawtoothWave[ 400/(t - 50.468750)]])/1.21065, 50.468750 < t < 50.531250}, {(((Log[8] - Log[t + 7 - 50.531250])^20)* SquareWave[ Sin[(t + 7 - 50.531250)^2 SawtoothWave[ 400/(t + 7 - 50.531250) Cos[ Sin[5 - 2 Sqrt[(t + 7 - 50.531250)]]]]] + Cos[40 (t + 7 - 50.531250)]])/(3.76468*10^(-18)), 50.531250 < t < 50.718750}, {((1 - Log[(4 - (t - 50.718750))^(4 - (t - 50.718750))])* Sin[440 (4 - (t - 50.718750)) + (4 - (t - 50.718750))^2 SawtoothWave[ 400/(4 - (t - 50.718750)) Cos[ Sin[4 - (t - 50.718750)]]]])/7, 50.718750 < t < 51.718750}, {((1 - Log[(t - 51.718750)^(t - 51.718750)])* Sin[440 (t - 51.718750) SawtoothWave[ 400/(t - 51.718750)]])/1.21065, 51.718750 < t < 51.968750}, {((1 - Log[(4 - (t - 51.968750))^(4 - (t - 51.968750))])* Sin[440 (4 - (t - 51.968750)) + (4 - (t - 51.968750))^2 SawtoothWave[ 400/(4 - (t - 51.968750)) Cos[ Sin[4 - (t - 51.968750)]]]])/7, 51.968750 < t < 52.468750}, {((1 - Log[(t - 52.468750)^(t - 52.468750)])* Sin[440 (t - 52.468750) SawtoothWave[ 400/(t - 52.468750)]])/1.21065, 52.468750 < t < 52.500000}, {(((Log[8] - Log[t + 7 - 52.500000])^20)* SquareWave[ Sin[(t + 7 - 52.500000)^2 SawtoothWave[ 400/(t + 7 - 52.500000) Cos[ Sin[5 - 2 Sqrt[(t + 7 - 52.500000)]]]]] + Cos[40 (t + 7 - 52.500000)]])/(3.76468*10^(-18)), 52.500000 < t < 52.531250}, {((1 - Log[(t - 52.531250)^(t - 52.531250)])* Sin[440 (t - 52.531250) SawtoothWave[ 400/(t - 52.531250)]])/1.21065, 52.531250 < t < 52.562500}, {(((Log[8] - Log[t + 7 - 52.562500])^20)* SquareWave[ Sin[(t + 7 - 52.562500)^2 SawtoothWave[ 400/(t + 7 - 52.562500) Cos[ Sin[5 - 2 Sqrt[(t + 7 - 52.562500)]]]]] + Cos[40 (t + 7 - 52.562500)]])/(3.76468*10^(-18)), 52.562500 < t < 52.593750}, {((1 - Log[(t - 52.593750)^(t - 52.593750)])* Sin[440 (t - 52.593750) SawtoothWave[ 400/(t - 52.593750)]])/1.21065, 52.593750 < t < 52.625000}, {(((Log[8] - Log[t + 7 - 52.625000])^20)* SquareWave[ Sin[(t + 7 - 52.625000)^2 SawtoothWave[ 400/(t + 7 - 52.625000) Cos[ Sin[5 - 2 Sqrt[(t + 7 - 52.625000)]]]]] + Cos[40 (t + 7 - 52.625000)]])/(3.76468*10^(-18)), 52.625000 < t < 52.656250}, {((1 - Log[(t - 52.656250)^(t - 52.656250)])* Sin[440 (t - 52.656250) SawtoothWave[ 400/(t - 52.656250)]])/1.21065, 52.656250 < t < 52.687500}, {(((Log[8] - Log[t + 7 - 52.687500])^20)* SquareWave[ Sin[(t + 7 - 52.687500)^2 SawtoothWave[ 400/(t + 7 - 52.687500) Cos[ Sin[5 - 2 Sqrt[(t + 7 - 52.687500)]]]]] + Cos[40 (t + 7 - 52.687500)]])/(3.76468*10^(-18)), 52.687500 < t < 52.718750}, {((1 - Log[(4 - (t - 52.718750))^(4 - (t - 52.718750))])* Sin[440 (4 - (t - 52.718750)) + (4 - (t - 52.718750))^2 SawtoothWave[ 400/(4 - (t - 52.718750)) Cos[ Sin[4 - (t - 52.718750)]]]])/7, 52.718750 < t < 53.718750}, {((1 - Log[(t - 53.718750)^(t - 53.718750)])* Sin[440 (t - 53.718750) SawtoothWave[ 400/(t - 53.718750)]])/1.21065, 53.718750 < t < 53.937500}, {0, 53.937500 < t < 53.968750}, {((1 - Log[(t - 53.968750)^(t - 53.968750)])* Sin[440 (t - 53.968750) SawtoothWave[ 400/(t - 53.968750)]])/1.21065, 53.968750 < t < 54.468750}, {(((Log[8] - Log[t + 7 - 54.468750])^20)* SquareWave[ Sin[(t + 7 - 54.468750)^2 SawtoothWave[ 400/(t + 7 - 54.468750) Cos[ Sin[5 - 2 Sqrt[(t + 7 - 54.468750)]]]]] + Cos[40 (t + 7 - 54.468750)]])/(3.76468*10^(-18)), 54.468750 < t < 54.718750}, {((1 - Log[(4 - (t - 54.718750))^(4 - (t - 54.718750))])* Sin[440 (4 - (t - 54.718750)) + (4 - (t - 54.718750))^2 SawtoothWave[ 400/(4 - (t - 54.718750)) Cos[ Sin[4 - (t - 54.718750)]]]])/7, 54.718750 < t < 55.718750}, {((1 - Log[(t - 55.718750)^(t - 55.718750)])* Sin[440 (t - 55.718750) SawtoothWave[ 400/(t - 55.718750)]])/1.21065, 55.718750 < t < 56.468750}, {(((Log[8] - Log[t + 7 - 56.468750])^20)* SquareWave[ Sin[(t + 7 - 56.468750)^2 SawtoothWave[ 400/(t + 7 - 56.468750) Cos[ Sin[5 - 2 Sqrt[(t + 7 - 56.468750)]]]]] + Cos[40 (t + 7 - 56.468750)]])/(3.76468*10^(-18)), 56.468750 < t < 56.718750}, {((1 - Log[(t - 56.718750)^(t - 56.718750)])* Sin[440 (t - 56.718750) SawtoothWave[ 400/(t - 56.718750)]])/1.21065, 56.718750 < t < 57.937500}, {(((Log[8] - Log[t + 7 - 57.937500])^20)* SquareWave[ Sin[(t + 7 - 57.937500)^2 SawtoothWave[ 400/(t + 7 - 57.937500) Cos[ Sin[5 - 2 Sqrt[(t + 7 - 57.937500)]]]]] + Cos[40 (t + 7 - 57.937500)]])/(3.76468*10^(-18)), 57.937500 < t < 57.968750}, {((1 - Log[(t - 57.968750)^(t - 57.968750)])* Sin[440 (t - 57.968750) SawtoothWave[ 400/(t - 57.968750)]])/1.21065, 57.968750 < t < 63.968750}, {(((Log[8] - Log[t + 7 - 63.968750])^20)* SquareWave[ Sin[(t + 7 - 63.968750)^2 SawtoothWave[ 400/(t + 7 - 63.968750) Cos[ Sin[5 - 2 Sqrt[(t + 7 - 63.968750)]]]]] + Cos[40 (t + 7 - 63.968750)]])/(3.76468*10^(-18)), 63.968750 < t < 64.031250}}] + 10 Piecewise[{{0, 0.0000000 < t < 11.968750}, {(TriangleWave[ 0.1 (2.4 + t - 11.968750)]^20) (If[ Sin[31.747999 (2.4 + t - 11.968750)] < Tan[31.747999 (2.4 + t - 11.968750)], If[Sin[698.45599 Pi (2.4 + t - 11.968750)] > Cos[698.45599 Pi (2.4 + t - 11.968750)], Sin[698.45599 Pi (2.4 + t - 11.968750)], TriangleWave[698.45599 (t - 11.968750)]], If[Sin[349.22800 Pi (2.4 + t - 11.968750)] > Cos[349.22800 Pi (2.4 + t - 11.968750)], Sin[349.22800 Pi (2.4 + t - 11.968750)], TriangleWave[349.22800 (2.4 + t - 11.968750)]]]), 11.968750 < t < 12.093750}, {(TriangleWave[ 0.1 (2.4 + t - 12.093750)]^20) (If[ Sin[40.000000 (2.4 + t - 12.093750)] < Tan[40.000000 (2.4 + t - 12.093750)], If[Sin[880.00000 Pi (2.4 + t - 12.093750)] > Cos[880.00000 Pi (2.4 + t - 12.093750)], Sin[880.00000 Pi (2.4 + t - 12.093750)], TriangleWave[880.00000 (t - 12.093750)]], If[Sin[440.00000 Pi (2.4 + t - 12.093750)] > Cos[440.00000 Pi (2.4 + t - 12.093750)], Sin[440.00000 Pi (2.4 + t - 12.093750)], TriangleWave[440.00000 (2.4 + t - 12.093750)]]]), 12.093750 < t < 12.218750}, {(TriangleWave[ 0.1 (2.4 + t - 12.218750)]^20) (If[ Sin[47.581455 (2.4 + t - 12.218750)] < Tan[47.581455 (2.4 + t - 12.218750)], If[Sin[1046.7920 Pi (2.4 + t - 12.218750)] > Cos[1046.7920 Pi (2.4 + t - 12.218750)], Sin[1046.7920 Pi (2.4 + t - 12.218750)], TriangleWave[1046.7920 (t - 12.218750)]], If[Sin[523.39600 Pi (2.4 + t - 12.218750)] > Cos[523.39600 Pi (2.4 + t - 12.218750)], Sin[523.39600 Pi (2.4 + t - 12.218750)], TriangleWave[523.39600 (2.4 + t - 12.218750)]]]), 12.218750 < t < 12.343750}, {(TriangleWave[ 0.1 (2.4 + t - 12.343750)]^20) (If[ Sin[53.393639 (2.4 + t - 12.343750)] < Tan[53.393639 (2.4 + t - 12.343750)], If[Sin[1174.6600 Pi (2.4 + t - 12.343750)] > Cos[1174.6600 Pi (2.4 + t - 12.343750)], Sin[1174.6600 Pi (2.4 + t - 12.343750)], TriangleWave[1174.6600 (t - 12.343750)]], If[Sin[587.33002 Pi (2.4 + t - 12.343750)] > Cos[587.33002 Pi (2.4 + t - 12.343750)], Sin[587.33002 Pi (2.4 + t - 12.343750)], TriangleWave[587.33002 (2.4 + t - 12.343750)]]]), 12.343750 < t < 12.437500}, {(TriangleWave[ 0.1 (2.4 + t - 12.437500)]^20) (If[ Sin[59.932362 (2.4 + t - 12.437500)] < Tan[59.932362 (2.4 + t - 12.437500)], If[Sin[1318.5120 Pi (2.4 + t - 12.437500)] > Cos[1318.5120 Pi (2.4 + t - 12.437500)], Sin[1318.5120 Pi (2.4 + t - 12.437500)], TriangleWave[1318.5120 (t - 12.437500)]], If[Sin[659.25598 Pi (2.4 + t - 12.437500)] > Cos[659.25598 Pi (2.4 + t - 12.437500)], Sin[659.25598 Pi (2.4 + t - 12.437500)], TriangleWave[659.25598 (2.4 + t - 12.437500)]]]), 12.437500 < t < 12.687500}, {0, 12.687500 < t < 12.812500}, {(TriangleWave[ 0.1 (2.4 + t - 12.812500)]^20) (If[ Sin[31.747999 (2.4 + t - 12.812500)] < Tan[31.747999 (2.4 + t - 12.812500)], If[Sin[698.45599 Pi (2.4 + t - 12.812500)] > Cos[698.45599 Pi (2.4 + t - 12.812500)], Sin[698.45599 Pi (2.4 + t - 12.812500)], TriangleWave[698.45599 (t - 12.812500)]], If[Sin[349.22800 Pi (2.4 + t - 12.812500)] > Cos[349.22800 Pi (2.4 + t - 12.812500)], Sin[349.22800 Pi (2.4 + t - 12.812500)], TriangleWave[349.22800 (2.4 + t - 12.812500)]]]), 12.812500 < t < 12.937500}, {0, 12.937500 < t < 13.187500}, {(TriangleWave[ 0.1 (2.4 + t - 13.187500)]^20) (If[ Sin[31.747999 (2.4 + t - 13.187500)] < Tan[31.747999 (2.4 + t - 13.187500)], If[Sin[698.45599 Pi (2.4 + t - 13.187500)] > Cos[698.45599 Pi (2.4 + t - 13.187500)], Sin[698.45599 Pi (2.4 + t - 13.187500)], TriangleWave[698.45599 (t - 13.187500)]], If[Sin[349.22800 Pi (2.4 + t - 13.187500)] > Cos[349.22800 Pi (2.4 + t - 13.187500)], Sin[349.22800 Pi (2.4 + t - 13.187500)], TriangleWave[349.22800 (2.4 + t - 13.187500)]]]), 13.187500 < t < 13.312500}, {0, 13.312500 < t < 13.562500}, {(TriangleWave[ 0.1 (2.4 + t - 13.562500)]^20) (If[ Sin[31.747999 (2.4 + t - 13.562500)] < Tan[31.747999 (2.4 + t - 13.562500)], If[Sin[698.45599 Pi (2.4 + t - 13.562500)] > Cos[698.45599 Pi (2.4 + t - 13.562500)], Sin[698.45599 Pi (2.4 + t - 13.562500)], TriangleWave[698.45599 (t - 13.562500)]], If[Sin[349.22800 Pi (2.4 + t - 13.562500)] > Cos[349.22800 Pi (2.4 + t - 13.562500)], Sin[349.22800 Pi (2.4 + t - 13.562500)], TriangleWave[349.22800 (2.4 + t - 13.562500)]]]), 13.562500 < t < 13.687500}, {0, 13.687500 < t < 13.968750}, {(TriangleWave[ 0.1 (2.4 + t - 13.968750)]^20) (If[ Sin[31.747999 (2.4 + t - 13.968750)] < Tan[31.747999 (2.4 + t - 13.968750)], If[Sin[698.45599 Pi (2.4 + t - 13.968750)] > Cos[698.45599 Pi (2.4 + t - 13.968750)], Sin[698.45599 Pi (2.4 + t - 13.968750)], TriangleWave[698.45599 (t - 13.968750)]], If[Sin[349.22800 Pi (2.4 + t - 13.968750)] > Cos[349.22800 Pi (2.4 + t - 13.968750)], Sin[349.22800 Pi (2.4 + t - 13.968750)], TriangleWave[349.22800 (2.4 + t - 13.968750)]]]), 13.968750 < t < 14.093750}, {(TriangleWave[ 0.1 (2.4 + t - 14.093750)]^20) (If[ Sin[40.000000 (2.4 + t - 14.093750)] < Tan[40.000000 (2.4 + t - 14.093750)], If[Sin[880.00000 Pi (2.4 + t - 14.093750)] > Cos[880.00000 Pi (2.4 + t - 14.093750)], Sin[880.00000 Pi (2.4 + t - 14.093750)], TriangleWave[880.00000 (t - 14.093750)]], If[Sin[440.00000 Pi (2.4 + t - 14.093750)] > Cos[440.00000 Pi (2.4 + t - 14.093750)], Sin[440.00000 Pi (2.4 + t - 14.093750)], TriangleWave[440.00000 (2.4 + t - 14.093750)]]]), 14.093750 < t < 14.218750}, {(TriangleWave[ 0.1 (2.4 + t - 14.218750)]^20) (If[ Sin[47.581455 (2.4 + t - 14.218750)] < Tan[47.581455 (2.4 + t - 14.218750)], If[Sin[1046.7920 Pi (2.4 + t - 14.218750)] > Cos[1046.7920 Pi (2.4 + t - 14.218750)], Sin[1046.7920 Pi (2.4 + t - 14.218750)], TriangleWave[1046.7920 (t - 14.218750)]], If[Sin[523.39600 Pi (2.4 + t - 14.218750)] > Cos[523.39600 Pi (2.4 + t - 14.218750)], Sin[523.39600 Pi (2.4 + t - 14.218750)], TriangleWave[523.39600 (2.4 + t - 14.218750)]]]), 14.218750 < t < 14.343750}, {(TriangleWave[ 0.1 (2.4 + t - 14.343750)]^20) (If[ Sin[53.393639 (2.4 + t - 14.343750)] < Tan[53.393639 (2.4 + t - 14.343750)], If[Sin[1174.6600 Pi (2.4 + t - 14.343750)] > Cos[1174.6600 Pi (2.4 + t - 14.343750)], Sin[1174.6600 Pi (2.4 + t - 14.343750)], TriangleWave[1174.6600 (t - 14.343750)]], If[Sin[587.33002 Pi (2.4 + t - 14.343750)] > Cos[587.33002 Pi (2.4 + t - 14.343750)], Sin[587.33002 Pi (2.4 + t - 14.343750)], TriangleWave[587.33002 (2.4 + t - 14.343750)]]]), 14.343750 < t < 14.437500}, {(TriangleWave[ 0.1 (2.4 + t - 14.437500)]^20) (If[ Sin[59.932362 (2.4 + t - 14.437500)] < Tan[59.932362 (2.4 + t - 14.437500)], If[Sin[1318.5120 Pi (2.4 + t - 14.437500)] > Cos[1318.5120 Pi (2.4 + t - 14.437500)], Sin[1318.5120 Pi (2.4 + t - 14.437500)], TriangleWave[1318.5120 (t - 14.437500)]], If[Sin[659.25598 Pi (2.4 + t - 14.437500)] > Cos[659.25598 Pi (2.4 + t - 14.437500)], Sin[659.25598 Pi (2.4 + t - 14.437500)], TriangleWave[659.25598 (2.4 + t - 14.437500)]]]), 14.437500 < t < 14.687500}, {0, 14.687500 < t < 14.812500}, {(TriangleWave[ 0.1 (2.4 + t - 14.812500)]^20) (If[ Sin[31.747999 (2.4 + t - 14.812500)] < Tan[31.747999 (2.4 + t - 14.812500)], If[Sin[698.45599 Pi (2.4 + t - 14.812500)] > Cos[698.45599 Pi (2.4 + t - 14.812500)], Sin[698.45599 Pi (2.4 + t - 14.812500)], TriangleWave[698.45599 (t - 14.812500)]], If[Sin[349.22800 Pi (2.4 + t - 14.812500)] > Cos[349.22800 Pi (2.4 + t - 14.812500)], Sin[349.22800 Pi (2.4 + t - 14.812500)], TriangleWave[349.22800 (2.4 + t - 14.812500)]]]), 14.812500 < t < 14.937500}, {0, 14.937500 < t < 15.187500}, {(TriangleWave[ 0.1 (2.4 + t - 15.187500)]^20) (If[ Sin[31.747999 (2.4 + t - 15.187500)] < Tan[31.747999 (2.4 + t - 15.187500)], If[Sin[698.45599 Pi (2.4 + t - 15.187500)] > Cos[698.45599 Pi (2.4 + t - 15.187500)], Sin[698.45599 Pi (2.4 + t - 15.187500)], TriangleWave[698.45599 (t - 15.187500)]], If[Sin[349.22800 Pi (2.4 + t - 15.187500)] > Cos[349.22800 Pi (2.4 + t - 15.187500)], Sin[349.22800 Pi (2.4 + t - 15.187500)], TriangleWave[349.22800 (2.4 + t - 15.187500)]]]), 15.187500 < t < 15.312500}, {0, 15.312500 < t < 15.562500}, {(TriangleWave[ 0.1 (2.4 + t - 15.562500)]^20) (If[ Sin[31.747999 (2.4 + t - 15.562500)] < Tan[31.747999 (2.4 + t - 15.562500)], If[Sin[698.45599 Pi (2.4 + t - 15.562500)] > Cos[698.45599 Pi (2.4 + t - 15.562500)], Sin[698.45599 Pi (2.4 + t - 15.562500)], TriangleWave[698.45599 (t - 15.562500)]], If[Sin[349.22800 Pi (2.4 + t - 15.562500)] > Cos[349.22800 Pi (2.4 + t - 15.562500)], Sin[349.22800 Pi (2.4 + t - 15.562500)], TriangleWave[349.22800 (2.4 + t - 15.562500)]]]), 15.562500 < t < 15.687500}, {0, 15.687500 < t < 15.968750}, {(TriangleWave[ 0.1 (2.4 + t - 15.968750)]^20) (If[ Sin[31.747999 (2.4 + t - 15.968750)] < Tan[31.747999 (2.4 + t - 15.968750)], If[Sin[698.45599 Pi (2.4 + t - 15.968750)] > Cos[698.45599 Pi (2.4 + t - 15.968750)], Sin[698.45599 Pi (2.4 + t - 15.968750)], TriangleWave[698.45599 (t - 15.968750)]], If[Sin[349.22800 Pi (2.4 + t - 15.968750)] > Cos[349.22800 Pi (2.4 + t - 15.968750)], Sin[349.22800 Pi (2.4 + t - 15.968750)], TriangleWave[349.22800 (2.4 + t - 15.968750)]]]), 15.968750 < t < 16.093750}, {(TriangleWave[ 0.1 (2.4 + t - 16.093750)]^20) (If[ Sin[40.000000 (2.4 + t - 16.093750)] < Tan[40.000000 (2.4 + t - 16.093750)], If[Sin[880.00000 Pi (2.4 + t - 16.093750)] > Cos[880.00000 Pi (2.4 + t - 16.093750)], Sin[880.00000 Pi (2.4 + t - 16.093750)], TriangleWave[880.00000 (t - 16.093750)]], If[Sin[440.00000 Pi (2.4 + t - 16.093750)] > Cos[440.00000 Pi (2.4 + t - 16.093750)], Sin[440.00000 Pi (2.4 + t - 16.093750)], TriangleWave[440.00000 (2.4 + t - 16.093750)]]]), 16.093750 < t < 16.218750}, {(TriangleWave[ 0.1 (2.4 + t - 16.218750)]^20) (If[ Sin[47.581455 (2.4 + t - 16.218750)] < Tan[47.581455 (2.4 + t - 16.218750)], If[Sin[1046.7920 Pi (2.4 + t - 16.218750)] > Cos[1046.7920 Pi (2.4 + t - 16.218750)], Sin[1046.7920 Pi (2.4 + t - 16.218750)], TriangleWave[1046.7920 (t - 16.218750)]], If[Sin[523.39600 Pi (2.4 + t - 16.218750)] > Cos[523.39600 Pi (2.4 + t - 16.218750)], Sin[523.39600 Pi (2.4 + t - 16.218750)], TriangleWave[523.39600 (2.4 + t - 16.218750)]]]), 16.218750 < t < 16.343750}, {(TriangleWave[ 0.1 (2.4 + t - 16.343750)]^20) (If[ Sin[53.393639 (2.4 + t - 16.343750)] < Tan[53.393639 (2.4 + t - 16.343750)], If[Sin[1174.6600 Pi (2.4 + t - 16.343750)] > Cos[1174.6600 Pi (2.4 + t - 16.343750)], Sin[1174.6600 Pi (2.4 + t - 16.343750)], TriangleWave[1174.6600 (t - 16.343750)]], If[Sin[587.33002 Pi (2.4 + t - 16.343750)] > Cos[587.33002 Pi (2.4 + t - 16.343750)], Sin[587.33002 Pi (2.4 + t - 16.343750)], TriangleWave[587.33002 (2.4 + t - 16.343750)]]]), 16.343750 < t < 16.437500}, {(TriangleWave[ 0.1 (2.4 + t - 16.437500)]^20) (If[ Sin[59.932362 (2.4 + t - 16.437500)] < Tan[59.932362 (2.4 + t - 16.437500)], If[Sin[1318.5120 Pi (2.4 + t - 16.437500)] > Cos[1318.5120 Pi (2.4 + t - 16.437500)], Sin[1318.5120 Pi (2.4 + t - 16.437500)], TriangleWave[1318.5120 (t - 16.437500)]], If[Sin[659.25598 Pi (2.4 + t - 16.437500)] > Cos[659.25598 Pi (2.4 + t - 16.437500)], Sin[659.25598 Pi (2.4 + t - 16.437500)], TriangleWave[659.25598 (2.4 + t - 16.437500)]]]), 16.437500 < t < 16.687500}, {0, 16.687500 < t < 16.812500}, {(TriangleWave[ 0.1 (2.4 + t - 16.812500)]^20) (If[ Sin[31.747999 (2.4 + t - 16.812500)] < Tan[31.747999 (2.4 + t - 16.812500)], If[Sin[698.45599 Pi (2.4 + t - 16.812500)] > Cos[698.45599 Pi (2.4 + t - 16.812500)], Sin[698.45599 Pi (2.4 + t - 16.812500)], TriangleWave[698.45599 (t - 16.812500)]], If[Sin[349.22800 Pi (2.4 + t - 16.812500)] > Cos[349.22800 Pi (2.4 + t - 16.812500)], Sin[349.22800 Pi (2.4 + t - 16.812500)], TriangleWave[349.22800 (2.4 + t - 16.812500)]]]), 16.812500 < t < 16.937500}, {0, 16.937500 < t < 17.187500}, {(TriangleWave[ 0.1 (2.4 + t - 17.187500)]^20) (If[ Sin[31.747999 (2.4 + t - 17.187500)] < Tan[31.747999 (2.4 + t - 17.187500)], If[Sin[698.45599 Pi (2.4 + t - 17.187500)] > Cos[698.45599 Pi (2.4 + t - 17.187500)], Sin[698.45599 Pi (2.4 + t - 17.187500)], TriangleWave[698.45599 (t - 17.187500)]], If[Sin[349.22800 Pi (2.4 + t - 17.187500)] > Cos[349.22800 Pi (2.4 + t - 17.187500)], Sin[349.22800 Pi (2.4 + t - 17.187500)], TriangleWave[349.22800 (2.4 + t - 17.187500)]]]), 17.187500 < t < 17.312500}, {0, 17.312500 < t < 17.562500}, {(TriangleWave[ 0.1 (2.4 + t - 17.562500)]^20) (If[ Sin[31.747999 (2.4 + t - 17.562500)] < Tan[31.747999 (2.4 + t - 17.562500)], If[Sin[698.45599 Pi (2.4 + t - 17.562500)] > Cos[698.45599 Pi (2.4 + t - 17.562500)], Sin[698.45599 Pi (2.4 + t - 17.562500)], TriangleWave[698.45599 (t - 17.562500)]], If[Sin[349.22800 Pi (2.4 + t - 17.562500)] > Cos[349.22800 Pi (2.4 + t - 17.562500)], Sin[349.22800 Pi (2.4 + t - 17.562500)], TriangleWave[349.22800 (2.4 + t - 17.562500)]]]), 17.562500 < t < 17.687500}, {0, 17.687500 < t < 17.968750}, {(TriangleWave[ 0.1 (2.4 + t - 17.968750)]^20) (If[ Sin[31.747999 (2.4 + t - 17.968750)] < Tan[31.747999 (2.4 + t - 17.968750)], If[Sin[698.45599 Pi (2.4 + t - 17.968750)] > Cos[698.45599 Pi (2.4 + t - 17.968750)], Sin[698.45599 Pi (2.4 + t - 17.968750)], TriangleWave[698.45599 (t - 17.968750)]], If[Sin[349.22800 Pi (2.4 + t - 17.968750)] > Cos[349.22800 Pi (2.4 + t - 17.968750)], Sin[349.22800 Pi (2.4 + t - 17.968750)], TriangleWave[349.22800 (2.4 + t - 17.968750)]]]), 17.968750 < t < 18.093750}, {(TriangleWave[ 0.1 (2.4 + t - 18.093750)]^20) (If[ Sin[40.000000 (2.4 + t - 18.093750)] < Tan[40.000000 (2.4 + t - 18.093750)], If[Sin[880.00000 Pi (2.4 + t - 18.093750)] > Cos[880.00000 Pi (2.4 + t - 18.093750)], Sin[880.00000 Pi (2.4 + t - 18.093750)], TriangleWave[880.00000 (t - 18.093750)]], If[Sin[440.00000 Pi (2.4 + t - 18.093750)] > Cos[440.00000 Pi (2.4 + t - 18.093750)], Sin[440.00000 Pi (2.4 + t - 18.093750)], TriangleWave[440.00000 (2.4 + t - 18.093750)]]]), 18.093750 < t < 18.218750}, {(TriangleWave[ 0.1 (2.4 + t - 18.218750)]^20) (If[ Sin[47.581455 (2.4 + t - 18.218750)] < Tan[47.581455 (2.4 + t - 18.218750)], If[Sin[1046.7920 Pi (2.4 + t - 18.218750)] > Cos[1046.7920 Pi (2.4 + t - 18.218750)], Sin[1046.7920 Pi (2.4 + t - 18.218750)], TriangleWave[1046.7920 (t - 18.218750)]], If[Sin[523.39600 Pi (2.4 + t - 18.218750)] > Cos[523.39600 Pi (2.4 + t - 18.218750)], Sin[523.39600 Pi (2.4 + t - 18.218750)], TriangleWave[523.39600 (2.4 + t - 18.218750)]]]), 18.218750 < t < 18.343750}, {(TriangleWave[ 0.1 (2.4 + t - 18.343750)]^20) (If[ Sin[53.393639 (2.4 + t - 18.343750)] < Tan[53.393639 (2.4 + t - 18.343750)], If[Sin[1174.6600 Pi (2.4 + t - 18.343750)] > Cos[1174.6600 Pi (2.4 + t - 18.343750)], Sin[1174.6600 Pi (2.4 + t - 18.343750)], TriangleWave[1174.6600 (t - 18.343750)]], If[Sin[587.33002 Pi (2.4 + t - 18.343750)] > Cos[587.33002 Pi (2.4 + t - 18.343750)], Sin[587.33002 Pi (2.4 + t - 18.343750)], TriangleWave[587.33002 (2.4 + t - 18.343750)]]]), 18.343750 < t < 18.468750}, {(TriangleWave[ 0.1 (2.4 + t - 18.468750)]^20) (If[ Sin[59.932362 (2.4 + t - 18.468750)] < Tan[59.932362 (2.4 + t - 18.468750)], If[Sin[1318.5120 Pi (2.4 + t - 18.468750)] > Cos[1318.5120 Pi (2.4 + t - 18.468750)], Sin[1318.5120 Pi (2.4 + t - 18.468750)], TriangleWave[1318.5120 (t - 18.468750)]], If[Sin[659.25598 Pi (2.4 + t - 18.468750)] > Cos[659.25598 Pi (2.4 + t - 18.468750)], Sin[659.25598 Pi (2.4 + t - 18.468750)], TriangleWave[659.25598 (2.4 + t - 18.468750)]]]), 18.468750 < t < 18.593750}, {(TriangleWave[ 0.1 (2.4 + t - 18.593750)]^20) (If[ Sin[53.393639 (2.4 + t - 18.593750)] < Tan[53.393639 (2.4 + t - 18.593750)], If[Sin[1174.6600 Pi (2.4 + t - 18.593750)] > Cos[1174.6600 Pi (2.4 + t - 18.593750)], Sin[1174.6600 Pi (2.4 + t - 18.593750)], TriangleWave[1174.6600 (t - 18.593750)]], If[Sin[587.33002 Pi (2.4 + t - 18.593750)] > Cos[587.33002 Pi (2.4 + t - 18.593750)], Sin[587.33002 Pi (2.4 + t - 18.593750)], TriangleWave[587.33002 (2.4 + t - 18.593750)]]]), 18.593750 < t < 18.718750}, {(TriangleWave[ 0.1 (2.4 + t - 18.718750)]^20) (If[ Sin[47.581455 (2.4 + t - 18.718750)] < Tan[47.581455 (2.4 + t - 18.718750)], If[Sin[1046.7920 Pi (2.4 + t - 18.718750)] > Cos[1046.7920 Pi (2.4 + t - 18.718750)], Sin[1046.7920 Pi (2.4 + t - 18.718750)], TriangleWave[1046.7920 (t - 18.718750)]], If[Sin[523.39600 Pi (2.4 + t - 18.718750)] > Cos[523.39600 Pi (2.4 + t - 18.718750)], Sin[523.39600 Pi (2.4 + t - 18.718750)], TriangleWave[523.39600 (2.4 + t - 18.718750)]]]), 18.718750 < t < 18.843750}, {(TriangleWave[ 0.1 (2.4 + t - 18.843750)]^20) (If[ Sin[44.898453 (2.4 + t - 18.843750)] < Tan[44.898453 (2.4 + t - 18.843750)], If[Sin[987.76599 Pi (2.4 + t - 18.843750)] > Cos[987.76599 Pi (2.4 + t - 18.843750)], Sin[987.76599 Pi (2.4 + t - 18.843750)], TriangleWave[987.76599 (t - 18.843750)]], If[Sin[493.88300 Pi (2.4 + t - 18.843750)] > Cos[493.88300 Pi (2.4 + t - 18.843750)], Sin[493.88300 Pi (2.4 + t - 18.843750)], TriangleWave[493.88300 (2.4 + t - 18.843750)]]]), 18.843750 < t < 19.593750}, {(TriangleWave[ 0.1 (2.4 + t - 19.593750)]^20) (If[ Sin[40.000000 (2.4 + t - 19.593750)] < Tan[40.000000 (2.4 + t - 19.593750)], If[Sin[880.00000 Pi (2.4 + t - 19.593750)] > Cos[880.00000 Pi (2.4 + t - 19.593750)], Sin[880.00000 Pi (2.4 + t - 19.593750)], TriangleWave[880.00000 (t - 19.593750)]], If[Sin[440.00000 Pi (2.4 + t - 19.593750)] > Cos[440.00000 Pi (2.4 + t - 19.593750)], Sin[440.00000 Pi (2.4 + t - 19.593750)], TriangleWave[440.00000 (2.4 + t - 19.593750)]]]), 19.593750 < t < 19.968750}, {(TriangleWave[ 0.1 (2.4 + t - 19.968750)]^20) (If[ Sin[31.747999 (2.4 + t - 19.968750)] < Tan[31.747999 (2.4 + t - 19.968750)], If[Sin[698.45599 Pi (2.4 + t - 19.968750)] > Cos[698.45599 Pi (2.4 + t - 19.968750)], Sin[698.45599 Pi (2.4 + t - 19.968750)], TriangleWave[698.45599 (t - 19.968750)]], If[Sin[349.22800 Pi (2.4 + t - 19.968750)] > Cos[349.22800 Pi (2.4 + t - 19.968750)], Sin[349.22800 Pi (2.4 + t - 19.968750)], TriangleWave[349.22800 (2.4 + t - 19.968750)]]]), 19.968750 < t < 20.093750}, {(TriangleWave[ 0.1 (2.4 + t - 20.093750)]^20) (If[ Sin[40.000000 (2.4 + t - 20.093750)] < Tan[40.000000 (2.4 + t - 20.093750)], If[Sin[880.00000 Pi (2.4 + t - 20.093750)] > Cos[880.00000 Pi (2.4 + t - 20.093750)], Sin[880.00000 Pi (2.4 + t - 20.093750)], TriangleWave[880.00000 (t - 20.093750)]], If[Sin[440.00000 Pi (2.4 + t - 20.093750)] > Cos[440.00000 Pi (2.4 + t - 20.093750)], Sin[440.00000 Pi (2.4 + t - 20.093750)], TriangleWave[440.00000 (2.4 + t - 20.093750)]]]), 20.093750 < t < 20.218750}, {(TriangleWave[ 0.1 (2.4 + t - 20.218750)]^20) (If[ Sin[47.581455 (2.4 + t - 20.218750)] < Tan[47.581455 (2.4 + t - 20.218750)], If[Sin[1046.7920 Pi (2.4 + t - 20.218750)] > Cos[1046.7920 Pi (2.4 + t - 20.218750)], Sin[1046.7920 Pi (2.4 + t - 20.218750)], TriangleWave[1046.7920 (t - 20.218750)]], If[Sin[523.39600 Pi (2.4 + t - 20.218750)] > Cos[523.39600 Pi (2.4 + t - 20.218750)], Sin[523.39600 Pi (2.4 + t - 20.218750)], TriangleWave[523.39600 (2.4 + t - 20.218750)]]]), 20.218750 < t < 20.343750}, {(TriangleWave[ 0.1 (2.4 + t - 20.343750)]^20) (If[ Sin[53.393639 (2.4 + t - 20.343750)] < Tan[53.393639 (2.4 + t - 20.343750)], If[Sin[1174.6600 Pi (2.4 + t - 20.343750)] > Cos[1174.6600 Pi (2.4 + t - 20.343750)], Sin[1174.6600 Pi (2.4 + t - 20.343750)], TriangleWave[1174.6600 (t - 20.343750)]], If[Sin[587.33002 Pi (2.4 + t - 20.343750)] > Cos[587.33002 Pi (2.4 + t - 20.343750)], Sin[587.33002 Pi (2.4 + t - 20.343750)], TriangleWave[587.33002 (2.4 + t - 20.343750)]]]), 20.343750 < t < 20.468750}, {(TriangleWave[ 0.1 (2.4 + t - 20.468750)]^20) (If[ Sin[59.932362 (2.4 + t - 20.468750)] < Tan[59.932362 (2.4 + t - 20.468750)], If[Sin[1318.5120 Pi (2.4 + t - 20.468750)] > Cos[1318.5120 Pi (2.4 + t - 20.468750)], Sin[1318.5120 Pi (2.4 + t - 20.468750)], TriangleWave[1318.5120 (t - 20.468750)]], If[Sin[659.25598 Pi (2.4 + t - 20.468750)] > Cos[659.25598 Pi (2.4 + t - 20.468750)], Sin[659.25598 Pi (2.4 + t - 20.468750)], TriangleWave[659.25598 (2.4 + t - 20.468750)]]]), 20.468750 < t < 20.593750}, {(TriangleWave[ 0.1 (2.4 + t - 20.593750)]^20) (If[ Sin[53.393639 (2.4 + t - 20.593750)] < Tan[53.393639 (2.4 + t - 20.593750)], If[Sin[1174.6600 Pi (2.4 + t - 20.593750)] > Cos[1174.6600 Pi (2.4 + t - 20.593750)], Sin[1174.6600 Pi (2.4 + t - 20.593750)], TriangleWave[1174.6600 (t - 20.593750)]], If[Sin[587.33002 Pi (2.4 + t - 20.593750)] > Cos[587.33002 Pi (2.4 + t - 20.593750)], Sin[587.33002 Pi (2.4 + t - 20.593750)], TriangleWave[587.33002 (2.4 + t - 20.593750)]]]), 20.593750 < t < 20.718750}, {(TriangleWave[ 0.1 (2.4 + t - 20.718750)]^20) (If[ Sin[47.581455 (2.4 + t - 20.718750)] < Tan[47.581455 (2.4 + t - 20.718750)], If[Sin[1046.7920 Pi (2.4 + t - 20.718750)] > Cos[1046.7920 Pi (2.4 + t - 20.718750)], Sin[1046.7920 Pi (2.4 + t - 20.718750)], TriangleWave[1046.7920 (t - 20.718750)]], If[Sin[523.39600 Pi (2.4 + t - 20.718750)] > Cos[523.39600 Pi (2.4 + t - 20.718750)], Sin[523.39600 Pi (2.4 + t - 20.718750)], TriangleWave[523.39600 (2.4 + t - 20.718750)]]]), 20.718750 < t < 20.843750}, {(TriangleWave[ 0.1 (2.4 + t - 20.843750)]^20) (If[ Sin[44.898453 (2.4 + t - 20.843750)] < Tan[44.898453 (2.4 + t - 20.843750)], If[Sin[987.76599 Pi (2.4 + t - 20.843750)] > Cos[987.76599 Pi (2.4 + t - 20.843750)], Sin[987.76599 Pi (2.4 + t - 20.843750)], TriangleWave[987.76599 (t - 20.843750)]], If[Sin[493.88300 Pi (2.4 + t - 20.843750)] > Cos[493.88300 Pi (2.4 + t - 20.843750)], Sin[493.88300 Pi (2.4 + t - 20.843750)], TriangleWave[493.88300 (2.4 + t - 20.843750)]]]), 20.843750 < t < 21.593750}, {(TriangleWave[ 0.1 (2.4 + t - 21.593750)]^20) (If[ Sin[40.000000 (2.4 + t - 21.593750)] < Tan[40.000000 (2.4 + t - 21.593750)], If[Sin[880.00000 Pi (2.4 + t - 21.593750)] > Cos[880.00000 Pi (2.4 + t - 21.593750)], Sin[880.00000 Pi (2.4 + t - 21.593750)], TriangleWave[880.00000 (t - 21.593750)]], If[Sin[440.00000 Pi (2.4 + t - 21.593750)] > Cos[440.00000 Pi (2.4 + t - 21.593750)], Sin[440.00000 Pi (2.4 + t - 21.593750)], TriangleWave[440.00000 (2.4 + t - 21.593750)]]]), 21.593750 < t < 21.968750}, {(TriangleWave[ 0.1 (2.4 + t - 21.968750)]^20) (If[ Sin[53.393639 (2.4 + t - 21.968750)] < Tan[53.393639 (2.4 + t - 21.968750)], If[Sin[1174.6600 Pi (2.4 + t - 21.968750)] > Cos[1174.6600 Pi (2.4 + t - 21.968750)], Sin[1174.6600 Pi (2.4 + t - 21.968750)], TriangleWave[1174.6600 (t - 21.968750)]], If[Sin[587.33002 Pi (2.4 + t - 21.968750)] > Cos[587.33002 Pi (2.4 + t - 21.968750)], Sin[587.33002 Pi (2.4 + t - 21.968750)], TriangleWave[587.33002 (2.4 + t - 21.968750)]]]), 21.968750 < t < 22.093750}, {(TriangleWave[ 0.1 (2.4 + t - 22.093750)]^20) (If[ Sin[59.932362 (2.4 + t - 22.093750)] < Tan[59.932362 (2.4 + t - 22.093750)], If[Sin[1318.5120 Pi (2.4 + t - 22.093750)] > Cos[1318.5120 Pi (2.4 + t - 22.093750)], Sin[1318.5120 Pi (2.4 + t - 22.093750)], TriangleWave[1318.5120 (t - 22.093750)]], If[Sin[659.25598 Pi (2.4 + t - 22.093750)] > Cos[659.25598 Pi (2.4 + t - 22.093750)], Sin[659.25598 Pi (2.4 + t - 22.093750)], TriangleWave[659.25598 (2.4 + t - 22.093750)]]]), 22.093750 < t < 22.218750}, {(TriangleWave[ 0.1 (2.4 + t - 22.218750)]^20) (If[ Sin[53.393639 (2.4 + t - 22.218750)] < Tan[53.393639 (2.4 + t - 22.218750)], If[Sin[1174.6600 Pi (2.4 + t - 22.218750)] > Cos[1174.6600 Pi (2.4 + t - 22.218750)], Sin[1174.6600 Pi (2.4 + t - 22.218750)], TriangleWave[1174.6600 (t - 22.218750)]], If[Sin[587.33002 Pi (2.4 + t - 22.218750)] > Cos[587.33002 Pi (2.4 + t - 22.218750)], Sin[587.33002 Pi (2.4 + t - 22.218750)], TriangleWave[587.33002 (2.4 + t - 22.218750)]]]), 22.218750 < t < 22.343750}, {(TriangleWave[ 0.1 (2.4 + t - 22.343750)]^20) (If[ Sin[47.581455 (2.4 + t - 22.343750)] < Tan[47.581455 (2.4 + t - 22.343750)], If[Sin[1046.7920 Pi (2.4 + t - 22.343750)] > Cos[1046.7920 Pi (2.4 + t - 22.343750)], Sin[1046.7920 Pi (2.4 + t - 22.343750)], TriangleWave[1046.7920 (t - 22.343750)]], If[Sin[523.39600 Pi (2.4 + t - 22.343750)] > Cos[523.39600 Pi (2.4 + t - 22.343750)], Sin[523.39600 Pi (2.4 + t - 22.343750)], TriangleWave[523.39600 (2.4 + t - 22.343750)]]]), 22.343750 < t < 22.468750}, {(TriangleWave[ 0.1 (2.4 + t - 22.468750)]^20) (If[ Sin[44.898453 (2.4 + t - 22.468750)] < Tan[44.898453 (2.4 + t - 22.468750)], If[Sin[987.76599 Pi (2.4 + t - 22.468750)] > Cos[987.76599 Pi (2.4 + t - 22.468750)], Sin[987.76599 Pi (2.4 + t - 22.468750)], TriangleWave[987.76599 (t - 22.468750)]], If[Sin[493.88300 Pi (2.4 + t - 22.468750)] > Cos[493.88300 Pi (2.4 + t - 22.468750)], Sin[493.88300 Pi (2.4 + t - 22.468750)], TriangleWave[493.88300 (2.4 + t - 22.468750)]]]), 22.468750 < t < 22.593750}, {0, 22.593750 < t < 22.718750}, {(TriangleWave[ 0.1 (2.4 + t - 22.718750)]^20) (If[ Sin[53.393639 (2.4 + t - 22.718750)] < Tan[53.393639 (2.4 + t - 22.718750)], If[Sin[1174.6600 Pi (2.4 + t - 22.718750)] > Cos[1174.6600 Pi (2.4 + t - 22.718750)], Sin[1174.6600 Pi (2.4 + t - 22.718750)], TriangleWave[1174.6600 (t - 22.718750)]], If[Sin[587.33002 Pi (2.4 + t - 22.718750)] > Cos[587.33002 Pi (2.4 + t - 22.718750)], Sin[587.33002 Pi (2.4 + t - 22.718750)], TriangleWave[587.33002 (2.4 + t - 22.718750)]]]), 22.718750 < t < 22.968750}, {0, 22.968750 < t < 23.093750}, {(TriangleWave[ 0.1 (2.4 + t - 23.093750)]^20) (If[ Sin[53.393639 (2.4 + t - 23.093750)] < Tan[53.393639 (2.4 + t - 23.093750)], If[Sin[1174.6600 Pi (2.4 + t - 23.093750)] > Cos[1174.6600 Pi (2.4 + t - 23.093750)], Sin[1174.6600 Pi (2.4 + t - 23.093750)], TriangleWave[1174.6600 (t - 23.093750)]], If[Sin[587.33002 Pi (2.4 + t - 23.093750)] > Cos[587.33002 Pi (2.4 + t - 23.093750)], Sin[587.33002 Pi (2.4 + t - 23.093750)], TriangleWave[587.33002 (2.4 + t - 23.093750)]]]), 23.093750 < t < 23.218750}, {(TriangleWave[ 0.1 (2.4 + t - 23.218750)]^20) (If[ Sin[59.932362 (2.4 + t - 23.218750)] < Tan[59.932362 (2.4 + t - 23.218750)], If[Sin[1318.5120 Pi (2.4 + t - 23.218750)] > Cos[1318.5120 Pi (2.4 + t - 23.218750)], Sin[1318.5120 Pi (2.4 + t - 23.218750)], TriangleWave[1318.5120 (t - 23.218750)]], If[Sin[659.25598 Pi (2.4 + t - 23.218750)] > Cos[659.25598 Pi (2.4 + t - 23.218750)], Sin[659.25598 Pi (2.4 + t - 23.218750)], TriangleWave[659.25598 (2.4 + t - 23.218750)]]]), 23.218750 < t < 23.343750}, {(TriangleWave[ 0.1 (2.4 + t - 23.343750)]^20) (If[ Sin[53.393639 (2.4 + t - 23.343750)] < Tan[53.393639 (2.4 + t - 23.343750)], If[Sin[1174.6600 Pi (2.4 + t - 23.343750)] > Cos[1174.6600 Pi (2.4 + t - 23.343750)], Sin[1174.6600 Pi (2.4 + t - 23.343750)], TriangleWave[1174.6600 (t - 23.343750)]], If[Sin[587.33002 Pi (2.4 + t - 23.343750)] > Cos[587.33002 Pi (2.4 + t - 23.343750)], Sin[587.33002 Pi (2.4 + t - 23.343750)], TriangleWave[587.33002 (2.4 + t - 23.343750)]]]), 23.343750 < t < 23.468750}, {(TriangleWave[ 0.1 (2.4 + t - 23.468750)]^20) (If[ Sin[47.581455 (2.4 + t - 23.468750)] < Tan[47.581455 (2.4 + t - 23.468750)], If[Sin[1046.7920 Pi (2.4 + t - 23.468750)] > Cos[1046.7920 Pi (2.4 + t - 23.468750)], Sin[1046.7920 Pi (2.4 + t - 23.468750)], TriangleWave[1046.7920 (t - 23.468750)]], If[Sin[523.39600 Pi (2.4 + t - 23.468750)] > Cos[523.39600 Pi (2.4 + t - 23.468750)], Sin[523.39600 Pi (2.4 + t - 23.468750)], TriangleWave[523.39600 (2.4 + t - 23.468750)]]]), 23.468750 < t < 23.593750}, {(TriangleWave[ 0.1 (2.4 + t - 23.593750)]^20) (If[ Sin[44.898453 (2.4 + t - 23.593750)] < Tan[44.898453 (2.4 + t - 23.593750)], If[Sin[987.76599 Pi (2.4 + t - 23.593750)] > Cos[987.76599 Pi (2.4 + t - 23.593750)], Sin[987.76599 Pi (2.4 + t - 23.593750)], TriangleWave[987.76599 (t - 23.593750)]], If[Sin[493.88300 Pi (2.4 + t - 23.593750)] > Cos[493.88300 Pi (2.4 + t - 23.593750)], Sin[493.88300 Pi (2.4 + t - 23.593750)], TriangleWave[493.88300 (2.4 + t - 23.593750)]]]), 23.593750 < t < 23.843750}, {0, 23.843750 < t < 23.968750}, {(TriangleWave[ 0.1 (2.4 + t - 23.968750)]^20) (If[ Sin[53.393639 (2.4 + t - 23.968750)] < Tan[53.393639 (2.4 + t - 23.968750)], If[Sin[1174.6600 Pi (2.4 + t - 23.968750)] > Cos[1174.6600 Pi (2.4 + t - 23.968750)], Sin[1174.6600 Pi (2.4 + t - 23.968750)], TriangleWave[1174.6600 (t - 23.968750)]], If[Sin[587.33002 Pi (2.4 + t - 23.968750)] > Cos[587.33002 Pi (2.4 + t - 23.968750)], Sin[587.33002 Pi (2.4 + t - 23.968750)], TriangleWave[587.33002 (2.4 + t - 23.968750)]]]), 23.968750 < t < 24.093750}, {(TriangleWave[ 0.1 (2.4 + t - 24.093750)]^20) (If[ Sin[59.932362 (2.4 + t - 24.093750)] < Tan[59.932362 (2.4 + t - 24.093750)], If[Sin[1318.5120 Pi (2.4 + t - 24.093750)] > Cos[1318.5120 Pi (2.4 + t - 24.093750)], Sin[1318.5120 Pi (2.4 + t - 24.093750)], TriangleWave[1318.5120 (t - 24.093750)]], If[Sin[659.25598 Pi (2.4 + t - 24.093750)] > Cos[659.25598 Pi (2.4 + t - 24.093750)], Sin[659.25598 Pi (2.4 + t - 24.093750)], TriangleWave[659.25598 (2.4 + t - 24.093750)]]]), 24.093750 < t < 24.218750}, {(TriangleWave[ 0.1 (2.4 + t - 24.218750)]^20) (If[ Sin[53.393639 (2.4 + t - 24.218750)] < Tan[53.393639 (2.4 + t - 24.218750)], If[Sin[1174.6600 Pi (2.4 + t - 24.218750)] > Cos[1174.6600 Pi (2.4 + t - 24.218750)], Sin[1174.6600 Pi (2.4 + t - 24.218750)], TriangleWave[1174.6600 (t - 24.218750)]], If[Sin[587.33002 Pi (2.4 + t - 24.218750)] > Cos[587.33002 Pi (2.4 + t - 24.218750)], Sin[587.33002 Pi (2.4 + t - 24.218750)], TriangleWave[587.33002 (2.4 + t - 24.218750)]]]), 24.218750 < t < 24.343750}, {(TriangleWave[ 0.1 (2.4 + t - 24.343750)]^20) (If[ Sin[47.581455 (2.4 + t - 24.343750)] < Tan[47.581455 (2.4 + t - 24.343750)], If[Sin[1046.7920 Pi (2.4 + t - 24.343750)] > Cos[1046.7920 Pi (2.4 + t - 24.343750)], Sin[1046.7920 Pi (2.4 + t - 24.343750)], TriangleWave[1046.7920 (t - 24.343750)]], If[Sin[523.39600 Pi (2.4 + t - 24.343750)] > Cos[523.39600 Pi (2.4 + t - 24.343750)], Sin[523.39600 Pi (2.4 + t - 24.343750)], TriangleWave[523.39600 (2.4 + t - 24.343750)]]]), 24.343750 < t < 24.468750}, {(TriangleWave[ 0.1 (2.4 + t - 24.468750)]^20) (If[ Sin[44.898453 (2.4 + t - 24.468750)] < Tan[44.898453 (2.4 + t - 24.468750)], If[Sin[987.76599 Pi (2.4 + t - 24.468750)] > Cos[987.76599 Pi (2.4 + t - 24.468750)], Sin[987.76599 Pi (2.4 + t - 24.468750)], TriangleWave[987.76599 (t - 24.468750)]], If[Sin[493.88300 Pi (2.4 + t - 24.468750)] > Cos[493.88300 Pi (2.4 + t - 24.468750)], Sin[493.88300 Pi (2.4 + t - 24.468750)], TriangleWave[493.88300 (2.4 + t - 24.468750)]]]), 24.468750 < t < 24.593750}, {0, 24.593750 < t < 24.718750}, {(TriangleWave[ 0.1 (2.4 + t - 24.718750)]^20) (If[ Sin[53.393639 (2.4 + t - 24.718750)] < Tan[53.393639 (2.4 + t - 24.718750)], If[Sin[1174.6600 Pi (2.4 + t - 24.718750)] > Cos[1174.6600 Pi (2.4 + t - 24.718750)], Sin[1174.6600 Pi (2.4 + t - 24.718750)], TriangleWave[1174.6600 (t - 24.718750)]], If[Sin[587.33002 Pi (2.4 + t - 24.718750)] > Cos[587.33002 Pi (2.4 + t - 24.718750)], Sin[587.33002 Pi (2.4 + t - 24.718750)], TriangleWave[587.33002 (2.4 + t - 24.718750)]]]), 24.718750 < t < 24.968750}, {0, 24.968750 < t < 25.093750}, {(TriangleWave[ 0.1 (2.4 + t - 25.093750)]^20) (If[ Sin[53.393639 (2.4 + t - 25.093750)] < Tan[53.393639 (2.4 + t - 25.093750)], If[Sin[1174.6600 Pi (2.4 + t - 25.093750)] > Cos[1174.6600 Pi (2.4 + t - 25.093750)], Sin[1174.6600 Pi (2.4 + t - 25.093750)], TriangleWave[1174.6600 (t - 25.093750)]], If[Sin[587.33002 Pi (2.4 + t - 25.093750)] > Cos[587.33002 Pi (2.4 + t - 25.093750)], Sin[587.33002 Pi (2.4 + t - 25.093750)], TriangleWave[587.33002 (2.4 + t - 25.093750)]]]), 25.093750 < t < 25.218750}, {(TriangleWave[ 0.1 (2.4 + t - 25.218750)]^20) (If[ Sin[59.932362 (2.4 + t - 25.218750)] < Tan[59.932362 (2.4 + t - 25.218750)], If[Sin[1318.5120 Pi (2.4 + t - 25.218750)] > Cos[1318.5120 Pi (2.4 + t - 25.218750)], Sin[1318.5120 Pi (2.4 + t - 25.218750)], TriangleWave[1318.5120 (t - 25.218750)]], If[Sin[659.25598 Pi (2.4 + t - 25.218750)] > Cos[659.25598 Pi (2.4 + t - 25.218750)], Sin[659.25598 Pi (2.4 + t - 25.218750)], TriangleWave[659.25598 (2.4 + t - 25.218750)]]]), 25.218750 < t < 25.343750}, {(TriangleWave[ 0.1 (2.4 + t - 25.343750)]^20) (If[ Sin[53.393639 (2.4 + t - 25.343750)] < Tan[53.393639 (2.4 + t - 25.343750)], If[Sin[1174.6600 Pi (2.4 + t - 25.343750)] > Cos[1174.6600 Pi (2.4 + t - 25.343750)], Sin[1174.6600 Pi (2.4 + t - 25.343750)], TriangleWave[1174.6600 (t - 25.343750)]], If[Sin[587.33002 Pi (2.4 + t - 25.343750)] > Cos[587.33002 Pi (2.4 + t - 25.343750)], Sin[587.33002 Pi (2.4 + t - 25.343750)], TriangleWave[587.33002 (2.4 + t - 25.343750)]]]), 25.343750 < t < 25.468750}, {(TriangleWave[ 0.1 (2.4 + t - 25.468750)]^20) (If[ Sin[47.581455 (2.4 + t - 25.468750)] < Tan[47.581455 (2.4 + t - 25.468750)], If[Sin[1046.7920 Pi (2.4 + t - 25.468750)] > Cos[1046.7920 Pi (2.4 + t - 25.468750)], Sin[1046.7920 Pi (2.4 + t - 25.468750)], TriangleWave[1046.7920 (t - 25.468750)]], If[Sin[523.39600 Pi (2.4 + t - 25.468750)] > Cos[523.39600 Pi (2.4 + t - 25.468750)], Sin[523.39600 Pi (2.4 + t - 25.468750)], TriangleWave[523.39600 (2.4 + t - 25.468750)]]]), 25.468750 < t < 25.593750}, {(TriangleWave[ 0.1 (2.4 + t - 25.593750)]^20) (If[ Sin[44.898453 (2.4 + t - 25.593750)] < Tan[44.898453 (2.4 + t - 25.593750)], If[Sin[987.76599 Pi (2.4 + t - 25.593750)] > Cos[987.76599 Pi (2.4 + t - 25.593750)], Sin[987.76599 Pi (2.4 + t - 25.593750)], TriangleWave[987.76599 (t - 25.593750)]], If[Sin[493.88300 Pi (2.4 + t - 25.593750)] > Cos[493.88300 Pi (2.4 + t - 25.593750)], Sin[493.88300 Pi (2.4 + t - 25.593750)], TriangleWave[493.88300 (2.4 + t - 25.593750)]]]), 25.593750 < t < 25.843750}, {0, 25.843750 < t < 25.968750}, {(TriangleWave[ 0.1 (2.4 + t - 25.968750)]^20) (If[ Sin[53.393639 (2.4 + t - 25.968750)] < Tan[53.393639 (2.4 + t - 25.968750)], If[Sin[1174.6600 Pi (2.4 + t - 25.968750)] > Cos[1174.6600 Pi (2.4 + t - 25.968750)], Sin[1174.6600 Pi (2.4 + t - 25.968750)], TriangleWave[1174.6600 (t - 25.968750)]], If[Sin[587.33002 Pi (2.4 + t - 25.968750)] > Cos[587.33002 Pi (2.4 + t - 25.968750)], Sin[587.33002 Pi (2.4 + t - 25.968750)], TriangleWave[587.33002 (2.4 + t - 25.968750)]]]), 25.968750 < t < 26.093750}, {(TriangleWave[ 0.1 (2.4 + t - 26.093750)]^20) (If[ Sin[59.932362 (2.4 + t - 26.093750)] < Tan[59.932362 (2.4 + t - 26.093750)], If[Sin[1318.5120 Pi (2.4 + t - 26.093750)] > Cos[1318.5120 Pi (2.4 + t - 26.093750)], Sin[1318.5120 Pi (2.4 + t - 26.093750)], TriangleWave[1318.5120 (t - 26.093750)]], If[Sin[659.25598 Pi (2.4 + t - 26.093750)] > Cos[659.25598 Pi (2.4 + t - 26.093750)], Sin[659.25598 Pi (2.4 + t - 26.093750)], TriangleWave[659.25598 (2.4 + t - 26.093750)]]]), 26.093750 < t < 26.218750}, {(TriangleWave[ 0.1 (2.4 + t - 26.218750)]^20) (If[ Sin[53.393639 (2.4 + t - 26.218750)] < Tan[53.393639 (2.4 + t - 26.218750)], If[Sin[1174.6600 Pi (2.4 + t - 26.218750)] > Cos[1174.6600 Pi (2.4 + t - 26.218750)], Sin[1174.6600 Pi (2.4 + t - 26.218750)], TriangleWave[1174.6600 (t - 26.218750)]], If[Sin[587.33002 Pi (2.4 + t - 26.218750)] > Cos[587.33002 Pi (2.4 + t - 26.218750)], Sin[587.33002 Pi (2.4 + t - 26.218750)], TriangleWave[587.33002 (2.4 + t - 26.218750)]]]), 26.218750 < t < 26.343750}, {(TriangleWave[ 0.1 (2.4 + t - 26.343750)]^20) (If[ Sin[47.581455 (2.4 + t - 26.343750)] < Tan[47.581455 (2.4 + t - 26.343750)], If[Sin[1046.7920 Pi (2.4 + t - 26.343750)] > Cos[1046.7920 Pi (2.4 + t - 26.343750)], Sin[1046.7920 Pi (2.4 + t - 26.343750)], TriangleWave[1046.7920 (t - 26.343750)]], If[Sin[523.39600 Pi (2.4 + t - 26.343750)] > Cos[523.39600 Pi (2.4 + t - 26.343750)], Sin[523.39600 Pi (2.4 + t - 26.343750)], TriangleWave[523.39600 (2.4 + t - 26.343750)]]]), 26.343750 < t < 26.468750}, {(TriangleWave[ 0.1 (2.4 + t - 26.468750)]^20) (If[ Sin[44.898453 (2.4 + t - 26.468750)] < Tan[44.898453 (2.4 + t - 26.468750)], If[Sin[987.76599 Pi (2.4 + t - 26.468750)] > Cos[987.76599 Pi (2.4 + t - 26.468750)], Sin[987.76599 Pi (2.4 + t - 26.468750)], TriangleWave[987.76599 (t - 26.468750)]], If[Sin[493.88300 Pi (2.4 + t - 26.468750)] > Cos[493.88300 Pi (2.4 + t - 26.468750)], Sin[493.88300 Pi (2.4 + t - 26.468750)], TriangleWave[493.88300 (2.4 + t - 26.468750)]]]), 26.468750 < t < 26.718750}, {(TriangleWave[ 0.1 (2.4 + t - 26.718750)]^20) (If[ Sin[47.581455 (2.4 + t - 26.718750)] < Tan[47.581455 (2.4 + t - 26.718750)], If[Sin[1046.7920 Pi (2.4 + t - 26.718750)] > Cos[1046.7920 Pi (2.4 + t - 26.718750)], Sin[1046.7920 Pi (2.4 + t - 26.718750)], TriangleWave[1046.7920 (t - 26.718750)]], If[Sin[523.39600 Pi (2.4 + t - 26.718750)] > Cos[523.39600 Pi (2.4 + t - 26.718750)], Sin[523.39600 Pi (2.4 + t - 26.718750)], TriangleWave[523.39600 (2.4 + t - 26.718750)]]]), 26.718750 < t < 26.843750}, {(TriangleWave[ 0.1 (2.4 + t - 26.843750)]^20) (If[ Sin[53.393639 (2.4 + t - 26.843750)] < Tan[53.393639 (2.4 + t - 26.843750)], If[Sin[1174.6600 Pi (2.4 + t - 26.843750)] > Cos[1174.6600 Pi (2.4 + t - 26.843750)], Sin[1174.6600 Pi (2.4 + t - 26.843750)], TriangleWave[1174.6600 (t - 26.843750)]], If[Sin[587.33002 Pi (2.4 + t - 26.843750)] > Cos[587.33002 Pi (2.4 + t - 26.843750)], Sin[587.33002 Pi (2.4 + t - 26.843750)], TriangleWave[587.33002 (2.4 + t - 26.843750)]]]), 26.843750 < t < 27.093750}, {(TriangleWave[ 0.1 (2.4 + t - 27.093750)]^20) (If[ Sin[59.932362 (2.4 + t - 27.093750)] < Tan[59.932362 (2.4 + t - 27.093750)], If[Sin[1318.5120 Pi (2.4 + t - 27.093750)] > Cos[1318.5120 Pi (2.4 + t - 27.093750)], Sin[1318.5120 Pi (2.4 + t - 27.093750)], TriangleWave[1318.5120 (t - 27.093750)]], If[Sin[659.25598 Pi (2.4 + t - 27.093750)] > Cos[659.25598 Pi (2.4 + t - 27.093750)], Sin[659.25598 Pi (2.4 + t - 27.093750)], TriangleWave[659.25598 (2.4 + t - 27.093750)]]]), 27.093750 < t < 27.625000}, {(TriangleWave[ 0.1 (2.4 + t - 27.625000)]^20) (If[ Sin[53.393639 (2.4 + t - 27.625000)] < Tan[53.393639 (2.4 + t - 27.625000)], If[Sin[1174.6600 Pi (2.4 + t - 27.625000)] > Cos[1174.6600 Pi (2.4 + t - 27.625000)], Sin[1174.6600 Pi (2.4 + t - 27.625000)], TriangleWave[1174.6600 (t - 27.625000)]], If[Sin[587.33002 Pi (2.4 + t - 27.625000)] > Cos[587.33002 Pi (2.4 + t - 27.625000)], Sin[587.33002 Pi (2.4 + t - 27.625000)], TriangleWave[587.33002 (2.4 + t - 27.625000)]]]), 27.625000 < t < 27.843750}, {(TriangleWave[ 0.1 (2.4 + t - 27.843750)]^20) (If[ Sin[59.932362 (2.4 + t - 27.843750)] < Tan[59.932362 (2.4 + t - 27.843750)], If[Sin[1318.5120 Pi (2.4 + t - 27.843750)] > Cos[1318.5120 Pi (2.4 + t - 27.843750)], Sin[1318.5120 Pi (2.4 + t - 27.843750)], TriangleWave[1318.5120 (t - 27.843750)]], If[Sin[659.25598 Pi (2.4 + t - 27.843750)] > Cos[659.25598 Pi (2.4 + t - 27.843750)], Sin[659.25598 Pi (2.4 + t - 27.843750)], TriangleWave[659.25598 (2.4 + t - 27.843750)]]]), 27.843750 < t < 27.968750}, {(TriangleWave[ 0.1 (2.4 + t - 27.968750)]^20) (If[ Sin[53.393639 (2.4 + t - 27.968750)] < Tan[53.393639 (2.4 + t - 27.968750)], If[Sin[1174.6600 Pi (2.4 + t - 27.968750)] > Cos[1174.6600 Pi (2.4 + t - 27.968750)], Sin[1174.6600 Pi (2.4 + t - 27.968750)], TriangleWave[1174.6600 (t - 27.968750)]], If[Sin[587.33002 Pi (2.4 + t - 27.968750)] > Cos[587.33002 Pi (2.4 + t - 27.968750)], Sin[587.33002 Pi (2.4 + t - 27.968750)], TriangleWave[587.33002 (2.4 + t - 27.968750)]]]), 27.968750 < t < 28.093750}, {(TriangleWave[ 0.1 (2.4 + t - 28.093750)]^20) (If[ Sin[59.932362 (2.4 + t - 28.093750)] < Tan[59.932362 (2.4 + t - 28.093750)], If[Sin[1318.5120 Pi (2.4 + t - 28.093750)] > Cos[1318.5120 Pi (2.4 + t - 28.093750)], Sin[1318.5120 Pi (2.4 + t - 28.093750)], TriangleWave[1318.5120 (t - 28.093750)]], If[Sin[659.25598 Pi (2.4 + t - 28.093750)] > Cos[659.25598 Pi (2.4 + t - 28.093750)], Sin[659.25598 Pi (2.4 + t - 28.093750)], TriangleWave[659.25598 (2.4 + t - 28.093750)]]]), 28.093750 < t < 28.218750}, {(TriangleWave[ 0.1 (2.4 + t - 28.218750)]^20) (If[ Sin[53.393639 (2.4 + t - 28.218750)] < Tan[53.393639 (2.4 + t - 28.218750)], If[Sin[1174.6600 Pi (2.4 + t - 28.218750)] > Cos[1174.6600 Pi (2.4 + t - 28.218750)], Sin[1174.6600 Pi (2.4 + t - 28.218750)], TriangleWave[1174.6600 (t - 28.218750)]], If[Sin[587.33002 Pi (2.4 + t - 28.218750)] > Cos[587.33002 Pi (2.4 + t - 28.218750)], Sin[587.33002 Pi (2.4 + t - 28.218750)], TriangleWave[587.33002 (2.4 + t - 28.218750)]]]), 28.218750 < t < 28.343750}, {(TriangleWave[ 0.1 (2.4 + t - 28.343750)]^20) (If[ Sin[47.581455 (2.4 + t - 28.343750)] < Tan[47.581455 (2.4 + t - 28.343750)], If[Sin[1046.7920 Pi (2.4 + t - 28.343750)] > Cos[1046.7920 Pi (2.4 + t - 28.343750)], Sin[1046.7920 Pi (2.4 + t - 28.343750)], TriangleWave[1046.7920 (t - 28.343750)]], If[Sin[523.39600 Pi (2.4 + t - 28.343750)] > Cos[523.39600 Pi (2.4 + t - 28.343750)], Sin[523.39600 Pi (2.4 + t - 28.343750)], TriangleWave[523.39600 (2.4 + t - 28.343750)]]]), 28.343750 < t < 28.468750}, {(TriangleWave[ 0.1 (2.4 + t - 28.468750)]^20) (If[ Sin[44.898453 (2.4 + t - 28.468750)] < Tan[44.898453 (2.4 + t - 28.468750)], If[Sin[987.76599 Pi (2.4 + t - 28.468750)] > Cos[987.76599 Pi (2.4 + t - 28.468750)], Sin[987.76599 Pi (2.4 + t - 28.468750)], TriangleWave[987.76599 (t - 28.468750)]], If[Sin[493.88300 Pi (2.4 + t - 28.468750)] > Cos[493.88300 Pi (2.4 + t - 28.468750)], Sin[493.88300 Pi (2.4 + t - 28.468750)], TriangleWave[493.88300 (2.4 + t - 28.468750)]]]), 28.468750 < t < 28.718750}, {(TriangleWave[ 0.1 (2.4 + t - 28.718750)]^20) (If[ Sin[47.581455 (2.4 + t - 28.718750)] < Tan[47.581455 (2.4 + t - 28.718750)], If[Sin[1046.7920 Pi (2.4 + t - 28.718750)] > Cos[1046.7920 Pi (2.4 + t - 28.718750)], Sin[1046.7920 Pi (2.4 + t - 28.718750)], TriangleWave[1046.7920 (t - 28.718750)]], If[Sin[523.39600 Pi (2.4 + t - 28.718750)] > Cos[523.39600 Pi (2.4 + t - 28.718750)], Sin[523.39600 Pi (2.4 + t - 28.718750)], TriangleWave[523.39600 (2.4 + t - 28.718750)]]]), 28.718750 < t < 28.843750}, {(TriangleWave[ 0.1 (2.4 + t - 28.843750)]^20) (If[ Sin[53.393639 (2.4 + t - 28.843750)] < Tan[53.393639 (2.4 + t - 28.843750)], If[Sin[1174.6600 Pi (2.4 + t - 28.843750)] > Cos[1174.6600 Pi (2.4 + t - 28.843750)], Sin[1174.6600 Pi (2.4 + t - 28.843750)], TriangleWave[1174.6600 (t - 28.843750)]], If[Sin[587.33002 Pi (2.4 + t - 28.843750)] > Cos[587.33002 Pi (2.4 + t - 28.843750)], Sin[587.33002 Pi (2.4 + t - 28.843750)], TriangleWave[587.33002 (2.4 + t - 28.843750)]]]), 28.843750 < t < 29.093750}, {(TriangleWave[ 0.1 (2.4 + t - 29.093750)]^20) (If[ Sin[59.932362 (2.4 + t - 29.093750)] < Tan[59.932362 (2.4 + t - 29.093750)], If[Sin[1318.5120 Pi (2.4 + t - 29.093750)] > Cos[1318.5120 Pi (2.4 + t - 29.093750)], Sin[1318.5120 Pi (2.4 + t - 29.093750)], TriangleWave[1318.5120 (t - 29.093750)]], If[Sin[659.25598 Pi (2.4 + t - 29.093750)] > Cos[659.25598 Pi (2.4 + t - 29.093750)], Sin[659.25598 Pi (2.4 + t - 29.093750)], TriangleWave[659.25598 (2.4 + t - 29.093750)]]]), 29.093750 < t < 29.625000}, {(TriangleWave[ 0.1 (2.4 + t - 29.625000)]^20) (If[ Sin[53.393639 (2.4 + t - 29.625000)] < Tan[53.393639 (2.4 + t - 29.625000)], If[Sin[1174.6600 Pi (2.4 + t - 29.625000)] > Cos[1174.6600 Pi (2.4 + t - 29.625000)], Sin[1174.6600 Pi (2.4 + t - 29.625000)], TriangleWave[1174.6600 (t - 29.625000)]], If[Sin[587.33002 Pi (2.4 + t - 29.625000)] > Cos[587.33002 Pi (2.4 + t - 29.625000)], Sin[587.33002 Pi (2.4 + t - 29.625000)], TriangleWave[587.33002 (2.4 + t - 29.625000)]]]), 29.625000 < t < 29.968750}, {(TriangleWave[ 0.1 (2.4 + t - 29.968750)]^20) (If[ Sin[31.747999 (2.4 + t - 29.968750)] < Tan[31.747999 (2.4 + t - 29.968750)], If[Sin[698.45599 Pi (2.4 + t - 29.968750)] > Cos[698.45599 Pi (2.4 + t - 29.968750)], Sin[698.45599 Pi (2.4 + t - 29.968750)], TriangleWave[698.45599 (t - 29.968750)]], If[Sin[349.22800 Pi (2.4 + t - 29.968750)] > Cos[349.22800 Pi (2.4 + t - 29.968750)], Sin[349.22800 Pi (2.4 + t - 29.968750)], TriangleWave[349.22800 (2.4 + t - 29.968750)]]]), 29.968750 < t < 30.093750}, {(TriangleWave[ 0.1 (2.4 + t - 30.093750)]^20) (If[ Sin[40.000000 (2.4 + t - 30.093750)] < Tan[40.000000 (2.4 + t - 30.093750)], If[Sin[880.00000 Pi (2.4 + t - 30.093750)] > Cos[880.00000 Pi (2.4 + t - 30.093750)], Sin[880.00000 Pi (2.4 + t - 30.093750)], TriangleWave[880.00000 (t - 30.093750)]], If[Sin[440.00000 Pi (2.4 + t - 30.093750)] > Cos[440.00000 Pi (2.4 + t - 30.093750)], Sin[440.00000 Pi (2.4 + t - 30.093750)], TriangleWave[440.00000 (2.4 + t - 30.093750)]]]), 30.093750 < t < 30.218750}, {(TriangleWave[ 0.1 (2.4 + t - 30.218750)]^20) (If[ Sin[47.581455 (2.4 + t - 30.218750)] < Tan[47.581455 (2.4 + t - 30.218750)], If[Sin[1046.7920 Pi (2.4 + t - 30.218750)] > Cos[1046.7920 Pi (2.4 + t - 30.218750)], Sin[1046.7920 Pi (2.4 + t - 30.218750)], TriangleWave[1046.7920 (t - 30.218750)]], If[Sin[523.39600 Pi (2.4 + t - 30.218750)] > Cos[523.39600 Pi (2.4 + t - 30.218750)], Sin[523.39600 Pi (2.4 + t - 30.218750)], TriangleWave[523.39600 (2.4 + t - 30.218750)]]]), 30.218750 < t < 30.343750}, {(TriangleWave[ 0.1 (2.4 + t - 30.343750)]^20) (If[ Sin[53.393639 (2.4 + t - 30.343750)] < Tan[53.393639 (2.4 + t - 30.343750)], If[Sin[1174.6600 Pi (2.4 + t - 30.343750)] > Cos[1174.6600 Pi (2.4 + t - 30.343750)], Sin[1174.6600 Pi (2.4 + t - 30.343750)], TriangleWave[1174.6600 (t - 30.343750)]], If[Sin[587.33002 Pi (2.4 + t - 30.343750)] > Cos[587.33002 Pi (2.4 + t - 30.343750)], Sin[587.33002 Pi (2.4 + t - 30.343750)], TriangleWave[587.33002 (2.4 + t - 30.343750)]]]), 30.343750 < t < 30.468750}, {(TriangleWave[ 0.1 (2.4 + t - 30.468750)]^20) (If[ Sin[59.932362 (2.4 + t - 30.468750)] < Tan[59.932362 (2.4 + t - 30.468750)], If[Sin[1318.5120 Pi (2.4 + t - 30.468750)] > Cos[1318.5120 Pi (2.4 + t - 30.468750)], Sin[1318.5120 Pi (2.4 + t - 30.468750)], TriangleWave[1318.5120 (t - 30.468750)]], If[Sin[659.25598 Pi (2.4 + t - 30.468750)] > Cos[659.25598 Pi (2.4 + t - 30.468750)], Sin[659.25598 Pi (2.4 + t - 30.468750)], TriangleWave[659.25598 (2.4 + t - 30.468750)]]]), 30.468750 < t < 30.593750}, {(TriangleWave[ 0.1 (2.4 + t - 30.593750)]^20) (If[ Sin[53.393639 (2.4 + t - 30.593750)] < Tan[53.393639 (2.4 + t - 30.593750)], If[Sin[1174.6600 Pi (2.4 + t - 30.593750)] > Cos[1174.6600 Pi (2.4 + t - 30.593750)], Sin[1174.6600 Pi (2.4 + t - 30.593750)], TriangleWave[1174.6600 (t - 30.593750)]], If[Sin[587.33002 Pi (2.4 + t - 30.593750)] > Cos[587.33002 Pi (2.4 + t - 30.593750)], Sin[587.33002 Pi (2.4 + t - 30.593750)], TriangleWave[587.33002 (2.4 + t - 30.593750)]]]), 30.593750 < t < 30.718750}, {(TriangleWave[ 0.1 (2.4 + t - 30.718750)]^20) (If[ Sin[47.581455 (2.4 + t - 30.718750)] < Tan[47.581455 (2.4 + t - 30.718750)], If[Sin[1046.7920 Pi (2.4 + t - 30.718750)] > Cos[1046.7920 Pi (2.4 + t - 30.718750)], Sin[1046.7920 Pi (2.4 + t - 30.718750)], TriangleWave[1046.7920 (t - 30.718750)]], If[Sin[523.39600 Pi (2.4 + t - 30.718750)] > Cos[523.39600 Pi (2.4 + t - 30.718750)], Sin[523.39600 Pi (2.4 + t - 30.718750)], TriangleWave[523.39600 (2.4 + t - 30.718750)]]]), 30.718750 < t < 30.843750}, {(TriangleWave[ 0.1 (2.4 + t - 30.843750)]^20) (If[ Sin[44.898453 (2.4 + t - 30.843750)] < Tan[44.898453 (2.4 + t - 30.843750)], If[Sin[987.76599 Pi (2.4 + t - 30.843750)] > Cos[987.76599 Pi (2.4 + t - 30.843750)], Sin[987.76599 Pi (2.4 + t - 30.843750)], TriangleWave[987.76599 (t - 30.843750)]], If[Sin[493.88300 Pi (2.4 + t - 30.843750)] > Cos[493.88300 Pi (2.4 + t - 30.843750)], Sin[493.88300 Pi (2.4 + t - 30.843750)], TriangleWave[493.88300 (2.4 + t - 30.843750)]]]), 30.843750 < t < 31.593750}, {(TriangleWave[ 0.1 (2.4 + t - 31.593750)]^20) (If[ Sin[40.000000 (2.4 + t - 31.593750)] < Tan[40.000000 (2.4 + t - 31.593750)], If[Sin[880.00000 Pi (2.4 + t - 31.593750)] > Cos[880.00000 Pi (2.4 + t - 31.593750)], Sin[880.00000 Pi (2.4 + t - 31.593750)], TriangleWave[880.00000 (t - 31.593750)]], If[Sin[440.00000 Pi (2.4 + t - 31.593750)] > Cos[440.00000 Pi (2.4 + t - 31.593750)], Sin[440.00000 Pi (2.4 + t - 31.593750)], TriangleWave[440.00000 (2.4 + t - 31.593750)]]]), 31.593750 < t < 31.968750}, {(TriangleWave[ 0.1 (2.4 + t - 31.968750)]^20) (If[ Sin[31.747999 (2.4 + t - 31.968750)] < Tan[31.747999 (2.4 + t - 31.968750)], If[Sin[698.45599 Pi (2.4 + t - 31.968750)] > Cos[698.45599 Pi (2.4 + t - 31.968750)], Sin[698.45599 Pi (2.4 + t - 31.968750)], TriangleWave[698.45599 (t - 31.968750)]], If[Sin[349.22800 Pi (2.4 + t - 31.968750)] > Cos[349.22800 Pi (2.4 + t - 31.968750)], Sin[349.22800 Pi (2.4 + t - 31.968750)], TriangleWave[349.22800 (2.4 + t - 31.968750)]]]), 31.968750 < t < 32.093750}, {(TriangleWave[ 0.1 (2.4 + t - 32.093750)]^20) (If[ Sin[40.000000 (2.4 + t - 32.093750)] < Tan[40.000000 (2.4 + t - 32.093750)], If[Sin[880.00000 Pi (2.4 + t - 32.093750)] > Cos[880.00000 Pi (2.4 + t - 32.093750)], Sin[880.00000 Pi (2.4 + t - 32.093750)], TriangleWave[880.00000 (t - 32.093750)]], If[Sin[440.00000 Pi (2.4 + t - 32.093750)] > Cos[440.00000 Pi (2.4 + t - 32.093750)], Sin[440.00000 Pi (2.4 + t - 32.093750)], TriangleWave[440.00000 (2.4 + t - 32.093750)]]]), 32.093750 < t < 32.218750}, {(TriangleWave[ 0.1 (2.4 + t - 32.218750)]^20) (If[ Sin[47.581455 (2.4 + t - 32.218750)] < Tan[47.581455 (2.4 + t - 32.218750)], If[Sin[1046.7920 Pi (2.4 + t - 32.218750)] > Cos[1046.7920 Pi (2.4 + t - 32.218750)], Sin[1046.7920 Pi (2.4 + t - 32.218750)], TriangleWave[1046.7920 (t - 32.218750)]], If[Sin[523.39600 Pi (2.4 + t - 32.218750)] > Cos[523.39600 Pi (2.4 + t - 32.218750)], Sin[523.39600 Pi (2.4 + t - 32.218750)], TriangleWave[523.39600 (2.4 + t - 32.218750)]]]), 32.218750 < t < 32.343750}, {(TriangleWave[ 0.1 (2.4 + t - 32.343750)]^20) (If[ Sin[53.393639 (2.4 + t - 32.343750)] < Tan[53.393639 (2.4 + t - 32.343750)], If[Sin[1174.6600 Pi (2.4 + t - 32.343750)] > Cos[1174.6600 Pi (2.4 + t - 32.343750)], Sin[1174.6600 Pi (2.4 + t - 32.343750)], TriangleWave[1174.6600 (t - 32.343750)]], If[Sin[587.33002 Pi (2.4 + t - 32.343750)] > Cos[587.33002 Pi (2.4 + t - 32.343750)], Sin[587.33002 Pi (2.4 + t - 32.343750)], TriangleWave[587.33002 (2.4 + t - 32.343750)]]]), 32.343750 < t < 32.468750}, {(TriangleWave[ 0.1 (2.4 + t - 32.468750)]^20) (If[ Sin[59.932362 (2.4 + t - 32.468750)] < Tan[59.932362 (2.4 + t - 32.468750)], If[Sin[1318.5120 Pi (2.4 + t - 32.468750)] > Cos[1318.5120 Pi (2.4 + t - 32.468750)], Sin[1318.5120 Pi (2.4 + t - 32.468750)], TriangleWave[1318.5120 (t - 32.468750)]], If[Sin[659.25598 Pi (2.4 + t - 32.468750)] > Cos[659.25598 Pi (2.4 + t - 32.468750)], Sin[659.25598 Pi (2.4 + t - 32.468750)], TriangleWave[659.25598 (2.4 + t - 32.468750)]]]), 32.468750 < t < 32.593750}, {(TriangleWave[ 0.1 (2.4 + t - 32.593750)]^20) (If[ Sin[53.393639 (2.4 + t - 32.593750)] < Tan[53.393639 (2.4 + t - 32.593750)], If[Sin[1174.6600 Pi (2.4 + t - 32.593750)] > Cos[1174.6600 Pi (2.4 + t - 32.593750)], Sin[1174.6600 Pi (2.4 + t - 32.593750)], TriangleWave[1174.6600 (t - 32.593750)]], If[Sin[587.33002 Pi (2.4 + t - 32.593750)] > Cos[587.33002 Pi (2.4 + t - 32.593750)], Sin[587.33002 Pi (2.4 + t - 32.593750)], TriangleWave[587.33002 (2.4 + t - 32.593750)]]]), 32.593750 < t < 32.718750}, {(TriangleWave[ 0.1 (2.4 + t - 32.718750)]^20) (If[ Sin[47.581455 (2.4 + t - 32.718750)] < Tan[47.581455 (2.4 + t - 32.718750)], If[Sin[1046.7920 Pi (2.4 + t - 32.718750)] > Cos[1046.7920 Pi (2.4 + t - 32.718750)], Sin[1046.7920 Pi (2.4 + t - 32.718750)], TriangleWave[1046.7920 (t - 32.718750)]], If[Sin[523.39600 Pi (2.4 + t - 32.718750)] > Cos[523.39600 Pi (2.4 + t - 32.718750)], Sin[523.39600 Pi (2.4 + t - 32.718750)], TriangleWave[523.39600 (2.4 + t - 32.718750)]]]), 32.718750 < t < 32.843750}, {(TriangleWave[ 0.1 (2.4 + t - 32.843750)]^20) (If[ Sin[44.898453 (2.4 + t - 32.843750)] < Tan[44.898453 (2.4 + t - 32.843750)], If[Sin[987.76599 Pi (2.4 + t - 32.843750)] > Cos[987.76599 Pi (2.4 + t - 32.843750)], Sin[987.76599 Pi (2.4 + t - 32.843750)], TriangleWave[987.76599 (t - 32.843750)]], If[Sin[493.88300 Pi (2.4 + t - 32.843750)] > Cos[493.88300 Pi (2.4 + t - 32.843750)], Sin[493.88300 Pi (2.4 + t - 32.843750)], TriangleWave[493.88300 (2.4 + t - 32.843750)]]]), 32.843750 < t < 33.593750}, {(TriangleWave[ 0.1 (2.4 + t - 33.593750)]^20) (If[ Sin[40.000000 (2.4 + t - 33.593750)] < Tan[40.000000 (2.4 + t - 33.593750)], If[Sin[880.00000 Pi (2.4 + t - 33.593750)] > Cos[880.00000 Pi (2.4 + t - 33.593750)], Sin[880.00000 Pi (2.4 + t - 33.593750)], TriangleWave[880.00000 (t - 33.593750)]], If[Sin[440.00000 Pi (2.4 + t - 33.593750)] > Cos[440.00000 Pi (2.4 + t - 33.593750)], Sin[440.00000 Pi (2.4 + t - 33.593750)], TriangleWave[440.00000 (2.4 + t - 33.593750)]]]), 33.593750 < t < 33.968750}, {0, 33.968750 < t < 45.968750}, {(TriangleWave[ 0.1 (2.4 + t - 45.968750)]^20) (If[ Sin[31.747999 (2.4 + t - 45.968750)] < Tan[31.747999 (2.4 + t - 45.968750)], If[Sin[698.45599 Pi (2.4 + t - 45.968750)] > Cos[698.45599 Pi (2.4 + t - 45.968750)], Sin[698.45599 Pi (2.4 + t - 45.968750)], TriangleWave[698.45599 (t - 45.968750)]], If[Sin[349.22800 Pi (2.4 + t - 45.968750)] > Cos[349.22800 Pi (2.4 + t - 45.968750)], Sin[349.22800 Pi (2.4 + t - 45.968750)], TriangleWave[349.22800 (2.4 + t - 45.968750)]]]), 45.968750 < t < 46.093750}, {(TriangleWave[ 0.1 (2.4 + t - 46.093750)]^20) (If[ Sin[40.000000 (2.4 + t - 46.093750)] < Tan[40.000000 (2.4 + t - 46.093750)], If[Sin[880.00000 Pi (2.4 + t - 46.093750)] > Cos[880.00000 Pi (2.4 + t - 46.093750)], Sin[880.00000 Pi (2.4 + t - 46.093750)], TriangleWave[880.00000 (t - 46.093750)]], If[Sin[440.00000 Pi (2.4 + t - 46.093750)] > Cos[440.00000 Pi (2.4 + t - 46.093750)], Sin[440.00000 Pi (2.4 + t - 46.093750)], TriangleWave[440.00000 (2.4 + t - 46.093750)]]]), 46.093750 < t < 46.218750}, {(TriangleWave[ 0.1 (2.4 + t - 46.218750)]^20) (If[ Sin[47.581455 (2.4 + t - 46.218750)] < Tan[47.581455 (2.4 + t - 46.218750)], If[Sin[1046.7920 Pi (2.4 + t - 46.218750)] > Cos[1046.7920 Pi (2.4 + t - 46.218750)], Sin[1046.7920 Pi (2.4 + t - 46.218750)], TriangleWave[1046.7920 (t - 46.218750)]], If[Sin[523.39600 Pi (2.4 + t - 46.218750)] > Cos[523.39600 Pi (2.4 + t - 46.218750)], Sin[523.39600 Pi (2.4 + t - 46.218750)], TriangleWave[523.39600 (2.4 + t - 46.218750)]]]), 46.218750 < t < 46.343750}, {(TriangleWave[ 0.1 (2.4 + t - 46.343750)]^20) (If[ Sin[53.393639 (2.4 + t - 46.343750)] < Tan[53.393639 (2.4 + t - 46.343750)], If[Sin[1174.6600 Pi (2.4 + t - 46.343750)] > Cos[1174.6600 Pi (2.4 + t - 46.343750)], Sin[1174.6600 Pi (2.4 + t - 46.343750)], TriangleWave[1174.6600 (t - 46.343750)]], If[Sin[587.33002 Pi (2.4 + t - 46.343750)] > Cos[587.33002 Pi (2.4 + t - 46.343750)], Sin[587.33002 Pi (2.4 + t - 46.343750)], TriangleWave[587.33002 (2.4 + t - 46.343750)]]]), 46.343750 < t < 46.468750}, {(TriangleWave[ 0.1 (2.4 + t - 46.468750)]^20) (If[ Sin[59.932362 (2.4 + t - 46.468750)] < Tan[59.932362 (2.4 + t - 46.468750)], If[Sin[1318.5120 Pi (2.4 + t - 46.468750)] > Cos[1318.5120 Pi (2.4 + t - 46.468750)], Sin[1318.5120 Pi (2.4 + t - 46.468750)], TriangleWave[1318.5120 (t - 46.468750)]], If[Sin[659.25598 Pi (2.4 + t - 46.468750)] > Cos[659.25598 Pi (2.4 + t - 46.468750)], Sin[659.25598 Pi (2.4 + t - 46.468750)], TriangleWave[659.25598 (2.4 + t - 46.468750)]]]), 46.468750 < t < 46.593750}, {(TriangleWave[ 0.1 (2.4 + t - 46.593750)]^20) (If[ Sin[53.393639 (2.4 + t - 46.593750)] < Tan[53.393639 (2.4 + t - 46.593750)], If[Sin[1174.6600 Pi (2.4 + t - 46.593750)] > Cos[1174.6600 Pi (2.4 + t - 46.593750)], Sin[1174.6600 Pi (2.4 + t - 46.593750)], TriangleWave[1174.6600 (t - 46.593750)]], If[Sin[587.33002 Pi (2.4 + t - 46.593750)] > Cos[587.33002 Pi (2.4 + t - 46.593750)], Sin[587.33002 Pi (2.4 + t - 46.593750)], TriangleWave[587.33002 (2.4 + t - 46.593750)]]]), 46.593750 < t < 46.718750}, {(TriangleWave[ 0.1 (2.4 + t - 46.718750)]^20) (If[ Sin[47.581455 (2.4 + t - 46.718750)] < Tan[47.581455 (2.4 + t - 46.718750)], If[Sin[1046.7920 Pi (2.4 + t - 46.718750)] > Cos[1046.7920 Pi (2.4 + t - 46.718750)], Sin[1046.7920 Pi (2.4 + t - 46.718750)], TriangleWave[1046.7920 (t - 46.718750)]], If[Sin[523.39600 Pi (2.4 + t - 46.718750)] > Cos[523.39600 Pi (2.4 + t - 46.718750)], Sin[523.39600 Pi (2.4 + t - 46.718750)], TriangleWave[523.39600 (2.4 + t - 46.718750)]]]), 46.718750 < t < 46.843750}, {(TriangleWave[ 0.1 (2.4 + t - 46.843750)]^20) (If[ Sin[44.898453 (2.4 + t - 46.843750)] < Tan[44.898453 (2.4 + t - 46.843750)], If[Sin[987.76599 Pi (2.4 + t - 46.843750)] > Cos[987.76599 Pi (2.4 + t - 46.843750)], Sin[987.76599 Pi (2.4 + t - 46.843750)], TriangleWave[987.76599 (t - 46.843750)]], If[Sin[493.88300 Pi (2.4 + t - 46.843750)] > Cos[493.88300 Pi (2.4 + t - 46.843750)], Sin[493.88300 Pi (2.4 + t - 46.843750)], TriangleWave[493.88300 (2.4 + t - 46.843750)]]]), 46.843750 < t < 47.593750}, {(TriangleWave[ 0.1 (2.4 + t - 47.593750)]^20) (If[ Sin[40.000000 (2.4 + t - 47.593750)] < Tan[40.000000 (2.4 + t - 47.593750)], If[Sin[880.00000 Pi (2.4 + t - 47.593750)] > Cos[880.00000 Pi (2.4 + t - 47.593750)], Sin[880.00000 Pi (2.4 + t - 47.593750)], TriangleWave[880.00000 (t - 47.593750)]], If[Sin[440.00000 Pi (2.4 + t - 47.593750)] > Cos[440.00000 Pi (2.4 + t - 47.593750)], Sin[440.00000 Pi (2.4 + t - 47.593750)], TriangleWave[440.00000 (2.4 + t - 47.593750)]]]), 47.593750 < t < 47.968750}, {(TriangleWave[ 0.1 (2.4 + t - 47.968750)]^20) (If[ Sin[31.747999 (2.4 + t - 47.968750)] < Tan[31.747999 (2.4 + t - 47.968750)], If[Sin[698.45599 Pi (2.4 + t - 47.968750)] > Cos[698.45599 Pi (2.4 + t - 47.968750)], Sin[698.45599 Pi (2.4 + t - 47.968750)], TriangleWave[698.45599 (t - 47.968750)]], If[Sin[349.22800 Pi (2.4 + t - 47.968750)] > Cos[349.22800 Pi (2.4 + t - 47.968750)], Sin[349.22800 Pi (2.4 + t - 47.968750)], TriangleWave[349.22800 (2.4 + t - 47.968750)]]]), 47.968750 < t < 48.093750}, {(TriangleWave[ 0.1 (2.4 + t - 48.093750)]^20) (If[ Sin[40.000000 (2.4 + t - 48.093750)] < Tan[40.000000 (2.4 + t - 48.093750)], If[Sin[880.00000 Pi (2.4 + t - 48.093750)] > Cos[880.00000 Pi (2.4 + t - 48.093750)], Sin[880.00000 Pi (2.4 + t - 48.093750)], TriangleWave[880.00000 (t - 48.093750)]], If[Sin[440.00000 Pi (2.4 + t - 48.093750)] > Cos[440.00000 Pi (2.4 + t - 48.093750)], Sin[440.00000 Pi (2.4 + t - 48.093750)], TriangleWave[440.00000 (2.4 + t - 48.093750)]]]), 48.093750 < t < 48.218750}, {(TriangleWave[ 0.1 (2.4 + t - 48.218750)]^20) (If[ Sin[47.581455 (2.4 + t - 48.218750)] < Tan[47.581455 (2.4 + t - 48.218750)], If[Sin[1046.7920 Pi (2.4 + t - 48.218750)] > Cos[1046.7920 Pi (2.4 + t - 48.218750)], Sin[1046.7920 Pi (2.4 + t - 48.218750)], TriangleWave[1046.7920 (t - 48.218750)]], If[Sin[523.39600 Pi (2.4 + t - 48.218750)] > Cos[523.39600 Pi (2.4 + t - 48.218750)], Sin[523.39600 Pi (2.4 + t - 48.218750)], TriangleWave[523.39600 (2.4 + t - 48.218750)]]]), 48.218750 < t < 48.343750}, {(TriangleWave[ 0.1 (2.4 + t - 48.343750)]^20) (If[ Sin[53.393639 (2.4 + t - 48.343750)] < Tan[53.393639 (2.4 + t - 48.343750)], If[Sin[1174.6600 Pi (2.4 + t - 48.343750)] > Cos[1174.6600 Pi (2.4 + t - 48.343750)], Sin[1174.6600 Pi (2.4 + t - 48.343750)], TriangleWave[1174.6600 (t - 48.343750)]], If[Sin[587.33002 Pi (2.4 + t - 48.343750)] > Cos[587.33002 Pi (2.4 + t - 48.343750)], Sin[587.33002 Pi (2.4 + t - 48.343750)], TriangleWave[587.33002 (2.4 + t - 48.343750)]]]), 48.343750 < t < 48.468750}, {(TriangleWave[ 0.1 (2.4 + t - 48.468750)]^20) (If[ Sin[59.932362 (2.4 + t - 48.468750)] < Tan[59.932362 (2.4 + t - 48.468750)], If[Sin[1318.5120 Pi (2.4 + t - 48.468750)] > Cos[1318.5120 Pi (2.4 + t - 48.468750)], Sin[1318.5120 Pi (2.4 + t - 48.468750)], TriangleWave[1318.5120 (t - 48.468750)]], If[Sin[659.25598 Pi (2.4 + t - 48.468750)] > Cos[659.25598 Pi (2.4 + t - 48.468750)], Sin[659.25598 Pi (2.4 + t - 48.468750)], TriangleWave[659.25598 (2.4 + t - 48.468750)]]]), 48.468750 < t < 48.593750}, {(TriangleWave[ 0.1 (2.4 + t - 48.593750)]^20) (If[ Sin[53.393639 (2.4 + t - 48.593750)] < Tan[53.393639 (2.4 + t - 48.593750)], If[Sin[1174.6600 Pi (2.4 + t - 48.593750)] > Cos[1174.6600 Pi (2.4 + t - 48.593750)], Sin[1174.6600 Pi (2.4 + t - 48.593750)], TriangleWave[1174.6600 (t - 48.593750)]], If[Sin[587.33002 Pi (2.4 + t - 48.593750)] > Cos[587.33002 Pi (2.4 + t - 48.593750)], Sin[587.33002 Pi (2.4 + t - 48.593750)], TriangleWave[587.33002 (2.4 + t - 48.593750)]]]), 48.593750 < t < 48.718750}, {(TriangleWave[ 0.1 (2.4 + t - 48.718750)]^20) (If[ Sin[47.581455 (2.4 + t - 48.718750)] < Tan[47.581455 (2.4 + t - 48.718750)], If[Sin[1046.7920 Pi (2.4 + t - 48.718750)] > Cos[1046.7920 Pi (2.4 + t - 48.718750)], Sin[1046.7920 Pi (2.4 + t - 48.718750)], TriangleWave[1046.7920 (t - 48.718750)]], If[Sin[523.39600 Pi (2.4 + t - 48.718750)] > Cos[523.39600 Pi (2.4 + t - 48.718750)], Sin[523.39600 Pi (2.4 + t - 48.718750)], TriangleWave[523.39600 (2.4 + t - 48.718750)]]]), 48.718750 < t < 48.843750}, {(TriangleWave[ 0.1 (2.4 + t - 48.843750)]^20) (If[ Sin[44.898453 (2.4 + t - 48.843750)] < Tan[44.898453 (2.4 + t - 48.843750)], If[Sin[987.76599 Pi (2.4 + t - 48.843750)] > Cos[987.76599 Pi (2.4 + t - 48.843750)], Sin[987.76599 Pi (2.4 + t - 48.843750)], TriangleWave[987.76599 (t - 48.843750)]], If[Sin[493.88300 Pi (2.4 + t - 48.843750)] > Cos[493.88300 Pi (2.4 + t - 48.843750)], Sin[493.88300 Pi (2.4 + t - 48.843750)], TriangleWave[493.88300 (2.4 + t - 48.843750)]]]), 48.843750 < t < 49.593750}, {(TriangleWave[ 0.1 (2.4 + t - 49.593750)]^20) (If[ Sin[40.000000 (2.4 + t - 49.593750)] < Tan[40.000000 (2.4 + t - 49.593750)], If[Sin[880.00000 Pi (2.4 + t - 49.593750)] > Cos[880.00000 Pi (2.4 + t - 49.593750)], Sin[880.00000 Pi (2.4 + t - 49.593750)], TriangleWave[880.00000 (t - 49.593750)]], If[Sin[440.00000 Pi (2.4 + t - 49.593750)] > Cos[440.00000 Pi (2.4 + t - 49.593750)], Sin[440.00000 Pi (2.4 + t - 49.593750)], TriangleWave[440.00000 (2.4 + t - 49.593750)]]]), 49.593750 < t < 49.968750}, {0, 49.968750 < t < 64.031250}}] + Piecewise[{{0, 0.0000000 < t < 3.9687500}, {(1 - Log[(t - 3.9687500)^3 + (t - 3.9687500)^2] + 1) If[ Sin[87.306999 Pi (t - 3.9687500)] > Cos[87.306999 Pi (t - 3.9687500)], Sin[103.18100 Pi (t - 3.9687500)], Sin[87.306999 Pi (t - 3.9687500)]], 3.9687500 < t < 4.2187500}, {0, 4.2187500 < t < 4.4687500}, {(1 - Log[(t - 4.4687500)^3 + (t - 4.4687500)^2] + 1) If[ Sin[87.306999 Pi (t - 4.4687500)] > Cos[87.306999 Pi (t - 4.4687500)], Sin[103.18100 Pi (t - 4.4687500)], Sin[87.306999 Pi (t - 4.4687500)]], 4.4687500 < t < 4.7187500}, {0, 4.7187500 < t < 4.9687500}, {(1 - Log[(t - 4.9687500)^3 + (t - 4.9687500)^2] + 1) If[ Sin[87.306999 Pi (t - 4.9687500)] > Cos[87.306999 Pi (t - 4.9687500)], Sin[103.18100 Pi (t - 4.9687500)], Sin[87.306999 Pi (t - 4.9687500)]], 4.9687500 < t < 5.2187500}, {0, 5.2187500 < t < 5.4687500}, {(1 - Log[(t - 5.4687500)^3 + (t - 5.4687500)^2] + 1) If[ Sin[87.306999 Pi (t - 5.4687500)] > Cos[87.306999 Pi (t - 5.4687500)], Sin[103.18100 Pi (t - 5.4687500)], Sin[87.306999 Pi (t - 5.4687500)]], 5.4687500 < t < 5.7187500}, {0, 5.7187500 < t < 7.9687500}, {(1 - Log[(t - 7.9687500)^3 + (t - 7.9687500)^2] + 1) If[ Sin[87.306999 Pi (t - 7.9687500)] > Cos[87.306999 Pi (t - 7.9687500)], Sin[103.18100 Pi (t - 7.9687500)], Sin[87.306999 Pi (t - 7.9687500)]], 7.9687500 < t < 8.4687500}, {(1 - Log[(t - 8.4687500)^3 + (t - 8.4687500)^2] + 1) If[ Sin[65.424500 Pi (t - 8.4687500)] > Cos[65.424500 Pi (t - 8.4687500)], Sin[77.319862 Pi (t - 8.4687500)], Sin[65.424500 Pi (t - 8.4687500)]], 8.4687500 < t < 8.9687500}, {(1 - Log[(t - 8.9687500)^3 + (t - 8.9687500)^2] + 1) If[ Sin[87.306999 Pi (t - 8.9687500)] > Cos[87.306999 Pi (t - 8.9687500)], Sin[103.18100 Pi (t - 8.9687500)], Sin[87.306999 Pi (t - 8.9687500)]], 8.9687500 < t < 9.4687500}, {(1 - Log[(t - 9.4687500)^3 + (t - 9.4687500)^2] + 1) If[ Sin[65.424500 Pi (t - 9.4687500)] > Cos[65.424500 Pi (t - 9.4687500)], Sin[77.319862 Pi (t - 9.4687500)], Sin[65.424500 Pi (t - 9.4687500)]], 9.4687500 < t < 9.9687500}, {0, 9.9687500 < t < 11.968750}, {(1 - Log[(t - 11.968750)^3 + (t - 11.968750)^2] + 1) If[ Sin[87.306999 Pi (t - 11.968750)] > Cos[87.306999 Pi (t - 11.968750)], Sin[103.18100 Pi (t - 11.968750)], Sin[87.306999 Pi (t - 11.968750)]], 11.968750 < t < 12.968750}, {(1 - Log[(t - 12.968750)^3 + (t - 12.968750)^2] + 1) If[ Sin[65.424500 Pi (t - 12.968750)] > Cos[65.424500 Pi (t - 12.968750)], Sin[77.319862 Pi (t - 12.968750)], Sin[65.424500 Pi (t - 12.968750)]], 12.968750 < t < 13.968750}, {(1 - Log[(t - 13.968750)^3 + (t - 13.968750)^2] + 1) If[ Sin[87.306999 Pi (t - 13.968750)] > Cos[87.306999 Pi (t - 13.968750)], Sin[103.18100 Pi (t - 13.968750)], Sin[87.306999 Pi (t - 13.968750)]], 13.968750 < t < 14.968750}, {(1 - Log[(t - 14.968750)^3 + (t - 14.968750)^2] + 1) If[ Sin[65.424500 Pi (t - 14.968750)] > Cos[65.424500 Pi (t - 14.968750)], Sin[77.319862 Pi (t - 14.968750)], Sin[65.424500 Pi (t - 14.968750)]], 14.968750 < t < 15.968750}, {(1 - Log[(t - 15.968750)^3 + (t - 15.968750)^2] + 1) If[ Sin[87.306999 Pi (t - 15.968750)] > Cos[87.306999 Pi (t - 15.968750)], Sin[103.18100 Pi (t - 15.968750)], Sin[87.306999 Pi (t - 15.968750)]], 15.968750 < t < 16.968750}, {(1 - Log[(t - 16.968750)^3 + (t - 16.968750)^2] + 1) If[ Sin[65.424500 Pi (t - 16.968750)] > Cos[65.424500 Pi (t - 16.968750)], Sin[77.319862 Pi (t - 16.968750)], Sin[65.424500 Pi (t - 16.968750)]], 16.968750 < t < 17.968750}, {(1 - Log[(t - 17.968750)^3 + (t - 17.968750)^2] + 1) If[ Sin[87.306999 Pi (t - 17.968750)] > Cos[87.306999 Pi (t - 17.968750)], Sin[103.18100 Pi (t - 17.968750)], Sin[87.306999 Pi (t - 17.968750)]], 17.968750 < t < 18.968750}, {(1 - Log[(t - 18.968750)^3 + (t - 18.968750)^2] + 1) If[ Sin[65.424500 Pi (t - 18.968750)] > Cos[65.424500 Pi (t - 18.968750)], Sin[77.319862 Pi (t - 18.968750)], Sin[65.424500 Pi (t - 18.968750)]], 18.968750 < t < 19.968750}, {(1 - Log[(t - 19.968750)^3 + (t - 19.968750)^2] + 1) If[ Sin[87.306999 Pi (t - 19.968750)] > Cos[87.306999 Pi (t - 19.968750)], Sin[103.18100 Pi (t - 19.968750)], Sin[87.306999 Pi (t - 19.968750)]], 19.968750 < t < 20.968750}, {(1 - Log[(t - 20.968750)^3 + (t - 20.968750)^2] + 1) If[ Sin[65.424500 Pi (t - 20.968750)] > Cos[65.424500 Pi (t - 20.968750)], Sin[77.319862 Pi (t - 20.968750)], Sin[65.424500 Pi (t - 20.968750)]], 20.968750 < t < 21.968750}, {(1 - Log[(t - 21.968750)^3 + (t - 21.968750)^2] + 1) If[ Sin[87.306999 Pi (t - 21.968750)] > Cos[87.306999 Pi (t - 21.968750)], Sin[103.18100 Pi (t - 21.968750)], Sin[87.306999 Pi (t - 21.968750)]], 21.968750 < t < 22.968750}, {(1 - Log[(t - 22.968750)^3 + (t - 22.968750)^2] + 1) If[ Sin[65.424500 Pi (t - 22.968750)] > Cos[65.424500 Pi (t - 22.968750)], Sin[77.319862 Pi (t - 22.968750)], Sin[65.424500 Pi (t - 22.968750)]], 22.968750 < t < 23.968750}, {(1 - Log[(t - 23.968750)^3 + (t - 23.968750)^2] + 1) If[ Sin[87.306999 Pi (t - 23.968750)] > Cos[87.306999 Pi (t - 23.968750)], Sin[103.18100 Pi (t - 23.968750)], Sin[87.306999 Pi (t - 23.968750)]], 23.968750 < t < 24.968750}, {(1 - Log[(t - 24.968750)^3 + (t - 24.968750)^2] + 1) If[ Sin[65.424500 Pi (t - 24.968750)] > Cos[65.424500 Pi (t - 24.968750)], Sin[77.319862 Pi (t - 24.968750)], Sin[65.424500 Pi (t - 24.968750)]], 24.968750 < t < 29.968750}, {(1 - Log[(t - 29.968750)^3 + (t - 29.968750)^2] + 1) If[ Sin[87.306999 Pi (t - 29.968750)] > Cos[87.306999 Pi (t - 29.968750)], Sin[103.18100 Pi (t - 29.968750)], Sin[87.306999 Pi (t - 29.968750)]], 29.968750 < t < 30.968750}, {(1 - Log[(t - 30.968750)^3 + (t - 30.968750)^2] + 1) If[ Sin[65.424500 Pi (t - 30.968750)] > Cos[65.424500 Pi (t - 30.968750)], Sin[77.319862 Pi (t - 30.968750)], Sin[65.424500 Pi (t - 30.968750)]], 30.968750 < t < 33.968750}, {(1 - Log[(t - 33.968750)^3 + (t - 33.968750)^2] + 1) If[ Sin[87.306999 Pi (t - 33.968750)] > Cos[87.306999 Pi (t - 33.968750)], Sin[103.18100 Pi (t - 33.968750)], Sin[87.306999 Pi (t - 33.968750)]], 33.968750 < t < 34.968750}, {(1 - Log[(t - 34.968750)^3 + (t - 34.968750)^2] + 1) If[ Sin[65.424500 Pi (t - 34.968750)] > Cos[65.424500 Pi (t - 34.968750)], Sin[77.319862 Pi (t - 34.968750)], Sin[65.424500 Pi (t - 34.968750)]], 34.968750 < t < 37.968750}, {(1 - Log[(t - 37.968750)^3 + (t - 37.968750)^2] + 1) If[ Sin[87.306999 Pi (t - 37.968750)] > Cos[87.306999 Pi (t - 37.968750)], Sin[103.18100 Pi (t - 37.968750)], Sin[87.306999 Pi (t - 37.968750)]], 37.968750 < t < 38.968750}, {(1 - Log[(t - 38.968750)^3 + (t - 38.968750)^2] + 1) If[ Sin[65.424500 Pi (t - 38.968750)] > Cos[65.424500 Pi (t - 38.968750)], Sin[77.319862 Pi (t - 38.968750)], Sin[65.424500 Pi (t - 38.968750)]], 38.968750 < t < 41.968750}, {(1 - Log[(t - 41.968750)^3 + (t - 41.968750)^2] + 1) If[ Sin[87.306999 Pi (t - 41.968750)] > Cos[87.306999 Pi (t - 41.968750)], Sin[103.18100 Pi (t - 41.968750)], Sin[87.306999 Pi (t - 41.968750)]], 41.968750 < t < 42.968750}, {(1 - Log[(t - 42.968750)^3 + (t - 42.968750)^2] + 1) If[ Sin[65.424500 Pi (t - 42.968750)] > Cos[65.424500 Pi (t - 42.968750)], Sin[77.319862 Pi (t - 42.968750)], Sin[65.424500 Pi (t - 42.968750)]], 42.968750 < t < 45.968750}, {(1 - Log[(t - 45.968750)^3 + (t - 45.968750)^2] + 1) If[ Sin[87.306999 Pi (t - 45.968750)] > Cos[87.306999 Pi (t - 45.968750)], Sin[103.18100 Pi (t - 45.968750)], Sin[87.306999 Pi (t - 45.968750)]], 45.968750 < t < 46.968750}, {(1 - Log[(t - 46.968750)^3 + (t - 46.968750)^2] + 1) If[ Sin[65.424500 Pi (t - 46.968750)] > Cos[65.424500 Pi (t - 46.968750)], Sin[77.319862 Pi (t - 46.968750)], Sin[65.424500 Pi (t - 46.968750)]], 46.968750 < t < 53.968750}, {(1 - Log[(t - 53.968750)^3 + (t - 53.968750)^2] + 1) If[ Sin[87.306999 Pi (t - 53.968750)] > Cos[87.306999 Pi (t - 53.968750)], Sin[103.18100 Pi (t - 53.968750)], Sin[87.306999 Pi (t - 53.968750)]], 53.968750 < t < 54.968750}, {(1 - Log[(t - 54.968750)^3 + (t - 54.968750)^2] + 1) If[ Sin[65.424500 Pi (t - 54.968750)] > Cos[65.424500 Pi (t - 54.968750)], Sin[77.319862 Pi (t - 54.968750)], Sin[65.424500 Pi (t - 54.968750)]], 54.968750 < t < 57.968750}, {0, 57.968750 < t < 64.031250}}], {t, 0, 64.031250}]]]