uses u_records7; 
begin 
  p1;
end.