在Ubuntu系统中,使用Fortran语言定义数据结构通常涉及到使用type
关键字来创建自定义的数据类型。Fortran 90及以后的版本支持模块化和用户自定义类型,这使得定义复杂的数据结构变得更加容易。
下面是一个简单的例子,展示了如何在Fortran中定义一个数据结构:
module my_module
implicit none
! 定义一个名为 'person' 的数据类型
type :: person
character(len=50) :: name
integer :: age
real :: height
end type person
end module my_module
program main
use my_module
implicit none
! 声明一个 'person' 类型的变量
type(person) :: p1
! 给变量的字段赋值
p1%name = "Alice"
p1%age = 30
p1%height = 1.75
! 打印变量的字段值
print *, "Name: ", p1%name
print *, "Age: ", p1%age
print *, "Height: ", p1%height
end program main
在这个例子中,我们首先创建了一个名为my_module
的模块,在这个模块中定义了一个名为person
的数据类型。person
类型有三个字段:name
(字符类型),age
(整数类型)和height
(实数类型)。
然后,在主程序中,我们使用use
语句来引入这个模块,并声明了一个person
类型的变量p1
。接着,我们给p1
的字段赋值,并打印出来。
要编译这个Fortran程序,你可以使用gfortran编译器。在Ubuntu终端中,你可以这样编译:
gfortran -o my_program my_program.f90
这里my_program.f90
是你的Fortran源代码文件名,-o my_program
指定了输出的可执行文件名为my_program
。
编译成功后,你可以运行生成的可执行文件:
./my_program
这将输出你在程序中设置的person
类型变量的字段值。