39 return ( (
PLFLT **) p )[ix][iy];
45 return ( (
PLFLT **) p )[ix][iy];
51 return ( ( (
PLFLT **) p )[ix][iy] = z );
57 return ( ( (
PLFLT **) p )[ix][iy] += z );
63 return ( ( (
PLFLT **) p )[ix][iy] -= z );
69 return ( ( (
PLFLT **) p )[ix][iy] *= z );
75 return ( ( (
PLFLT **) p )[ix][iy] /= z );
99 for ( i = 0; i <
nx; i++ )
101 for ( j = 0; j <
ny; j++ )
141 return ( ( (
PLfGrid2 *) p )->f )[ix][iy];
147 return ( ( (
PLfGrid2 *) p )->f )[ix][iy];
153 return ( ( ( (
PLfGrid2 *) p )->f )[ix][iy] = z );
159 return ( ( ( (
PLfGrid2 *) p )->f )[ix][iy] += z );
165 return ( ( ( (
PLfGrid2 *) p )->f )[ix][iy] -= z );
171 return ( ( ( (
PLfGrid2 *) p )->f )[ix][iy] *= z );
177 return ( ( ( (
PLfGrid2 *) p )->f )[ix][iy] /= z );
206 for ( i = 0; i <
nx; i++ )
208 for ( j = 0; j <
ny; j++ )
252 return ( (
PLFLT *) g->
f )[ix * g->
ny + iy];
259 return ( (
PLFLT *) g->
f )[ix * g->
ny + iy];
266 return ( ( (
PLFLT *) g->
f )[ix * g->
ny + iy] = z );
273 return ( ( (
PLFLT *) g->
f )[ix * g->
ny + iy] += z );
280 return ( ( (
PLFLT *) g->
f )[ix * g->
ny + iy] -= z );
287 return ( ( (
PLFLT *) g->
f )[ix * g->
ny + iy] *= z );
294 return ( ( (
PLFLT *) g->
f )[ix * g->
ny + iy] /= z );
324 for ( i = 0; i < nx *
ny; i++ )
367 return ( (
PLFLT *) g->
f )[ix + g->
nx * iy];
374 return ( (
PLFLT *) g->
f )[ix + g->
nx * iy];
381 return ( ( (
PLFLT *) g->
f )[ix + g->
nx * iy] = z );
388 return ( ( (
PLFLT *) g->
f )[ix + g->
nx * iy] += z );
395 return ( ( (
PLFLT *) g->
f )[ix + g->
nx * iy] -= z );
402 return ( ( (
PLFLT *) g->
f )[ix + g->
nx * iy] *= z );
409 return ( ( (
PLFLT *) g->
f )[ix + g->
nx * iy] /= z );