var
   wb : wordbool;
   wl : longbool;

begin
end.