with(plots): I enter the vector-valued function that gives the cow's position, as a function of time. Rather than just graphing it right away, I name the graph and don't display it ... that way I can graph other things on the same set of axes later. Notice that I added the plot option "numpoints=200" -- without it, I found the graph to be jagged. r:= t -> [cos(2*t),sin(3*t)^3, cos(3*t)-sin(3*t)+19];

Zio2I0kidEc2IkYlNiRJKW9wZXJhdG9yR0YlSSZhcnJvd0dGJUYlNyUtSSRjb3NHNiQlKnByb3RlY3RlZEdJKF9zeXNsaWJHRiU2IywkKiYiIiMiIiJGJEYzRjMqJCktSSRzaW5HRiw2IywkKiYiIiRGM0YkRjNGM0Y7RjMsKC1GK0Y4RjNGNiEiIiIjPkYzRiVGJUYl

In order to graph a 3D vector-valued function, I use the spacecurve command. (I also have to load the package plots, above.) Notice that I added the plot option "numpoints=200" -- without it, I found the graph to be jagged. spacecurve([cos(2*t),sin(3*t)^3, cos(3*t)-sin(3*t)+19], t=0..5, color=blue, numpoints=200, axes=normal);

NiQtSSdDVVJWRVNHNiQlKnByb3RlY3RlZEdJKF9zeXNsaWJHNiI2JDdkdzclJCIiIiIiISQiIiEiIiEkIiM/IiIhNyUkIis4blAoKSoqISM1JCIrdnpecVUhIzgkIispXCY9Iyo+ISIpNyUkIitAKFEmXCoqISM1JCIrKkclUihRJCEjNyQiK3d1JVEpPiEiKTclJCIrXzplJykpKiEjNSQiK0E+M0Y2ISM2JCIrJkdMXSg+ISIpNyUkIitfVG0peiohIzUkIitdNHY9RSEjNiQiKyMpSHpsPiEiKTclJCIrI1szZ28qISM1JCIrVUlqJSlcISM2JCIrVCF6aCY+ISIpNyUkIitmKikqKVsmKiEjNSQiKyEzIVFYJCkhIzYkIitnZ0NZPiEiKTclJCIrUDxvKFEqISM1JCIrbycqUXc3ISM1JCIrXC8wTz4hIik3JSQiK05Rdy0jKiEjNSQiK0EzM0M9ISM1JCIrMixsRD4hIik3JSQiKzJAaCUqKikhIzUkIisheTk4WiMhIzUkIisqNC9eIj4hIik3JSQiK2w/dmooKSEjNSQiK0JPajBLISM1JCIrO0JaLz4hIik3JSQiK15sdzUmKSEjNSQiK0RoJCozUyEjNSQiK0xeIlEqPSEiKTclJCIrb1VITyMpISM1JCIrIykpKkdlWyEjNSQiK3ZJPiQpPSEiKTclJCIraiJHNSV6ISM1JCIrRXAqcHMmISM1JCIramttcz0hIik3JSQiKyNvOGRpKCEjNSQiK1IiZmVlJyEjNSQiK3hdSGk9ISIpNyUkIisoKW85IkgoISM1JCIrayZ6WFMoISM1JCIrPXk4Xz0hIik3JSQiK1dDPFFwISM1JCIrbihHSzopISM1JCIrbkJEVT0hIik3JSQiKyNcIm9ubCEjNSQiKyIqPnEuKSkhIzUkIitrW3BLPSEiKTclJCIrJlI0MT0nISM1JCIrOEw0SiQqISM1JCIrJmU+TiM9ISIpNyUkIit3TCR6eCYhIzUkIitSciJcciohIzUkIitRJ3laIj0hIik3JSQiK2IrbmdgISM1JCIrP142UyoqISM1JCIraTtfMT0hIik3JSQiK3lHKClIXCEjNSQiKzZ1eigqKiohIzUkIitbYnopeiIhIik3JSQiK2klSG1bJSEjNSQiKyRwIW8mKSkqISM1JCIrc1RrInoiISIpNyUkIitWKWU/LiUhIzUkIis9Mj8zJyohIzUkIitbIjNeeSIhIik3JSQiK2QnM3RjJCEjNSQiKyJvJEh3IiohIzUkIisjZkMjejwhIik3JSQiK1FBYiQ0JCEjNSQiKy92Jm9nKSEjNSQiKz5wLXU8ISIpNyUkIitnYyk+aCMhIzUkIituLiM+I3ohIzUkIitXWWFwPCEiKTclJCIrOFojUTcjISM1JCIrVidldjkoISM1JCIrQ0shZXciISIpNyUkIitPPUlJOyEjNSQiK0MiPkVKJyEjNSQiKzBSI0d3IiEiKTclJCIrMUltSzYhIzUkIiszLkpaYSEjNSQiKzJPaWc8ISIpNyUkIismKmVrQGohIzYkIitLVHQiZSUhIzUkIitFW0BmPCEiKTclJCIrVDxxKzghIzYkIis/RFZXUCEjNSQiK2hiZ2U8ISIpNyUkIStTaV9CUCEjNiQiKy1CLWhIISM1JCIrdSMqemU8ISIpNyUkISskZmAkUSgpISM2JCIrK3YpSEQjISM1JCIralt6ZjwhIik3JSQhK2c+NnQ4ISM1JCIrVCoqb087ISM1JCIrdm1laDwhIik3JSQhK0I+IypvPSEjNSQiK3B6a0E2ISM1JCIrTVg7azwhIik3JSQhKylcOCtPIyEjNSQiKzROPl5yISM2JCIrLFFebjwhIik3JSQhK1tvOVhHISM1JCIrQCUqMz9UISM2JCIrYmFocjwhIik3JSQhK3hyNEJMISM1JCIrcjUwXj8hIzYkIisuaVd3PCEiKTclJCErQ3lsI3okISM1JCIrRTpAaiEpISM3JCIrNid5PnkiISIpNyUkISsxTGtfVSEjNSQiK1tHJyozPyEjNyQiK2g3PSl5IiEiKTclJCErQUIqPXElISM1JCIrKVJaZEwiISM4JCIrRyo9XXoiISIpNyUkIStyMUZSXiEjNSQhK2QyREI5ISM5JCIrIXlfQyE9ISIpNyUkIStBVG5qYiEjNSQhK0RNX04pKiEjOCQiKy0xVzU9ISIpNyUkISstNy51ZiEjNSQhK1EkenBGJiEjNyQiK0pxJCo9PSEiKTclJCErK2ZJcGohIzUkISt1IXAzXyIhIzYkIis5USp5Iz0hIik3JSQhKyRHKyZbbiEjNSQhK2RJQXhLISM2JCIrKTNncyQ9ISIpNyUkISs6cWw1ciEjNSQhKzg1W19mISM2JCIraEUpcCU9ISIpNyUkISt1PCdbWCghIzUkISthJzQlXCcqISM2JCIrPWorZD0hIik3JSQhK2hiQyF5KCEjNSQhK1lKN1Q5ISM1JCIrT1RGbj0hIik3JSQhKyUqbylmMykhIzUkIStWNCI9LSMhIzUkIisueXN4PSEiKTclJCErISlRSnIkKSEjNSQhKyhHKm8pcCMhIzUkIitiekkpKT0hIik3JSQhK21oXU4nKSEjNSQhK0hXVGRNISM1JCIrL1gmKikqPSEiKTclJCErZW4qeSgpKSEjNSQhK0QrQnlVISM1JCIrIypwZzQ+ISIpNyUkISsuUCh5NCohIzUkISt5ZSdvOCYhIzUkIitAXD8/PiEiKTclJCErTDspW0gqISM1JCErMVVuMGchIzUkIisyIilvST4hIik3JSQhK3NKVW8lKiEjNSQhK0BoJVwmbyEjNSQiKztxKjQlPiEiKTclJCErJz1nIT0nKiEjNSQhK0o9TWF3ISM1JCIrLkoyXj4hIik3JSQhKyQqW1RWKCohIzUkISsnPWlWUCkhIzUkIitaImYzJz4hIik3JSQhKzszPFcpKiEjNSQhK3hxeSgpKikhIzUkIitzJipIcT4hIik3JSQhKyFldCsjKiohIzUkISsoejI1WiohIzUkIitvMk16PiEiKTclJCErZDokNCgqKiEjNSQhK09lPTApKiEjNSQiKylRSnopPiEiKTclJCErXGpoJyoqKiEjNSQhK1gkenIoKiohIzUkIitaRS0nKj4hIik3JSQhKzNKMSgqKiohIzUkISshSCE+ISkqKiEjNSQiKydmb04rIyEiKTclJCErNDJGcyoqISM1JCEraSUqNDkpKiEjNSQiK3pqXzU/ISIpNyUkIStVPElBKiohIzUkISthQlomWyohIzUkIismW2NvLCMhIik3JSQhK2pCR1opKiEjNSQhKzBjQjIhKiEjNSQiK2xIX0E/ISIpNyUkIStxPlNaKCohIzUkISs9Ly8pUikhIzUkIitST1xGPyEiKTclJCErRkYiSGkqISM1JCErZl9NIm8oISM1JCIreS11Sj8hIik3JSQhK0QqR1RaKiEjNSQhK1dWRSUpbyEjNSQiK20oUV8uIyEiKTclJCErJT5FOUkqISM1JCErLS5DT2chIzUkIitOI3B6LiMhIik3JSQhK1wwQzAiKiEjNSQhKzwkM3c7JiEjNSQiK3poIipSPyEiKTclJCErIkhuZykpKSEjNSQhK25XNzNWISM1JCIrVCZvNS8jISIpNyUkIStkKGZXaykhIzUkISs8R2AmWyQhIzUkIit4KD45LyMhIik3JSQhK0N6LSJRKSEjNSQhK0BQQ0NGISM1JCIrIyp5JzQvIyEiKTclJCErbm9WJzQpISM1JCErWSw+Vz8hIzUkIitgYXJSPyEiKTclJCErIjMwOXooISM1JCErbyc+KmY5ISM1JCIrcyZwdy4jISIpNyUkISttRXFtdSEjNSQhK094bip6KiEjNiQiK249JVsuIyEiKTclJCErJlFcSjcoISM1JCErOHRWbGchIzYkIisoUls3LiMhIik3JSQhKyRmNzt3JyEjNSQhK1RMV2JMISM2JCIrcSY0cC0jISIpNyUkIStYXSskUSchIzUkISt5NSUqbzohIzYkIitEKyY9LSMhIik3JSQhKydmI0cpKWYhIzUkISsiKTRSPmIhIzckIismXCk0Oz8hIik3JSQhKyd5VCV5YiEjNSQhK2lEVGs1ISM3JCIrV3dvND8hIik3JSQhK0B0XmFeISM1JCErPiFlbSU+ISM5JCIrelFsLT8hIik3JSQhK20lenZyJSEjNSQiK3JvZlA2ISM4JCIrV3IuJio+ISIpNyUkIStSOHRvVSEjNSQiK2paPSYpPSEjNyQiKyVwISlvKT4hIik3JSQhK0ZoNTRRISM1JCIrN3ooPnYoISM3JCIrXTNCeT4hIik3JSQhK0dVJylSTCEjNSQiK216KlEqPiEjNiQiK01uOHA+ISIpNyUkISs7Lj5pRyEjNSQiKzYoMzYuJSEjNiQiKyIqKlwnZj4hIik3JSQhK2EuSHhCISM1JCIrRCQ9ay0oISM2JCIrKVxDKVw+ISIpNyUkIStcJilRJyk9ISM1JCIrU0NTMTYhIzUkIiteZ3JSPiEiKTclJCErZlVzIVIiISM1JCIrVC1yOzshIzUkIitlP1FIPiEiKTclJCErZScpWzoqKSEjNiQiK2FFYEhBISM1JCIrMDcpKT0+ISIpNyUkISt4aEEsUiEjNiQiK1N3Y01IISM1JCIrREpGMz4hIik3JSQiK2piKUc3IiEjNiQiK2EmXGNyJCEjNSQiK2ohPXcqPSEiKTclJCIrLkM7V2ghIzYkIistLVleWCEjNSQiK0ZsKHApPSEiKTclJCIrTUYqXDYiISM1JCIrOiY0bFQmISM1JCIrXyozayg9ISIpNyUkIitfVXY3OyEjNSQiKz5sTCNHJyEjNSQiK1xgKGYnPSEiKTclJCIrPlRXMUAhIzUkIismKSpwKT1yISM1JCIrdFx0Yj0hIik3JSQiK09mIltmIyEjNSQiKykqKnplKnkhIzUkIit4ZnVYPSEiKTclJCIrS25qd0khIzUkIitzcFclZSkhIzUkIispM2xnJD0hIik3JSQiK3UrcF1OISM1JCIrO1BQZSIqISM1JCIrJkdabiM9ISIpNyUkIitUInpkLCUhIzUkIissIXBhZiohIzUkIiskW1h5Ij0hIik3JSQiK1MoSDJaJSEjNSQiK1t2ankpKiEjNSQiK04tVDQ9ISIpNyUkIit6S1I5XCEjNSQiK3I2cycqKiohIzUkIitYJSpbLD0hIik3JSQiK2YnXGNNJiEjNSQiKzYlW10lKiohIzUkIismNEdUeiIhIik3JSQiKzAsVGpkISM1JCIrInlrY3MqISM1JCIrIip6Tyh5IiEiKTclJCIrOSo+bTsnISM1JCIrTz5CWiQqISM1JCIrQHZDInkiISIpNyUkIitANkVhbCEjNSQiKyIqM2dDKSkhIzUkIitYOSFleCIhIik3JSQiK2xdTkRwISM1JCIrTTQzeSIpISM1JCIrInBnNXgiISIpNyUkIitmWycqeXMhIzUkIis4OFdLdSEjNSQiKyM9X3F3IiEiKTclJCIraHg+OXchIzUkIitManA6bSEjNSQiKyFvKXpqPCEiKTclJCIrQnU/SXohIzUkIitdYXRkZCEjNSQiK2wnPTh3IiEiKTclJCIrRmc+RSMpISM1JCIrLXknKSkpWyEjNSQiKz1paWY8ISIpNyUkIiswalQsJikhIzUkIisyXE5RUyEjNSQiK180dGU8ISIpNyUkIis+TTxiKCkhIzUkIisrZStMSyEjNSQiK156amU8ISIpNyUkIitAbiNvKSopISM1JCIrdmMhZlwjISM1JCIrVnhNZjwhIik3JSQiK2o4eiY+KiEjNSQiKzdBTVg9ISM1JCIrKEhjM3ciISIpNyUkIiskeVI6USohIzUkIisvUClSSCIhIzUkIitZXTpqPCEiKTclJCIrSElnViYqISM1JCIrWj1dJFspISM2JCIrTjRCbTwhIik3JSQiK1s+ZCJvKiEjNSQiK1smUWczJiEjNiQiKyhcbSt4IiEiKTclJCIrOSMpNCZ6KiEjNSQiKyFlKG8nbyMhIzYkIitcKlJZeCIhIik3JSQiKzhfKlEpKSohIzUkIiszIUhuOyIhIzYkIis+YCMqejwhIik3JSQiK2koUXglKiohIzUkIis5WSYqb04hIzckIisjZiMqZXkiISIpNyUkIishb25rKSoqISM1JCIrbCRlIlJaISM4JCIreXldI3oiISIpNyUkIispPSUpKioqKiohIzUkIis+JmV6Kj0hIzwkIis2T3QqeiIhIik3JSQiK2lURCkpKiohIzUkISsoKUh2TFEhIzgkIitiKEd2IT0hIik3JSQiKzxzSV4qKiEjNSQhK3klRz9AJCEjNyQiK1UhXGUiPSEiKTclJCIrSW1CKikpKiEjNSQhKy0pPiQpMyIhIzYkIitAc2tDPSEiKTclJCIrNCIqPi0pKiEjNSQhKyhIOT5iIyEjNiQiK0dMKFEkPSEiKTclJCIrJFI5L3AqISM1JCErSCR6VylbISM2JCIrbVxaVj0hIik3JSQiKyxaO2EmKiEjNSQhK28jKmUzIykhIzYkIis1d1JgPSEiKTclJCIrO1N6JFIqISM1JCErNClHKmU3ISM1JCIrM1xlaj0hIik3JSQiKz9zcTQjKiEjNSQhKyFwV0ghPSEjNSQiKzEhelIoPSEiKTclJCIrcCFwQisqISM1JCErd00kb1cjISM1JCIreTNfJSk9ISIpNyUkIis/SUlzKCkhIzUkIStxI1skeUohIzUkIitiMTomKj0hIik3JSQiKzYqKjM/JikhIzUkIStCYGR6UiEjNSQiK3J6IWUhPiEiKTclJCIrJVxtakMpISM1JCEra2p0RlshIzUkIisvQlY7PiEiKTclJCIrRlEjPSZ6ISM1JCErJjNZaXAmISM1JCIrPkwncCM+ISIpNyUkIitIYj9QdyEjNSQhK0c6KGZiJyEjNSQiKzQ3TVA+ISIpNyUkIisvZkkudCEjNSQhK20oSG1QKCEjNSQiK1FxXVo+ISIpNyUkIitNeic0JnAhIzUkISs7S0RHIikhIzUkIit3SVNkPiEiKTclJCIrXjYzImUnISM1JCErKyVbRXkpISM1JCIrQkoocCc+ISIpNyUkIiskUnpYPichIzUkIStiVXg5JCohIzUkIitKRzt3PiEiKTclJCIrVyVRQ3omISM1JCErXCwoUnEqISM1JCIrNisjXCk+ISIpNyUkIit0Tm52YCEjNSQhK0Y4KFwkKiohIzUkIitKXD4kKj4hIik3JSQiK25wTFhcISM1JCErNC5tKSoqKiEjNSQiKypmUzQrIyEiKTclJCIrITM6RF0lISM1JCErMmheIyopKiEjNSQiK0ZJNjM/ISIpNyUkIisnKWVLW1MhIzUkISsqW1EyaSohIzUkIisjW3JZLCMhIik3JSQiK2JnIlJlJCEjNSQhKyIpNC8lPiohIzUkIis/KHkwLSMhIik3JSQiK2shZS82JCEjNSQhKy5KN0gnKSEjNSQiKyQ+LGUtIyEiKTclJCIrS3M5SEUhIzUkIStAJ1t5JXohIzUkIitWIzQuLiMhIik3JSQiKy8oKT5UQCEjNSQhKyRbcmg8KCEjNSQiK29zMk0/ISIpNyUkIiskUVd5ayIhIzUkISs5UidHTSchIzUkIityUTNQPyEiKTclJCIrPylILjoiISM1JCErWDY2eWEhIzUkIit4PkpSPyEiKTclJCIrdTE2KlwnISM2JCErJypSLzdZISM1JCIrSypbMi8jISIpNyUkIitEXl55OSEjNiQhK0NPR3RQISM1JCIrd2xRVD8hIik3JSQhK3BKImVhJCEjNiQhKyo0c3YpSCEjNSQiKylHQDcvIyEiKTclJCErKlwqPWgmKSEjNiQhK0ghZWxGIyEjNSQiKzFTRFM/ISIpNyUkISt3XlxiOCEjNSQhKz0mKXpjOyEjNSQiK0ItXFE/ISIpNyUkIStUI1w5Jj0hIzUkISshcEYhUjYhIzUkIitkKlJmLiMhIik3JSQhK0ohSEZNIyEjNSQhK09RR3hzISM2JCIrIXA8RS4jISIpNyUkIStMVTRHRyEjNSQhK3M6RzVVISM2JCIrKkdVJkc/ISIpNyUkISttJT5qSSQhIzUkIStgPkM0QCEjNiQiKykqb3RCPyEiKTclJCErdnQ+d1AhIzUkISs/Q1wjUSkhIzckIisyKUcjPT8hIik3JSQhK3o7YU9VISM1JCErSC0rUUAhIzckIisoSFw/LCMhIik3JSQhK24sPidvJSEjNSQhK0l0amI6ISM4JCIrZ01CMD8hIik3JSQhK0p3K0NeISM1JCIrMnE/LjUhIzkkIisvKyN5Kj4hIik3JSQhK0ooKSkpW2IhIzUkIislUlMobyEqISM4JCIrSTUmKSopPiEiKTclJCErKHlnKGZmISM1JCIrUyxtVF0hIzckIiskenI4KT4hIik3JSQhKyFcJ2ViaiEjNSQiK3JwdnQ5ISM2JCIrWi9Wcz4hIik3JSQhKzlsT05uISM1JCIrJlJlLD8kISM2JCIrcXgyaj4hIik3JSQhK1k/OSk0KCEjNSQiKzYlNDMlZSEjNiQiK3VvT2A+ISIpNyUkISsrcypIVyghIzUkIitML1srJiohIzYkIis0SE5WPiEiKTclJCErUDgxcHghIzUkIismKnpYQTkhIzUkIitXRjRMPiEiKTclJCErYjdediEpISM1JCIrTUViKio+ISM1JCIrWFlrQT4hIik3JSQhK3ZLZGgkKSEjNSQiKyFwUEtuIyEjNSQiK1t6MTc+ISIpNyUkISsnPURsaSkhIzUkIis/U1BITSEjNSQiKzxGVSw+ISIpNyUkISt4ISlwcCkpISM1JCIrSklRW1UhIzUkIisxJXAyKj0hIik3JSQhKz4heS80KiEjNSQiKz1oODFeISM1JCIrOyZvLCk9ISIpNyUkISs+d0kpRyohIzUkIitNTTN2ZiEjNSQiK1wtb3A9ISIpNyUkIStDdW9pJSohIzUkIismM2xiI28hIzUkIituVE9mPSEiKTclJCErJj14SmgqISM1JCIrPCZRc2koISM1JCIrYil5I1w9ISIpNyUkIStvcFJSKCohIzUkIityKVwwTikhIzUkIispZSJbUj0hIik3JSQhKzUiRzUlKSohIzUkIis6WzxvKikhIzUkIisvIUcrJD0hIik3JSQhK0ZTInkiKiohIzUkIitoZU5jJSohIzUkIishenI0Iz0hIik3JSQhK2kzY3AqKiEjNSQiK2Ikb2d6KiEjNSQiK3dWTzc9ISIpNyUkIStzejgnKioqISM1JCIrXWcmUigqKiEjNSQiK1ZZRC89ISIpNyUkIStlI3l1KioqISM1JCIrIXopKUgpKiohIzUkIitaJylvJ3oiISIpNyUkIStPJHlOKCoqISM1JCIrYCozRyMpKiEjNSQiK2IkNCgqeSIhIik3JSQhK1omKVxDKiohIzUkIisiM1woKlwqISM1JCIrLGtOJHkiISIpNyUkISspemkuJikqISM1JCIrKyk+bC0qISM1JCIra2VteDwhIik3JSQhK2UjZTh2KiEjNSQiK2FRZUAlKSEjNSQiK2krbnM8ISIpNyUkISshKVt0RicqISM1JCIrPCFbIzN4ISM1JCIra3RSbzwhIik3JSQhK3FaISl6JSohIzUkIitSKj1OInAhIzUkIitPPyhbdyIhIik3JSQhKys5JXpJKiEjNSQiK0Y0eW1nISM1JCIrKDQ5QHciISIpNyUkIStuJ3lENiohIzUkIisrRk8pPiYhIzUkIis1I1IsdyIhIik3JSQhKyd6NFUqKSkhIzUkIitJZDFRViEjNSQiKyJmZSplPCEiKTclJCErIjQnUWAnKSEjNSQiKypwR1BeJCEjNSQiK1YqeSZlPCEiKTclJCErX2JyIVIpISM1JCIrJW8rKlxGISM1JCIrQ0MrZjwhIiktSSdDT0xPVVJHNiI2JkkkUkdCRzYiJCIiISIiISQiIiEiIiEkIiorKysrIiEiKS1JKkFYRVNTVFlMRUc2JCUqcHJvdGVjdGVkR0koX3N5c2xpYkc2IjYjSSdOT1JNQUxHNiI=

To find where the cow move's horizontally, I need to find where the z-coordinate isn't changing, or where the derivative of the z-component is zero: diff(r(t),t);

NyUsJC1JJHNpbkc2JCUqcHJvdGVjdGVkR0koX3N5c2xpYkc2IjYjLCRJInRHRikiIiMhIiMsJComLUYlNiMsJEYsIiIkRi0tSSRjb3NHRiZGMiIiIiIiKiwmRjEhIiRGNUY6

solve(-3*sin(3*t)-3*cos(3*t)=0,t);

LCRJI1BpRyUqcHJvdGVjdGVkRyMhIiIiIzc=

evalf(%);

JCEreVEqemgjISM1

Unfortunately, the result Maple gave me isn't in the time range I'm interested in. From here, I can either use my trig knowledge, or I can cop out and use fsolve. I'll use trig: the deriv of the z-component will be zero if sin(3t)=- cos(3t), or if 3t=3Pi/4, 7Pi/4, 11Pi/4, 15Pi/4, or 19Pi/4, so if t=3Pi/12, 7Pi/12, 11Pi/12, 15Pi/12, or 19Pi/12. I got 5 zeros, let me just look at the graph to check: plot(-3*sin(3*t)-3*cos(3*t),t=0..5);

NictJSdDVVJWRVNHNiQ3aHI3JCQiIiEhIiIkISNJISIiNyQkIjJMTEwkM3gmKSozIiEjPCQhMUJhTVEzYy9RISM6NyQkIi5EMVIoKlJjIiEjOCQhMVskMzFjM0IuJSEjOjckJCIybm07SDJQIlE/ISM8JCExMCE9IT0hNCd5VCEjOjckJCIyLUQiRykpPldyQCEjPCQhMSYpeWNObmkvVSEjOjckJCIyTiRlay5wdS9CISM8JCEwKG8qUSIzI1JBJSEjOTckJCIyblQ1IT49MFFDISM8JCExUShcKCpSZ2tCJSEjOjckJCIudlZ0YzhkIyEjOCQhMSZIODVXREFDJSEjOjckJCIxJGVSKFw7bS9GISM7JCExKXoieT1uP1RVISM6NyQkIjJqOy9eY216JEchIzwkITIwJyopNGllU0xVISM7NyQkIjB2by9bcjcoSCEjOiQhMiZSSE5YYCQpPVUhIzs3JCQiMkxMTGVSd1g1JCEjPCQhMXYlRyRvJT12PiUhIzo3JCQiMlBMTExlSThrJCEjPCQhMGopPkhDRldTISM5NyQkIjFNTCQzeCUzeVQhIzskITJHXltpKyhRJ3kkISM7NyQkIjIxK3YkZnlHN1ohIzwkITEpeU1vMVdDViQhIzo3JCQiMW5tInolNFxZXyEjOyQhMjFwOCxESzAqSCEjOzckJCItdiRmbDx1JiEjNyQhMkdNTHRJdz9eIyEjOzckJCIxTUxlUi0vUGkhIzskITJ4Nyo+JCpRRXk+ISM7NyQkIjFubSJ6V28pXG4hIzskITJjLnYhUilcKHo4ISM7NyQkIi1EY21waXMhIzckITFlJHohKW9Ca1soISM7NyQkIjFubSJIS2tJeighIzskITFYLiY0SHdJdighIzw3JCQiMU1MZSopPlZCJCkhIzskIjFpKnpDIltSYmYhIzs3JCQiMW5tVGcoKTRfKSkhIzskIjFhVk8jUSdcXjchIzo3JCQiLURKYnchUSohIzckIjJGLCNIOCJSZyg9ISM7NyQkIjFOJGVrR2tYIyoqISM7JCIxY1M9dCN5InBDISM6NyQkIjJvbW1USU9vLyIhIzskIjElNERjLFpuKkghIzo3JCQiMi4rRCJHVHQlNCIhIzskIjE8PyhcJ2UjZlIkISM6NyQkIjJOTCQzXz5qVTYhIzskIjEqUWFiJG81RFAhIzo3JCQiMm9tIkhkTmInPiIhIzskIjEqeSlvR0RgLlMhIzo3JCQiMiwrK0Q7di9EIiEjOyQiMTJoVzpFVXhUISM6NyQkIjIsK0RjIjQsazchIzskIjFZenNWQTEvVSEjOjckJCIyLCtdKG9tYXg3ISM7JCIxWWw5UTB4QlUhIzo3JCQiLnY9VSMzIkgiISM3JCIxKHklPTBdXk9VISM6NyQkIit2Ij1ZSSIhIiokIjEvdnVLWUZVVSEjOjckJCIuRCJHUjo9OCEjNyQiMTBZIVsjKlI1QyUhIzo3JCQiLUQibypvSjghIzYkIjJEU1pxIkgiR0IlISM7NyQkIi52VlZEX00iISM3JCIxOUJgdHJnPFUhIzo3JCQiLHY9aChlOCEjNSQiMSVcPFZ3WmE+JSEjOjckJCIsRCxRNFQiISM1JCIxNC1eMSh6ZC8lISM6NyQkIix2JFs2ajkhIzUkIjJOeWBKLyY9KHokISM7NyQkIjJvO0hLUidcNTohIzskIjF3MCsuNHohXCQhIzo3JCQiMk1MZSpbeih5YiIhIzskIjFXKCl5Uk8pUjYkISM6NyQkIi9EYywjPlVoIiEjOCQiMVA7XD0neltlIyEjOjckJCIyb21tVFhnMG4iISM7JCIyTnQrdHQuQCk+ISM7NyQkIjFubVQmKSkpRz08ISM6JCIyWGxeOzhUbFUiISM7NyQkIjJvbW1tSjxndyIhIzskIjEyPCVwdDl5VCkhIzs3JCQiMkwkZWtHb2BAPSEjOyQiMTkkKnAjPTN0UyIhIzs3JCQiLkQxTWNxKD0hIzckITFqTzImUVxAayYhIzs3JCQiMkwkZTk7MD9FPiEjOyQhMlFFc04qenp2NiEjOzckJCIybW1tO3BXYCg+ISM7JCEyUSUzX18ocD13IiEjOzckJCIyTyRlOVRPRUg/ISM7JCExdz5EUEtYZ0IhIzo3JCQiMi4rRDFmIz0kMyMhIzskITFOal9kJDR1KkchIzo3JCQiLUQiPUVYOCMhIzYkITFeYW9yQWZRTCEjOjckJCIudj14cGU9IyEjNyQhMSpSLidwPnMrUCEjOjckJCIyUCRlUkE5V1JBISM7JCEyL2BdNG5WXSlSISM7NyQkIjFubSJIMjhJSCMhIzokITFDWTZqZWxtVCEjOjckJCIxVWdfWj5KMEIhIzokIS8sVHZxSSQ+JSEjODckJCIxPGE4QTNoPEIhIzokITFvWEBKLkQ5VSEjOjckJCIxI3pXbnA0KkhCISM6JCExdFFWQXJYSFUhIzo3JCQiMW5UTnImM0FNIyEjOiQhMEUnW1xuISpRVSEjOTckJCIxVU4nZlcyWE4jISM6JCExaSh5JVxqZVVVISM6NyQkIjE8SGQ/aiFvTyMhIzokITJsRTtQIjRcU1UhIzs3JCQiMjxIIz0mPjAiekIhIzskITF3JD5YSEJFQiUhIzo3JCQiMm9tInpwU1MiUiMhIzskITE3PU0sVSoqPVUhIzo3JCQiL3YkNDFvV1cjISM4JCEvRFtuKVJaNCUhIzg3JCQiMkxMJDNfP2AoXCMhIzskITFXKT0kXF8kcCdRISM6NyQkIjFMM19EMWxfRCEjOiQhMVVzPnFHKG9fJCEjOjckJCIyT0xlKik+cHhnIyEjOyQhMkJ6ZXNXJ2YhNCQhIzs3JCQiMW5tO3ordmJFISM6JCExOVhuSWlwVEUhIzo3JCQiLnYkZjR0LkYhIzckITIoRyJRRShlOlFAISM7NyQkIjJuO3pXaV5idiMhIzskITIiXFhwYHIoXGEiISM7NyQkIjJQTCRlKkdzdCFHISM7JCExLFgjUS1SYDkqISM7NyQkIjFuO0gyIjM0J0chIzokITEvXio0Yi1DUyMhIzs3JCQiK0RSVzlIISIqJCIyJm9XLzctUC1XISM8NyQkIjIuK0QieSM9bydIISM7JCIyMUZ2KHl1NSY0IiEjOzckJCItREpFPj5JISM2JCIyTk9cWSh5KkhzIiEjOzckJCIvdiQ0Xm4pcEkhIzgkIjJfJT1DOS9FIUgjISM7NyQkIjIuK0QxUlUwNyQhIzskIjJYKjM6J1skcC9HISM7NyQkIi92by8jM288JCEjOCQiMXhkMGZXaSpIJCEjOjckJCItdj1TMkxLISM2JCIyJ2Uob1prajJxJCEjOzckJCIxTCQzX05KT0ckISM6JCIydDEkZU5mdXJSISM7NyQkIjJqbW07cCk9TUwhIzskIjJEd2Q0aU46OiUhIzs3JCQiMUxla3lRb1pMISM6JCIxaDQuRihHTj0lISM6NyQkIjInKipcaWwhejZPJCEjOyQiMXMkMyhHY20zVSEjOjckJCIybTsvRUR1WVAkISM7JCIwUjMtODBwQSUhIzk3JCQiMkxMJGVSJXAiKVEkISM7JCIxPS9nUnRAUVUhIzo3JCQiL0RjRVltLE0hIzgkIjFlTXo8UGVVVSEjOjckJCIxbjthOClmXlQkISM6JCIxSCE+KjNyKipSVSEjOjckJCIyTyQzXytdbEdNISM7JCIxMidlP3ZoL0IlISM6NyQkIjItKyt2PV1AVyQhIzskIjI6USdIdUsqUkAlISM7NyQkIjJuO0gjb1oxIlwkISM7JCIybGlOMSVbdCc0JSEjOzckJCIxTCRlKlskeipSTiEjOiQiMWZqW0xtVCIqUSEjOjckJCIxbiJIZCFmWCRmJCEjOiQiMVoscT9ZV3JOISM6NyQkIjIxKytEWUtwayQhIzskIjJhP01gKilbKGZKISM7NyQkIjJMJGUqW3Rcc3AkISM7JCIxVTFgLWgwKXAjISM6NyQkIjJsbSJIMnFjWlAhIzskIjJEZU0mUTMrdkAhIzs3JCQiMk1MM18waiwhUSEjOyQiMnMlZiQ0QidldjohIzs3JCQiMi8rREo1ZkYmUSEjOyQiMWpZbyI9YS1QKiEjOzckJCIyTSRla2A4PS9SISM7JCIxLzQ1ImYwNCFIISM7NyQkIjJsbW1UZy5jJlIhIzskITIxPTFqaFV0aiQhIzw3JCQiMUxlKlskelY0UyEjOiQhMiNvOywlUTgoUTUhIzs3JCQiLkRjRXNLMSUhIzckITJNImZdZSRlbW8iISM7NyQkIjFuInpXN0BeNiUhIzokITJpViFRMFNScEEhIzs3JCQiMU1MTCQpKnBwOyUhIzokITJ5KipRbShHTCh6IyEjOzckJCIxTSQzLSRIKio+VSEjOiQhMVdfInBXIUduSyEjOjckJCIxTUwzeGUsdFUhIzokITJfJ1wwSzB0YU8hIzs3JCQiMSx2PW4oKmZEViEjOiQhMlZhPHUjcCZ5JVIhIzs3JCQiMW47SGRPPXlWISM6JCExR0EobzlVSDklISM6NyQkIjB2PVVBVkJTJSEjOSQhMDkjeTR5Rik+JSEjOTckJCIxTWU5InotbFUlISM6JCExMk4hPSopbzpCJSEjOjckJCIxdiQ0WWQjZVFXISM6JCExdylScGApKSlSVSEjOjckJCIxPEgyZUJtXVchIzokITF2Ny4nZVNFQyUhIzo3JCQiMWZrYFRAdWlXISM6JCExZEtCRDkjKVJVISM6NyQkIjIwKytdIz4jW1olISM7JCExIno8bHZNOUIlISM6NyQkIjFNJDNfNSwtYCUhIzokITEpMyU+bjBAQVQhIzo3JCQiMW5tVCZHIWUmZSUhIzokITJuQVwsIXpZKipRISM7NyQkIjEsXVAlMzdeaiUhIzokITIleSMqZSQzQCE0TyEjOzckJCIxTUxMJClRayVvJSEjOiQhMjFgayVwOS5SSyEjOzckJCIxbiJ6PjZidXQlISM6JCEyRnYuKnAiUmh3IyEjOzckJCIuRDFNbS16JSEjNyQhMWw+USVbZVJBIyEjOjckJCIrRE0iMyVbISIqJCEyUClbITMqKVxFbCIhIzs3JCQiMjErdiQ0ME8iKlshIzskITI0WnJeRTZNLyIhIzs3JCQiMSx2b2Etb1hcISM6JCEyMXooKVtxb1NpJCEjPDckJCIjXSEiIiQiMUg2MCI9LT9HJCEjOy0lJkNPTE9SRzYmJSRSR0JHJCIjNSEiIiQiIiEhIiIkIiIhISIiLSUlVklFV0c2JDskIiIhISIiJCIjXSEiIiUoREVGQVVMVEctJSpBWEVTU1RZTEVHNiMlJ05PUk1BTEctJShTQ0FMSU5HRzYjJS5VTkNPTlNUUkFJTkVERy0lJVJPT1RHNictJSlCT1VORFNfWEc2IyQiJD8kISIiLSUpQk9VTkRTX1lHNiMkIiMhKiEiIi0lLUJPVU5EU19XSURUSEc2IyQiJSFmJCEiIi0lLkJPVU5EU19IRUlHSFRHNiMkIiU1USEiIi0lKUNISUxEUkVORzYi

At any given time, the direction the cow is moving is given by the velocity vector, or in other words, by r' at that time. If I just tired to plug a specifid time into the derivative of r, Maple will get confused (it will try plugging the number in before taking the derivative. Here's one way to do it: v:= T -> subs(t=T,diff(r(t),t));

Zio2I0kiVEc2IkYlNiRJKW9wZXJhdG9yR0YlSSZhcnJvd0dGJUYlLUklc3Vic0clKnByb3RlY3RlZEc2JC9JInRHRiU5JC1JJWRpZmZHRis2JC1JInJHRiU2I0YuRi5GJUYlRiU=

v(3*Pi/12); evalf(%);

NyUsJC1JJHNpbkc2JCUqcHJvdGVjdGVkR0koX3N5c2xpYkc2IjYjLCRJI1BpR0YnIyIiIiIiIyEiIywkKiYtRiU2IywkRiwjIiIkIiIlRi8tSSRjb3NHRiZGNEYuIiIqLCZGMyEiJEY5Rj0=

NyUkISIjIiIhJCErOTApPj0kISIqJEYlRiU=

v(7*Pi/12);evalf(%);

NyUsJC1JJHNpbkc2JCUqcHJvdGVjdGVkR0koX3N5c2xpYkc2IjYjLCRJI1BpR0YnIyIiKCIiJyEiIywkKiYtRiU2IywkRiwjRi4iIiUiIiMtSSRjb3NHRiZGNCIiIiIiKiwmRjMhIiRGOUY+

NyUkIiIiIiIhJCIrOTApPj0kISIqJEYlRiU=

v(11*Pi/12); evalf(%);

NyUsJC1JJHNpbkc2JCUqcHJvdGVjdGVkR0koX3N5c2xpYkc2IjYjLCRJI1BpR0YnIyIjNiIiJyEiIywkKiYtRiU2IywkRiwjRi4iIiUiIiMtSSRjb3NHRiZGNCIiIiIiKiwmRjMhIiRGOUY+

NyUkIiIiIiIhJCErOTApPj0kISIqJEYlRiU=

v(15*Pi/12); evalf(%);

NyUsJC1JJHNpbkc2JCUqcHJvdGVjdGVkR0koX3N5c2xpYkc2IjYjLCRJI1BpR0YnIyIiJiIiIyEiIywkKiYtRiU2IywkRiwjIiM6IiIlRi8tSSRjb3NHRiZGNCIiIiIiKiwmRjMhIiRGOUY+

NyUkISIjIiIhJCIrOTApPj0kISIqJEYlRiU=

v(19*Pi/12); evalf(%);

NyUsJC1JJHNpbkc2JCUqcHJvdGVjdGVkR0koX3N5c2xpYkc2IjYjLCRJI1BpR0YnIyIjPiIiJyEiIywkKiYtRiU2IywkRiwjRi4iIiUiIiMtSSRjb3NHRiZGNCIiIiIiKiwmRjMhIiRGOUY+

NyUkIiIiIiIhJCErOTApPj0kISIqJEYlRiU=

Next, I want to find where the cow is moving straight up and down. In order for the cow to be moving like this, the only component that can be changing is the z-component. So I want to find those times when both the x and y components are not changing. For this, I need the derivative again. v(t);

NyUsJC1JJHNpbkc2JCUqcHJvdGVjdGVkR0koX3N5c2xpYkc2IjYjLCRJInRHRikiIiMhIiMsJComLUYlNiMsJEYsIiIkRi0tSSRjb3NHRiZGMiIiIiIiKiwmRjEhIiRGNUY6

I want to find when both the x and y component of v(t) are zero. I can tell Maple to work with just the first component, or just the second, as follows: v(t)[1];v(t)[2];

LCQtSSRzaW5HNiQlKnByb3RlY3RlZEdJKF9zeXNsaWJHNiI2IywkSSJ0R0YoIiIjISIj

LCQqJi1JJHNpbkc2JCUqcHJvdGVjdGVkR0koX3N5c2xpYkc2IjYjLCRJInRHRikiIiQiIiMtSSRjb3NHRiZGKiIiIiIiKg==

So now I can use that to have Maple solve for when both are zero at the same time: solve([v(t)[1]=0,v(t)[2]=0],t);

Nig8Iy9JInRHNiIiIiE8Iy9GJUkjUGlHJSpwcm90ZWN0ZWRHRiNGKDwjL0YlLCRGKiMiIiIiIiM8Iy9GJSwkRiojISIiRjE=

From this, I can see that it's zero at every multiple of Pi/2 between 0 and 5, so at t=0, t=Pi/2, t=Pi, t=3*Pi/2. Now here's the really cool part: finding maximum speed Speed = ||velocity|| = the length of the derivative of the position function. Recall we've already defined the velocity function: v(t);

NyUsJC1JJHNpbkc2JCUqcHJvdGVjdGVkR0koX3N5c2xpYkc2IjYjLCRJInRHRikiIiMhIiMsJComLUYlNiMsJEYsIiIkRi0tSSRjb3NHRiZGMiIiIiIiKiwmRjEhIiRGNUY6

and then I have Maple find the length. If I load the vector calculus package, I could just used the "norm" command, but I'll again have Maple pick out the first, second, and third components of the velocity vector: speed:=sqrt( v(t)[1]^2 + v(t)[2]^2 + v(t)[3]^2);

KiQsKCokLUkkc2luRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiNiMsJEkidEdGKiIiI0YuIiIlKiYtRiY2IywkRi0iIiRGLy1JJGNvc0dGJ0YyRi4iIyIpKiQsJkYxISIkRjVGOkYuIiIiI0Y7Ri4=

I can get a sense of where the max is by looking at the graph: plot(speed,t=0..5);

NictJSdDVVJWRVNHNiQ3XXo3JCQiIiEhIiIkIiNJISIiNyQkIjJLTEwzRldZcyMhIz0kIjI7ZDZAWzl0QiQhIzs3JCQiMmttbTthKUdcYSEjPSQiMmFCQzQkejVqTSEjOzckJCIsRCJHJFI8KSEjNyQiMnYlKXo+W1siKm8kISM7NyQkIjJMTEwkM3gmKSozIiEjPCQiMEN0SzAicEdSISM5NyQkIjJtO3olXHYjcEsiISM8JCIxVElqVCoqb2FUISM6NyQkIi5EMVIoKlJjIiEjOCQiMUBXPDhdI29SJSEjOjckJCIySyQzeEpzMSw9ISM8JCIxeC9LdSZvJVtZISM6NyQkIjJubTtIMlAiUT8hIzwkIjEpZUBeU0Z3KlshIzo3JCQiMk4kZWsucHUvQiEjPCQiMSI0L1ohM1hiXiEjOjckJCIudlZ0YzhkIyEjOCQiMW5pIylbKDRrTyYhIzo3JCQiMmo7L15jbXokRyEjPCQiMXBvRVt4KXldJiEjOjckJCIyTExMZVJ3WDUkISM8JCIxKip5JjQpemxoYiEjOjckJCIyTkwkZSpbYEhQJCEjPCQiMVlxN0ldXjpiISM6NyQkIjJQTExMZUk4ayQhIzwkIjFfYndDZGNsYCEjOjckJCIxTUwzeHdxNFIhIzskIjE+bUo1MV49XiEjOjckJCIxTUwkM3glM3lUISM7JCIxbVhyd3oyI3olISM6NyQkIjIudm9IYU47SiUhIzwkIjExKHlIcCR5M1khIzo3JCQiMW5UNTpqPVhXISM7JCIxZiZmWjMnejxXISM6NyQkIjElZVJzM1AoeVghIzskIjBUZ1ZNeFlBJSEjOTckJCIyMSt2JGZ5RzdaISM8JCIxWyw8JDN5Yy4lISM6NyQkIjJPJGVrLiUqUXpcISM8JCIxJFI8QiIqM3VwJCEjOjckJCIxbm0ieiU0XFlfISM7JCIyJmU0JilHSzJkTSEjOzckJCIudiQ0JzQuUCYhIzgkIjJHT11LbXgzUiQhIzs3JCQiMU1MJDNGR1RcJiEjOyQiMToxIT1UamhOJCEjOjckJCIvRGMsdy5jYiEjOSQiMjFjUmEhcGBdTCEjOzckJCIxbTtIS3AlemgmISM7JCIyQkNvMiUqSENOJCEjOzckJCIxTDMtamkmKXpjISM7JCIyWFUkKSkpKlJZaEwhIzs3JCQiLXYkZmw8dSYhIzckIjJ4ISpRPyRHOnhMISM7NyQkIjFtbW07SFMqKWYhIzskIjJWPzxjWD1SXCQhIzs3JCQiMU1MZVItL1BpISM7JCIxOWFRb3M9aU8hIzo3JCQiLXZWVlgkXCchIzckIjIjNHNHOCc9OiVRISM7NyQkIjFubSJ6V28pXG4hIzskIjI4ZSpwYFB0JSlSISM7NyQkIiliMnlvISIpJCIxMkVKYiRlTC4lISM6NyQkIjFNTDNfREcxcSEjOyQiMVY6UEQmSEwxJSEjOjckJCIxbm07LycqW01yISM7JCIxPXFLZXg6dFMhIzo3JCQiLURjbXBpcyEjNyQiMUNFRmZNNmlTISM6NyQkIjFNTGUqWyEpeV8oISM7JCIyYVtbbCYqKnp0UiEjOzckJCIxbm0iSEtrSXooISM7JCIyLigqUXlaKjQxUSEjOzckJCIxLCtEYyJbI2UhKSEjOyQiMigpZWQ5Ij0kKXpOISM7NyQkIjFNTGUqKT5WQiQpISM7JCIxLGoncERla0skISM6NyQkIit2YHcoZSkhIzUkIjJtVnM1NFVtMyQhIzs3JCQiMW5tVGcoKTRfKSkhIzskIjF1NU4wSj0tSCEjOjckJCIuREpYbFUpKikhIzgkIjJPRy4qZU5FVUchIzs3JCQiMUxMJGU5S2s2KiEjOyQiMjIpPiVvJzMheSFHISM7NyQkIi92PSNcOkQ9KiEjOSQiMWxXI1E6Xy8hRyEjOjckJCIxbTthUSkpZlsjKiEjOyQiMihIKT5FbFInKnojISM7NyQkIjFMZSpbPSNvOSQqISM7JCIyJ28mSCc0TD0wRyEjOzckJCItREpidyFRKiEjNyQiMlAkcEo4MiFvIkchIzs3JCQiMW5UJikzXG1fJyohIzskIjJROnAjZlpYPkghIzs3JCQiMU4kZWtHa1gjKiohIzskIjE8TEUmcCxKMyQhIzo3JCQiMEQxa09ZJz41ISM5JCIyMUA+ISkqMz1zSyEjOzckJCIyb21tVElPby8iISM7JCIyPCs2OT9ZO1kkISM7NyQkIjIuK0QiR1R0JTQiISM7JCIxLGloTiwmM3gkISM6NyQkIjJOTCQzXz5qVTYhIzskIjFHcl1kb1J5UyEjOjckJCIyLV0ob2FGZnA2ISM7JCIxVFttQDtZdVUhIzo3JCQiMm9tIkhkTmInPiIhIzskIjEuJSlvSE5GJVwlISM6NyQkIjJMJGUqKWZWXkI3ISM7JCIxKj5ebEgoUktaISM6NyQkIjIsKytEO3YvRCIhIzskIjExXEk5XGR0XCEjOjckJCIyLCtdKG9tYXg3ISM7JCIxdlA5dSo9aj4mISM6NyQkIit2Ij1ZSSIhIiokIjFLJSopXEp1UlAmISM6NyQkIi5EIkdSOj04ISM3JCIxRHlRQG4wUWEhIzo3JCQiLUQibypvSjghIzYkIjFkJjMmPlohPlsmISM6NyQkIjItXTd5YmQlUTghIzskIjI5Kik0MSdcWyZcJiEjOzckJCIudlZWRF9NIiEjNyQiMToxZzg+Oi5iISM6NyQkIi92JDRKJCo+TiIhIzgkIjFcTkQvKXlZXSYhIzo3JCQiLHY9aChlOCEjNSQiMDg9LTZxKSpcJiEjOTckJCIpJ1xbUSIhIigkIjE7Mio9JClRJj5hISM6NyQkIixELFE0VCIhIzUkIjEqSGlUbSQpKlFfISM6NyQkIitEay1QOSEiKiQiMTgzJClSbmlpXCEjOjckJCIsdiRbNmo5ISM1JCIxJFw3VzJeWGclISM6NyQkIjI+SEtrQWdcWiIhIzskIjBDKltTVEVAVyEjOTckJCIyTWVrYGgwb1siISM7JCIxJzNAXz4lPkhVISM6NyQkIjF2b0gvNWwpXCIhIzokIjBSNy0pKiopPi4lISM5NyQkIjJvO0hLUidcNTohIzskIjJqKkhpYlcmUSRRISM7NyQkIjIlZTk7I3lUQl8iISM7JCIyN3ZuKFJIYVJPISM7NyQkIjB2JDRycj1NOiEjOSQiMSoqZUZlcUphTSEjOjckJCIyPS9FK2NLZ2EiISM7JCIxeWpEbSM9UUckISM6NyQkIjJNTGUqW3ooeWIiISM7JCIyMXlRbS86UTgkISM7NyQkIjJvVGdfZFtnZSIhIzskIjElPlVQUVEnKilHISM6NyQkIi9EYywjPlVoIiEjOCQiMTkqeSgqKUdATUchIzo3JCQiMk1la3kjKSpRVTshIzskIjJiUlFKaitzJUghIzs3JCQiMm9tbVRYZzBuIiEjOyQiMXUpeW9JdGA6JCEjOjckJCIxbm1UJikpKUc9PCEjOiQiMmpqP1VjMlJdJCEjOzckJCIyb21tbUo8Z3ciISM7JCIxKFIiUTd4Vk9PISM6NyQkIjBEY0UyeFB6IiEjOSQiMmA/QD4ib2t2TiEjOzckJCIyTCRla0dvYEA9ISM7JCIxQ3BzYTxePk0hIzo3JCQiMm9UTlllJ0hcPSEjOyQiMngjKWY6dEU3PiQhIzs3JCQiLkQxTWNxKD0hIzckIjJiT19aXiEpKUdIISM7NyQkIjJtVCZRRyVHOyE+ISM7JCIyPCQ+M0BFXDRGISM7NyQkIjJMJGU5OzA/RT4hIzskIjFVajdGa3RXRCEjOjckJCIyPC9FK2MnW1E+ISM7JCIyJmUtSjolKWYlXCMhIzs3JCQiMEQxUmdzMiY+ISM5JCIxWT9LJipSR3FDISM6NyQkIjJWTlllaTpwJj4hIzskIjJjInlJVihwI29DISM7NyQkIjIlZWt5WidlSSc+ISM7JCIwdE1yZEhJWiMhIzk3JCQiMkVjRShwOz9wPiEjOyQiMXo4PlNyVSVbIyEjOjckJCIybW1tO3BXYCg+ISM7JCIybSUzLHgkPUFdIyEjOzckJCIwRDFrOy9CKyMhIzkkIjJOJSozRjtnZWsjISM7NyQkIjJPJGU5VE9FSD8hIzskIjIxMmQ0WzxTJ0chIzs3JCQiMTxhKWU2QmkwIyEjOiQiMidROzhbJz1QNiQhIzs3JCQiMi4rRDFmIz0kMyMhIzskIjJgLyEzZCEqKVJPJCEjOzckJCIvdiRmUWEpM0AhIzgkIjFMV1ZbMW4pZSQhIzo3JCQiLUQiPUVYOCMhIzYkIjF2NVtxQUUpeiQhIzo3JCQiMi5daWwoej5nQCEjOyQiMW8tMkI0OioqUiEjOjckJCIudj14cGU9IyEjNyQiMSdwdkBZPjs/JSEjOjckJCIxPGE4KGZiRUAjISM6JCIxV1cjKVxuJFxVJSEjOjckJCIyUCRlUkE5V1JBISM7JCIxYUZAay15bFkhIzo3JCQiMi9EY3dDRmlFIyEjOyQiMWB5UDwrcT9cISM6NyQkIjFubSJIMjhJSCMhIzokIjE8KGZfTmtxPCYhIzo3JCQiMTxhOEEzaDxCISM6JCIxNih6IylRdnBSJiEjOjckJCIxblROciYzQU0jISM6JCIxdyZlVnEiZSRlJiEjOjckJCIxPEhkP2ohb08jISM6JCIxbVpLNjEpKT1kISM6NyQkIjJvbSJ6cFNTIlIjISM7JCIxXyZIImVnLSh5JiEjOjckJCIyYipbb29xLilSIyEjOyQiMUdrMlJtQyN6JiEjOjckJCIyWjd5djFxWVMjISM7JCIxRSQ+QXo4OnomISM6NyQkIjFhOFptSUk2QyEjOiQiMSYpZlB3UW8leSYhIzo3JCQiMSRla2AxT3pUIyEjOiQiMmIkSC4xV2tyZCEjOzckJCIyOy9eSjEtN1YjISM7JCIxd2xvXzBsRWQhIzo3JCQiL3YkNDFvV1cjISM4JCIyWDxiLXouamwmISM7NyQkIjE8L15jKytyQyEjOiQiMThgbSMzVDpXJiEjOjckJCIyTEwkM18/YChcIyEjOyQiMkRNJDRdZmJQXiEjOzckJCIxM0ZXJnA2OF4jISM6JCIxJT13UlcuNCZcISM6NyQkIjEkMy0pUTg0REQhIzokIjFoMTJTTG5cWiEjOjckJCIxZTk7Iyk0KClRRCEjOiQiMUMoSFpsIXlRWCEjOjckJCIxTDNfRDFsX0QhIzokIjIwVj4hKT5sUkslISM7NyQkIjIkMy0pKW8tVm1EISM7JCIxSDNZTilRPDYlISM6NyQkIjJNZVJBIio0LWUjISM7JCIyOWA/aiopWyM0UiEjOzckJCIyJmUqKWZiJiopUmYjISM7JCIxVXRreUwrQ1AhIzo3JCQiMk9MZSopPnB4ZyMhIzskIjI4JnBrJUgqUmpOISM7NyQkIjIvXWkhUidmPGojISM7JCIxTUJgM25HaEwhIzo3JCQiMW5tO3ordmJFISM6JCIyTik+Jz1nIlJ0SyEjOzckJCIyJDNGPipvWjxtIyEjOyQiMS9AT3M1Q3BLISM6NyQkIjIudj0jKkhYeG0jISM7JCIxaWBjaVhsckshIzo3JCQiMjx6VyM0SHV0RSEjOyQiMkZbXmhhdCxHJCEjOzckJCIySyQzRj4wdXpFISM7JCIyLSQpMy8iKmVVSCQhIzs3JCQiMm4iSEtSZHQicCMhIzskIjIoMyZcPSFcbU9MISM7NyQkIi52JGY0dC5GISM3JCIyUTNjbSYqZU5SJCEjOzckJCIybjt6V2leYnYjISM7JCIydlUhKW9IX2BuJCEjOzckJCIyUEwkZSpHc3QhRyEjOyQiMWtpLSUqNG5wUCEjOjckJCIyLl1QJSk+U1QkRyEjOyQiMjhlbkonUk8nbyQhIzs3JCQiMW47SDIiMzQnRyEjOiQiMVh1WWc8YzROISM6NyQkIjJOJGU5O2duKClHISM7JCIyd1xJK0Mpel9LISM7NyQkIitEUlc5SCEiKiQiMnRzQEonZURVSCEjOzckJCIyL11pOjVKMSVIISM7JCIybHkoKSozOThDRSEjOzckJCIyLitEInkjPW8nSCEjOyQiMndPQVJYIz5UQiEjOzckJCIyLV0ob2FhKyQqSCEjOyQiMSplQmp1XyNcQCEjOjckJCItREpFPj5JISM2JCIyQ1olNEA1JD00IyEjOzckJCIyL3YkNHIrYFdJISM7JCIyRUkmMylmJHpvQCEjOzckJCIvdiQ0Xm4pcEkhIzgkIjIpSHd1cikpZVVCISM7NyQkIjBEInldXD8mNCQhIzkkIjImeiZII3koKUhuRCEjOzckJCIyLitEMVJVMDckISM7JCIyWVE3NVMlPTFHISM7NyQkIjBEY3dIdidbSiEjOSQiMSRmYTheJj5qSSEjOjckJCIvdm8vIzNvPCQhIzgkIjJjLCwoZVI3L0whIzs3JCQiMHY9PDZUXD8kISM5JCIxMVwiR0pwZWAkISM6NyQkIi12PVMyTEshIzYkIjFIJXpOU2JFeCQhIzo3JCQiMms7enBvXyRlSyEjOyQiMmM/JUhYRCgzKyUhIzs3JCQiMUwkM19OSk9HJCEjOiQiMFR6KSkqPlhbVSEjOTckJCIvdlZCKyIqM0whIzgkIjEkPVkudFxAXiUhIzo3JCQiMmptbTtwKT1NTCEjOyQiMWNNXUombzR5JSEjOjckJCIyJyoqXGlsIXo2TyQhIzskIjEqKlteKD1dVzAmISM6NyQkIjJMTCRlUiVwIilRJCEjOyQiMTEoZidvOSkqKkcmISM6NyQkIjFuO2E4KWZeVCQhIzokIjFFKyNwZDFKWSYhIzo3JCQiMi0rK3Y9XUBXJCEjOyQiMiZlUCE0dkZHYiYhIzs3JCQiMjxII29LKXlWWCQhIzskIjEzejBaKFs8YyYhIzo3JCQiMktla3laMm1ZJCEjOyQiMTRgREFVYFxiISM6NyQkIjF2by9CaCQpeU0hIzokIjFodCMqW1txOmIhIzo3JCQiMm47SCNvWjEiXCQhIzskIjFSQWglRyc9Z2EhIzo3JCQiMHYkZmU/XzpOISM5JCIxJjRLJXk/JmZHJiEjOjckJCIxTCRlKlskeipSTiEjOiQiMScqUjM5KTNfLiYhIzo3JCQiMjovXiIpW1tMYiQhIzskIjA+dyl6QUhyWyEjOTckJCIwdlZ0aTxuYyQhIzkkIjJYLWlBRT9IcCUhIzs3JCQiMiVla2BtbjMhZSQhIzskIjI6KGZNIz5sWF0lISM7NyQkIjFuIkhkIWZYJGYkISM6JCIxTFchekJwOUolISM6NyQkIjJgKD0jXC9Eb2ckISM7JCIxKXl2XGAvJz5UISM6NyQkIjJQZTlUPSU+P08hIzskIjAyTXdYaWIkUiEjOTckJCIxI0gyTEtqTmokISM6JCIyLXFlPnpFanckISM7NyQkIjIxKytEWUtwayQhIzskIjFoZicpKVIiKSk9TyEjOjckJCIxPHpwKTQiNHNPISM6JCIydncwJlwxJD5VJCEjOzckJCIyTCRlKlt0XHNwJCEjOyQiMidbJil6bTpfXUwhIzs3JCQiMHYkNHIkM0NzJCEjOSQiMFg5JjRNcitNISM5NyQkIjJsbSJIMnFjWlAhIzskIjFreFxuMGRRTiEjOjckJCIyTUwzXzBqLCFRISM7JCIyQyo0eGReKSopKlEhIzs3JCQiMi8rREo1ZkYmUSEjOyQiMC1tPyNSI0gyJSEjOTckJCIyWDVTVylvPWZRISM7JCIxTiNvVXglKT0yJSEjOjckJCIyJzNfdmxZaGxRISM7JCIxZW46R3pjbFMhIzo3JCQiMkdKcXFXVT8oUSEjOyQiMUhwKWZfelIwJSEjOjckJCIxPGFRRy1aeVEhIzokIjJjV2UicCdwci4lISM7NyQkIjFEYywiekQ4KlEhIzokIjIpZWpWMi5JKSlSISM7NyQkIjJNJGVrYDg9L1IhIzskIjIoRyE0a1AxLSNSISM7NyQkIjBEMSp5QyopSFIhIzkkIjEwP3NYNmNNUCEjOjckJCIybG1tVGcuYyZSISM7JCIyJzRkY1BfeS1OISM7NyQkIjIlXDdgcDJfIylSISM7JCIxMWVCPUo0WEshIzo3JCQiMUxlKlskelY0UyEjOiQiMm9OcTRdbV0sJCEjOzckJCIxOy9FK15OT1MhIzokIjIoUlBcTF5TY0chIzs3JCQiLkRjRXNLMSUhIzckIjF4ST1XT0EqeiMhIzo3JCQiMW4ielc3QF42JSEjOiQiMkIkeTJEK1trSCEjOzckJCIxTUxMJCkqcHA7JSEjOiQiMmpiIXlON203TCEjOzckJCIxTSQzLSRIKio+VSEjOiQiMk09N2N2JVxvTyEjOzckJCIxTUwzeGUsdFUhIzokIjJiV1AvNjZKKyUhIzs3JCQiMTxhOEF5SSpIJSEjOiQiMk5xIj0hPTlfPSUhIzs3JCQiMSx2PW4oKmZEViEjOiQiMVUvZlsmRyIqUSUhIzo3JCQiMSVlUkFyIio9TiUhIzokIjFfbTVoLjk5WSEjOjckJCIxbjtIZE89eVYhIzokIjFAXmRNQERdWyEjOjckJCIwdj1VQVZCUyUhIzkkIjFXWSdHIWV4aF0hIzo3JCQiMU1lOSJ6LWxVJSEjOiQiMkRRa2tKKj1dXyEjOzckJCIxPEgyZUJtXVchIzokIjA4OVUnMzcoUiYhIzk3JCQiMjArK10jPiNbWiUhIzskIjA7byJlMl0mWyYhIzk3JCQiMVVnX0FWdSJbJSEjOiQiMSUpXCQqXCRvelwmISM6NyQkIjElM18rc20nKVslISM6JCIyJik+Knk9dD0vYiEjOzckJCIxRSJ5djYqZSZcJSEjOiQiMU02eSRlQlJdJiEjOjckJCIydjsvXl42RF0lISM7JCIxM1UpKnp4KHBcJiEjOjckJCIxXmk6NWpOO1ghIzokIjE7TW5Yb1VpYSEjOjckJCIxTSQzXzUsLWAlISM6JCIxTUxtPCYqcCpSJiEjOjckJCIxLERKJnAhKnliJSEjOiQiMC9xZ181KCo9JiEjOTckJCIxbm1UJkchZSZlJSEjOiQiMUx6NWM2RHVbISM6NyQkIjBEY15CanpmJSEjOSQiMGthb0xxUHElISM5NyQkIjFNZSpbPVkuaCUhIzokIjFMPWFRb2c9WCEjOjckJCIxPGFqTSJIRmklISM6JCIxVTdPWmIqPkslISM6NyQkIjEsXVAlMzdeaiUhIzokIjFUUCQ9MSZ6PFQhIzo3JCQiMSVlOVQuJlxaWSEjOiQiMS4jR1F5OzAiUiEjOjckJCIxb1QmUSl6KClmWSEjOiQiMkd0T1hsT2BxJCEjOzckJCIxXlBmTDRFc1khIzokIjFrQjA8VDEzTiEjOjckJCIxTUxMJClRayVvJSEjOiQiMm4ocCoqSGctREwhIzs3JCQiMjBEY3dcXDVyJSEjOyQiMXlOZmxIRDdJISM6NyQkIjFuIno+NmJ1dCUhIzokIjEvJFFJQFElW0chIzo3JCQiMScqKWZiXmNTdSUhIzokIjJDMiczVSYpM01HISM7NyQkIjFEMTk+emxdWiEjOiQiMlBdIjRTM0JJRyEjOzckJCIxYjhzQSRmc3YlISM6JCIxQnReLigpUU9HISM6NyQkIjElMy1qc2dRdyUhIzokIjF4b3l4OSk9JkchIzo3JCQiMVVOWUxOMXhaISM6JCIyWi1veSJHTDJIISM7NyQkIi5EMU1tLXolISM3JCIxOCRSKEcqUiUpKUghIzo3JCQiL0QiRykpUmIiWyEjOCQiMSd5OWdQY0Y9JCEjOjckJCIrRE0iMyVbISIqJCIxJj1tIlIhZi1RJCEjOjckJCIxLHY9bnAzbVshIzokIjJQTiZbSlp1T04hIzs3JCQiMjErdiQ0ME8iKlshIzskIjI4QDlKLyEpUmkkISM7NyQkIjFFSnFYLyVcIVwhIzokIjJPL2ojeXMkb2okISM7NyQkIjBESj9RPyY9XCEjOSQiMiQqbyZwOSZwWmkkISM7NyQkIjJiUGYkPS41S1whIzskIjEvRHIjPWEhKWUkISM6NyQkIjEsdm9hLW9YXCEjOiQiMUciSDVCdXlfJCEjOjckJCIwdlZ0N1NHKFwhIzkkIjJZRXdsXEFpTSQhIzs3JCQiI10hIiIkIjJYJz46TnBnMUohIzstJSZDT0xPUkc2JiUkUkdCRyQiIzUhIiIkIiIhISIiJCIiISEiIi0lJVZJRVdHNiQ7JCIiISEiIiQiI10hIiIlKERFRkFVTFRHLSUqQVhFU1NUWUxFRzYjJSdOT1JNQUxHLSUoU0NBTElOR0c2IyUuVU5DT05TVFJBSU5FREctJSVST09URzYnLSUpQk9VTkRTX1hHNiMkIiRJJCEiIi0lKUJPVU5EU19ZRzYjJCIjISohIiItJS1CT1VORFNfV0lEVEhHNiMkIiUhZSQhIiItJS5CT1VORFNfSEVJR0hURzYjJCIlXU0hIiItJSlDSElMRFJFTkc2Ig==

Once I look at that graph, I see there are loads of local maxima, but one around 2.5 that's higher than the rest. I need to find out exactly where it is. So I need to take the derivative and set it equal to zero. First I have Maple do the differentiation, and then I give that derivative a name. diff(speed,t);

LCQqJiwoKiQtSSRzaW5HNiQlKnByb3RlY3RlZEdJKF9zeXNsaWJHNiI2IywkSSJ0R0YrIiIjRi8iIiUqJi1GJzYjLCRGLiIiJEYwLUkkY29zR0YoRjNGLyIjIikqJCwmRjIhIiRGNkY7Ri8iIiIjISIiRi8sKiomRiZGPC1GN0YsRjwiIzsqJkYyRjVGNkY1IiRzKiomRjIiIiZGNkY8ISQnWyomRjpGPCwmRjYhIipGMiIiKkY8Ri9GPCNGPEYv

dspeed:=%;

LCQqJiwoKiQtSSRzaW5HNiQlKnByb3RlY3RlZEdJKF9zeXNsaWJHNiI2IywkSSJ0R0YrIiIjRi8iIiUqJi1GJzYjLCRGLiIiJEYwLUkkY29zR0YoRjNGLyIjIikqJCwmRjIhIiRGNkY7Ri8iIiIjISIiRi8sKiomRiZGPC1GN0YsRjwiIzsqJkYyRjVGNkY1IiRzKiomRjIiIiZGNkY8ISQnWyomRjpGPCwmRjYhIipGMiIiKkY8Ri9GPCNGPEYv

Since there are so many maxima and minima close together, I want to get a better sense of where the global max is, so I look at the graph of the derivative, so I can see where it crosses 0. plot(dspeed, t=0..5);

NictJSdDVVJWRVNHNiQ3XWNsNyQkIiIhISIiJCIjISohIiI3JCQiMktMTDNGV1lzIyEjPSQiMXknKSopPiRvU1cpISM6NyQkIjJrbW07YSlHXGEhIz0kIjE0QDNJbFQxIykhIzo3JCQiLEQiRyRSPCkhIzckIjA2U1hIXjZaKSEjOTckJCIyTExMJDN4JikqMyIhIzwkIjE0ODEpWzVeOyohIzo3JCQiMm07eiVcdiNwSyIhIzwkIjF2JEhJUWokKSopKiEjOjckJCIuRDFSKCpSYyIhIzgkIjJZJVspemJyIls1ISM6NyQkIjIkZTkiNCZbRUI7ISM8JCIyandWdzlZdDAiISM6NyQkIjJsIno+NkJgI28iISM8JCIyLCRIKyU0P08xIiEjOjckJCIyWlAlW3IoKnpUPCEjPCQiMnQqKSl5NzxubTUhIzo3JCQiMkskM3hKczEsPSEjPCQiMjBoYHRUNmkxIiEjOjckJCIwdlZCOi0nPj4hIzokIjJ6Qi9sIypwUDAiISM6NyQkIjJubTtIMlAiUT8hIzwkIjJkaylldykpb0M1ISM6NyQkIjJOJGVrLnB1L0IhIzwkIjEkbzgyJD1eVCopISM6NyQkIi52VnRjOGQjISM4JCIxRTZVbztgU24hIzo3JCQiMSRlUihcO20vRiEjOyQiMUxRSz95Vk5gISM6NyQkIjJqOy9eY216JEchIzwkIjEiR0k+YkdzdiQhIzo3JCQiMHZvL1tyNyhIISM6JCIyJ1E/SWFVPE4/ISM7NyQkIjJMTExlUndYNSQhIzwkIjF2NC51dCYzLiMhIzs3JCQiMUwkM0YlXHdRSyEjOyQhMkYkenNDSTQ5PCEjOzckJCIyTkwkZSpbYEhQJCEjPCQhMiVvWF9aJjNFbSQhIzs3JCQiMU0kZWsuVXJdJCEjOyQhMUB0PVNhWihmJiEjOjckJCIyUExMTGVJOGskISM8JCExY1NSZGkoNFooISM6NyQkIjJOTDMtOD5ieCQhIzwkITEiZi84SHhHQiohIzo3JCQiMU1MM3h3cTRSISM7JCEyJVwwcSxwMCQzIiEjOjckJCIxTSRlUkEnKlEvJSEjOyQhMlVrYGExPjRBIiEjOjckJCIxTUwkM3glM3lUISM7JCEyNCkpNEBSJz1KOCEjOjckJCIyLnZvSGFOO0olISM8JCEyTCw1UnhdeFMiISM6NyQkIjFuVDU6aj1YVyEjOyQhMiU+WGIlKipcYVciISM6NyQkIjJhKD08LDwnPl4lISM8JCEya0ZpKD54KXpXIiEjOjckJCIxJWVSczNQKHlYISM7JCEyOUIvMW0melE5ISM6NyQkIjEjSDJMWjdiayUhIzskITJEM11SIUhKPDkhIzo3JCQiMjErdiRmeUc3WiEjPCQhMjwxdGNtd0lRIiEjOjckJCIydVQ1OmpRZSVbISM8JCEyRHluKnlCP3Y3ISM6NyQkIjJPJGVrLiUqUXpcISM8JCEyKFs9YnJBI1w2IiEjOjckJCIwRCJ5diwlSDYmISM6JCExOmhvM1kmRzEqISM6NyQkIjFubSJ6JTRcWV8hIzskITB3b2VCYCkpZSchIzk3JCQiLnYkNCc0LlAmISM4JCExIlJ2dXY2QjMlISM6NyQkIjFNTCQzRkdUXCYhIzskITI5Z0lMSEM8YCIhIzs3JCQiMW07SEtwJXpoJiEjOyQiLz4rUSV5QSUqKSEjOTckJCItdiRmbDx1JiEjNyQiMSMqRzYqKlxnVEkhIzo3JCQiMU0kM19EJWVsZSEjOyQiMSUpKTRUPCM0JHolISM6NyQkIjFtbW07SFMqKWYhIzskIjFcLlNuWnJ5ZyEjOjckJCIuRCJ5OkE4aCEjOCQiMlhaVHApKnBYKG8hIzs3JCQiMU1MZVItL1BpISM7JCIwYjJjeGJPPighIzk3JCQiLXZWVlgkXCchIzckIjFuaCY0WiRvPmwhIzo3JCQiMW5tInpXbylcbiEjOyQiMHMwVjZzZlklISM5NyQkIiliMnlvISIpJCIyX0ZpQytYJyozJCEjOzckJCIxTUwzX0RHMXEhIzskIjI3P1YqemtabTohIzs3JCQiMW5tOy8nKltNciEjOyQhMlhAQEQ6c0pGJSEjPTckJCItRGNtcGlzISM3JCEyI3prJClIWj4hbyIhIzs3JCQiMW5tIkhkKUcmUighIzskITF5IyoqUWsjeldMISM6NyQkIjFNTGUqWyEpeV8oISM7JCEydmhRIz16TkFcISM7NyQkIjEsK0QxQ1pndyEjOyQhMV46IXlDMW9OJyEjOjckJCIxbm0iSEtrSXooISM7JCExanJQIypIMyVmKCEjOjckJCIxTUxlUmlsRHohIzskITBUKXorY0IjZSkhIzk3JCQiMSwrRGMiWyNlISkhIzskITEpXEckPSYzP0YqISM6NyQkIjFNTGU5VGFDIikhIzskITFlaHpUQG8hXCohIzo3JCQiMW5tIkgyUzM+KSEjOyQhMSVmO1g4LyQ9JyohIzo3JCQiMSwrREpnOGQjKSEjOyQhMHYjW2ZYTV0nKiEjOTckJCIxTUxlKik+VkIkKSEjOyQhMVB0KVE2IilIZSohIzo3JCQiMW47SCNvKWZiJSkhIzskITF1dyMzYihlVCIqISM6NyQkIit2YHcoZSkhIzUkITEsUkglSHhrRykhIzo3JCQiMU0kM3gxSyo+KCkhIzskITEnZW84Jz52TnEhIzo3JCQiMW5tVGcoKTRfKSkhIzskITFUVzlUalRUYSEjOjckJCIuREpYbFUpKikhIzgkITJgNG1EJCkpeSNmJCEjOzckJCIxTEwkZTlLazYqISM7JCEybW5BYXkiWzY7ISM7NyQkIjFtO2FRKSlmWyMqISM7JCIxaWpDV0BmUU8hIzs3JCQiLURKYnchUSohIzckIjIlUV01QGQiKSo+IyEjOzckJCIxJDNfK0E6bl4qISM7JCIyJGVfLSZRXDQkUSEjOzckJCIxblQmKTNcbV8nKiEjOyQiMWFKdydwczE4JiEjOjckJCIxXmlsKGY5Jyl5KiEjOyQiMk47PDlqal8yJyEjOzckJCIxTiRla0drWCMqKiEjOyQiMmtxUitKYzZvJyEjOzckJCIxdyRmMzhSRCoqKiEjOyQiMUg6LXAiZi0obyEjOjckJCIyPC9FdlJeZysiISM7JCIwJkduTF8jSCpwISM5NyQkIjJmOW0+KSlbRywiISM7JCIxdk1qK288ZHEhIzo3JCQiMEQxa09ZJz41ISM5JCIxSiEqKVtSVjkyKCEjOjckJCIyJmVrR044Q0w1ISM7JCIyWEYkR1hgWCUpcCEjOzckJCIyb21tVElPby8iISM7JCIxbG5HOWAnKSp6JyEjOjckJCIyTyRlOTtfeXE1ISM7JCIxVF4hR2NyalUnISM6NyQkIjIuK0QiR1R0JTQiISM7JCIxcyVbTVVWUEEnISM6NyQkIjEjej5oTkAyNSIhIzokIjF5SypbeUVCQSchIzo3JCQiMk9lOVRlM241IiEjOyQiMmI1OXIuUlNDJyEjOzckJCIyYFA0QCJlcDc2ISM7JCIxTHhyOHFnKkcnISM6NyQkIjFuVDVTSW89NiEjOiQiMD1xUUt0ImZqISM5NyQkIjIudiQ0J1xkMTgiISM7JCIxUnNLeVkmemMnISM6NyQkIjJOTCQzXz5qVTYhIzskIjEiXCRRRmMuZ28hIzo3JCQiMi1dKG9hRmZwNiEjOyQiMVdWWGMvdTh4ISM6NyQkIjJvbSJIZE5iJz4iISM7JCIxOylvPUVEJ2UmKSEjOjckJCIwdiRmZVIuNTchIzkkIjEibyw+L0NqJikpISM6NyQkIjJMJGUqKWZWXkI3ISM7JCIxMSspR1BWJzQhKiEjOjckJCIxdm9hZ1hESTchIzokIjEpZkw+JHAqKj4hKiEjOjckJCIybyJ6PmhaKnBCIiEjOyQiMWkpekFASjIpKikhIzo3JCQiMidlKls9J1x0VjchIzskIjElRyp5K0BgKSkpKSEjOjckJCIyLCsrRDt2L0QiISM7JCIwLCFbMT1yUygpISM5NyQkIjIsK10ob21heDchIzskIjFIVicpcGBzYXYhIzo3JCQiK3YiPVlJIiEiKiQiMSRlJyk+MzdrVCYhIzo3JCQiLkQiR1I6PTghIzckIjBwVSR5J1slPVMhIzk3JCQiLUQibypvSjghIzYkIjEuLD5ZbztKQyEjOjckJCIudlZWRF9NIiEjNyQiMSVlNmwrXFYlbyEjOzckJCIsdj1oKGU4ISM1JCEyKTQlM1IzMXE9IiEjOzckJCIyKioqKlxQUjA9UCIhIzskITFAIjQ7VSc+c0khIzo3JCQiKSdcW1EiISIoJCExaC0oPjElRyoqXCEjOjckJCItRDFRKnlSIiEjNiQhMSMzUHNBKXlGcCEjOjckJCIsRCxRNFQiISM1JCExbWphSCZmWyIpKSEjOjckJCItdj1BKVJVIiEjNiQhMk9WRCE+KFI6MSIhIzo3JCQiK0RrLVA5ISIqJCExIz51cV0sI0c3ISM5NyQkIi1ESjEyXTkhIzYkITJ2LzVqVyZbdzghIzo3JCQiLHYkWzZqOSEjNSQhMl5lTlslbzcsOiEjOjckJCIyPkhLa0FnXFoiISM7JCExS09xJzReIiplIiEjOTckJCIyTWVrYGgwb1siISM7JCEyJVF0JWVvbSdbOyEjOjckJCIyIkgyJCk0JEdGXCIhIzskITFrITQ5didIbTshIzk3JCQiMXZvSC81bClcIiEjOiQhMlA0MXhvY11uIiEjOjckJCIxQEl3KXB0WF0iISM6JCExXkVWRlxOdTshIzk3JCQiMm87SEtSJ1w1OiEjOyQhMkQ2ZVEpemdqOyEjOjckJCIyJWU5OyN5VEJfIiEjOyQhMiUpSEAjcHl3NDshIzo3JCQiMHYkNHJyPU06ISM5JCEybC1MNCtfJzQ6ISM6NyQkIjI9L0UrY0tnYSIhIzskITJ3dDlhdzQ0TyIhIzo3JCQiMk1MZSpbeih5YiIhIzskITFFeGp0aSlSOyIhIzk3JCQiMlYmUWAwMSNcYyIhIzskITFvSWwnRyh5RDUhIzk3JCQiMXYkNEBFaj5kIiEjOiQhMSRmc2xdaix1KSEjOjckJCIxJypbbz1mK3o6ISM6JCExdCdlZjhfSTYoISM6NyQkIjJvVGdfZFtnZSIhIzskITF3MHYlNGYpNGEhIzo3JCQiMnckZiQ9QiI0JGYiISM7JCExeGZFOkVqcE8hIzo3JCQiMiVlOVQpKVE4KzshIzskITFkKkglM3EqXCQ+ISM6NyQkIjIkenApXGF3cmciISM7JCExPClRP2ZRT1wjISM7NyQkIi9EYywjPlVoIiEjOCQiMndlIkhJLDJZOCEjOzckJCIxQCFRImU9RUA7ISM6JCIydEUzYXJVXSJHISM7NyQkIjI9YThaXi8kRzshIzskIjE5YWdqMkNHVCEjOjckJCIyRTEqR3JyTU47ISM7JCIxOTxWI2V3VkUmISM6NyQkIjJNZWt5IykqUVU7ISM7JCIwQUNMPD4uQCchIzk3JCQiMURjLFReWmM7ISM6JCIxLCR6K21tYl4oISM6NyQkIjJvbW1UWGcwbiIhIzskIjFrI3poWkJ3MSkhIzo3JCQiMm5tInpwWVUlcCIhIzskIjFoOk0nW0JDYCghIzo3JCQiMW5tVCYpKSlHPTwhIzokIjFuRSlcMSlSO2MhIzo3JCQiMW4iSEsqNEFJPCEjOiQiMSk+W1ZLRW9JJSEjOjckJCIycG1UNTVgQHUiISM7JCIxYj56dSpISyVHISM6NyQkIjJuO2EpM18zYTwhIzskIjJcUyYqXFRfLkciISM7NyQkIjJvbW1tSjxndyIhIzskITFIMmUnKlJnMkwhIzs3JCQiMidlOW0lPigqKXo8ISM7JCEyLlctSm5wPT8jISM7NyQkIjBEY0UyeFB6IiEjOSQhMSNvaiNvcj8sUyEjOjckJCIyOy9eMSZwbDI9ISM7JCExSihmUF1xJGZjISM6NyQkIjJMJGVrR29gQD0hIzskITB3VyhIVVIzciEjOTckJCIyb1ROWWUnSFw9ISM7JCExM0pJT2VyNCIqISM6NyQkIi5EMU1jcSg9ISM3JCExO181RG4ieVoqISM6NyQkIjIjM19dJVFVJCopPSEjOyQhMWJneVpsZioqKikhIzo3JCQiMm1UJlFHJUc7IT4hIzskITAjPlg4c2olNCkhIzk3JCQiMURjRXNXIlIiPiEjOiQhMXYhPisuRCdvbiEjOjckJCIyTCRlOTswP0U+ISM7JCExMmlTeFVSaV0hIzo3JCQiMjwvRStjJ1tRPiEjOyQhMjh1KFJwcDFmSSEjOzckJCIwRDFSZ3MyJj4hIzkkITAscCMqZjMpPikpISM6NyQkIjIlZWt5WidlSSc+ISM7JCIyPW9RTXQ+LksiISM7NyQkIjJtbW07cFdgKD4hIzskIjEtail5dlAkKlIkISM6NyQkIjImZWsuSFcjKSkpPiEjOyQiMT0uIkc8dldSJiEjOjckJCIwRDFrOy9CKyMhIzkkIjEnKUchbzRETSpwISM6NyQkIjFVZ3guUnk6PyEjOiQiMFlfeipwMGgiKSEjOTckJCIyTyRlOVRPRUg/ISM7JCIxZDw7IT5pZCIqKSEjOjckJCIyJ0gyJCk0TitPPyEjOyQiMU9uXUQkUlI6KiEjOjckJCIyYGk6JnlMdVU/ISM7JCIxQjw6M25TNSQqISM6NyQkIjFAMD9aS1tcPyEjOiQiMWxlOGV6TyVSKiEjOjckJCIxPGEpZTZCaTAjISM6JCIxdEFvISpmTDolKiEjOjckJCIyJzNfRGBHcXA/ISM7JCIwQVFRLllrSSohIzk3JCQiMi4rRDFmIz0kMyMhIzskIjEoUUAhPW0jejAqISM6NyQkIi92JGZRYSkzQCEjOCQiMSVwaUU7VXlWKSEjOjckJCItRCI9RVg4IyEjNiQiMW92dSgpeihbJHohIzo3JCQiMmA3eSs4VzQ5IyEjOyQiMSpHUm1SKXlleSEjOjckJCIwRDEqeT9PWkAhIzkkIjImZW1IR19zMnkhIzs3JCQiMXZWdEYreWBAISM6JCIyJmYlUk5PZUl5KCEjOzckJCIyLl1pbCh6PmdAISM7JCIyOiI+LyoqM1cmeSghIzs3JCQiMHY9VShRLnRAISM5JCIxMF9QUldQcXkhIzo3JCQiLnY9eHBlPSMhIzckIjEwJEc+YWZOMCkhIzo3JCQiMTxhOChmYkVAIyEjOiQiMWNgKz5DM2MnKSEjOjckJCIyUCRlUkE5V1JBISM7JCIxTk5mcGFjMCQqISM6NyQkIjFVZy1OViRHRCMhIzokIjAybDBSQHFgKiEjOTckJCIyL0Rjd0NGaUUjISM7JCIxMWElPlFCJFsnKiEjOjckJCIyWU5yUnFCSEYjISM7JCIwNjFBRHpwayohIzk3JCQiMilla0dnLGl6QSEjOyQiMVg3KEgkWzotJyohIzo3JCQiMWo6ZzttSidHIyEjOiQiMVw7W3pzUDUmKiEjOjckJCIxbm0iSDI4SUgjISM6JCIxLTg2JnpDKG8kKiEjOjckJCIxPGE4QTNoPEIhIzokIjEoKjM8aScqUilRKSEjOjckJCIxblROciYzQU0jISM6JCIxYTInKltmdmdtISM6NyQkIjFVTidmVzJYTiMhIzokIjA+PEtYT3dfJiEjOTckJCIxPEhkP2ohb08jISM6JCIxeTImW0crO0IlISM6NyQkIjI8SCM9Jj4wInpCISM7JCIyMUwoem1xJTN6IyEjOzckJCIyb20ienBTUyJSIyEjOyQiMiJmdmBrY1tGNyEjOzckJCIyWjd5djFxWVMjISM7JCExJSlca2hUaG9jISM7NyQkIjEkZWtgMU96VCMhIzokITJMWjNvam0kUUMhIzs3JCQiMjsvXkoxLTdWIyEjOyQhMSxYcWBGKXlNJSEjOjckJCIvdiQ0MW9XVyMhIzgkITAudk5WJFFgaSEjOTckJCIyJWVSc2VTdGRDISM7JCExME9bKCpwTTUiKSEjOjckJCIxPC9eYysrckMhIzokITE+OyRHJz0vcykqISM6NyQkIjJgKG9IYWdFJVsjISM7JCEyOUFadyJHKCpbNiEjOjckJCIyTEwkM18/YChcIyEjOyQhMnZtLFw7IkciSCIhIzo3JCQiMSQzLSlRODRERCEjOiQhMkZlei5yYD1dIiEjOjckJCIxTDNfRDFsX0QhIzokITIlSElDMmUleWIiISM6NyQkIjIkMy0pKW8tVm1EISM7JCEyLmRkeFdsUF4iISM6NyQkIjJNZVJBIio0LWUjISM7JCEybk43R0hwZ1QiISM6NyQkIjImZSopZmImKilSZiMhIzskITJmJ3kjZl0jZWo3ISM6NyQkIjJPTGUqKT5weGcjISM7JCEyVyUpNG9ndSRmNSEjOjckJCIxPC8sPld3PkUhIzokITFRcnkpUUNFWSkhIzo3JCQiMi9daSFSJ2Y8aiMhIzskITFfRmVfPT4waCEjOjckJCIyTWU5ImZbdlZFISM7JCEyRCslSHY0NGFPISM7NyQkIjFubTt6K3ZiRSEjOiQhMVxPJGU5JSozRSIhIzo3JCQiMi52PSMqSFh4bSMhIzskIjFFJCplWz5bYCMqISM7NyQkIjJLJDNGPjB1ekUhIzskIjJFJj4ieUdYKHpGISM7NyQkIjJuIkhLUmR0InAjISM7JCIxbnhAQUk/O1UhIzo3JCQiLnYkZjR0LkYhIzckIjFPbl1VMmsiPiYhIzo3JCQiMUBJXlUmMy1yIyEjOiQiMXhWVFxrcUJiISM6NyQkIjI8L15jNydvO0YhIzskIjEiUlM7LWBDcyYhIzo3JCQiMkUxKnkzUDtCRiEjOyQiMXJab2hWJkd6JiEjOjckJCIyTTNGPkhUJ0hGISM7JCIxUk1GTzJQVGQhIzo3JCQiMURKP2VrZlVGISM6JCIxLzJFNUVoLmAhIzo3JCQiMm47eldpXmJ2IyEjOyQiMVB2ZE4kW2xaJSEjOjckJCIyJDNfdiF6MSZvRiEjOyQiMm83IilISTs7TCQhIzs3JCQiMERKcSY+WSJ5IyEjOSQiMk9MKj0tLW9SPiEjOzckJCIyO0gyTDc8V3ojISM7JCIxRFEpKkdXInpvJCEjOzckJCIyUEwkZSpHc3QhRyEjOyQhMmlqZk0lM2U7OCEjOzckJCIxPC8sV2l2P0chIzokITEqKXpSYFJJOEohIzo3JCQiMi5dUCUpPlNUJEchIzskITFmL294RlsuXCEjOjckJCIyT2VrRzpDdiVHISM7JCExbGc3KFJIaGknISM6NyQkIjFuO0gyIjM0J0chIzokITF0JWVPSGk/QSkhIzo3JCQiMHY9PDEjSHVHISM5JCExWid6WF5nR2oqISM6NyQkIjJOJGU5O2duKClHISM7JCExXjxrWkooKno1ISM5NyQkIjJvIkhkcSpmNSFIISM7JCEySFEkb1AsQ202ISM6NyQkIitEUlc5SCEiKiQhMS55JFxNTmVAIiEjOTckJCIxRDE5PjIqNCNIISM6JCEyOjU6IXBWekM3ISM6NyQkIjIvRCJHOHZgRkghIzskITJpOHdLQCFvQTchIzo3JCQiMmEoPVUyVjNNSCEjOyQhMXp1I1JgYigzNyEjOTckJCIyL11pOjVKMSVIISM7JCEyaXgya2hHQj0iISM6NyQkIjIvdlYpKm9DUCZIISM7JCEyTGlON2RuJyozIiEjOjckJCIyLitEInkjPW8nSCEjOyQhMUEuIVxJKyU9JSohIzo3JCQiMi5EMWsnPSIqekghIzskITFIKClHIWVAW1MoISM6NyQkIjItXShvYWErJCpIISM7JCExYVxXT1BSVVwhIzo3JCQiMUQiRylbQWIqKkghIzokITEkUWkvZyR5I2YkISM6NyQkIjB2b0gvKjQxSSEjOSQhMGYpNHhLWStBISM5NyQkIjF2JDRyJGVrN0khIzokITFgP3Z5KT5aJ3ohIzs3JCQiLURKRT4+SSEjNiQiMT5GL1xZIlIoZSEjOzckJCIyYCg9PF44Jz0uJCEjOyQiMSxtbkhRPCk0JCEjOjckJCIyL3YkNHIrYFdJISM7JCIxRGJmKClIcFpfISM6NyQkIjFEYywieik+ZEkhIzokIjExWHAkWzEhUnAhIzo3JCQiL3YkNF5uKXBJISM4JCIwdVYsJnBjYCIpISM5NyQkIjJgUGYzQk9EMyQhIzskIjFRTDdoKFIrJCopISM6NyQkIjBEInldXD8mNCQhIzkkIjEjNHkoUSl5KFEkKiEjOjckJCIydT1VMkpSOjUkISM7JCIxMW4jbyQpZjNWKiEjOjckJCIxREpxcU8oeTUkISM6JCIxdCU0aypmLWklKiEjOjckJCIxalNtSSEzVTYkISM6JCIxO2M+L0VYVSUqISM6NyQkIjIuK0QxUlUwNyQhIzskIjF6UXJoNiE+USohIzo3JCQiMERjd0h2J1tKISM5JCIxIlsqKSp6cihbJSkpISM6NyQkIi92by8jM288JCEjOCQiMSNSW3lkIVxHJCkhIzo3JCQiMkRKWDlWVFE9JCEjOyQiMT5pSCI0U2dEKSEjOjckJCIxREo/ZVkoMz4kISM6JCIxOWJBMSlbXUApISM6NyQkIjJ0JDQnXCl5IXo+JCEjOyQiMUhpPVgwIXo/KSEjOjckJCIwdj08NlRcPyQhIzkkIjBmKj4xISl6TiMpISM5NyQkIjJgUE1fYzIhPkshIzskIjFwVmwpXGdjUikhIzo3JCQiLXY9UzJMSyEjNiQiMSJRL1gncDsibykhIzo3JCQiMms7enBvXyRlSyEjOyQiMVZweFpUYjAlKiEjOjckJCIxTCQzX05KT0ckISM6JCIyYlorNmM1aCwiISM6NyQkIjE8SEsqb3FpSCQhIzokIjI3PDhbPTddLyIhIzo3JCQiL3ZWQisiKjNMISM4JCIySClvNWRkJEcxIiEjOjckJCIyOnolXCFwSF9KJCEjOyQiMicpcFE0OU1sMSIhIzo3JCQiMSQzX3ZOXDpLJCEjOiQiMjFfbm9gb2kxIiEjOjckJCIyWlA0WS1weUskISM7JCIyPVs7My1GPDEiISM6NyQkIjJqbW07cCk9TUwhIzskIjJBRnAmelJrXzUhIzo3JCQiMicqKlxpbCF6Nk8kISM7JCIxNkN6SyNRX2UqISM6NyQkIjJMTCRlUiVwIilRJCEjOyQiMWpTIXAmemM5eCEjOjckJCIvRGNFWW0sTSEjOCQiMWVUeWcrQFprISM6NyQkIjFuO2E4KWZeVCQhIzokIjF2biFbK21GKVwhIzo3JCQiMk8kM18rXWxHTSEjOyQiMkVLNG48UXVNJCEjOzckJCIyLSsrdj1dQFckISM7JCIyM3MoPVhOeXM6ISM7NyQkIjI8SCNvSyl5VlgkISM7JCEyKD1kJkcrd1pEIiEjPDckJCIyS2VreVoybVkkISM7JCEyUCpILEVDeXk9ISM7NyQkIjF2by9CaCQpeU0hIzokITJkKDMoKVs7MmJPISM7NyQkIjJuO0gjb1oxIlwkISM7JCExLCQ0KyRwPz9hISM6NyQkIjFlOVQ4TUguTiEjOiQhMVVvbWtwO1FyISM6NyQkIjB2JGZlP186TiEjOSQhMU0pPlBUJj1yKCkhIzo3JCQiMjsvd1BxXXhfJCEjOyQhMnBWKj0pSCUpei0iISM6NyQkIjFMJGUqWyR6KlJOISM6JCEyI3lDPnNTSmk2ISM6NyQkIjB2VnRpPG5jJCEjOSQhMih5Xld5Q2d4OCEjOjckJCIxbiJIZCFmWCRmJCEjOiQhMjc0cSl5bWdaOSEjOjckJCIyYCg9I1wvRG9nJCEjOyQhMiYpPSUzdDlUOTkhIzo3JCQiMlBlOVQ9JT4/TyEjOyQhMiVmLlY5OTJJOCEjOjckJCIxI0gyTEtqTmokISM6JCEyeV9SMXQlKUc+IiEjOjckJCIyMSsrRFlLcGskISM7JCEyaio0SUs8IVsrIiEjOjckJCIxZiopZiF5NiZmTyEjOiQhMXVULThfcXZ5ISM6NyQkIjE8enApNCI0c08hIzokITFVZ0kxL3c/YSEjOjckJCIxJ1JaeHYhUXlPISM6JCExTjpyTXRXS1QhIzo3JCQiMXZvejsvbiVvJCEjOiQhMkQwUFQpNHNKRyEjOzckJCIxYWolZTJnNHAkISM6JCEyV3cjKT5dXjRhIiEjOzckJCIyTCRlKlt0XHNwJCEjOyQhMDMkXGAjKkdDRyEjOjckJCIyPHolKkgwSCk0UCEjOyQiMjdURHEwUVkwIyEjOzckJCIwdiQ0ciQzQ3MkISM5JCIxVypmS2N1Yi4lISM6NyQkIjImM0Y+Km8oKVx0JCEjOyQiMSV5RlVKY0ljJiEjOjckJCIybG0iSDJxY1pQISM7JCIxYyFvN00neiFmJyEjOjckJCIwRCJHODo5YVAhIzkkIjFuKSpHXFAqcCNwISM6NyQkIjJMJDNGPmdyZ1AhIzskIjFpL3g8SzxIciEjOjckJCIybFRnX18hSG5QISM7JCIxPilcPCVSeS1zISM6NyQkIjIoKioqXDcubFF4JCEjOyQiMWBIKydRJnBhciEjOjckJCIybTtISy85cXkkISM7JCIxRkdmIj5AY3MnISM6NyQkIjJNTDNfMGosIVEhIzskIjEpWzloPFI6ImYhIzo3JCQiMi5dKD1uP0o4USEjOyQiMiZvRisqKTRrJnklISM7NyQkIjFubTt6NVlFUSEjOiQiMWNFNjdLUz9NISM6NyQkIjJOJGU5IjQ1J1JRISM7JCIyXihHJnBfa2IpPSEjOzckJCIyLytESjVmRiZRISM7JCIxRygzSXI0WFojISM7NyQkIjInM192bFlobFEhIzskITI4cWZMeU5OUiIhIzs3JCQiMTxhUUctWnlRISM6JCEyLiFmaTdDMjxJISM7NyQkIjFEYywiekQ4KlEhIzokITAzKVEjSHEmcFghIzk3JCQiMk0kZWtgOD0vUiEjOyQhMThgV0NmXCoqZiEjOjckJCIwRDEqeUMqKUhSISM5JCExai1HVXFkJUgpISM6NyQkIjJsbW1UZy5jJlIhIzskITFqNFV2RitIJiohIzo3JCQiMTd5XSYqR0xpUiEjOiQhMSJmNSNweVVOJyohIzo3JCQiMngmKltvPWkhcFIhIzskITAxM2RqPEJrKiEjOTckJCIyTzUhPnk5enZSISM7JCEwZV4rYygqZWEqISM5NyQkIjIlXDdgcDJfIylSISM7JCEwUTUwLThNTSohIzk3JCQiMVROQF8kemYqUiEjOiQhMSJlMSc0JCoqZWgpISM6NyQkIjFMZSpbJHpWNFMhIzokIS9HQWxzWW91ISM4NyQkIjFEInl2XicqRy0lISM6JCExVFhVSTZ6VmYhIzo3JCQiMTsvRSteTk9TISM6JCExSCJwbldaVTclISM6NyQkIjEzRiVIbzgpXFMhIzokITFRY0JLdmdIQCEjOjckJCIuRGNFc0sxJSEjNyQhMCJSdHVmaE01ISM6NyQkIjFVJlEuW01pMiUhIzokIjJPPztGKyJvVTwhIzs3JCQiMSQzX11wJz4qMyUhIzokIjFyXXFuLlF2TCEjOjckJCIxRGN3NCplQDUlISM6JCIxJT1GdGBEN3MlISM6NyQkIjFuInpXN0BeNiUhIzokIjF3QUYuWndZZCEjOjckJCIxNEY+UkwzR1QhIzokIjEpNHMpSGRpYWshIzo3JCQiMV5pIVJiWDU5JSEjOiQiMnZAdHFDY1oobyEjOzckJCIxQElFaG1fWlQhIzokIjFVbGBMaksiKnAhIzo3JCQiMSN6PidveCthVCEjOiQiMiZmeEZWL21hcSEjOzckJCIxamwoZigpKVtnVCEjOiQiMVA6QEZxMHNxISM6NyQkIjFNTEwkKSpwcDslISM6JCIxaSYpXFdUKDQwKCEjOjckJCIxTTN4YzlbJD4lISM6JCIxVVJKTXlRPm4hIzo3JCQiMU0kMy0kSCoqPlUhIzokIjF5K1UiUWRHTCchIzo3JCQiMSUzRnBtW0tCJSEjOiQiMXkoKilRUHJJQichIzo3JCQiMU1lay5XXVlVISM6JCIxJWUhRyRSUl1CJyEjOjckJCIxJWVrLjlnKGZVISM6JCIxaHJmP2ZDX2ohIzo3JCQiMU1MM3hlLHRVISM6JCIwQFpZWyhIJWUnISM5NyQkIjEsdj1uKCpmRFYhIzokIjF4LnYlNGY2PikhIzo3JCQiMW47SGRPPXlWISM6JCIxTCQpXEVRYSUpKikhIzo3JCQiMHY9VUFWQlMlISM5JCIxVjM9JVt1UVMpISM6NyQkIjFNZTkiei1sVSUhIzokIjFAVC4sNkVscSEjOjckJCIxdiQ0WWQjZVFXISM6JCIxJkgneUY9XTZoISM6NyQkIjE8SDJlQm1dVyEjOiQiMXZOKSopKlE7elwhIzo3JCQiMWZrYFRAdWlXISM6JCIyMTM8WC0/RG8kISM7NyQkIjIwKytdIz4jW1olISM7JCIxTEE6Z2QiKlJBISM6NyQkIjElM18rc20nKVslISM6JCIyMDl1S3QlcGBWISM8NyQkIjJ2Oy9eXjZEXSUhIzskITJ4KHoiR1o6VlwiISM7NyQkIjFeaTo1ak47WCEjOiQhMTBhUGNVKHBdJCEjOjckJCIxTSQzXzUsLWAlISM6JCExLF4oZVUwbmImISM6NyQkIjE9L0UrZi9XWCEjOiQhMFJAbCMqZlZmKCEjOTckJCIxLERKJnAhKnliJSEjOiQhLyRHSCIzJXljKiEjODckJCIxJmVrLlxOPGQlISM6JCEyXG9dY3I+QTkiISM6NyQkIjFubVQmRyFlJmUlISM6JCEyImZYSi4qXCo0OCEjOjckJCIxTWUqWz1ZLmglISM6JCEyIz1mPkMqKUhZOiEjOjckJCIxLF1QJTM3XmolISM6JCEyPTBpRjQkKnptIiEjOjckJCIxb1QmUSl6KClmWSEjOiQhMlVLTDNsVEtqIiEjOjckJCIxTUxMJClRayVvJSEjOiQhMjdwRGEkSCdIUyIhIzo3JCQiMWpTInBHWDdwJSEjOiQhMjRuSSopKio9ZEkiISM6NyQkIjEjeiVcIXBZeXAlISM6JCEyO2suMFw3UD4iISM6NyQkIjFBYjIlNFtXcSUhIzokITJBY1lWRjx5MSIhIzo3JCQiMjBEY3dcXDVyJSEjOyQhMWQ2dUE9TyVIKiEjOjckJCIxenBCLDRsPFohIzokITEoW2NTdCZSMHkhIzo3JCQiMTR4IltJX1VzJSEjOiQhMUdJR3RuZE9pISM6NyQkIjFRJSlSM1AmM3QlISM6JCEwck5CZVUiPVkhIzk3JCQiMW4iej42YnV0JSEjOiQhMmwrV1wwISlSKUghIzs3JCQiMScqKWZiXmNTdSUhIzokITJoKjRxL2chKXA4ISM7NyQkIjFEMTk+emxdWiEjOiQiMnZqVnhPIm8qKT0hIzw3JCQiMWI4c0EkZnN2JSEjOiQiMmpHRi11JVFmOyEjOzckJCIxJTMtanNnUXclISM6JCIxbSdIJSo+Knk3SSEjOjckJCIxVU5ZTE4xeFohIzokIjFUYi0yMG0jRyYhIzo3JCQiLkQxTW0teiUhIzckIjFSPHZMMTIqKW8hIzo3JCQiMHY9PDYuSCFbISM5JCIxLilHTUNBbXkoISM6NyQkIi9EIkcpKVJiIlshIzgkIjEmXHM2VTltNCkhIzo3JCQiMEQxUmx3IkdbISM5JCIxRG5iLS5pKCl5ISM6NyQkIitETSIzJVshIiokIjFrJWUqZkdhU3MhIzo3JCQiMV5QNCc+XU0mWyEjOiQiMSczalF1N3lCJyEjOjckJCIxLHY9bnAzbVshIzokIjEiKkhuJ3ojNGVcISM6NyQkIjBEIkdRUHN5WyEjOSQiMjcmZjIyIipSdU0hIzs3JCQiMjErdiQ0ME8iKlshIzskIjJjU3JISTtTJj0hIzs3JCQiMUVKcVgvJVwhXCEjOiQiMTBbJGV1UWo4JCEjPDckJCIwREo/UT8mPVwhIzkkITFZTi5UbT4wPSEjOjckJCIyYlBmJD0uNUtcISM7JCExOzJsTTdhKGUkISM6NyQkIjEsdm9hLW9YXCEjOiQhMVQqKlxNeUFdXyEjOjckJCIxRGMsIj5nI2ZcISM6JCExRT9GR29PSG4hIzo3JCQiMHZWdDdTRyhcISM5JCExNnQlelJaPCd6ISM6NyQkIjF3PW5qK1UnKVwhIzokITF1bCIqNGFUJSkpKSEjOjckJCIjXSEiIiQhMS85VSRcVV5WKiEjOi0lJkNPTE9SRzYmJSRSR0JHJCIjNSEiIiQiIiEhIiIkIiIhISIiLSUlVklFV0c2JDskIiIhISIiJCIjXSEiIiUoREVGQVVMVEctJSpBWEVTU1RZTEVHNiMlJ05PUk1BTEctJShTQ0FMSU5HRzYjJS5VTkNPTlNUUkFJTkVERy0lJVJPT1RHNictJSlCT1VORFNfWEc2IyQiJCFSISIiLSUpQk9VTkRTX1lHNiMkIiMhKiEiIi0lLUJPVU5EU19XSURUSEc2IyQiJT9OISIiLSUuQk9VTkRTX0hFSUdIVEc2IyQiJTVRISIiLSUpQ0hJTERSRU5HNiI=

The x-intercept I'm interested in occurs between t=2.3 and 2.5 (I can tell by clicking on the graph and looking at the little box of coordinates that appears on the upper left of the Maple window). But I want to know exactly, so I ask Maple to find the solution that lies between 2.3 and 2.5 for me. For that, I need fsolve, rather than just solve. fsolve(dspeed=0, t, 2.3..2.5);

JCIreEliK0MhIio=

then since what I really want to know is what the maximum speed is, I ask Maple to take that time and substitute it into the speed function for me: subs(t=%,speed);

KiQpLCgqJiIiJSIiIiktSSRzaW5HNiQlKnByb3RlY3RlZEdJKF9zeXNsaWJHNiI2IyQiK2FoNSxbISIqIiIjRidGJyooIiMiKUYnKS1GKjYjJCIrSiNmOz8oRjJGJkYnKS1JJGNvc0dGK0Y4RjNGJ0YnKiQpLCYqJiIiJEYnRjdGJyEiIiomRkJGJ0Y8RidGQ0YzRidGJyNGJ0YzRic=

That's a mess y combination of approximation and exactness, so I ask Maple to approximate it for me: evalf(%);

JCIrQnpuI3omISIq