Parse Value
Function Value(x:Double):Double;
{Defined in SParser.Pas} Example
_____________________________________________________________
Evaluate the parser function.