var a : integer;
begin
a := a(4);
end.