persistable sclass NLABlock { S text; // original text LS lines; // same, split into lines Set entities; // entities sclass Entity extends Cluster { S definedInLine; *(S name, S *definedInLine) { addSynonym(name); } } *(S *text) {} }