关于grads脚本中数组及引用的问题

wheelar

本人对grads不熟悉，关于grads数组有如下疑问：
例如Fortran中有以下程序：
prgramme main
real :: slev(2,3)
integer :: i,j
do i=1,2
     do j=1,3
          slev(i,j)=i*5.0+j
          call somesub(slev(i,j))
     enddo
enddo
end prgramme main

subroutine somesub(sgl)
      real,intent(in) :: sgl
      ! do something
end subroutine  somesub

那么相似的功能在grads怎么实现？

slev.11=850
slev.12=500
slev.21=925
slev.22=700

while(t<=1)
  'set t ' t
  'c'
  i=1
  while(i<=2)
    j=1
    while(j<=2)
*    set4pics是一个gsf函数，设置一页多图，并根据小图的位置设置气压层
      set4pics(i,j,lv.ij)
      
     'run dThetase_rh.gs th rh '
      j=j+1
    endwhile
    i=i+1
  endwhile
  'printim /cygdrive/d/fang/grads/png/fang_Thetase_T' t '.png x1800 y1200 white '
  t=t+1
endwhile

请问我再循环i，j时，怎么引用slev.11=850，slev.12=500数组呢，lv.ij肯定是不对的，请各位指教!

845210955

请问可以设置数组吗

LemonTree007

请问楼主问题解决了吗？怎么创建气象上的多维数组及其赋值引用？