function seq0(var x: scalar): boolean;
begin { seq0 }
  seq0:=(x.l.si=0) and (x.u.si=0);
end { seq0 };

