#include "solver.bi" Dim As String expression = "(x ^ 2 )-7" setVar("x",1.2) Print "one = ";Solver(expression) setVar("x",3.4) Print "two = ";Solver(expression) Sleep