1 | static <A> L<A> clusters_add(Map<A, L<A>> clusters, L<A> l) {
|
2 | for (int i = 0; i < l(l)-1; i++) |
3 | clusters_add(clusters, l.get(i), l.get(i+1)); |
4 | ret clusters.get(first(l)); |
5 | } |
6 | |
7 | static <A> void clusters_add(Map<A, L<A>> clusters, A a, A b) {
|
8 | if (eq(a, b)) {
|
9 | L<A> cluster = clusters.get(a); |
10 | if (cluster == null) |
11 | clusters.put(a, litlist(a)); |
12 | ret; |
13 | } |
14 | |
15 | L<A> clusterA = clusters.get(a); |
16 | L<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 | clusters_merge(clusters, clusterA, clusterB); |
29 | } |
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: | #1009481 |
| Snippet name: | clusters_add - add relations to a cluster list (Map<A, L<A>>) |
| Eternal ID of this version: | #1009481/4 |
| Text MD5: | 2c271f9a9faa09827d7d1ffb34b49dd5 |
| Author: | stefan |
| Category: | javax / math |
| Type: | JavaX fragment (include) |
| Public (visible to everyone): | Yes |
| Archived (hidden from active list): | No |
| Created/modified: | 2017-09-07 16:52:10 |
| Source code size: | 863 bytes / 29 lines |
| Pitched / IR pitched: | No / No |
| Views / Downloads: | 728 / 755 |
| Version history: | 3 change(s) |
| Referenced in: | [show references] |