|
不错,有三个建议:
1. 为什么 ToArray 不使用 people%ToArray(a) 的形式?
2. 对于封装类的 Module 来说,最好是 private 的。所以建议第3 行,加一个 private。
这样多个类里,就可以同时有 destory、Create 函数而互不影响。
3. 作为 final 的函数,不应该显示调用它,而应该让编译器自动调用。
你只需要
type(list),allocatable::people
Allocate(people)
当 Deallocate(people) 时,就会自动 final 而调用 Destory
|
|