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)
NCIDXTYPEVLEN_ELEMENTLENDATANF_NOERRNF_EBADTYPENF_EBADIDNF_EBADGRPIDThis 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)