file_id
|
IN:
|
File identifier returned by Hopen
|
description
|
IN:
|
Sequence of ASCII characters (may include NULL or '\0')
|
desc_len
|
IN:
|
Length of the description
|
#include "hdf.h" #define MAXLABLEN 80 #define MAXDESCLEN 1000 ... int32 file_id; char label[MAXLABLEN+1], description[MAXDESCLEN+1]; file_id = Hopen("myfile", DFACC_WRITE, 0); /* store a file label in the file */ strcpy(label, "File #1"); DFANaddfid(file_id, label); /* store description in file */ DFANaddfds(file_id, description, desc_len(description)); Hclose(file_id); ...
FORTRAN
|
integer function daafds(file_id, description, desc_len)
|
|
integer file_id, desc_len
|
|
character* (*) description
|