procedure InitValues;
extern;

procedure SetIval(Hostinteger : integer; var Value: ObjectValue);
extern;

procedure SetBval(HostBoolean: Boolean; var Value: ObjectValue);
extern;

procedure Evaluate(var SourceValue : ValueDetails);
extern;

procedure NegateValue(var Velue:Objectvalue);
extern;

function SameValue(Value1,Value2 : Objectvalue):Boolean;
extern;

function OrderedValues(Value1,Value2 : ObjectValue):Boolean;
extern;

function Range(Min,Max : ObjectValue):integer;
extern;