private_type_declaration ::= "type" defining_identifier [ discriminant_part ] "is" [ [ "abstract" ] "tagged" ] [ "limited" ] "private" ";"
This rule is called by -> type_declaration
-> type_declaration