Like this?
Type foo Field grid[,] Method Resize(w,h) Local temp:Int[w , h] If grid For Local x:Int = 0 Until w For Local y:Int = 0 Until h Print x + " " + y If grid[x,y]<>0 temp[x,y] = grid[x,y] Else temp[x,y] = Null EndIf Next Next Else grid:Int=New Int[22,22] EndIf EndMethod EndType f:foo = New foo Print Len(f.grid) f.resize(22 , 22) Print Len(f.grid)