在Fortran中,结构体可以通过使用TYPE
关键字来定义。下面是一个示例代码,展示了如何创建和使用结构体:
PROGRAM StructExample
! 定义一个结构体类型
TYPE :: Person
CHARACTER(20) :: name
INTEGER :: age
REAL :: height
END TYPE Person
! 声明一个结构体变量
TYPE(Person) :: person1
! 初始化结构体变量的成员
person1%name = 'Alice'
person1%age = 30
person1%height = 1.65
! 输出结构体变量的成员
PRINT *, 'Name: ', person1%name
PRINT *, 'Age: ', person1%age
PRINT *, 'Height: ', person1%height
END PROGRAM StructExample
在上面的示例中,我们定义了一个名为Person
的结构体类型,该结构体有三个成员:name
、age
和height
。然后我们声明了一个名为person1
的结构体变量,给该变量的成员赋值,并输出这些值。
通过这种方式,我们就可以在Fortran中创建和使用结构体。