<br />
<b>Warning</b>:  session_start(): open(/var/lib/php/sessions/sess_hejfrnmfcf83r2h63dnii899nk, O_RDWR) failed: No space left on device (28) in <b>/var/www/tb-usercake/models/config.php</b> on line <b>51</b><br />
<br />
<b>Warning</b>:  session_start(): Failed to read session data: files (path: /var/lib/php/sessions) in <b>/var/www/tb-usercake/models/config.php</b> on line <b>51</b><br />
sclass StringClustersWithIDs {
  new L<Cluster> clusters;
  
  !include #1025301 // change()/onChange()
  
  sclass Cluster {
    GlobalID globalID = aGlobalIDObject();
    Set<S> synonyms = ciSet();

    *() {}
    *(S s) { synonyms.add(s); }
  }
 
  L<Cluster> searchForCluster(S s) {
    ret filter(clusters, c -> contains(c.synonyms, s));
  }
  
  Cluster clusterWith(S s) {
    ret first(searchForCluster(s));
  }
  
  void add(Cluster cluster) {
    clusters.add(cluster);
    change();
  }
  
  void remove(Cluster cluster) {
    clusters.remove(cluster);
    change();
  }
  
  // also adds to list
  Cluster newCluster(S s) {
    Cluster c = new(s);
    add(c);
    ret c;
  }
  
  // also adds to list
  Cluster newCluster(Cl<S> synonyms) {
    new Cluster c;
    addAll(c.synonyms, synonyms);
    add(c);
    ret c;
  }
}