OVERLOAD FUNCTION Area(x : REAL) RETURNS REAL
RETURN x
ENDFUNCTION