restart; with(plots):

Warning, the name changecoords has been redefined

with(inttrans);

NiM3L0kpYWRkdGFibGVHNiJJKGZvdXJpZXJHRiVJK2ZvdXJpZXJjb3NHRiVJK2ZvdXJpZXJzaW5HRiVJJ2hhbmtlbEdGJUkoaGlsYmVydEdGJUkraW52Zm91cmllckdGJUkraW52aGlsYmVydEdGJUkraW52bGFwbGFjZUdGJUkqaW52bWVsbGluR0YlSShsYXBsYWNlR0YlSSdtZWxsaW5HRiVJKnNhdmV0YWJsZUdGJQ==

bl:=x->Heaviside(x+1/2)-Heaviside(x-1/2); f:=x->bl(x-5);

NiM+SSNibEc2ImYqNiNJInhHRiVGJTYkSSlvcGVyYXRvckdGJUkmYXJyb3dHRiVGJSwmLUkqSGVhdmlzaWRlR0YlNiMsJjkkIiIiI0YyIiIjRjJGMi1GLjYjLCZGMUYyIyEiIkY0RjJGOUYlRiVGJQ==NiM+SSJmRzYiZio2I0kieEdGJUYlNiRJKW9wZXJhdG9yR0YlSSZhcnJvd0dGJUYlLUkjYmxHRiU2IywmOSQiIiIhIiZGMUYlRiVGJQ==

plot({bl(x),f(x)},x=-1..7);

LSUlUExPVEc2Ji0lJ0NVUlZFU0c2JTdjbzckJCEiIiIiISRGLEYsNyQkITN1bW1tbXdBYyMpISM9Ri03JCQhM0FMTEwkbyEpKlFuRjFGLTckJCEzbW1tbW14bktdRjFGLTckJCEzI29tbW1Pa11KJEYxRi03JCQhMzdNTEwkWzljZyJGMUYtNyQkITNRQm5tbTtjdD8hIz9GLTckJCIzdikqKioqKlxZSj87RjFGLTckJCIzL0tMTCQ9Ilw8TEYxRi03JCQiMzEpKioqKipcW0E0XUYxRi03JCQiM3FubW1tM1FcbkYxRi03JCQiM2FMTExMNzYjRylGMUYtNyQkIjMmKSoqKioqKmYtdys1ISM8Ri03JCQiMyUqKioqKioqKip5LHU2RlRGLTckJCIzKSoqKioqKipSUCk0TSJGVEYtNyQkIjNJTExMPVpnI1wiRlRGLTckJCIzY21tbUVuKkduIkZURi03JCQiM1RtbW0xeGlEPUZURi03JCQiMyEpKioqKipcOSFILj9GVEYtNyQkIjNJbW1tMTpiZ0BGVEYtNyQkIjM8KysrWEA0TEJGVEYtNyQkIjMxKysrTjtSKFwjRlRGLTckJCIzd21tbTs0IylvRUZURi03JCQiM2ptbW02bENFR0ZURi03JCQiM0VMTEwkR15nKkhGVEYtNyQkIjNvS0xMPTJWc0pGVEYtNyQkIjNmKioqKipcYHBmSyRGVEYtNyQkIjMhSExMTG0meiJcJEZURi03JCQiM3MqKioqKip6LTZqT0ZURi03JCQiMzwqKioqKio0IzMyJFFGVEYtNyQkIjNPKioqKipcI3knRypSRlRGLTckJCIzRyoqKioqKkglPUg8JUZURi03JCQiM3FLTExvLCJRRCVGVEYtNyQkIjM1bW1tMT5xTVZGVEYtNyQkIjNLKioqKipcXScpeVAlRlRGLTckJCIzYEtMTC42MkBXRlRGLTckJCIzOCoqKipcLU1tVVdGVEYtNyQkIjN1bG1tLGREa1dGVEYtNyQkIjMxKioqXDcmPTB2V0ZURi03JCQiM09LTCQzK1tlWyVGVEYtNyQkIjMrKipcaXZnQyJcJUZURi03JCQiM21sbVRdVGsnXCVGVEYtNyQkIjM+TCQzX0FVP10lRlQkIiIiRiw3JCQiMyUpKioqKioqKkhTdV0lRlRGaXM3JCQiMydmbW0iSE9xJmUlRlRGaXM3JCQiMydITEwkZXAnUm0lRlRGaXM3JCQiMycpKioqKioqUj40TltGVEZpczckJCIzI2VtbTtAMmgqXEZURmlzNyQkIjNdKioqKipcYzlXOyZGVEZpczckJCIzI0hMTGU7IXBZX0ZURmlzNyQkIjNMbW1tbWQnKkdgRlRGaXM3JCQiM2sqKipcN0JMP1AmRlRGaXM3JCQiMylITExlcCteVCZGVEZpczckJCIzMytdN0dXak9hRlRGaXM3JCQiM0ltbVRnIm8iZWFGVEZpczckJCIzJykqXGlsLU4qb2FGVEZpczckJCIzX0skM0YqPXF6YUZURmlzNyQkIjMnKVs3eURgMyZbJkZURmlzNyQkIjMzbVQmKWUoby9cJkZURmlzNyQkIjNJJDNGPj5fZVwmRlRGaXM3JCQiM2oqKioqKlxpTjddJkZURi03JCQiMzltbTsqeiQ+JWUmRlRGLTckJCIzYUxMTHQ+Om5jRlRGLTckJCIzNUxMTC5hI28kZUZURi03JCQiM2FtbW1eUTQwZ0ZURi03JCQiM3kqKioqKip6XXJmaEZURi03JCQiM2dtbW1jJUdwTCdGVEYtNyQkIjMvTExMOC1WJlwnRlRGLTckJCIzPSsrK1hoVWttRlRGLTckJCIzPSsrKzpvPEVvRlRGLTckJCIiKEYsRi03Y29GKUYuRjI3JCQhMyUqKioqKipcQUhlKWVGMUYtRjU3JCQhM3VtbSJ6TS0helxGMUZpczckJCEzIm9tbSJIcEtEXEYxRmlzNyQkITMpb207L15eOyhbRjFGaXM3JCQhMydwbW07NHd6IltGMUZpczckJCEzNm5tO2FfaTVaRjFGaXM3JCQhM3FtbW07V0YuWUYxRmlzNyQkITNXbW1tVEZkKVElRjFGaXM3JCQhM3VtbW1tNShRPCVGMUZpczckJCEzeW1tbTt4WVdQRjFGaXM3JEY5RmlzNyQkITNbKysrRCVSLlkjRjFGaXM3JEY8RmlzNyRGP0ZpczckRkNGaXM3JCQiM1NsbW07SCEqb0NGMUZpczckRkZGaXM3JCQiM2IpKioqKioqZkMvdSRGMUZpczckJCIzMWxtbTshZUw7JUYxRmlzNyQkIjNJKSoqKipcc0NbUCVGMUZpczckJCIzYUpMTEw5SCdlJUYxRmlzNyQkIjM9KSoqKlwoeUM/cCVGMUZpczckJCIzIVttbTs5ZXh6JUYxRmlzNyQkIjMneSoqXCg9W2ldW0YxRmlzNyQkIjNXSkwkZVwiXC5cRjFGaXM3JCQiMy9sbSJIPGVqJlxGMUZpc0ZINyQkIjMpR0xMJGVHSXplRjFGLUZLRk5GUUZVRlhGZW5GaG5GW29GXm9GYW9GZG9GZ29Gam9GXXBGYHBGY3BGZnBGaXBGXHFGX3FGYnFGZXFGW3I3JEZcdEYtNyRGYnRGLTckRmV0Ri03JEZodEYtNyRGW3VGLTckRmF1Ri1GXndGZHdGZ3dGandGXXhGYHhGY3hGZnhGaXhGXHktJSZDT0xPUkc2KSUkUkdCRyQiIzVGKyRGLEYrRmNebEZjXmxGYV5sRmNebC0lK0FYRVNMQUJFTFNHNiRRIng2IlEhRmhebC0lJVZJRVdHNiQ7JCEjNUYrJCIjcUYrOyQhIiNGZF9sJCIkLSJGZF9sLSUlRk9OVEc2JCUqSEVMVkVUSUNBR0ZiXmw=

fh:=w->fourier(f(x),x,w);

NiM+SSNmaEc2ImYqNiNJIndHRiVGJTYkSSlvcGVyYXRvckdGJUkmYXJyb3dHRiVGJS1JKGZvdXJpZXJHRiU2JS1JImZHRiU2I0kieEdGJUYyOSRGJUYlRiU=

plot(abs(fh(w)),w=-50..50);

LSUlUExPVEc2Ji0lJ0NVUlZFU0c2JDdpdzckJCEjXSIiISQiKy8rMiVIJiEjNzckJCErSFUsIipbISIpJCIrTUAhUWMjISM2NyQkIStlJUc/eSVGMyQiKyRHVDgkUkY2NyQkISt1OUtlWkYzJCIrejohRzQlRjY3JCQhKyFcOVl0JUYzJCIrIVxfIik+JUY2NyQkISsxdiE0ciVGMyQiK0crTlhVRjY3JCQhK0EwPyhvJUYzJCIrSVM5TFVGNjckJCErUU5callGMyQiK2FPNWhURjY3JCQhK2FseVJZRjMkIitpOWpIU0Y2NyQkIStxJnpnaCVGMyQiK19pJypSUUY2NyQkISsnZXNCZiVGMyQiKzdTPCVmJEY2NyQkISthJ0dkWyVGMyQiK2xdKCopKT1GNjckJCErQFozelZGMyQiK2o0Q2xWRi83JCQhKyUpUXRyVUYzJCIrUTJybkZGNjckJCErWUlRa1RGMyQiK3knKWU/V0Y2NyQkISsjKkduUFRGMyQiKyE9cTVtJUY2NyQkIStQRic0NiVGMyQiK0ZxN0BbRjY3JCQhKyNlX1UzJUYzJCIraVombypbRjY3JCQhK0dDYWRTRjMkIispeSZ6JilbRjY3JCQhK3VBJDMuJUYzJCIreTUrKHklRjY3JCQhKz9ANy9TRjMkIis3ajEsWUY2NyQkISttPlR4UkYzJCIrQUA5SVZGNjckJCErNj1xXVJGMyQiK2BrInooUkY2NyQkISsjKW9rXlFGMyQiK0lzXmo/RjY3JCQhK18+Zl9QRjMkIitKUF00WUYvNyQkISs1ai1dT0YzJCIreWJJIjQkRjY3JCQhK3AxWVpORjMkIitWaFZiXUY2NyQkISsnR1U0XyRGMyQiK14kNDdRJkY2NyQkISstUlUlXCRGMyQiK1xOdTtjRjY3JCQhKz5iIXpZJEYzJCIrU1pfY2RGNjckJCErT3JRVE1GMyQiK3lqaSd6JkY2NyQkIStfKG9bVCRGMyQiKz87IVt0JkY2NyQkIStwLk4pUSRGMyQiK0h1YXFiRjY3JCQhKycpPiQ9TyRGMyQiK18tOTBgRjY3JCQhKy1PSk5MRjMkIitsN2tUXEY2NyQkIStbLWVIS0YzJCIrKTMiUlBFRjY3JCQhKyUqbyVRNyRGMyQiK2RqR3RjRi83JCQhK1ZyMzpJRjMkIitZSV5AUkY2NyQkISsjUkZqIUhGMyQiKy13LmBqRjY3JCQhKyFbeUIpR0YzJCIrZS1eeW1GNjckJCErbyZIJWVHRjMkIitWIikpSCJwRjY3JCQhK2MxW01HRjMkIis2a2VecUY2NyQkIStXPGA1R0YzJCIrXmZwITQoRjY3JCQhK0tHZSd5I0YzJCIrK1owR3FGNjckJCErP1JqaUZGMyQiKyJbLEcnb0Y2NyQkISszXW9RRkYzJCIrLT9eJmYnRjY3JCQhKyc0T1pyI0YzJCIrITQ6I0dpRjY3JCQhKycpRypvZyNGMyQiK0VWW2hNRjY3JCQhK3YnXCEqXCNGMyQiK3R0OShvJkYvNyQkIStdT3chUiNGMyQiK3BQIyk0W0Y2NyQkIStEd1ojRyNGMyQiK3k1PzchKUY2NyQkISs3IypRY0FGMyQiK2VYdS0mKUY2NyQkISsrM0lJQUYzJCIrZ1JnZSkpRjY3JCQhKylRN1U/I0YzJCIrInkpZXEhKkY2NyQkISt2Ujd5QEYzJCIrc3JvSiIqRjY3JCQhK2liLl9ARjMkIitWJEhzLipGNjckJCErXXIlZjcjRjMkIitaciwmeSlGNjckJCErUShlKSo0I0YzJCIranRUdiQpRjY3JCQhK0QueHQ/RjMkIistWlQ2eUY2NyQkISs5cyt6PkYzJCIrWyVII3pYRjY3JCQhKy5UQyUpPUYzJCIrIWVvZngkISM4NyQkISspZmg6eCJGMyQiKzdfTGpnRjY3JCQhKyM0eillO0YzJCIrKT4nZSE0IiEjNTckJCEraDE6NjtGMyQiK3JjOzs3RmNfbDckJCErSUFVajpGMyQiK0liUHk3RmNfbDckJCErOSFlJlI6RjMkIitaLkUkRyJGY19sNyQkISspeiRwOjpGMyQiKyUpR3dwN0ZjX2w3JCQhKyNlSD1cIkYzJCIrNXpbUDdGY19sNyQkIStuYCd6WSJGMyQiK0Anemk9IkZjX2w3JCQhK1ZqI3BOIkYzJCIrQ3UvJjMoRjY3JCQhKz50KWVDIkYzJCIrZipHU2kpRi83JCQhK28qKWZaNkYzJCIrWCZvdy4qRjY3JCQhKzwxSlw1RjMkIityXlxTO0ZjX2w3JCQhK3ZtIlImKiohIiokIitpdk1SPkZjX2w3JCQhKyE9RlpUKkZpYmwkIis6WElDQEZjX2w3JCQhK0lDOFgiKkZpYmwkIitDRWhsQEZjX2w3JCQhKyZvUGIoKSlGaWJsJCIrNGslKm9ARmNfbDckJCErU0glZmcpRmlibCQiKydcMD44I0ZjX2w3JCQhKj5bakwpRjMkIitHIlJEMCNGY19sNyQkISsmRzdII3lGaWJsJCIrbE9bejxGY19sNyQkISshUXclNHRGaWJsJCIrLUdDVjhGY19sNyQkISt2Ly8neidGaWJsJCIrNjYmUlkoRjY3JCQhKmQvRUcnRjMkIitNVlRWIyohIzk3JCQhKz9qdTlnRmlibCQiK1FpaVxXRjY3JCQhK2whKSlvdSZGaWJsJCIrZW1fPyMqRjY3JCQhKzUpSCF6YUZpYmwkIitqIXAlRzlGY19sNyQkIStnOjw2X0ZpYmwkIitJbS9nPkZjX2w3JCQhKzNMSlZcRmlibCQiK1VfQTdERmNfbDckJCErYl1YdllGaWJsJCIraDA1ITMkRmNfbDckJCErLW9mMldGaWJsJCIrJSopeiVlT0ZjX2w3JCQhKmJRKFJURjMkIit1QyU+QyVGY19sNyQkIStlNXckKlFGaWJsJCIreXNWeFpGY19sNyQkIStsTnlaT0ZpYmwkIis+MjYzYEZjX2w3JCQhK3NnIT1TJEZpYmwkIit5KlEmSGVGY19sNyQkISshZUdlOiRGaWJsJCIrJUg+dEwnRmNfbDckJCErJmZ0UW0jRmlibCQiK15QcSVIKEZjX2w3JCQhKmg9PjwjRjMkIis7ST1aIilGY19sNyQkISsrKHk3ayJGaWJsJCIrdCJ6WiIqKUZjX2w3JCQhKyF6UTE2IkZpYmwkIitXMyFSXCpGY19sNyQkISsrKSkpKip6JkZjX2wkIishNEEvJykqRmNfbDckJCEoKCplJFxGMyQiKykpWykqKSoqKkZjX2w3JCQiK3ZqdVYpKUY2JCIrJFtUbioqKkZjX2w3JCQiK3YqUUJFI0ZjX2wkIit6eW95KipGY19sNyQkIis3TElTT0ZjX2wkIitYYihbJSoqRmNfbDckJCIrXXdFPV1GY19sJCIrPDFTJiopKkZjX2w3JCQiK0RqPnV4RmNfbCQiK0YsMl0oKkZjX2w3JCQiKytELGA1RmlibCQiKzBwTVcmKkZjX2w3JCQiK04jKT4vO0ZpYmwkIitod3BoKilGY19sNyQkIiooUlFiQEYzJCIrUCNcTzwpRmNfbDckJCIrc0Y+TkVGaWJsJCIrbykqZVp0RmNfbDckJCIrdjorOkpGaWJsJCIrRF0oKj5rRmNfbDckJCIrd2YhXE4kRmlibCQiK3ZOYUZmRmNfbDckJCIreS4iW2YkRmlibCQiK1xvTEBhRmNfbDckJCIrelpyTVFGaWJsJCIrLTFWMFxGY19sNyQkIio9PlkyJUYzJCIrOyZHUlElRmNfbDckJCIrMERzTFZGaWJsJCIrX1A3PlFGY19sNyQkIitJZSNHZiVGaWJsJCIrJ2Zad0QkRmNfbDckJCIrYiJIPiZbRmlibCQiKzRrWC9GRmNfbDckJCIrIVtLNTYmRmlibCQiK3dRS2tARmNfbDckJCIrMGU4cWBGaWJsJCIrUygpeVQ7RmNfbDckJCIrSSJSI0hjRmlibCQiKzFoNVQ2RmNfbDckJCIrYkNNKSllRmlibCQiK2R3LWltRjY3JCQiKnlYdTknRjMkIitlIXBqPyNGNjckJCIrZ1IhR28nRmlibCQiK3VdNFNmRjY3JCQiK05AOz1zRmlibCQiK0NPa1s3RmNfbDckJCIrNS5fYHhGaWJsJCIrcEEzSTxGY19sNyQkIipceSkpRylGMyQiKzdWMU0/RmNfbDckJCIrYi12XSYpRmlibCQiKzUhZSI+QEZjX2w3JCQiKz8/aTcpKUZpYmwkIittSipSOyNGY19sNyQkIisheiRcdSEqRmlibCQiK1dGRXFARmNfbDckJCIrYmJPTyQqRmlibCQiK1Ylbys5I0ZjX2w3JCQiKyE0NCwnKSpGaWJsJCIrYVNeISk+RmNfbDckJCIraV9RUTVGMyQiK0dMIykzPEZjX2w3JCQiK0BddFI2RjMkIitLUXojbypGNjckJCIrIXklM1Q3RjMkIitudSY9RCJGNjckJCIrM2toYDhGMyQiKzwhKSlwKW9GNjckJCIrTyFbaFkiRjMkIis6XmciPSJGY19sNyQkIisvblUiXCJGMyQiKzsxeU83RmNfbDckJCIrc2BxOzpGMyQiK2RUcnE3RmNfbDckJCIrU1MpPmEiRjMkIitoV2YkRyJGY19sNyQkIis0RkVuOkYzJCIrdjUiZkYiRmNfbDckJCIrWSsjeWgiRjMkIitiJz1BPyJGY19sNyQkIisjUXgkbztGMyQiK0RLKillNUZjX2w3JCQiK3kpUWp4IkYzJCIreWRZPWVGNjckJCIrdS5JJSk9RjMkIitOb0F4TUZoXmw3JCQiK08mSEApPkYzJCIrSHkoPXIlRjY3JCQiKyhwZSp6P0YzJCIrSFAiKmV6RjY3JCQiK3dwcDFARjMkIisxMCl5XClGNjckJCIrYV9WTEBGMyQiK2kkeU4oKSlGNjckJCIrS048Z0BGMyQiK1o0ZCQzKkY2NyQkIis1PSJwPSNGMyQiK0giKUhHIipGNjckJCIrKTNdT0AjRjMkIitdPSs2ISpGNjckJCIrbiQpUVNBRjMkIis8c2dQKClGNjckJCIrWW03bkFGMyQiK2VDYzskKUY2NyQkIitDXCdRSCNGMyQiK2YmUidleEY2NyQkIitvJSpcJVIjRjMkIis9KFJRbiVGNjckJCIrOFM4JlwjRjMkIitqPEJnc0YvNyQkIis0aEsrRUYzJCIrIypbLVZLRjY3JCQiKzAjPWJxI0YzJCIrVCl5MzEnRjY3JCQiK0kkSDd0I0YzJCIrJj1gPFwnRjY3JCQiK2MvJXB2I0YzJCIrJEheJTNvRjY3JCQiKyJlXkV5I0YzJCIrJCkqcHorKEY2NyQkIisxRk8zR0YzJCIrSWdCKjMoRjY3JCQiK0pRMk1HRjMkIityKCozYHFGNjckJCIrY1x5ZkdGMyQiK2NyQi1wRjY3JCQiKyMzJ1wmKUdGMyQiKzBbPFRtRjY3JCQiKzJzPzZIRjMkIitFcTN3aUY2NyQkIitvZSgpPUlGMyQiKz5TbjlRRjY3JCQiK0lYYUVKRjMkIisxd1ozW0YvNyQkIitbQUNJS0YzJCIrbCV5YGwjRjY3JCQiK2wqUlJMJEYzJCIrYkJBP1xGNjckJCIrUTlYZ0xGMyQiK0ZFZylHJkY2NyQkIis3SCdwUSRGMyQiKzMqXCJmYkY2NyQkIisnUXVNVCRGMyQiK1xFckdkRjY3JCQiK2ZlKSpSTUYzJCIraz8jZnomRjY3JCQiK0t0XG1NRjMkIitedT1oZEY2NyQkIisxKTNJXCRGMyQiK1hJbUVjRjY3JCQiKyFHPyY+TkYzJCIrMlw9J1ImRjY3JCQiK2A8LllORjMkIitMND12XUY2NyQkIitMJio+Xk9GMyQiK0AmR1AxJEY2NyQkIis4dE9jUEYzJCIrWUQjR2ckRi83JCQiKyJlMEkmUUYzJCIrIkcsXjQjRjY3JCQiK1xRa1xSRjMkIislKillQidSRjY3JCQiK1JNTHhSRjMkIitMTkFIVkY2NyQkIitISS0wU0YzJCIrWiFSKDNZRjY3JCQiKz5FcktTRjMkIisqKUgjb3olRjY3JCQiKzRBU2dTRjMkIit6KXA2KltGNjckJCIrKnoiNCkzJUYzJCIraCJwNypbRjY3JCQiKypRInk6VEYzJCIrbTlSKXolRjY3JCQiK3o0WlZURjMkIispKjNhOllGNjckJCIrcDA7clRGMyQiKyVcdnRNJUY2NyQkIituVEFxVUYzJCIrZmM3KHojRjY3JCQiK2x4R3BWRjMkIis8ZiYzZydGLzckJCIrQS0iXFolRjMkIitrNSo9biJGNjckJCIrIW9LMGUlRjMkIitEInA3WCRGNjckJCIrQWkhZWclRjMkIitrUD5TUEY2NyQkIitrKHo1aiVGMyQiK0dNa21SRjY3JCQiKzFMTmNZRjMkIitYKj54NyVGNjckJCIrW29pIm8lRjMkIitdY2VAVUY2NyQkIishUitwcSVGMyQiK2AzW1pVRjY3JCQiK0tSPEtaRjMkIitTVXMwVUY2NyQkIit1dVdkWkYzJCIrZ2xwKDQlRjY3JCQiKzw1cyN5JUYzJCIrS3ghZSNSRjY3JCQiKzMwTyIqW0YzJCIrSD01ZURGNjckJCIjXUYsRi0tJSZDT0xPUkc2JiUkUkdCRyQiIzUhIiIkRixGYFxvRmFcby0lK0FYRVNMQUJFTFNHNiRRInc2IlEhRmZcby0lJVZJRVdHNiQ7JCEkKyZGYFxvRmhbbzskITBLelxwby4qPiEjOyQiMks4JCopNFkqKT41RmFdby0lJUZPTlRHNiQlKkhFTFZFVElDQUdGX1xv

g:=x->exp(-x^2);

NiM+SSJnRzYiZio2I0kieEdGJUYlNiRJKW9wZXJhdG9yR0YlSSZhcnJvd0dGJUYlLUkkZXhwRzYkSSpwcm90ZWN0ZWRHRi9JKF9zeXNsaWJHRiU2IywkKiQ5JCIiIyEiIkYlRiVGJQ==

F:=(w,t)->fourier(f(x)*g(x-t),x,w);

NiM+SSJGRzYiZio2JEkid0dGJUkidEdGJUYlNiRJKW9wZXJhdG9yR0YlSSZhcnJvd0dGJUYlLUkoZm91cmllckdGJTYlKiYtSSJmR0YlNiNJInhHRiUiIiItSSJnR0YlNiMsJkY0RjU5JSEiIkY1RjQ5JEYlRiVGJQ==

plot3d(abs(F(w,t)),w=-10..10,t=-15..15,axes=normal);

LSUnUExPVDNERzYmLSUlR1JJREc2JTskISM1IiIhJCIjNUYrOyQhIzpGKyQiIzpGKzc7NzskIitqYSR5OikhJHgiJCIrTG40SUohJGMiJCIrKFwvOz0mISRQIiQiK3I4Rj5QISQ+IiQiK2cnKWVoNiEkLSIkIisxRlwjZSIhIygpJCIrPy5HQCUqISN1JCIrX2QiUlgjISNoJCIrUGxWKHojISNdJCIrZnVwJVIiISNTJCIrLVpkS0khI0skIitMUyJ6J0chI0QkIishb0JVPiIhIz4kIis4K10iPSNGMCQiKydlZzt0IiEjNyQiK3ojb1A7JyEjNiQiK3owQ2I6RipGW29GaG5GZm5GWUZWRlNGUEZNNzskIislKSl6LWoiRjckIitZO2BNXkY6JCIrN2EmeUYoRj0kIitQWy8pMykhJD8iJCIrJWUlNE86RkMkIit4QDJeOEZGJCIrXl0+XldGSSQiK0R2cm1GRkwkIithV3pyN0ZPJCIrJT4tOHIqISNUJCIrYi8oeSVIRlUkIis0QlZySEZYJCIrKio0Vlw3RmVuJCIrQ3UhUkojRjAkIitMclJtPUZqbiQiK1BEYjhuRl1vJCIrI1wleno7RipGYXFGX3FGXXFGW3FGaXBGZ3BGZHBGYnA3OyQiK21hJDQ1IiEkdyIkIitrNW0qKmZGOiQiKyIqKioqKXpXRj0kIitoPSlRVCNGQCQiKzZ4eihmIkZDJCIrO2Y8NjlGRiQiK2hIQFZBRkkkIitoQSNmYyNGTCQiK183S1JFRk8kIis0YHJiOUZmcCQiK1EyVWVCRlUkIitcLDZ2SUZYJCIrPjYmb0kiRmVuJCIrUGAicFgjRjAkIishM3hMLCNGam4kIitSKD4jb3FGXW8kIityWHQlXCJGKkZlc0Zjc0Zhc0Zfc0Zdc0Zbc0ZpckZncjc7JCIrSC4+MTxGaHEkIituYkg+YkY6JCIrWT46THlGPSQiKy4uRXZbRkAkIislcClwSDhGQyQiK1paUChlIkZGJCIrXD5OeCMpRkkkIisob2MneT1GTCQiK0wiKilRJT1GTyQiKzp2dEZ4RmZwJCIrMT1DWDhGVSQiK0pvJ0giSEZYJCIrL1EjZk8iRmVuJCIrRzhzNUVGMCQiK0AyXXpARmpuJCIrLFJ6JVIoRl1vJCIraCo9I3AmKkZdb0ZodUZmdUZkdUZidUZgdUZedUZcdUZqdDc7JCIrNmdvKHkiRmhxJCIrLiRRNXokRjokIistIj1ccCRGPSQiK1R4bFNkRkAkIit0TSdbJHkhJC4iJCIrSUE/JT4iRkYkIit5Zk1XNiEjdCQiK2VFN14jKSEjaSQiK1xASFVCRk8kIis1Pm4/OUZSJCIrWkI7QWshI00kIitVKVIhKSlIRlgkIitKJT1lVSJGZW4kIis0ayNceCNGMCQiK0RgY3VCRmpuJCIrMm1HayEpRl1vJCIrNSUpeU5pRmpuRl94Rl14Rlt4Rml3Rmd3RmR3RmJ3RmB3NzskIitiSXc6OEZocSQiK0VCPSc+IkY6JCIrOSd5JilIKUY9JCIrWFctK1pGQCQiK11delBwISQvIiQiKyNIXUF6IkZGJCIrZXYiRzAiRlx3JCIraCx6SVNGX3ckIishejdWUCNGTyQiKy88OEU6RlIkIiskZmEqeTdGVSQiKzpKI3p4IkZYJCIrUiEzYVsiRmVuJCIreltwWkhGMCQiKzFcJWZnI0ZqbiQiK3hBRWQlKkZdbyQiK3gxN102RipGY3pGYXpGX3pGXXpGW3pGaXlGZ3lGZXk3OyQiK0Z2QUlWRjckIitxeD4mbyJGOiQiK0Q2VlFHRj0kIit0SV8hMyNGQCQiK2slKUhrbUZndiQiK3U+bWgkKiEjKSkkIis5eiZmeSZGSSQiK2JhWXk6RkwkIitKITR2IT5GTyQiKy8zRkQ1RlIkIitvRitqQ0ZVJCIrVjIlKWZFRlgkIitnSTlZOkZlbiQiK1xjJlw3JEYwJCIrczAlRyhHRmpuJCIrVmIybTZGKiQiKylIXjBnI0YqRmdcbEZlXGxGY1xsRmFcbEZfXGxGXVxsRltcbEZpW2w3OyQiK1ojKTMpKWVGNyQiK2ZPIVw/JUY6JCIrKj0xMm0pRj0kIisnR3FiRCJGQCQiKyZlTT9GIkZDJCIrdGMqZiY+RkYkIithUTs/NkZJJCIrcy5tIVsjRkwkIitgQSE+I0dGTyQiK1ZFekkqKiEjVSQiK1ZqXylHJEZVJCIrJDMqW0RFRlgkIitUJnlTZiJGZW4kIishb04rSSRGMCQiK11dUmpKRmpuJCIrd1lsVjlGKiQiK24jZlw8JUYqRltfbEZpXmxGZ15sRmVebEZjXmxGYV5sRl5ebEZcXmw3OyQiKzpAIkhWIkZocSQiKzFEUyR6JkY6JCIrXD9DRD5GPSQiKy55Pic+JUZAJCIrJnopXEA7RkMkIit4TllWa0ZkW2wkIitwXilRcShGSSQiK1k2SFFIRkwkIis2Kio0XThGTyQiK19WSiUqKSlGZnAkIismXCxCaCRGVSQiKzFQIm8sI0ZYJCIrdyNIXXYiRmVuJCIrcGcnUlkkRjAkIitMRSpmWCRGam4kIisjPmQydSJGKiQiKydvTHJ0JkYqRl5hbEZcYWxGamBsRmhgbEZmYGxGZGBsRmJgbEZgYGw3OyQiK0cmemgkPUZocSQiKzYnPiQqMydGOiQiK2t1ZzMqKUY9JCIrRDw4YGRGQCQiKyE+aDdrIkZDJCIrMCxJcT9GRiQiKyopUjBjNkZcdyQiK3U4JD4nR0ZMJCIrITRQcjkkRk8kIitAUzxUOkZSJCIrKCk0T3NMRlUkIishUTw/SiRGWCQiKyY9KT5YO0ZlbiQiK3dFUTFPRjAkIitoR15CUEZqbiQiK1wpWyo9P0YqJCIrNCFwTzkoRipGYWNsRl9jbEZdY2xGW2NsRmlibEZnYmxGZWJsRmNibDc7JCIrT1x4cjtGaHEkIistUy9BXUY6JCIrPTUsRigqISRRIiQiK2FsPyhSJkZAJCIreityRDhGQyQiK2ZKViVHJEZkW2wkIituQiJlNyJGXHckIituW2loQUZMJCIrM0xZK3EhI14kIis7YEwlZSJGUiQiK2sqSCUqZiNGVSQiK2lPbSM0IkZYJCIrSndbWTxGZW4kIitcNTs8UEYwJCIrc3ZbUVJGam4kIitvJFxXQyNGKiQiK2EoKlJnIylGKkZmZWxGZGVsRmJlbEZgZWxGXmVsRlxlbEZqZGxGZ2RsNzskIisyU1UkKikqRjckIitYQltHR0Y6JCIrbiZlWC4qRj0kIitAeT5TS0ZAJCIrbz4vJ1EoRmd2JCIrIzNuIUhARkYkIisvQ2B5b0ZJJCIrRS1iWDdGTCQiK29iXz1MRk8kIisxeWJDKipGZnAkIitgcGg3OUZVJCIrbyM+KSpwJEZYJCIrJTMlKVE2IkZlbiQiKywhb3h5JEYwJCIrJmZdeDIlRmpuJCIrKEdaNFIjRiokIis5LDh5KilGKkZpZ2xGZ2dsRmVnbEZjZ2xGYWdsRl9nbEZdZ2xGW2dsNzskIitlKio9STchJCQ9JCIrPy9SSVEhJGoiJCIrJj1cLEMmISRXIiQiKzdcdFxKISRFIiQiK1kzSD0kKSEkNSIkIitFdDlfJyohIyYqJCIrSSYpKTMjXCEjIikkIitlQkctNiEjbyQiKyVlYlszIiEjZCQiKyhIbDZwJSEjWyQiKytIIUgiKilGUiQiK0ZQQVN1ISNMJCIrXlFYczxGZW4kIislUXQ6IlFGMCQiKzZ2JmY3JUZqbiQiKzR0cFRDRiokIitLLGlEIypGKkZnamxGZWpsRmNqbEZhamxGXmpsRlxqbEZpaWxGZmlsNzskIitDPlUkKikqRjckIitESVtHR0Y6JCIrPydlWC4qRj0kIislSCg+U0tGQCQiK2pNLydRKEZndiQiKyc0biFIQEZGJCIrKmZKJnlvRkkkIitFL2JYN0ZMJCIrKmVEJj1MRk8kIitocWJDKipGZnAkIis9cmg3OUZVJCIrIkg+KSpwJEZYJCIrVVMpUTYiRmVuJCIrUCFveHkkRjAkIis2MXZ4U0ZqbiQiKyRHWjRSI0YqRltobEZqXG1GaFxtRmZcbUZkXG1GYlxtRmBcbUZeXG1GXFxtNzskIitGW3hyO0ZocSQiK2ZXL0FdRjokIisuLitGKCpGXGRsJCIrLmo/KFImRkAkIislPTVkSyJGQyQiKyo+SldHJEZkW2wkIitLQiJlNyJGXHckIis7XWloQUZMJCIrTjZZK3FGaWRsJCIrKkdOVmUiRlIkIislNEklKmYjRlUkIis8Tm0jNCJGWCQiK0F3W1k8RmVuJCIrLzY7PFBGMCQiK2p2W1FSRmpuRmZlbCQiK2ooKlJnIylGKkZmZWxGaV5tRmdebUZlXm1GY15tRmFebUZfXm1GXV5tNzskIitnJnpoJD1GaHEkIitIKD4kKjMnRjokIitdd2czKilGPSQiK2A9OGBkRkAkIitIN0VUO0ZDJCIrYixJcT9GRiQiKzxTMGM2Rlx3JCIrWDkkPidHRkwkIittcjhaSkZPJCIrZFM8VDpGUiQiK2s1T3NMRlUkIitddSw3TEZYJCIrOiMpPlg7RmVuJCIrTEZRMU9GMCQiK2ZHXkJQRmpuRmFjbCQiKzkhcE85KEYqRmFjbEZqYG1GaGBtRmZgbUZkYG1GYmBtRmBgbUZeYG03OyQiKydIN0hWIkZocSQiKzFBUyR6JkY6JCIrWzNDRD5GPSQiKzUkKT4nPiVGQCQiK1goKVxAO0ZDJCIrPTlZVmtGZFtsJCIrUmcpUXEoRkkkIisyNkhRSEZMJCIrIW8qNF04Rk8kIitaX0olKikpRmZwJCIrIlwsQmgkRlUkIitqTiJvLCNGWCQiKzkkSF12IkZlbiQiKyc0bVJZJEYwRlxhbEZeYWwkIispb0xydCZGKkZeYWxGXGFsRmlibUZnYm1GZWJtRmNibUZhYm1GX2JtNzskIisyLjQpKWVGNyQiKyE9Llw/JUY6JCIrX2txZycpRj0kIitGM2RiN0ZAJCIrJFxNP0YiRkMkIitTZCpmJj5GRiQiKzRaOz82RkkkIit0LW0hWyNGTCQiK2FCIT4jR0ZPJCIrXFl5SSoqRmBebCQiKyVIRSYpRyRGVSQiK3IiKltERUZYJCIrXSZ5U2YiRmVuJCIrKG9OK0kkRjAkIitoXVJqSkZqbiQiKyNvYU9XIkYqJCIrJ0dmXDwlRipGXGVtRmpkbUZoZG1GZmRtRmRkbUZiZG1GYGRtRl5kbTc7JCIrVGFBSVZGNyQiK0hyPiZvIkY6JCIraC1WUUdGPSQiK2tEXyEzI0ZAJCIrXHJIa21GZ3YkIislXGc7TypGZFtsJCIrJT1kZnkmRkkkIispSGwleTpGTCQiKycpKTN2IT5GTyQiK1kyRkQ1RlIkIitwRStqQ0ZVJCIrcTElKWZFRlgkIitdSTlZOkZlbiQiK1NjJlw3JEYwJCIrejAlRyhHRmpuJCIrWmIybTZGKiQiKzg4YitFRipGX2dtRl1nbUZbZ21GaWZtRmdmbUZlZm1GY2ZtRmFmbTc7JCIrX0d3OjhGaHEkIismPiQ9Jz4iRjokIitPIXomKUgpRj0kIisyUy0rWkZAJCIrL1UieSRwRl55JCIrKy9EI3oiRkYkIisxdiJHMCJGXHckIitud3lJU0ZfdyQiK1tISnVCRk8kIit3OzhFOkZSJCIrNFcmKnk3RlUkIitWSyN6eCJGWCQiK1QhM2FbIkZlbiQiK3ZbcFpIRjAkIisrXCVmZyNGam4kIitvQUVkJSpGXW8kIisobz8sOiJGKkZiaW1GYGltRl5pbUZcaW1GamhtRmhobUZmaG1GZGhtNzskIitlZm8oeSJGaHEkIiszIVI1eiRGOiQiKzpxIlxwJEY9JCIrT3hsU2RGQCQiK3peJ1skeUZndiQiK2E/PyU+IkZGJCIrLGdNVzZGXHckIitpXTdeIylGX3ckIismKj5IVUJGTyQiK2I+bj85RlIkIitmOD1Ba0ZmdyQiKyp5UiEpKUhGWCQiKyJbPWVVIkZlbiQiK0RrI1x4I0YwJCIrT2BjdUJGam4kIitVbUdrISlGXW8kIisydXlOaUZqbkZlW25GY1tuRmFbbkZfW25GXVtuRltbbkZpam1GZ2ptNzskIisqUiE+MTxGaHEkIitBZUg+YkY6JCIrWUI6THlGPSQiK3UwRXZbRkAkIit1KClwSDhGQyQiK1pbUChlIkZGJCIrL0ROeCMpRkkkIitBb2x5PUZMJCIrciMqKVElPUZPJCIrWyJReHMoRmZwJCIrST5DWDhGVSQiKztwJ0giSEZYJCIrT1EjZk8iRmVuJCIrQjhzNUVGMCQiKzwyXXpARmpuJCIrJClReiVSKEZdbyQiKyEqKT0jcCYqRl1vRmhdbkZmXW5GZF1uRmJdbkZgXW5GXl1uRlxdbkZqXG43OyQiK15jJDQ1IkZocSQiKzk2bSoqZkY6JCIrJkcqKil6V0Y9JCIrJ1EjKVFUI0ZAJCIrZXh6KGYiRkMkIis/ZTw2OUZGJCIrLFFAVkFGSSQiK3JCI2ZjI0ZMJCIrLTdLUkVGTyQiKyVmOWRYIkZmcCQiK20zVWVCRlUkIit6LDZ2SUZYJCIrRDYmb0kiRmVuJCIrdmAicFgjRjAkIis2clA4P0ZqbiQiK1cpPiNvcUZdbyQiKyJmTVpcIkYqRltgbkZpX25GZ19uRmVfbkZjX25GYV9uRl9fbkZdX243OyQiK2tFR0k7RjckIis4NmBNXkY6JCIrXmYmeUYoRj0kIitldy4pMylGaW8kIisvWDRPOkZDJCIrOkIyXjhGRiQiKyUpUj5eV0ZJJCIrdnVybUZGTCQiK1ZZenI3Rk8kIis7OEk2KCpGZnAkIitsLyh5JUhGVSQiK3ZCVnJIRlgkIishKTRWXDdGZW4kIismUTJSSiNGMCQiKy5yUm09RmpuJCIrTENiOG5GXW8kIitsV3p6O0YqRl5ibkZcYm5GamFuRmhhbkZmYW5GZGFuRmJhbkZgYW43OyQiK25IJHk6KUY3JCIrJipmNElKRjokIitcTmciPSZGPSQiK1YzRj5QRkAkIitOJillaDZGQyQiK3hEXCNlIkZGJCIrYCh6N1UqRkkkIitcYyJSWCNGTCQiK2xrVih6I0ZPJCIrU3VwJVIiRlIkIisicHVELiRGVSQiK1pTInonR0ZYJCIrIm9CVT4iRmVuRmZuJCIrKmVnO3QiRmpuJCIrKEdvUDsnRl1vJCIrI2VTX2IiRipGX2RuRl1kbkZmbkZbZG5GaWNuRmdjbkZlY25GY2NuLSUrQVhFU0xBQkVMU0c2JVEidzYiUSJ0RmdkblEhRmdkbi0lKkFYRVNTVFlMRUc2IyUnTk9STUFMRy0lJUZPTlRHNiQlKkhFTFZFVElDQUdGLQ==

f:=x->g(x-4);

NiM+SSJmRzYiZio2I0kieEdGJUYlNiRJKW9wZXJhdG9yR0YlSSZhcnJvd0dGJUYlLUkiZ0dGJTYjLCY5JCIiIiEiJUYxRiVGJUYl

plot(f(x),x=-10..10);

LSUlUExPVEc2Ji0lJ0NVUlZFU0c2JDdecDckJCEjNSIiISQiMyE0Jz5yPiE+ZWIoISQuIjckJCEzIXBtbW0icDBrJiohIzwkIjNrZDdTNylIK0QiISMoKjckJCEzdUtMJDM8WFo9KkYzJCIzM3JkMGVMaSc9JCEjJCo3JCQhM1dtbW1UJXAiZSgpRjMkIjMmZnZvZCVvUlI/ISMpKTckJCEzL25tbSI0bShHJClGMyQiM2clKjQsJkdzX3MqISMlKTckJCEzT0xMJDNpLjkhekYzJCIzLSZIIVJNKm9fMCQhI3o3JCQhM2ZtbTsvUj0wdkYzJCIzLSwoW3d4JGVjSyEjdjckJCEzaysrXVA4I1w0KEYzJCIzO3FvYk1WaWpNISNyNyQkITNLbW07L3NpcW1GMyQiMyk9NmdCXnkrYiQhI243JCQhM1EqKioqXCh5JHBaaUYzJCIzaUxdNjtub29DISNqNyQkITNqS0xMJHlhRSJlRjMkIjMkZVdBVy1TRF8iISNmNyQkITM8bW1tIj5zJUhhRjMkIjNBI0gueTcrXlUjISNjNyQkITNdKioqKioqXCQqNCkqXEYzJCIzcU1yTiFSUDIobyEjYDckJCEzbyoqKioqKlxfJlxjJUYzJCIzcUknSEc3OElRIiEjXDckJCEzJSkqKioqKipcMWFaVEYzJCIzc3hIUSpcXTJbIiEjWTckJCEzSW1tOy8jKVtvUEYzJCIzP1N4dyQpb0R1aCEjVzckJCEzJUhMTEw9ZXhKJEYzJCIzKCllRTpuXWNVYiEjVDckJCEzbEtMTEwyJGYkSEYzJCIzX2YleSN5TVAhRyIhI1E3JCQhMyUpKioqKlxQWXgiXCNGMyQiM1d0VWhJV3QjKVwhI083JCQhM2dMTExMN2kpNCNGMyQiMyR6XTUhUTUyTXEhI003JCQhM28pKioqXFAncHNtIkYzJCIzP2w/MUw2X0Q2ISNKNyQkITM/KioqKlw3NF9jN0YzJCIzM04kPkMsNCsrIiEjSDckJCEzTTpMTCQzeCV6IykhIz0kIjNicyhINScqeU1gKCEjRzckJCEzKClITEwzcyRRTSVGXHQkIjNVRk0sT3olXClHISNFNyQkITNdXm9tbTt6cikqISM/JCIzeD1zVilIJnpSNSEjQzckJCIzZlZMTGV6dzVWRlx0JCIzclJSOls2blJIISNCNyQkIjMtLisrdiRRI1wiKUZcdCQiMz9FW2ZhTkxHUiEjQTckJCIzJVxMTCRlIipbSDdGMyQiM143SVoqKWZeUlkhI0A3JCQiM2NubTtIQ2pWOUYzJCIzd0Awd0JxcV45Rml0NyQkIjM9KysrK2R4ZDtGMyQiM3JDX3k4eUtXVEZpdDckJCIzRysrRDFXX2k8RjMkIjNZX2psTjdsJnAnRml0NyQkIjNRKytdN0pGbj1GMyQiMz0mRyczTThHZTUhIz43JCQiM10rK3Y9PS1zPkYzJCIzJVEwTmtvZ2pqIkZjdzckJCIzZSsrK0QweHc/RjMkIjNPKlI9U10jSHZDRmN3NyQkIjMlMytdUC9xJXpBRjMkIjNjdy95c1h0IT0mRmN3NyQkIjM1LCtdaSZwQFsjRjMkIjNRMkNeXGd3KCkqKkZjdzckJCIzIzMrRDE+LFpmI0YzJCIzeUZjaj0zIXlRIkZcdDckJCIzYisrdj1HQjJGRjMkIjNvZHomb3FDLCk9Rlx0NyQkIjNGK10ob1drKD5HRjMkIjNbdHMiKVs4UyRbI0ZcdDckJCIzKysrK3ZnSEtIRjMkIjNBQXlfYW9AKT4kRlx0NyQkIjNLbW0ienU1TS4kRjMkIjNbcnYrPCNHJ0dSRlx0NyQkIjNqS0wkM1VEWDgkRjMkIjNlJUhAZSlHPEdaRlx0NyQkIjMmKikqKlxQNFNjQiRGMyQiM1kwT3o1L0V2YkZcdDckJCIzRWxtbW1adk9MRjMkIjMpPnVPRlFYNVcnRlx0NyQkIjM9KioqKlxpaXJXTUYzJCIzQ1opPih5WWxZdEZcdDckJCIzNUxMTGV4bl9ORjMkIjMheiRSSWk9Xic9KUZcdDckJCIzLW5tO2EjUjFtJEYzJCIzJlFoMG9VJT03KilGXHQ3JCQiMyU0Kysrdisnb1BGMyQiMyllTi9EMEYneSUqRlx0NyQkIjMhUUxlOSIqSGsnUUYzJCIzQT0scCNSc0ojKSpGXHQ3JCQiM29tbSJIMmZVJ1JGMyQiM3UnPnFuLE1zKSoqRlx0NyQkIjNuS2VrYE88OFNGMyQiMyM9M3ghKnBrIykqKipGXHQ3JCQiM2MqKlxQTSMpM2lTRjMkIjMnb3EpRz5aX2gqKkZcdDckJCIzVm1UNTpHKzZURjMkIjMrJ1xZVnZSdigpKkZcdDckJCIzVUtMJGVSPCpmVEYzJCIzI0gqUj4wbV1aKCpGXHQ3JCQiMyEqKipcUDQwKG9FJUYzJCIzJCkqPmhEOnJESipGXHQ3JCQiM1FubSJIaUJRUCVGMyQiM2ctLUQ8dCFlcClGXHQ3JCQiMydbTGVrdHcyWyVGMyQiM1w0YStTUEJPekZcdDckJCIzSy0rK10pSHhlJUYzJCIzIUgiKj1FXCU9enFGXHQ3JCQiM3luO3olUmskKW8lRjMkIjMzWmpgQ1QuRWlGXHQ3JCQiMzdNTGVSKikqKil5JUYzJCIzRSJwX2MmKTNmTyZGXHQ3JCQiM1crXVAlW0wnKilbRjMkIjNiR3okKUhBKT1gJUZcdDckJCIzIWZtbSJIIW8tKlxGMyQiM188WXEnUVcydiRGXHQ3JCQiM3kqKioqKlw3Z2E0JkYzJCIzKmZYTDsyVj0sJEZcdDckJCIzbkxMJDNBXzE/JkYzJCIzd1F5UiF5cWJPI0ZcdDckJCIzY25tbTtWJWVJJkYzJCIzOCdIOTcncEk8PUZcdDckJCIzWCwrXTdrLjZhRjMkIjNdbFYsVGJibDhGXHQ3JCQiM2pMTGU5YXM7Y0YzJCIzYidcOFVZY2JLKEZjdzckJCIzI2VtbW1UOUMjZUYzJCIzZm84Mykqeic0aCRGY3c3JCQiM2QqKlw3eUkzSWZGMyQiM093aDNgeng1Q0ZjdzckJCIzV0tMZVI8dlBnRjMkIjNVb3BMaEBoczpGY3c3JCQiM0tsOy8sL1VYaEYzJCIzKWYpej9LVU0tNUZjdzckJCIzMyoqKipcaSEqM2BpRjMkIjNkbiMpKSopZndBQydGaXQ3JCQiMzdubSJ6XCVbZ2tGMyQiM1EhekNeMChbW0JGaXQ3JCQiMztOTExMKnp5bSdGMyQiMyZwKzIwSU9zNSlGXnY3JCQiMydlTEwkM04xIzQoRjMkIjNscC9mYklDVnFGaHU3JCQiMyxwbTtIWXQ3dkYzJCIzYSFvRHhNNWpQJUZidTckJCIzNy0rKyt4RyoqeUYzJCIzRWJESSJlNE1cI0ZcdTckJCIzZ3BtbVQ2S1UkKUYzJCIzWTwvM2snekBaJ0ZldDckJCIzcU5MTExiZFEoKUYzJCIzTTYjZnNFcDh4IiEjRjckJCIzWysrXWlgMWgiKkYzJCIzeTE5LmgyPC5GRmhzNyQkIjNBLStdUD9XbCYqRjMkIjNaKWVnSnBVRWAkRmJzNyQkIiM1RiwkIjNrcE5DSUdfPkIhI0wtJSZDT0xPUkc2JiUkUkdCRyRGXGdsISIiJEYsRmVnbEZmZ2wtJStBWEVTTEFCRUxTRzYkUSJ4NiJRIUZbaGwtJSVWSUVXRzYkOyQhJCsiRmVnbEZbZ2w7JCEya1Q6KVJIbCoqPkZcdCQiMkEnZUkqKkgjKT41ISM7LSUlRk9OVEc2JCUqSEVMVkVUSUNBR0ZcZ2w=

fh:=w->fourier(f(x),x,w);

NiM+SSNmaEc2ImYqNiNJIndHRiVGJTYkSSlvcGVyYXRvckdGJUkmYXJyb3dHRiVGJS1JKGZvdXJpZXJHRiU2JS1JImZHRiU2I0kieEdGJUYyOSRGJUYlRiU=

plot(f(w),w=-50..50);

LSUlUExPVEc2Ji0lJ0NVUlZFU0c2JDdfcTckJCEjXSIiISRGLEYsNyQkITNHTExMZSVHP3klISM7Ri03JCQhMyFwbTthZXNCZiVGMUYtNyQkITNBTEwkM3MlM3pWRjFGLTckJCEzTUxMJGUvJFFrVEYxRi03JCQhMydvbTsvIj1xXVJGMUYtNyQkITNRTEwzXz5mX1BGMUYtNyQkITMpKioqKlwobzFZWk5GMUYtNyQkITNETEwzLU9KTkxGMUYtNyQkITMoKSoqKlxQKm8lUTckRjFGLTckJCEzS21tbSJSRmohSEYxRi03JCQhMytMTCRlNE9aciNGMUYtNyQkITNbKioqKipcblwhKlwjRjFGLTckJCEzJSoqKioqKlxpeENHI0YxRi03JCQhM2MqKioqKlxLcVAyI0YxJCIzRjxzaG1MPTA8ISQkRzckJCEzMUxMMy1UQyUpPUYxJCIzWzxKKmYyKWUkWyMhJFcjNyQkITMvbW1tIjR6KWU7RjEkIjNtRDFsdFwiUispISQtIzckJCEzb21tbW1gJ3pZIkYxJCIzSSpbKm9sR1QnKkchJHAiNyQkITNtKioqXCg9dCllQyJGMSQiM0NYXHNDJjQiXEEhJE4iNyQkITNPbW1tOzFKXDVGMSQiMz1fY08mbzBkKGYhJDQiNyQkITNTJCoqKlwoPVtqTCkhIzwkIjM5d2gkeUBmazEpISMlKTckJCEzeSgqKipcaVhnI0cnRmdwJCIzXy8kNFtGd2I/IiEjajckJCEzV2ZtbVQmUShSVEZncCQiM1E2KVtBaCZSIm8iISNZNyQkITM7am07Lyc9PjwjRmdwJCIzVV9YekU2Y2hHISNNNyQkITMvJyoqXDd5UTE2IkZncCQiMzg1XFFXTGRQWCEjSDckJCEzJUcqR0xMZSplJFwhIz4kIjMhKVIyVCkqR3pqdiEjRDckJCIzXzduVGd4RT1dISM9JCIzcWZSQCRbJG9ZWyEjQjckJCIzV3JtVDVELGA1RmdwJCIzQSdbayVvP1sicCIhI0A3JCQiM19yVGd4YGdHOEZncCQiM1MqW0BjVTpsJnpGZnM3JCQiM2hyO3pXIyk+LztGZ3AkIjM/bWJfQCopPjpLISM/NyQkIjNxciJ6PjYieno9RmdwJCIzYkpfJioqNFxoNiJGZnI3JCQiMyE9bm0ielJRYkBGZ3AkIjNGI0hac3FMJ0dMRmZyNyQkIjNXUSQzLVEpRyZSI0ZncCQiM2NjJGUtW0RZaChGZnI3JCQiMzYwK0QieSM+TkVGZ3AkIjNNIXphN3dJRGIiRl1zNyQkIjNXUTN4IilcOWJGRmdwJCIzNWIuV3dIPkJARl1zNyQkIjN3cjtIIz0oNHZHRmdwJCIzY28kPnFKWTcjR0ZdczckJCIzNTBEIkdRXF0qSEZncCQiM1JqdipRRWdDayRGXXM3JCQiM1ZRTEwkZSxdNiRGZ3AkIjNXcndmUEpKcFhGXXM3JCQiMzNiUGYkb3hcPCRGZ3AkIjNvOF1MRiI9RzEmRl1zNyQkIjN3clQmUXlgXEIkRmdwJCIzJ1IpMzdHOVRwYkZdczckJCIzVSllOVQpKUhcSCRGZ3AkIjMlPVgjPkdqeCMzJ0ZdczckJCIzMzBdUCUpZiFcTiRGZ3AkIjMjKSlvKXlOeCRlZidGXXM3JCQiM1VRZSpbPWVbWiRGZ3AkIjNTLmNdISlcJSkqZShGXXM3JCQiM3VybVQmUTVbZiRGZ3AkIjMxVzVCKkgvZlspRl1zNyQkIjMzMHYkZmVpWnIkRmdwJCIzKlxmVScqMzknPSMqRl1zNyQkIjNUUSRla3k5WiRRRmdwJCIzcHZTSkNmXUkoKkZdczckJCIzMWIoPW4pM3AlKlFGZ3AkIjNpK3k9ImU3KCopKSpGXXM3JCQiM3VyInpwKXBtYVJGZ3AkIjMjRyR6bCJHcSV6KipGXXM3JCQiM1MpZVJzM1ZZLCVGZ3AkIjNJK1UjKUhnJnkqKipGXXM3JCQiMzEwK10oPT5ZMiVGZ3AkIjNOOCJwY1x1VyUqKkZdczckJCIzZkAvRV0zPC9VRmdwJCIzd3ohejNtNjxmKkZdczckJCIzNVEzLThEc0xWRmdwJCIzIylcPHZELzJZKilGXXM3JCQiM09ZNVNXJClcKVIlRmdwJCIzKVsrKFE5PW1KJilGXXM3JCQiM2thN3l2VEZqV0ZncCQiMyV5LnlLJWZYbyEpRl1zNyQkIjMqR1locitdIUdYRmdwJCIzU0BFKSlIUGptdkZdczckJCIzOXI7YVFlI0dmJUZncCQiM19gN2Z3S3NPcUZdczckJCIzU3o9IypwO2dkWUZncCQiM2c7KT53OlEjKlsnRl1zNyQkIjNtKDMtOF14QnMlRmdwJCIzMy0wRkYsTU1mRl1zNyQkIjMjZkgjb0tMOih5JUZncCQiMzlTPSE9eVM6USZGXXM3JCQiMz0vRDFrIkg+JltGZ3AkIjM8QnQieVhgJVJbRl1zNyQkIjNXN0ZXJipccTtcRmdwJCIzZUImNEkkSGc6VkZdczckJCIzcT9II28jM1siKVxGZ3AkIjN6X04qUWgnSDtRRl1zNyQkIjMnKkdKP2VtRFldRmdwJCIzJylIL2tTcmJZTEZdczckJCIzQVBMZSpbSzU2JkZncCQiM10nPSU+bEg2NUhGXXM3JCQiM3ZgUE1fVGVTX0ZncCQiMzFeaVxrMSZlOSNGXXM3JCQiM0VxVDU6ZThxYEZncCQiM1ctUlBtInArYCJGXXM3JCQiM3knZWt5WihvKlwmRmdwJCIzeTw2cCR6ISlcMCJGXXM3JCQiM0kuXWlTIlIjSGNGZ3AkIjM1MWhRTTYnUi4oRmZyNyQkIjNNT2U5bUNNKSllRmdwJCIzMyU+TCk+LkxGR0ZmcjckJCIzUXBtbSJ6WHU5J0ZncCQiM1gqPj4sKCpvbSQqKkZhdDckJCIzRS12JGZMJkciRydGZ3AkIjNjWiQ+KlsmKTQkXCZGYXQ3JCQiMzBPJDMtKVs3OmtGZ3AkIjM3Iz5VJClHeihISEZhdDckJCIzIylwInpXVWsqW2xGZ3AkIjMkM0YneTpeaTI6RmF0NyQkIjNxLSt2b1IhR28nRmdwJCIzeXNtJj5oO11bKEZmczckJCIzUXA7SGRJW11wRmdwJCIzayV5KFI8InBwbCJGZnM3JCQiMy9PTCRlOWkiPXNGZ3AkIjNRIz5GLERPJHlKISNBNyQkIjNRcG0iSEs/TnYoRmdwJCIzMDc7U0k8JnlnKCEjQzckJCIzcS0rKysmeSkpRylGZ3AkIjNibEdKWCNbbC0iRmlyNyQkIjMjRysrRGNsakwqRmdwJCIzY2ssSj4tQyNIJSEjSTckJCIzSSsrXWlfUVE1RjEkIjNLM2JFWi5pKio+ISNONyQkIjM+KytEInklM1Q3RjEkIjNVQVYqW2dwQSo9ISNbNyQkIjNtKioqKlxQIVtoWSJGMSQiM2A2VlI+QChcSiUhI243JCQiM01MTEwkUXgkbztGMSQiM01pIzQ1JlxwYDghIygpNyQkIjMlMysrXVArVik9RjEkIjMpPmoiNDFlOyMzIyEkOCI3JCQiM0FtbSJ6cGUqej9GMSQiM1NsTXFnNT8ncCMhJFMiNyQkIjM7LCsrRFwnUUgjRjEkIjNWSSg0JG8lZS5xIiEkdCI3JCQiM3lLTGU5UzgmXCNGMSQiM1dLOypIIT4vMEIhJDMjNyQkIjMhNCtdaT89YnEjRjEkIjNLJSlRdSpbSnNVIiEkWyM3JCQiMzRMTEwzcz82SEYxJCIzKSpwV0BhYUlSOCEkIkg3JCQiM2grK0RKWGFFSkYxRi03JCQiMyZ6bW1tJypSUkwkRjFGLTckJCIzKW9tbVR2SmdhJEYxRi03JCQiMydbTCRlOXRPY1BGMUYtNyQkIjMzLCsrXVFrXFJGMUYtNyQkIjN1TEwkM2RnNjwlRjFGLTckJCIzXW5tbW14R3BWRjFGLTckJCIzSywrRCJvSzBlJUYxRi03JCQiM1ksK3Y9NXMjeSVGMUYtNyQkIiNdRixGLS0lJkNPTE9SRzYmJSRSR0JHJCIjNSEiIiRGLEZqaWxGW2psLSUrQVhFU0xBQkVMU0c2JFEidzYiUSFGYGpsLSUlVklFV0c2JDskISQrJkZqaWxGYmlsOyQhMCVbJ2Y/ciYqKj5GMSQiMiVvPy86OHk+NUYxLSUlRk9OVEc2JCUqSEVMVkVUSUNBR0ZpaWw=

g:=x->exp(-x^2);

NiM+SSJnRzYiZio2I0kieEdGJUYlNiRJKW9wZXJhdG9yR0YlSSZhcnJvd0dGJUYlLUkkZXhwRzYkSSpwcm90ZWN0ZWRHRi9JKF9zeXNsaWJHRiU2IywkKiQ5JCIiIyEiIkYlRiVGJQ==

F:=(w,t)->fourier(f(x)*g(x-t),x,w);

NiM+SSJGRzYiZio2JEkid0dGJUkidEdGJUYlNiRJKW9wZXJhdG9yR0YlSSZhcnJvd0dGJUYlLUkoZm91cmllckdGJTYlKiYtSSJmR0YlNiNJInhHRiUiIiItSSJnR0YlNiMsJkY0RjU5JSEiIkY1RjQ5JEYlRiVGJQ==

plot3d(abs(F(w,t)),w=-10..10,t=-10..10,axes=normal);

LSUnUExPVDNERzYnLSUlR1JJREc2JTskISM1IiIhJCIjNUYrRig3Ozc7JCIrcmYnUUciISNkJCIrKEg6IWU1ISNfJCIrdk0jUU4lISNbJCIrXlZjWSopISNXJCIrVDA3IT0qISNTJCIrZDN5LlohI08kIitVdV4uNyEjSyQiK01UblA6ISNIJCIrI1E3LiIpKiEjRiQiK1RxVERKISNDJCIrJVspNHNcISNBJCIrKTRGKVxSISM/JCIrWFUkb2MiISM9JCIrRU5tLkohIzwkIisvMycqcEkhIzskIislZVZqXiIhIzokIislKnkoKlJQRmluJCIrU11DMVlGaW4kIissRyFIJEdGaW4kIiszTTIrKClGZm4kIitVJSo+TThGZm4kIissVnFANUZZJCIrTGUkcCFSISM+JCIrOytFZ3UhI0AkIitscFQ4ciEjQjc7JCIrIWV2T1gqRjIkIishW08xeihGNSQiK3ROImY/JCEjWiQiK09FdihlJyEjViQiKypcSShmbiEjUiQiK3FGZ2pNISNOJCIrJ1JMPycpKUZEJCIranhESzYhI0ckIitzJ29QQSghI0UkIisnUSRRLEJGXnAkIitjcDxoT0ZbcCQiK0hKVjNIRmhvJCIrTydIUDoiRlkkIisyYE8mRyNGZm4kIitzJVswRSNGaW4kIis/NmI7NiEjOSQiKzY9IlJ2I0ZmciQiKyN5I3kiUiRGZnIkIitlQCpmMyNGZnIkIit2L0Qxa0ZpbiQiKyM0LlYjKSpGZm4kIitwREVCdkZZJCIrJVFdbyhHRlYkIisxM0skXCZGUyQiK2pbI3pCJkZQNzskIisucXJeZSEjYyQiK25eSkFbISNeJCIrYlJVJSk+ISNZJCIrVlB1eFMhI1UkIit4Zz4lPSUhI1EkIiszMSRSOSMhI00kIisjZihcJlsmISNKJCIrMGthM3FGZHEkIisuMFZyVyEjRCQiK24rYEM5RlAkIispekVpRSNGUyQiK0xwRys9RlYkIitCXFhUckZZJCIrZl1oOTlGaW4kIitNUEQqUiJGZnIkIiteVEs2cEZmciQiKzsray88ISM4JCIrd1taKjQjRmR2JCIrYmA/IkgiRmR2JCIrdWZSbFJGZnIkIitmOjgiMydGaW4kIituUCJvbCVGZm4kIisjZlAyeSJGWSQiK0FISStNRmhvJCIrWmRAVUtGW3A3OyQiK2BAJ1svJCEjYiQiK25tQTREISNdJCIrWCNvRC4iISNYJCIrKSkqKXpAQCEjVCQiKy4rPnhAISNQJCIrIlFsYjYiISNMJCIrRlpJYUchI0kkIis2RSFvayRGSiQiK1MmW21LI0ZNJCIrKTRdQlQoRlAkIitVMD96NkZobyQiKyJHXXZPKkZWJCIrRyhmZnIkRmZuJCIrIXBlMk8oRmluJCIrdiFHM0coRmZyJCIrLVZAJ2YkRmR2JCIrMVcnKXApKUZkdiQiK01NViM0IiEjNyQiKz9IaD1uRmR2JCIrQC5Naj9GZHYkIistW0JrSkZmciQiK0AtNkJDRmluJCIrS3kjZUUqRlkkIityPElwPEZWJCIrVEsvKG8iRlM3OyQiK15ZJT1MIiEjYSQiK3RRYig0IiEjXCQiKzAiR2xeJUZeeCQiKyEpPiE0RypGYXgkIit2aj1CJipGZHgkIit1TmN6W0ZneCQiKyhcJFxbN0ZHJCIrNXk4JmYiRmdxJCIrIypHcDw1Rl5wJCIrJ1s6QUMkRltwJCIrQCUzejomRmhvJCIrdFRWKDQlRlkkIitcd1FEO0ZpbiQiK00hXCc+S0ZmciQiKz1vbyU9JEZkdiQiK0UsLHQ6RmF6JCIrJXpVKHpRRmF6JCIrI3ojUXlaRmF6JCIrWClwKFFIRmF6JCIrI28qPkQhKkZkdiQiK2oiZlNRIkZkdiQiK0dmKSlmNUZmciQiK3orJUgwJUZmbiQiKyF5YCFSeEZWJCIrQyFcI3p0RlM3OyQiKyM+RHIqW0ZjW2wkIiszJ1xjLiVGZltsJCIrWVZxZztGOyQiK14uYTdNRj4kIispM0Y7XSRGQSQiK2IxPiV6IkZEJCIrX3BrIWYlRkckIis9L0NsZUZncSQiKzlbK1VQRl5wJCIrM2g5Iz4iRlMkIis8bWAnKj1GViQiK1hjZzE6RmZuJCIrdnVZd2ZGaW4kIitMJltRPSJGZHYkIissSio0PCJGYXokIisnKnooUXkmRmF6JCIrTjtjRTkhIzYkIishKXApcHYiRmhgbCQiKyFwcTAzIkZoYGwkIisuKj4mPUxGYXokIitiXDYqMyZGZHYkIismXFlyKlFGZnIkIislUlgtXCJGaW4kIitGMWhYR0ZZJCIrYEFKOEZGaG83OyQiKyVSbk9eIiEjYCQiKzY4Ulo3RjgkIisiKT43TF5GOyQiK2dEemE1RlxxJCIrVSdHQjMiRl9xJCIrWik9ZGEmRkQkIitUciQqPTlGZHEkIitEXiFIIj1GY3UkIitUeGljNkZQJCIrPzQlW28kRlMkIis7SjFpZUZWJCIrImU4b2wlRmZuJCIrUFlHWj1GZnIkIissUD5mT0ZkdiQiK00lZSU+T0ZheiQiK2xsdih5IkZoYGwkIisqNC4lNFdGaGBsJCIrQ1xzSWFGaGBsJCIrViFwKlJMRmhgbCQiKyJbSmQtIkZoYGwkIitNLCx0OkZheiQiK1w0ZS83RmR2JCIrTF5DMVlGaW4kIitaXWUmeilGWSQiK1wqZm1RKUZobzc7JCIrK20oSCRSRlxibCQiKzoqMzZDJEY4JCIrYFN1TDhGaXAkIis9eG5TRkZccSQiKykpXEE3R0ZfcSQiKzUmXDRXIkZedSQiKzEiUW9vJEZkcSQiKyEpKilbNVpGY3UkIiticUYwSUZQJCIrRnlOdSYqRlMkIitbYjlCOkZZJCIrIVElKSo0N0ZpbiQiKy13IikqeiVGZnIkIitCJT14XSpGZHYkIit6UlovJSpGYXokIitLXzlYWUZoYGwkIit2JSpwWDZGKiQiKzgwMjY5RiokIisiKlFGeScpRmhgbCQiK04hb15tI0ZoYGwkIit4dTsoMyVGYXokIitYVigpSEpGZHYkIitKXiVvPiJGZnIkIit2YE8mRyNGZm4kIitzUjZ6QEZWNzskIituMlQhZilGXGJsJCIrQEZCenFGOCQiK1RbOzhIRmlwJCIrJ1whPicpZkZccSQiKyY0a0M5J0ZfcSQiKygzQnQ5JEZedSQiKyZ5JXpfISlGZHEkIismUWwpRzVGTSQiK3gmR1RjJ0ZQJCIrOD9CIjQjRmhvJCIrU2Qmb0skRlkkIitpKVtHayNGaW4kIitXbFBbNUZkdiQiK0dtbnc/RmF6JCIrcGY3YT9GaGBsJCIrKSpIZjk1RiokIitBeFYtREYqJCIrZTgxIzMkRiokIisoRzRiKj1GKiQiK1RBRUBlRmhgbCQiKzlYPkYqKUZheiQiKyIzdWkkb0ZkdiQiKzEsOjlFRmZyJCIrM3BwIipcRmZuJCIrL0RpZlpGVjc7JCIrWHdGeDpGNSQiKyVmNikqSCJGZnAkIitJZiQpW2BGaXAkIisoMz4iKjQiRmh0JCIrV0IieTciRlt1JCIrUjx4eWRGXnUkIitha2N5OUZKJCIrQDA0Kik9Rk0kIisjeUxfPyJGW3AkIis2Q3BSUUZobyQiK08rVDNoRlkkIisjPTZEJltGaW4kIiswWyJcIz5GZHYkIisrdSdIIlFGYXokIisoSGk6eCRGaGBsJCIrUl4pRyc9RiokIitSTnElZiVGKiQiKzxgJSplY0YqJCIra3dLIVskRiokIitbbiQpbzVGKiQiKzNVNlI7RmhgbCQiK3RAP2I3RmF6JCIrXHciKSp6JUZmciQiKyUzNV87KkZmbiQiK1ouNVIoKUZWNzskIisweFlNQ0Y1JCIrXiU0aSsjRmZwJCIrYU5zYiMpRmlwJCIrWiNba3AiRmh0JCIrM190UzxGW3UkIis4Sko+KilGXnUkIitPMjYjRyNGSiQiK10qUWQiSEZNJCIrT0FCZz1GW3AkIiteJD1rI2ZGaG8kIis7czRHJSpGWSQiKytgbSpbKEZpbiQiK2JCLnJIRmR2JCIrPSRwXillRmF6JCIrRUBFQGVGaGBsJCIrOz5IdkdGKiQiK28hXDw0KEYqJCIrRmJPTSgpRiokIis0RXZyYEYqJCIrSiczKFw7RiokIitbKyIqSERGaGBsJCIrTGxOUD5GYXokIis7XEwzdUZmciQiKzpeaDk5RmluJCIrMm4lKVs4Rlk3OyQiKz8tbGVKRjUkIitoeCpIZyNGZnAkIitfZTpyNUZldCQiKylvIjQsQUZodCQiKzxGYmVBRlt1JCIrTVlEZDZGangkIitROig0J0hGSiQiKy5iMyR5JEZNJCIrJmYnZjhDRltwJCIrVk1OKm8oRmhvJCIrKCl5RUI3RmZuJCIrbi9pPCgqRmluJCIrKDRGWyZRRmR2JCIrT1MkZWooRmF6JCIrUGoiSGIoRmhgbCQiK21tZ0lQRiokIittZEwsIypGKiQiK0gjZUs4IiEiKiQiK2c0cHBwRiokIis4JVsvOSNGKiQiKykpUVsjRyRGaGBsJCIrQEptOERGYXokIitibTQ3JypGZnIkIishXEBhJD1GaW4kIitNKikzXTxGWTc7JCIrNTY0WE1GNSQiK1EmXCFSR0ZmcCQiK3lKSG82RmV0JCIrLW9wK0NGaHQkIitOJ29MWSNGW3UkIisjeio+aTdGangkIitbZ1tIS0ZKJCIrWUk6RVRGTSQiKy9FWktFRltwJCIreSNmbVEpRmhvJCIrSCUqPk04RmZuJCIrJyllKSlmNUZmciQiKyJbK1c/JUZkdiQiKylbJ0dHJClGYXokIis4Jlx5QilGaGBsJCIrRl8iKm9TRiokIis+YmQuNUZeZG0kIismSEZnQiJGXmRtJCIrLVh0LHdGKiQiKyI0YVhMI0YqJCIrImVhLGUkRmhgbCQiKzVPaFRGRmF6JCIraWxQWzVGZHYkIitIZic9KyNGaW4kIisyXXozPkZZNzskIitfLWxlSkY1JCIrKnkoKkhnI0ZmcCQiK2plOnI1RmV0JCIrNTw0LEFGaHQkIitSRmJlQUZbdSQiK1lZRGQ2Rmp4JCIrbTooNCdIRkokIitUYjMkeSRGTSQiKz5tZjhDRltwRlxjbUZeY21GYGNtJCIrKjRGWyZRRmR2JCIrOVQkZWooRmF6JCIrKVs7SGIoRmhgbCQiK1JuZ0lQRiokIiteZkwsIypGKiQiK18jZUs4IkZeZG0kIitJNXBwcEYqJCIrTSVbLzkjRipGY2RtJCIrRUptOERGYXokIit0bTQ3JypGZnJGaWRtRltlbTc7RmdebUZpXm1GW19tRl1fbUZfX21GYV9tRmNfbUZlX21GZ19tRmlfbSQiKzZ0NEclKkZZJCIrdmBtKlsoRmluJCIraUIuckhGZHZGYWBtRmNgbUZlYG1GZ2BtRmlgbUZbYW1GXWFtJCIrdCsiKkhERmhgbCQiK1JsTlA+RmF6JCIrSlxMM3VGZnJGZWFtRmdhbTc7RmRbbUZmW21GaFttRmpbbUZcXG1GXlxtRmBcbUZiXG1GZFxtRmZcbSQiKyo0NSUzaEZZRmpcbSQiKzdbIlwjPkZkdkZeXW0kIitRQmNyUEZoYGxGYl1tRmRdbUZmXW1GaF1tRmpdbUZcXm0kIisiPS1fRCJGYXokIisocDwpKnolRmZyRmJebUZkXm03O0ZhaGxGY2hsRmVobEZnaGxGaWhsRltpbEZdaWxGX2lsRmFpbCQiK04/QiI0I0Zob0ZlaWxGZ2lsJCIrXmxQWzVGZHYkIitUbW53P0ZhekZdamxGX2psRmFqbEZjamxGZWpsRmdqbEZpamwkIitDVEZPb0ZkdiQiK0osOjlFRmZyJCIrZXBwIipcRmZuJCIrYURpZlpGVjc7Rl5lbEZgZWxGYmVsRmRlbEZmZWxGaGVsRmplbEZcZmxGXmZsJCIrRHpOdSYqRlNGYmZsRmRmbEZmZmwkIispXD14XSpGZHZGamZsRlxnbEZeZ2xGYGdsRmJnbCQiK2ghb15tI0ZoYGxGZmdsJCIrb1YoKUhKRmR2JCIrVl4lbz4iRmZyJCIrKlJsYEcjRmZuJCIrJCpSNnpARlY3O0ZqYWwkIitCOFJaN0Y4JCIrTD83TF5GO0ZhYmxGY2JsJCIrZSo9ZGEmRkRGZ2JsJCIraV4hSCI9RmN1JCIrX3hpYzZGUCQiK2U0JVtvJEZTJCIrd0oxaWVGViQiK0VPIm9sJUZmbiQiK2NZR1o9RmZyJCIrT1A+Zk9GZHYkIitzJWUlPk9GYXokIislZWN4eSJGaGBsJCIrVUpTNFdGaGBsJCIrelxzSWFGaGBsJCIrdyFwKlJMRmhgbCQiKyJcSmQtIkZoYGwkIitbLCx0OkZheiQiK2c0ZS83RmR2JCIreV5DMVlGaW4kIitOXmUmeilGWSQiK04rbSdRKUZobzc7RmZebCQiK1snXGMuJUZmW2wkIitpVnFnO0Y7JCIrJ1FTRFQkRj4kIitCcmksTkZBJCIrczE+JXoiRkQkIisoKnBrIWYlRkckIit5L0NsZUZncSQiKyopWytVUEZecEZoX2wkIitPbWAnKj1GViQiK2djZzE6RmZuJCIrT3ZZd2ZGaW4kIitYJltRPSJGZHYkIis4Sio0PCJGYXokIithIXlReSZGYXokIitdO2NFOUZoYGwkIisoKnApcHYiRmhgbEZbYWwkIitRKj4mPUxGYXokIiswXTYqMyZGZHYkIitObDkoKlFGZnIkIis0YUMhXCJGaW5GZWFsJCIrIkc3THIjRmhvNztGYVtsJCIrJSlRYig0IkZmW2wkIitdIkdsXiVGXngkIit0PyE0RypGYXgkIitxaz1CJipGZHgkIitDT2N6W0ZneCQiKzVOXFs3RkckIitEeTgmZiJGZ3EkIistSHA8NUZecCQiKz5iQFVLRltwJCIrciUzejomRmhvJCIrOlVWKDQlRlkkIitrd1FEO0ZpbiQiKyg0XCc+S0ZmciQiK2BvbyU9JEZkdiQiK1csLHQ6RmF6JCIrTUd1elFGYXokIitVR1F5WkZheiQiKyIpKXAoUUhGYXokIit6KCo+RCEqRmR2JCIreSJmU1EiRmR2JCIrUmYpKWY1RmZyJCIrPiwlSDAlRmZuJCIrYlEwUnhGViQiK3UiXCN6dEZTNztGZnckIisjcEUjNERGW3gkIitiI29ELiJGXngkIis0ISp6QEBGYXgkIitFKz54QEZkeCQiKy5hYzo2Rmd4JCIrYVpJYUdGangkIisiby1vayRGSiQiK2smW21LI0ZNJCIrdCxON3VGUCQiK20wP3o2RmhvJCIreC5ibiQqRlYkIisuKWZmciRGZm4kIitsKGUyTyhGaW4kIit4IkczRyhGZnIkIitgVkAnZiRGZHYkIitLWCcpcCkpRmR2JCIrXE1WIzQiRmF6JCIrMEloPW5GZHYkIitdLk1qP0ZkdiQiK0tbQmtKRmZyJCIrcS02QkNGaW4kIitGeiNlRSpGWSQiKyp5LCRwPEZWJCIrZUsvKG8iRlM3OyQiKyplPDwmZUZcdCQiK2xfSkFbRl90JCIrJipSVSUpPkZidCQiK2xRdXhTRmV0JCIrZ2g+JT0lRmh0JCIrXzEkUjkjRlt1JCIrYnhcJlsmRl51JCIrWWxhM3FGZHEkIitbMFZyV0ZjdSQiKyU0SVhVIkZQJCIrQW9BbUFGUyQiK3BwRys9RlYkIismKlxYVHJGWSQiKyczOllUIkZpbiQiK1pQRCpSIkZmciQiK15VSzZwRmZyJCIrVitrLzxGZHYkIiszXFoqNCNGZHYkIit4YD8iSCJGZHYkIitfZ1JsUkZmciQiK3o7OCIzJ0ZpbiQiKzlRIm9sJUZmbiQiKzZ3dCF5IkZZJCIrKilISStNRmhvJCIrN2VAVUtGW3A3O0ZgcCQiK2JsaiF6KEY1JCIrMU8iZj8kRmZwJCIrL0Z2KGUnRmlwJCIrbjB0Zm5GXHEkIisxR2dqTUZfcSQiKyVbTD8nKSlGRCQiK3V4REs2RmRxJCIrKSkpb1BBKEZncSQiK0tNUSxCRl5wJCIrR3E8aE9GW3AkIitjSlYzSEZobyQiK2YnSFA6IkZZJCIrSWBPJkcjRmZuJCIrPCZbMEUjRmluJCIrVjZiOzZGZnIkIittPSJSdiNGZnIkIitdR3kiUiRGZnIkIit6QCpmMyNGZnIkIisuMUQxa0ZpbiQiKyQ+LlYjKSpGZm4kIis+RkVCdkZZJCIrNy8mbyhHRlYkIitoM0skXCZGUyQiKzhcI3pCJkZQNztGMCQiKzJgLGU1RjUkIis/TiNRTiVGOCQiK1JXY1kqKUY7JCIrSjE3IT0qRj4kIitfNHkuWkZBJCIrYXVeLjdGRCQiK2xUblA6RkckIit4REo1KSpGSiQiKy1yVERKRk0kIitNJyk0c1xGUCQiK3lyIylcUkZTJCIrZ1Ukb2MiRlYkIisqZWpPNSRGWSQiK00zJypwSUZmbiQiKypmVmpeIkZpbiQiK0h6KCpSUEZpbiQiKykzWGlnJUZpbiQiK2NHIUgkR0ZpbiQiKyVldCtxKUZmbiQiK3AlKj5NOEZmbiQiK0BWcUA1RlkkIis2ZiRwIVJGaG8kIituLEVndUZbcCQiKzVyVDhyRl5wLSUrQVhFU0xBQkVMU0c2JVEidzYiUSJ0Rl5jb1EhRl5jby0lKkFYRVNTVFlMRUc2IyUnTk9STUFMRy0lLE9SSUVOVEFUSU9ORzYkJCIyLysrKysrK0kkRmluJCIyLysrKysrK1MkRmluLSUlRk9OVEc2JCUqSEVMVkVUSUNBR0Yt