Fortran 2003引入了对面向对象编程的支持。此功能允许利用现代编程技术。派生类型以以下形式定义:
TYPE [[, attr-list] :: ] name [(name-list)] [def-stmts] [PRIVATE statement or SEQUENCE statement]. . . [component-definition]. . . [procedure-part] END TYPE [name]
哪里,
attr-list-属性说明符列表
name-派生数据类型的名称
名称列表-类型参数名称列表,以逗号分隔
def-stmts-名称列表中命名的类型参数的一个或多个INTEGER声明
组件定义-定义派生类型的组件的一个或多个类型声明语句或过程指针语句
procedure-part -CONTAINS语句,可以选择后面跟一个PRIVATE语句,以及一个或多个过程绑定语句
例:
type shape integer :: color end type shape