static PyObject *gridloop1(PyObject *self, PyObject *args)
{
  PyArrayObject *a, *xcoor, *ycoor;
  PyObject *func1, *arglist, *result;
  int nx, ny, i, j;
  double *a_ij, *x_i, *y_j;

  /* arguments: a, xcoor, ycoor */
  if (!PyArg_ParseTuple(args, "O!O!O!O:gridloop1",
			&PyArray_Type, &a,
			&PyArray_Type, &xcoor,
			&PyArray_Type, &ycoor,
			&func1)) {
    return NULL; /* PyArg_ParseTuple has raised an exception */
  }