比如定义了一个动态分配的三层type结构：a(i)%b(j)%c(k)，那么怎么释放这个数据类型，是直接deallocate(a)就可以释放整个数据，还是怎么办？
编了个小程序测试了下，发现单层的type结构可以直接deallocate释放掉，
多层的type结构如果直接释放的话应该是不行的
，从统计的“分配前，分配后及释放后”三个阶段的内存来看内存是没有释放成功的。