如何编写Fortran主程序?

Question

我有一个很短的程序:

!> This is a test.
program main
implicit none
integer :: i
real :: a
!> THIS IS A LOOP!
do i = 1,10
a = 2.0*i
write(*,*) a
end do
end program main

但是在生成的氧原子文档中，只显示了This is a test.。
如何让THIS IS A LOOP!显示?我知道它适用于子程序和模块。

Answer 1

好吧，我找到了一个解决方法。

我必须这样做:

program test
call main()
contains
!> This is a test.
subroutine main()
implicit none
integer :: i
real :: a
!> - THIS IS A LOOP!
do i = 1,10
a = 2.0*i
write(*,*) a
end do
end subroutine main
end program test