procedure a is begin return;end a;