space_set
ret = space_set(handle, groupname, optlist, protocol,
unsigned space_set:1;
wr_OK(fp_dra, "SPACE", dr_info.space_set, dr_info.space);
dr_info.space_set = 0;
if (dr_info.space_set == 0) {
dr_info.space_set = 1;