f1 := 4*S/(4+4*S + (((1+S)^2 -0.08)^0.5 - (1+S)));

NiM+SSNmMUc2IiwkKiZJIlNHRiUiIiIsKCIiJEYpRihGKyokLCYqJCwmRilGKUYoRikiIiNGKSQhIikhIiNGKSQiIiYhIiJGKUY2IiIl

plot (f1, S=0..3);

LSUlUExPVEc2JS0lJ0NVUlZFU0c2JDdTNyQkIiIhRitGKjckJCIzcyoqKioqKlxpOVJsISM+JCIzWU5pJ0dOW0w+J0YvNyQkIjMvKyt2VkEpR0EiISM9JCIzSVw7ZDh2XCk0IkY1NyQkIjMrKytdUGV1aT1GNSQiMydSdCMpZkJfO2UiRjU3JCQiM0ErK11pMyZvXSNGNSQiM0RtP2hZKlt1LCNGNTckJCIzJSkqKipcKG9YKnk5JEY1JCIzRiU+PWY4OyQzQ0Y1NyQkIjN6KioqXFA5Q0F1JEY1JCIzJFFLL2chPSJ5dCNGNTckJCIzISkqKipcUCp6aGRWRjUkIjMvYTxnXCUpKipcSUY1NyQkIjMxKyt2JD5mUypcRjUkIjMpR3p2UkszZE0kRjU3JCQiMyQpKioqXCg9JGYlR2NGNSQiM0teeFckKWVNO09GNTckJCIzUSsrK0R5LCJHJ0Y1JCIzYVMiMyZHJSpmc1FGNTckJCIzMysrXTc8emJvRjUkIjNNelJiOy16IjMlRjU3JCQiM2ArKyt2NCZHXShGNSQiM3ptQT42bngrVkY1NyQkIjMhKSoqKioqXDduRDopRjUkIjNlKmZKNWIjKltdJUY1NyQkIjNbKysrRCEqb3koKUY1JCIzJVFSVClwYT0pbyVGNTckJCIzKSkqKipcUHBuc00qRjUkIjM+RTUrdUpLV1tGNTckJCIzLCsrXXNpTC01ISM8JCIzZSEpXCIpNFBUPV1GNTckJCIzLSsrKyFSNSdmNUZmcCQiMzFpJyp6IVxGcDomRjU3JCQiMykqKipcUC9RQkU2RmZwJCIzPW5pOitMazNgRjU3JCQiMyEqKioqKipcIm8/Jj0iRmZwJCIzQHF4InpdL19WJkY1NyQkIjMxK11QYSY0Klw3RmZwJCIzb2gvQGVwVG1iRjU3JCQiMzMrXTdqPV82OEZmcCQiMyNbaE1nJ1tfJW8mRjU3JCQiMzMrK3ZWeSFlUCJGZnAkIjN4QSsjNHk+NyFlRjU3JCQiMzQrXSg9V1VbViJGZnAkIjMnUSpwKj0nKVtIIWZGNTckJCIzKSoqKipcN0I+JilcIkZmcCQiM1U4YCxYTUcyZ0Y1NyQkIjMpKioqXFA+Om1rOkZmcCQiMz4pZk0rI3o7NWhGNTckJCIzJyoqKlxpdiZRQWkiRmZwJCIzQzlManI0XSY+J0Y1NyQkIjMxKyt2dExVJW8iRmZwJCIzY2NFd2kjXE5HJ0Y1NyQkIjMhKioqKioqXE5tJ1s8RmZwJCIzIVtBOno+RS5QJ0Y1NyQkIjMiKioqKlwoeWJeNj1GZnAkIjM7JSlSRCV6IlFea0Y1NyQkIjMpKioqXFBNYUtzPUZmcCQiM1BENnEqPklrXydGNTckJCIzJioqKipcN1RXKVI+RmZwJCIzTG9PcTQzNzFtRjU3JCQiM3oqKioqKlxAODArI0ZmcCQiM0UtSSo0Nm5ZbidGNTckJCIzMSsrXTcsSGw/RmZwJCIzNGZaOkkpZlt1J0Y1NyQkIjMoKSoqXFA0dylSNyNGZnAkIjNmIlE+JFE2JmYhb0Y1NyQkIjM7KytdeCVmIik9I0ZmcCQiMyEpKWZJPFptLChvRjU3JCQiMyEpKipcUC8tYVtBRmZwJCIzIzMoeSdRJT5GR3BGNTckJCIzLytdKD1ZYjtKI0ZmcCQiMzskKjNYRVh1JylwRjU3JCQiMycpKioqKlxpQE90QkZmcCQiMyNlQD5cWih6VHFGNTckJCIzJykqKlxQZkwnelYjRmZwJCIzX2JwPHFnSig0KEY1NyQkIjM+KysrISo+PStERmZwJCIzJTN2OlxXXSlbckY1NyQkIjMtKytERSY0UWMjRmZwJCIzNShvdj5kInAqPihGNTckJCIzPStdUCU+NXBpI0ZmcCQiMy1idUEieV0kW3NGNTckJCIzOSsrK2JKKltvI0ZmcCQiM0EqZUlFLSZmIkgoRjU3JCQiMzMrK0RyIls4diNGZnAkIjMoeSpbTiJlOSZSdEY1NyQkIjMrKysrSWp5NUdGZnAkIjN5dyplI2YjZjRRKEY1NyQkIjMxK11QLylmVChHRmZwJCIzUmNuQ1F6dUJ1RjU3JCQiMzErXWkwaiJbJEhGZnAkIjNLMT1MLj9UanVGNTckJCIiJEYrJCIzJylmSiVISidwL3ZGNS0lJkNPTE9SRzYmJSRSR0JHJCIjNSEiIiRGK0ZfW2xGYFtsLSUrQVhFU0xBQkVMU0c2JFEiUzYiUSFGZVtsLSUlVklFV0c2JDtGYFtsJCIjSUZfW2w7JCEyQWopZWkjUjRdIkY1JCIxQz8/Ui16YXchIzs=

f2 := S*(1+S)/(1+1e6 + 2*S +S^2);

NiM+SSNmMkc2IiooSSJTR0YlIiIiLCZGKEYoRidGKEYoLCgkIigsKysiIiIhRihGJyIiIyokRidGLkYoISIi

solve (f2 -0.5, S);

NiQkIisrMCsrNSEiJyQhKyswKys1RiU=