RosettaCodeData/Task/Scope-modifiers/Ada/scope-modifiers-4.ada

private package P.Q is
   ... -- Visible to the siblings only
private
   ... -- Visible to the children only
end P.Q;