f1:=(x)->-x+1; f2:=(x)->x^2-1;

NiM+SSNmMUc2ImYqNiNJInhHRiVGJTYkSSlvcGVyYXRvckdGJUkmYXJyb3dHRiVGJSwmOSQhIiIiIiJGL0YlRiVGJQ==

NiM+SSNmMkc2ImYqNiNJInhHRiVGJTYkSSlvcGVyYXRvckdGJUkmYXJyb3dHRiVGJSwmKiQ5JCIiIyIiIiEiIkYwRiVGJUYl

plot({f1,f2}, -3..2, y=-2..3);

LSUlUExPVEc2Ji0lJ0NVUlZFU0c2JTdTNyQkISIkIiIhJCIiJUYsNyQkITNzbW07SFUsIipHISM8JCIzc21tO0hVLCIqUUYyNyQkITM9TCQzRkgnPSd6I0YyJCIzPUwkM0ZIJz0neiRGMjckJCEzZ21tVGdCYSpvI0YyJCIzZ21tVGdCYSpvJEYyNyQkITN3bW0iSF8iPiNlI0YyJCIzd21tIkhfIj4jZSRGMjckJCEzTUwkM18hNE52Q0YyJCIzTUwkM18hNE52TUYyNyQkITMnb21UZyhmSHdCRjIkIjMnb21UZyhmSHdMRjI3JCQhMzsrXVBNLnR0QUYyJCIzOytdUE0udHRLRjI3JCQhMyFvbVQ1IW9sbkBGMiQiMyFvbVQ1IW9sbkpGMjckJCEzJSkqKlwob1dCPjEjRjIkIjMlKSoqXChvV0I+MSRGMjckJCEzO0xMJGVwakomPkYyJCIzO0xMJGVwakomSEYyNyQkITNhbW0iei9vdCY9RjIkIjNLbW0iei9vdCZHRjI3JCQhMykpKioqKlxQW19cPEYyJCIzNSsrXVBbX1xGRjI3JCQhMyMqKioqKlw3KVE3ayJGMiQiMzkrK103KVE3ayNGMjckJCEzJyoqKioqXGleKW9gIkYyJCIzJyoqKioqXGleKW9gI0YyNyQkITNkbTsvXj83VTlGMiQiM05tOy9ePzdVQ0YyNyQkITNDTEwkZWFSJUg4RjIkIjMtTEwkZWFSJUhCRjI3JCQhMzxMTEwkbyMpUkIiRjIkIjM8TExMJG8jKVJCI0YyNyQkITMnKioqXFBmTyVINyJGMiQiMz0rXVBmTyVINyNGMjckJCEzU0xMTDNgbEM1RjIkIjM9TExMM2BsQz9GMjckJCEzcScqKlxQNHUibyIqISM9JCIzbioqXFA0dSJvIj5GMjckJCEzKnoqKlw3Ry04OSlGXHIkIjMhKSoqXDdHLTg5PUYyNyQkITMlKUdMJDNGcClwcUZcciQiMylHTCQzRnApcHEiRjI3JCQhM1lLTDMtJGZmMydGXHIkIjNETCQzLSRmZjM7RjI3JCQhMzhubTt6JXpZLSZGXHIkIjNybW0ieiV6WS06RjI3JCQhMzVrbVQ1ITNCI1JGXHIkIjNTbTsvLDNCI1IiRjI3JCQhM0MqKipcaVMhcGlIRlxyJCIzIyoqKlxpUyFwaUgiRjI3JCQhM2xpbTsvckZFPkZcciQiM0VtbVQ1eGkjPiJGMjckJCEzUSYqKioqKipcMmNiKSEjPiQiMycqKioqKipcMmNiMyJGMjckJCIzdDkrK0RKRT4+RmV0JCIzYCkqKipcKG90ITMpKkZccjckJCIzdC0rRDFSVTA3RlxyJCIzRSgqKlxQNHdYeilGXHI3JCQiMysrK10oPVMyTCNGXHIkIjMrKytdNylmI3B3RlxyNyQkIjM6am1tO3ApPU0kRlxyJCIzJW9MTEwzOCJlbUZccjckJCIzTy0rK3Y9XUBXRlxyJCIzaygqKioqXDcpXHliRlxyNyQkIjMvSkxlKlskeipSJkZcciQiMyYqb21UNWw/K1lGXHI3JCQiMyNlKytdaUMkcGtGXHIkIjM9JSoqKipcUHYxYCRGXHI3JCQiM3VrbSJIMnFjWihGXHIkIjNFTkwzRipIVl8jRlxyNyQkIjNpLitESjVmRiYpRlxyJCIzUScqKlwobyozQ1oiRlxyNyQkIjNha21tVGcuYyYqRlxyJCIzamFMTCRlUidSV0ZldDckJCIzdyoqXGlsQUZqNUYyJCEzJW8oKipcaWxBRmpGZXQ3JCQiM3lMTEwkKSpwcDsiRjIkITMlekxMTCQpKnBwO0ZccjckJCIzKVJMJDN4ZSx0N0YyJCEzcFJMJDN4ZSx0I0ZccjckJCIzQ247SGRPPXk4RjIkITNfc20iSGRPPXkkRlxyNyQkIjNhKysrRD4jW1oiRjIkITNNMCsrXSM+I1taRlxyNyQkIjNTbm1UJkchZSZlIkYyJCEzLXVtO2FHIWUmZUZccjckJCIzI1JMTEwpUWslbyJGMiQhM0NSTExMKVFrJW9GXHI3JCQiMzcrXWlTakUheiJGMiQhMz4sK0QxTW0tekZccjckJCIzYStdUDQwTyIqPUYyJCEzYTArdiQ0ME8iKilGXHI3JCQiIiNGLCQhIiJGLDdTNyRGKiQiIilGLDckRjAkIjNZT1RDdEsnek4oRjI3JEY2JCIzVnMqSE55ZCc9b0YyNyRGOyQiM0RhY1ozIlFPQidGMjckRkAkIjNXJXBBNTE4eG0mRjI3JEZFJCIzIVxyOlI1aXQ3JkYyNyRGSiQiMyF5Ij12bER5WVlGMjckRk8kIjNpXHFYTCdcKXBURjI3JEZUJCIzJz4+LXIrTygpcCRGMjckRlkkIjMjKnpHeCskRzpEJEYyNyRGaG4kIjMyRDhzQSVbWyJHRjI3JEZdbyQiM21vPFVsZyIpXENGMjckRmJvJCIzJTNTSHE6UDMxI0YyNyRGZ28kIjN5NGtsUlttJHAiRjI3JEZccCQiMzVeRXItZyxpOEYyNyRGYXAkIjNNQjE1NWdyejVGMjckRmZwJCIzYyNSYi0xJjR1d0ZccjckRltxJCIzIz1MbHdpS3JBJkZccjckRmBxJCIzTGdeSUBZLTVFRlxyNyRGZXEkIjMjPid5YyozXT0qXEZldDckRmpxJCEzVVUicCd5JGVXZiJGXHI3JEZgciQhM1lkOGA7KD4+UCRGXHI3JEZlciQhM3RnRUxcW3AsXUZccjckRmpyJCEzU04mUXQkKjRoSCdGXHI3JEZfcyQhMzdSVDs4J2ZfWihGXHI3JEZkcyQhM09GQDkoKSpcOlkpRlxyNyRGaXMkITNpQDluYmxDQSIqRlxyNyRGXnQkITM2SWp6XmMlKkcnKkZccjckRmN0JCEzJlIlZkkhZSxvIyoqRlxyNyRGaXQkITMrOnEwSGtKJyoqKkZccjckRl51JCEzTyk0QzFLJnBhKSpGXHI3JEZjdSQhM1dZcyR5LGxuWCpGXHI3JEZodSQhMz09N2kkPXpKKSkpRlxyNyRGXXYkITNQWXIkcDZLXS8pRlxyNyRGYnYkITMpeU0mKXAtQlUzKEZccjckRmd2JCEzQWFvaiopUXk5ZUZccjckRlx3JCEzIVwiKSozJ3BOOVQlRlxyNyRGYXckITNyXFdQPyI+IUdGRlxyNyRGZnckITMjM3FuLjx2QG8pRmV0NyRGW3gkIjMiKSo+dCUzInphSSJGXHI3JEZgeCQiMylSLDUrVSo9PU9GXHI3JEZleCQiM3oqXGlJQiVwMGlGXHI3JEZqeCQiMylvTmVBJD4hUioqKUZccjckRl95JCIzLzIyWTUoKjR2NkYyNyRGZHkkIjNRKz9dVFsxOTpGMjckRml5JCIzbTpDbDhdLVE9RjI3JEZeeiQiMzNIW1BxTjAwQUYyNyRGY3okIjNXaEtVd1hDeERGMjckRmh6JCIiJEYsLSUmQ09MT1JHNiklJFJHQkckIiM1RltbbCRGLEZbW2xGZmRsRmZkbEZkZGxGZmRsLSUrQVhFU0xBQkVMU0c2JFEhNiJRInlGW2VsLSUlRk9OVEc2JCUqSEVMVkVUSUNBR0ZlZGwtJSVWSUVXRzYkOyQhI0lGW1tsJCIjP0ZbW2w7JCEjP0ZbW2wkIiNJRltbbA==

with(plots); F:=(int(x-1 + x^2-1, x=-1..1));

Warning, the name changecoords has been redefined

NiM3WkkoYW5pbWF0ZUc2IkkqYW5pbWF0ZTNkR0YlSS1hbmltYXRlY3VydmVHRiVJJmFycm93R0YlSS1jaGFuZ2Vjb29yZHNHSShfc3lzbGliR0YlSSxjb21wbGV4cGxvdEdGJUkuY29tcGxleHBsb3QzZEdGJUkqY29uZm9ybWFsR0YlSSxjb25mb3JtYWwzZEdGJUksY29udG91cnBsb3RHRiVJLmNvbnRvdXJwbG90M2RHRiVJKmNvb3JkcGxvdEdGJUksY29vcmRwbG90M2RHRiVJLWN5bGluZGVycGxvdEdGJUksZGVuc2l0eXBsb3RHRiVJKGRpc3BsYXlHRiVJKmRpc3BsYXkzZEdGJUkqZmllbGRwbG90R0YlSSxmaWVsZHBsb3QzZEdGJUkpZ3JhZHBsb3RHRiVJK2dyYWRwbG90M2RHRiVJLGdyYXBocGxvdDNkR0YlSS1pbXBsaWNpdHBsb3RHRiVJL2ltcGxpY2l0cGxvdDNkR0YlSShpbmVxdWFsR0YlSSxpbnRlcmFjdGl2ZUdGJUktbGlzdGNvbnRwbG90R0YlSS9saXN0Y29udHBsb3QzZEdGJUkwbGlzdGRlbnNpdHlwbG90R0YlSSlsaXN0cGxvdEdGJUkrbGlzdHBsb3QzZEdGJUkrbG9nbG9ncGxvdEdGJUkobG9ncGxvdEdGJUkrbWF0cml4cGxvdEdGJUkob2RlcGxvdEdGJUkncGFyZXRvR0YlSSxwbG90Y29tcGFyZUdGJUkqcG9pbnRwbG90R0YlSSxwb2ludHBsb3QzZEdGJUkqcG9sYXJwbG90R0YlSSxwb2x5Z29ucGxvdEdGJUkucG9seWdvbnBsb3QzZEdGJUk0cG9seWhlZHJhX3N1cHBvcnRlZEdGJUkucG9seWhlZHJhcGxvdEdGJUkncmVwbG90R0YlSSpyb290bG9jdXNHRiVJLHNlbWlsb2dwbG90R0YlSStzZXRvcHRpb25zR0YlSS1zZXRvcHRpb25zM2RHRiVJK3NwYWNlY3VydmVHRiVJMXNwYXJzZW1hdHJpeHBsb3RHRiVJK3NwaGVyZXBsb3RHRiVJKXN1cmZkYXRhR0YlSSl0ZXh0cGxvdEdGJUkrdGV4dHBsb3QzZEdGJUkpdHViZXBsb3RHRiU=

NiM+SSJGRzYiIyEjNSIiJA==

F:=int ( int (1, y=x^2-1..1-x), x=-1..1); XS:=int ( int (x, y=x^2-1..1-x), x=-1..1) / F; XS:=int ( int (y, y=x^2-1..1-x), x=-1..1) / F;

NiM+SSJGRzYiIyIjNSIiJA==

NiM+SSNYU0c2IiMhIiIiIiY=

NiM+SSNYU0c2IiMiIiciI0Q=

restart: with(plots);

Warning, the name changecoords has been redefined

f1:=(x)->cos(x); f2:=(x)->(x^2/4)-1; f3:=(x)->2-x; f4:=(x)-> -1/(Pi/2)*x-1; f5:=(x)->1;

NiM+SSNmMUc2ImYqNiNJInhHRiVGJTYkSSlvcGVyYXRvckdGJUkmYXJyb3dHRiVGJS1JJGNvc0dGJTYjOSRGJUYlRiU=

NiM+SSNmMkc2ImYqNiNJInhHRiVGJTYkSSlvcGVyYXRvckdGJUkmYXJyb3dHRiVGJSwmKiQ5JCIiIyMiIiIiIiUhIiJGMUYlRiVGJQ==

NiM+SSNmM0c2ImYqNiNJInhHRiVGJTYkSSlvcGVyYXRvckdGJUkmYXJyb3dHRiVGJSwmIiIjIiIiOSQhIiJGJUYlRiU=

NiM+SSNmNEc2ImYqNiNJInhHRiVGJTYkSSlvcGVyYXRvckdGJUkmYXJyb3dHRiVGJSwmKiZJI1BpR0kqcHJvdGVjdGVkR0YvISIiOSQiIiIhIiNGMEYyRiVGJUYl

NiM+SSNmNUc2ImYqNiNJInhHRiVGJTYkSSlvcGVyYXRvckdGJUkmYXJyb3dHRiVGJSIiIkYlRiVGJQ==

plot({f1,f2,f3,f4,f5}, -3..2, y=-2..2);

LSUlUExPVEc2Ji0lJ0NVUlZFU0c2KDdTNyQkISIkIiIhJCIzT1N1LXJKZik0KiEjPTckJCEzc21tO0hVLCIqRyEjPCQiM09BXyRbP29aUylGLzckJCEzPUwkM0ZIJz0neiNGMyQiM1MvTGg2WzIseUYvNyQkITNnbW1UZ0JhKm8jRjMkIjMleUQ5RVhlQDcoRi83JCQhM3dtbSJIXyI+I2UjRjMkIjNEbXFHJnpUKFFrRi83JCQhM01MJDNfITROdkNGMyQiMyNmOk8hKUh0JmVkRi83JCQhMydvbVRnKGZId0JGMyQiMydbWGNNLnF6NyZGLzckJCEzOytdUE0udHRBRjMkIjNzczImKnlvLHZXRi83JCQhMyFvbVQ1IW9sbkBGMyQiM3dhPV0jekooKnokRi83JCQhMyUpKipcKG9XQj4xI0YzJCIzJDNUKilRTjdtNyRGLzckJCEzO0xMJGVwakomPkYzJCIzUy8vUXVpQU1DRi83JCQhM2FtbSJ6L290Jj1GMyQiM1ZyX25RQVBDPUYvNyQkITMpKSoqKipcUFtfXDxGMyQiM2QnejEhUTUjeTgiRi83JCQhMyMqKioqKlw3KVE3ayJGMyQiMyN5JiplOSN6XSVbJSEjPjckJCEzJyoqKioqXGleKW9gIkYzJCEzPXNPVHA8JillQEZccDckJCEzZG07L14/N1U5RjMkITMnKm8lZVIiKWU7PilGXHA3JCQhM0NMTCRlYVIlSDhGMyQhM3VFN2IqKVxfTzpGLzckJCEzPExMTCRvIylSQiJGMyQhM0BpekldQUFXQEYvNyQkITMnKioqXFBmTyVINyJGMyQhMzsob3E9aj02JkdGLzckJCEzU0xMTDNgbEM1RjMkITNzJCpmYDM8JW9aJEYvNyQkITNxJyoqXFA0dSJvIipGLyQhM1M/MFQmNGZMOyVGLzckJCEzKnoqKlw3Ry04OSlGLyQhM1BiXCRcKmYzPFtGLzckJCEzJSlHTCQzRnApcHFGLyQhM21GTjhNOT0qXCZGLzckJCEzWUtMMy0kZmYzJ0YvJCEzWlckcFcoemJEaEYvNyQkITM4bm07eiV6WS0mRi8kITM/ZUd2JHAqPSxvRi83JCQhMzVrbVQ1ITNCI1JGLyQhM0MtSURuNilIXShGLzckJCEzQyoqKlxpUyFwaUhGLyQhMzEzdih6cSMqUTYpRi83JCQhM2xpbTsvckZFPkYvJCEzIVtgRyUzUnB0KClGLzckJCEzUSYqKioqKipcMmNiKUZccCQhMzNqJCkzNUpMYiUqRi83JCQiM3Q5KytESkU+PkZccCQhMzY1dmAzJT1BLCJGMzckJCIzdC0rRDFSVTA3Ri8kITNzSi5HcCdSbjIiRjM3JCQiMysrK10oPVMyTCNGLyQhM1lBOXdHJnokWzZGMzckJCIzOmptbTtwKT1NJEYvJCEzLmBtIilHNnY3N0YzNyQkIjNPLSsrdj1dQFdGLyQhM2lMJj08YiJbIkciRjM3JCQiMy9KTGUqWyR6KlImRi8kITNwW3FASTp3VjhGMzckJCIzI2UrK11pQyRwa0YvJCEzSlxSLCgqKlw9VCJGMzckJCIzdWttIkgycWNaKEYvJCEzd006LFFmImZaIkYzNyQkIjNpLitESjVmRiYpRi8kITNaP2U2MUwpR2EiRjM3JCQiM2FrbW1UZy5jJipGLyQhM2xCI2UqW2hOMztGMzckJCIzdyoqXGlsQUZqNUYzJCEzJSlccHFaLCFwbiJGMzckJCIzeUxMTCQpKnBwOyJGMyQhMzduJVxeOztIdSJGMzckJCIzKVJMJDN4ZSx0N0YzJCEzPDQiKil5MkYvIj1GMzckJCIzQ247SGRPPXk4RjMkITMlPXUmPW0qeXQoPUYzNyQkIjNhKysrRD4jW1oiRjMkITNfPWk8KXorKlE+RjM3JCQiM1NubVQmRyFlJmUiRjMkITNFJFtzLnc2JTQ/RjM3JCQiMyNSTExMKVFrJW8iRjMkITM3MCJHYmd4QzIjRjM3JCQiMzcrXWlTakUheiJGMyQhM2FJZ0NdKj0oUkBGMzckJCIzYStdUDQwTyIqPUYzJCEzKGVNVnBceFM/I0YzNyQkIiIjRiwkITMpSDtOWmFSS0YjRjM3UzckRiokIiIiRiw3JEYxRl5bbDckRjdGXltsNyRGPEZeW2w3JEZBRl5bbDckRkZGXltsNyRGS0ZeW2w3JEZQRl5bbDckRlVGXltsNyRGWkZeW2w3JEZpbkZeW2w3JEZeb0ZeW2w3JEZjb0ZeW2w3JEZob0ZeW2w3JEZecEZeW2w3JEZjcEZeW2w3JEZocEZeW2w3JEZdcUZeW2w3JEZicUZeW2w3JEZncUZeW2w3JEZcckZeW2w3JEZhckZeW2w3JEZmckZeW2w3JEZbc0ZeW2w3JEZgc0ZeW2w3JEZlc0ZeW2w3JEZqc0ZeW2w3JEZfdEZeW2w3JEZkdEZeW2w3JEZpdEZeW2w3JEZedUZeW2w3JEZjdUZeW2w3JEZodUZeW2w3JEZddkZeW2w3JEZidkZeW2w3JEZndkZeW2w3JEZcd0ZeW2w3JEZhd0ZeW2w3JEZmd0ZeW2w3JEZbeEZeW2w3JEZgeEZeW2w3JEZleEZeW2w3JEZqeEZeW2w3JEZfeUZeW2w3JEZkeUZeW2w3JEZpeUZeW2w3JEZeekZeW2w3JEZjekZeW2w3JEZoekZeW2w3UzckRiokITM5YVcrbVwjKioqKSpGLzckRjEkITMneXIkUl46cChvKkYvNyRGNyQhM3QzIzQsWHokNCUqRi83JEY8JCEzI2ZOdF0uTWIqKilGLzckRkEkITMxKj1OPXFJZFopRi83JEZGJCEzR0pCZGslKlxoeUYvNyRGSyQhMz0oUlBebG88QChGLzckRlAkITNxY0BgUicqZWtrRi83JEZVJCEzYG9CLURgWz9jRi83JEZaJCEzYSczOTUlMz87WkYvNyRGaW4kITMrZUFsKT56NnQkRi83JEZebyQhM1Z0JTQqUVVsRUdGLzckRmNvJCEzaTRZQUJbeXg8Ri83JEZobyQhM0Zmck9gVVVRcUZccDckRl5wJCIzMXVAXEBsWSFSJEZccDckRmNwJCIzRV8+VDlcPiRHIkYvNyRGaHAkIjNPYU8xLEk/IVIjRi83JEZdcSQiMyk0MnYhPVgiW0kkRi83JEZicSQiM0NaKm9QdDQuTCVGLzckRmdxJCIzbzlOWylvTVI+JkYvNyRGXHIkIjMjZU16W2UiXCQzJ0YvNyRGYXIkIjMvK2EvIyozLGxvRi83JEZmciQiM3lKdG5LWEEud0YvNyRGW3MkIjMoW0NaYWI6WD8pRi83JEZgcyQiMyF6NiNlS3AnUncpRi83JEZlcyQiMyQ9Nm1YTSdlUyMqRi83JEZqcyQiM1tFRyJINkNWYypGLzckRl90JCIzKGZSRyEqeVhdIikqRi83JEZkdCQiM0s7RHU0SlVqKipGLzckRml0JCIzYVRTMXIjZSIpKioqRi83JEZedSQiM149OFUhZk51IyoqRi83JEZjdSQiM3EiZmdiKSk0J0goKkYvNyRGaHUkIjMjSDZfJj50d1klKkYvNyRGXXYkIjMkeTU0dUFQJFEhKkYvNyRGYnYkIjNfeXJDJylIPngmKUYvNyRGZ3YkIjM9XlVYQFtPenpGLzckRlx3JCIzPC9Zc1A3WEx0Ri83JEZhdyQiMykzR0VId3ghemxGLzckRmZ3JCIzK3kyJkhBZjZ4JkYvNyRGW3gkIjMxNUhZMipbLCdbRi83JEZgeCQiMzFzMzEoeShSSFJGLzckRmV4JCIzOUB3JzRqISpSJEhGLzckRmp4JCIzXnd2JioqKipRVSI+Ri83JEZfeSQiMzVseEFjSnIjZSpGXHA3JEZkeSQhM3dsUFIzP015OUZccDckRml5JCEzZWY3QzZ5LE82Ri83JEZeeiQhM20lXFxJIVE3eEBGLzckRmN6JCEzJzRHOWhfPzU6JEYvNyRGaHokITMzQzlabCRvOTslRi83UzckRiokIjMrKysrKysrXTdGMzckRjEkIjM3TTVKPTNcKjMiRjM3JEY3JCIzM0pcIyllV2tZJipGLzckRjwkIjNpTiIqPXJfNCUzKUYvNyRGQSQiMzlPbmJfRUdwbUYvNyRGRiQiM0MoRyp5Zl9TPWBGLzckRkskIjNeVyZ6VlRjcDYlRi83JEZQJCIzMENFayQzQ1kjSEYvNyRGVSQiMyMqemF2PCslb3UiRi83JEZaJCIzdSgqPks+dj8pRydGXHA3JEZpbiQhM0B0byc+Vip5R1lGXHA3JEZebyQhM015YldPKWZhUCJGLzckRmNvJCEzIXpcRXU1MnpNI0YvNyRGaG8kITNfdiplMyF6JGVFJEYvNyRGXnAkITNBcyQ9SyoqZlw0JUYvNyRGY3AkITNqVCVbWigqNDIhW0YvNyRGaHAkITNJXmgkXEJ3OWUmRi83JEZdcSQhM1ttTzNWb0AkPidGLzckRmJxJCEzIyo0UG5XUVxab0YvNyRGZ3EkITNZLjN3WlA/dnRGLzckRlxyJCEzJ2VHbllmOScpKnlGLzckRmFyJCEzIilRRzhIKnpITSlGLzckRmZyJCEzPWxKTDdQVV0oKUYvNyRGW3MkITNlTFlMJVtGUzIqRi83JEZgcyQhMzFONUguXCIpbyQqRi83JEZlcyQhM0dKYnknXChROicqRi83JEZqcyQhMzlieSIqUTtjIXkqRi83JEZfdCQhMyg+M1xIVE9zISoqRi83JEZkdCQhMylmW3ddUis8KSoqRi83JEZpdCQhM3VgVUUyInohKioqKkYvNyRGXnUkITNnQ2c6SVFuaioqRi83JEZjdSQhM002JGZXRCI+aykqRi83JEZodSQhM0YvYCFmeiV6PygqRi83JEZddiQhM0onR00jSCFlN14qRi83JEZidiQhMylwTFludmI1RipGLzckRmd2JCEzYzgjNEMoZnBgKilGLzckRlx3JCEzK2FDLUMqZUdnKUYvNyRGYXckITNXN080IXkvPz0pRi83JEZmdyQhMyFHPmYjelYwPHhGLzckRlt4JCEzXSpwIilHQUlPPChGLzckRmB4JCEzMShcKCpca19hZidGLzckRmV4JCEzXXVWdFRrZFtmRi83JEZqeCQhM3k1YSRwXkM6RCZGLzckRl95JCEzUUsjW1FzXUFjJUYvNyRGZHkkITMwKipcQycqeSRbciRGLzckRml5JCEzJTMnKm9lWVBcIUhGLzckRl56JCEzSUZIMXVnTygpPkYvNyRGY3okITNTWT0lKmUmKSlvMCJGLzckRmh6JEYsRiw3UzckRiokIiImRiw3JEYxJCIzR21tO0hVLCIqW0YzNyRGNyQiM3VLJDNGSCc9J3olRjM3JEY8JCIzZ21tVGdCYSpvJUYzNyRGQSQiM0ttbSJIXyI+I2UlRjM3JEZGJCIzIVFMM18hNE52V0YzNyRGSyQiMydvbVRnKGZId1ZGMzckRlAkIjM7K11QTS50dFVGMzckRlUkIjMhb21UNSFvbG5URjM3JEZaJCIzUyoqXChvV0I+MSVGMzckRmluJCIzO0xMJGVwakomUkYzNyRGXm8kIjNLbW0iei9vdCZRRjM3JEZjbyQiMzUrK11QW19cUEYzNyRGaG8kIjM5KytdNylRN2skRjM3JEZecCQiMycqKioqKlxpXilvYCRGMzckRmNwJCIzTm07L14/N1VNRjM3JEZocCQiMy1MTCRlYVIlSExGMzckRl1xJCIzPExMTCRvIylSQiRGMzckRmJxJCIzPStdUGZPJUg3JEYzNyRGZ3EkIjM9TExMM2BsQ0lGMzckRlxyJCIzbioqXFA0dSJvIkhGMzckRmFyJCIzISkqKlw3Ry04OUdGMzckRmZyJCIzKUdMJDNGcClwcSNGMzckRltzJCIzREwkMy0kZmYzRUYzNyRGYHMkIjNybW0ieiV6WS1ERjM3JEZlcyQiM1NtOy8sM0IjUiNGMzckRmpzJCIzIyoqKlxpUyFwaUgjRjM3JEZfdCQiM0VtbVQ1eGkjPiNGMzckRmR0JCIzJyoqKioqKlwyY2IzI0YzNyRGaXQkIjMnKSoqKlwob3QhMyk+RjM3JEZedSQiM3MqKlxQNHdYej1GMzckRmN1JCIzKysrRCIpZiNwdyJGMzckRmh1JCIzb0xMTDM4ImVtIkYzNyRGXXYkIjN3KioqKlw3KVx5YiJGMzckRmJ2JCIzIXBtVDVsPytZIkYzNyRGZ3YkIjNVKioqKlxQdjFgOEYzNyRGXHckIjNfTCQzRipIVl83RjM3JEZhdyQiM2sqKlwobyozQ1o2RjM3JEZmdyQiM2JMTCRlUidSVzVGMzckRlt4JCIzSy0rdlZ0Rm4kKkYvNyRGYHgkIjMyaW1tbSxJSSQpRi83JEZleCQiM0tnbTtINyUpcHNGLzckRmp4JCIzW0ZMM0ZNOz1pRi83JEZfeSQiM20lKioqKipcMnleX0YvNyRGZHkkIjMqZktMZTkoPldURi83JEZpeSQiM3dnbW1tNmNgSkYvNyRGXnokIjMhKSkqKlxQZk90NCNGLzckRmN6JCIzWSUqKlxpIVxSJzMiRi9GZWBtLSUmQ09MT1JHNjIlJFJHQkckIiM1ISIiJEYsRl5qbUZfam1GX2ptRlxqbUZfam1GXGptRlxqbUZfam1GX2ptRl9qbUZcam1GXGptRl9qbUZcam0tJStBWEVTTEFCRUxTRzYkUSE2IlEieUZkam0tJSVGT05URzYkJSpIRUxWRVRJQ0FHRl1qbS0lJVZJRVdHNiQ7JCEjSUZeam0kIiM/Rl5qbTskISM/Rl5qbUZgW24=

#plot({f1,f3},{{-2..2,y=-2..2},{-2..2,y=-2..2}});

plot1:=plot(f1, -Pi/2..0): plot2:=plot(f2, 0..2): plot3:=plot(f3, 1..2): plot4:=plot(f4, -Pi/2..0): display({plot1,plot2,plot3,plot4});

LSUlUExPVEc2Ji0lJ0NVUlZFU0c2JzdTNyQkIiIiIiIhRio3JCQiM2htbTthcnpANSEjPCQiMyFSTEwkZSVHP3kqISM9NyQkIjNPTCRlOXVpMi8iRjAkIjNPbW1UJmVzQmYqRjM3JCQiM3NtbSJ6XyI0aTVGMCQiM3lLTCQzcyUzeiQqRjM3JCQiM3FtbVQmcGhOMyJGMCQiMzNMTCRlLyRRayIqRjM3JCQiM1VMJGUqPSlIXDUiRjAkIjMhZW07LyI9cV0qKUYzNyQkIjNzbTt6LzN1QzZGMCQiMydHTCQzXz5mXygpRjM3JCQiMy0rXTdMUkRYNkYwJCIzKSkqKipcKG8xWVomKUYzNyQkIjNlbTt6UidvazsiRjAkIjMwTUwzLU9KTiQpRjM3JCQiMy0rXWk1YGgoPSJGMCQiM3AqKipcUCpvJVE3KUYzNyQkIjNZTEwkM0VuJDQ3RjAkIjNWbG1tIlJGaiF6RjM3JCQiM2NtbVQhUkUmRzdGMCQiM1VNTCRlNE9acihGMzckJCIzKSoqKioqXEtdNF03RjAkIjM9KysrdidcISpcKEYzNyQkIjMpKSoqKipcUEF2cjdGMCQiMz0sKytEd1ojRyhGMzckJCIzLysrXW5IaSNIIkYwJCIzWyoqKioqXEtxUDIoRjM3JCQiM2JtO3oqZXY6SiJGMCQiM1tNTDMtVEMlKW9GMzckJCIzRUxMJDM0N1RMIkYwJCIzT25tbSI0eillbUYzNyQkIjM9TExMak0/YDhGMCQiMzVvbW1tYCd6WSdGMzckJCIzIyoqKlw3bzdUdjhGMCQiMyEzK10oPXQpZUMnRjM3JCQiM0FMTExRKm9dUiJGMCQiM3FubW07MUpcZ0YzNyQkIjMtK103PWxqOzlGMCQiM3kqKipcKD1bakxlRjM3JCQiMyYqKipcUGFSPFA5RjAkIjNcKytEYy9FR2NGMzckJCIzR0xMZTlFZ2U5RjAkIjM1bm07YVEoUlQmRjM3JCQiM1dMJGVSIjNHeTlGMCQiM2hsbVRnPT48X0YzNyQkIjNtbW1UNWtdKlwiRjAkIjNWTEwkZSplJFwrJkYzNyQkIjNlbTt6UlFiQDpGMCQiMztNTDMtO1kleSVGMzckJCIzJSkqKlwoPT5ZMmEiRjAkIjNpLCtEIjNRRGYlRjM3JCQiM2ltbSJ6WHU5YyJGMCQiMydRTEwzVWJfUSVGMzckJCIzJyoqKioqKlx5KSlHZSJGMCQiM08rKytdQDZyVEYzNyQkIjMhKioqKlxpX1FRZyJGMCQiMy8sK11QWmhoUkYzNyQkIjMjKioqXDd5JTNUaSJGMCQiM3krK3Y9XyIqZVBGMzckJCIzIyoqKipcUCFbaFk7RjAkIjMqMysrRCc+JlFgJEYzNyQkIjNFTExMUXgkb20iRjAkIjNQbm1tO0VpSkxGMzckJCIzJykqKioqXFArVilvIkYwJCIzSiwrK0QnKnA6SkYzNyQkIjNpbTt6cGUqenEiRjAkIjN6TEwzLTgvP0hGMzckJCIzKSoqKioqXCNcJ1FIPEYwJCIzPCsrK3ZdODFGRjM3JCQiMzdMJGU5UzgmXDxGMCQiMyQpb21UJilmJ1tdI0YzNyQkIjMlKioqXGk/PWJxPEYwJCIzZysrdiR6IlslSCNGMzckJCIzR0xMJDNzPzZ6IkYwJCIzM25tbSJ6I3opMyNGMzckJCIzJioqKlw3YFdsNz1GMCQiM1krK3ZvYVh0PUYzNyQkIjNlbW1tJypSUkw9RjAkIjM/TUxMTCsxbTtGMzckJCIzX21tVHZKZ2E9RjAkIjNzTUwkZUNvUlgiRjM3JCQiM0tMJGU5dE9jKD1GMCQiMyRvbTthb0tPQyJGMzckJCIzJyoqKioqKlxRa1wqPUYwJCIzRSsrK11oTl01RjM3JCQiM0BMTDNkZzY8PkYwJCIza3ltbSJIJVIpRykhIz43JCQiM19tbW13KEdwJD5GMCQiMzpbTExMQjcyakZleTckJCIzLStdN29LMGU+RjAkIjNpKCoqKlwoPXRZPiVGZXk3JCQiMy0rXSg9NXMjeT5GMCQiMyN5KioqXDcpKnlzQEZleTckJCIiI0YsJEYsRiw3UzckRmh6JCEiIkYsNyQkIjM5TExMTDNWZlZGZXkkITNVWEJxUylbXyoqKkYzNyQkIjMncG1tO0hbRDopRmV5JCEzXTUhKTMqKVJRJCkqKkYzNyQkIjNMTExMZTAkPUMiRjMkITNnUCg0O1VZOScqKkYzNyQkIjNJTExMM1JCcjtGMyQhM0pBNGZJVzxJKipGMzckJCIzWW1tO3pqZik0I0YzJCEzWzhQJDRMKCopKikpKkYzNyQkIjM9TEwkZTQ7W1wjRjMkITNocyMqPjt0UlcpKkYzNyQkIjNwKioqKlxpJ3ldIUhGMyQhM28hPTwiXEgsKnkqRjM3JCQiMyxMTCRlenMkSExGMyQhMz5CImYnPj4pR3MqRjM3JCQiM18qKioqXDdpSV9QRjMkITNJWjM+X1wrWycqRjM3JCQiMyNwbW1tQFh0PSVGMyQhMy9xOSI0XWA7YypGMzckJCIzUUxMTDN5X3FYRjMkITNVI0hKKSkpb3Z4JSpGMzckJCIzaSoqKioqKlwxIT4rJkYzJCEzISlSIyk9WlpfdSQqRjM3JCQiMygpKioqKioqXFovTmFGMyQhM11OdTg5c11oIypGMzckJCIzJyoqKioqKipcJGZDJmVGMyQhMyMqUVwiKikpenJWIipGMzckJCIzRUxMJGV6NjpCJ0YzJCEzSl0oZiU9bD9IISpGMzckJCIzU21tbTs9QyNvJ0YzJCEzKVJ5KmUyNnAkKSkpRjM3JCQiMy1tbW1tI3BTMShGMyQhMzMoUSQqWzh0Q3YpRjM3JCQiM10qKioqXGlgQTN2RjMkITMnUnpad3pqMWYpRjM3JCQiM3NsbW1tKHk4IXpGMyQhMyIpRzxrUmA/UiUpRjM3JCQiM1YrK11pLnRLJClGMyQhM1tsbms8LDlrIylGMzckJCIzOSsrXSgzek11KUYzJCEzJ1JEaGhMKnkpMylGMzckJCIzI3BtbTtIXz88KkYzJCEzVzFMKCo9ayRvKnlGMzckJCIzZW1tO3ppaGwmKkYzJCEzMFVOKipIWVo3eEYzNyQkIjM5TExMMyNHLCoqKkYzJCEzKmZjRSZmTSRcXShGMzckJCIzPExMZXp3NVY1RjAkITM9J28mKT4jZiIpenNGMzckJCIzISoqKipcUFEjXCIzIkYwJCEzMWVvc2ZiJGYyKEYzNyQkIjNCTEwkZSIqW0g3IkYwJCEzL2A9MkpWWVpvRjM3JCQiMyMqKioqKioqcHZ4bDZGMCQhM1pQQUBWbVMtbUYzNyQkIjN6KioqKlxfcW4yN0YwJCEzNyNHaUBNIXpgakYzNyQkIjMlKSoqKlxpJnBAWzdGMCQhM19rXEt2ZylbNSdGMzckJCIzIykqKioqXDInSEtIIkYwJCEzXyFcOGQmSCopPWVGMzckJCIzX21tbXdhbkw4RjAkITMlKVxbTTJWRmBiRjM3JCQiMycqKioqKipcMmdvUCJGMCQhM3kmW3hZJDNrZ19GMzckJCIzQ0xMZVI8KmZUIkYwJCEzVTklek5bPXUpXEYzNyQkIjMnKioqKioqXClIeGU5RjAkITNBdmFlWE0mKnpZRjM3JCQiM1ltbSJIIW8tKlwiRjAkITNfJWZWLmgnSCNRJUYzNyQkIjMpKSoqKlw3ay42YSJGMCQhM1t6XEo8KilcaVNGMzckJCIzZW1tbVQ5QyNlIkYwJCEzU3I5b10rR1RQRjM3JCQiMyIqKioqXGkhKjNgaSJGMCQhM3FzNTspUkZmUiRGMzckJCIzUUxMTCQqenltO0YwJCEzJSoqZio+aldhYUlGMzckJCIzR0xMJDNOMSM0PEYwJCEzMSx2bkRUYCdwI0YzNyQkIjNrbW0iSFl0N3YiRjAkITNGbSc0XzkuRUwjRjM3JCQiMyUqKioqKioqcChHKip5IkYwJCEzZz1kImVcKFEhKj5GMzckJCIzbG1tOzlAQk09RjAkITNHLCMqUnk4KSopZSJGMzckJCIzRUxMTGB2JlEoPUYwJCEzRE4hUlhuVztBIkYzNyQkIjMwKytET2w1Oz5GMCQhMycqejFdVk5SOCMpRmV5NyQkIjMvKyt2LlVhYz5GMCQhMyU9J3BJcCVwJClIJUZleUZlejdTNyQkITMrKytsQmp6cTpGMCQhM1YqR2M0RS5AKyMhI0U3JCQhM2duKj1TVmRsYCJGMCQhMzMqKUheN2NyekBGZXk3JCQhM2lhYEFmancxOkYwJCEzLU5EKXlMdWkyJUZleTckJCEzZylvbyl6SkV0OUYwJCEzRkpjV3pIOjRpRmV5NyQkITMqKlE6cD56YFI5RjAkITMhejJaXnNwaE4pRmV5NyQkITMhKiopKil5XEgoZlMiRjAkITMlR2Mudj8pSFw1RjM3JCQhM3MyVDJFUiZbUCJGMCQhM3VmLVdsITN1QyJGMzckJCEzNlo6XXo+alU4RjAkITMrKipHT1skUkRYIkYzNyQkITMjUUJpaSp6STQ4RjAkITNxRFtnOWtvaztGMzckJCEzRSh6Zk0pMzR3N0YwJCEzJTR5OUQ3YGgoPUYzNyQkITNUSC4vK0kjPkMiRjAkITMpb2hpVGlzTzQjRjM3JCQhM1kmXEUoNHojPUAiRjAkITN3a0JoPlJFJkcjRjM3JCQhM3FzZS5teiV6PCJGMCQhMz1zUSxTLiY0XSNGMzckJCEzU1E4LzMqR1I5IkYwJCEzW3MtZSpRQXZyI0YzNyQkITNTWWEzVV85NjZGMCQhM2I+Qzsqb0hpI0hGMzckJCEzWXBobUtYUCIzIkYwJCEzdE0nKnA2ZnY6SkYzNyQkITMzJik+b3pVKGYvIkYwJCEzQSg0bDsjNDdUTEYzNyQkITNgX2IlPmkmKWYsIkYwJCEzem5HR1lZLktORjM3JCQhM1ViWUFRbyw2KSpGMyQhMyc9Ilx2JHA3VHYkRjM3JCQhMyZRInBGeFtCLSYqRjMkITNveVlXJlIqb11SRjM3JCQhMyFIODRvN19NOypGMyQhM3lSJkhIPmxqOyVGMzckJCEzQ3FAQUwzJjMlKSlGMyQhMz9nJD1dYlI8UCVGMzckJCEzJio+QVlFLUQvJilGMyQhMykqb0VuY2gtJ2UlRjM3JCQhMydIPz5UelhePilGMyQhMz8icEcrOjNHeSVGMzckJCEzcz0qeV8hXHRoeUYzJCEzX2xxPTlUMSYqXEYzNyQkITMwKjMoPiZwOWFeKEYzJCEzTV9jXDIlUWJAJkYzNyQkITNKQyxETT4lUkAoRjMkITNvT1oleiM+WTJhRjM3JCQhMz1LN0okNFYkKSlvRjMkITMoPlNZemVXWmgmRjM3JCQhMzNaPXZJdyc+YidGMyQhM0soKjROZXkpKUdlRjM3JCQhMz9mRVFsKSopR0EnRjMkITM6aTpWcV9RUWdGMzckJCEzRk5YXzEtXC9mRjMkITMuUGR4KXklM1RpRjM3JCQhM1FQJD01bmg0YiZGMyQhM09QXmRXIVtoWSdGMzckJCEzRCU+XCFlMElMX0YzJCEzKWVlLitSeCRvbUYzNyQkITMhR29abF5IVCpbRjMkITNHYHpCIlErVilvRjM3JCQhM21mJz1BOSF6J2UlRjMkITMjMypHdy4oZSp6cUYzNyQkITNJOS42RnF5XVVGMyQhM29qelRJXCdRSChGMzckJCEzO04lRzZHTVkkUkYzJCEzI0hMKWY+UzgmXChGMzckJCEzKHBOL2pjalRnJEYzJCEzSCF6VjNAPWJxKEYzNyQkITMxPm0sUSFvNUckRjMkITNCOGBeN3M/NnpGMzckJCEzIXBbTUcncCJHJUhGMyQhM1JeMytOWGFFIilGMzckJCEzayU+U2AoNC88RUYzJCEzLiNILSsoKlJSTClGMzckJCEzOVEpZV8oeilRRyNGMyQhM0dpdzJkPC5ZJilGMzckJCEzYXVNQV1PXGA+RjMkITMjZkB0cUpuanYpRjM3JCQhM3VsSiUqeWIqKVw7RjMkITM3Qkg1X1FrXCopRjM3JCQhM3NpNkJHeiQ+SSJGMyQhMydwdiNcczA7ciIqRjM3JCQhM0MoejVTZC9zISoqRmV5JCEzVT0lSHp3KEdwJCpGMzckJCEzV0AjUT1BeCopZSdGZXkkITNNPCkqMyNvSzBlKkYzNyQkITM2XSJSJlwtLDhNRmV5JCEzcTtdPT41cyN5KkYzRmp6N1M3JEZqaWwkIjMmcEk/bWknKls5JEZeamw3JEZgamwkIjMnXHMpKVtNP0tVJEZleTckRmVqbCQiMztAI1xvV0EnKVInRmV5NyRGampsJCIzayNlYCJIJ2V5dCpGZXk3JEZfW20kIjMkZSNHeCJHPSkzOEYzNyRGZFttJCIzM18wbVU1eVM7RjM3JEZpW20kIjMnbzJFIikpKTRwJT5GMzckRl5cbSQiM1U9eSczRikqPUUjRjM3JEZjXG0kIjNVTCkqUVZkPSZlI0YzNyRGaFxtJCIzUlUpbzEwIWUvSEYzNyRGXV1tJCIzNUApUk5VcChIS0YzNyRGYl1tJCIzZ0xqPTNmMzhORjM3JEZnXW0kIjM3bjZwUk1AR1FGMzckRlxebSQiM21WY09FTkBTVEYzNyRGYV5tJCIzWkohM2BMYWpWJUYzNyRGZl5tJCIzPzItIVxSYzZxJUYzNyRGW19tJCIzZCQ9XCUpNCFmNV1GMzckRmBfbSQiMyNIIVxKKDNDeUUmRjM3JEZlX20kIjMpWzREU2pzNWMmRjM3JEZqX20kIjNXJW9mYidHLDplRjM3JEZfYG0kIjM/NTt1KGVRczMnRjM3JEZkYG0kIjMvJlJSMS90KlJqRjM3JEZpYG0kIjNlInB3NHZQbWYnRjM3JEZeYW0kIjMkKilcYDhTZ2Qjb0YzNyRGY2FtJCIzL3pmUCdIJGVscUYzNyRGaGFtJCIzJm9uWml1c2pJKEYzNyRGXWJtJCIzUEciUioqKW8mKTN2RjM3JEZiYm0kIjNbUypbRydcKCk+eEYzNyRGZ2JtJCIzQUJ0L0YwR0h6RjM3JEZcY20kIjMiM3pELVdqYTcpRjM3JEZhY20kIjMqPjVAdngycEkpRjM3JEZmY20kIjNNOCIqSDx3XClcKUYzNyRGW2RtJCIzYURfNkN0ZmgnKUYzNyRGYGRtJCIzQ18iZXEnKSozRSkpRjM3JEZlZG0kIjM/O0Ykb2siUW0qKUYzNyRGamRtJCIzNCMqPXAkemkrNipGMzckRl9lbSQiM1ZrYWAqZm5lQipGMzckRmRlbSQiMzMrQlwzMl1kJCpGMzckRmllbSQiM3NARCR6Q1RsWSpGMzckRl5mbSQiMzNGLiMpXHQ1cSYqRjM3JEZjZm0kIjMpKUcvUltbXWYnKkYzNyRGaGZtJCIzTiRcMSoqW0MudSpGMzckRl1nbSQiM2YtISlIVyIqejQpKkYzNyRGYmdtJCIzWyNvRlZxK1UnKSpGMzckRmdnbSQiM1ddNEhIdk86KipGMzckRlxobSQiM1kiPS9yeGo0JioqRjM3JEZhaG0kIjMjXC8vPmErJHkqKkYzNyRGZmhtJCIzaTNZKGVDd1QqKipGMzckRmh6RiotJSZDT0xPUkc2LyUkUkdCRyQiIzVGXFtsJEYsRlxbbEZiYm5GYGJuRmJibkZiYm5GYGJuRmJibkZiYm5GYGJuRmJibkZiYm4tJStBWEVTTEFCRUxTRzYnUSE2IkZmYm4tJSVGT05URzYkJSpIRUxWRVRJQ0FHRmFibiUrSE9SSVpPTlRBTEdGXGNuRmhibi0lJVZJRVdHNiQ7JCErRmp6cTohIiokIiM/RlxbbDskISQvIiEiIyQiJC8iRmljbg==