CentOS如何進行Fortran代碼測試

在CentOS系統上進行Fortran代碼測試，可以按照以下步驟進行：

1. 安裝Fortran編譯器

首先，確保你的CentOS系統上安裝了Fortran編譯器。常用的Fortran編譯器是gfortran，它是GNU Compiler Collection (GCC)的一部分?？梢酝ㄟ^包管理器安裝gfortran：

sudo yum install gcc-gfortran

對于CentOS 8或CentOS Stream，可以使用dnf包管理器：

sudo dnf install gcc-gfortran

2. 編寫Fortran代碼和測試用例

使用文本編輯器（如vim、nano等）編寫你的Fortran代碼，并保存為.f90文件。例如，創建一個名為hello.f90的文件：

program hello
  print *, 'Hello, World!'
end program hello

3. 編譯Fortran代碼

在終端中，導航到包含你的Fortran源文件的目錄，并使用gfortran編譯它：

cd /path/to/your/fortran/file
gfortran -o hello hello.f90

這將生成一個名為hello的可執行文件。

4. 運行Fortran程序

編譯成功后，你可以通過在終端中輸入可執行文件的名稱來運行它：

./hello

如果一切正常，你應該會看到輸出Hello, World!。

5. 使用Fortran單元測試框架

Fortran有一些流行的單元測試框架，例如FRUIT（Fortran Unit Testing Interface Toolkit）和pFUnit。以下以FRUIT為例進行說明。

安裝FRUIT

你可以從FRUIT的GitHub倉庫下載并安裝它：

git clone https://github.com/fruity-code/fruity.git
cd fruity
make
sudo make install

編寫測試代碼

假設你有一個簡單的Fortran模塊my_module.f90：

module my_module
  implicit none
contains
  function add(a, b) result(c)
    real, intent(in) :: a, b
    real :: c
    c = a + b
  end function add
end module my_module

編寫一個測試文件test_my_module.f90：

program test_my_module
  use my_module
  use fruit
  implicit none
  ! 初始化FRUIT
  call init_unit_testing()
  ! 測試add函數
  call assert_equal(add(2.0, 3.0), 5.0, "add(2.0, 3.0) should be 5.0")
  ! 結束測試
  call finalize_unit_testing()
end program test_my_module

運行測試

使用gfortran編譯你的測試程序和FRUIT庫：

gfortran -o test_my_module test_my_module.f90 my_module.f90 -lfruit

運行測試程序：

./test_my_module

查看測試結果

FRUIT會輸出詳細的測試結果，包括通過的測試和失敗的測試。

6. 使用CMake進行構建（可選）

如果你有多個Fortran程序，可以使用CMake來簡化構建過程。以下是一個簡單的例子：

編寫CMakeLists.txt

cmake_minimum_required(VERSION 3.31.5)
project(fortran1)
enable_language(Fortran)
add_executable(cmake1 fortran-cmake1.f90)

運行CMake和Make

mkdir build
cd build
cmake ..
make

這將生成一個名為cmake1的可執行文件。

通過以上步驟，你可以在CentOS系統上進行Fortran代碼的測試。選擇適合你的測試框架，并根據框架的文檔編寫和運行測試用例。