Not logged in.  Login/Logout/Register | List snippets | | Create snippet | Upload image | Upload data

29
LINES

< > BotCompany Repo | #1010458 // treeSetClusters_add - add relations to a cluster list (Map<A, Collection<A>>)

JavaX fragment (include)

1  
static <A> Collection<A> treeSetClusters_add(Map<A, Collection<A>> clusters, L<A> l) {
2  
  for (int i = 0; i < l(l)-1; i++)
3  
    treeSetClusters_add(clusters, l.get(i), l.get(i+1));
4  
  ret clusters.get(first(l));
5  
}
6  
7  
static <A> void treeSetClusters_add(Map<A, Collection<A>> clusters, A a, A b) {
8  
  if (eq(a, b)) {
9  
    Collection<A> cluster = clusters.get(a);
10  
    if (cluster == null)
11  
      clusters.put(a, littreeset(a));
12  
    ret;
13  
  }
14  
  
15  
  Collection<A> clusterA = clusters.get(a);
16  
  Collection<A> clusterB = clusters.get(b);
17  
  if (clusterA == null && clusterB == null) {
18  
    L<A> cluster = ll(a, b);
19  
    clusters.put(a, cluster);
20  
    clusters.put(b, cluster);
21  
  } else if (clusterA == null) {
22  
    clusterB.add(a);
23  
    clusters.put(a, clusterB);
24  
  } else if (clusterB == null) {
25  
    clusterA.add(b);
26  
    clusters.put(b, clusterA);
27  
  } else if (clusterA != clusterB)
28  
    treeSetClusters_merge(clusters, clusterA, clusterB);
29  
}

Author comment

Began life as a copy of #1009481

download  show line numbers  debug dex  old transpilations   

Travelled to 13 computer(s): aoiabmzegqzx, bhatertpkbcr, cbybwowwnfue, cfunsshuasjs, gwrvuhgaqvyk, ishqpsrjomds, lpdgvwnxivlt, mqqgnosmbjvj, pyentgdyhuwx, pzhvpgtvlbxg, tslmcundralx, tvejysmllsmz, vouqrxazstgt

No comments. add comment

Snippet ID: #1010458
Snippet name: treeSetClusters_add - add relations to a cluster list (Map<A, Collection<A>>)
Eternal ID of this version: #1010458/2
Text MD5: 066db8c76b55a09f6dc3af5abaf2951c
Author: stefan
Category: javax / math
Type: JavaX fragment (include)
Public (visible to everyone): Yes
Archived (hidden from active list): No
Created/modified: 2017-09-18 02:03:34
Source code size: 948 bytes / 29 lines
Pitched / IR pitched: No / No
Views / Downloads: 471 / 504
Version history: 1 change(s)
Referenced in: [show references]