Get information about a user-defined enumeration type.
INTEGER FUNCTION NF_INQ_ENUM(INTEGER NCID, INTEGER XTYPE,
CHARACTER*(*) NAME, INTEGER BASE_NF_TYPE, INTEGER BASE_SIZE,
INTEGER NUM_MEMBERS)
NCIDXTYPENAMEBASE_NF_TYPEBASE_SIZENUM_MEMBERSNF_NOERRNF_EBADTYPEIDNF_EHDFERRIn this example from nf_test/ftst_vars3.F, an enum type is created and then examined:
retval = nf_inq_enum(ncid, typeids(1), type_name, base_type,
& base_size, num_members)
if (retval .ne. nf_noerr) call handle_err(retval)
if (base_type .ne. NF_INT .or. num_members .ne. 2) stop 2