使用數組成員作爲控制變量FORTRAN

Question

我感到驚訝的是，你不能把一個數組成員作爲控制變量做循環do循環是這樣的：

program test 
    integer, dimension(2) :: i 

    do i(1) = 1, 3 
    do i(2) = 1, 3 
     ! anything here 
     write(*, *) i 
    end do 
    end do 
end program 

我的問題是，爲什麼它是不允許的？

編輯： 或者是允許的，但我做錯了嗎？

錯誤消息從ifort v 11.1：

test.f90(4): error #5082: Syntax error, found IDENTIFIER 'I' when expecting one of: (% : . = => 
    do i(1) = 1, 3 
-------^ 
test.f90(4): error #5082: Syntax error, found ',' when expecting one of: <END-OF-STATEMENT> ; 
    do i(1) = 1, 3 
---------------^ 
test.f90(5): error #5082: Syntax error, found IDENTIFIER 'I' when expecting one of: (% : . = => 
    do i(2) = 1, 3 
-------^ 
test.f90(5): error #5082: Syntax error, found ',' when expecting one of: <END-OF-STATEMENT> ; 
    do i(2) = 1, 3 
---------------^ 
test.f90(4): error #6535: This variable or component must be of a derived or structure type [DO] 
    do i(1) = 1, 3 
----^ 
test.f90(4): error #6460: This is not a field name that is defined in the encompassing structure. [I] 
    do i(1) = 1, 3 
-------^ 
test.f90(8): error #6099: An ENDDO statement occurred without a corresponding DO or DO WHILE statement. 
    end do 
----^ 
test.f90(9): error #6099: An ENDDO statement occurred without a corresponding DO or DO WHILE statement. 
    end do 
----^ 

從gfortran V4.5.1 & 4.8.3的錯誤信息是：

test.f90:4.4: 

    do i(1) = 1, 3 
    1 
Error: Unclassifiable statement at (1) 
test.f90:5.4: 

    do i(2) = 1, 3 
    1 
Error: Unclassifiable statement at (1) 
test.f90:8.7: 

    end do 
     1 
Error: Expecting END PROGRAM statement at (1) 
test.f90:9.7: 

    end do 
     1 
Error: Expecting END PROGRAM statement at (1) 

Answer 1

對不起，我的第一個錯誤的答案。

的Fortran 2008（ISO/IEC 1539-1：2010）8.1.6.2：

該限制從語言的規則如下

R818 循環控制是， 做變量 = ...

R819 做變量是，scalar-int-variable-name

C812（R819）do變量應該是一個integer類型的變量。

因此是的，在循環控制變量的位置只允許一個標量變量名稱。

如果你問爲什麼語言的規則是這樣的，你必須問標準的作者SC22/WG5和X3J3，但我想這與固定語法中的句法不歧義的必要性有關源表單。在固定的源代碼中，空格不重要，很難提出明確的語法。