// NotifyingList is our new go-to way to wrap a list // with additional functions. persistable sclass VectorSSIList extends AbstractSSIList { *() { init(); } *(Cl l) { super(l); } VectorSSI importSSI(AbstractSSI ssi) { ret toVectorSSI(ssi); } L vectorSSIs() { ret instancesOf VectorSSI(this); } L literalSSIs() { ret instancesOf SSI(this); } }