hugo: module
synmode m_set = set (a, b, c, d, e, f, g, h, i);
dcl x long;
dcl y m_set;
writetext (stdout, "done.%/");
end hugo;