Fortran class

如果一个可分配数据项、指针或者形参用 class(type) 声明，其中 type 是派生数据类型，那么将可以与该类型或者所有扩展匹配，但只能访问该类型的元素。

type point ...
type, extends(point) point_3d ...
class(point), pointer :: p