在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中創建和使用結構體。