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 NF90_PUT_VLEN_ELEMENT(INTEGER NCID, INTEGER XTYPE,
CHARACTER*(*) VLEN_ELEMENT, INTEGER LEN, DATA)
NCIDXTYPEVLEN_ELEMENTLENDATANF90_NOERRNF90_EBADTYPENF90_EBADIDNF90_EBADGRPIDThis example is from nf90_test/ftst_vars4.F.
C Set up the vlen with this helper function, since F77 can't deal
C with pointers.
retval = nf90_put_vlen_element(ncid, vlen_typeid, vlen,
& vlen_len, data1)
if (retval .ne. nf90_noerr) call handle_err(retval)