procedure a is begin a;end;