请高手帮忙看看语法哪里错误了？非常感谢！

physzw

!how to compile:: pgf90 -byteswapio liu_read.f90 -o liu.out
!execution:: ./liu.out
!
program one
implicit none
!parameter(nx=31,ny=21,np=4,nt=12)
integer nx
integer ny
integer np
integer nt
integer i,j,ip,it
nx=31
ny=21
np=4
nt=12
!i=1
!j=1
!ip=1
!it=1

character*80 fname
real sx(nx,ny,np,nt)
  !nx=e-w grids; ny=s-n grids; nt=12 months
                      !np=4::industry, energy, transportation, residential
fname='liu_SO2_monthly.grd'
open(11,file=trim(fname),status='old', &
form='unformatted',access='direct',recl=nx*ny*4)
kk=0
do it=1,nt
do ip=1,np
   kk=kk+1
   read(11,rec=kk) ((sx(i,j,ip,it),i=1,nx),j=1,ny)
enddo
enddo
close(11)

!write out

end

physzw

错误提示：
[root@localhost etprc]# pgf90 -byteswapio liu_read.f90 -o liu.out
PGF90-S-0310-Adjustable array can not have automatic bounds specifiers - sx (liu_read.f90)
  0 inform,   0 warnings,   1 severes, 0 fatal for one

yuchen

parameter前面!去掉，integer nx，integer ny，integer np，integer nt前面都加上!注释掉。