主题:急求达人指点
--------------------Configuration: ex100 - Win32 Debug--------------------
Compiling Fortran...
E:\ex100\ex100.f90
E:\ex100\ex100.f90(185) : Error: A specification statement cannot appear in the executable section.
subroutine ex021(k1)
^
E:\ex100\ex100.f90(186) : Error: A specification statement cannot appear in the executable section.
implicit none
^
E:\ex100\ex100.f90(187) : Error: A specification statement cannot appear in the executable section.
integer i,j
^
E:\ex100\ex100.f90(188) : Error: A specification statement cannot appear in the executable section.
real :: k10(4,4),k20(4,4),k30(4,4)
^
E:\ex100\ex100.f90(189) : Error: A specification statement cannot appear in the executable section.
real :: k1(8,8),k2(8,8),k3(8,8)
^
E:\ex100\ex100.f90(191) : Error: A specification statement cannot appear in the executable section.
common/group1/ k10,k20,k30
^
E:\ex100\ex100.f90(195) : Error: This name has not been declared as an array. [K1]
k1(i,j)=k10(i,j)
---^
E:\ex100\ex100.f90(195) : Error: This name does not have a type, and must have an explicit type. [K10]
k1(i,j)=k10(i,j)
-----------^
Error executing df.exe.
ex100.exe - 8 error(s), 0 warning(s)
偶不懂什么意思,请达人指点,非常感谢!
Compiling Fortran...
E:\ex100\ex100.f90
E:\ex100\ex100.f90(185) : Error: A specification statement cannot appear in the executable section.
subroutine ex021(k1)
^
E:\ex100\ex100.f90(186) : Error: A specification statement cannot appear in the executable section.
implicit none
^
E:\ex100\ex100.f90(187) : Error: A specification statement cannot appear in the executable section.
integer i,j
^
E:\ex100\ex100.f90(188) : Error: A specification statement cannot appear in the executable section.
real :: k10(4,4),k20(4,4),k30(4,4)
^
E:\ex100\ex100.f90(189) : Error: A specification statement cannot appear in the executable section.
real :: k1(8,8),k2(8,8),k3(8,8)
^
E:\ex100\ex100.f90(191) : Error: A specification statement cannot appear in the executable section.
common/group1/ k10,k20,k30
^
E:\ex100\ex100.f90(195) : Error: This name has not been declared as an array. [K1]
k1(i,j)=k10(i,j)
---^
E:\ex100\ex100.f90(195) : Error: This name does not have a type, and must have an explicit type. [K10]
k1(i,j)=k10(i,j)
-----------^
Error executing df.exe.
ex100.exe - 8 error(s), 0 warning(s)
偶不懂什么意思,请达人指点,非常感谢!