Fortran 从函数返回派生类型

当函数有显式接口时，可以创建有派生数据类型的函数，为此可以使用模块。