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; }