我是Ada的新手并且在学习它时遇到了一个问题，就像编写一个包（multiset）泛型包一样，它包含元素和多样性 .
Baggage 类型必须是具有判别力的记录，其是 Baggage 的最大容量 . 在记录中放置包含（元素，多重性）对的数组 .
元素的类型是通用包的参数 .
在 Bag 类型上定义 Add 和 Remove 过程以及 Multiplicity 函数 .
编写 For_Each 迭代器，这是一个内部泛型过程 .
该通用具有 Process_Elem 参数程序，该程序将应用于每对包 .
在演示程序中说明了为整数实例化的包的操作的用法 .