use Array: all;

int[*] id ( int[*] x)
{  return( x); }

int main()
{
  nn = id(2);
  mm = id(4);

  a = [[1,2,3,4],[1,2,3,4]];

  a = with ([1,nn-1] <= [i,j] <= [1,1])
      modarray (a, iv, 2);

  return(0);
}