int cfio_put_vara_int(
int ncid, int varid, int dim,
size_t *start, size_t *count, int *fp)
{
if(start == NULL || count == NULL || fp == NULL)
{
error("args should not be NULL.");
return CFIO_ERROR_ARG_NULL;
}
cfio_msg_t *msg;
//times_start();
debug(DEBUG_CFIO, "start :(%lu, %lu), count :(%lu, %lu)",
start[0], start[1], count[0], count[1]);
//head_size = 6 * sizeof(int) + 2 * dim * sizeof(size_t);
//_put_vara(io_proc_id, ncid, varid, dim,
// start, count, CFIO_DOUBLE, fp, head_size, dim - 1);
cfio_send_put_vara(ncid, varid, dim,
start, count, CFIO_INT, fp);
debug_mark(DEBUG_CFIO);
//debug(DEBUG_TIME, "%f ms", times_end());
return CFIO_ERROR_NONE;
}
int cfio_put_vara_text(
int ncid, int varid, int dim,
size_t *start, size_t *count, char *fp)
{
if(start == NULL || count == NULL || fp == NULL)
{
error("args should not be NULL.");
return CFIO_ERROR_ARG_NULL;
}
cfio_send_put_vara(ncid, varid, dim,
start, count, CFIO_CHAR, fp);
debug_mark(DEBUG_CFIO);
return CFIO_ERROR_NONE;
}
int cfio_put_vara_double(
int ncid, int varid, int dim,
size_t *start, size_t *count, double *fp)
{
if(start == NULL || count == NULL || fp == NULL)
{
error("args should not be NULL.");
return CFIO_ERROR_ARG_NULL;
}
cfio_msg_t *msg;
debug(DEBUG_CFIO, "start :(%lu, %lu), count :(%lu, %lu)",
start[0], start[1], count[0], count[1]);
cfio_send_put_vara(ncid, varid, dim,
start, count, CFIO_DOUBLE, fp);
debug_mark(DEBUG_CFIO);
return CFIO_ERROR_NONE;
}
