LUklbXJvd0c2Iy9JK21vZHVsZW5hbWVHNiJJLFR5cGVzZXR0aW5nR0koX3N5c2xpYkdGJzYpLUkjbWlHRiQ2JVEoemhpZG9uZ0YnLyUnaXRhbGljR1EldHJ1ZUYnLyUsbWF0aHZhcmlhbnRHUSdpdGFsaWNGJy1JI21vR0YkNi1RIn5GJy9GM1Enbm9ybWFsRicvJSZmZW5jZUdRJmZhbHNlRicvJSpzZXBhcmF0b3JHRj0vJSlzdHJldGNoeUdGPS8lKnN5bW1ldHJpY0dGPS8lKGxhcmdlb3BHRj0vJS5tb3ZhYmxlbGltaXRzR0Y9LyUnYWNjZW50R0Y9LyUnbHNwYWNlR1EmMC4wZW1GJy8lJ3JzcGFjZUdGTC1GLDYlUSV3YW5nRidGL0YyLUknbXNwYWNlR0YkNiYvJSdoZWlnaHRHUSYwLjBleEYnLyUmd2lkdGhHRkwvJSZkZXB0aEdGVy8lKmxpbmVicmVha0dRKG5ld2xpbmVGJy1GUzYmRlVGWEZaL0ZnblElYXV0b0YnLUYsNiNRIUYnRjk= restart: f:=(x)->sin(1/x);

Zio2I0kieEc2IkYlNiRJKW9wZXJhdG9yR0YlSSZhcnJvd0dGJUYlLUkkc2luR0YlNiMqJDkkISIiRiVGJUYl

plot(f(x),x=0.05..0.4);

LSUlUExPVEc2Ji0lJ0NVUlZFU0c2JDdiczckJCIiJiEiIyQiMXhpRjJEWEgiKiEjOzckJCIyT2VSWkYib1pdISM9JCIxKGUiKls7RjE/KSEjOzckJCIxbiJ6JVxETyY0JiEjPCQiMXBlI288XV8rKCEjOzckJCIwdj1VI1EvVl4hIzskIjFXTEV5dUopZiYhIzs3JCQiMk1MZSopNEQyPiYhIz0kIjFXMUoySTtQUyEjOzckJCIxPHpwdGpTUV8hIzwkIjBFeU0qZjp6QiEjOjckJCIvdlZbdzMnRyYhIzokIjE6Myp5akZ1eichIzw3JCQiMSQzeEojKm9QTCYhIzwkIS9ZXUo0OjQ1ISM5NyQkIjJsbTt6Pl05USYhIz0kITI5SCJSKFxmLmsjISM8NyQkIjBEY0VaSiJIYSEjOyQhMnVvZCJbYlBzVCEjPDckJCIxTGVSWkYib1omISM8JCExW0JVY0skKnBiISM7NyQkIjJqVE5ALSVcQ2IhIz0kITEsIio0VjFKL28hIzs3JCQiMicqKlwob0h2QGQmISM9JCExRE48I1EpUWB5ISM7NyQkIjFtVE5ZeWBuYyEjPCQhMT1gak0/OVIkKiEjOzckJCIyTUxMZVIrSHcmISM9JCExdVtdN3MiSCgqKiEjOzckJCIyWVBNLSVbKGUlZSEjPSQhMXBRIikqNHk3JikqISM7NyQkIjJsVE5ZR1wpR2YhIz0kITEzayFwWicqRzsqISM7NyQkIjImZWsuSFAjPSwnISM9JCExIlEieSopcHciKnohIzs3JCQiMi9dUE08KXolNCchIz0kITEiKj4iXFdIIlFrISM7NyQkIjIxLVFjUiZHT2ghIz0kITFWUChITXo5YiYhIzs3JCQiMjthUXloc3g8JyEjPSQhMXM1Jj1PNyk0WSEjOzckJCIyRDFSKyUpZiM+aSEjPSQhMWY2RWgpKWZFTyEjOzckJCIxJGVSQTFaMkUnISM8JCExRFw7Rm8mXGgjISM7NyQkIjEuLFclR01BSSchIzwkITJ4d1toJHldKGUiISM8NyQkIjFEMWsxOnNWaiEjPCQhMiU0ZjQ7MmNpYiEjPTckJCIxWTYlKUcoM19RJyEjPCQiMUxKbDBuNXZZISM8NyQkIjFuOy9eZnBFayEjPCQiMiUzdGV5IypIdDkhIzw3JCQiMEY+OW5fTFonISM7JCIxX1slcDh3NGQjISM7NyQkIjF1b3oiUjQrXychIzwkIjFEUTp2UVJATyEjOzckJCIwW3VANm1tYychIzskIjJsXSgqKkg+bjhZISM8NyQkIjEkM19EJEdLOG0hIzwkIjF6XD9gKT4lUWIhIzs3JCQiMSRIMkxGT21xJyEjPCQiMUhcKWVJTl46KCEjOzckJCIvRDE5KFwqKnonISM6JCIxIilITkUiXGBVKSEjOzckJCIxM3giWzpqSypvISM8JCIxaylwdTd2VEsqISM7NyQkIjE8SGQmZndsKXAhIzwkIjA5dW9wR2IlKSohIzo3JCQiMHNoZCZcISo0cSEjOyQiMSlHRDBUSHgiKiohIzs3JCQiMUAwJmZKTEsuKCEjPCQiMUEscktuPG4qKiEjOzckJCIxQyRSaG5obDAoISM8JCIxcFE2XG4/JSoqKiEjOzckJCIxRSJHai4hKil6cSEjPCQiMSxKKSo+JSo+KioqKiEjOzckJCIwdDBudllsNyghIzskIjF3WkAsVHpXKiohIzs3JCQiMU1MM3hNP3RyISM8JCIxdmxjL2V3MikqISM7NyQkIjFOZSopZmE4bnMhIzwkIjFpIXknW0REKkgqISM7NyQkIjFNJDNGV241TyghIzwkIjFeYyUpb24jUV4pISM7NyQkIjFNM19EJSoqXFgoISM8JCIxPS0qKioqeSNmXCghIzs3JCQiMU1MTDM5JCpbdiEjPCQiMXhXcU4hM0BIJyEjOzckJCIxTmU5IlJqR2soISM8JCIyO2QxVFEnNFxcISM8NyQkIjFNJGVSUCZ6T3ghIzwkIjJPKWVcJCpbQjdOISM8NyQkIjFNM3hjdHNJeSEjPCQiMSJ6KG8hNG1VLSMhIzs3JCQiMU1MZVIkZlkjeiEjPCQiMCQ+PydIRldDJiEjOzckJCIxRSJ5KylbOT0hKSEjPCQhMWUpR0ZwYDtYKiEjPDckJCIxPUhkPy9qNiIpISM8JCEyd0FJSXA2OU8jISM8NyQkIjBybjUnZjYwIykhIzskITJEXExdOlgmKXAkISM8NyQkIjEsRGMsOmcpSCkhIzwkITIob0hubjlMTlwhIzw3JCQiMSNIZD8vKDMjUikhIzwkITFuUSJbZjxcMCchIzs3JCQiMSUzX0Rlc2JbKSEjPCQhMT1vJm82K1kvKCEjOzckJCIxd28vQiJlIXomKSEjPCQhMUg9XGlYXyYqeSEjOzckJCIxbzthak9hcycpISM8JCExSnkyQClRQmcpISM7NyQkIjFOTGUqeSopZSUpKSEjPCQhMS0kZjknUi9FJiohIzs3JCQiMSxdaTpmQj4hKiEjPCQhMXk/S0lzJnkmKiohIzs3JCQiMU5la3kqM2Y1KiEjPCQhMSpvKm9eQjEqKioqISM7NyQkIjFvbW1UP2UjPiohIzwkITA0aiMqM2I4JCoqISM6NyQkIi92by9eRHojKiEjOiQhMU5ZIXB6JFtoKCohIzs3JCQiMU0kM3g7R2ZPKiEjPCQhMSMpNG45ViNvXCohIzs3JCQiLkQxLz1hYSohIzkkITFWaiMpPTJYIm8pISM7NyQkIjFvO2E4eiFccyohIzwkITFuTClvIXopZmMoISM7NyQkIjFOJGVreShSLyoqISM8JCExdmhob1RhQmkhIzs3JCQiMi1dUGZ3KVEzNSEjPCQhMThTIylvLT1DWiEjOzckJCIyTiQzRk07JnAtIiEjPCQhMiZvK1x6JlJxMiQhIzw3JCQiMm87L0VdOWIvIiEjPCQhMk8leWBdMk4lUiIhIzw3JCQiMixdUDRQeFMxIiEjPCQiMiUpUXEmb0w9J3AjISM9NyQkIjJNJDNGUi1rIzMiISM8JCIybWo9SWI/KnA9ISM8NyQkIi1Ed045LDYhIzckIjJgVnYiKXBlZ08kISM8NyQkIjJuO0hLInBrPjYhIzwkIjF5JlFqVV1odCUhIzs3JCQiMk5MMy1EXSJRNiEjPCQiMS5IPEJLbGdmISM7NyQkIjIsXSg9KGVgbToiISM8JCIxTk8yUHpzRXEhIzs3JCQiMk4zXytdPlo+IiEjPCQiMSg0TjckKiozKHApISM7NyQkIjJvbTtIVCZ5SzchIzwkIjEpXCRcVixycCcqISM7NyQkIjJeUDRAYG42QyIhIzwkIjF6YkpuYncleiohIzs3JCQiMk8zLThsXCZcNyEjPCQiMWNJcCk9WSQqKSkqISM7NyQkIjEjeiVccTwkekQiISM7JCIxNHNLUzxPYSoqISM7NyQkIjIvXShvKilRSm03ISM8JCIxeGRNVmZ4ISoqKiEjOzckJCIyKDMtKSkzZ3B1NyEjPCQiMXV3IVxNKGYqKioqISM7NyQkIjE8SDJHInlJRyIhIzskIjFmQU5dMyg9KSoqISM7NyQkIjJgaWxzQ2c5SCIhIzwkIjFaKCkpXCMqcCdRKiohIzs3JCQiMk9MZWtPVSkqSCIhIzwkIjFCI1wlUSUqM3IpKiEjOzckJCIybzsvLFwoZVA4ISM8JCIxJVxYI0hXbCVIKiEjOzckJCIyLStdUGhLYFAiISM8JCIxUCgpKTNUdiFbJCkhIzs3JCQiMi0rK0RzS0tUIiEjPCQiMUdTMCM0Vko3KCEjOzckJCIyLStdNyRHOF45ISM8JCIxbl5cKlJGQHImISM7NyQkIjIvK10oM21sKFsiISM8JCIxVDA1cSkpXFtVISM7NyQkIjIuK11pUSE9QzohIzwkIjJuKCpcLTs8O3UjISM8NyQkIjE8L0V2dU1kOiEjOyQiMipcWURud152OCEjPDckJCIyTiQzRmtYXiFmIiEjPCQiMT5tNS1tOCkzJSEjPTckJCIyLXYkNFRNJipIOyEjPCQhMSUqWyllJ2UrdjkhIzs3JCQiMW5tInpKI1JwOyEjOyQhMUNBNSR6ITMpKUchIzs3JCQiMW47ej5BIUdxIiEjOyQhMmpgaE9kJXohKlIhIzw3JCQiMW5tbUBAQE88ISM7JCEyJz1GanU4SyoqXCEjPDckJCIyTzNfK3l2XXgiISM8JCExPD9NQUMnKVtnISM7NyQkIjItXVAlUSVSUiI9ISM8JCExenhtd1ZtanAhIzs3JCQiMk4zLThPUyRbPSEjPCQhL185JFtFQG0oISM5NyQkIjFubTslR1RGKT0hIzskITE9aVJGRCIqZSMpISM7NyQkIjIuXVBNInlBZT4hIzwkITE+YSQpPWJ4SyMqISM7NyQkIjItK3ZvS29UKj4hIzwkITE6Ni0oZlVuYSohIzs3JCQiL0RKUykzLC4jISM5JCExTEE5JCl5L3QoKiEjOzckJCIyTjN4YyoqM3cxIyEjPCQhMXZpYFRjMkIqKiEjOzckJCIxbjsvXiI0XjUjISM7JCEwJ3BqPG16IyoqKiEjOjckJCIxPHolKioqZmFSQCEjOyQhMTNEWCFlKmUjKioqISM7NyQkIjJvO2EpW0cpUjwjISM8JCExLSo0W0ZXbiQqKiEjOzckJCIwRGNFa0Y2QCMhIzokITElUjUiPTpTPykqISM7NyQkIjJNTGVrVnMjW0EhIzwkITFKKSpvdGo6XycqISM7NyQkIjJRJDNGUiVRYUsjISM8JCExbHIzRyY9RjsqISM7NyQkIi9EY3I7aCNSIyEjOSQhMXZQNSl6KWY4JykhIzs3JCQiMU0kM0ZnZ15ZIyEjOyQhMS9yTCUqKVtfI3ohIzs3JCQiLHZ1NSxhIyEjNiQhMUpieDg6TVNyISM7NyQkIjIuK3Y9JVtWOEUhIzwkITF5YERCJik0RGohIzs3JCQiMi5dUE1uelZvIyEjPCQhMSRbd2RWUzNeJiEjOzckJCIyMCtESiI9OmpGISM8JCEyJ0h1WlZLRiZmJSEjPDckJCIybG1tVDNLUiRHISM8JCEyUGVkVHEqenVQISM8NyQkIjIuK103ODAmNEghIzwkITJ1ZyFbVnNSNkghIzw3JCQiMk8kM0ZXYil6KEghIzwkITJaZkpDOHVwOSMhIzw3JCQiLXZCRiZHMCQhIzckITJlT3hpcTZqTCIhIzw3JCQiMmw7L14hcEhCSiEjPCQhMSJbTk0kKSpmNmchIzw3JCQiMi5dKD1zOCRwPiQhIzwkIjI8RFQvPGwjZjghIz03JCQiMW5tIkhfQSpvSyEjOyQiMVliIUc0PyhRIykhIzw3JCQiL3YkZmUhSFdMISM5JCIyVi9cViYpUSUzOiEjPDckJCIxTUxMKSkqeW9UJCEjOyQiMmxtUDdXUkg4IyEjPDckJCIyTUxlUjY2NlwkISM8JCIxeShmKD5sUk9GISM7NyQkIjFuVDVnJkdaYyQhIzskIjIncGs4eiJcLUkkISM8NyQkIjIvKyt2TXZCaiQhIzwkIjJQdE8icE9vKXkkISM8NyQkIjFuO3oqPjEqNFAhIzskIjFqakwhW2xYSiUhIzs3JCQiMk5MTCQ9MkR6UCEjPCQiMihIT25DP0hiWiEjPDckJCIyLl1QJVFrPWBRISM8JCIxV3QuVnpoJj4mISM7NyQkIjIxXWlsTl9SI1IhIzwkIjE7IzNqbClvKmUmISM7NyQkIiIlISIiJCIxayZSNVdAWilmISM7LSUmQ09MT1JHNiYlJFJHQkckIiM1ISIiJCIiISEiIiQiIiEhIiItJSVWSUVXRzYkOyQiIiYhIiMkIiIlISIiJShERUZBVUxURy0lK0FYRVNMQUJFTFNHNiQtSSNtaUc2Iy9JK21vZHVsZW5hbWVHNiJJLFR5cGVzZXR0aW5nR0koX3N5c2xpYkc2IjY1USJ4NiIvJSdmYW1pbHlHUSE2Ii8lJXNpemVHUSMxMDYiLyUlYm9sZEdRJmZhbHNlNiIvJSdpdGFsaWNHUSV0cnVlNiIvJSp1bmRlcmxpbmVHUSZmYWxzZTYiLyUqc3Vic2NyaXB0R1EmZmFsc2U2Ii8lLHN1cGVyc2NyaXB0R1EmZmFsc2U2Ii8lK2ZvcmVncm91bmRHUShbMCwwLDBdNiIvJStiYWNrZ3JvdW5kR1EuWzI1NSwyNTUsMjU1XTYiLyUnb3BhcXVlR1EmZmFsc2U2Ii8lK2V4ZWN1dGFibGVHUSZmYWxzZTYiLyUpcmVhZG9ubHlHUSZmYWxzZTYiLyUpY29tcG9zZWRHUSZmYWxzZTYiLyUqY29udmVydGVkR1EmZmFsc2U2Ii8lK2ltc2VsZWN0ZWRHUSZmYWxzZTYiLyUscGxhY2Vob2xkZXJHUSZmYWxzZTYiLyU2c2VsZWN0aW9uLXBsYWNlaG9sZGVyR1EmZmFsc2U2Ii8lLG1hdGh2YXJpYW50R1EnaXRhbGljNiJRITYiLSUlUk9PVEc2Jy0lKUJPVU5EU19YRzYjJCIkPyYhIiItJSlCT1VORFNfWUc2IyQiJD8iISIiLSUtQk9VTkRTX1dJRFRIRzYjJCIlZ0whIiItJS5CT1VORFNfSEVJR0hURzYjJCIlXVAhIiItJSlDSElMRFJFTkc2Ig==

fsolve(f(x)=0,x=0.1);

JCIrYUguaDUhIzU=

so1:=seq(fsolve(f(x)=0,x=k),k=0.05..0.4,.01): {so1};

PCgkIitxWjswYCEjNiQiK0N4Pm1qRiUkIiticnVkekYlJCIrYUguaDUhIzUkIitKJVw6ZiJGLCQiK2kpKTQkPSRGLA==

[3,3,4,5];

NyYiIiRGIyIiJSIiJg==

{3,3,4,5};

PCUiIiQiIiUiIiY=

JSFH