unit u6;

type
  t1 = class
    
    public procedure p0 := exit;
    
  end;
  
end.