Maple worksheet to examine (symbolically compute and plot) the relative condition number of some simple single-variable functions. C.G. (9-99) original version C.G. (5-07) .mw version Restart the server. restart; Procedure to compute the relative condition number of f(x), a function or expression. cond := proc ( f, x ) abs( x * diff(f,x) / f ) end;

Zio2JEkiZkc2IkkieEdGJUYlRiVGJS1JJGFic0clKnByb3RlY3RlZEc2IyooOSUiIiItSSVkaWZmR0YpNiQ5JEYsRi1GMSEiIkYlRiVGJQ==

Plot f(x) = sin(x). plot( sin(x), x=0..10, title=`sin(x)`, color=red );

NictSSdDVVJWRVNHNiI2IzdicDckJCIiISIiISQiIiEiIiE3JCQiM0dMTEwzeCYpKjMiISM9JCIzcy13I0dYLHgzIiEjPTckJCIzZW1tbTthcnpAISM9JCIzJG9tazozJ1xpQCEjPTckJCIzdioqKlw3eSUqejckISM9JCIzWjVQdVhaQnhJISM9NyQkIjNbTEwkZTl1aTIlISM9JCIzWCU+KD0xRUtrUiEjPTckJCIzbm1tbSJ6XyI0aSEjPSQiMyFldD0wVil6PGUhIz03JCQiMzlvbW1UJnBoTikhIz0kIjNYeFApW2MvclQoISM9NyQkIjNLTExlKj0pSFw1ISM8JCIzLCNmKWU5IlEybikhIz03JCQiM3JtbSJ6LzN1QyIhIzwkIjMrU3R3PzhrIlsqISM9NyQkIjNUTExlKm90Klw4ISM8JCIzdEp2SmBmPGQoKiEjPTckJCIzISoqKipcN0xSRFgiISM8JCIzSyd5M2IneTpJKiohIz03JCQiMyFvbTt6NHdiXSIhIzwkIjMqXCQ0dFkiUih5KiohIz03JCQiM1tMTGVrR2hlOiEjPCQiM09qS1VEeUQqKioqISM9NyQkIjM7KytESidcO2giISM8JCIzKyEqMzopPmM7KioqISM9NyQkIjMkb207elInb2s7ISM8JCIzeHYpM0RrYmYmKiohIz03JCQiM09MTDNfKD4veCIhIzwkIjNkRV8lPkE4OSEpKiEjPTckJCIzNCsrRDFKOnc9ISM8JCIzRWNCRU12UlAmKiEjPTckJCIzK247SGRHIlwpPiEjPCQiM0poRkIkcEBaOiohIz03JCQiM29MTEwzRW4kNCMhIzwkIjMoNEo4dkNrUW0pISM9NyQkIjMjcG1tVCFSRSZHIyEjPCQiM0EneSY9KCo+VWF2ISM9NyQkIjNEKysrRC4mNF0jISM8JCIzXFl3bXJfNXhmISM9NyQkIjM/KysrXWpCNEUhIzwkIjNKKCozPjgoXGMyJiEjPTckJCIzOysrK3ZCXzxGISM8JCIzS2NmWzlmdDlUISM9NyQkIjMhKioqKioqXC13PSNHISM8JCIzIlxKNCI9YyhIOSQhIz03JCQiMzMrKyt2J0hpI0ghIzwkIjNfXj5fZC4tUEAhIz03JCQiM3BMJGVreSMqNC0kISM8JCIzJHlESSkqUXhJPyIhIz03JCQiMyZvbTt6KmV2OkohIzwkIjNXejJtRSIpUSRlIyEjPjckJCIzPitdNy4lUSVHSyEjPCQhMzQwekMjSGlPbikhIz43JCQiM2BMTEwzNDdUTCEjPCQhMzxoIW8lcCdwPyk+ISM9NyQkIjMjUUxMM3h4bFYkISM8JCEzSy49US1oRDJIISM9NyQkIjNuTExMTFkuS04hIzwkITM6ZXdXIXByZiFRISM9NyQkIjM0KytEIm83VHYkISM8JCEza3U5JGV1NiRcZCEjPTckJCIzPkxMTCRRKm9dUiEjPCQhMygzcGxidlNtQighIz03JCQiM2wrK0QiPWxqOyUhIzwkITNqdnJCbjMnZmEpISM9NyQkIjNTKyt2ViZSPFAlISM8JCEzR3Yqbyp6KXlgVSohIz03JCQiM0tuO3pXRykpeVchIzwkITN1OlYwPjRoRygqISM9NyQkIjNCTUwkZTlFZ2UlISM8JCEzMSJIVyRbJG8tIyoqISM9NyQkIjNoTDNGVztBTlkhIzwkITM6Rks0JHlTLSgqKiEjPTckJCIzJ1FMM0Y5PFdvJSEjPCQhM1NTaWJPIikzJyoqKiEjPTckJCIzOU1lOVRFaExaISM8JCEzXzMoZmMneXUoKioqISM9NyQkIjNeTExlUiIzR3klISM8JCEzbSQ+VVYmZkB2KiohIz03JCQiMy8rXSg9N08qKSlbISM8JCEzdCcqUlgwKmZYJSkqISM9NyQkIjNlbW07L1QxJipcISM8JCEzIj5KQyRbcjcuJyohIz03JCQiM1ZtOy9eN0kwXiEjPCQhM3lBbk13I3p6QiohIz03JCQiMz1ubSJ6UlFiQCYhIzwkITNkYC4oKjNJb2coKSEjPTckJCIzOisrdj0+WTJhISM8JCEzWXMmPjMiKnArbyghIz03JCQiM1pubTt6WHU5YyEjPCQhM11lJFtYVEl3PichIz03JCQiM3lMTGU5aSI9cyYhIzwkITMtT2tFL25YQmAhIz03JCQiMzQrKytdeSkpR2UhIzwkITNda2twJlE2JClRJSEjPTckJCIzaysrRGNsakxmISM8JCEzbGUpXFwiKVFaVSQhIz03JCQiM0grK11pX1FRZyEjPCQhM1NeQ0BlTGlCQyEjPTckJCIzVStdKD0tTihSaCEjPCQhM2JnPXRcISllSDkhIz03JCQiM2IrK0QieSUzVGkhIzwkITNZQXZhOiE0KTNVISM+NyQkIjNGK11QNGtoYGohIzwkIjMhUjQwXnMpR1BxISM+NyQkIjMsKytdUCFbaFknISM8JCIzWEolNCdwa1Y+PSEjPTckJCIzS21tVDVGRW5sISM8JCIzK0w+RzUmPkYhRyEjPTckJCIzaktMTCRReCRvbSEjPCQiM0RUJm9wWHJ0diQhIz03JCQiM1orKyt2LkklKW8hIzwkIjNXZjFldFVpYmMhIz03JCQiM0BtbSJ6cGUqenEhIzwkIjNdeXQiR2dWNTooISM9NyQkIjM7LCsrRFwnUUgoISM8JCIzIzM5cC82Sj5aKSEjPTckJCIzJ0hMJGU5UzgmXCghIzwkIjMoKmUlcDpjQElPKiEjPTckJCIzJW9tOy82RS5nKCEjPCQiM0gjR1EsZjorbyohIz03JCQiM3MrK0QxIz1icSghIzwkIjNtaS9tSWAqKiopKSohIz03JCQiM3hMM3hjLyVwdighIzwkIjMtJipRInopPiZIJioqISM9NyQkIjMjb20iSDJGTzN5ISM8JCIzN1JuMXNqZiopKiohIz03JCQiMycpKlw3eSZceWZ5ISM8JCIzM2RaajI7JCkqKioqISM9NyQkIjMiSExMJDNzPzZ6ISM8JCIzKUhjIjNPMWokKSoqISM9NyQkIjMhKilcaSFSOi9seiEjPCQiM109USU0Jj1SUSoqISM9NyQkIjN5bDt6cGUoKT0hKSEjPCQiMypwNEclPXNOaykqISM9NyQkIjNtSzNfKy1ycyEpISM8JCIzJUg1IzRcN3VoKCohIz03JCQiM2EqKipcN2BXbDcpISM8JCIzTnR4MW03JTNqKiEjPTckJCIzY0wkZSpbQUNJIykhIzwkIjNLJjMjUVM6WCskKiEjPTckJCIzZW5tbW0qUlJMKSEjPCQiMzZUTS9KOzlxKSkhIz03JCQiMyV6bW1UdkpnYSkhIzwkIjMlek0yVDwlUipwKCEjPTckJCIzXk1MZTl0T2MoKSEjPCQiMzc9aihHTCVSKD4nISM9NyQkIjNubztII2UwSSYpKSEjPCQiM2tKdlR2T0I2YSEjPTckJCIzMSwrK11Ra1wqKSEjPCQiMyQqPiNwejF4WGQlISM9NyQkIjMjKW9tVDVBU2chKiEjPCQiMyI+JSpwYCk0bWpOISM9NyQkIjMhW0xMM2RnNjwqISM8JCIzQSFRPyZwRTI0RCEjPTckJCIzTCwrdm9UQXEjKiEjPCQiM2VlODJgQVJSOiEjPTckJCIzJnltbW13KEdwJCohIzwkIjNdI3AjUUZAPFliISM+NyQkIjMwTSRlUkE1XFoqISM8JCEzVlRYdnNtNzZdISM+NyQkIjNDKytEIm9LMGUqISM8JCEzaGouIXpGZDdiIiEjPTckJCIzbisrK11vaSJvKiEjPCQhM0Q/cEMoeVMuYSMhIz03JCQiMzYsK3Y9NXMjeSohIzwkITN4NFgjKlFTWy5OISM9NyQkIiM1IiIhJCEzJykpcCQqKTM2QFNhISM9LUknQ09MT1VSRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiNiZJJFJHQkc2IiQiKisrKysiISIpJCIiISIiISQiIiEiIiEtSSZUSVRMRUc2JCUqcHJvdGVjdGVkR0koX3N5c2xpYkc2IjYjSSdzaW4oeClHNiItSStBWEVTTEFCRUxTRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiNiRRIng2IlEhNiItSSVWSUVXRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiNiQ7JCIiISIiISQiIzUiIiFJKERFRkFVTFRHNiI=

Determine the relative condition number of f(x) = sin(x). 'cond(sin(x),x)' = cond(sin(x),x);

Ly1JJWNvbmRHNiI2JC1JJHNpbkc2JCUqcHJvdGVjdGVkR0koX3N5c2xpYkdGJTYjSSJ4R0YlRi0tSSRhYnNHRio2IyooRi0iIiItSSRjb3NHRilGLEYyRichIiI=

Plot the relative condition number of f(x) = sin(x) as a function of x. plot( cond(sin(x),x), x=0..10, 0..10, discont=true, title=`cond(sin(x),x)`, color=red );

NiYtSSdDVVJWRVNHNiQlKnByb3RlY3RlZEdJKF9zeXNsaWJHNiI2JzdnbjckJCIzeioqKioqekkmPSRHJyEjRSQiIiIiIiE3JCQiM1BJX05VJnl4JW8hIz4kIjNrYmE3QFdPJSkqKiEjPTckJCIzSy0qWyFcJCpmIUciISM9JCIzZzppaF9jRlgqKiEjPTckJCIzYSVSIipcJEhtXT4hIz0kIjMuNUwmXCkzJUcoKSohIz03JCQiMytxY0xQIm9eaSMhIz0kIjM5PHhxLTJBcCgqISM9NyQkIjMjeWkkPk12WSdIJCEjPSQiMzomPnNsOkReaiohIz03JCQiM04pPSZRMiFbKT1SISM9JCIzQCc9PihSKG9GWyohIz03JCQiMy86NnBQcEdqWCEjPSQiM1MocGlSP1xnSCohIz03JCQiM0VBSEgsbXdIXyEjPSQiMz13QCIqeiZcNzIqISM9NyQkIjN5KCo0O2MpM1QqZSEjPSQiM1wkenl1R1ZVIikpISM9NyQkIjM1LmZMQmxZeGwhIz0kIjNsInAtJVFMXjkmKSEjPTckJCIzQCMqR2FHJG8kenIhIz0kIjMjb3N0dD8mej4jKSEjPTckJCIzTkg2OixzJ3AmeSEjPSQiM2JhZ2YrckZfeSEjPTckJCIzJFFsSylmJFt0YCkhIz0kIjNNLD1jMEhjVnUhIz03JCQiMy9RX3l4Oy0kPiohIz0kIjMrLjMocDV1LSwoISM9NyQkIjMqemg3XidlVil5KiEjPSQiMzksKHBoMUE7ZSchIz03JCQiM0gwUU4jNFcnXDUhIzwkIjNPMlBWYTckZi0nISM9NyQkIjMqKXorczI5aTQ2ISM8JCIzcCF6PyRbQyZRXiYhIz03JCQiM0VqQSVRRypRejYhIzwkIjMoel1DT0dadCdbISM9NyQkIjM7Zj8jZm5YNkMiISM8JCIzQGk2VkMmKVFZVSEjPTckJCIzWCo+JiplQS0qMzghIzwkIjM4Wmg+J29AJjNOISM9NyQkIjNxRnpcJVtBTVAiISM8JCIzSTgjUWN3TWx1IyEjPTckJCIzb3gtdDBFdVM5ISM8JCIzIilcMigqZWFQJSk9ISM9NyQkIjMyOSEqMyNcakRdIiEjPCQiMz8lZUo9ck5vLSIhIz03JCQiM1JrJlEocGNDcDohIzwkIjMyImVxNyNRT0xDISM/NyQkIjNYTj1qNig0JlE7ISM8JCIzIzRqYDlAKj02NiEjPTckJCIzKVEyOVBFLykpcCIhIzwkIjNLNFpFdC5jJz0jISM9NyQkIjNYQWh5SlMjUnciISM8JCIzVVZRWHU4aVxNISM9NyQkIjNMUiV5VDcqPko9ISM8JCIzPStoYSQqSEd6WyEjPTckJCIzbzVgOHhZLCgqPSEjPCQiM1xHM1YhRyZwPGshIz03JCQiM25rUHozWXBnPiEjPCQiM18xTjMnSCtzMCkhIz03JCQiM0BaJHBkSis5LiMhIzwkIjM4KXonPmtMKXorIiEjPDckJCIzI3pFXSNRRCRcNCMhIzwkIjN1Yms4PzosNjchIzw3JCQiMylmLElrdW1GOyMhIzwkIjMlNFxjPClHRmE5ISM8NyQkIjNMImUnPUBZQkNBISM8JCIzKGZpUk8hPShIcSIhIzw3JCQiMyM+IykpM1dfViJIIyEjPCQiMyopKip5bCYqZkw3PyEjPDckJCIzKGUjRzwkemxZTiMhIzwkIjN1aSZIXGp4dU0jISM8NyQkIjNPIT0/ZyQqZjJVIyEjPCQiM1JHZmoqKXpVYkYhIzw3JCQiM08oKUdjVCF6YFsjISM8JCIzc0goKUgtP2BGSyEjPDckJCIzSCgzemtESEliIyEjPCQiM3ZxKG90cCUqWyNRISM8NyQkIjMvYEAnUVglPT1FISM8JCIzeCcpKlx5K0RvYCUhIzw3JCQiM0c0K3dgXSJbbyMhIzwkIjMkMzZ3YSMqUkpZJiEjPDckJCIzJXprXCc9UiozdiMhIzwkIjNydSUqM3BHK3ptISM8NyQkIjNlKnooektOaDZHISM8JCIzWnFGKEhzYCE0IykhIzw3JCQiM2JCbCJHMTA3KUchIzwkIjNuNip6bCVbUSIzIiEjOzckJCIzKD4jPihvYltNJUghIzwkIjNeR042NXIsbTkhIzs3JCQiMyQ9Vih6LkoiKTRJISM8JCIzM0gzT20lUjJGIyEjOzckJCIzWnpSWXRGZFRJISM8JCIzMiI0XFQnMyMzLiQhIzs3JCQiMzZGMDhWQ0x0SSEjPCQiM09bQVh2RFEmXCUhIzs3JCQiM08mKnlNJVwoUiE0JCEjPCQiMyEqUjNISydHNy4nISM7NyQkIjNlal9jWERZMkohIzwkIjMoKipccWQmKj03NSohIzs3JCQiM1paUjxyXSpmNiQhIzwkIjNeRkYqemtNcUAiISM6NyQkIjMiPWojeSdmRlg3JCEjPCQiM0JvN19nR3hJPSEjOjckJCIzKVIocGVmUXpHSiEjPCQiMyFvTCZRWHFZV0MhIzo3JCQiMzo7OFJBLDFMSiEjPCQiM09MPCgqejMiPW4kISM6NyQkIjNCKFskemBLPk5KISM8JCIzOyNcWG8uSyIqKlshIzo3JCQiM0tlYz4mUUV0OCQhIzwkIjMsUGJlUzB2YHQhIzo3JCQiMycqR3lmOyZmJVJKISM8JCIzdW1cSHBbdnI5ISM5NyQkIjMvKysrW0VmVEohIzwkIjMjPjQqPVwwQj9jISIqN2FvNyQkIjMlKSoqKioqcG0jZlRKISM8JCIzcHN1cFh4b1VCISIqNyQkIjNrI3opZShmS1A5JCEjPCQiM1YjeVBgN3EhcDkhIzk3JCQiMyplZXgiR0QoZTkkISM8JCIzPjhgKCllKlIuTighIzo3JCQiMzl6andlQyxbSiEjPCQiM2U3OiV6akZOIVwhIzo3JCQiM1JzXk4qUV8sOiQhIzwkIjNMRC9JKEczLG8kISM6NyQkIjNXZUZgXUFWYUohIzwkIjMpPSpcT11dbWNDISM6NyQkIjNdVy5yNkByZUohIzwkIjNeNSVmckU/XCU9ISM6NyQkIjMvPGIxTT1GbkohIzwkIjNmaFohZWFISkIiISM6NyQkIjNmKm8/a2JKZTwkISM8JCIzUnRCKltOIik9RiohIzs3JCQiM29NNTgsNSZIPiQhIzwkIjNUbXpCPHlgNmkhIzs3JCQiM056OCVlV3ErQCQhIzwkIjM1PjpZQ1dVIW8lISM7NyQkIjNIdT5YPzonKVJLISM8JCIzL3RdSVprSidHJCEjOzckJCIzbnBEMSZmXydwSyEjPCQiMyM9dD07NVsjUkQhIzs3JCQiMyllRGtMJiplbUwkISM8JCIzWy9HYyZvdSgpbyIhIzs3JCQiM0IiPS9MWjRUUyQhIzwkIjMjZidvJFwqW3ptNyEjOzckJCIza3VvcDclUjdaJCEjPCQiM0chUkxTJGZmOTUhIzs3JCQiMzEoR1coZnVaTE4hIzwkIjN4VFMsRFtEXSYpISM8NyQkIjMpXF0kXF84I3pmJCEjPCQiM0w3aXJcYFlIdCEjPDckJCIzXyhvaSY9JHBYbSQhIzwkIjNaKlJ2YTpcak4nISM8NyQkIjN4SCVmUGEuNXQkISM8JCIzeFAqUk92ayV6YiEjPDckJCIzKUdieSxKUiQqeiQhIzwkIjNFKTRMLCRbQj1cISM8NyQkIjMpKVxrViFcSCZmUSEjPCQiMyxRJW8hNCdbKT1XISM8NyQkIjNQPzlTeCQqR0ZSISM8JCIzJClRMCk0LFhcI1IhIzw3JCQiMzcwRChIXEZgKlIhIzwkIjNnQDFOIkhiTVskISM8NyQkIjNKJFsiW0NbKjMxJSEjPCQiMyNIdypIXl5wJzQkISM8NyQkIjMvX1UmSENPLzclISM8JCIzdkU3bW8pSDB4IyEjPDckJCIzW213W1tuQiI+JSEjPCQiMz1KNStrKWVoUyMhIzw3JCQiM21uP2ZqU0BeVSEjPCQiM1hlKWYxSSRbN0AhIzw3JCQiM3JJJzQlUj4pNEslISM8JCIzVlo2JjMxc0t5IiEjPDckJCIzXid5PjdMUUZRJSEjPCQiMztjKSlSQWpbKlwiISM8NyQkIjNjKTMoKjMpW1xdVyEjPCQiMz1hPiV6SGVIPiIhIzw3JCQiMzozIj0jUl4sOlghIzwkIjNQVEwmcFg1IUghKiEjPTckJCIzRURsOmdfTCNlJSEjPCQiM2N1Jz1ZJmZLJCpmISM9NyQkIjM3UmBDWWg6V1khIzwkIjMxNXdheWl3dEohIz03JCQiMyk9dS5PS1EzciUhIzwkIjNnckBUWCMqKltJKCEjPzckJCIzNCRmJT5sQjUheSUhIzwkIjNMN1FPcl5zVEshIz03JCQiM3hzTiw8cFJTWyEjPCQiM1IyVlRVJ2UsQichIz03JCQiMzUnSCxbbztiIVwhIzwkIjNrSUJwb0hbJGYqISM9NyQkIjMlbygpKipveCJ6c1whIzwkIjNJS3A+UFosRDghIzw3JCQiMzElUXAmSHRnUV0hIzwkIjM8RWgqbylmZS88ISM8NyQkIjM3KnpcNEUoRy1eISM8JCIzQSpvISpwZThuNCMhIzw3JCQiM2dtbWhuSCpIPCYhIzwkIjM3cXZrTmIlb2MjISM8NyQkIjN4Iz4/KSo9RGxCJiEjPCQiM1ElKUc1dUYxRkkhIzw3JCQiMzNqUHEoUmZWSSYhIzwkIjNtRk1NIz5AbmMkISM8NyQkIjNiWj4+c3MjZU8mISM8JCIzL3drND9LSjNUISM8NyQkIjNqdzIhWyp5LUxhISM8JCIzc25oViVIejd4JSEjPDckJCIzXy8oM09XZWlcJiEjPCQiM0x0XmI8KXolemEhIzw3JCQiMyZ5Wm5oZV9CYyYhIzwkIjMqR1QjUXVKTUpqISM8NyQkIjNsWCFHOXBycGkmISM8JCIzTyJSRyMpKnlBMnQhIzw3JCQiMz9yKVtnIT5pJXAmISM8JCIzJypmdkMzRWNKJikhIzw3JCQiM11jdTkucnhmZCEjPCQiMyE9aXY7aj0xKSoqISM8NyQkIjNDIlJhRnEyayNlISM8JCIzajFleDJXZCY9IiEjOzckJCIzTzpiTm5sWyMqZSEjPCQiM09Lc3dEKWYxViIhIzs3JCQiM3NgJlE3PTFLJmYhIzwkIjNZXzcnKVxYOlE8ISM7NyQkIjNgRU0mNHIoekFnISM8JCIzUElwJkdJKlxnQSEjOzckJCIzIXowUFo/VF0zJyEjPCQiMyZcRFlrKT5zSUkhIzs3JCQiMzUyR1BeZFNeaCEjPCQiMydvQnI0PSoqM2slISM7NyQkIjNsJm8rNFVsSj0nISM8JCIzJGUvK0BsMjg7JyEjOzckJCIzNmwmRy80RFxAJyEjPCQiM0M0YHFQKjMxNCohIzs3JCQiM2lCOWRULCo+QichIzwkIjNHJGYrZCRvQjs3ISM6NyQkIjM3I0c5Rj5iIVxpISM8JCIzTGJ6VWcmUi0kPSEjOjckJCIzIj1yJkc9eGVkaSEjPCQiMydbSFcvXG1TVyMhIzo3JCQiM15UciZRQz9oRSchIzwkIjNHYTpYV0xhck8hIzo3JCQiMyJmJkdrMWxRcWkhIzwkIjMvR01TUTUkKikqWyEjOjckJCIzSnEmRyVwRmx1aSEjPCQiMyY0LjpAJ2VoYHQhIzo3JCQiM15GOSMzIWZ5d2khIzwkIjNWWTlUcFFEMykqISM6NyQkIjNzJUc5QS4+KnlpISM8JCIzPUhsZ0x5dXI5ISM5NyQkIjMhRzkyTztfNUcnISM8JCIzJ1soKT0wbCtYJUghIzk3JCQiMywrKysmSCY9JEcnISM8JCIzeHhwIVJ3JHllXiEiKjdhbzckJCIzKioqKioqKnBLJj0kRychIzwkIjMicFFuKFJ3MHFKISIqNyQkIjNMPjFlZF9LJkcnISM8JCIzUmc5P285OFBIISM5NyQkIjNuUTc7KT1sdUcnISM8JCIzSSlSZFkhZTFwOSEjOTckJCIzOGQ9dT1eZypHJyEjPCQiM1Ftaid6blhxeiohIzo3JCQiM1t3Q0tcXXUiSCchIzwkIjM0KnlyJ1w4QF10ISM6NyQkIjNHOVBbNVwtJ0gnISM8JCIzYygpKm9jQUdMIVwhIzo3JCQiMyZIJlxrclpJK2ohIzwkIjNzPVMoMzpTKXpPISM6NyQkIjNLSXUnUlxrKTNqISM8JCIzKipHKz8pb2dpWCMhIzo3JCQiMyFvISoqRztVVTxqISM8JCIzQT15RVUpelYlPSEjOjckJCIzbGdbJDRtVlhMJyEjPCQiM0I/VTU0aUpLNyEjOjckJCIzaDgpemI1ajtOJyEjPCQiM0RNV2J6VitoIyohIzs3JCQiM3A5bTIhPWE5USchIzwkIjNpRWpTK1kmSFonISM7NyQkIjNsO01kYV9DNmshIzwkIjNEP2NoPUsvelwhIzs3JCQiM0dlIj5FaF4jeWshIzwkIjM+NUdhbjMjKXlLISM7NyQkIjNGVDlJS0BxWGwhIzwkIjMqKlJxU0t2KmVWIyEjOzckJCIzNzx4VnI/JEdoJyEjPCQiM3Ekb0VjZVNHJD4hIzs3JCQiM1soUlojPSwydm0hIzwkIjM8YWNYY0tBOjshIzs3JCQiMzRlL3Y1U15SbiEjPCQiMyIqXGkiR2NLSFAiISM7NyQkIjMkUTFsbCg+OzFvISM8JCIzbyNlKD5DdGIhPSIhIzs3JCQiM1NZITM6Pydmc28hIzwkIjMhNHY3JTQwdkY1ISM7NyQkIjNHWWhtbj4kNCVwISM8JCIzOyg9aTVFPV0pKikhIzw3JCQiMypIOCVwWkA3LHEhIzwkIjNnVTFKV3dyOiEpISM8NyQkIjNIIUcrVy4jKSlvcSEjPCQiM0MqZV4jcEFta3EhIzw3JCQiM3F5OXJcLCNwOCghIzwkIjNKIVx1dURhREEnISM8NyQkIjNOMysoNFsoWy1zISM8JCIzdTZqQ2pHTyNcJiEjPDckJCIzeVdgQCoqKUc/RSghIzwkIjNHLiNwa10oKkcpWyEjPDckJCIzS0AkeVdTSEdMKCEjPCQiM0EvJj5FZUMoNFUhIzw3JCQiM2tFT04+biFHUighIzwkIjMrVDBkUjhldE8hIzw3JCQiM0EncC9cZnVEWSghIzwkIjNbcCcqUnokNCl6SSEjPDckJCIzIylmKnlrKTRMQ3YhIzwkIjMpKkgheTF5TFZkIyEjPDckJCIzQV11KmVgKDMjZighIzwkIjNGZGp3PFcxTj8hIzw3JCQiM2pAPyhSejJtbCghIzwkIjMneV55cmdbNmAiISM8NyQkIjM/JUhgWSJ6I1JzKCEjPCQiM3JnajhSd0E1NSEjPDckJCIzJilwZl0rKVtkeSghIzwkIjMncF84OSFvcD9gISM9NyQkIjM4bSc0dyg0Vl95ISM8JCIzIVIyRk09VndAIiEjPjckJCIzalpmJCo9XXBAeiEjPCQiM0d0OiFSOWhBUCYhIz03JCQiMzY+WV9xJiopPil6ISM8JCIzUHNmLyJwdnQtIiEjPDckJCIzdC1PMVEkNHIvKSEjPCQiM2dfd2xhV3R0OiEjPDckJCIzRDZfISpIV1E5IikhIzwkIjNLKHBRPDwsQDsjISM8NyQkIjM3QkxLIykqKj4hPSkhIzwkIjN0PTJvU0NTbkYhIzw3JCQiMzQpXGdNIip6UUMpISM8JCIzSyhbMXU4MnhRJCEjPDckJCIzMSFIZCk+Y2U5JCkhIzwkIjNhKSpbcyhwMmQ3JSEjPDckJCIzN1MiPT0leTZ5JCkhIzwkIjNhXSpvaCw5SiVbISM8NyQkIjMuLkVXXD8mZlcpISM8JCIzPHhiInlbcCJ6YyEjPDckJCIzVSkqZnBCKj51XSkhIzwkIjNLJDQyemhhT14nISM8NyQkIjNdUiJbZ2E/WWQpISM8JCIzKmV6KXlwREFJdiEjPDckJCIzRVZYaCU0XnlqKSEjPCQiM3QmKkgwcj5bNicpISM8NyQkIjM/ZDMjcEJYUnEpISM8JCIzUTxeRkEkZXMhKiohIzw3JCQiM2IoZk0+TWsmbygpISM8JCIzJz03QlpQI3BRNiEjOzckJCIzOD5xSGNYQE8pKSEjPCQiMyQpKSlRd1hJI1FLIiEjOzckJCIzJ3pzWUp2cDghKikhIzwkIjM5SkBSPDdXVTohIzs3JCQiM1NgIipcXy4rbyopISM8JCIzUiNIdDwiWyRbIz0hIzs3JCQiMydcKHklb0B6Uy4qISM8JCIzJW9QZCZbJD5NPiMhIzs3JCQiM2shKSopXEkpKXolNCohIzwkIjM3RjAmUnEuYWwjISM7NyQkIjMnXC5bKmYuUmsiKiEjPCQiMy5mXGk+UGhSTSEjOzckJCIzVDhSXGBRakUjKiEjPCQiMztPP2oiekVhZiUhIzs3JCQiM1tvaCgpKlIpKkhIKiEjPCQiM1gpSGN0c2U1LCghIzs3JCQiM1ZMRkdwIWVaSyohIzwkIjM3MGVsVFR6IkgqISM7NyQkIjM5KyQqb1F4XmMkKiEjPCQiMyVmUUJYWSRlbzghIzo3JCQiM011cHcqeSNldCQqISM8JCIzME5TUyFwXSRIPSEjOjckJCIzS11ZJTMleWshUiohIzwkIjN3OlY7ZHBOXUYhIzo3JCQiM0kpWyRRbS49KlIqISM8JCIzWCR6RU0meTRyTyEjOjckJCIzSEVCIz4qR3IyJSohIzwkIjM7Pip5SnU3Ql4mISM6NyQkIjNTVzxwYSJ6PlQqISM8JCIzPWU5WCc0JFJgdCEjOjckJCIzXWk2WTxhQzslKiEjPCQiMzUpZmx4a1RONSIhIzk3JCQiM1dzZSUpWyZ5JD0lKiEjPCQiM0VcPHcjek88WiIhIzk3JCQiM1EjZUktbzYwVSohIzwkIjNEPDNMaCk9IjNBISM5NyQkIjNLI0g6OyJba0ElKiEjPCQiM3lUWzQ5JVJzVCUhIzk3JCQiM1wrKytWenhDJSohIzwkIjNwZVdadUslUkkmISIqN2duNyQkIjM7KysrIyl6eEMlKiEjPCQiM3BBMyYpSCJRI1JXISIqNyQkIjN0XFIlMyEpcF5VKiEjPCQiM1JvPnJdN08wQyEjODckJCIzMix6bz47Y0QlKiEjPCQiM10pZV8+LWpGPyIhIzg3JCQiM2tdPWBRTSZmVSohIzwkIjMoPSo+P0xRIyk9ISkhIzk3JCQiMz8rZVBkX01FJSohIzwkIjN5Y2Vuc0dSOWchIzk3JCQiMzYsUDEmKilHclUqISM8JCIzMi5zNXpEJSo0UyEjOTckJCIzLC07dktEInpVKiEjPCQiMzUnPVxCVDR4KyQhIzk3JCQiMyRRU0YiMyl6JUglKiEjPCQiM3I/dmZiI3BhKyMhIzk3JCQiMydRPy5OM1o1ViohIzwkIjMySTlmOV1NLzohIzk3JCQiM3IwW0RNOz1NJSohIzwkIjMlPidHdDJaQC41ISM5NyQkIjNjMmsrJj07dFYqISM8JCIzMF1TIVEiPldFdiEjOjckJCIzTFVPcScqM3hVJSohIzwkIjNSI1JAKzF4dUMmISM6NyQkIjNMdjNTM2NBWyUqISM8JCIzekYqeUYhKWYoR1MhIzo3JCQiM2hGKikpZlIlXGclKiEjPCQiM0pvcjopZl93ayMhIzo3JCQiM2V3XTE0WCVHWiohIzwkIjNxM2RIXyplI3A+ISM6NyQkIjN1J2U0VSNmOCZbKiEjPCQiM3p4dUtPO2RwOiEjOjckJCIzYTEjZiVSO2AnXCohIzwkIjMxeFF4NCU9N0siISM6NyQkIjNcK1lgVTdMMyYqISM8JCIzd3BgI2Z0WWA4IiEjOjckJCIzdHhZIiozV2A/JiohIzwkIjN4JVwpXDAuLzcqKiEjOzckJCIzdTRhZVIlKXBLJiohIzwkIjNfKj1oYVFkKCl6KSEjOzckJCIzZSNvei1rNV9hKiEjPCQiMyRSWCUqWyYqM3UpeSEjOzckJCIzN0o8WSRSSmliKiEjPCQiM0RtdSgqXClbeEEoISM7NyQkIjM5RGtHXiJRJ28mKiEjPCQiM1t1OlooMyhSMG0hIzs3JCQiM1hsMlhfZTQiZSohIzwkIjNsNzw1Nk1CemchIzs3JCQiM1cpXHllOixKZiohIzwkIjNKJkdFWGMpR1hjISM7NyQkIjNgLSY+OjcuU2cqISM8JCIzX0Y8eVpeNyxgISM7NyQkIjNZXHQ3OG0ncGgqISM8JCIzLihbYCYpemVAJVwhIzs3JCQiMykpKT1WNFJbemkqISM8JCIzdnRZYUMjcE1uJSEjOzckJCIzcywzQjRHc1MnKiEjPCQiM0snNGpnS0RbUiUhIzs3JCQiM0s8cyZSTEk/bCohIzwkIjMhSDhpJGVlIVI8JSEjOzckJCIzI3BORzJbT1dtKiEjPCQiM1lSTj8mXCQzYlIhIzs3JCQiMyV5aV9pMV1pbiohIzwkIjNrXyMpPl4hKVFtUCEjOzckJCIzSSwyVS5qZClvKiEjPCQiM3RzbUVoJUdyZSQhIzs3JCQiM1slenZwaiYqKSpwKiEjPCQiM2Q+SHUkPj9qViQhIzs3JCQiM2o2UVNuXTU3KCohIzwkIjNnRj9hUj1pJ0ckISM7NyQkIjMnPWg/VUIoeUMoKiEjPCQiMzlDXiV6MmNPOSQhIzs3JCQiMzJfaHIoNEZldCohIzwkIjN5VGpAQGBSR0khIzs3JCQiM2MhR1FGWF14dSohIzwkIjMneldePlxkQyJIISM7NyQkIjMiekV4XldvK3cqISM8JCIzTV9GOkkzLSxHISM7NyQkIjNRcmNoKD4+QHgqISM8JCIzPWE0LjRNTSpwIyEjOzckJCIzLXJ6Qj8qeVB5KiEjPCQiMzAub0o/OD0yRSEjOzckJCIzQ1w8R2Fdcyd6KiEjPCQiMzdzI3lkXjA4XiMhIzs3JCQiM21jRV9KeE4zKSohIzwkIjNBaSIzTCM0U0lDISM7NyQkIjMiXGNBdTR5MiMpKiEjPCQiMyVHPDBaWyQpKltCISM7NyQkIjMvRnMmXHpLPyQpKiEjPCQiMyJlT18rS10jekEhIzs3JCQiM2YiejxAOlBWJSkqISM8JCIzJlIqb1EjM0xxPyMhIzs3JCQiMyRmIVxJJGY5ZiYpKiEjPCQiM2IiKnBNRT9nVUAhIzs3JCQiMzMnW0xfTjshbykqISM8JCIzJylvYyNlKy4neT8hIzs3JCQiM2prJD4mUiFbKXopKiEjPCQiM0owa0Y+RTM+PyEjOzckJCIzISlcS1k7WkIjKikqISM8JCIzRSpvOFQiKVsoZj4hIzs3JCQiM2wlb14mZVg7LyoqISM8JCIzLS40cFNZRTA+ISM7NyQkIjNUJFFfXmFraiIqKiEjPCQiMyMpRzR4eFwvXz0hIzs3JCQiMzInUS8oNE5ZRyoqISM8JCIzTXBjZTMoejohPSEjOzckJCIzbEd5ZCw3ZVIqKiEjPCQiM1RiclFZdTRkPCEjOzckJCIzb3ljNEpMS18qKiEjPCQiM2hlJmYlUSUpPTM8ISM7NyQkIjMhM1pPTy8/UCcqKiEjPCQiM3RRQjVXWz5tOyEjOzckJCIzQ2VCQzs4KGUoKiohIzwkIjMrY0FMI3A/SmkiISM7NyQkIjMkKVJPZk07XSgpKiohIzwkIjNDOCtrXD5WJGUiISM7NyQkIiM1IiIhJCIzbj5wTlg1TlU6ISM7LUknQ09MT1VSRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiNiZJJFJHQkc2IiQiKisrKysiISIpJCIiISIiISQiIiEiIiEtSSZUSVRMRUc2JCUqcHJvdGVjdGVkR0koX3N5c2xpYkc2IjYjSS9jb25kKHNpbih4KSx4KUc2Ii1JK0FYRVNMQUJFTFNHNiQlKnByb3RlY3RlZEdJKF9zeXNsaWJHNiI2JFEieDYiUSE2Ii1JJVZJRVdHNiQlKnByb3RlY3RlZEdJKF9zeXNsaWJHNiI2JDskIiIhIiIhJCIjNSIiITskIiIhIiIhJCIjNSIiIQ==

Plot f(x) = J0(x) (Bessel function). plot( BesselJ(0,x), x=0..10, title=`BesselJ(0,x)`, color=red );

NictSSdDVVJWRVNHNiQlKnByb3RlY3RlZEdJKF9zeXNsaWJHNiI2IzdobjckJCIiISIiISQiIiIiIiE3JCQiK1MmKUdcYSEjNiQiKyJweEQqKiohIzU3JCQiKzN4JikqMyIhIzUkIisjSEYuKCoqISM1NyQkIitpbHlNOyEjNSQiK1MkKUhMKiohIzU3JCQiKzthcnpAISM1JCIra0tkIikpKiEjNTckJCIrIXklKno3JCEjNSQiKyUqSClvdiohIzU3JCQiK1hURndTISM1JCIrLVEqKSllKiEjNTckJCIrInpfIjRpISM1JCIrdno4ZiEqISM1NyQkIitTJnBoTikhIzUkIitwMDNIJCkhIzU3JCQiKyo9KUhcNSEiKiQiK1FWOkp1ISM1NyQkIitbITN1QyIhIiokIit4ekdzayEjNTckJCIrSiRSRFgiISIqJCIrWyxWIlEmISM1NyQkIispUidvazshIiokIitrY1skPSUhIzU3JCQiKzFKOnc9ISIqJCIrIW9LbyZIISM1NyQkIiszRW4kNCMhIiokIitJJls/cSIhIzU3JCQiKy9SRSZHIyEiKiQiKzZoWV5qISM2NyQkIitELiY0XSMhIiokISt1bGcmKVshIzY3JCQiK3ZCXzxGISIqJCErImYrOV0iISM1NyQkIit2J0hpI0ghIiokISsqb2wuTSMhIzU3JCQiKygqZXY6SiEiKiQhK2VCZG5IISM1NyQkIiszNDdUTCEiKiQhKy1vQElOISM1NyQkIitxeGRPTSEiKiQhK1grczBQISM1NyQkIitMWS5LTiEiKiQhK0JQOFZRISM1NyQkIitkTzJWTyEiKiQhK1lVJFwmUiEjNTckJCIrIm83VHYkISIqJCErekNSOlMhIzU3JCQiK0s1U19RISIqJCErYUl0RVMhIzU3JCQiKyRRKm9dUiEiKiQhK0VoUyoqUiEjNTckJCIrI0dGJmVTISIqJCErcSR6aiNSISM1NyQkIisiPWxqOyUhIiokISt6dkM1USEjNTckJCIrViZSPFAlISIqJCErKXkhb3lNISM1NyQkIitYaC0nZSUhIiokIStoQypwKkghIzU3JCQiK1IiM0d5JSEiKiQhK0RbSWJDISM1NyQkIisuVDEmKlwhIiokIStoSDcjeiIhIzU3JCQiKyhSUWJAJiEiKiQhKy08X1w1ISM1NyQkIis9PlkyYSEiKiQhK29BUWpRISM2NyQkIit5WHU5YyEiKiQiK1ImKjMqPSQhIzY3JCQiK1x5KSlHZSEiKiQiK1t1RDE1ISM1NyQkIitpX1FRZyEiKiQiKyF5Jz02OyEjNTckJCIrIXklM1RpISIqJCIrcFU3NkAhIzU3JCQiK08hW2hZJyEiKiQiKy4qW3NhIyEjNTckJCIrI1F4JG9tISIqJCIrQ1IrPkchIzU3JCQiKyEpKVFqeCchIiokIitPeG45SCEjNTckJCIrdS5JJSlvISIqJCIrKT1uXihIISM1NyQkIitOJkhAKXAhIiokIismR3YlKipIISM1NyQkIisocGUqenEhIiokIis8MCdcKkghIzU3JCQiKzU9InA9KCEiKiQiK3oyZGRIISM1NyQkIitDXCdRSCghIiokIit4ST0oKUchIzU3JCQiKzhTOCZcKCEiKiQiK0AkWypwRSEjNTckJCIrMCM9YnEoISIqJCIrPlRiTkIhIzU3JCQiKzJzPzZ6ISIqJCIrei8mKj0+ISM1NyQkIitJWGFFIikhIiokIit0VS80OSEjNTckJCIrbCpSUkwpISIqJCIrQUA9JnApISM2NyQkIitgPC5ZJikhIiokIitacjRPSCEjNjckJCIrOHRPYygpISIqJCErISpmIlx3IyEjNjckJCIrXFFrXCopISIqJCErQHprJHkoISM2NyQkIitwMDtyIiohIiokISsjR0RUSSIhIzU3JCQiK2x4R3AkKiEiKiQhK1FgLDY8ISM1NyQkIishb0swZSohIiokIStQTD9pPyEjNTckJCIrPDVzI3kqISIqJCErXyJlakkjISM1NyQkIiM1IiIhJCErWHdOZkMhIzUtSSdDT0xPVVJHNiQlKnByb3RlY3RlZEdJKF9zeXNsaWJHNiI2JkkkUkdCRzYiJCIqKysrKyIhIikkIiIhIiIhJCIiISIiIS1JJlRJVExFRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiNiNJLUJlc3NlbEooMCx4KUc2Ii1JK0FYRVNMQUJFTFNHNiQlKnByb3RlY3RlZEdJKF9zeXNsaWJHNiI2JFEieDYiUSE2Ii1JJVZJRVdHNiQlKnByb3RlY3RlZEdJKF9zeXNsaWJHNiI2JDskIiIhIiIhJCIjNSIiIUkoREVGQVVMVEc2Ig==

Determine the relative condition number of f(x) = J0(x). 'cond(BesselJ(0,x),x)' = cond(BesselJ(0,x),x);

Ly1JJWNvbmRHNiI2JC1JKEJlc3NlbEpHNiQlKnByb3RlY3RlZEdJKF9zeXNsaWJHRiU2JCIiIUkieEdGJUYuLUkkYWJzR0YqNiMqKEYuIiIiLUYoNiRGM0YuRjNGJyEiIg==

Plot the condition number of f(x) = J0(x) as a function of x. plot( cond(BesselJ(0,x),x), x=0..10, 0..10, discont=true, title=`cond(BesselJ(0,x),x)`, color=red );

NiYtSSdDVVJWRVNHNiQlKnByb3RlY3RlZEdJKF9zeXNsaWJHNiI2KTdnbjckJCIiISIiISQiIiEiIiE3JCQiK2VfTFRfISM2JCIraDswdTghIzc3JCQiK1NJeiwpKiEjNiQiKzljYDRbISM3NyQkIit5LzAkXCIhIzUkIishRzx4NiIhIzY3JCQiKyZIQCQ0PyEjNSQiKyp6VSpHPyEjNjckJCIrbiRRSl8jISM1JCIrISllcjNLISM2NyQkIittRF4qKkghIzUkIit2LyEqXFghIzY3JCQiK2MveCNcJCEjNSQiK0o1biU+JyEjNjckJCIrcyUpKkcrJSEjNSQiK3Qqb2s8KSEjNjckJCIrLDBSNlghIzUkIitKO1ZXNSEjNTckJCIrYXFWTV0hIzUkIitcND80OCEjNTckJCIrVW44JlwmISM1JCIrbzQlKXA6ISM1NyQkIit2YXg4ZyEjNSQiK1FfRiYqPSEjNTckJCIrKnlWWGAnISM1JCIrVkZzZEEhIzU3JCQiK2IwU09xISM1JCIrV1FkVUUhIzU3JCQiK3hYOCNcKCEjNSQiKzY1I1ItJCEjNTckJCIrNWsvTSEpISM1JCIrSSkqPT5OISM1NyQkIis5bzYkXCkhIzUkIishKkhbd1IhIzU3JCQiK0hbN0YhKiEjNSQiK2JGLmJYISM1NyQkIisxQyIpKlwqISM1JCIrdCwpPjYmISM1NyQkIitnRCU9KyIhIiokIis1ZU92ZCEjNTckJCIrKnpFNzAiISIqJCIrMj5AaWshIzU3JCQiK3RTdi02ISIqJCIrSiEpW1RzISM1NyQkIismPnMrOiIhIiokIis1THo9ISkhIzU3JCQiKyM9NjY/IiEiKiQiKyw7QUkqKSEjNTckJCIrWGo3YTchIiokIitSIVJnJyoqISM1NyQkIissaUYrOCEiKiQiK3duLSY0IiEiKjckJCIrNCQ+LE4iISIqJCIrJio9LTY3ISIqNyQkIis8QGgsOSEiKiQiK1A3IkdNIiEiKjckJCIrJXkoKT5YIiEiKiQiKyIqZT0mWyIhIio3JCQiK0spRzJdIiEiKiQiK2RUX1A7ISIqNyQkIitidSVbYiIhIiokIitLZ0ZFPSEiKjckJCIrWWFaLjshIiokIitgeGU7PyEiKjckJCIrMGlSYjshIiokIis/XGtYQSEiKjckJCIrSFRXLTwhIiokIitSKCopM1sjISIqNyQkIitRKnpRdiIhIiokIitBLilbeCMhIio3JCQiK0RxRi09ISIqJCIraiQqKVs0JCEiKjckJCIrRmYnRyY9ISIqJCIrPnpHJ1skISIqNyQkIitEZUstPiEiKiQiK1lEVlRSISIqNyQkIithZDVhPiEiKiQiKycqSDk/WCEiKjckJCIrISlmKFIrIyEiKiQiK14oUkpAJiEiKjckJCIrKlt2XDAjISIqJCIrYXIlKj1oISIqNyQkIisocF9iNSMhIiokIis7MjA4dCEiKjckJCIrKSp5LV9AISIqJCIrKFwnUkApKSEiKjckJCIrQlBIMEEhIiokIis6PiEpUjYhIik3JCQiKzZgJEhEIyEiKiQiK3RkSEA6ISIpNyQkIisjPUpQSSMhIiokIitFZW0/QiEiKTckJCIrWS0vR0IhIiokIitcMWx2SSEiKTckJCIrNiRcQk4jISIqJCIrJzQlUkdYISIpNyQkIis7NVRsQiEiKiQiKywwN1tnISIpNyQkIitARlp5QiEiKiQiK2IhNEwyKiEiKTckJCIrdU4rJlEjISIqJCIraW8vMzchIig3JCQiK0VXYCJSIyEiKiQiKyhSTlUhPSEiKDckJCIrXykqeiVSIyEiKiQiK0FoZCRSIyEiKDckJCIreV8xKVIjISIqJCIrKW9JQWIkISIoNyQkIisiKnpwKlIjISIqJCIrPjQmXG8lISIoNyQkIisvMkwsQyEiKiQiKyNvPWcobyEiKDckJCIrPU0nSFMjISIqJCIrI3lINEgiISInNyQkIitKaGYvQyEiKiQiK2IhUiJbNSEiJjdnbjckJCIrdmVbMEMhIiokIitKT1VVTyEiJzckJCIrZXJYMUMhIiokIislby9XWiIhIic3JCQiK1UlR3VTIyEiKiQiK0Z6MFcjKiEiKDckJCIrRCgqUjNDISIqJCIrRD9LTG4hIig3JCQiKzM1UDRDISIqJCIrJDMkZSZIJiEiKDckJCIrdk5KNkMhIiokIitiLV42UCEiKDckJCIrVWhEOEMhIiokIiszNFZkRyEiKDckJCIrdjc5PEMhIiokIisiNFd2Jj4hIig3JCQiKzNrLUBDISIqJCIrcGZDKlsiISIoNyQkIit2bXpHQyEiKiQiK0NjLDM1ISIoNyQkIitVcGNPQyEiKiQiK3ZAaUJ3ISIpNyQkIit4JykzXUMhIiokIituJ1EiZmAhIik3JCQiKzcvaGpDISIqJCIrREsnZTglISIpNyQkIitCTy0lXCMhIiokIisnNEckUUYhIik3JCQiK0slUVlfIyEiKiQiKyxHbFk/ISIpNyQkIitNeDViRCEiKiQiK0M3KW9qIiEiKTckJCIreG1OJGUjISIqJCIrWDErIlEiISIpNyQkIitBb2c3RSEiKiQiK084YSk9IiEiKTckJCIra3QmR2sjISIqJCIrVFVYUTUhIik3JCQiKyIqMyx0RSEiKiQiK3pULT0jKiEiKjckJCIrLHYtL0YhIiokIitXIm9pRCkhIio3JCQiK1twTUpGISIqJCIrcWIhW2IoISIqNyQkIit1QDVpRiEiKiQiK2VlWSgpbyEiKjckJCIrJW8kKUh6IyEiKiQiK3NIcDxqISIqNyQkIitUUHVBRyEiKiQiK1l1dFVlISIqNyQkIitDKG8oXEchIiokIis/WiE+WSYhIio3JCQiK1ZTIT4pRyEiKiQiKzgpZihmXSEiKjckJCIrdG83NEghIiokIitfY21hWiEiKjckJCIrJ1wkelNIISIqJCIrLiopb0xXISIqNyQkIitDUSMpb0ghIiokIis7IXpePCUhIio3JCQiK052ZCoqSCEiKiQiK2w0J1siUiEiKjckJCIrVEInKUdJISIqJCIrQVdJJ28kISIqNyQkIitrelRmSSEiKiQiK2EhKSpcWSQhIio3JCQiK2t2WigzJCEiKiQiKypHJTR2SyEiKjckJCIrTU91PEohIiokIisnUU5FMyQhIio3JCQiK3U6PVxKISIqJCIrTzZgJSpHISIqNyQkIiskUltsPCQhIiokIitvPUtSRiEiKjckJCIrM2A1MUshIiokIitoJSlcekQhIio3JCQiKyRcU21CJCEiKiQiKyh5Zj1VIyEiKjckJCIrOUtebUshIiokIis2dTJ1QSEiKjckJCIrM21UJkgkISIqJCIrY0pTT0AhIio3JCQiKyoqKTN2SyQhIiokIis1UiopKSk+ISIqNyQkIitcX01jTCEiKiQiK29ZYmc9ISIqNyQkIis0VTgoUSQhIiokIitueU1GPCEiKjckJCIrI2VMXVQkISIqJCIrRHpoNDshIio3JCQiK25cYFhNISIqJCIrLTFyJFsiISIqNyQkIisjUk1VWiQhIiokIis+emFuOCEiKjckJCIraE5CL04hIiokIitoIWYiWzchIio3JCQiK0tLY0xOISIqJCIrIXpFSjgiISIqNyQkIishb29VYyQhIiokIitORDw5NSEiKjckJCIrdjslUWYkISIqJCIrKXpidSsqISM1NyQkIitOVjNDTyEiKiQiK1FlTGN5ISM1NyQkIitwbDJhTyEiKiQiKyJHPDVzJyEjNTckJCIrPWpqIm8kISIqJCIrXSYqPiJvJiEjNTckJCIrK0hBOFAhIiokIitvMDUiXCUhIzU3JCQiKztWWlRQISIqJCIrPXk2RU0hIzU3JCQiKz1pZnJQISIqJCIrJD5UekcjISM1NyQkIitAblUrUSEiKiQiK096LSU+IiEjNTckJCIrTSE0OSRRISIqJCIrKD1HeDgiISM3N2luNyQkIisiZmA/JFEhIiokIitTNi9LOCEjNzckJCIrV2okKW9RISIqJCIraVVGSTkhIzU3JCQiK0AzJTMhUiEiKiQiK2A1PHhFISM1NyQkIisuSyRvJFIhIiokIitTOEwpNCUhIzU3JCQiK2xUMXRSISIqJCIrMT5yX2IhIzU3JCQiK0dINzRTISIqJCIrIkdBeC0oISM1NyQkIis8U2JVUyEiKiQiK1Z3REIlKSEjNTckJCIrdSpwcjIlISIqJCIrUDJHKyoqISM1NyQkIitYKXBINiUhIiokIis7IT1tOSIhIio3JCQiKzFcbFtUISIqJCIrVW0uMjghIio3JCQiK3k4TyY9JSEiKiQiK3oqcHFaIiEiKjckJCIrZUNwPFUhIiokIituTl1KOyEiKjckJCIrJ2YqM2FVISIqJCIrTjM5Nj0hIio3JCQiKyY9TzFIJSEiKiQiKytxSikqPiEiKjckJCIrJmZiZUslISIqJCIrcSNIZT0jISIqNyQkIiskPlF5TiUhIiokIitZNnppQiEiKjckJCIrJ2ZvZVIlISIqJCIrPnBOI2UjISIqNyQkIitPYDNHVyEiKiQiK1oxI3B4IyEiKjckJCIrajVjbFchIiokIitBKjNVLCQhIio3JCQiK0tNdClcJSEiKiQiK2heOE5LISIqNyQkIit5KEdeYCUhIiokIitFRWkhXCQhIio3JCQiK2FkeXBYISIqJCIrcCIqM1tQISIqNyQkIitzbSVmZyUhIiokIituQERMUyEiKjckJCIrJW9gIlJZISIqJCIrVkl4NlYhIio3JCQiK0s+KFxuJSEiKiQiK2pQS0tZISIqNyQkIitFcTw3WiEiKiQiK3IuTSEqXCEiKjckJCIrcFRjV1ohIiokIis1QWlEYCEiKjckJCIrcUphelohIiokIis1dCRmciYhIio3JCQiKy0qemMiWyEiKiQiK0FDWGFoISIqNyQkIitXRS5eWyEiKiQiK242bkJtISIqNyQkIitSI1FfKVshIiokIitHLSM9NyghIio3JCQiK0B4QEJcISIqJCIrTWUmXHQoISIqNyQkIit2Uk1kXCEiKiQiK3RRIipcJCkhIio3JCQiK041eSQqXCEiKiQiK1lHPCgzKiEiKjckJCIrRSUpekVdISIqJCIrb01DVSkqISIqNyQkIitkXipHMSYhIiokIitqelR5NSEiKTckJCIrbiRmbzQmISIqJCIrODomMz0iISIpNyQkIitgPE9LXiEiKiQiKzF6NjE4ISIpNyQkIitEPTJuXiEiKiQiK2VCJz1YIiEiKTckJCIrYCtULl8hIiokIismPSFRUDshIik3JCQiKyYzMyVRXyEiKiQiKyY0IikpZj0hIik3JCQiK0gnKT51XyEiKiQiK1IpWzc6IyEiKTckJCIrM0dwNGAhIiokIitlQzdPRCEiKTckJCIrdCMzQk0mISIqJCIrLF49QkkhIik3JCQiK3cjKm96YCEiKiQiK1oqb2wmUSEiKTckJCIrIkhCSlQmISIqJCIrM1RsIjQmISIpNyQkIitDNHhbYSEiKiQiK24yP3l3ISIpNyQkIishZkllWSYhIiokIitYY2Q2NSEiKDckJCIrZC0qR1smISIqJCIrKUgicHk5ISIoNyQkIismXHR1WyYhIiokIitQV1YobyIhIig3JCQiK0luMCNcJiEiKiQiKygqXFZrPiEiKDckJCIrbCpSbVwmISIqJCIrJltOKFxCISIoNyQkIisrS0EsYiEiKiQiK2RASkFIISIoNyQkIitOayFlXSYhIiokIitdO2ZpUSEiKDckJCIrcScqUTViISIqJCIrMUZUI3AmISIoNyQkIishSCJvN2IhIiokIitoWWpkdSEiKDckJCIrMEgoXF4mISIqJCIrM192ITMiISInNyQkIis6KD1oXiYhIiokIit3WW0kUiIhIic3JCQiK0RYRTxiISIqJCIrXkBWaD4hIic3JCQiK04uVD1iISIqJCIrZUBNNEwhIic3JCQiK1RoYj5iISIqJCIrYyQpXGQ1ISImN2duNyQkIitaRW8/YiEiKiQiK3NyZUoiKiEiJzckJCIrPzJxQGIhIiokIitgQVotTSEiJzckJCIrIXo9Rl8mISIqJCIrb2IqMzQjISInNyQkIitnb3RCYiEiKiQiK25tQTQ6ISInNyQkIitOXHZDYiEiKiQiKyoqZnohPSIhIic3JCQiKyEzInpFYiEiKiQiK2QqenlBKSEiKDckJCIrRHMjKUdiISIqJCIrI1tPVEonISIoNyQkIis6JioqR2AmISIqJCIrN0k3NVYhIig3JCQiKzA9KHBgJiEiKiQiK2JKQXNLISIoNyQkIismUTteYSYhIiokIitcJCo9NEEhIig3JCQiK2o0RWBiISIqJCIrTlMiem0iISIoNyQkIitxU1ZuYiEiKiQiKydRcShwNiEiKDckJCIrIj0yO2UmISIqJCIreEgmKjQhKiEiKTckJCIrb2FbOGMhIiokIitJVDBVZiEiKTckJCIrbV1kWGMhIiokIisqKmZ1Q1chIik3JCQiK1lAXnhjISIqJCIrdzU/RU4hIik3JCQiKzQ+NzJkISIqJCIrM3NGbEghIik3JCQiKy02eVBkISIqJCIrKj0xTmEjISIpNyQkIislKSkpW3BkISIqJCIrTi9yOUEhIik3JCQiK3pcNCxlISIqJCIrPGdGZj4hIik3JCQiK0xkZ0xlISIqJCIrTCopels8ISIpNyQkIitBN0NpZSEiKiQiKzksUiZmIiEiKTckJCIrKyF5VyplISIqJCIrQkljXDkhIik3JCQiK1lyJW8jZiEiKiQiKyUpZj1EOCEiKTckJCIrOzMvZWYhIiokIitNSGpANyEiKTckJCIrZHdPJylmISIqJCIrVjRyUTYhIik3JCQiKzU1MD9nISIqJCIrcmZHXjUhIik3JCQiK0hfZVtnISIqJCIrKEgjeV0pKiEiKjckJCIrNHR4IjMnISIqJCIrKT4/YzoqISIqNyQkIitCejo2aCEiKiQiK0glKSpwZikhIio3JCQiKzlKUlZoISIqJCIrLHkjZS4pISIqNyQkIitSJykzdWghIiokIitgPFhXdiEiKjckJCIrKj47aD8nISIqJCIrdUsvcXEhIio3JCQiKydcRmJCJyEiKiQiK29YPmttISIqNyQkIitiOkRuaSEiKiQiK2ZfQGFpISIqNyQkIitOUj8raiEiKiQiKytoJ1wmZSEiKjckJCIreiEqKSlHaiEiKiQiK2MiUW5fJiEiKjckJCIrPylwKWZqISIqJCIrJz4rKz4mISIqNyQkIitlZig9UichIiokIitlS0BmWyEiKjckJCIrPng9QmshIiokIitMNlVdWCEiKjckJCIrZU1bYGshIiokIisqPXNSRSUhIio3JCQiKzY8NyhbJyEiKiQiKyZ5WyVlUiEiKjckJCIreHJNPGwhIiokIitDKWZRcCQhIio3JCQiKzkkPidcbCEiKiQiKzclKlw/TSEiKjckJCIrbUUnKXlsISIqJCIrTCgzKz0kISIqNyQkIit2TCQzaCchIiokIitLdypSI0ghIio3JCQiKz9gIjRrJyEiKiQiK1Z6ISopbyMhIio3JCQiKz8nZkJuJyEiKiQiK01BVFtDISIqNyQkIitzQDUubiEiKiQiK1VyeDxBISIqNyQkIit1bkdObiEiKiQiKysjKlIhKT4hIio3JCQiK3FWR21uISIqJCIrXmk1YjwhIio3JCQiKyEqUSl6eichIiokIismUjF2XyIhIio3JCQiK0E0VUhvISIqJCIrJm9QU0kiISIqNyQkIishSDMkZW8hIiokIitgQ0ErNiEiKjckJCIrdGtUIipvISIqJCIrciVII3onKSEjNTckJCIrRSlHNSNwISIqJCIrKHlDKjNtISM1NyQkIityPGdfcCEiKiQiKyFIeFpTJSEjNTckJCIrMzYjRylwISIqJCIrWjk6JUgjISM1NyQkIis4Zkg6cSEiKiQiK0h1eVI/ISM3N2duNyQkIit1UCdlLCghIiokIittbzNXPiEjNzckJCIrOihlOjAoISIqJCIrUSE0N2AjISM1NyQkIisjcDtFMyghIiokIitOKzJLWiEjNTckJCIrT1lhPHIhIiokIitsaSIpSHMhIzU3JCQiKzBUcV9yISIqJCIrWjtNdSgqISM1NyQkIitta3AoPSghIiokIitpcEtNNyEiKjckJCIrbClRLEEoISIqJCIrMCdHaloiISIqNyQkIishNEpQRCghIiokIit3OFJKPCEiKjckJCIrPEFaKUcoISIqJCIrMUhsKz8hIio3JCQiK0g+NUJ0ISIqJCIrJlFMYEYjISIqNyQkIitXR3NldCEiKiQiK2VPRWxEISIqNyQkIitteDQhUighIiokIismKnpkRkchIio3JCQiKydcPWFVKCEiKiQiKyg0bTo4JCEiKjckJCIrZFUpM1koISIqJCIrP141Wk0hIio3JCQiKyozaV1cKCEiKiQiKyFSdD93JCEiKjckJCIrTSkpNEV2ISIqJCIrNC5PZVMhIio3JCQiK0ZYK2p2ISIqJCIrI28nekNXISIqNyQkIishXG9VZighIiokIissOF5bWiEiKjckJCIrNmZqSXchIiokIit4PTxVXiEiKjckJCIrU3MjR20oISIqJCIrJSlwbjJiISIqNyQkIitKaTkpcCghIiokIitcNUdIZiEiKjckJCIraiN5PHQoISIqJCIrZlM2YGohIio3JCQiK2YocG93KCEiKiQiK0dvWkBvISIqNyQkIiszWjQqeighIiokIithKyp6RighIio3JCQiK29PJlEkeSEiKiQiK3UwUy15ISIqNyQkIitlJWUqcHkhIiokIit5Sy4oUSkhIio3JCQiKyZ5KFEseiEiKiQiK2dZbkwqKSEiKjckJCIrPUJMTnohIiokIisiPWYicCYqISIqNyQkIitWLlNxeiEiKiQiK24jPSNHNSEiKTckJCIra3ZxLyEpISIqJCIrS1NVLzYhIik3JCQiK2s6IXouKSEiKiQiKyIzW189IiEiKTckJCIrVHl2dSEpISIqJCIrSC5rJUciISIpNyQkIitZWyh5NSkhIiokIitKUEQlUSIhIik3JCQiKzxWQlYiKSEiKiQiK01qZy46ISIpNyQkIitgX0Z2IikhIiokIis+XHlEOyEiKTckJCIrZ1dJNSMpISIqJCIrYWg5eTwhIik3JCQiKzhVRVYjKSEiKiQiK15SelY+ISIpNyQkIitfbXJ4IykhIiokIit0YUxZQCEiKTckJCIrNC1TNiQpISIqJCIraWUoPlEjISIpNyQkIityUG1ZJCkhIiokIishR08+byMhIik3JCQiK3RuaSFRKSEiKiQiK3ZldVRJISIpNyQkIitaKWVgVCkhIiokIitKZi44TiEiKTckJCIrQkwhKVwlKSEiKiQiK1ddek5UISIpNyQkIis9VVgiWykhIiokIit0WUZDXCEiKTckJCIrPChIeF4pISIqJCIrP2tLdWkhIik3JCQiK2JcPF0mKSEiKiQiK2MhenJGKSEiKTckJCIrWSRvWmUpISIqJCIrJD09ekMiISIoNyQkIishXEI4ZykhIiokIit6diNbayIhIig3JCQiK04neXloKSEiKiQiK2lqKXlTIyEiKDckJCIrP1N4RScpISIqJCIreiMqeS9LISIoNyQkIisrJXBjaikhIiokIitYdV8neSUhIig3JCQiKyE0PCxrKSEiKiQiK0RBZV9qISIoNyQkIisheWtYaykhIiokIitDaSEpUSUqISIoNyQkIitEJyl5WScpISIqJCIrWkZhWTchIic3JCQiK3FDLFwnKSEiKiQiK1Febk09ISInNyQkIishUkMsbCkhIiokIitYRyY0UyMhIic3JCQiKzpqQl4nKSEiKiQiKypvY0VaJCEiJzckJCIrUyNbQmwpISIqJCIrMCshPUYnISInNyQkIitpLFlgJykhIiokIis9byY+QiQhIiY3Z243JCQiK1VwTWEnKSEiKiQiK2Y6KylSIiEiJjckJCIrXU5FYicpISIqJCIrV1d3TmMhIic3JCQiK2IsPWMnKSEiKiQiKzJ0UkhOISInNyQkIitnbjRkJykhIiokIitFM0NwRCEiJzckJCIrcUwsZScpISIqJCIrYz4iKT4/ISInNyQkIishZVkpZicpISIqJCIrUyIpejk5ISInNyQkIismeno7bSkhIiokIitqJlEoKTMiISInNyQkIis/aU1sJykhIiokIisnZT1JWCghIig3JCQiK1hFLHAnKSEiKiQiK256Qm1jISIoNyQkIismXFhqbikhIiokIitMLVhJUSEiKDckJCIrXCR5T28pISIqJCIrKm96TSpHISIoNyQkIisrKlFrcCkhIiokIitvLygpSD8hIig3JCQiK10lKj40KCkhIiokIit3VVRqOiEiKDckJCIrJ2YrenQpISIqJCIrRzhqSTUhIig3JCQiKyQqPnptKCkhIiokIispNFwxbighIik3JCQiK3VnYSZ6KSEiKiQiKy16QDVoISIpNyQkIisoeS9BIykpISIqJCIrVSdbbTgmISIpNyQkIitUJDMpXCkpISIqJCIrTnQ8MFchIik3JCQiK3dmTnkpKSEiKiQiK0dCYk5RISIpNyQkIitlPyJvISopISIqJCIrcVZnJFIkISIpNyQkIitQRTNPKikhIiokIishKm8sSUkhIik3JCQiK3lUJz0nKikhIiokIitMcFpsRiEiKTckJCIrKDMpKTMqKikhIiokIiszJzNYXiMhIik3JCQiK3I2Lj8hKiEiKiQiK0ZQJzRJIyEiKTckJCIrTGY2WyEqISIqJCIrVmtqQkAhIik3JCQiKyhlPk8yKiEiKiQiK15CLSMpPiEiKTckJCIrKiplJVI1KiEiKiQiK2VxPEw9ISIpNyQkIitqaWpIIiohIiokIishKWUkM3MiISIpNyQkIitqLV9mIiohIiokIisoKnlJLjshIik3JCQiK25FKGY9KiEiKiQiK28iUiM0OiEiKTckJCIrWl4qXEAqISIqJCIrX3I4OjkhIik3JCQiKzY5alUjKiEiKiQiK3hrNkw4ISIpNyQkIitgcFlyIyohIiokIitOS0phNyEiKTckJCIrIylwJXpIKiEiKiQiK3YmUnM9IiEiKTckJCIrciM0bEsqISIqJCIrTU4lKT42ISIpNyQkIitpdTxjJCohIiokIisjKTRnYTUhIik3JCQiKzRQKyNRKiEiKiQiK1ZRRyw1ISIpNyQkIitqbiopNCUqISIqJCIrInBWInAlKiEiKjckJCIrPUlyUSUqISIqJCIrS0doUSopISIqNyQkIissVCFwWSohIiokIiskcD1vVykhIio3JCQiK0MvPSVcKiEiKiQiK2shUVEqeiEiKjckJCIrSWhZQyYqISIqJCIrOnhQOXYhIio3JCQiKyU9ejtiKiEiKiQiK3MnUkM1KCEiKjckJCIrRlx0IWUqISIqJCIrLkBEIW8nISIqNyQkIitcUDEyJyohIiokIisicF89SichIio3JCQiKzEiW2VqKiEiKiQiK2UjXEgjZiEiKjckJCIrVj4kSG0qISIqJCIrb2EkKm9iISIqNyQkIitjQkMicCohIiokIistPioqNF8hIio3JCQiK2Y0Iyo9KCohIiokIisjeUoqb1shIio3JCQiKyMqeSp5dSohIiokIislPl03XyUhIio3JCQiK0FoIWV4KiEiKiQiK1wmM1g+JSEiKjckJCIrPWpNLykqISIqJCIrJCo9cm5RISIqNyQkIisoPV1FJCkqISIqJCIrcy85XU4hIio3JCQiKy8mZSdlKSohIiokIishXCtNRSQhIio3JCQiK3BwWSkpKSohIiokIisrLi1TSCEiKjckJCIrOyFHXiIqKiEiKiQiK3U8JVxsIyEiKjckJCIrX1ViVioqISIqJCIrQHhxYUIhIio3JCQiKyl5aDIoKiohIiokIitZXVNxPyEiKjckJCIjNSIiISQiK3Jqa248ISIqLUknQ09MT1VSRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiNiZJJFJHQkc2IiQiKisrKysiISIpJCIiISIiISQiIiEiIiEtSSZUSVRMRUc2JCUqcHJvdGVjdGVkR0koX3N5c2xpYkc2IjYjSTVjb25kKEJlc3NlbEooMCx4KSx4KUc2Ii1JK0FYRVNMQUJFTFNHNiQlKnByb3RlY3RlZEdJKF9zeXNsaWJHNiI2JFEieDYiUSE2Ii1JJVZJRVdHNiQlKnByb3RlY3RlZEdJKF9zeXNsaWJHNiI2JDskIiIhIiIhJCIjNSIiITskIiIhIiIhJCIjNSIiIQ==

The Bernoulli generating function. f := x -> x / ( exp(x) - 1 ) ;

Zio2I0kieEc2IkYlNiRJKW9wZXJhdG9yR0YlSSZhcnJvd0dGJUYlKiY5JCIiIiwmLUkkZXhwRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliR0YlNiNGKkYrISIiRitGM0YlRiVGJQ==

Plot the Bernoulli generating function. plot( f(x), x=-10..10, y=0..10, discont=true, title=`f(x)`, color=red );

NiYtSSdDVVJWRVNHNiQlKnByb3RlY3RlZEdJKF9zeXNsaWJHNiI2JDdTNyQkISM1IiIhJCIzaTQ1Kj5TWCsrIiEjOzckJCEzInBtbW0icDBrJiohIzwkIjNDUidIOFZHWmMqISM8NyQkITN1S0wkMzxYWj0qISM8JCIzJm84M1NiKG8mPSohIzw3JCQhM1htbW1UJXAiZSgpISM8JCIzLF0qcHY+WSZmKCkhIzw3JCQhMy9ubW0iNG0oRyQpISM8JCIzM29NK0J4eEkkKSEjPDckJCEzT0xMJDNpLjkheiEjPCQiM2goSEEoKikqSFYheiEjPDckJCEzZm1tOy9SPTB2ISM8JCIzcVdlejlkSjR2ISM8NyQkITNrKytdUDgjXDQoISM8JCIzWypRKSk+MzUzNSghIzw3JCQhM0ttbTsvc2lxbSEjPCQiM1c1QE5ZTzR6bSEjPDckJCEzUSoqKipcKHkkcFppISM8JCIzUzNEJm8mZiEpZmkhIzw3JCQhM2pLTEwkeWFFImUhIzwkIjNTO2syP1AzSWUhIzw3JCQhMzxtbW0iPnMlSGEhIzwkIjNJYCJcNWAoUWBhISM8NyQkITNdKioqKioqXCQqNCkqXCEjPCQiMz1mJEdKbnA/LiYhIzw3JCQhM3AqKioqKipcXyZcYyUhIzwkIjNUKlFHQCV6KEhoJSEjPDckJCEzJCkqKioqKipcMWFaVCEjPCQiMzEtJ0dfbFBUQCUhIzw3JCQhM0ltbTsvIylbb1AhIzwkIjNAYmZ0aXJhZFEhIzw3JCQhMyVITExMPWV4SiQhIzwkIjMkZnFceVEkXFVNISM8NyQkITNsS0xMTDIkZiRIISM8JCIzIykqKj5pKXo0MDUkISM8NyQkITMlKSoqKipcUFl4IlwjISM8JCIzP1NOem0jNG1yIyEjPDckJCEzZ0xMTEw3aSk0IyEjPCQiM19XSndESCQ+UiMhIzw3JCQhM24pKioqXFAncHNtIiEjPCQiM1AhcF9IdzpfMCMhIzw3JCQhMz8qKioqXDc0X2M3ISM8JCIzVyVmeisiUlxjPCEjPDckJCEzTTpMTCQzeCV6IykhIz0kIjMhW1ZBRVljL1oiISM8NyQkITMoKUhMTDNzJFFNJSEjPSQiMykqeXhZTG4nR0IiISM8NyQkITNcXm9tbTt6cikqISM/JCIzMihwVW8sV1wrIiEjPDckJCIzZlZMTGV6dzVWISM9JCIzQ2Raa0dYKiopKnohIz03JCQiMy4uKyt2JFEjXCIpISM9JCIzWDNbcGAhb0ZaJyEjPTckJCIzJVxMTCRlIipbSDchIzwkIjMpKipHdTgmM2kiMyYhIz03JCQiMz4rKysrZHhkOyEjPCQiMyVlYmZXPUhHIVIhIz03JCQiM2YrKytEMHh3PyEjPCQiM1xFPTh6cSllKEghIz03JCQiMzUsK11pJnBAWyMhIzwkIjNAJTQmb2hrRWpBISM9NyQkIjMrKysrdmdIS0ghIzwkIjNjMFEkKlJgMl07ISM9NyQkIjNFbG1tbVp2T0whIzwkIjM2VjwvJm88K0IiISM9NyQkIjMmNCsrK3YrJ29QISM8JCIzajZ5SF9lODAqKSEjPjckJCIzVUtMJGVSPCpmVCEjPCQiM2VGXkdwIjRoZichIz43JCQiM0wtKytdKUh4ZSUhIzwkIjNdbllxUXRWO1ohIz43JCQiMyFmbW0iSCFvLSpcISM8JCIzbk5qL2QiZSY9TSEjPjckJCIzWCwrXTdrLjZhISM8JCIzY25DMSM0Z3pVIyEjPjckJCIzI2VtbW1UOUMjZSEjPCQiMylIZ1xaLDkpRzwhIz43JCQiMzMqKioqXGkhKjNgaSEjPCQiMzFLXiYqUnVzMDchIz43JCQiMzxOTExMKnp5bSchIzwkIjMlenYrTCVwRSdbKSEjPzckJCIzKWVMTCQzTjEjNCghIzwkIjMwMlpGT0dCLmYhIz83JCQiMyxwbTtIWXQ3diEjPCQiMytpJW9kY1FbNSUhIz83JCQiMzctKysreEcqKnkhIzwkIjNXPiZ6YlIleUpIISM/NyQkIjNncG1tVDZLVSQpISM8JCIzZURfVEs0eCgpPiEjPzckJCIzcU5MTExiZFEoKSEjPCQiMyczdCJ6aDcnM1MiISM/NyQkIjNbKytdaWAxaCIqISM8JCIzVHosW1JZekMnKiEjQDckJCIzQC0rXVA/V2wmKiEjPCQiMyI0R11sSUFvcSchI0A3JCQiIzUiIiEkIjNRdyhvNDUqPlNYISNALUknQ09MT1VSRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliRzYiNiZJJFJHQkc2IiQiKisrKysiISIpJCIiISIiISQiIiEiIiEtSSZUSVRMRUc2JCUqcHJvdGVjdGVkR0koX3N5c2xpYkc2IjYjSSVmKHgpRzYiLUkrQVhFU0xBQkVMU0c2JCUqcHJvdGVjdGVkR0koX3N5c2xpYkc2IjYkUSJ4NiJRInk2Ii1JJVZJRVdHNiQlKnByb3RlY3RlZEdJKF9zeXNsaWJHNiI2JDskISM1IiIhJCIjNSIiITskIiIhIiIhJCIjNSIiIQ==

Determine the relative condition number. 'cond(f(x),x)' = simplify( cond(f(x),x) );

Ly1JJWNvbmRHNiI2JC1JImZHRiU2I0kieEdGJUYqLUkkYWJzRyUqcHJvdGVjdGVkRzYjKiYsKC1JJGV4cEc2JEYtSShfc3lzbGliR0YlRikhIiIiIiJGNiomRipGNkYxRjZGNkY2LCZGMUY2RjVGNkY1

Plot the condition number. plot( cond(f(x),x), x=-10..10, discont=true, title=`cond(f(x),x)`, color=red );

NiYtSSdDVVJWRVNHNiQlKnByb3RlY3RlZEdJKF9zeXNsaWJHNiI2JDdVNyQkISM1IiIhJCIzU0ohKiozISlmYSoqKiEjPTckJCEzInBtbW0icDBrJiohIzwkIjNndi1QYFtHJCoqKiEjPTckJCEzdUtMJDM8WFo9KiEjPCQiMyN5Jz5Eb2hkISoqKiEjPTckJCEzWG1tbVQlcCJlKCkhIzwkIjN6ZXInNFdLaSkqKiEjPTckJCEzL25tbSI0bShHJCkhIzwkIjNiKik+aidvJCkpeioqISM9NyQkITNPTEwkM2kuOSF6ISM8JCIzJz5PNTZKTzIoKiohIz03JCQhM2ZtbTsvUj0wdiEjPCQiM1ZDIzNQKj1vZSoqISM9NyQkITNrKytdUDgjXDQoISM8JCIzZTVoNmJENlQqKiEjPTckJCEzS21tOy9zaXFtISM8JCIzQGpiOXliTDoqKiEjPTckJCEzUSoqKipcKHkkcFppISM8JCIzczRcWjEkeSl5KSohIz03JCQhM2pLTEwkeWFFImUhIzwkIjMqeTpwRGo1ZCMpKiEjPTckJCEzPG1tbSI+cyVIYSEjPCQiM25HXjwxbSUzdyohIz03JCQhM10qKioqKipcJCo0KSpcISM8JCIzVDBrcm9uSGcnKiEjPTckJCEzcCoqKioqKlxfJlxjJSEjPCQiM2QraHJ5SXg+JiohIz03JCQhMyQpKioqKioqXDFhWlQhIzwkIjMoKXpScloqSFNMKiEjPTckJCEzSW1tOy8jKVtvUCEjPCQiMyYzNjJWVDUlNCIqISM9NyQkITMlSExMTD1leEokISM8JCIzN3FpJFsmemtfKCkhIz03JCQhM2xLTExMMiRmJEghIzwkIjNfSUw2WiQ0VU4pISM9NyQkITMlKSoqKipcUFl4IlwjISM8JCIzVyhma3FxYDt2KCEjPTckJCEzZ0xMTEw3aSk0IyEjPCQiM24qKT1xdkkpbzEoISM9NyQkITNuKSoqKlxQJ3BzbSIhIzwkIjM9JTN0YXVRMDcnISM9NyQkITM/KioqKlw3NF9jNyEjPCQiM2FZUz9DK0YrXSEjPTckJCEzTTpMTCQzeCV6IykhIz0kIjN4bCozclg3XGQkISM9NyQkITMoKUhMTDNzJFFNJSEjPSQiMyxSYmx0KXBeLCMhIz03JCQhMz4qKioqXGl2RkBBISM9JCIzKHplI3lxX2JwNSEjPTckJCEzXF5vbW07enIpKiEjPyQiM2Qqb3BSI1t4RlwhIz83JCQiM2FQTCQzLURnNSMhIz0kIjN4MDMhXFJZKiozIiEjPTckJCIzZlZMTGV6dzVWISM9JCIzTCk0eXBbaSg0QiEjPTckJCIzLi4rK3YkUSNcIikhIz0kIjM6OFtwR2srQVkhIz03JCQiMyVcTEwkZSIqW0g3ISM8JCIzSFF3cU1DXnd0ISM9NyQkIjM+KysrK2R4ZDshIzwkIjNcYmZXPSdlIVs1ISM8NyQkIjNmKysrRDB4dz8hIzwkIjN0JD04SEJmVlAiISM8NyQkIjM1LCtdaSZwQFsjISM8JCIzcjUmbyczaVwzPCEjPDckJCIzKysrK3ZnSEtIISM8JCIzSyFRJCoqM09JKDQjISM8NyQkIjNFbG1tbVp2T0whIzwkIjM5UzM8Tmx2ZkMhIzw3JCQiMyY0Kysrdisnb1AhIzwkIjN6ekhfM0BsZEchIzw3JCQiM1VLTCRlUjwqZlQhIzwkIjNuJD1Fdlt5ZUEkISM8NyQkIjNMLSsrXSlIeGUlISM8JCIzIylccVFCVSpbaiQhIzw3JCQiMyFmbW0iSCFvLSpcISM8JCIzW0lydDVPWENTISM8NyQkIjNYLCtdN2suNmEhIzwkIjN3RDFVOGdKTlchIzw3JCQiMyNlbW1tVDlDI2UhIzwkIjMlPTs5b2ItKFJbISM8NyQkIjMzKioqKlxpISozYGkhIzwkIjNmXSYqKm9MWV5FJiEjPDckJCIzPE5MTEwqenltJyEjPCQiMydmanctP21qbiYhIzw3JCQiMyllTEwkM04xIzQoISM8JCIzISkzJ3A2dW16NCchIzw3JCQiMyxwbTtIWXQ3diEjPCQiM1xSQ3RuJVJvXichIzw3JCQiMzctKysreEcqKnkhIzwkIjMoPmUmUiVbPkEhcCEjPDckJCIzZ3BtbVQ2S1UkKSEjPCQiMy0mMypmNyozVk0oISM8NyQkIjNxTkxMTGJkUSgpISM8JCIzbEZeZiVSdypSeCEjPDckJCIzWysrXWlgMWgiKiEjPCQiM1BcUic+JXktaSIpISM8NyQkIjNALStdUD9XbCYqISM8JCIzImZsSSg+RjZtJikhIzw3JCQiIzUiIiEkIjMoejQ1Kj5TWCshKiEjPC1JJ0NPTE9VUkc2JCUqcHJvdGVjdGVkR0koX3N5c2xpYkc2IjYmSSRSR0JHNiIkIiorKysrIiEiKSQiIiEiIiEkIiIhIiIhLUkmVElUTEVHNiQlKnByb3RlY3RlZEdJKF9zeXNsaWJHNiI2I0ktY29uZChmKHgpLHgpRzYiLUkrQVhFU0xBQkVMU0c2JCUqcHJvdGVjdGVkR0koX3N5c2xpYkc2IjYkUSJ4NiJRITYiLUklVklFV0c2JCUqcHJvdGVjdGVkR0koX3N5c2xpYkc2IjYkOyQhIzUiIiEkIiM1IiIhSShERUZBVUxURzYi