generic type Parameters 
(
<>) is limited private;
with procedure Pre_Sequence (To
: not null access Parameters) is <>;
with procedure Post_Sequence (To
: not null access Parameters) is <>;
with procedure Pre_Element (To
: not null access Parameters) is <>;
with procedure Between_Element (To
: not null access Parameters) is <>;
with procedure Post_Element (To
: not null access Parameters) is <>;
with procedure Output (Item
:  Element;
To
: not null access Parameters) is <>;
procedure DDS_Support.Sequences_Generic.Output_Generic (Item
: not null access constant Sequence;
To
: not null access Parameters);