Use this to set the element of the (potentially) n-dimensional array of VLEN. That is, this sets the data in one variable length array.
INTEGER FUNCTION NF_GET_VLEN_ELEMENT(INTEGER NCID, INTEGER XTYPE, CHARACTER*(*) VLEN_ELEMENT, INTEGER LEN, DATA)
NCID
XTYPE
VLEN_ELEMENT
LEN
DATA
NF_NOERR
NF_EBADTYPE
NF_EBADID
NF_EBADGRPID
This example is from nf_test/ftst_vars4.F.
C Read the vlen attribute. retval = nf_get_att(ncid, NF_GLOBAL, 'att1', vlen_in) if (retval .ne. nf_noerr) call handle_err(retval) C Get the data from the vlen we just read. retval = nf_get_vlen_element(ncid, vlen_typeid, vlen_in, & vlen_len_in, data1_in) if (retval .ne. nf_noerr) call handle_err(retval)