Use this type to learn about a vlen.
INTEGER FUNCTION NF_INQ_VLEN(INTEGER NCID, INTEGER XTYPE,
CHARACTER*(*) NAME, INTEGER DATUM_SIZEP, INTEGER
BASE_NF_TYPEP)
NCIDXTYPENAMEDATUM_SIZEPBASE_NF_TYPEPNF_NOERRNF_EBADTYPENF_EBADIDNF_EBADGRPIDThis example is from nf_test/ftst_vars4.F.
C Use nf_inq_vlen and make sure we get the same answers as we did
C with nf_inq_user_type.
retval = nf_inq_vlen(ncid, typeids(1), type_name, base_size,
& base_type)
if (retval .ne. nf_noerr) call handle_err(retval)