with Generic_Stack, Stack_Int;
 -- Конкркетизация стека стеков целых величин.

package Stack_Stack_Int is new Generic_Stack(Stack_Int.Stack);