@mattpolzin/harmony 0.5.0 → 0.7.1

This diff represents the content of publicly available package versions that have been released to one of the supported registries. The information contained in this diff is provided for informational purposes only and reflects changes between package versions as they appear in their respective public registries.
Files changed (2) hide show
  1. harmony-npm/harmony +1172 -826
  2. harmony-npm/package.json +1 -1
harmony-npm/harmony CHANGED
@@ -89,10 +89,34 @@ const _truncBigInt8 = x => {
89
89
  return res >= 0x80 ? res - 0x100 : res;
90
90
  }
91
91
 
92
+ // Euclidian Division
93
+ const _div = (a,b) => {
94
+ let q = Math.trunc(a / b)
95
+ let r = a % b
96
+ return r < 0 ? (b > 0 ? q - 1 : q + 1) : q
97
+ }
98
+
99
+ const _divBigInt = (a,b) => {
100
+ let q = a / b
101
+ let r = a % b
102
+ return r < 0n ? (b > 0n ? q - 1n : q + 1n) : q
103
+ }
104
+
105
+ // Euclidian Modulo
106
+ const _mod = (a,b) => {
107
+ r = a % b
108
+ return r < 0 ? (b > 0 ? r + b : r - b) : r
109
+ }
110
+
111
+ const _modBigInt = (a,b) => {
112
+ r = a % b
113
+ return r < 0n ? (b > 0n ? r + b : r - b) : r
114
+ }
115
+
92
116
  const _add8s = (a,b) => _truncInt8(a + b)
93
117
  const _sub8s = (a,b) => _truncInt8(a - b)
94
118
  const _mul8s = (a,b) => _truncInt8(a * b)
95
- const _div8s = (a,b) => _truncInt8(Math.trunc(a / b))
119
+ const _div8s = (a,b) => _truncInt8(_div(a,b))
96
120
  const _shl8s = (a,b) => _truncInt8(a << b)
97
121
  const _shr8s = (a,b) => _truncInt8(a >> b)
98
122
 
@@ -110,7 +134,7 @@ const _truncBigInt16 = x => {
110
134
  const _add16s = (a,b) => _truncInt16(a + b)
111
135
  const _sub16s = (a,b) => _truncInt16(a - b)
112
136
  const _mul16s = (a,b) => _truncInt16(a * b)
113
- const _div16s = (a,b) => _truncInt16(Math.trunc(a / b))
137
+ const _div16s = (a,b) => _truncInt16(_div(a,b))
114
138
  const _shl16s = (a,b) => _truncInt16(a << b)
115
139
  const _shr16s = (a,b) => _truncInt16(a >> b)
116
140
 
@@ -124,7 +148,7 @@ const _truncBigInt32 = x => {
124
148
 
125
149
  const _add32s = (a,b) => _truncInt32(a + b)
126
150
  const _sub32s = (a,b) => _truncInt32(a - b)
127
- const _div32s = (a,b) => _truncInt32(Math.trunc(a / b))
151
+ const _div32s = (a,b) => _truncInt32(_div(a,b))
128
152
 
129
153
  const _mul32s = (a,b) => {
130
154
  const res = a * b;
@@ -144,7 +168,7 @@ const _truncBigInt64 = x => {
144
168
  const _add64s = (a,b) => _truncBigInt64(a + b)
145
169
  const _sub64s = (a,b) => _truncBigInt64(a - b)
146
170
  const _mul64s = (a,b) => _truncBigInt64(a * b)
147
- const _div64s = (a,b) => _truncBigInt64(a / b)
171
+ const _div64s = (a,b) => _truncBigInt64(_divBigInt(a,b))
148
172
  const _shl64s = (a,b) => _truncBigInt64(a << b)
149
173
  const _shr64s = (a,b) => _truncBigInt64(a >> b)
150
174
 
@@ -259,6 +283,13 @@ const git_current_branch = (git, onSuccess, onFailure) =>
259
283
  onFailure
260
284
  )
261
285
 
286
+ const git_checkout_branch = (git, branch, onSuccess, onFailure) =>
287
+ idris__git_unpromisify(
288
+ git.raw('checkout', `${branch}`),
289
+ r => onSuccess(''),
290
+ onFailure()
291
+ )
292
+
262
293
  // push the current branch, setting its upstream
263
294
  // Executes callback with empty string on success.
264
295
  const git_push_new_branch = (git, remoteName, branch, onSuccess, onFailure) =>
@@ -289,6 +320,13 @@ const git_remote_tracking_branch = (git, onSuccess, onFailure) =>
289
320
  onFailure
290
321
  )
291
322
 
323
+ const git_user_email = (git, onSuccess, onFailure) =>
324
+ idris__git_unpromisify(
325
+ git.raw('config', '--get', 'user.email'),
326
+ r => onSuccess(r.trim()),
327
+ onFailure
328
+ )
329
+
292
330
 
293
331
 
294
332
  const { Octokit } = require('octokit')
@@ -328,7 +366,7 @@ const okit_get_repo_default_branch = (octokit, org, repo, onSuccess, onFailure)
328
366
  const digTeams = teamsJson =>
329
367
  teamsJson.map(t => t.slug)
330
368
 
331
- // Executes callback with [String]
369
+ // Executes callback with [String] (string array)
332
370
  const okit_list_teams = (octokit, org, onSuccess, onFailure) =>
333
371
  idris__okit_unpromisify(
334
372
  octokit.rest.teams.list({ org, per_page: 100 }),
@@ -336,6 +374,14 @@ const okit_list_teams = (octokit, org, onSuccess, onFailure) =>
336
374
  idris__okit_stringify_error(onFailure)
337
375
  )
338
376
 
377
+ // Executes callback with [String] (string array)
378
+ const okit_list_my_teams = (octokit, onSuccess, onFailure) =>
379
+ idris__okit_unpromisify(
380
+ octokit.rest.teams.listForAuthenticatedUser({per_page: 100}),
381
+ r => onSuccess(newline_delimited(digTeams(r.data))),
382
+ idris__okit_stringify_error(onFailure)
383
+ )
384
+
339
385
  // list PRs for branch
340
386
  const digPr = pr => {
341
387
  return {
@@ -343,7 +389,8 @@ const digPr = pr => {
343
389
  author: pr.user.login,
344
390
  state: pr.state,
345
391
  created_at: pr.created_at,
346
- reviewers: pr.requested_reviewers.map(u => u.login)
392
+ reviewers: pr.requested_reviewers.map(u => u.login),
393
+ head_ref: pr.head.ref
347
394
  }
348
395
  }
349
396
  const digPrs = prJson =>
@@ -555,6 +602,16 @@ function support_system_file_chmod (filename, mode) {
555
602
  }
556
603
  }
557
604
 
605
+ function support_system_file_removeFile (filename) {
606
+ try {
607
+ support_system_file_fs.unlinkSync(filename)
608
+ return 0
609
+ } catch (e) {
610
+ process.__lasterr = e
611
+ return 1
612
+ }
613
+ }
614
+
558
615
  const Prelude_Types_fastUnpack = ((str)=>__prim_js2idris_array(Array.from(str)));
559
616
  const Prelude_Types_fastPack = ((xs)=>__prim_idris2js_array(xs).join(''));
560
617
  const Prelude_Types_fastConcat = ((xs)=>__prim_idris2js_array(xs).join(''));
@@ -588,17 +645,20 @@ const FFI_GitHub_prim__listPullReviews = okit_list_pr_reviews;
588
645
  const FFI_GitHub_prim__listPullRequests = okit_list_pull_requests;
589
646
  const FFI_GitHub_prim__listPRsForBranch = okit_list_prs;
590
647
  const FFI_GitHub_prim__listOrgMembers = okit_list_org_members;
648
+ const FFI_GitHub_prim__listMyTeams = okit_list_my_teams;
591
649
  const FFI_GitHub_prim__getUser = okit_get_user;
592
650
  const FFI_GitHub_prim__getSelf = okit_get_self;
593
651
  const FFI_GitHub_prim__getRepoDefaultBranch = okit_get_repo_default_branch;
594
652
  const FFI_GitHub_prim__createPR = okit_create_pr;
595
653
  const FFI_GitHub_prim__createComment = okit_create_comment;
596
654
  const FFI_GitHub_prim__addPullReviewers = okit_add_reviewers;
655
+ const FFI_Git_prim__userEmail = git_user_email;
597
656
  const FFI_Git_prim__remoteURI = git_remote_uri;
598
657
  const FFI_Git_prim__remoteTrackingBranch = git_remote_tracking_branch;
599
658
  const FFI_Git_prim__pushNewBranch = git_push_new_branch;
600
659
  const FFI_Git_prim__git = git_git;
601
660
  const FFI_Git_prim__currentBranch = git_current_branch;
661
+ const FFI_Git_prim__checkoutBranch = git_checkout_branch;
602
662
  const FFI_Concurrency_prim__singleton = ((p)=>Promise.all([p]));
603
663
  const FFI_Concurrency_prim__neutral = (()=>Promise.all([]));
604
664
  const FFI_Concurrency_prim__future = concurrency_future;
@@ -618,7 +678,7 @@ function x24tcOpt_1($0) {
618
678
  default: {
619
679
  switch($0.a7.h) {
620
680
  case 0: return {h: 0, a1: $0.a6};
621
- case 1: return {h: 0, a1: Prelude_Interfaces_x3cx24x3e(csegen_111(), $c => ({a1: $c.a1, a2: $c.a2, a3: 0n}), $0.a6)};
681
+ case 1: return {h: 0, a1: Prelude_Interfaces_x3cx24x3e(csegen_119(), $c => ({a1: $c.a1, a2: $c.a2, a3: 0n}), $0.a6)};
622
682
  default: {
623
683
  switch($0.a6.h) {
624
684
  case 0: {
@@ -627,30 +687,30 @@ function x24tcOpt_1($0) {
627
687
  case 0: return {h: 0, a1: $0.a5};
628
688
  default: {
629
689
  const $18 = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3};
630
- const $1c = Data_List_DeleteBy_deleteByx27($1f => $20 => Prelude_Basics_on($23 => $24 => $0.a1.a1.a1($23)($24), csegen_467(), $1f, $20), $18, $0.a6);
690
+ const $1c = Data_List_DeleteBy_deleteByx27($1f => $20 => Prelude_Basics_on($23 => $24 => $0.a1.a1.a1($23)($24), csegen_471(), $1f, $20), $18, $0.a6);
631
691
  switch($1c.a1.h) {
632
692
  case 0: {
633
693
  switch($0.a8) {
634
- case 0: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3}, a2: Reviewer_n__4241_1532_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $1c.a2, $0.a7, $0.a8)}};
694
+ case 0: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3}, a2: Reviewer_n__4753_1596_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $1c.a2, $0.a7, $0.a8)}};
635
695
  case 1: return {h: 1, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5.a2, a6: $1c.a2, a7: $0.a7, a8: $0.a8};
636
696
  }
637
697
  }
638
- case undefined: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: Reviewer_n__4268_1684_calc($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a1.a1, $0.a5.a1.a3, $0.a5.a1.a2, $18, $0.a5.a2, $0.a8, $0.a7, $0.a6, $0.a5.a1.a3, $1c.a1.a1.a3)}, a2: Reviewer_n__4241_1532_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $1c.a2, $0.a7, $0.a8)}};
698
+ case undefined: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: Reviewer_n__4780_1748_calc($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a1.a1, $0.a5.a1.a3, $0.a5.a1.a2, $18, $0.a5.a2, $0.a8, $0.a7, $0.a6, $0.a5.a1.a3, $1c.a1.a1.a3)}, a2: Reviewer_n__4753_1596_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $1c.a2, $0.a7, $0.a8)}};
639
699
  }
640
700
  }
641
701
  }
642
702
  }
643
703
  default: {
644
704
  const $6b = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3};
645
- const $6f = Data_List_DeleteBy_deleteByx27($72 => $73 => Prelude_Basics_on($76 => $77 => $0.a1.a1.a1($76)($77), csegen_467(), $72, $73), $6b, $0.a6);
705
+ const $6f = Data_List_DeleteBy_deleteByx27($72 => $73 => Prelude_Basics_on($76 => $77 => $0.a1.a1.a1($76)($77), csegen_471(), $72, $73), $6b, $0.a6);
646
706
  switch($6f.a1.h) {
647
707
  case 0: {
648
708
  switch($0.a8) {
649
- case 0: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3}, a2: Reviewer_n__4241_1532_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $6f.a2, $0.a7, $0.a8)}};
709
+ case 0: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3}, a2: Reviewer_n__4753_1596_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $6f.a2, $0.a7, $0.a8)}};
650
710
  case 1: return {h: 1, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5.a2, a6: $6f.a2, a7: $0.a7, a8: $0.a8};
651
711
  }
652
712
  }
653
- case undefined: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: Reviewer_n__4268_1684_calc($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a1.a1, $0.a5.a1.a3, $0.a5.a1.a2, $6b, $0.a5.a2, $0.a8, $0.a7, $0.a6, $0.a5.a1.a3, $6f.a1.a1.a3)}, a2: Reviewer_n__4241_1532_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $6f.a2, $0.a7, $0.a8)}};
713
+ case undefined: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: Reviewer_n__4780_1748_calc($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a1.a1, $0.a5.a1.a3, $0.a5.a1.a2, $6b, $0.a5.a2, $0.a8, $0.a7, $0.a6, $0.a5.a1.a3, $6f.a1.a1.a3)}, a2: Reviewer_n__4753_1596_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $6f.a2, $0.a7, $0.a8)}};
654
714
  }
655
715
  }
656
716
  }
@@ -667,30 +727,30 @@ function x24tcOpt_1($0) {
667
727
  case 0: return {h: 0, a1: $0.a5};
668
728
  default: {
669
729
  const $c2 = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3};
670
- const $c6 = Data_List_DeleteBy_deleteByx27($c9 => $ca => Prelude_Basics_on($cd => $ce => $0.a1.a1.a1($cd)($ce), csegen_467(), $c9, $ca), $c2, $0.a6);
730
+ const $c6 = Data_List_DeleteBy_deleteByx27($c9 => $ca => Prelude_Basics_on($cd => $ce => $0.a1.a1.a1($cd)($ce), csegen_471(), $c9, $ca), $c2, $0.a6);
671
731
  switch($c6.a1.h) {
672
732
  case 0: {
673
733
  switch($0.a8) {
674
- case 0: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3}, a2: Reviewer_n__4241_1532_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $c6.a2, $0.a7, $0.a8)}};
734
+ case 0: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3}, a2: Reviewer_n__4753_1596_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $c6.a2, $0.a7, $0.a8)}};
675
735
  case 1: return {h: 1, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5.a2, a6: $c6.a2, a7: $0.a7, a8: $0.a8};
676
736
  }
677
737
  }
678
- case undefined: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: Reviewer_n__4268_1684_calc($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a1.a1, $0.a5.a1.a3, $0.a5.a1.a2, $c2, $0.a5.a2, $0.a8, $0.a7, $0.a6, $0.a5.a1.a3, $c6.a1.a1.a3)}, a2: Reviewer_n__4241_1532_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $c6.a2, $0.a7, $0.a8)}};
738
+ case undefined: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: Reviewer_n__4780_1748_calc($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a1.a1, $0.a5.a1.a3, $0.a5.a1.a2, $c2, $0.a5.a2, $0.a8, $0.a7, $0.a6, $0.a5.a1.a3, $c6.a1.a1.a3)}, a2: Reviewer_n__4753_1596_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $c6.a2, $0.a7, $0.a8)}};
679
739
  }
680
740
  }
681
741
  }
682
742
  }
683
743
  default: {
684
744
  const $115 = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3};
685
- const $119 = Data_List_DeleteBy_deleteByx27($11c => $11d => Prelude_Basics_on($120 => $121 => $0.a1.a1.a1($120)($121), csegen_467(), $11c, $11d), $115, $0.a6);
745
+ const $119 = Data_List_DeleteBy_deleteByx27($11c => $11d => Prelude_Basics_on($120 => $121 => $0.a1.a1.a1($120)($121), csegen_471(), $11c, $11d), $115, $0.a6);
686
746
  switch($119.a1.h) {
687
747
  case 0: {
688
748
  switch($0.a8) {
689
- case 0: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3}, a2: Reviewer_n__4241_1532_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $119.a2, $0.a7, $0.a8)}};
749
+ case 0: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3}, a2: Reviewer_n__4753_1596_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $119.a2, $0.a7, $0.a8)}};
690
750
  case 1: return {h: 1, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5.a2, a6: $119.a2, a7: $0.a7, a8: $0.a8};
691
751
  }
692
752
  }
693
- case undefined: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: Reviewer_n__4268_1684_calc($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a1.a1, $0.a5.a1.a3, $0.a5.a1.a2, $115, $0.a5.a2, $0.a8, $0.a7, $0.a6, $0.a5.a1.a3, $119.a1.a1.a3)}, a2: Reviewer_n__4241_1532_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $119.a2, $0.a7, $0.a8)}};
753
+ case undefined: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: Reviewer_n__4780_1748_calc($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a1.a1, $0.a5.a1.a3, $0.a5.a1.a2, $115, $0.a5.a2, $0.a8, $0.a7, $0.a6, $0.a5.a1.a3, $119.a1.a1.a3)}, a2: Reviewer_n__4753_1596_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $119.a2, $0.a7, $0.a8)}};
694
754
  }
695
755
  }
696
756
  }
@@ -698,7 +758,7 @@ function x24tcOpt_1($0) {
698
758
  }
699
759
  }
700
760
 
701
- function Reviewer_n__4241_1532_zipReviews($0, $1, $2, $3, $4, $5, $6, $7) {
761
+ function Reviewer_n__4753_1596_zipReviews($0, $1, $2, $3, $4, $5, $6, $7) {
702
762
  return __tailRec(x24tcOpt_1, {h: 1, a1: $0, a2: $1, a3: $2, a4: $3, a5: $4, a6: $5, a7: $6, a8: $7});
703
763
  }
704
764
 
@@ -719,7 +779,7 @@ function x24tcOpt_2($0) {
719
779
  }
720
780
  }
721
781
 
722
- function Data_List_n__7054_5392_splitRec($0, $1, $2, $3, $4) {
782
+ function Data_List_n__7156_6663_splitRec($0, $1, $2, $3, $4) {
723
783
  return __tailRec(x24tcOpt_2, {h: 1, a1: $0, a2: $1, a3: $2, a4: $3, a5: $4});
724
784
  }
725
785
 
@@ -735,7 +795,7 @@ function x24tcOpt_3($0) {
735
795
  }
736
796
  }
737
797
 
738
- function Prelude_Show_n__3118_10636_showx27($0, $1, $2, $3) {
798
+ function Prelude_Show_n__3172_11556_showx27($0, $1, $2, $3) {
739
799
  return __tailRec(x24tcOpt_3, {h: 1, a1: $0, a2: $1, a3: $2, a4: $3});
740
800
  }
741
801
 
@@ -748,7 +808,7 @@ function x24tcOpt_4($0) {
748
808
  }
749
809
  }
750
810
 
751
- function Text_PrettyPrint_Prettyprinter_Doc_n__8191_6693_initialIndentation($0, $1, $2, $3) {
811
+ function Text_PrettyPrint_Prettyprinter_Doc_n__8712_6697_initialIndentation($0, $1, $2, $3) {
752
812
  return __tailRec(x24tcOpt_4, {h: 1, a1: $0, a2: $1, a3: $2, a4: $3});
753
813
  }
754
814
 
@@ -763,8 +823,8 @@ function x24tcOpt_5($0) {
763
823
  case 2: {
764
824
  switch($0.a11.h) {
765
825
  case undefined: {
766
- const $16 = _add32s($0.a5, Prelude_Cast_cast_Cast_Nat_Int(Text_Lexer_Core_n__3455_2495_countNLs($0.a1, $0.a2, $0.a3, $0.a4, $0.a5, $0.a6, $0.a11.a1.a1)));
767
- const $23 = Text_Lexer_Core_n__3455_2496_getCols($0.a1, $0.a2, $0.a3, $0.a4, $0.a5, $0.a6, $0.a11.a1.a1, $0.a4);
826
+ const $16 = _add32s($0.a5, Prelude_Cast_cast_Cast_Nat_Int(Text_Lexer_Core_n__3659_2499_countNLs($0.a1, $0.a2, $0.a3, $0.a4, $0.a5, $0.a6, $0.a11.a1.a1)));
827
+ const $23 = Text_Lexer_Core_n__3659_2500_getCols($0.a1, $0.a2, $0.a3, $0.a4, $0.a5, $0.a6, $0.a11.a1.a1, $0.a4);
768
828
  return {h: 0, a1: {a1: {a1: {a1: $0.a8(Prelude_Types_fastPack(Prelude_Types_List_reverse($0.a11.a1.a1))), a2: 0, a3: {a1: $0.a5, a2: $0.a4, a3: $16, a4: $23}}, a2: {a1: $16, a2: {a1: $23, a2: $0.a11.a1.a2}}}}};
769
829
  }
770
830
  case 0: return {h: 1, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5, a6: $0.a6, a7: $0.a9, a8: $0.a10};
@@ -773,11 +833,11 @@ function x24tcOpt_5($0) {
773
833
  }
774
834
  }
775
835
 
776
- function Text_Lexer_Core_n__3455_2497_getFirstToken($0, $1, $2, $3, $4, $5, $6, $7) {
836
+ function Text_Lexer_Core_n__3659_2501_getFirstToken($0, $1, $2, $3, $4, $5, $6, $7) {
777
837
  return __tailRec(x24tcOpt_5, {h: 1, a1: $0, a2: $1, a3: $2, a4: $3, a5: $4, a6: $5, a7: $6, a8: $7});
778
838
  }
779
839
 
780
- function Text_Lexer_Core_case__tokenisex2cgetFirstToken_2632($0, $1, $2, $3, $4, $5, $6, $7, $8, $9, $a) {
840
+ function Text_Lexer_Core_case__tokenisex2cgetFirstToken_2636($0, $1, $2, $3, $4, $5, $6, $7, $8, $9, $a) {
781
841
  return __tailRec(x24tcOpt_5, {h: 2, a1: $0, a2: $1, a3: $2, a4: $3, a5: $4, a6: $5, a7: $6, a8: $7, a9: $8, a10: $9, a11: $a});
782
842
  }
783
843
 
@@ -812,7 +872,7 @@ function Prelude_Types_compare_Ord_x28Listx20x24ax29($0, $1, $2) {
812
872
  return __tailRec(x24tcOpt_6, {h: 1, a1: $0, a2: $1, a3: $2});
813
873
  }
814
874
 
815
- function Prelude_Types_case__compare_6236($0, $1, $2, $3, $4, $5) {
875
+ function Prelude_Types_case__compare_6195($0, $1, $2, $3, $4, $5) {
816
876
  return __tailRec(x24tcOpt_6, {h: 2, a1: $0, a2: $1, a3: $2, a4: $3, a5: $4, a6: $5});
817
877
  }
818
878
 
@@ -846,17 +906,17 @@ function Prelude_Types_x3dx3d_Eq_x28Listx20x24ax29($0, $1, $2) {
846
906
  function x24tcOpt_8($0) {
847
907
  switch($0.a2.h) {
848
908
  case 0: return {h: 0, a1: _truncToChar($0.a3)};
849
- case undefined: return {h: 1, a1: $0.a1, a2: $0.a2.a2, a3: _add32s(Language_JSON_String_Tokens_n__3003_1162_hexVal($0.a1, $0.a2.a1), _mul32s(Number(_truncBigInt32(16n)), $0.a3))};
909
+ case undefined: return {h: 1, a1: $0.a1, a2: $0.a2.a2, a3: _add32s(Language_JSON_String_Tokens_n__3203_1166_hexVal($0.a1, $0.a2.a1), _mul32s(Number(_truncBigInt32(16n)), $0.a3))};
850
910
  }
851
911
  }
852
912
 
853
- function Language_JSON_String_Tokens_n__3003_1163_fromHex($0, $1, $2) {
913
+ function Language_JSON_String_Tokens_n__3203_1167_fromHex($0, $1, $2) {
854
914
  return __tailRec(x24tcOpt_8, {h: 1, a1: $0, a2: $1, a3: $2});
855
915
  }
856
916
 
857
917
  function x24tcOpt_9($0) {
858
918
  switch($0.h) {
859
- case 1: return {h: 2, a1: $0.a6, a2: $0.a5, a3: $0.a4, a4: $0.a3, a5: $0.a2, a6: $0.a1, a7: Text_Lexer_Core_n__3455_2497_getFirstToken($0.a6, $0.a5, $0.a4, $0.a3, $0.a2, $0.a1, $0.a5, $0.a6)};
919
+ case 1: return {h: 2, a1: $0.a6, a2: $0.a5, a3: $0.a4, a4: $0.a3, a5: $0.a2, a6: $0.a1, a7: Text_Lexer_Core_n__3659_2501_getFirstToken($0.a6, $0.a5, $0.a4, $0.a3, $0.a2, $0.a1, $0.a5, $0.a6)};
860
920
  case 2: {
861
921
  switch($0.a7.h) {
862
922
  case undefined: {
@@ -875,7 +935,7 @@ function Text_Lexer_Core_tokenise($0, $1, $2, $3, $4, $5) {
875
935
  return __tailRec(x24tcOpt_9, {h: 1, a1: $0, a2: $1, a3: $2, a4: $3, a5: $4, a6: $5});
876
936
  }
877
937
 
878
- function Text_Lexer_Core_case__tokenise_2722($0, $1, $2, $3, $4, $5, $6) {
938
+ function Text_Lexer_Core_case__tokenise_2726($0, $1, $2, $3, $4, $5, $6) {
879
939
  return __tailRec(x24tcOpt_9, {h: 2, a1: $0, a2: $1, a3: $2, a4: $3, a5: $4, a6: $5, a7: $6});
880
940
  }
881
941
 
@@ -910,15 +970,15 @@ function x24tcOpt_11($0) {
910
970
  switch($0.a3.h) {
911
971
  case 0: return {h: 0, a1: {h: 0}};
912
972
  case undefined: {
913
- switch(Prelude_Types_elemBy(csegen_104(), $0.a2, $0.a3.a1, $0.a1)) {
973
+ switch(Prelude_Types_elemBy(csegen_77(), $0.a2, $0.a3.a1, $0.a1)) {
914
974
  case 1: return {h: 1, a1: $0.a1, a2: $0.a2, a3: $0.a3.a2};
915
- case 0: return {h: 0, a1: {a1: $0.a3.a1, a2: Data_List_n__4238_2645_nubByx27({a1: $0.a3.a1, a2: $0.a1}, $0.a2, $0.a3.a2)}};
975
+ case 0: return {h: 0, a1: {a1: $0.a3.a1, a2: Data_List_n__4343_3930_nubByx27({a1: $0.a3.a1, a2: $0.a1}, $0.a2, $0.a3.a2)}};
916
976
  }
917
977
  }
918
978
  }
919
979
  }
920
980
 
921
- function Data_List_n__4238_2645_nubByx27($0, $1, $2) {
981
+ function Data_List_n__4343_3930_nubByx27($0, $1, $2) {
922
982
  return __tailRec(x24tcOpt_11, {h: 1, a1: $0, a2: $1, a3: $2});
923
983
  }
924
984
 
@@ -946,7 +1006,7 @@ function x24tcOpt_12($0) {
946
1006
  }
947
1007
  }
948
1008
 
949
- function Data_String_with__ltrim_3641($0, $1) {
1009
+ function Data_String_with__ltrim_6503($0, $1) {
950
1010
  return __tailRec(x24tcOpt_12, {h: 1, a1: $0, a2: $1});
951
1011
  }
952
1012
 
@@ -997,14 +1057,14 @@ function Data_List_lookupBy($0, $1, $2) {
997
1057
  }
998
1058
 
999
1059
  function x24tcOpt_15($0) {
1000
- switch($0.a4.h) {
1001
- case 0: return {h: 0, a1: Prelude_Types_List_reverse($0.a3)};
1002
- case undefined: return {h: 1, a1: $0.a1, a2: $0.a2, a3: Prelude_Types_List_reverseOnto($0.a3, $0.a1($0.a4.a1)), a4: $0.a4.a2};
1060
+ switch($0.a3.h) {
1061
+ case 0: return {h: 0, a1: Prelude_Types_List_reverse($0.a2)};
1062
+ case undefined: return {h: 1, a1: $0.a1, a2: Prelude_Types_List_reverseOnto($0.a2, $0.a1($0.a3.a1)), a3: $0.a3.a2};
1003
1063
  }
1004
1064
  }
1005
1065
 
1006
- function Prelude_Types_n__7533_6840_go($0, $1, $2, $3) {
1007
- return __tailRec(x24tcOpt_15, {h: 1, a1: $0, a2: $1, a3: $2, a4: $3});
1066
+ function Prelude_Types_listBindOnto($0, $1, $2) {
1067
+ return __tailRec(x24tcOpt_15, {h: 1, a1: $0, a2: $1, a3: $2});
1008
1068
  }
1009
1069
 
1010
1070
  function x24tcOpt_16($0) {
@@ -1017,16 +1077,16 @@ function x24tcOpt_16($0) {
1017
1077
  case 0: return {h: 0, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: {h: 0}}};
1018
1078
  case undefined: {
1019
1079
  switch($0.a3.a1) {
1020
- case '\n': return {h: 0, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: Data_String_n__3252_3457_linesHelp($0.a1, {h: 0}, $0.a3.a2)}};
1080
+ case '\n': return {h: 0, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: Data_String_n__3748_6341_linesHelp($0.a1, {h: 0}, $0.a3.a2)}};
1021
1081
  case '\r': {
1022
1082
  switch($0.a3.a2.h) {
1023
1083
  case undefined: {
1024
1084
  switch($0.a3.a2.a1) {
1025
- case '\n': return {h: 0, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: Data_String_n__3252_3457_linesHelp($0.a1, {h: 0}, $0.a3.a2.a2)}};
1026
- default: return {h: 0, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: Data_String_n__3252_3457_linesHelp($0.a1, {h: 0}, $0.a3.a2)}};
1085
+ case '\n': return {h: 0, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: Data_String_n__3748_6341_linesHelp($0.a1, {h: 0}, $0.a3.a2.a2)}};
1086
+ default: return {h: 0, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: Data_String_n__3748_6341_linesHelp($0.a1, {h: 0}, $0.a3.a2)}};
1027
1087
  }
1028
1088
  }
1029
- default: return {h: 0, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: Data_String_n__3252_3457_linesHelp($0.a1, {h: 0}, $0.a3.a2)}};
1089
+ default: return {h: 0, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: Data_String_n__3748_6341_linesHelp($0.a1, {h: 0}, $0.a3.a2)}};
1030
1090
  }
1031
1091
  }
1032
1092
  default: return {h: 1, a1: $0.a1, a2: {a1: $0.a3.a1, a2: $0.a2}, a3: $0.a3.a2};
@@ -1041,16 +1101,16 @@ function x24tcOpt_16($0) {
1041
1101
  case 0: return {h: 0, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: {h: 0}}};
1042
1102
  case undefined: {
1043
1103
  switch($0.a3.a1) {
1044
- case '\n': return {h: 0, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: Data_String_n__3252_3457_linesHelp($0.a1, {h: 0}, $0.a3.a2)}};
1104
+ case '\n': return {h: 0, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: Data_String_n__3748_6341_linesHelp($0.a1, {h: 0}, $0.a3.a2)}};
1045
1105
  case '\r': {
1046
1106
  switch($0.a3.a2.h) {
1047
1107
  case undefined: {
1048
1108
  switch($0.a3.a2.a1) {
1049
- case '\n': return {h: 0, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: Data_String_n__3252_3457_linesHelp($0.a1, {h: 0}, $0.a3.a2.a2)}};
1050
- default: return {h: 0, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: Data_String_n__3252_3457_linesHelp($0.a1, {h: 0}, $0.a3.a2)}};
1109
+ case '\n': return {h: 0, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: Data_String_n__3748_6341_linesHelp($0.a1, {h: 0}, $0.a3.a2.a2)}};
1110
+ default: return {h: 0, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: Data_String_n__3748_6341_linesHelp($0.a1, {h: 0}, $0.a3.a2)}};
1051
1111
  }
1052
1112
  }
1053
- default: return {h: 0, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: Data_String_n__3252_3457_linesHelp($0.a1, {h: 0}, $0.a3.a2)}};
1113
+ default: return {h: 0, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: Data_String_n__3748_6341_linesHelp($0.a1, {h: 0}, $0.a3.a2)}};
1054
1114
  }
1055
1115
  }
1056
1116
  default: return {h: 1, a1: $0.a1, a2: {a1: $0.a3.a1, a2: $0.a2}, a3: $0.a3.a2};
@@ -1061,7 +1121,7 @@ function x24tcOpt_16($0) {
1061
1121
  }
1062
1122
  }
1063
1123
 
1064
- function Data_String_n__3252_3457_linesHelp($0, $1, $2) {
1124
+ function Data_String_n__3748_6341_linesHelp($0, $1, $2) {
1065
1125
  return __tailRec(x24tcOpt_16, {h: 1, a1: $0, a2: $1, a3: $2});
1066
1126
  }
1067
1127
 
@@ -1079,14 +1139,14 @@ function Prelude_Types_List_lengthPlus($0, $1) {
1079
1139
  function x24tcOpt_18($0) {
1080
1140
  switch($0.a6.h) {
1081
1141
  case 0: return {h: 0, a1: {h: 0}};
1082
- case 2: return {h: 0, a1: {h: 5, a1: Text_PrettyPrint_Prettyprinter_Doc_n__8191_6695_best($0.a1, $0.a2, $0.a3, $0.a4, $0.a5, $0.a6.a1)}};
1142
+ case 2: return {h: 0, a1: {h: 5, a1: Text_PrettyPrint_Prettyprinter_Doc_n__8712_6699_best($0.a1, $0.a2, $0.a3, $0.a4, $0.a5, $0.a6.a1)}};
1083
1143
  case 1: {
1084
1144
  switch($0.a6.a2.h) {
1085
1145
  case 0: return {h: 1, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5, a6: $0.a6.a3};
1086
- case 1: return {h: 0, a1: {h: 1, a1: $0.a6.a2.a1, a2: () => Text_PrettyPrint_Prettyprinter_Doc_n__8191_6695_best($0.a1, $0.a2, $0.a3, $0.a4, _add32s($0.a5, 1), $0.a6.a3)}};
1087
- case 2: return {h: 0, a1: {h: 2, a1: $0.a6.a2.a1, a2: $0.a6.a2.a2, a3: () => Text_PrettyPrint_Prettyprinter_Doc_n__8191_6695_best($0.a1, $0.a2, $0.a3, $0.a4, _add32s($0.a5, $0.a6.a2.a1), $0.a6.a3)}};
1146
+ case 1: return {h: 0, a1: {h: 1, a1: $0.a6.a2.a1, a2: () => Text_PrettyPrint_Prettyprinter_Doc_n__8712_6699_best($0.a1, $0.a2, $0.a3, $0.a4, _add32s($0.a5, 1), $0.a6.a3)}};
1147
+ case 2: return {h: 0, a1: {h: 2, a1: $0.a6.a2.a1, a2: $0.a6.a2.a2, a3: () => Text_PrettyPrint_Prettyprinter_Doc_n__8712_6699_best($0.a1, $0.a2, $0.a3, $0.a4, _add32s($0.a5, $0.a6.a2.a1), $0.a6.a3)}};
1088
1148
  case 3: {
1089
- const $2d = Text_PrettyPrint_Prettyprinter_Doc_n__8191_6695_best($0.a1, $0.a2, $0.a3, $0.a6.a1, $0.a6.a1, $0.a6.a3);
1149
+ const $2d = Text_PrettyPrint_Prettyprinter_Doc_n__8712_6699_best($0.a1, $0.a2, $0.a3, $0.a6.a1, $0.a6.a1, $0.a6.a3);
1090
1150
  let $35;
1091
1151
  switch($2d.h) {
1092
1152
  case 0: {
@@ -1105,20 +1165,20 @@ function x24tcOpt_18($0) {
1105
1165
  case 5: return {h: 1, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5, a6: {h: 1, a1: $0.a6.a1, a2: $0.a6.a2.a1, a3: {h: 1, a1: $0.a6.a1, a2: $0.a6.a2.a2, a3: $0.a6.a3}}};
1106
1166
  case 6: return {h: 1, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5, a6: {h: 1, a1: _add32s($0.a6.a1, $0.a6.a2.a1), a2: $0.a6.a2.a2, a3: $0.a6.a3}};
1107
1167
  case 7: {
1108
- const $5d = Text_PrettyPrint_Prettyprinter_Doc_n__8191_6695_best($0.a1, $0.a2, $0.a3, $0.a4, $0.a5, {h: 1, a1: $0.a6.a1, a2: $0.a6.a2.a1(), a3: $0.a6.a3});
1109
- const $69 = Text_PrettyPrint_Prettyprinter_Doc_n__8191_6695_best($0.a1, $0.a2, $0.a3, $0.a4, $0.a5, {h: 1, a1: $0.a6.a1, a2: $0.a6.a2.a2(), a3: $0.a6.a3});
1110
- return {h: 0, a1: Text_PrettyPrint_Prettyprinter_Doc_n__8191_6694_selectNicer($0.a1, $0.a2, $0.a3, $0.a4, $0.a5, $5d, () => $69)};
1168
+ const $5d = Text_PrettyPrint_Prettyprinter_Doc_n__8712_6699_best($0.a1, $0.a2, $0.a3, $0.a4, $0.a5, {h: 1, a1: $0.a6.a1, a2: $0.a6.a2.a1(), a3: $0.a6.a3});
1169
+ const $69 = Text_PrettyPrint_Prettyprinter_Doc_n__8712_6699_best($0.a1, $0.a2, $0.a3, $0.a4, $0.a5, {h: 1, a1: $0.a6.a1, a2: $0.a6.a2.a2(), a3: $0.a6.a3});
1170
+ return {h: 0, a1: Text_PrettyPrint_Prettyprinter_Doc_n__8712_6698_selectNicer($0.a1, $0.a2, $0.a3, $0.a4, $0.a5, $5d, () => $69)};
1111
1171
  }
1112
1172
  case 8: return {h: 1, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5, a6: {h: 1, a1: $0.a6.a1, a2: $0.a6.a2.a1($0.a5), a3: $0.a6.a3}};
1113
1173
  case 9: return {h: 1, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5, a6: {h: 1, a1: $0.a6.a1, a2: $0.a6.a2.a1($0.a2), a3: $0.a6.a3}};
1114
1174
  case 10: return {h: 1, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5, a6: {h: 1, a1: $0.a6.a1, a2: $0.a6.a2.a1($0.a6.a1), a3: $0.a6.a3}};
1115
- case 11: return {h: 0, a1: {h: 4, a1: $0.a6.a2.a1, a2: Text_PrettyPrint_Prettyprinter_Doc_n__8191_6695_best($0.a1, $0.a2, $0.a3, $0.a4, $0.a5, {h: 1, a1: $0.a6.a1, a2: $0.a6.a2.a2, a3: {h: 2, a1: $0.a6.a3}})}};
1175
+ case 11: return {h: 0, a1: {h: 4, a1: $0.a6.a2.a1, a2: Text_PrettyPrint_Prettyprinter_Doc_n__8712_6699_best($0.a1, $0.a2, $0.a3, $0.a4, $0.a5, {h: 1, a1: $0.a6.a1, a2: $0.a6.a2.a2, a3: {h: 2, a1: $0.a6.a3}})}};
1116
1176
  }
1117
1177
  }
1118
1178
  }
1119
1179
  }
1120
1180
 
1121
- function Text_PrettyPrint_Prettyprinter_Doc_n__8191_6695_best($0, $1, $2, $3, $4, $5) {
1181
+ function Text_PrettyPrint_Prettyprinter_Doc_n__8712_6699_best($0, $1, $2, $3, $4, $5) {
1122
1182
  return __tailRec(x24tcOpt_18, {h: 1, a1: $0, a2: $1, a3: $2, a4: $3, a5: $4, a6: $5});
1123
1183
  }
1124
1184
 
@@ -1172,7 +1232,7 @@ function x24tcOpt_21($0) {
1172
1232
  }
1173
1233
  }
1174
1234
 
1175
- function Data_String_Extra_with__index_1614($0, $1, $2) {
1235
+ function Data_String_Extra_with__index_1618($0, $1, $2) {
1176
1236
  return __tailRec(x24tcOpt_21, {h: 1, a1: $0, a2: $1, a3: $2});
1177
1237
  }
1178
1238
 
@@ -1244,18 +1304,34 @@ function x24tcOpt_25($0) {
1244
1304
  case 0: return {h: 0, a1: {h: 0}};
1245
1305
  case undefined: {
1246
1306
  switch($0.a1($0.a2.a1)) {
1247
- case 1: return {h: 0, a1: {a1: $0.a2.a1, a2: Data_List_filter($0.a1, $0.a2.a2)}};
1307
+ case 1: return {h: 0, a1: {a1: $0.a2.a1}};
1248
1308
  case 0: return {h: 1, a1: $0.a1, a2: $0.a2.a2};
1249
1309
  }
1250
1310
  }
1251
1311
  }
1252
1312
  }
1253
1313
 
1254
- function Data_List_filter($0, $1) {
1314
+ function Data_List_find($0, $1) {
1255
1315
  return __tailRec(x24tcOpt_25, {h: 1, a1: $0, a2: $1});
1256
1316
  }
1257
1317
 
1258
1318
  function x24tcOpt_26($0) {
1319
+ switch($0.a2.h) {
1320
+ case 0: return {h: 0, a1: {h: 0}};
1321
+ case undefined: {
1322
+ switch($0.a1($0.a2.a1)) {
1323
+ case 1: return {h: 0, a1: {a1: $0.a2.a1, a2: Prelude_Types_List_filter($0.a1, $0.a2.a2)}};
1324
+ case 0: return {h: 1, a1: $0.a1, a2: $0.a2.a2};
1325
+ }
1326
+ }
1327
+ }
1328
+ }
1329
+
1330
+ function Prelude_Types_List_filter($0, $1) {
1331
+ return __tailRec(x24tcOpt_26, {h: 1, a1: $0, a2: $1});
1332
+ }
1333
+
1334
+ function x24tcOpt_27($0) {
1259
1335
  switch($0.a1) {
1260
1336
  case 0n: return {h: 0, a1: $0.a2};
1261
1337
  default: {
@@ -1269,10 +1345,10 @@ function x24tcOpt_26($0) {
1269
1345
  }
1270
1346
 
1271
1347
  function Data_List_drop($0, $1) {
1272
- return __tailRec(x24tcOpt_26, {h: 1, a1: $0, a2: $1});
1348
+ return __tailRec(x24tcOpt_27, {h: 1, a1: $0, a2: $1});
1273
1349
  }
1274
1350
 
1275
- function x24tcOpt_27($0) {
1351
+ function x24tcOpt_28($0) {
1276
1352
  switch($0.a2.h) {
1277
1353
  case 0: return {h: 0, a1: $0.a1};
1278
1354
  case undefined: return {h: 1, a1: {a1: $0.a2.a1, a2: $0.a1}, a2: $0.a2.a2};
@@ -1280,27 +1356,27 @@ function x24tcOpt_27($0) {
1280
1356
  }
1281
1357
 
1282
1358
  function Prelude_Types_List_reverseOnto($0, $1) {
1283
- return __tailRec(x24tcOpt_27, {h: 1, a1: $0, a2: $1});
1359
+ return __tailRec(x24tcOpt_28, {h: 1, a1: $0, a2: $1});
1284
1360
  }
1285
1361
 
1286
- function x24tcOpt_28($0) {
1362
+ function x24tcOpt_29($0) {
1287
1363
  switch($0.a2.h) {
1288
1364
  case 0: return {h: 0, a1: {h: 0}};
1289
1365
  case undefined: {
1290
1366
  const $4 = $0.a1($0.a2.a1);
1291
1367
  switch($4.h) {
1292
1368
  case 0: return {h: 1, a1: $0.a1, a2: $0.a2.a2};
1293
- case undefined: return {h: 0, a1: {a1: $4.a1, a2: Data_List_mapMaybe($0.a1, $0.a2.a2)}};
1369
+ case undefined: return {h: 0, a1: {a1: $4.a1, a2: Prelude_Types_List_mapMaybe($0.a1, $0.a2.a2)}};
1294
1370
  }
1295
1371
  }
1296
1372
  }
1297
1373
  }
1298
1374
 
1299
- function Data_List_mapMaybe($0, $1) {
1300
- return __tailRec(x24tcOpt_28, {h: 1, a1: $0, a2: $1});
1375
+ function Prelude_Types_List_mapMaybe($0, $1) {
1376
+ return __tailRec(x24tcOpt_29, {h: 1, a1: $0, a2: $1});
1301
1377
  }
1302
1378
 
1303
- function x24tcOpt_29($0) {
1379
+ function x24tcOpt_30($0) {
1304
1380
  switch($0.a3.h) {
1305
1381
  case 0: return {h: 0, a1: $0.a2};
1306
1382
  case undefined: return {h: 1, a1: $0.a1, a2: $0.a1($0.a2)($0.a3.a1), a3: $0.a3.a2};
@@ -1308,10 +1384,10 @@ function x24tcOpt_29($0) {
1308
1384
  }
1309
1385
 
1310
1386
  function Prelude_Types_foldl_Foldable_List($0, $1, $2) {
1311
- return __tailRec(x24tcOpt_29, {h: 1, a1: $0, a2: $1, a3: $2});
1387
+ return __tailRec(x24tcOpt_30, {h: 1, a1: $0, a2: $1, a3: $2});
1312
1388
  }
1313
1389
 
1314
- function x24tcOpt_30($0) {
1390
+ function x24tcOpt_31($0) {
1315
1391
  switch($0.a1) {
1316
1392
  case 0n: return {h: 0, a1: Prelude_Uninhabited_absurd($6 => Data_Nat_uninhabited_Uninhabited_x28x28LTEx20x28Sx20x24nx29x29x20Zx29($6), $0.a2)};
1317
1393
  default: {
@@ -1328,54 +1404,58 @@ function x24tcOpt_30($0) {
1328
1404
  }
1329
1405
 
1330
1406
  function Data_Nat_LTEImpliesNotGT($0, $1) {
1331
- return __tailRec(x24tcOpt_30, {h: 1, a1: $0, a2: $1});
1407
+ return __tailRec(x24tcOpt_31, {h: 1, a1: $0, a2: $1});
1332
1408
  }
1333
1409
 
1334
1410
  const __mainExpression_0 = __lazy(function () {
1335
1411
  return PrimIO_unsafePerformIO($2 => Main_main($2));
1336
1412
  });
1337
1413
 
1338
- const csegen_0 = __lazy(function () {
1339
- return $0 => $1 => ($0+$1);
1414
+ const csegen_3 = __lazy(function () {
1415
+ return b => a => func => $0 => $1 => $2 => Data_Promise_map_Functor_Promise(func, $0, $1, $2);
1340
1416
  });
1341
1417
 
1342
- const csegen_1 = __lazy(function () {
1343
- return $0 => $1 => ($0*$1);
1418
+ const csegen_9 = __lazy(function () {
1419
+ return {a1: csegen_3(), a2: a => $3 => $4 => $5 => Data_Promise_pure_Applicative_Promise($3, $4, $5), a3: b => a => $b => $c => $d => $e => Data_Promise_x3cx2ax3e_Applicative_Promise($b, $c, $d, $e)};
1344
1420
  });
1345
1421
 
1346
- const csegen_2 = __lazy(function () {
1347
- return {a1: csegen_0(), a2: csegen_1(), a3: $5 => $5};
1422
+ const csegen_15 = __lazy(function () {
1423
+ return {a1: csegen_9(), a2: b => a => $3 => $4 => $5 => $6 => Data_Promise_x3ex3ex3d_Monad_Promise($3, $4, $5, $6), a3: a => $d => $e => $f => Data_Promise_join_Monad_Promise($d, $e, $f)};
1348
1424
  });
1349
1425
 
1350
- const csegen_5 = __lazy(function () {
1351
- return b => a => func => $0 => $1 => $2 => Data_Promise_map_Functor_Promise(func, $0, $1, $2);
1426
+ const csegen_18 = __lazy(function () {
1427
+ return $0 => $1 => $2 => $3 => Prelude_Types_map_Functor_Maybe($2, $3);
1352
1428
  });
1353
1429
 
1354
- const csegen_11 = __lazy(function () {
1355
- return {a1: csegen_5(), a2: a => $3 => $4 => $5 => Data_Promise_pure_Applicative_Promise($3, $4, $5), a3: b => a => $b => $c => $d => $e => Data_Promise_x3cx2ax3e_Applicative_Promise($b, $c, $d, $e)};
1430
+ const csegen_21 = __lazy(function () {
1431
+ return {a1: csegen_15(), a2: a => $3 => $4 => $5 => $6 => Data_Promise_liftIO_HasIO_Promise($3, $4, $5, $6)};
1356
1432
  });
1357
1433
 
1358
- const csegen_17 = __lazy(function () {
1359
- return {a1: csegen_11(), a2: b => a => $3 => $4 => $5 => $6 => Data_Promise_x3ex3ex3d_Monad_Promise($3, $4, $5, $6), a3: a => $d => $e => $f => Data_Promise_join_Monad_Promise($d, $e, $f)};
1434
+ const csegen_27 = __lazy(function () {
1435
+ return $0 => $1 => ($0+$1);
1360
1436
  });
1361
1437
 
1362
- const csegen_20 = __lazy(function () {
1363
- return {a1: csegen_17(), a2: a => $3 => $4 => $5 => $6 => Data_Promise_liftIO_HasIO_Promise($3, $4, $5, $6)};
1438
+ const csegen_28 = __lazy(function () {
1439
+ return $0 => $1 => ($0*$1);
1364
1440
  });
1365
1441
 
1366
- const csegen_21 = __lazy(function () {
1367
- return Main_exitError(csegen_20(), 'contribute\'s argument must be -<num> where <num> is an integer.');
1442
+ const csegen_29 = __lazy(function () {
1443
+ return {a1: csegen_27(), a2: csegen_28(), a3: $5 => $5};
1368
1444
  });
1369
1445
 
1370
- const csegen_27 = __lazy(function () {
1371
- return {a1: csegen_0(), a2: csegen_1(), a3: $5 => Prelude_Types_prim__integerToNat($5)};
1446
+ const csegen_30 = __lazy(function () {
1447
+ return {a1: csegen_27(), a2: csegen_28(), a3: $5 => Prelude_Types_prim__integerToNat($5)};
1372
1448
  });
1373
1449
 
1374
- const csegen_39 = __lazy(function () {
1375
- return {a1: {a1: b => a => func => $2 => Prelude_Types_map_Functor_Maybe(func, $2), a2: a => $7 => ({a1: $7}), a3: b => a => $a => $b => Prelude_Types_x3cx2ax3e_Applicative_Maybe($a, $b)}, a2: b => a => $10 => $11 => Prelude_Types_x3ex3ex3d_Monad_Maybe($10, $11), a3: a => $16 => Prelude_Types_join_Monad_Maybe($16)};
1450
+ const csegen_37 = __lazy(function () {
1451
+ return {a1: b => a => func => $1 => Prelude_Types_map_Functor_Maybe(func, $1), a2: a => $6 => ({a1: $6}), a3: b => a => $9 => $a => Prelude_Types_x3cx2ax3e_Applicative_Maybe($9, $a)};
1376
1452
  });
1377
1453
 
1378
- const csegen_49 = __lazy(function () {
1454
+ const csegen_42 = __lazy(function () {
1455
+ return {a1: csegen_37(), a2: b => a => $3 => $4 => Prelude_Types_x3ex3ex3d_Monad_Maybe($3, $4), a3: a => $9 => Prelude_Types_join_Monad_Maybe($9)};
1456
+ });
1457
+
1458
+ const csegen_52 = __lazy(function () {
1379
1459
  const $a = b => a => $b => $c => $d => {
1380
1460
  const $e = $b($d);
1381
1461
  const $11 = $c($d);
@@ -1384,216 +1464,228 @@ const csegen_49 = __lazy(function () {
1384
1464
  return {a1: b => a => func => $1 => $2 => Prelude_IO_map_Functor_IO(func, $1, $2), a2: a => $8 => $9 => $8, a3: $a};
1385
1465
  });
1386
1466
 
1387
- const csegen_52 = __lazy(function () {
1467
+ const csegen_55 = __lazy(function () {
1388
1468
  return b => a => $0 => $1 => $2 => {
1389
1469
  const $3 = $0($2);
1390
1470
  return $1($3)($2);
1391
1471
  };
1392
1472
  });
1393
1473
 
1394
- const csegen_56 = __lazy(function () {
1474
+ const csegen_59 = __lazy(function () {
1395
1475
  const $5 = a => $6 => $7 => {
1396
1476
  const $8 = $6($7);
1397
1477
  return $8($7);
1398
1478
  };
1399
- const $0 = {a1: csegen_49(), a2: csegen_52(), a3: $5};
1479
+ const $0 = {a1: csegen_52(), a2: csegen_55(), a3: $5};
1400
1480
  return {a1: $0, a2: a => $e => $e};
1401
1481
  });
1402
1482
 
1403
1483
  const csegen_62 = __lazy(function () {
1484
+ return {a1: $1 => $2 => ($1+$2), a2: ''};
1485
+ });
1486
+
1487
+ const csegen_77 = __lazy(function () {
1488
+ return {a1: acc => elem => func => init => input => Prelude_Types_foldr_Foldable_List(func, init, input), a2: elem => acc => func => init => input => Prelude_Types_foldl_Foldable_List(func, init, input), a3: elem => $b => Prelude_Types_null_Foldable_List($b), a4: elem => acc => m => $f => funcM => init => input => Prelude_Types_foldlM_Foldable_List($f, funcM, init, input), a5: elem => $16 => $16, a6: a => m => $18 => f => $19 => Prelude_Types_foldMap_Foldable_List($18, f, $19)};
1489
+ });
1490
+
1491
+ const csegen_80 = __lazy(function () {
1492
+ return {a1: csegen_37(), a2: a => ({h: 0}), a3: a => $4 => $5 => Prelude_Types_x3cx7cx3e_Alternative_Maybe($4, $5)};
1493
+ });
1494
+
1495
+ const csegen_85 = __lazy(function () {
1404
1496
  return $0 => $1 => $2 => $3 => $4 => Prelude_IO_map_Functor_IO($2, $3, $4);
1405
1497
  });
1406
1498
 
1407
- const csegen_68 = __lazy(function () {
1499
+ const csegen_91 = __lazy(function () {
1408
1500
  const $4 = a => $5 => $6 => {
1409
1501
  const $7 = $5($6);
1410
1502
  return $7($6);
1411
1503
  };
1412
- return {a1: csegen_49(), a2: csegen_52(), a3: $4};
1504
+ return {a1: csegen_52(), a2: csegen_55(), a3: $4};
1413
1505
  });
1414
1506
 
1415
- const csegen_71 = __lazy(function () {
1507
+ const csegen_94 = __lazy(function () {
1416
1508
  return {a1: $1 => $2 => Prelude_EqOrd_x3dx3d_Eq_String($1, $2), a2: $7 => $8 => Prelude_EqOrd_x2fx3d_Eq_String($7, $8)};
1417
1509
  });
1418
1510
 
1419
- const csegen_72 = __lazy(function () {
1420
- return System_exitSuccess(csegen_56());
1511
+ const csegen_95 = __lazy(function () {
1512
+ return System_exitSuccess(csegen_59());
1421
1513
  });
1422
1514
 
1423
- const csegen_80 = __lazy(function () {
1515
+ const csegen_103 = __lazy(function () {
1424
1516
  return $0 => $1 => $2 => $3 => $4 => $5 => Data_Promise_map_Functor_Promise($2, $3, $4, $5);
1425
1517
  });
1426
1518
 
1427
- const csegen_88 = __lazy(function () {
1428
- return {a1: csegen_71(), a2: $3 => $4 => Prelude_EqOrd_compare_Ord_String($3, $4), a3: $9 => $a => Prelude_EqOrd_x3c_Ord_String($9, $a), a4: $f => $10 => Prelude_EqOrd_x3e_Ord_String($f, $10), a5: $15 => $16 => Prelude_EqOrd_x3cx3d_Ord_String($15, $16), a6: $1b => $1c => Prelude_EqOrd_x3ex3d_Ord_String($1b, $1c), a7: $21 => $22 => Prelude_EqOrd_max_Ord_String($21, $22), a8: $27 => $28 => Prelude_EqOrd_min_Ord_String($27, $28)};
1519
+ const csegen_111 = __lazy(function () {
1520
+ return {a1: csegen_94(), a2: $3 => $4 => Prelude_EqOrd_compare_Ord_String($3, $4), a3: $9 => $a => Prelude_EqOrd_x3c_Ord_String($9, $a), a4: $f => $10 => Prelude_EqOrd_x3e_Ord_String($f, $10), a5: $15 => $16 => Prelude_EqOrd_x3cx3d_Ord_String($15, $16), a6: $1b => $1c => Prelude_EqOrd_x3ex3d_Ord_String($1b, $1c), a7: $21 => $22 => Prelude_EqOrd_max_Ord_String($21, $22), a8: $27 => $28 => Prelude_EqOrd_min_Ord_String($27, $28)};
1429
1521
  });
1430
1522
 
1431
- const csegen_104 = __lazy(function () {
1432
- return {a1: acc => elem => func => init => input => Prelude_Types_foldr_Foldable_List(func, init, input), a2: elem => acc => func => init => input => Prelude_Types_foldl_Foldable_List(func, init, input), a3: elem => $b => Prelude_Types_null_Foldable_List($b), a4: elem => acc => m => $f => funcM => init => input => Prelude_Types_foldlM_Foldable_List($f, funcM, init, input), a5: elem => $16 => $16, a6: a => m => $18 => f => $19 => Prelude_Types_foldMap_Foldable_List($18, f, $19)};
1523
+ const csegen_112 = __lazy(function () {
1524
+ return $0 => Data_List_sort(csegen_111(), $0);
1433
1525
  });
1434
1526
 
1435
- const csegen_105 = __lazy(function () {
1436
- return $0 => $1 => $2 => FFI_Concurrency_promiseAll(csegen_104(), $0, $1, $2);
1527
+ const csegen_113 = __lazy(function () {
1528
+ return $0 => $1 => $2 => FFI_Concurrency_promiseAll(csegen_77(), $0, $1, $2);
1437
1529
  });
1438
1530
 
1439
- const csegen_107 = __lazy(function () {
1531
+ const csegen_115 = __lazy(function () {
1440
1532
  return {a1: x => Prelude_Show_show_Show_String(x), a2: d => x => Prelude_Show_showPrec_Show_String(d, x)};
1441
1533
  });
1442
1534
 
1443
- const csegen_111 = __lazy(function () {
1535
+ const csegen_119 = __lazy(function () {
1444
1536
  return $0 => $1 => $2 => $3 => Prelude_Types_map_Functor_List($2, $3);
1445
1537
  });
1446
1538
 
1447
- const csegen_114 = __lazy(function () {
1448
- return {a1: $1 => $2 => ($1+$2), a2: ''};
1449
- });
1450
-
1451
- const csegen_122 = __lazy(function () {
1539
+ const csegen_128 = __lazy(function () {
1452
1540
  return $0 => $1 => Data_Promise_pure_Applicative_Promise(undefined, $0, $1);
1453
1541
  });
1454
1542
 
1455
- const csegen_128 = __lazy(function () {
1543
+ const csegen_134 = __lazy(function () {
1456
1544
  return Data_Fin_finFromInteger(100n, Prelude_Types_prim__integerToNat(101n));
1457
1545
  });
1458
1546
 
1459
- const csegen_133 = __lazy(function () {
1547
+ const csegen_139 = __lazy(function () {
1460
1548
  return $0 => $0.a1;
1461
1549
  });
1462
1550
 
1463
- const csegen_134 = __lazy(function () {
1551
+ const csegen_141 = __lazy(function () {
1464
1552
  return $0 => $1 => Data_Date_compare_Ord_Date($0, $1);
1465
1553
  });
1466
1554
 
1467
- const csegen_149 = __lazy(function () {
1468
- return $0 => $0.a2;
1469
- });
1470
-
1471
- const csegen_152 = __lazy(function () {
1472
- return $0 => $0.a1;
1473
- });
1474
-
1475
- const csegen_157 = __lazy(function () {
1476
- return $0 => $1 => Prelude_Types_max_Ord_Nat($0, $1);
1477
- });
1478
-
1479
- const csegen_161 = __lazy(function () {
1480
- return $0 => $1 => $2 => $3 => Prelude_Types_map_Functor_Maybe($2, $3);
1481
- });
1482
-
1483
- const csegen_162 = __lazy(function () {
1484
- return date => Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('earliest:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Data_Date_show_Show_Date(date)), a2: {h: 0}}}));
1485
- });
1486
-
1487
- const csegen_186 = __lazy(function () {
1555
+ const csegen_159 = __lazy(function () {
1488
1556
  return {a1: {a1: b => a => func => $2 => Control_Monad_ST_map_Functor_x28STx20x24sx29(func, $2), a2: a => $7 => $8 => $7, a3: b => a => $a => $b => $c => Control_Monad_ST_x3cx2ax3e_Applicative_x28STx20x24sx29($a, $b, $c)}, a2: b => a => $12 => $13 => $14 => Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($12, $13, $14), a3: a => $1a => $1b => Control_Monad_ST_join_Monad_x28STx20x24sx29($1a, $1b)};
1489
1557
  });
1490
1558
 
1491
- const csegen_199 = __lazy(function () {
1559
+ const csegen_172 = __lazy(function () {
1492
1560
  return $0 => $1 => Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29($0, $1);
1493
1561
  });
1494
1562
 
1495
- const csegen_203 = __lazy(function () {
1563
+ const csegen_176 = __lazy(function () {
1496
1564
  return {a1: $1 => $2 => Prelude_EqOrd_x3dx3d_Eq_Char($1, $2), a2: $7 => $8 => Prelude_EqOrd_x2fx3d_Eq_Char($7, $8)};
1497
1565
  });
1498
1566
 
1499
- const csegen_219 = __lazy(function () {
1567
+ const csegen_192 = __lazy(function () {
1500
1568
  return $0 => $1 => ({a1: $0, a2: $1});
1501
1569
  });
1502
1570
 
1503
- const csegen_220 = __lazy(function () {
1571
+ const csegen_193 = __lazy(function () {
1504
1572
  return $0 => $1 => $2 => $0($1($2));
1505
1573
  });
1506
1574
 
1507
- const csegen_271 = __lazy(function () {
1575
+ const csegen_244 = __lazy(function () {
1508
1576
  return b => a => $0 => $1 => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29($0, $1);
1509
1577
  });
1510
1578
 
1511
- const csegen_272 = __lazy(function () {
1579
+ const csegen_245 = __lazy(function () {
1512
1580
  return a => $0 => Prelude_Types_join_Monad_x28Eitherx20x24ex29($0);
1513
1581
  });
1514
1582
 
1515
- const csegen_273 = __lazy(function () {
1583
+ const csegen_246 = __lazy(function () {
1516
1584
  return $0 => Data_Either_maybeToEither(() => 'Failed to parse JSON', Language_JSON_parse($0));
1517
1585
  });
1518
1586
 
1519
- const csegen_276 = __lazy(function () {
1587
+ const csegen_249 = __lazy(function () {
1520
1588
  return b => a => func => $0 => Text_Bounded_map_Functor_WithBounds(func, $0);
1521
1589
  });
1522
1590
 
1523
- const csegen_287 = __lazy(function () {
1591
+ const csegen_260 = __lazy(function () {
1524
1592
  return {a1: {a1: $2 => $3 => Prelude_EqOrd_x3dx3d_Eq_Int($2, $3), a2: $8 => $9 => Prelude_EqOrd_x2fx3d_Eq_Int($8, $9)}, a2: $e => $f => Prelude_EqOrd_compare_Ord_Int($e, $f), a3: $14 => $15 => Prelude_EqOrd_x3c_Ord_Int($14, $15), a4: $1a => $1b => Prelude_EqOrd_x3e_Ord_Int($1a, $1b), a5: $20 => $21 => Prelude_EqOrd_x3cx3d_Ord_Int($20, $21), a6: $26 => $27 => Prelude_EqOrd_x3ex3d_Ord_Int($26, $27), a7: $2c => $2d => Prelude_EqOrd_max_Ord_Int($2c, $2d), a8: $32 => $33 => Prelude_EqOrd_min_Ord_Int($32, $33)};
1525
1593
  });
1526
1594
 
1527
- const csegen_295 = __lazy(function () {
1595
+ const csegen_268 = __lazy(function () {
1528
1596
  return {a1: $1 => Language_JSON_Tokens_TokType_TokenKind_JSONTokenKind($1), a2: kind => $5 => Language_JSON_Tokens_tokValue_TokenKind_JSONTokenKind(kind, $5)};
1529
1597
  });
1530
1598
 
1531
- const csegen_298 = __lazy(function () {
1599
+ const csegen_271 = __lazy(function () {
1532
1600
  return {a1: $1 => $2 => Language_JSON_Tokens_x3dx3d_Eq_JSONTokenKind($1, $2), a2: $7 => $8 => Language_JSON_Tokens_x2fx3d_Eq_JSONTokenKind($7, $8)};
1533
1601
  });
1534
1602
 
1535
- const csegen_334 = __lazy(function () {
1603
+ const csegen_307 = __lazy(function () {
1536
1604
  return {a1: $1 => Language_JSON_String_Tokens_TokType_TokenKind_JSONStringTokenKind($1), a2: kind => $5 => Language_JSON_String_Tokens_tokValue_TokenKind_JSONStringTokenKind(kind, $5)};
1537
1605
  });
1538
1606
 
1539
- const csegen_337 = __lazy(function () {
1607
+ const csegen_310 = __lazy(function () {
1540
1608
  return {a1: $1 => $2 => Language_JSON_String_Tokens_x3dx3d_Eq_JSONStringTokenKind($1, $2), a2: $7 => $8 => Language_JSON_String_Tokens_x2fx3d_Eq_JSONStringTokenKind($7, $8)};
1541
1609
  });
1542
1610
 
1543
- const csegen_353 = __lazy(function () {
1611
+ const csegen_326 = __lazy(function () {
1544
1612
  return $0 => $1 => $2 => $3 => Text_Bounded_map_Functor_WithBounds($2, $3);
1545
1613
  });
1546
1614
 
1547
- const csegen_355 = __lazy(function () {
1615
+ const csegen_328 = __lazy(function () {
1548
1616
  return {a1: {a1: 'End of input', a2: {h: 0}}, a2: {h: 0}};
1549
1617
  });
1550
1618
 
1551
- const csegen_400 = __lazy(function () {
1552
- return Prelude_IO_getLine(csegen_20());
1619
+ const csegen_380 = __lazy(function () {
1620
+ return $0 => $0.a2;
1553
1621
  });
1554
1622
 
1555
- const csegen_430 = __lazy(function () {
1623
+ const csegen_383 = __lazy(function () {
1624
+ return $0 => $0.a1;
1625
+ });
1626
+
1627
+ const csegen_388 = __lazy(function () {
1628
+ return $0 => $1 => Prelude_Types_max_Ord_Nat($0, $1);
1629
+ });
1630
+
1631
+ const csegen_390 = __lazy(function () {
1632
+ return date => Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('earliest:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Data_Date_show_Show_Date(date)), a2: {h: 0}}}));
1633
+ });
1634
+
1635
+ const csegen_402 = __lazy(function () {
1636
+ return $0 => Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(2), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($0));
1637
+ });
1638
+
1639
+ const csegen_404 = __lazy(function () {
1640
+ return Prelude_IO_getLine(csegen_21());
1641
+ });
1642
+
1643
+ const csegen_434 = __lazy(function () {
1556
1644
  return $0 => Language_JSON_Accessors_array($3 => Data_PullRequest_parsePR($3), $0);
1557
1645
  });
1558
1646
 
1559
- const csegen_450 = __lazy(function () {
1647
+ const csegen_454 = __lazy(function () {
1560
1648
  return {a1: acc => elem => func => init => input => Prelude_Types_foldr_Foldable_x28Eitherx20x24ex29(func, init, input), a2: elem => acc => func => init => input => Prelude_Types_foldl_Foldable_x28Eitherx20x24ex29(func, init, input), a3: elem => $b => Prelude_Types_null_Foldable_x28Eitherx20x24ex29($b), a4: elem => acc => m => $f => funcM => init => input => Prelude_Types_foldlM_Foldable_x28Eitherx20x24ex29($f, funcM, init, input), a5: elem => $16 => Prelude_Types_toList_Foldable_x28Eitherx20x24ex29($16), a6: a => m => $1a => f => $1b => Prelude_Types_foldMap_Foldable_x28Eitherx20x24ex29($1a, f, $1b)};
1561
1649
  });
1562
1650
 
1563
- const csegen_454 = __lazy(function () {
1651
+ const csegen_458 = __lazy(function () {
1564
1652
  return b => a => f => $0 => $1 => $2 => Prelude_Types_traverse_Traversable_x28Eitherx20x24ex29($0, $1, $2);
1565
1653
  });
1566
1654
 
1567
- const csegen_467 = __lazy(function () {
1655
+ const csegen_471 = __lazy(function () {
1568
1656
  return $0 => $0.a1;
1569
1657
  });
1570
1658
 
1571
- const csegen_475 = __lazy(function () {
1572
- return $0 => $1 => $2 => Data_Promise_either(csegen_107(), Data_PullRequest_parsePullRequestsString($0), $1, $2);
1659
+ const csegen_479 = __lazy(function () {
1660
+ return $0 => $1 => $2 => Data_Promise_either(csegen_115(), Data_PullRequest_parsePullRequestsString($0), $1, $2);
1573
1661
  });
1574
1662
 
1575
- const csegen_476 = __lazy(function () {
1576
- return $0 => $1 => $2 => Data_Promise_either(csegen_107(), Data_User_parseUserString($0), $1, $2);
1663
+ const csegen_480 = __lazy(function () {
1664
+ return $0 => $1 => $2 => Data_Promise_either(csegen_115(), Data_User_parseUserString($0), $1, $2);
1577
1665
  });
1578
1666
 
1579
- const csegen_508 = __lazy(function () {
1667
+ const csegen_513 = __lazy(function () {
1580
1668
  return {a1: $1 => $2 => _add32s($1, $2), a2: $6 => $7 => _mul32s($6, $7), a3: $b => Number(_truncBigInt32($b))};
1581
1669
  });
1582
1670
 
1583
- const csegen_524 = __lazy(function () {
1671
+ const csegen_528 = __lazy(function () {
1584
1672
  return $0 => $0.a2;
1585
1673
  });
1586
1674
 
1587
- const csegen_528 = __lazy(function () {
1675
+ const csegen_532 = __lazy(function () {
1588
1676
  return $0 => $0.a1;
1589
1677
  });
1590
1678
 
1591
- const csegen_531 = __lazy(function () {
1592
- return Prelude_Interfaces_x3cx24x3e(csegen_80(), $4 => Prelude_Cast_cast_Cast_Integer_Bits32($4), System_time(csegen_20()));
1679
+ const csegen_535 = __lazy(function () {
1680
+ return Prelude_Interfaces_x3cx24x3e(csegen_103(), $4 => Prelude_Cast_cast_Cast_Integer_Bits32($4), System_time(csegen_21()));
1593
1681
  });
1594
1682
 
1595
- const csegen_535 = __lazy(function () {
1596
- return {a1: csegen_20(), a2: {a1: x => Data_Config_show_Show_Config(x), a2: d => x => Data_Config_showPrec_Show_Config(d, x)}};
1683
+ const csegen_539 = __lazy(function () {
1684
+ return {a1: csegen_21(), a2: {a1: x => Data_Config_show_Show_Config(x), a2: d => x => Data_Config_showPrec_Show_Config(d, x)}};
1685
+ });
1686
+
1687
+ const csegen_564 = __lazy(function () {
1688
+ return {a1: {a1: '--checkout', a2: {a1: '-c', a2: {h: 0}}}};
1597
1689
  });
1598
1690
 
1599
1691
  function prim__add_Integer($0, $1) {
@@ -1608,60 +1700,66 @@ function prim__mul_Integer($0, $1) {
1608
1700
  return ($0*$1);
1609
1701
  }
1610
1702
 
1611
- function Main_case__handleConfiguredArgs_3520($0, $1, $2, $3, $4) {
1612
- switch($4.h) {
1703
+ function Main_case__contribute_2186($0, $1, $2, $3, $4, $5, $6, $7, $8, $9, $a) {
1704
+ const $c = Data_List_headx27(Data_List_drop($6, Prelude_Types_List_tailRecAppend($a.a1, $a.a2)));
1705
+ switch($c.h) {
1706
+ case 0: return $16 => $17 => Data_Promise_reject('No open PRs to review!', $16, $17);
1613
1707
  case undefined: {
1614
- switch($4.a1) {
1615
- case '-': {
1616
- const $7 = Prelude_Types_map_Functor_Maybe($a => Prelude_Cast_cast_Cast_Integer_Nat($a), Data_String_parsePositive(csegen_2(), Prelude_Types_fastPack($4.a2)));
1617
- switch($7.h) {
1618
- case undefined: return $14 => $15 => Main_contribute($0, $2, $7.a1, $14, $15);
1619
- case 0: return csegen_21();
1620
- }
1708
+ const $1f = $20 => $21 => {
1709
+ const $22 = Prelude_Interfaces_x24x3e(csegen_18(), $7, $c.a1.a6);
1710
+ switch($22.h) {
1711
+ case undefined: return FFI_Git_checkoutBranch($0, $22.a1, $20, $21);
1712
+ case 0: return Data_Promise_pure_Applicative_Promise(undefined, $20, $21);
1621
1713
  }
1622
- default: return csegen_21();
1623
- }
1714
+ };
1715
+ return Prelude_Interfaces_x3ex3e(csegen_15(), $1f, () => Prelude_IO_putStrLn(csegen_21(), Data_PullRequest_rf__webURI($3, $c.a1)));
1624
1716
  }
1625
- default: return csegen_21();
1626
1717
  }
1627
1718
  }
1628
1719
 
1629
- function Main_n__5829_2727_putNameLn($0, $1, $2, $3) {
1720
+ function Main_n__6408_1831_putNameLn($0, $1, $2, $3) {
1630
1721
  return Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_fillBreak(15, Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($3.a1))), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_unsafeTextWithoutNewLines('-'), a2: {h: 0}}), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($3.a2), a2: {h: 0}}}});
1631
1722
  }
1632
1723
 
1633
- function Main_n__6077_2987_printResult($0, $1, $2, $3) {
1634
- switch($3.h) {
1635
- case 0: return $5 => $6 => Data_Promise_reject('No open PRs to review!', $5, $6);
1636
- case undefined: return Prelude_IO_putStrLn(csegen_20(), $3.a1);
1637
- }
1638
- }
1639
-
1640
- function Main_n__5697_2617_partitionedArgs($0, $1, $2, $3, $4) {
1724
+ function Main_n__6276_1721_partitionedArgs($0, $1, $2, $3, $4) {
1641
1725
  const $5 = Data_List_partition($8 => Data_String_isPrefixOf('+', $8), $4);
1642
1726
  return {a1: Prelude_Types_map_Functor_List($11 => Data_String_Extra_drop(1n, $11), $5.a1), a2: $5.a2};
1643
1727
  }
1644
1728
 
1645
- function Main_n__6211_3201_parsePg($0, $1, $2, $3, $4, $5) {
1646
- return Data_String_parsePositive(csegen_27(), $5);
1729
+ function Main_n__6956_2384_parseSkipArg($0, $1) {
1730
+ const $2 = Prelude_Types_fastUnpack($1);
1731
+ switch($2.h) {
1732
+ case undefined: {
1733
+ switch($2.a1) {
1734
+ case '-': return Prelude_Types_map_Functor_Maybe($8 => ({a1: Prelude_Cast_cast_Cast_Integer_Nat($8)}), Data_String_parsePositive(csegen_29(), Prelude_Types_fastPack($2.a2)));
1735
+ default: return {h: 0};
1736
+ }
1737
+ }
1738
+ default: return {h: 0};
1739
+ }
1740
+ }
1741
+
1742
+ function Main_n__7155_2644_parsePg($0, $1, $2, $3, $4, $5) {
1743
+ return Data_String_parsePositive(csegen_30(), $5);
1647
1744
  }
1648
1745
 
1649
- function Main_n__6211_3200_parseLim($0, $1, $2, $3, $4) {
1650
- return Prelude_Interfaces_x3cx3dx3c(csegen_39(), x => Data_Fin_natToFin(x, Prelude_Types_prim__integerToNat(101n)), $f => Data_String_parsePositive(csegen_27(), $f));
1746
+ function Main_n__7155_2643_parseLim($0, $1, $2, $3, $4) {
1747
+ return Prelude_Interfaces_x3cx3dx3c(csegen_42(), x => Data_Fin_natToFin(x, Prelude_Types_prim__integerToNat(101n)), $f => Data_String_parsePositive(csegen_30(), $f));
1651
1748
  }
1652
1749
 
1653
- function Main_n__5970_2881_maybeDecorated($0, $1, $2, $3) {
1654
- switch(Data_Config_rf__colors($2)) {
1655
- case 1: return $3;
1656
- case 0: return Text_PrettyPrint_Prettyprinter_Doc_unAnnotate($3);
1750
+ function Main_n__6956_2383_parseCheckoutArg($0, $1) {
1751
+ switch($1) {
1752
+ case '-c': return {a1: {h: 0}};
1753
+ case '--checkout': return {a1: {h: 0}};
1754
+ default: return {h: 0};
1657
1755
  }
1658
1756
  }
1659
1757
 
1660
- function Main_n__5829_2726_forkedUser($0, $1, $2, $3) {
1661
- return FFI_Concurrency_fork(csegen_20(), ('user --json '+$3));
1758
+ function Main_n__6408_1830_forkedUser($0, $1, $2, $3) {
1759
+ return FFI_Concurrency_fork(csegen_21(), ('user --json '+$3));
1662
1760
  }
1663
1761
 
1664
- function Main_n__5567_2479_configuredOpts($0, $1, $2) {
1762
+ function Main_n__6146_1583_configuredOpts($0, $1, $2) {
1665
1763
  const $10 = $11 => {
1666
1764
  switch($11.h) {
1667
1765
  case 1: return $0.a1.a1.a2(undefined)(BashCompletion_opts($11.a1, $2, $1));
@@ -1671,6 +1769,13 @@ function Main_n__5567_2479_configuredOpts($0, $1, $2) {
1671
1769
  return $0.a1.a2(undefined)(undefined)(Config_loadConfig($0, 0, {h: 0}))($10);
1672
1770
  }
1673
1771
 
1772
+ function Main_skipArg($0) {
1773
+ switch($0.h) {
1774
+ case undefined: return {a1: $0.a1};
1775
+ default: return {h: 0};
1776
+ }
1777
+ }
1778
+
1674
1779
  function Main_shouldUseColors($0) {
1675
1780
  const $e = tty => {
1676
1781
  const $1b = noColors => {
@@ -1693,61 +1798,107 @@ function Main_shouldUseColors($0) {
1693
1798
  }
1694
1799
 
1695
1800
  function Main_resolvex27x27($0) {
1696
- return Data_Promise_resolvex27($3 => $4 => $3, $6 => Main_exitError(csegen_56(), $6), $0);
1801
+ return Data_Promise_resolvex27($3 => $4 => $3, $6 => Main_exitError(csegen_59(), $6), $0);
1802
+ }
1803
+
1804
+ function Main_printCurrentBranchURI($0, $1, $2, $3) {
1805
+ const $c = branch => {
1806
+ const $d = $0.a2;
1807
+ const $f = $0.a3;
1808
+ const $11 = Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'https://github.com/', a2: {a1: $d, a2: {a1: '/', a2: {a1: $f, a2: {a1: '/tree/', a2: {a1: branch, a2: {h: 0}}}}}}});
1809
+ return Prelude_IO_putStrLn(csegen_21(), $11);
1810
+ };
1811
+ return Data_Promise_x3ex3ex3d_Monad_Promise($6 => $7 => FFI_Git_currentBranch($1, $6, $7), $c, $2, $3);
1812
+ }
1813
+
1814
+ function Main_parseContributeArgs($0) {
1815
+ switch($0.h) {
1816
+ case 0: return {h: 1, a1: {h: 0}};
1817
+ case undefined: {
1818
+ switch($0.a2.h) {
1819
+ case undefined: {
1820
+ switch($0.a2.a2.h) {
1821
+ case undefined: return {h: 0, a1: 'contribute\'s arguments must be either -<num> to skip num PRs or --checkout (-c) to checkout the branch needing review.'};
1822
+ default: {
1823
+ const $6 = Prelude_Types_traverse_Traversable_List(csegen_37(), $b => Main_x3cx7cx7cx3e(csegen_80(), $10 => Main_n__6956_2384_parseSkipArg($0, $10), $15 => Main_n__6956_2383_parseCheckoutArg($0, $15), $b), $0);
1824
+ switch($6.h) {
1825
+ case undefined: return {h: 1, a1: $6.a1};
1826
+ case 0: return {h: 0, a1: 'contribute\'s arguments must be either -<num> to skip num PRs or --checkout (-c) to checkout the branch needing review.'};
1827
+ }
1828
+ }
1829
+ }
1830
+ }
1831
+ default: {
1832
+ const $1d = Prelude_Types_traverse_Traversable_List(csegen_37(), $22 => Main_x3cx7cx7cx3e(csegen_80(), $27 => Main_n__6956_2384_parseSkipArg($0, $27), $2c => Main_n__6956_2383_parseCheckoutArg($0, $2c), $22), $0);
1833
+ switch($1d.h) {
1834
+ case undefined: return {h: 1, a1: $1d.a1};
1835
+ case 0: return {h: 0, a1: 'contribute\'s arguments must be either -<num> to skip num PRs or --checkout (-c) to checkout the branch needing review.'};
1836
+ }
1837
+ }
1838
+ }
1839
+ }
1840
+ default: {
1841
+ const $34 = Prelude_Types_traverse_Traversable_List(csegen_37(), $39 => Main_x3cx7cx7cx3e(csegen_80(), $3e => Main_n__6956_2384_parseSkipArg($0, $3e), $43 => Main_n__6956_2383_parseCheckoutArg($0, $43), $39), $0);
1842
+ switch($34.h) {
1843
+ case undefined: return {h: 1, a1: $34.a1};
1844
+ case 0: return {h: 0, a1: 'contribute\'s arguments must be either -<num> to skip num PRs or --checkout (-c) to checkout the branch needing review.'};
1845
+ }
1846
+ }
1847
+ }
1697
1848
  }
1698
1849
 
1699
1850
  function Main_main($0) {
1700
- const $1 = Main_shouldUseColors(csegen_56())($0);
1701
- const $7 = System_getEnv(csegen_56(), 'EDITOR')($0);
1702
- const $e = Prelude_Interfaces_x3cx24x3e(csegen_62(), $14 => Data_List_drop(2n, $14), System_getArgs(csegen_56()))($0);
1851
+ const $1 = Main_shouldUseColors(csegen_59())($0);
1852
+ const $7 = System_getEnv(csegen_59(), 'EDITOR')($0);
1853
+ const $e = Prelude_Interfaces_x3cx24x3e(csegen_85(), $14 => Data_List_drop(2n, $14), System_getArgs(csegen_59()))($0);
1703
1854
  let $25;
1704
- switch(Prelude_Types_x3dx3d_Eq_x28Listx20x24ax29(csegen_71(), $e, {a1: 'help', a2: {h: 0}})) {
1855
+ switch(Prelude_Types_x3dx3d_Eq_x28Listx20x24ax29(csegen_94(), $e, {a1: 'help', a2: {h: 0}})) {
1705
1856
  case 1: {
1706
1857
  $25 = 1;
1707
1858
  break;
1708
1859
  }
1709
1860
  case 0: {
1710
- $25 = Prelude_Types_x3dx3d_Eq_x28Listx20x24ax29(csegen_71(), $e, {a1: '--help', a2: {h: 0}});
1861
+ $25 = Prelude_Types_x3dx3d_Eq_x28Listx20x24ax29(csegen_94(), $e, {a1: '--help', a2: {h: 0}});
1711
1862
  break;
1712
1863
  }
1713
1864
  }
1714
- const $21 = Prelude_Interfaces_when(csegen_49(), $25, () => Prelude_Interfaces_x3ex3e(csegen_68(), Prelude_IO_putStrLn(csegen_56(), Help_help($1)), () => csegen_72()));
1865
+ const $21 = Prelude_Interfaces_when(csegen_52(), $25, () => Prelude_Interfaces_x3ex3e(csegen_91(), Prelude_IO_putStrLn(csegen_59(), Help_help($1)), () => csegen_95()));
1715
1866
  const $42 = () => {
1716
1867
  let $4a;
1717
- switch(Prelude_Types_x3dx3d_Eq_x28Listx20x24ax29(csegen_71(), $e, {a1: 'version', a2: {h: 0}})) {
1868
+ switch(Prelude_Types_x3dx3d_Eq_x28Listx20x24ax29(csegen_94(), $e, {a1: 'version', a2: {h: 0}})) {
1718
1869
  case 1: {
1719
1870
  $4a = 1;
1720
1871
  break;
1721
1872
  }
1722
1873
  case 0: {
1723
- $4a = Prelude_Types_x3dx3d_Eq_x28Listx20x24ax29(csegen_71(), $e, {a1: '--version', a2: {h: 0}});
1874
+ $4a = Prelude_Types_x3dx3d_Eq_x28Listx20x24ax29(csegen_94(), $e, {a1: '--version', a2: {h: 0}});
1724
1875
  break;
1725
1876
  }
1726
1877
  }
1727
- const $46 = Prelude_Interfaces_when(csegen_49(), $4a, () => Prelude_Interfaces_x3ex3e(csegen_68(), AppVersion_printVersion(csegen_56()), () => csegen_72()));
1728
- return Prelude_Interfaces_x3ex3e(csegen_68(), $46, () => $65 => {
1729
- const $66 = System_getEnv(csegen_56(), 'GITHUB_PAT')($65);
1878
+ const $46 = Prelude_Interfaces_when(csegen_52(), $4a, () => Prelude_Interfaces_x3ex3e(csegen_91(), AppVersion_printVersion(csegen_59()), () => csegen_95()));
1879
+ return Prelude_Interfaces_x3ex3e(csegen_91(), $46, () => $65 => {
1880
+ const $66 = System_getEnv(csegen_59(), 'GITHUB_PAT')($65);
1730
1881
  switch($66.h) {
1731
1882
  case undefined: {
1732
1883
  const $6e = FFI_GitHub_octokit($66.a1)($65);
1733
- const $73 = FFI_Git_git(csegen_56())($65);
1884
+ const $73 = FFI_Git_git(csegen_59())($65);
1734
1885
  return Main_handleArgs($73, $6e, $1, $7, $e)($65);
1735
1886
  }
1736
- case 0: return Main_exitError(csegen_56(), 'GITHUB_PAT environment variable must be set to a personal access token.')($65);
1887
+ case 0: return Main_exitError(csegen_59(), 'GITHUB_PAT environment variable must be set to a personal access token.')($65);
1737
1888
  }
1738
1889
  });
1739
1890
  };
1740
- const $1d = Prelude_Interfaces_x3ex3e(csegen_68(), $21, $42);
1891
+ const $1d = Prelude_Interfaces_x3ex3e(csegen_91(), $21, $42);
1741
1892
  return $1d($0);
1742
1893
  }
1743
1894
 
1744
1895
  function Main_listTeam($0, $1, $2, $3, $4) {
1745
- return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_80(), $b => Data_List_sort(csegen_88(), $b), FFI_GitHub_listTeamMembers($1, $0.a2, $2)), teamMemberLogins => $17 => $18 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3dx3cx3c(csegen_17(), csegen_105(), Prelude_Types_traverse_Traversable_List(csegen_11(), $25 => Main_n__5829_2726_forkedUser($1, $2, $0, $25), teamMemberLogins)), teamMembersJson => $2d => $2e => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Types_traverse_Traversable_List(csegen_11(), $35 => $36 => $37 => Data_Promise_either(csegen_107(), Data_User_parseUser($35), $36, $37), teamMembersJson), teamMembers => $42 => $43 => $44 => Data_Promise_liftIO_HasIO_Promise(Text_PrettyPrint_Prettyprinter_Render_Terminal_putDoc(Text_PrettyPrint_Prettyprinter_Doc_vsep(Prelude_Interfaces_x3cx24x3e(csegen_111(), $4f => Main_n__5829_2727_putNameLn($1, $2, $0, $4f), teamMembers))), $42, $43, $44), $2d, $2e), $17, $18), $3, $4);
1896
+ return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_103(), csegen_112(), FFI_GitHub_listTeamMembers($1, $0.a2, $2)), teamMemberLogins => $13 => $14 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3dx3cx3c(csegen_15(), csegen_113(), Prelude_Types_traverse_Traversable_List(csegen_9(), $21 => Main_n__6408_1830_forkedUser($1, $2, $0, $21), teamMemberLogins)), teamMembersJson => $29 => $2a => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Types_traverse_Traversable_List(csegen_9(), $31 => $32 => $33 => Data_Promise_either(csegen_115(), Data_User_parseUser($31), $32, $33), teamMembersJson), teamMembers => Util_renderIO($0, csegen_21(), Text_PrettyPrint_Prettyprinter_Doc_vsep(Prelude_Interfaces_x3cx24x3e(csegen_119(), $49 => Main_n__6408_1831_putNameLn($1, $2, $0, $49), teamMembers))), $29, $2a), $13, $14), $3, $4);
1746
1897
  }
1747
1898
 
1748
1899
  function Main_handleConfiguredArgs($0, $1, $2, $3) {
1749
1900
  switch($3.h) {
1750
- case 0: return Prelude_IO_putStrLn(csegen_20(), Help_help(Data_Config_rf__colors($0)));
1901
+ case 0: return Prelude_IO_putStrLn(csegen_21(), Help_help(Data_Config_rf__colors($0)));
1751
1902
  case undefined: {
1752
1903
  switch($3.a1) {
1753
1904
  case 'reviews': {
@@ -1761,24 +1912,24 @@ function Main_handleConfiguredArgs($0, $1, $2, $3) {
1761
1912
  switch($3.a2.a2.a2.h) {
1762
1913
  case 0: {
1763
1914
  return $13 => {
1764
- const $14 = Data_String_parsePositive(csegen_2(), $3.a2.a2.a1);
1915
+ const $14 = Data_String_parsePositive(csegen_29(), $3.a2.a2.a1);
1765
1916
  switch($14.h) {
1766
- case undefined: return Data_Promise_x3ex3ex3d_Monad_Promise($1b => $1c => FFI_GitHub_listPullReviewsJsonStr($2, $0.a2, $0.a3, $14.a1, $1b, $1c), reviewsJsonStr => Prelude_IO_putStr(csegen_20(), reviewsJsonStr), $11, $13);
1917
+ case undefined: return Data_Promise_x3ex3ex3d_Monad_Promise($1b => $1c => FFI_GitHub_listPullReviewsJsonStr($2, $0.a2, $0.a3, $14.a1, $1b, $1c), reviewsJsonStr => Prelude_IO_putStr(csegen_21(), reviewsJsonStr), $11, $13);
1767
1918
  case 0: return Data_Promise_pure_Applicative_Promise(undefined, $11, $13);
1768
1919
  }
1769
1920
  };
1770
1921
  }
1771
- default: return $31 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_107(), $3), a2: {a1: '.', a2: {h: 0}}}}), $11, $31);
1922
+ default: return $31 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $11, $31);
1772
1923
  }
1773
1924
  };
1774
1925
  }
1775
- default: return $46 => $47 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_107(), $3), a2: {a1: '.', a2: {h: 0}}}}), $46, $47);
1926
+ default: return $46 => $47 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $46, $47);
1776
1927
  }
1777
1928
  }
1778
- default: return $5c => $5d => Data_Promise_reject(Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_107(), $3), a2: {a1: '.', a2: {h: 0}}}}), $5c, $5d);
1929
+ default: return $5c => $5d => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $5c, $5d);
1779
1930
  }
1780
1931
  }
1781
- default: return $72 => $73 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_107(), $3), a2: {a1: '.', a2: {h: 0}}}}), $72, $73);
1932
+ default: return $72 => $73 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $72, $73);
1782
1933
  }
1783
1934
  }
1784
1935
  case 'pulls': {
@@ -1792,27 +1943,27 @@ function Main_handleConfiguredArgs($0, $1, $2, $3) {
1792
1943
  case undefined: {
1793
1944
  switch($3.a2.a2.a2.a2.h) {
1794
1945
  case 0: {
1795
- const $8d = Prelude_Types_x3cx2ax3e_Applicative_Maybe(Prelude_Types_x3cx2ax3e_Applicative_Maybe({a1: $93 => $94 => ({a1: $93, a2: $94})}, Main_n__6211_3200_parseLim($1, $2, $3.a2.a2.a1, $3.a2.a2.a2.a1, $0)($3.a2.a2.a1)), Main_n__6211_3201_parsePg($1, $2, $3.a2.a2.a1, $3.a2.a2.a2.a1, $0, $3.a2.a2.a2.a1));
1946
+ const $8d = Prelude_Types_x3cx2ax3e_Applicative_Maybe(Prelude_Types_x3cx2ax3e_Applicative_Maybe({a1: $93 => $94 => ({a1: $93, a2: $94})}, Main_n__7155_2643_parseLim($1, $2, $3.a2.a2.a1, $3.a2.a2.a2.a1, $0)($3.a2.a2.a1)), Main_n__7155_2644_parsePg($1, $2, $3.a2.a2.a1, $3.a2.a2.a2.a1, $0, $3.a2.a2.a2.a1));
1796
1947
  return $a8 => $a9 => {
1797
1948
  switch($8d.h) {
1798
- case undefined: return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listPullRequestsJsonStr($2, $0.a2, $0.a3, {h: 0}, $8d.a1.a1, $8d.a1.a2), pullsJsonStr => Prelude_IO_putStr(csegen_20(), pullsJsonStr), $a8, $a9);
1949
+ case undefined: return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listPullRequestsJsonStr($2, $0.a2, $0.a3, {h: 0}, $8d.a1.a1, $8d.a1.a2), pullsJsonStr => Prelude_IO_putStr(csegen_21(), pullsJsonStr), $a8, $a9);
1799
1950
  case 0: return Data_Promise_pure_Applicative_Promise(undefined, $a8, $a9);
1800
1951
  }
1801
1952
  };
1802
1953
  }
1803
- default: return $c2 => $c3 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_107(), $3), a2: {a1: '.', a2: {h: 0}}}}), $c2, $c3);
1954
+ default: return $c2 => $c3 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $c2, $c3);
1804
1955
  }
1805
1956
  }
1806
- default: return $d8 => $d9 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_107(), $3), a2: {a1: '.', a2: {h: 0}}}}), $d8, $d9);
1957
+ default: return $d8 => $d9 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $d8, $d9);
1807
1958
  }
1808
1959
  }
1809
- default: return $ee => $ef => Data_Promise_reject(Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_107(), $3), a2: {a1: '.', a2: {h: 0}}}}), $ee, $ef);
1960
+ default: return $ee => $ef => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $ee, $ef);
1810
1961
  }
1811
1962
  }
1812
- default: return $104 => $105 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_107(), $3), a2: {a1: '.', a2: {h: 0}}}}), $104, $105);
1963
+ default: return $104 => $105 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $104, $105);
1813
1964
  }
1814
1965
  }
1815
- default: return $11a => $11b => Data_Promise_reject(Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_107(), $3), a2: {a1: '.', a2: {h: 0}}}}), $11a, $11b);
1966
+ default: return $11a => $11b => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $11a, $11b);
1816
1967
  }
1817
1968
  }
1818
1969
  case 'user': {
@@ -1825,143 +1976,154 @@ function Main_handleConfiguredArgs($0, $1, $2, $3) {
1825
1976
  case undefined: {
1826
1977
  return $134 => {
1827
1978
  switch($3.a2.a2.a2.h) {
1828
- case 0: return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_getUser($2)($3.a2.a2.a1), $13d => Prelude_IO_print({a1: csegen_20(), a2: {a1: x => Language_JSON_Data_show_Show_JSON(x), a2: d => x => Language_JSON_Data_showPrec_Show_JSON(d, x)}}, Data_User_json($13d)), $132, $134);
1829
- default: return Data_Promise_reject(Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_107(), $3), a2: {a1: '.', a2: {h: 0}}}}), $132, $134);
1979
+ case 0: return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_getUser($2)($3.a2.a2.a1), $13d => Prelude_IO_print({a1: csegen_21(), a2: {a1: x => Language_JSON_Data_show_Show_JSON(x), a2: d => x => Language_JSON_Data_showPrec_Show_JSON(d, x)}}, Data_User_json($13d)), $132, $134);
1980
+ default: return Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $132, $134);
1830
1981
  }
1831
1982
  };
1832
1983
  }
1833
- default: return $163 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_107(), $3), a2: {a1: '.', a2: {h: 0}}}}), $132, $163);
1984
+ default: return $163 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $132, $163);
1834
1985
  }
1835
1986
  };
1836
1987
  }
1837
- default: return $178 => $179 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_107(), $3), a2: {a1: '.', a2: {h: 0}}}}), $178, $179);
1988
+ default: return $178 => $179 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $178, $179);
1838
1989
  }
1839
1990
  }
1840
- default: return $18e => $18f => Data_Promise_reject(Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_107(), $3), a2: {a1: '.', a2: {h: 0}}}}), $18e, $18f);
1991
+ default: return $18e => $18f => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $18e, $18f);
1841
1992
  }
1842
1993
  }
1843
- case 'sync': {
1994
+ case 'whoami': {
1844
1995
  return $1a4 => $1a5 => {
1845
1996
  switch($3.a2.h) {
1846
- case 0: return Data_Promise_map_Functor_Promise($1a9 => (undefined), $1ab => $1ac => Config_syncConfig($0, $2, 1, $1ab, $1ac), $1a4, $1a5);
1847
- default: return Data_Promise_reject(Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_107(), $3), a2: {a1: '.', a2: {h: 0}}}}), $1a4, $1a5);
1997
+ case 0: return User_Me_printInfoOnSelf($0, $2, $1, $1a4, $1a5);
1998
+ default: return Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $1a4, $1a5);
1999
+ }
2000
+ };
2001
+ }
2002
+ case 'sync': {
2003
+ return $1c1 => $1c2 => {
2004
+ switch($3.a2.h) {
2005
+ case 0: return Data_Promise_map_Functor_Promise($1c6 => (undefined), $1c8 => $1c9 => Config_syncConfig($0, $2, 1, $1c8, $1c9), $1c1, $1c2);
2006
+ default: return Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $1c1, $1c2);
2007
+ }
2008
+ };
2009
+ }
2010
+ case 'branch': {
2011
+ return $1e6 => {
2012
+ switch($3.a2.h) {
2013
+ case 0: return $1e8 => Main_printCurrentBranchURI($0, $1, $1e6, $1e8);
2014
+ default: return $1ee => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $1e6, $1ee);
1848
2015
  }
1849
2016
  };
1850
2017
  }
1851
2018
  case 'pr': {
1852
- return $1c9 => $1ca => {
2019
+ return $203 => $204 => {
1853
2020
  switch($3.a2.h) {
1854
2021
  case 0: {
1855
- const $1e5 = $1e6 => {
1856
- switch($1e6.h) {
2022
+ const $21f = $220 => {
2023
+ switch($220.h) {
1857
2024
  case undefined: {
1858
- switch($1e6.a1) {
1859
- case 0: return Prelude_IO_putStrLn(csegen_20(), Data_PullRequest_rf__webURI($0, $1e6.a2));
1860
- default: return csegen_122();
2025
+ switch($220.a1) {
2026
+ case 0: return Prelude_IO_putStrLn(csegen_21(), Data_PullRequest_rf__webURI($0, $220.a2));
2027
+ default: return csegen_128();
1861
2028
  }
1862
2029
  }
1863
- default: return csegen_122();
2030
+ default: return csegen_128();
1864
2031
  }
1865
2032
  };
1866
- return Data_Promise_x3ex3ex3d_Monad_Promise($1ce => $1cf => Data_Promise_x3ex3ex3d_Monad_Promise($1d2 => $1d3 => FFI_Git_currentBranch($1, $1d2, $1d3), $1d9 => $1da => $1db => PullRequest_identifyOrCreatePR($0, $1, $2, $1d9, $1da, $1db), $1ce, $1cf), $1e5, $1c9, $1ca);
2033
+ return Data_Promise_x3ex3ex3d_Monad_Promise($208 => $209 => Data_Promise_x3ex3ex3d_Monad_Promise($20c => $20d => FFI_Git_currentBranch($1, $20c, $20d), $213 => $214 => $215 => PullRequest_identifyOrCreatePR($0, $1, $2, $213, $214, $215), $208, $209), $21f, $203, $204);
1867
2034
  }
1868
- default: return Data_Promise_reject(Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_107(), $3), a2: {a1: '.', a2: {h: 0}}}}), $1c9, $1ca);
2035
+ default: return Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $203, $204);
1869
2036
  }
1870
2037
  };
1871
2038
  }
1872
2039
  case 'reflect': {
1873
- return $208 => $209 => {
2040
+ return $242 => $243 => {
1874
2041
  switch($3.a2.h) {
1875
- case 0: return User_Reflect_reflectOnSelf($0, $2, $208, $209);
1876
- default: return Data_Promise_reject(Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_107(), $3), a2: {a1: '.', a2: {h: 0}}}}), $208, $209);
2042
+ case 0: return User_Reflect_reflectOnSelf($0, $2, $242, $243);
2043
+ default: return Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $242, $243);
1877
2044
  }
1878
2045
  };
1879
2046
  }
1880
2047
  case 'config': {
1881
2048
  switch($3.a2.h) {
1882
2049
  case undefined: {
1883
- return $225 => {
2050
+ return $25f => {
1884
2051
  switch($3.a2.a2.h) {
1885
- case 0: return $227 => Data_Promise_x3ex3ex3d_Monad_Promise($22a => Config_getConfig($0, $3.a2.a1, $22a), value => Prelude_IO_putStrLn(csegen_20(), value), $225, $227);
2052
+ case 0: return $261 => Data_Promise_x3ex3ex3d_Monad_Promise($264 => Config_getConfig($0, $3.a2.a1, $264), value => Prelude_IO_putStrLn(csegen_21(), value), $25f, $261);
1886
2053
  case undefined: {
1887
- return $236 => {
2054
+ return $270 => {
1888
2055
  switch($3.a2.a2.a2.h) {
1889
- case 0: return Data_Promise_map_Functor_Promise($23a => (undefined), Config_setConfig($0, $3.a2.a1, $3.a2.a2.a1), $225, $236);
1890
- default: return Data_Promise_reject(Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_107(), $3), a2: {a1: '.', a2: {h: 0}}}}), $225, $236);
2056
+ case 0: return Data_Promise_map_Functor_Promise($274 => (undefined), Config_setConfig($0, $3.a2.a1, $3.a2.a2.a1), $25f, $270);
2057
+ default: return Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $25f, $270);
1891
2058
  }
1892
2059
  };
1893
2060
  }
1894
- default: return $256 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_107(), $3), a2: {a1: '.', a2: {h: 0}}}}), $225, $256);
2061
+ default: return $290 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $25f, $290);
1895
2062
  }
1896
2063
  };
1897
2064
  }
1898
- default: return $26b => $26c => Data_Promise_reject(Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_107(), $3), a2: {a1: '.', a2: {h: 0}}}}), $26b, $26c);
2065
+ default: return $2a5 => $2a6 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $2a5, $2a6);
1899
2066
  }
1900
2067
  }
1901
2068
  case 'contribute': {
1902
- switch($3.a2.h) {
1903
- case 0: return $282 => $283 => Main_contribute($0, $2, 0n, $282, $283);
1904
- case undefined: {
1905
- switch($3.a2.a2.h) {
1906
- case 0: return Main_case__handleConfiguredArgs_3520($0, $1, $2, $3.a2.a1, Prelude_Types_fastUnpack($3.a2.a1));
1907
- default: return $293 => $294 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_107(), $3), a2: {a1: '.', a2: {h: 0}}}}), $293, $294);
1908
- }
1909
- }
1910
- default: return $2a9 => $2aa => Data_Promise_reject(Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_107(), $3), a2: {a1: '.', a2: {h: 0}}}}), $2a9, $2aa);
2069
+ const $2bb = Main_parseContributeArgs($3.a2);
2070
+ switch($2bb.h) {
2071
+ case 1: return $2be => $2bf => Main_contribute($0, $1, $2, $2bb.a1, $2be, $2bf);
2072
+ case 0: return Main_exitError(csegen_21(), $2bb.a1);
1911
2073
  }
1912
2074
  }
1913
2075
  case 'list': {
1914
2076
  switch($3.a2.h) {
1915
- case 0: return $2c0 => $2c1 => Data_Promise_reject('The list command expects the name of a GitHub Team as an argument.', $2c0, $2c1);
2077
+ case 0: return $2cc => $2cd => Data_Promise_reject('The list command expects the name of a GitHub Team as an argument.', $2cc, $2cd);
1916
2078
  case undefined: {
1917
- return $2c6 => {
2079
+ return $2d2 => {
1918
2080
  switch($3.a2.a2.h) {
1919
- case 0: return $2c8 => Main_listTeam($0, $2, $3.a2.a1, $2c6, $2c8);
1920
- default: return $2cf => Data_Promise_reject(Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_107(), $3), a2: {a1: '.', a2: {h: 0}}}}), $2c6, $2cf);
2081
+ case 0: return $2d4 => Main_listTeam($0, $2, $3.a2.a1, $2d2, $2d4);
2082
+ default: return $2db => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $2d2, $2db);
1921
2083
  }
1922
2084
  };
1923
2085
  }
1924
- default: return $2e4 => $2e5 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_107(), $3), a2: {a1: '.', a2: {h: 0}}}}), $2e4, $2e5);
2086
+ default: return $2f0 => $2f1 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $2f0, $2f1);
1925
2087
  }
1926
2088
  }
1927
2089
  case 'graph': {
1928
2090
  switch($3.a2.h) {
1929
- case 0: return $2fb => $2fc => Data_Promise_reject('The graph command expects the name of a GitHub Team as an argument.', $2fb, $2fc);
2091
+ case 0: return $307 => $308 => Data_Promise_reject('The graph command expects the name of a GitHub Team as an argument.', $307, $308);
1930
2092
  case undefined: {
1931
- return $301 => {
2093
+ return $30d => {
1932
2094
  switch($3.a2.a2.h) {
1933
- case 0: return $303 => Main_graphTeam($0, $2, $3.a2.a1, $301, $303);
1934
- default: return $30a => Data_Promise_reject(Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_107(), $3), a2: {a1: '.', a2: {h: 0}}}}), $301, $30a);
2095
+ case 0: return $30f => Main_graphTeam($0, $2, $3.a2.a1, $30d, $30f);
2096
+ default: return $316 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $30d, $316);
1935
2097
  }
1936
2098
  };
1937
2099
  }
1938
- default: return $31f => $320 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_107(), $3), a2: {a1: '.', a2: {h: 0}}}}), $31f, $320);
2100
+ default: return $32b => $32c => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $32b, $32c);
1939
2101
  }
1940
2102
  }
1941
2103
  case 'assign': {
1942
2104
  switch($3.a2.h) {
1943
- case 0: return $336 => $337 => Data_Promise_reject('The assign commaand expects one or more names of GitHub Teams or Users as arguments.', $336, $337);
2105
+ case 0: return $342 => $343 => Data_Promise_reject('The assign commaand expects one or more names of GitHub Teams or Users as arguments.', $342, $343);
1944
2106
  case undefined: {
1945
2107
  switch($3.a2.a1) {
1946
2108
  case '--dry': {
1947
- return $33d => {
2109
+ return $349 => {
1948
2110
  switch($3.a2.a2.h) {
1949
- case 0: return $33f => Data_Promise_reject('The assign commaand expects one or more names of GitHub Teams or Users as arguments.', $33d, $33f);
1950
- case undefined: return $344 => Main_assign($0, $1, $2, {a1: $3.a2.a2.a1, a2: $3.a2.a2.a2}, 1, $33d, $344);
1951
- default: return $34f => Main_assign($0, $1, $2, {a1: $3.a2.a1, a2: $3.a2.a2}, 0, $33d, $34f);
2111
+ case 0: return $34b => Data_Promise_reject('The assign commaand expects one or more names of GitHub Teams or Users as arguments.', $349, $34b);
2112
+ case undefined: return $350 => Main_assign($0, $1, $2, {a1: $3.a2.a2.a1, a2: $3.a2.a2.a2}, 1, $349, $350);
2113
+ default: return $35b => Main_assign($0, $1, $2, {a1: $3.a2.a1, a2: $3.a2.a2}, 0, $349, $35b);
1952
2114
  }
1953
2115
  };
1954
2116
  }
1955
- default: return $35a => $35b => Main_assign($0, $1, $2, {a1: $3.a2.a1, a2: $3.a2.a2}, 0, $35a, $35b);
2117
+ default: return $366 => $367 => Main_assign($0, $1, $2, {a1: $3.a2.a1, a2: $3.a2.a2}, 0, $366, $367);
1956
2118
  }
1957
2119
  }
1958
- default: return $366 => $367 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_107(), $3), a2: {a1: '.', a2: {h: 0}}}}), $366, $367);
2120
+ default: return $372 => $373 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $372, $373);
1959
2121
  }
1960
2122
  }
1961
- default: return $37c => $37d => Data_Promise_reject(Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_107(), $3), a2: {a1: '.', a2: {h: 0}}}}), $37c, $37d);
2123
+ default: return $388 => $389 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $388, $389);
1962
2124
  }
1963
2125
  }
1964
- default: return $392 => $393 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_107(), $3), a2: {a1: '.', a2: {h: 0}}}}), $392, $393);
2126
+ default: return $39e => $39f => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $3), a2: {a1: '.', a2: {h: 0}}}}), $39e, $39f);
1965
2127
  }
1966
2128
  }
1967
2129
 
@@ -1975,31 +2137,31 @@ function Main_handleArgs($0, $1, $2, $3, $4) {
1975
2137
  switch($4.a2.a2.h) {
1976
2138
  case undefined: {
1977
2139
  switch($4.a2.a2.a2.h) {
1978
- case 0: return Main_bashCompletion(csegen_56(), $4.a2.a1, $4.a2.a2.a1);
1979
- default: return Main_resolvex27x27($11 => $12 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3dx3cx3c(csegen_17(), $19 => $1a => $1b => Config_syncIfOld($1, $19, $1a, $1b), $22 => $23 => Config_loadOrCreateConfig($0, $1, $2, $3, $22, $23)), _ => Main_handleConfiguredArgs(_, $0, $1, $4), $11, $12));
2140
+ case 0: return Main_bashCompletion(csegen_59(), $4.a2.a1, $4.a2.a2.a1);
2141
+ default: return Main_resolvex27x27($11 => $12 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3dx3cx3c(csegen_15(), $19 => $1a => $1b => Config_syncIfOld($1, $19, $1a, $1b), $22 => $23 => Config_loadOrCreateConfig($0, $1, $2, $3, $22, $23)), _ => Main_handleConfiguredArgs(_, $0, $1, $4), $11, $12));
1980
2142
  }
1981
2143
  }
1982
- default: return Main_resolvex27x27($35 => $36 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3dx3cx3c(csegen_17(), $3d => $3e => $3f => Config_syncIfOld($1, $3d, $3e, $3f), $46 => $47 => Config_loadOrCreateConfig($0, $1, $2, $3, $46, $47)), _ => Main_handleConfiguredArgs(_, $0, $1, $4), $35, $36));
2144
+ default: return Main_resolvex27x27($35 => $36 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3dx3cx3c(csegen_15(), $3d => $3e => $3f => Config_syncIfOld($1, $3d, $3e, $3f), $46 => $47 => Config_loadOrCreateConfig($0, $1, $2, $3, $46, $47)), _ => Main_handleConfiguredArgs(_, $0, $1, $4), $35, $36));
1983
2145
  }
1984
2146
  }
1985
- default: return Main_resolvex27x27($59 => $5a => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3dx3cx3c(csegen_17(), $61 => $62 => $63 => Config_syncIfOld($1, $61, $62, $63), $6a => $6b => Config_loadOrCreateConfig($0, $1, $2, $3, $6a, $6b)), _ => Main_handleConfiguredArgs(_, $0, $1, $4), $59, $5a));
2147
+ default: return Main_resolvex27x27($59 => $5a => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3dx3cx3c(csegen_15(), $61 => $62 => $63 => Config_syncIfOld($1, $61, $62, $63), $6a => $6b => Config_loadOrCreateConfig($0, $1, $2, $3, $6a, $6b)), _ => Main_handleConfiguredArgs(_, $0, $1, $4), $59, $5a));
1986
2148
  }
1987
2149
  }
1988
2150
  case '--bash-completion-script': {
1989
2151
  switch($4.a2.h) {
1990
- case 0: return Prelude_IO_putStrLn(csegen_56(), BashCompletion_script());
1991
- default: return Main_resolvex27x27($83 => $84 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3dx3cx3c(csegen_17(), $8b => $8c => $8d => Config_syncIfOld($1, $8b, $8c, $8d), $94 => $95 => Config_loadOrCreateConfig($0, $1, $2, $3, $94, $95)), _ => Main_handleConfiguredArgs(_, $0, $1, $4), $83, $84));
2152
+ case 0: return Prelude_IO_putStrLn(csegen_59(), BashCompletion_script());
2153
+ default: return Main_resolvex27x27($83 => $84 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3dx3cx3c(csegen_15(), $8b => $8c => $8d => Config_syncIfOld($1, $8b, $8c, $8d), $94 => $95 => Config_loadOrCreateConfig($0, $1, $2, $3, $94, $95)), _ => Main_handleConfiguredArgs(_, $0, $1, $4), $83, $84));
1992
2154
  }
1993
2155
  }
1994
- default: return Main_resolvex27x27($a7 => $a8 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3dx3cx3c(csegen_17(), $af => $b0 => $b1 => Config_syncIfOld($1, $af, $b0, $b1), $b8 => $b9 => Config_loadOrCreateConfig($0, $1, $2, $3, $b8, $b9)), _ => Main_handleConfiguredArgs(_, $0, $1, $4), $a7, $a8));
2156
+ default: return Main_resolvex27x27($a7 => $a8 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3dx3cx3c(csegen_15(), $af => $b0 => $b1 => Config_syncIfOld($1, $af, $b0, $b1), $b8 => $b9 => Config_loadOrCreateConfig($0, $1, $2, $3, $b8, $b9)), _ => Main_handleConfiguredArgs(_, $0, $1, $4), $a7, $a8));
1995
2157
  }
1996
2158
  }
1997
- default: return Main_resolvex27x27($cb => $cc => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3dx3cx3c(csegen_17(), $d3 => $d4 => $d5 => Config_syncIfOld($1, $d3, $d4, $d5), $dc => $dd => Config_loadOrCreateConfig($0, $1, $2, $3, $dc, $dd)), _ => Main_handleConfiguredArgs(_, $0, $1, $4), $cb, $cc));
2159
+ default: return Main_resolvex27x27($cb => $cc => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3dx3cx3c(csegen_15(), $d3 => $d4 => $d5 => Config_syncIfOld($1, $d3, $d4, $d5), $dc => $dd => Config_loadOrCreateConfig($0, $1, $2, $3, $dc, $dd)), _ => Main_handleConfiguredArgs(_, $0, $1, $4), $cb, $cc));
1998
2160
  }
1999
2161
  }
2000
2162
 
2001
2163
  function Main_graphTeam($0, $1, $2, $3, $4) {
2002
- return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listTeamMembers($1, $0.a2, $2), teamMemberLogins => $d => $e => Data_Promise_x3ex3ex3d_Monad_Promise($11 => $12 => PullRequest_listReviewers($0, $1, 4n, csegen_128(), $11, $12), $1c => $1d => $1e => $1f => Data_Promise_liftIO_HasIO_Promise(Text_PrettyPrint_Prettyprinter_Render_Terminal_putDoc(Main_n__5970_2881_maybeDecorated($1, $2, $0, Reviewer_reviewsGraph(csegen_88(), {a1: ann => $2f => Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($2f), a2: ann => $33 => $34 => Text_PrettyPrint_Prettyprinter_Doc_prettyPrec_Pretty_String($33, $34)}, $1c.a2, $1c.a1, teamMemberLogins))), $1d, $1e, $1f), $d, $e), $3, $4);
2164
+ return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listTeamMembers($1, $0.a2, $2), teamMemberLogins => $d => $e => Data_Promise_x3ex3ex3d_Monad_Promise($11 => $12 => PullRequest_listReviewers($0, $1, 4n, csegen_134(), $11, $12), $1c => Util_renderIO($0, csegen_21(), Reviewer_reviewsGraph(csegen_111(), {a1: ann => $28 => Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($28), a2: ann => $2c => $2d => Text_PrettyPrint_Prettyprinter_Doc_prettyPrec_Pretty_String($2c, $2d)}, $1c.a2, $1c.a1, teamMemberLogins)), $d, $e), $3, $4);
2003
2165
  }
2004
2166
 
2005
2167
  function Main_exitError($0, $1) {
@@ -2020,120 +2182,53 @@ function Main_exitError($0, $1) {
2020
2182
  return $0.a1.a2(undefined)(undefined)(System_File_Meta_isTTY($0, System_File_Virtual_stderr()))($f);
2021
2183
  }
2022
2184
 
2023
- function Main_contribute($0, $1, $2, $3, $4) {
2024
- const $12 = openPrs => $13 => $14 => {
2025
- const $1f = myLogin => {
2026
- const $22 = $23 => {
2027
- switch(Data_PullRequest_isAuthor(myLogin, $23)) {
2185
+ function Main_contribute($0, $1, $2, $3, $4, $5) {
2186
+ const $13 = openPrs => $14 => $15 => {
2187
+ const $20 = myLogin => {
2188
+ const $21 = Data_Maybe_fromMaybe(() => Prelude_Types_prim__integerToNat(0n), Data_List_headx27(Prelude_Types_List_mapMaybe($2b => Main_skipArg($2b), $3)));
2189
+ const $31 = $32 => {
2190
+ switch($32.h) {
2191
+ case 0: return 1;
2192
+ default: return 0;
2193
+ }
2194
+ };
2195
+ const $2f = Data_List_find($31, $3);
2196
+ const $37 = $38 => {
2197
+ switch(Data_PullRequest_isAuthor(myLogin, $38)) {
2028
2198
  case 1: return 0;
2029
2199
  case 0: return 1;
2030
2200
  }
2031
2201
  };
2032
- const $20 = Data_List_filter($22, openPrs);
2033
- const $29 = Data_List_partition($2c => Data_PullRequest_isRequestedReviewer(myLogin, $2c), $20);
2034
- const $31 = Prelude_Interfaces_mapHom({a1: d => b => c => a => $35 => $36 => $37 => ({a1: $35($37.a1), a2: $36($37.a2)}), a2: b => c => a => $40 => $41 => ({a1: $40($41.a1), a2: $41.a2}), a3: a => d => b => $48 => $49 => ({a1: $49.a1, a2: $48($49.a2)})}, $50 => Data_List_sortBy($53 => $54 => Prelude_Basics_on(csegen_134(), $59 => $59.a2, $53, $54), $50), $29);
2035
- const $5f = Prelude_Types_map_Functor_Maybe($62 => Data_PullRequest_rf__webURI($0, $62), Data_List_headx27(Data_List_drop($2, Prelude_Types_List_tailRecAppend($31.a1, $31.a2))));
2036
- return Main_n__6077_2987_printResult($1, $2, $0, $5f);
2202
+ const $35 = Prelude_Types_List_filter($37, openPrs);
2203
+ const $3e = Data_List_partition($41 => Data_PullRequest_isRequestedReviewer(myLogin, $41), $35);
2204
+ return Main_case__contribute_2186($1, $2, $3, $0, openPrs, myLogin, $21, $2f, $35, $3e, Prelude_Interfaces_mapHom({a1: d => b => c => a => $55 => $56 => $57 => ({a1: $55($57.a1), a2: $56($57.a2)}), a2: b => c => a => $60 => $61 => ({a1: $60($61.a1), a2: $61.a2}), a3: a => d => b => $68 => $69 => ({a1: $69.a1, a2: $68($69.a2)})}, $70 => Data_List_sortBy($73 => $74 => Prelude_Basics_on(csegen_141(), $79 => $79.a2, $73, $74), $70), $3e));
2037
2205
  };
2038
- return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_80(), csegen_133(), FFI_GitHub_getSelf($1)), $1f, $13, $14);
2206
+ return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_103(), csegen_139(), FFI_GitHub_getSelf($2)), $20, $14, $15);
2039
2207
  };
2040
- return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listPullRequests($1, $0.a2, $0.a3, {a1: 0}, csegen_128(), 0n), $12, $3, $4);
2208
+ return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listPullRequests($2, $0.a2, $0.a3, {a1: 0}, csegen_134(), 0n), $13, $4, $5);
2041
2209
  }
2042
2210
 
2043
2211
  function Main_bashCompletion($0, $1, $2) {
2044
- const $3 = Prelude_Types_maybe(() => Main_n__5567_2479_configuredOpts($0, $2, $1), () => $b => $0.a1.a1.a2(undefined)($b), BashCompletion_cmdOpts($1, $2));
2212
+ const $3 = Prelude_Types_maybe(() => Main_n__6146_1583_configuredOpts($0, $2, $1), () => $b => $0.a1.a1.a2(undefined)($b), BashCompletion_cmdOpts($1, $2));
2045
2213
  return $0.a1.a2(undefined)(undefined)($3)($21 => Prelude_IO_putStr($0, Data_String_fastUnlines($21)));
2046
2214
  }
2047
2215
 
2048
2216
  function Main_assign($0, $1, $2, $3, $4, $5, $6) {
2049
2217
  return Data_Promise_x3ex3ex3d_Monad_Promise($9 => $a => Data_Promise_x3ex3ex3d_Monad_Promise($d => $e => FFI_Git_currentBranch($1, $d, $e), $14 => $15 => $16 => PullRequest_identifyOrCreatePR($0, $1, $2, $14, $15, $16), $9, $a), $21 => $22 => $24 => {
2050
- const $25 = Main_n__5697_2617_partitionedArgs($0, $1, $2, $4, $3);
2218
+ const $25 = Main_n__6276_1721_partitionedArgs($0, $1, $2, $4, $3);
2051
2219
  return PullRequest_requestReviewers($0, $2, $21.a2, $25.a2, $25.a1, $4, $22, $24);
2052
2220
  }, $5, $6);
2053
2221
  }
2054
2222
 
2055
- function User_Reflect_case__casex20blockx20inx20reflectOnSelf_2234($0, $1, $2, $3, $4, $5, $6, $7, $8, $9) {
2056
- const $b = Prelude_Interfaces_mapHom({a1: d => b => c => a => $f => $10 => $11 => ({a1: $f($11.a1), a2: $10($11.a2)}), a2: b => c => a => $1a => $1b => ({a1: $1a($1b.a1), a2: $1b.a2}), a3: a => d => b => $22 => $23 => ({a1: $23.a1, a2: $22($23.a2)})}, $2a => Data_List_headx27(Data_List_sort({a1: {a1: $31 => $32 => Data_Date_x3dx3d_Eq_Date($31, $32), a2: $37 => $38 => Data_Date_x2fx3d_Eq_Date($37, $38)}, a2: $3d => $3e => Data_Date_compare_Ord_Date($3d, $3e), a3: $43 => $44 => Data_Date_x3c_Ord_Date($43, $44), a4: $49 => $4a => Data_Date_x3e_Ord_Date($49, $4a), a5: $4f => $50 => Data_Date_x3cx3d_Ord_Date($4f, $50), a6: $55 => $56 => Data_Date_x3ex3d_Ord_Date($55, $56), a7: $5b => $5c => Data_Date_max_Ord_Date($5b, $5c), a8: $61 => $62 => Data_Date_min_Ord_Date($61, $62)}, Prelude_Types_map_Functor_List(csegen_149(), $2a))), {a1: $7, a2: $9.a1});
2057
- return Prelude_IO_putStrLn(csegen_20(), Util_renderString($0, User_Reflect_print(Prelude_Types_String_length(User_Reflect_intro()), Prelude_Types_List_lengthTR($4), Prelude_Types_List_lengthTR($9.a1), Prelude_Types_List_lengthTR($9.a2), Prelude_Types_List_lengthTR($8), Prelude_Types_List_lengthTR($7), $5, $b.a1, $b.a2)));
2058
- }
2059
-
2060
- function User_Reflect_n__4808_1428_ital($0, $1) {
2061
- return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($1));
2223
+ function Main_x3cx7cx7cx3e($0, $1, $2, $3) {
2224
+ return $0.a3(undefined)($1($3))(() => $2($3));
2062
2225
  }
2063
2226
 
2064
- const User_Reflect_rightTitle = __lazy(function () {
2065
- return 'authored';
2066
- });
2067
-
2068
- const User_Reflect_reviewDetailsCount = __lazy(function () {
2069
- return 25n;
2070
- });
2071
-
2072
- function User_replicatex27($0, $1, $2) {
2073
- return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color($0), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Data_String_replicate($1, $2)));
2074
- }
2075
-
2076
- function User_Reflect_reflectOnSelf($0, $1, $2, $3) {
2077
- const $c = prs => $d => $e => {
2078
- const $19 = myLogin => $1a => $1b => {
2079
- const $37 = reviews => {
2080
- const $38 = Prelude_Types_map_Functor_Maybe(csegen_152(), Data_List_headx27(Data_List_sortBy($41 => $42 => Prelude_Basics_on(csegen_134(), csegen_152(), $41, $42), reviews)));
2081
- const $4b = PullRequest_tuple(prs);
2082
- const $4e = Prelude_Interfaces_mapHom({a1: d => b => c => a => $52 => $53 => $54 => ({a1: $52($54.a1), a2: $53($54.a2)}), a2: b => c => a => $5d => $5e => ({a1: $5d($5e.a1), a2: $5e.a2}), a3: a => d => b => $65 => $66 => ({a1: $66.a1, a2: $65($66.a2)})}, $6d => Data_List_filter($70 => Prelude_EqOrd_x3dx3d_Eq_String($70.a3, myLogin), $6d), $4b);
2083
- return User_Reflect_case__casex20blockx20inx20reflectOnSelf_2234($0, $1, prs, myLogin, reviews, $38, $4b, $4e.a1, $4e.a2, Prelude_Interfaces_mapHom({a1: d => b => c => a => $85 => $86 => $87 => ({a1: $85($87.a1), a2: $86($87.a2)}), a2: b => c => a => $90 => $91 => ({a1: $90($91.a1), a2: $91.a2}), a3: a => d => b => $98 => $99 => ({a1: $99.a1, a2: $98($99.a2)})}, $a0 => Data_List_filter($a3 => Prelude_Interfaces_any(csegen_104(), $a8 => Prelude_EqOrd_x3dx3d_Eq_String($a8, myLogin), $a3.a5), $a0), $4b));
2084
- };
2085
- return Data_Promise_x3ex3ex3d_Monad_Promise(PullRequest_reviewsForUser($0, $1, myLogin, Data_List_take(User_Reflect_reviewDetailsCount(), Prelude_Types_List_reverse(Data_List_sortBy($2b => $2c => Prelude_Basics_on(csegen_134(), csegen_149(), $2b, $2c), PullRequest_combined(prs))))), $37, $1a, $1b);
2086
- };
2087
- return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_80(), csegen_133(), FFI_GitHub_getSelf($1)), $19, $d, $e);
2088
- };
2089
- return Data_Promise_x3ex3ex3d_Monad_Promise(PullRequest_listPartitionedPRs($0, $1, 4n, User_Reflect_prCount()), $c, $2, $3);
2090
- }
2091
-
2092
- function User_Reflect_print($0, $1, $2, $3, $4, $5, $6, $7, $8) {
2093
- return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: User_Reflect_graph($0, $1, $2, $3, $4, $5), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: User_Reflect_details($0, $1, $2, $3, $4, $5, $6, $7, $8), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {h: 0}}}}}});
2094
- }
2095
-
2096
- const User_Reflect_prCount = __lazy(function () {
2097
- return csegen_128();
2098
- });
2099
-
2100
- const User_Reflect_leftTitle = __lazy(function () {
2101
- return 'requested';
2102
- });
2103
-
2104
- const User_Reflect_intro = __lazy(function () {
2105
- return Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: 'Your current pull request summary (out of the past ', a2: {a1: Data_Fin_show_Show_x28Finx20x24nx29(User_Reflect_prCount()), a2: {a1: ' PRs):', a2: {h: 0}}}});
2106
- });
2107
-
2108
- function User_Reflect_header($0) {
2109
- return Text_PrettyPrint_Prettyprinter_Doc_indent(Prelude_Cast_cast_Cast_Nat_Int($0), Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: User_Reflect_n__4808_1428_ital($0, User_Reflect_leftTitle()), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(' '), a2: {a1: User_Reflect_n__4808_1428_ital($0, User_Reflect_rightTitle()), a2: {h: 0}}}}));
2110
- }
2111
-
2112
- function User_Reflect_graph($0, $1, $2, $3, $4, $5) {
2113
- const $6 = ($2+$3);
2114
- const $9 = ($5+$4);
2115
- const $c = Prelude_Types_foldr_Foldable_List(csegen_157(), Prelude_Types_String_length(User_Reflect_leftTitle()), {a1: ($6+$1), a2: {a1: $9, a2: {h: 0}}});
2116
- const $1b = Prelude_Types_foldr_Foldable_List(csegen_157(), Prelude_Types_String_length(User_Reflect_rightTitle()), {a1: $6, a2: {a1: $9, a2: {h: 0}}});
2117
- const $28 = (($c+$1b)+3n);
2118
- const $2d = ((Prelude_Cast_cast_Cast_Nat_Double($0)/2.0)-(Prelude_Cast_cast_Cast_Nat_Double($28)/2.0));
2119
- const $38 = (Prelude_Cast_cast_Cast_Double_Nat($2d)+Prelude_Types_prim__integerToNat(($c-Prelude_Types_String_length(User_Reflect_leftTitle()))));
2120
- const $44 = (Prelude_Cast_cast_Cast_Double_Nat($2d)+Prelude_Types_prim__integerToNat(($c-($6+$1))));
2121
- return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: User_Reflect_header($38), a2: {a1: User_Reflect_chart($0, $1, $2, $3, $4, $5, $44), a2: {h: 0}}});
2122
- }
2123
-
2124
- function User_Reflect_details($0, $1, $2, $3, $4, $5, $6, $7, $8) {
2125
- return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(User_Reflect_intro()), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_underline(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Requested Reviews:')), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_vsep(Data_List_catMaybes({a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('unreviewed:')}, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_vsep(Data_List_catMaybes({a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('open:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(3), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Nat($2)), a2: {h: 0}}})}, a2: {a1: Prelude_Interfaces_x3cx26x3e(csegen_161(), $8, csegen_162()), a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('closed:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(1), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Nat($3)), a2: {h: 0}}})}, a2: {h: 0}}}})))}, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('reviews*:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(2), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Nat($1)), a2: {h: 0}}})}, a2: {a1: Prelude_Interfaces_x3cx26x3e(csegen_161(), $6, date => Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('most recent:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Data_Date_show_Show_Date(date)), a2: {h: 0}}}))), a2: {h: 0}}}}}))), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_underline(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Authored Pulls:')), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_vsep(Data_List_catMaybes({a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('open:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(3), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Nat($5)), a2: {h: 0}}})}, a2: {a1: Prelude_Interfaces_x3cx26x3e(csegen_161(), $7, csegen_162()), a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('closed:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(2), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Nat($4)), a2: {h: 0}}})}, a2: {h: 0}}}}))), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: '*review count (not PR count) of most recent ', a2: {a1: Data_Fin_show_Show_x28Finx20x24nx29(User_Reflect_reviewDetailsCount()), a2: {a1: ' PRs.', a2: {h: 0}}}}))), a2: {h: 0}}}}}}}}}});
2126
- }
2127
-
2128
- function User_Reflect_chart($0, $1, $2, $3, $4, $5, $6) {
2129
- return Text_PrettyPrint_Prettyprinter_Doc_indent(Prelude_Cast_cast_Cast_Nat_Int($6), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(User_replicatex27(2, $1, '\u{b7}'), User_replicatex27(1, $3, '\u{25e6}')), User_replicatex27(3, $2, '<')), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('|'), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(User_replicatex27(3, $5, '>'), User_replicatex27(2, $4, '\u{b7}')))));
2130
- }
2131
-
2132
- const Util_n__3907_1173_startOver = __lazy(function () {
2227
+ const Util_n__4476_1237_startOver = __lazy(function () {
2133
2228
  return {a1: 0, a2: {h: 0}};
2134
2229
  });
2135
2230
 
2136
- function Util_n__3907_1174_guardSuccess($0) {
2231
+ function Util_n__4476_1238_guardSuccess($0) {
2137
2232
  switch($0.h) {
2138
2233
  case undefined: {
2139
2234
  switch($0.a1) {
@@ -2146,12 +2241,12 @@ function Util_n__3907_1174_guardSuccess($0) {
2146
2241
  }
2147
2242
  }
2148
2243
 
2149
- function Util_n__3907_1175_go($0, $1) {
2244
+ function Util_n__4476_1239_go($0, $1) {
2150
2245
  switch($0.a1) {
2151
2246
  case 0: {
2152
2247
  switch(Prelude_Types_isAlpha($1)) {
2153
2248
  case 1: return {a1: 1, a2: {a1: $1, a2: $0.a2}};
2154
- case 0: return Util_n__3907_1173_startOver();
2249
+ case 0: return Util_n__4476_1237_startOver();
2155
2250
  }
2156
2251
  }
2157
2252
  case 1: {
@@ -2160,7 +2255,7 @@ function Util_n__3907_1175_go($0, $1) {
2160
2255
  default: {
2161
2256
  switch(Prelude_Types_isAlpha($1)) {
2162
2257
  case 1: return {a1: 1, a2: {a1: $1, a2: $0.a2}};
2163
- case 0: return Util_n__3907_1173_startOver();
2258
+ case 0: return Util_n__4476_1237_startOver();
2164
2259
  }
2165
2260
  }
2166
2261
  }
@@ -2168,7 +2263,7 @@ function Util_n__3907_1175_go($0, $1) {
2168
2263
  case 2: {
2169
2264
  switch(Prelude_Types_isDigit($1)) {
2170
2265
  case 1: return {a1: 3, a2: {a1: $1, a2: $0.a2}};
2171
- case 0: return Util_n__3907_1173_startOver();
2266
+ case 0: return Util_n__4476_1237_startOver();
2172
2267
  }
2173
2268
  }
2174
2269
  case 3: {
@@ -2181,7 +2276,7 @@ function Util_n__3907_1175_go($0, $1) {
2181
2276
  }
2182
2277
  }
2183
2278
 
2184
- function Util_n__3794_1064_getMoreLines($0, $1, $2) {
2279
+ function Util_n__4363_1128_getMoreLines($0, $1, $2) {
2185
2280
  switch($2.h) {
2186
2281
  case 0: return $0.a1.a1.a2(undefined)(Prelude_Types_List_reverse($1));
2187
2282
  case undefined: {
@@ -2192,13 +2287,13 @@ function Util_n__3794_1064_getMoreLines($0, $1, $2) {
2192
2287
  case '': {
2193
2288
  switch(line) {
2194
2289
  case '': return $0.a1.a1.a2(undefined)(Prelude_Types_List_reverse($1.a2));
2195
- default: return Util_n__3794_1064_getMoreLines($0, {a1: line, a2: $1}, $2.a1());
2290
+ default: return Util_n__4363_1128_getMoreLines($0, {a1: line, a2: $1}, $2.a1());
2196
2291
  }
2197
2292
  }
2198
- default: return Util_n__3794_1064_getMoreLines($0, {a1: line, a2: $1}, $2.a1());
2293
+ default: return Util_n__4363_1128_getMoreLines($0, {a1: line, a2: $1}, $2.a1());
2199
2294
  }
2200
2295
  }
2201
- default: return Util_n__3794_1064_getMoreLines($0, {a1: line, a2: $1}, $2.a1());
2296
+ default: return Util_n__4363_1128_getMoreLines($0, {a1: line, a2: $1}, $2.a1());
2202
2297
  }
2203
2298
  };
2204
2299
  return $0.a1.a2(undefined)(undefined)(Prelude_Interfaces_x3cx24x3e($0.a1.a1.a1, $1c => Data_String_trim($1c), Prelude_IO_getLine($0)))($22);
@@ -2222,33 +2317,49 @@ function Util_renderString($0, $1) {
2222
2317
  return Text_PrettyPrint_Prettyprinter_Render_Terminal_renderString($3);
2223
2318
  }
2224
2319
 
2320
+ function Util_renderIO($0, $1, $2) {
2321
+ let $9;
2322
+ switch(Data_Config_rf__colors($0)) {
2323
+ case 1: {
2324
+ $9 = $2;
2325
+ break;
2326
+ }
2327
+ case 0: {
2328
+ $9 = Text_PrettyPrint_Prettyprinter_Doc_unAnnotate($2);
2329
+ break;
2330
+ }
2331
+ }
2332
+ const $7 = Text_PrettyPrint_Prettyprinter_Render_Terminal_putDoc($9);
2333
+ return $1.a2(undefined)($7);
2334
+ }
2335
+
2225
2336
  function Util_parseJiraPrefix($0) {
2226
- return Prelude_Types_map_Functor_Maybe($3 => Prelude_Types_fastPack(Prelude_Types_List_reverse($3)), Util_n__3907_1174_guardSuccess(Prelude_Types_foldl_Foldable_List($d => $e => Util_n__3907_1175_go($d, $e), Util_n__3907_1173_startOver(), Prelude_Types_fastUnpack($0))));
2337
+ return Prelude_Types_map_Functor_Maybe($3 => Prelude_Types_fastPack(Prelude_Types_List_reverse($3)), Util_n__4476_1238_guardSuccess(Prelude_Types_foldl_Foldable_List($d => $e => Util_n__4476_1239_go($d, $e), Util_n__4476_1237_startOver(), Prelude_Types_fastUnpack($0))));
2227
2338
  }
2228
2339
 
2229
2340
  function Util_getManyLines($0, $1) {
2230
- return Util_n__3794_1064_getMoreLines($0, {h: 0}, $1);
2341
+ return Util_n__4363_1128_getMoreLines($0, {h: 0}, $1);
2231
2342
  }
2232
2343
 
2233
- function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__3714_4051_writeOutput($0, $1, $2, $3) {
2344
+ function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5087_writeOutput($0, $1, $2, $3) {
2234
2345
  return Control_Monad_ST_modifySTRef($1, $7 => ($7+$2), $3);
2235
2346
  }
2236
2347
 
2237
- function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__3714_4048_push($0, $1, $2, $3) {
2348
+ function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5084_push($0, $1, $2, $3) {
2238
2349
  return Control_Monad_ST_modifySTRef($1, $7 => ({a1: $2, a2: $7}), $3);
2239
2350
  }
2240
2351
 
2241
- function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__3714_4050_pop($0, $1, $2) {
2352
+ function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5086_pop($0, $1, $2) {
2242
2353
  const $9 = $a => {
2243
2354
  switch($a.h) {
2244
- case undefined: return Prelude_Interfaces_x3ex3e(csegen_186(), $10 => ($1.value=$a.a2), () => $16 => ({a1: $a.a1}));
2355
+ case undefined: return Prelude_Interfaces_x3ex3e(csegen_159(), $10 => ($1.value=$a.a2), () => $16 => ({a1: $a.a1}));
2245
2356
  case 0: return $18 => ({h: 0});
2246
2357
  }
2247
2358
  };
2248
2359
  return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($5 => ($1.value), $9, $2);
2249
2360
  }
2250
2361
 
2251
- function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__3714_4049_peek($0, $1, $2) {
2362
+ function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5085_peek($0, $1, $2) {
2252
2363
  const $9 = $a => $b => {
2253
2364
  switch($a.h) {
2254
2365
  case undefined: return {a1: $a.a1};
@@ -2258,24 +2369,24 @@ function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__3714_4049_peek($0, $1
2258
2369
  return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($5 => ($1.value), $9, $2);
2259
2370
  }
2260
2371
 
2261
- function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__3714_4052_go($0, $1, $2, $3) {
2372
+ function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5088_go($0, $1, $2, $3) {
2262
2373
  switch($3.h) {
2263
2374
  case 0: return $5 => (undefined);
2264
- case 1: return Prelude_Interfaces_x3ex3e(csegen_186(), $a => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__3714_4051_writeOutput($0, $2, Data_String_singleton($3.a1), $a), () => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__3714_4052_go($0, $1, $2, $3.a2()));
2265
- case 2: return Prelude_Interfaces_x3ex3e(csegen_186(), $1d => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__3714_4051_writeOutput($0, $2, $3.a2, $1d), () => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__3714_4052_go($0, $1, $2, $3.a3()));
2266
- case 3: return Prelude_Interfaces_x3ex3e(csegen_186(), $2e => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__3714_4051_writeOutput($0, $2, (Data_String_singleton('\n')+Text_PrettyPrint_Prettyprinter_Doc_textSpaces($3.a1)), $2e), () => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__3714_4052_go($0, $1, $2, $3.a2));
2375
+ case 1: return Prelude_Interfaces_x3ex3e(csegen_159(), $a => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5087_writeOutput($0, $2, Data_String_singleton($3.a1), $a), () => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5088_go($0, $1, $2, $3.a2()));
2376
+ case 2: return Prelude_Interfaces_x3ex3e(csegen_159(), $1d => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5087_writeOutput($0, $2, $3.a2, $1d), () => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5088_go($0, $1, $2, $3.a3()));
2377
+ case 3: return Prelude_Interfaces_x3ex3e(csegen_159(), $2e => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5087_writeOutput($0, $2, (Data_String_singleton('\n')+Text_PrettyPrint_Prettyprinter_Doc_textSpaces($3.a1)), $2e), () => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5088_go($0, $1, $2, $3.a2));
2267
2378
  case 4: {
2268
2379
  return $40 => {
2269
2380
  const $48 = $49 => {
2270
2381
  switch($49.h) {
2271
2382
  case undefined: {
2272
2383
  const $4b = Prelude_Types_List_tailRecAppend($3.a1, $49.a1);
2273
- return Prelude_Interfaces_x3ex3e(csegen_186(), $53 => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__3714_4048_push($0, $1, $4b, $53), () => Prelude_Interfaces_x3ex3e(csegen_186(), $5e => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__3714_4051_writeOutput($0, $2, Control_ANSI_SGR_escapeSGR($4b), $5e), () => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__3714_4052_go($0, $1, $2, $3.a2)));
2384
+ return Prelude_Interfaces_x3ex3e(csegen_159(), $53 => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5084_push($0, $1, $4b, $53), () => Prelude_Interfaces_x3ex3e(csegen_159(), $5e => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5087_writeOutput($0, $2, Control_ANSI_SGR_escapeSGR($4b), $5e), () => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5088_go($0, $1, $2, $3.a2)));
2274
2385
  }
2275
2386
  case 0: return $6c => ($1.value={h: 0});
2276
2387
  }
2277
2388
  };
2278
- return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($43 => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__3714_4049_peek($0, $1, $43), $48, $40);
2389
+ return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($43 => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5085_peek($0, $1, $43), $48, $40);
2279
2390
  };
2280
2391
  }
2281
2392
  case 5: {
@@ -2283,13 +2394,13 @@ function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__3714_4052_go($0, $1,
2283
2394
  const $7a = _ => $7b => {
2284
2395
  const $83 = $84 => {
2285
2396
  switch($84.h) {
2286
- case undefined: return Prelude_Interfaces_x3ex3e(csegen_186(), $8a => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__3714_4051_writeOutput($0, $2, Control_ANSI_SGR_escapeSGR({a1: {h: 0}, a2: $84.a1}), $8a), () => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__3714_4052_go($0, $1, $2, $3.a1));
2397
+ case undefined: return Prelude_Interfaces_x3ex3e(csegen_159(), $8a => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5087_writeOutput($0, $2, Control_ANSI_SGR_escapeSGR({a1: {h: 0}, a2: $84.a1}), $8a), () => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5088_go($0, $1, $2, $3.a1));
2287
2398
  case 0: return $9a => ($1.value={h: 0});
2288
2399
  }
2289
2400
  };
2290
- return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($7e => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__3714_4049_peek($0, $1, $7e), $83, $7b);
2401
+ return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($7e => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5085_peek($0, $1, $7e), $83, $7b);
2291
2402
  };
2292
- return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($75 => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__3714_4050_pop($0, $1, $75), $7a, $72);
2403
+ return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($75 => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5086_pop($0, $1, $75), $7a, $72);
2293
2404
  };
2294
2405
  }
2295
2406
  }
@@ -2300,7 +2411,7 @@ const Text_PrettyPrint_Prettyprinter_Render_Terminal_underline = __lazy(function
2300
2411
  });
2301
2412
 
2302
2413
  function Text_PrettyPrint_Prettyprinter_Render_Terminal_renderString($0) {
2303
- return Data_Maybe_fromMaybe(() => '<internal pretty printing error>', Control_Monad_ST_runST($6 => $7 => Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($a => Control_Monad_ST_newSTRef({a1: {h: 0}, a2: {h: 0}}, $a), styleStackRef => $11 => Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($14 => Control_Monad_ST_newSTRef('', $14), outputRef => Prelude_Interfaces_x3ex3e(csegen_186(), Text_PrettyPrint_Prettyprinter_Render_Terminal_n__3714_4052_go($0, styleStackRef, outputRef, $0), () => $23 => {
2414
+ return Data_Maybe_fromMaybe(() => '<internal pretty printing error>', Control_Monad_ST_runST($6 => $7 => Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($a => Control_Monad_ST_newSTRef({a1: {h: 0}, a2: {h: 0}}, $a), styleStackRef => $11 => Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($14 => Control_Monad_ST_newSTRef('', $14), outputRef => Prelude_Interfaces_x3ex3e(csegen_159(), Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4235_5088_go($0, styleStackRef, outputRef, $0), () => $23 => {
2304
2415
  const $2a = $2b => {
2305
2416
  switch($2b.h) {
2306
2417
  case 0: return $2d => ({h: 0});
@@ -2318,7 +2429,7 @@ function Text_PrettyPrint_Prettyprinter_Render_Terminal_renderString($0) {
2318
2429
  }
2319
2430
 
2320
2431
  function Text_PrettyPrint_Prettyprinter_Render_Terminal_renderIO($0) {
2321
- return Prelude_IO_putStrLn(csegen_56(), Text_PrettyPrint_Prettyprinter_Render_Terminal_renderString($0));
2432
+ return Prelude_IO_putStrLn(csegen_59(), Text_PrettyPrint_Prettyprinter_Render_Terminal_renderString($0));
2322
2433
  }
2323
2434
 
2324
2435
  function Text_PrettyPrint_Prettyprinter_Render_Terminal_putDoc($0) {
@@ -2333,7 +2444,11 @@ function Text_PrettyPrint_Prettyprinter_Render_Terminal_color($0) {
2333
2444
  return Prelude_Types_pure_Applicative_List({h: 1, a1: $0});
2334
2445
  }
2335
2446
 
2336
- function Text_PrettyPrint_Prettyprinter_Doc_case__unsafeTextWithoutNewLines_3039($0, $1) {
2447
+ const Text_PrettyPrint_Prettyprinter_Render_Terminal_bold = __lazy(function () {
2448
+ return Prelude_Types_pure_Applicative_List({h: 3, a1: 0});
2449
+ });
2450
+
2451
+ function Text_PrettyPrint_Prettyprinter_Doc_case__unsafeTextWithoutNewLines_3043($0, $1) {
2337
2452
  switch($0) {
2338
2453
  case '': {
2339
2454
  switch($1.h) {
@@ -2357,7 +2472,7 @@ function Text_PrettyPrint_Prettyprinter_Doc_case__unsafeTextWithoutNewLines_3039
2357
2472
  }
2358
2473
  }
2359
2474
 
2360
- function Text_PrettyPrint_Prettyprinter_Doc_case__changesUponFlattening_2306($0, $1, $2) {
2475
+ function Text_PrettyPrint_Prettyprinter_Doc_case__changesUponFlattening_2310($0, $1, $2) {
2361
2476
  switch($2.a1.h) {
2362
2477
  case 2: return {h: 2};
2363
2478
  default: {
@@ -2384,8 +2499,8 @@ function Text_PrettyPrint_Prettyprinter_Doc_case__changesUponFlattening_2306($0,
2384
2499
  }
2385
2500
  }
2386
2501
 
2387
- function Text_PrettyPrint_Prettyprinter_Doc_n__8191_6694_selectNicer($0, $1, $2, $3, $4, $5, $6) {
2388
- switch($2($3)($4)(Text_PrettyPrint_Prettyprinter_Doc_n__8191_6693_initialIndentation($0, $1, $2, $6()))($5)) {
2502
+ function Text_PrettyPrint_Prettyprinter_Doc_n__8712_6698_selectNicer($0, $1, $2, $3, $4, $5, $6) {
2503
+ switch($2($3)($4)(Text_PrettyPrint_Prettyprinter_Doc_n__8712_6697_initialIndentation($0, $1, $2, $6()))($5)) {
2389
2504
  case 1: return $5;
2390
2505
  case 0: return $6();
2391
2506
  }
@@ -2450,7 +2565,7 @@ function Text_PrettyPrint_Prettyprinter_Doc_vcat($0) {
2450
2565
  }
2451
2566
 
2452
2567
  function Text_PrettyPrint_Prettyprinter_Doc_unsafeTextWithoutNewLines($0) {
2453
- return Text_PrettyPrint_Prettyprinter_Doc_case__unsafeTextWithoutNewLines_3039($0, Data_String_strM($0));
2568
+ return Text_PrettyPrint_Prettyprinter_Doc_case__unsafeTextWithoutNewLines_3043($0, Data_String_strM($0));
2454
2569
  }
2455
2570
 
2456
2571
  function Text_PrettyPrint_Prettyprinter_Doc_unAnnotate($0) {
@@ -2517,7 +2632,7 @@ const Text_PrettyPrint_Prettyprinter_Doc_line = __lazy(function () {
2517
2632
  });
2518
2633
 
2519
2634
  function Text_PrettyPrint_Prettyprinter_Doc_layoutWadlerLeijen($0, $1, $2) {
2520
- return Text_PrettyPrint_Prettyprinter_Doc_n__8191_6695_best($2, $1, $0, 0, 0, {h: 1, a1: 0, a2: $2, a3: {h: 0}});
2635
+ return Text_PrettyPrint_Prettyprinter_Doc_n__8712_6699_best($2, $1, $0, 0, 0, {h: 1, a1: 0, a2: $2, a3: {h: 0}});
2521
2636
  }
2522
2637
 
2523
2638
  function Text_PrettyPrint_Prettyprinter_Doc_layoutUnbounded($0) {
@@ -2540,7 +2655,7 @@ function Text_PrettyPrint_Prettyprinter_Doc_hsep($0) {
2540
2655
  }
2541
2656
 
2542
2657
  function Text_PrettyPrint_Prettyprinter_Doc_hcat($0) {
2543
- return Text_PrettyPrint_Prettyprinter_Doc_concatWith(csegen_199(), $0);
2658
+ return Text_PrettyPrint_Prettyprinter_Doc_concatWith(csegen_172(), $0);
2544
2659
  }
2545
2660
 
2546
2661
  function Text_PrettyPrint_Prettyprinter_Doc_hang($0, $1) {
@@ -2585,10 +2700,10 @@ function Text_PrettyPrint_Prettyprinter_Doc_encloseSep($0, $1, $2, $3) {
2585
2700
  case undefined: {
2586
2701
  switch($3.a2.h) {
2587
2702
  case 0: return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29($0, $3.a1), $1);
2588
- default: return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_cat(Data_List_zipWith_Zippable_List(csegen_199(), {a1: $0, a2: Data_List_replicate(Prelude_Types_prim__integerToNat((Prelude_Types_List_lengthTR($3)-1n)), $2)}, $3)), $1);
2703
+ default: return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_cat(Data_List_zipWith_Zippable_List(csegen_172(), {a1: $0, a2: Data_List_replicate(Prelude_Types_prim__integerToNat((Prelude_Types_List_lengthTR($3)-1n)), $2)}, $3)), $1);
2589
2704
  }
2590
2705
  }
2591
- default: return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_cat(Data_List_zipWith_Zippable_List(csegen_199(), {a1: $0, a2: Data_List_replicate(Prelude_Types_prim__integerToNat((Prelude_Types_List_lengthTR($3)-1n)), $2)}, $3)), $1);
2706
+ default: return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_cat(Data_List_zipWith_Zippable_List(csegen_172(), {a1: $0, a2: Data_List_replicate(Prelude_Types_prim__integerToNat((Prelude_Types_List_lengthTR($3)-1n)), $2)}, $3)), $1);
2592
2707
  }
2593
2708
  }
2594
2709
 
@@ -2626,7 +2741,7 @@ function Text_PrettyPrint_Prettyprinter_Doc_changesUponFlattening($0) {
2626
2741
  case 2: return {h: 1};
2627
2742
  case 3: return {h: 2};
2628
2743
  case 4: return {h: 0, a1: Text_PrettyPrint_Prettyprinter_Doc_flatten($0.a2())};
2629
- case 5: return Text_PrettyPrint_Prettyprinter_Doc_case__changesUponFlattening_2306($0.a2, $0.a1, {a1: Text_PrettyPrint_Prettyprinter_Doc_changesUponFlattening($0.a1), a2: Text_PrettyPrint_Prettyprinter_Doc_changesUponFlattening($0.a2)});
2744
+ case 5: return Text_PrettyPrint_Prettyprinter_Doc_case__changesUponFlattening_2310($0.a2, $0.a1, {a1: Text_PrettyPrint_Prettyprinter_Doc_changesUponFlattening($0.a1), a2: Text_PrettyPrint_Prettyprinter_Doc_changesUponFlattening($0.a2)});
2630
2745
  case 6: return Text_PrettyPrint_Prettyprinter_Doc_map_Functor_FlattenResult($12 => ({h: 6, a1: $0.a1, a2: $12}), Text_PrettyPrint_Prettyprinter_Doc_changesUponFlattening($0.a2));
2631
2746
  case 7: return {h: 0, a1: $0.a1()};
2632
2747
  case 8: return {h: 0, a1: {h: 8, a1: $1c => Text_PrettyPrint_Prettyprinter_Doc_flatten($0.a1($1c))}};
@@ -2678,7 +2793,7 @@ function Data_String_Extra_join($0, $1, $2) {
2678
2793
  }
2679
2794
 
2680
2795
  function Data_String_Extra_index($0, $1) {
2681
- return Data_String_Extra_with__index_1614($1, Prelude_Types_fastUnpack($1), $0);
2796
+ return Data_String_Extra_with__index_1618($1, Prelude_Types_fastUnpack($1), $0);
2682
2797
  }
2683
2798
 
2684
2799
  function Data_String_Extra_dropLast($0, $1) {
@@ -2689,7 +2804,7 @@ function Data_String_Extra_drop($0, $1) {
2689
2804
  return Prelude_Types_substr($0, Prelude_Types_String_length($1), $1);
2690
2805
  }
2691
2806
 
2692
- function Data_String_with__parsePositivex2cparsePosTrimmed_3968($0, $1, $2, $3, $4) {
2807
+ function Data_String_with__parsePositivex2cparsePosTrimmed_6830($0, $1, $2, $3, $4) {
2693
2808
  switch($3) {
2694
2809
  case '': {
2695
2810
  switch($4.h) {
@@ -2743,7 +2858,7 @@ function Data_String_with__parsePositivex2cparsePosTrimmed_3968($0, $1, $2, $3,
2743
2858
  }
2744
2859
  }
2745
2860
 
2746
- function Data_String_with__asList_3617($0, $1) {
2861
+ function Data_String_with__asList_6479($0, $1) {
2747
2862
  switch($0) {
2748
2863
  case '': {
2749
2864
  switch($1.h) {
@@ -2755,15 +2870,15 @@ function Data_String_with__asList_3617($0, $1) {
2755
2870
  }
2756
2871
  }
2757
2872
 
2758
- function Data_String_n__3092_3293_unlinesx27($0) {
2873
+ function Data_String_n__3615_6211_unlinesx27($0) {
2759
2874
  switch($0.h) {
2760
2875
  case 0: return {h: 0};
2761
- case undefined: return {a1: $0.a1, a2: {a1: '\n', a2: Data_String_n__3092_3293_unlinesx27($0.a2)}};
2876
+ case undefined: return {a1: $0.a1, a2: {a1: '\n', a2: Data_String_n__3615_6211_unlinesx27($0.a2)}};
2762
2877
  }
2763
2878
  }
2764
2879
 
2765
- function Data_String_n__3740_3962_parsePosTrimmed($0, $1, $2) {
2766
- return Data_String_with__parsePositivex2cparsePosTrimmed_3968(undefined, $0, $2, $2, Data_String_strM($2));
2880
+ function Data_String_n__4219_6824_parsePosTrimmed($0, $1, $2) {
2881
+ return Data_String_with__parsePositivex2cparsePosTrimmed_6830(undefined, $0, $2, $2, Data_String_strM($2));
2767
2882
  }
2768
2883
 
2769
2884
  function Data_String_trim($0) {
@@ -2799,15 +2914,15 @@ function Data_String_replicate($0, $1) {
2799
2914
  }
2800
2915
 
2801
2916
  function Data_String_parsePositive($0, $1) {
2802
- return Data_String_n__3740_3962_parsePosTrimmed($0, $1, Data_String_trim($1));
2917
+ return Data_String_n__4219_6824_parsePosTrimmed($0, $1, Data_String_trim($1));
2803
2918
  }
2804
2919
 
2805
2920
  function Data_String_ltrim($0) {
2806
- return Data_String_with__ltrim_3641($0, Data_String_asList($0));
2921
+ return Data_String_with__ltrim_6503($0, Data_String_asList($0));
2807
2922
  }
2808
2923
 
2809
2924
  function Data_String_linesx27($0) {
2810
- return Data_String_n__3252_3457_linesHelp($0, {h: 0}, $0);
2925
+ return Data_String_n__3748_6341_linesHelp($0, {h: 0}, $0);
2811
2926
  }
2812
2927
 
2813
2928
  function Data_String_lines($0) {
@@ -2815,11 +2930,11 @@ function Data_String_lines($0) {
2815
2930
  }
2816
2931
 
2817
2932
  function Data_String_isSuffixOf($0, $1) {
2818
- return Data_List_isSuffixOf(csegen_203(), Prelude_Types_fastUnpack($0), Prelude_Types_fastUnpack($1));
2933
+ return Data_List_isSuffixOf(csegen_176(), Prelude_Types_fastUnpack($0), Prelude_Types_fastUnpack($1));
2819
2934
  }
2820
2935
 
2821
2936
  function Data_String_isPrefixOf($0, $1) {
2822
- return Data_List_isPrefixOf(csegen_203(), Prelude_Types_fastUnpack($0), Prelude_Types_fastUnpack($1));
2937
+ return Data_List_isPrefixOf(csegen_176(), Prelude_Types_fastUnpack($0), Prelude_Types_fastUnpack($1));
2823
2938
  }
2824
2939
 
2825
2940
  function Data_String_indent($0, $1) {
@@ -2827,7 +2942,7 @@ function Data_String_indent($0, $1) {
2827
2942
  }
2828
2943
 
2829
2944
  function Data_String_fastUnlines($0) {
2830
- return Prelude_Types_fastConcat(Data_String_n__3092_3293_unlinesx27($0));
2945
+ return Prelude_Types_fastConcat(Data_String_n__3615_6211_unlinesx27($0));
2831
2946
  }
2832
2947
 
2833
2948
  function Data_String_break$($0, $1) {
@@ -2841,7 +2956,7 @@ function Data_String_break$($0, $1) {
2841
2956
  }
2842
2957
 
2843
2958
  function Data_String_asList($0) {
2844
- return Data_String_with__asList_3617($0, Data_String_strM($0));
2959
+ return Data_String_with__asList_6479($0, Data_String_strM($0));
2845
2960
  }
2846
2961
 
2847
2962
  function Data_Fin_show_Show_x28Finx20x24nx29($0) {
@@ -2917,14 +3032,14 @@ function Builtin_believe_me($0) {
2917
3032
  return $0;
2918
3033
  }
2919
3034
 
2920
- function Prelude_Types_n__8489_7765_hexChars($0) {
3035
+ function Prelude_Types_n__9361_8543_hexChars($0) {
2921
3036
  return {a1: '0', a2: {a1: '1', a2: {a1: '2', a2: {a1: '3', a2: {a1: '4', a2: {a1: '5', a2: {a1: '6', a2: {a1: '7', a2: {a1: '8', a2: {a1: '9', a2: {a1: 'A', a2: {a1: 'B', a2: {a1: 'C', a2: {a1: 'D', a2: {a1: 'E', a2: {a1: 'F', a2: {h: 0}}}}}}}}}}}}}}}}};
2922
3037
  }
2923
3038
 
2924
3039
  function Prelude_Types_traverse_Traversable_List($0, $1, $2) {
2925
3040
  switch($2.h) {
2926
3041
  case 0: return $0.a2(undefined)({h: 0});
2927
- case undefined: return $0.a3(undefined)(undefined)($0.a3(undefined)(undefined)($0.a2(undefined)(csegen_219()))($1($2.a1)))(Prelude_Types_traverse_Traversable_List($0, $1, $2.a2));
3042
+ case undefined: return $0.a3(undefined)(undefined)($0.a3(undefined)(undefined)($0.a2(undefined)(csegen_192()))($1($2.a1)))(Prelude_Types_traverse_Traversable_List($0, $1, $2.a2));
2928
3043
  }
2929
3044
  }
2930
3045
 
@@ -2936,11 +3051,11 @@ function Prelude_Types_traverse_Traversable_x28Eitherx20x24ex29($0, $1, $2) {
2936
3051
  }
2937
3052
 
2938
3053
  function Prelude_Types_toList_Foldable_Maybe($0) {
2939
- return Prelude_Types_foldr_Foldable_Maybe(csegen_219(), {h: 0}, $0);
3054
+ return Prelude_Types_foldr_Foldable_Maybe(csegen_192(), {h: 0}, $0);
2940
3055
  }
2941
3056
 
2942
3057
  function Prelude_Types_toList_Foldable_x28Eitherx20x24ex29($0) {
2943
- return Prelude_Types_foldr_Foldable_x28Eitherx20x24ex29(csegen_219(), {h: 0}, $0);
3058
+ return Prelude_Types_foldr_Foldable_x28Eitherx20x24ex29(csegen_192(), {h: 0}, $0);
2944
3059
  }
2945
3060
 
2946
3061
  function Prelude_Types_rangeFromTo_Range_x24a($0, $1, $2) {
@@ -3059,7 +3174,7 @@ function Prelude_Types_foldr_Foldable_x28Eitherx20x24ex29($0, $1, $2) {
3059
3174
  }
3060
3175
 
3061
3176
  function Prelude_Types_foldl_Foldable_x28Eitherx20x24ex29($0, $1, $2) {
3062
- return Prelude_Types_foldr_Foldable_x28Eitherx20x24ex29($6 => $7 => Prelude_Basics_flip(csegen_220(), $c => Prelude_Basics_flip($0, $6, $c), $7), $13 => $13, $2)($1);
3177
+ return Prelude_Types_foldr_Foldable_x28Eitherx20x24ex29($6 => $7 => Prelude_Basics_flip(csegen_193(), $c => Prelude_Basics_flip($0, $6, $c), $7), $13 => $13, $2)($1);
3063
3178
  }
3064
3179
 
3065
3180
  function Prelude_Types_foldlM_Foldable_List($0, $1, $2, $3) {
@@ -3210,7 +3325,7 @@ function Prelude_Types_maybe($0, $1, $2) {
3210
3325
  }
3211
3326
 
3212
3327
  function Prelude_Types_listBind($0, $1) {
3213
- return Prelude_Types_n__7533_6840_go($1, $0, {h: 0}, $0);
3328
+ return Prelude_Types_listBindOnto($1, {h: 0}, $0);
3214
3329
  }
3215
3330
 
3216
3331
  function Prelude_Types_List_lengthTR($0) {
@@ -3268,7 +3383,7 @@ function Prelude_Types_isLower($0) {
3268
3383
  }
3269
3384
 
3270
3385
  function Prelude_Types_isHexDigit($0) {
3271
- return Prelude_Types_elem(csegen_104(), csegen_203(), Prelude_Types_toUpper($0), Prelude_Types_n__8489_7765_hexChars($0));
3386
+ return Prelude_Types_elem(csegen_77(), csegen_176(), Prelude_Types_toUpper($0), Prelude_Types_n__9361_8543_hexChars($0));
3272
3387
  }
3273
3388
 
3274
3389
  function Prelude_Types_isDigit($0) {
@@ -3329,15 +3444,15 @@ function Prelude_Types_countFrom($0, $1) {
3329
3444
 
3330
3445
  function Prelude_Num_mod_Integral_Int($0, $1) {
3331
3446
  switch(Prelude_EqOrd_x3dx3d_Eq_Int($1, Number(_truncBigInt32(0n)))) {
3332
- case 0: return ($0%$1);
3333
- default: return Builtin_idris_crash(undefined)('Unhandled input for Prelude.Num.case block in mod at Prelude.Num:121:3--123:40');
3447
+ case 0: return _mod($0, $1);
3448
+ default: return Builtin_idris_crash(undefined)('Unhandled input for Prelude.Num.case block in mod at Prelude.Num:131:3--133:40');
3334
3449
  }
3335
3450
  }
3336
3451
 
3337
3452
  function Prelude_Num_div_Integral_Int($0, $1) {
3338
3453
  switch(Prelude_EqOrd_x3dx3d_Eq_Int($1, Number(_truncBigInt32(0n)))) {
3339
3454
  case 0: return _div32s($0, $1);
3340
- default: return Builtin_idris_crash(undefined)('Unhandled input for Prelude.Num.case block in div at Prelude.Num:118:3--120:40');
3455
+ default: return Builtin_idris_crash(undefined)('Unhandled input for Prelude.Num.case block in div at Prelude.Num:128:3--130:40');
3341
3456
  }
3342
3457
  }
3343
3458
 
@@ -3740,7 +3855,11 @@ function Prelude_Interfaces_x2ax3e($0, $1, $2) {
3740
3855
  return $0.a3(undefined)(undefined)($0.a1(undefined)(undefined)($13 => $14 => $14)($1))($2);
3741
3856
  }
3742
3857
 
3743
- function Prelude_Show_n__2336_9915_asciiTab($0) {
3858
+ function Prelude_Interfaces_x24x3e($0, $1, $2) {
3859
+ return $0(undefined)(undefined)($a => $2)($1);
3860
+ }
3861
+
3862
+ function Prelude_Show_n__2390_10835_asciiTab($0) {
3744
3863
  return {a1: 'NUL', a2: {a1: 'SOH', a2: {a1: 'STX', a2: {a1: 'ETX', a2: {a1: 'EOT', a2: {a1: 'ENQ', a2: {a1: 'ACK', a2: {a1: 'BEL', a2: {a1: 'BS', a2: {a1: 'HT', a2: {a1: 'LF', a2: {a1: 'VT', a2: {a1: 'FF', a2: {a1: 'CR', a2: {a1: 'SO', a2: {a1: 'SI', a2: {a1: 'DLE', a2: {a1: 'DC1', a2: {a1: 'DC2', a2: {a1: 'DC3', a2: {a1: 'DC4', a2: {a1: 'NAK', a2: {a1: 'SYN', a2: {a1: 'ETB', a2: {a1: 'CAN', a2: {a1: 'EM', a2: {a1: 'SUB', a2: {a1: 'ESC', a2: {a1: 'FS', a2: {a1: 'GS', a2: {a1: 'RS', a2: {a1: 'US', a2: {h: 0}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}};
3745
3864
  }
3746
3865
 
@@ -3776,7 +3895,7 @@ function Prelude_Show_show_Show_Bits32($0) {
3776
3895
  }
3777
3896
 
3778
3897
  function Prelude_Show_show_Show_x28Listx20x24ax29($0, $1) {
3779
- return ('['+(Prelude_Show_n__3118_10636_showx27($0, $1, '', $1)+']'));
3898
+ return ('['+(Prelude_Show_n__3172_11556_showx27($0, $1, '', $1)+']'));
3780
3899
  }
3781
3900
 
3782
3901
  function Prelude_Show_showPrec_Show_String($0, $1) {
@@ -3848,7 +3967,7 @@ function Prelude_Show_showLitChar($0) {
3848
3967
  case '\u{5c}': return $23 => ('\u{5c}\u{5c}'+$23);
3849
3968
  default: {
3850
3969
  return $26 => {
3851
- const $27 = Prelude_Types_getAt(Prelude_Types_prim__integerToNat(BigInt($0.codePointAt(0))), Prelude_Show_n__2336_9915_asciiTab($0));
3970
+ const $27 = Prelude_Types_getAt(Prelude_Types_prim__integerToNat(BigInt($0.codePointAt(0))), Prelude_Show_n__2390_10835_asciiTab($0));
3852
3971
  switch($27.h) {
3853
3972
  case undefined: return ('\u{5c}'+($27.a1+$26));
3854
3973
  case 0: {
@@ -4189,7 +4308,7 @@ function Data_List1_x2bx2b($0, $1) {
4189
4308
  return Data_List1_appendl($0, Data_List1_forget($1));
4190
4309
  }
4191
4310
 
4192
- function Data_List_with__inBounds_1883($0, $1, $2, $3, $4) {
4311
+ function Data_List_with__inBounds_3222($0, $1, $2, $3, $4) {
4193
4312
  switch($3.h) {
4194
4313
  case 0: return {h: 0, a1: ($3.a1+1n)};
4195
4314
  case 1: {
@@ -4207,15 +4326,15 @@ function Data_List_with__inBounds_1883($0, $1, $2, $3, $4) {
4207
4326
  }
4208
4327
  }
4209
4328
 
4210
- function Data_List_n__7054_5393_split($0, $1, $2) {
4211
- return Data_List_n__7054_5392_splitRec($0, $1, $2, $2, $9 => $9);
4329
+ function Data_List_n__7156_6664_split($0, $1, $2) {
4330
+ return Data_List_n__7156_6663_splitRec($0, $1, $2, $2, $9 => $9);
4212
4331
  }
4213
4332
 
4214
- function Data_List_n__7553_5885_go($0, $1, $2, $3, $4) {
4333
+ function Data_List_n__7655_7156_go($0, $1, $2, $3, $4) {
4215
4334
  switch($4.h) {
4216
4335
  case 0: return {a1: Data_List1_singleton($3), a2: {h: 0}};
4217
4336
  case undefined: {
4218
- const $a = Data_List_n__7553_5885_go($0, $1, $2, $4.a1, $4.a2);
4337
+ const $a = Data_List_n__7655_7156_go($0, $1, $2, $4.a1, $4.a2);
4219
4338
  switch($2($3)($4.a1)) {
4220
4339
  case 1: return {a1: Data_List1_cons($3, $a.a1), a2: $a.a2};
4221
4340
  case 0: return {a1: Data_List1_singleton($3), a2: {a1: $a.a1, a2: $a.a2}};
@@ -4295,13 +4414,13 @@ function Data_List_sortBy($0, $1) {
4295
4414
  switch($1.a2.h) {
4296
4415
  case 0: return {a1: $1.a1, a2: {h: 0}};
4297
4416
  default: {
4298
- const $6 = Data_List_n__7054_5393_split($1, $0, $1);
4417
+ const $6 = Data_List_n__7156_6664_split($1, $0, $1);
4299
4418
  return Data_List_mergeBy($0, Data_List_sortBy($0, $6.a1), Data_List_sortBy($0, $6.a2));
4300
4419
  }
4301
4420
  }
4302
4421
  }
4303
4422
  default: {
4304
- const $15 = Data_List_n__7054_5393_split($1, $0, $1);
4423
+ const $15 = Data_List_n__7156_6664_split($1, $0, $1);
4305
4424
  return Data_List_mergeBy($0, Data_List_sortBy($0, $15.a1), Data_List_sortBy($0, $15.a2));
4306
4425
  }
4307
4426
  }
@@ -4335,7 +4454,7 @@ function Data_List_partition($0, $1) {
4335
4454
  }
4336
4455
 
4337
4456
  function Data_List_nubBy($0, $1) {
4338
- return Data_List_n__4238_2645_nubByx27({h: 0}, $0, $1);
4457
+ return Data_List_n__4343_3930_nubByx27({h: 0}, $0, $1);
4339
4458
  }
4340
4459
 
4341
4460
  function Data_List_nub($0, $1) {
@@ -4404,7 +4523,7 @@ function Data_List_inBounds($0, $1) {
4404
4523
  case 0n: return {h: 0, a1: 0n};
4405
4524
  default: {
4406
4525
  const $a = ($0-1n);
4407
- return Data_List_with__inBounds_1883(undefined, $a, $1.a2, Data_List_inBounds($a, $1.a2), $1.a1);
4526
+ return Data_List_with__inBounds_3222(undefined, $a, $1.a2, Data_List_inBounds($a, $1.a2), $1.a1);
4408
4527
  }
4409
4528
  }
4410
4529
  }
@@ -4430,7 +4549,7 @@ function Data_List_groupBy($0, $1) {
4430
4549
  switch($1.h) {
4431
4550
  case 0: return {h: 0};
4432
4551
  case undefined: {
4433
- const $3 = Data_List_n__7553_5885_go($1.a1, $1.a2, $0, $1.a1, $1.a2);
4552
+ const $3 = Data_List_n__7655_7156_go($1.a1, $1.a2, $0, $1.a1, $1.a2);
4434
4553
  return {a1: $3.a1, a2: $3.a2};
4435
4554
  }
4436
4555
  }
@@ -4457,7 +4576,7 @@ function Data_List_delete($0, $1, $2) {
4457
4576
  }
4458
4577
 
4459
4578
  function Data_List_catMaybes($0) {
4460
- return Data_List_mapMaybe($3 => $3, $0);
4579
+ return Prelude_Types_List_mapMaybe($3 => $3, $0);
4461
4580
  }
4462
4581
 
4463
4582
  function Data_List_break$($0, $1) {
@@ -4475,7 +4594,7 @@ function Data_List_x5cx5c($0, $1, $2) {
4475
4594
  }
4476
4595
 
4477
4596
  function Control_Monad_ST_map_Functor_x28STx20x24sx29($0, $1) {
4478
- return Prelude_Interfaces_x3cx24x3e(csegen_62(), $0, $1);
4597
+ return Prelude_Interfaces_x3cx24x3e(csegen_85(), $0, $1);
4479
4598
  }
4480
4599
 
4481
4600
  function Control_Monad_ST_join_Monad_x28STx20x24sx29($0, $1) {
@@ -4498,7 +4617,7 @@ function Control_Monad_ST_runST($0) {
4498
4617
  }
4499
4618
 
4500
4619
  function Control_Monad_ST_newSTRef($0, $1) {
4501
- const $2 = Data_IORef_newIORef(csegen_56(), $0)($1);
4620
+ const $2 = Data_IORef_newIORef(csegen_59(), $0)($1);
4502
4621
  return $2;
4503
4622
  }
4504
4623
 
@@ -4510,7 +4629,7 @@ function Data_IORef_newIORef($0, $1) {
4510
4629
  return $0.a1.a2(undefined)(undefined)($0.a2(undefined)($10 => ({value:$1})))(m => $0.a1.a1.a2(undefined)(m));
4511
4630
  }
4512
4631
 
4513
- function Control_ANSI_SGR_n__3002_1681_toCode($0, $1) {
4632
+ function Control_ANSI_SGR_n__3202_2726_toCode($0, $1) {
4514
4633
  switch($1.h) {
4515
4634
  case 0: return '0';
4516
4635
  case 1: return ('38;5;'+Control_ANSI_SGR_cast_Cast_Color_String($1.a1));
@@ -4564,7 +4683,7 @@ function Control_ANSI_SGR_cast_Cast_Blink_String($0) {
4564
4683
  }
4565
4684
 
4566
4685
  function Control_ANSI_SGR_escapeSGR($0) {
4567
- return ('\u{1b}['+(Prelude_Interfaces_concat(csegen_114(), csegen_104(), Data_List_intersperse(';', Prelude_Interfaces_x3cx24x3e(csegen_111(), $11 => Control_ANSI_SGR_n__3002_1681_toCode($0, $11), $0)))+'m'));
4686
+ return ('\u{1b}['+(Prelude_Interfaces_concat(csegen_62(), csegen_77(), Data_List_intersperse(';', Prelude_Interfaces_x3cx24x3e(csegen_119(), $11 => Control_ANSI_SGR_n__3202_2726_toCode($0, $11), $0)))+'m'));
4568
4687
  }
4569
4688
 
4570
4689
  const Text_PrettyPrint_Prettyprinter_Symbols_rparen = __lazy(function () {
@@ -4593,7 +4712,7 @@ const Data_Fuel_forever = __lazy(function () {
4593
4712
  return {a1: () => Data_Fuel_forever()};
4594
4713
  });
4595
4714
 
4596
- function Data_Config_n__4694_5004_parseConfigJson($0, $1) {
4715
+ function Data_Config_n__5186_7922_parseConfigJson($0, $1) {
4597
4716
  switch($1.h) {
4598
4717
  case 5: {
4599
4718
  const $18 = $19 => {
@@ -4614,7 +4733,7 @@ function Data_Config_n__4694_5004_parseConfigJson($0, $1) {
4614
4733
  }
4615
4734
 
4616
4735
  function Data_Config_show_Show_Config($0) {
4617
- return Data_String_fastUnlines({a1: Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: ' updatedAt: ', a2: {a1: Prelude_Show_show_Show_Bits32($0.a1), a2: {h: 0}}}), a2: {a1: Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: ' org: ', a2: {a1: Prelude_Show_show_Show_String($0.a2), a2: {h: 0}}}), a2: {a1: Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: ' repo: ', a2: {a1: Prelude_Show_show_Show_String($0.a3), a2: {h: 0}}}), a2: {a1: Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: ' mainBranch: ', a2: {a1: Prelude_Show_show_Show_String($0.a4), a2: {h: 0}}}), a2: {a1: Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: ' assignTeams: ', a2: {a1: Prelude_Show_show_Show_Bool($0.a5), a2: {h: 0}}}), a2: {a1: Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: 'commentOnAssign: ', a2: {a1: Prelude_Show_show_Show_Bool($0.a6), a2: {h: 0}}}), a2: {a1: Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: ' teamSlugs: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_107(), $0.a7), a2: {h: 0}}}), a2: {a1: Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: ' orgMembers: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_107(), $0.a8), a2: {h: 0}}}), a2: {h: 0}}}}}}}}});
4736
+ return Data_String_fastUnlines({a1: Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: ' updatedAt: ', a2: {a1: Prelude_Show_show_Show_Bits32($0.a1), a2: {h: 0}}}), a2: {a1: Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: ' org: ', a2: {a1: Prelude_Show_show_Show_String($0.a2), a2: {h: 0}}}), a2: {a1: Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: ' repo: ', a2: {a1: Prelude_Show_show_Show_String($0.a3), a2: {h: 0}}}), a2: {a1: Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: ' mainBranch: ', a2: {a1: Prelude_Show_show_Show_String($0.a4), a2: {h: 0}}}), a2: {a1: Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: ' assignTeams: ', a2: {a1: Prelude_Show_show_Show_Bool($0.a5), a2: {h: 0}}}), a2: {a1: Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'commentOnAssign: ', a2: {a1: Prelude_Show_show_Show_Bool($0.a6), a2: {h: 0}}}), a2: {a1: Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: ' teamSlugs: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $0.a7), a2: {h: 0}}}), a2: {a1: Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: ' orgMembers: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_115(), $0.a8), a2: {h: 0}}}), a2: {h: 0}}}}}}}}});
4618
4737
  }
4619
4738
 
4620
4739
  function Data_Config_showPrec_Show_Config($0, $1) {
@@ -4656,33 +4775,33 @@ function Data_Config_parseConfig($0, $1) {
4656
4775
  }
4657
4776
  };
4658
4777
  const $4 = {a1: $5, a2: a => $d => ({h: 1, a1: $d}), a3: $f};
4659
- const $3 = {a1: $4, a2: csegen_271(), a3: csegen_272()};
4660
- return Prelude_Interfaces_x3ex3dx3e($3, csegen_273(), $20 => Data_Config_n__4694_5004_parseConfigJson($0, $20), $1);
4778
+ const $3 = {a1: $4, a2: csegen_244(), a3: csegen_245()};
4779
+ return Prelude_Interfaces_x3ex3dx3e($3, csegen_246(), $20 => Data_Config_n__5186_7922_parseConfigJson($0, $20), $1);
4661
4780
  }
4662
4781
 
4663
4782
  function Data_Config_json($0) {
4664
- return {h: 5, a1: {a1: {a1: 'mainBranch', a2: {h: 3, a1: $0.a4}}, a2: {a1: {a1: 'assignTeams', a2: {h: 1, a1: $0.a5}}, a2: {a1: {a1: 'commentOnAssign', a2: {h: 1, a1: $0.a6}}, a2: {a1: {a1: 'org', a2: {h: 3, a1: $0.a2}}, a2: {a1: {a1: 'orgMembers', a2: {h: 4, a1: Prelude_Interfaces_x3cx24x3e(csegen_111(), $1f => ({h: 3, a1: $1f}), Data_List_sort(csegen_88(), $0.a8))}}, a2: {a1: {a1: 'repo', a2: {h: 3, a1: $0.a3}}, a2: {a1: {a1: 'teamSlugs', a2: {h: 4, a1: Prelude_Interfaces_x3cx24x3e(csegen_111(), $34 => ({h: 3, a1: $34}), Data_List_sort(csegen_88(), $0.a7))}}, a2: {a1: {a1: 'updatedAt', a2: {h: 2, a1: Prelude_Cast_cast_Cast_Bits32_Double($0.a1)}}, a2: {h: 0}}}}}}}}}};
4783
+ return {h: 5, a1: {a1: {a1: 'mainBranch', a2: {h: 3, a1: $0.a4}}, a2: {a1: {a1: 'assignTeams', a2: {h: 1, a1: $0.a5}}, a2: {a1: {a1: 'commentOnAssign', a2: {h: 1, a1: $0.a6}}, a2: {a1: {a1: 'org', a2: {h: 3, a1: $0.a2}}, a2: {a1: {a1: 'orgMembers', a2: {h: 4, a1: Prelude_Interfaces_x3cx24x3e(csegen_119(), $1f => ({h: 3, a1: $1f}), Data_List_sort(csegen_111(), $0.a8))}}, a2: {a1: {a1: 'repo', a2: {h: 3, a1: $0.a3}}, a2: {a1: {a1: 'teamSlugs', a2: {h: 4, a1: Prelude_Interfaces_x3cx24x3e(csegen_119(), $34 => ({h: 3, a1: $34}), Data_List_sort(csegen_111(), $0.a7))}}, a2: {a1: {a1: 'updatedAt', a2: {h: 2, a1: Prelude_Cast_cast_Cast_Bits32_Double($0.a1)}}, a2: {h: 0}}}}}}}}}};
4665
4784
  }
4666
4785
 
4667
4786
  const Data_Config_filename = __lazy(function () {
4668
4787
  return 'harmony.json';
4669
4788
  });
4670
4789
 
4671
- function Language_JSON_Accessors_n__3815_4080_lookupx27($0, $1, $2, $3, $4) {
4672
- return Data_Either_maybeToEither(() => Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: 'Missing required key: ', a2: {a1: $3, a2: {a1: '.', a2: {h: 0}}}}), Data_List_lookup(csegen_71(), $3, $4));
4790
+ function Language_JSON_Accessors_n__3991_6998_lookupx27($0, $1, $2, $3, $4) {
4791
+ return Data_Either_maybeToEither(() => Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Missing required key: ', a2: {a1: $3, a2: {a1: '.', a2: {h: 0}}}}), Data_List_lookup(csegen_94(), $3, $4));
4673
4792
  }
4674
4793
 
4675
4794
  function Language_JSON_Accessors_string($0) {
4676
4795
  switch($0.h) {
4677
4796
  case 3: return {h: 1, a1: $0.a1};
4678
- default: return {h: 0, a1: Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: 'Expected a string but found ', a2: {a1: Language_JSON_Data_show_Show_JSON($0), a2: {a1: '.', a2: {h: 0}}}})};
4797
+ default: return {h: 0, a1: Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Expected a string but found ', a2: {a1: Language_JSON_Data_show_Show_JSON($0), a2: {a1: '.', a2: {h: 0}}}})};
4679
4798
  }
4680
4799
  }
4681
4800
 
4682
4801
  function Language_JSON_Accessors_object($0) {
4683
4802
  switch($0.h) {
4684
4803
  case 5: return {h: 1, a1: $0.a1};
4685
- default: return {h: 0, a1: Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: 'Expected an object but found ', a2: {a1: Language_JSON_Data_show_Show_JSON($0), a2: {a1: '.', a2: {h: 0}}}})};
4804
+ default: return {h: 0, a1: Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Expected an object but found ', a2: {a1: Language_JSON_Data_show_Show_JSON($0), a2: {a1: '.', a2: {h: 0}}}})};
4686
4805
  }
4687
4806
  }
4688
4807
 
@@ -4690,7 +4809,7 @@ function Language_JSON_Accessors_lookupAll($0, $1) {
4690
4809
  switch($0.h) {
4691
4810
  case 0: return {h: 1, a1: {h: 0}};
4692
4811
  case undefined: {
4693
- const $4 = Language_JSON_Accessors_n__3815_4080_lookupx27($0.a1, $0.a2, $1, $0.a1, $1);
4812
+ const $4 = Language_JSON_Accessors_n__3991_6998_lookupx27($0.a1, $0.a2, $1, $0.a1, $1);
4694
4813
  switch($4.h) {
4695
4814
  case 1: {
4696
4815
  const $b = Language_JSON_Accessors_lookupAll($0.a2, $1);
@@ -4708,14 +4827,14 @@ function Language_JSON_Accessors_lookupAll($0, $1) {
4708
4827
  function Language_JSON_Accessors_integer($0) {
4709
4828
  switch($0.h) {
4710
4829
  case 2: return {h: 1, a1: Prelude_Cast_cast_Cast_Double_Integer($0.a1)};
4711
- default: return {h: 0, a1: Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: 'Expected an integer but found ', a2: {a1: Language_JSON_Data_show_Show_JSON($0), a2: {a1: '.', a2: {h: 0}}}})};
4830
+ default: return {h: 0, a1: Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Expected an integer but found ', a2: {a1: Language_JSON_Data_show_Show_JSON($0), a2: {a1: '.', a2: {h: 0}}}})};
4712
4831
  }
4713
4832
  }
4714
4833
 
4715
4834
  function Language_JSON_Accessors_bool($0) {
4716
4835
  switch($0.h) {
4717
4836
  case 1: return {h: 1, a1: $0.a1};
4718
- default: return {h: 0, a1: Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: 'Expected a bool but found ', a2: {a1: Language_JSON_Data_show_Show_JSON($0), a2: {a1: '.', a2: {h: 0}}}})};
4837
+ default: return {h: 0, a1: Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Expected a bool but found ', a2: {a1: Language_JSON_Data_show_Show_JSON($0), a2: {a1: '.', a2: {h: 0}}}})};
4719
4838
  }
4720
4839
  }
4721
4840
 
@@ -4742,7 +4861,7 @@ function Language_JSON_Accessors_array($0, $1) {
4742
4861
  const $4 = {a1: $5, a2: a => $d => ({h: 1, a1: $d}), a3: $f};
4743
4862
  return Prelude_Types_traverse_Traversable_List($4, $0, $1.a1);
4744
4863
  }
4745
- default: return {h: 0, a1: Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: 'Expected an array but found ', a2: {a1: Language_JSON_Data_show_Show_JSON($1), a2: {a1: '.', a2: {h: 0}}}})};
4864
+ default: return {h: 0, a1: Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Expected an array but found ', a2: {a1: Language_JSON_Data_show_Show_JSON($1), a2: {a1: '.', a2: {h: 0}}}})};
4746
4865
  }
4747
4866
  }
4748
4867
 
@@ -4785,17 +4904,17 @@ function Text_Bounded_mergeBounds($0, $1) {
4785
4904
  switch($1.h) {
4786
4905
  case undefined: {
4787
4906
  switch($1.a2) {
4788
- case 1: return Prelude_Interfaces_x3cx24x3e(csegen_276(), $e => $1.a1, $0);
4907
+ case 1: return Prelude_Interfaces_x3cx24x3e(csegen_249(), $e => $1.a1, $0);
4789
4908
  default: {
4790
- const $10 = Prelude_EqOrd_min_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_287(), csegen_287(), Text_Bounded_start($0), Text_Bounded_start($1));
4791
- const $1c = Prelude_EqOrd_max_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_287(), csegen_287(), Text_Bounded_end($0), Text_Bounded_end($1));
4909
+ const $10 = Prelude_EqOrd_min_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_260(), csegen_260(), Text_Bounded_start($0), Text_Bounded_start($1));
4910
+ const $1c = Prelude_EqOrd_max_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_260(), csegen_260(), Text_Bounded_end($0), Text_Bounded_end($1));
4792
4911
  return {a1: $1.a1, a2: 0, a3: {a1: $10.a1, a2: $10.a2, a3: $1c.a1, a4: $1c.a2}};
4793
4912
  }
4794
4913
  }
4795
4914
  }
4796
4915
  default: {
4797
- const $30 = Prelude_EqOrd_min_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_287(), csegen_287(), Text_Bounded_start($0), Text_Bounded_start($1));
4798
- const $3c = Prelude_EqOrd_max_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_287(), csegen_287(), Text_Bounded_end($0), Text_Bounded_end($1));
4916
+ const $30 = Prelude_EqOrd_min_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_260(), csegen_260(), Text_Bounded_start($0), Text_Bounded_start($1));
4917
+ const $3c = Prelude_EqOrd_max_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_260(), csegen_260(), Text_Bounded_end($0), Text_Bounded_end($1));
4799
4918
  return {a1: $1.a1, a2: 0, a3: {a1: $30.a1, a2: $30.a2, a3: $3c.a1, a4: $3c.a2}};
4800
4919
  }
4801
4920
  }
@@ -4806,17 +4925,17 @@ function Text_Bounded_mergeBounds($0, $1) {
4806
4925
  switch($1.h) {
4807
4926
  case undefined: {
4808
4927
  switch($1.a2) {
4809
- case 1: return Prelude_Interfaces_x3cx24x3e(csegen_276(), $56 => $1.a1, $0);
4928
+ case 1: return Prelude_Interfaces_x3cx24x3e(csegen_249(), $56 => $1.a1, $0);
4810
4929
  default: {
4811
- const $58 = Prelude_EqOrd_min_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_287(), csegen_287(), Text_Bounded_start($0), Text_Bounded_start($1));
4812
- const $64 = Prelude_EqOrd_max_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_287(), csegen_287(), Text_Bounded_end($0), Text_Bounded_end($1));
4930
+ const $58 = Prelude_EqOrd_min_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_260(), csegen_260(), Text_Bounded_start($0), Text_Bounded_start($1));
4931
+ const $64 = Prelude_EqOrd_max_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_260(), csegen_260(), Text_Bounded_end($0), Text_Bounded_end($1));
4813
4932
  return {a1: $1.a1, a2: 0, a3: {a1: $58.a1, a2: $58.a2, a3: $64.a1, a4: $64.a2}};
4814
4933
  }
4815
4934
  }
4816
4935
  }
4817
4936
  default: {
4818
- const $78 = Prelude_EqOrd_min_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_287(), csegen_287(), Text_Bounded_start($0), Text_Bounded_start($1));
4819
- const $84 = Prelude_EqOrd_max_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_287(), csegen_287(), Text_Bounded_end($0), Text_Bounded_end($1));
4937
+ const $78 = Prelude_EqOrd_min_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_260(), csegen_260(), Text_Bounded_start($0), Text_Bounded_start($1));
4938
+ const $84 = Prelude_EqOrd_max_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_260(), csegen_260(), Text_Bounded_end($0), Text_Bounded_end($1));
4820
4939
  return {a1: $1.a1, a2: 0, a3: {a1: $78.a1, a2: $78.a2, a3: $84.a1, a4: $84.a2}};
4821
4940
  }
4822
4941
  }
@@ -4836,7 +4955,7 @@ function Text_Bounded_end($0) {
4836
4955
  return Text_Bounded_endBounds($0.a3);
4837
4956
  }
4838
4957
 
4839
- function Language_JSON_Data_n__4084_3506_stringifyValues($0, $1) {
4958
+ function Language_JSON_Data_n__4587_6424_stringifyValues($0, $1) {
4840
4959
  switch($1.h) {
4841
4960
  case 0: return '';
4842
4961
  case undefined: {
@@ -4847,7 +4966,7 @@ function Language_JSON_Data_n__4084_3506_stringifyValues($0, $1) {
4847
4966
  break;
4848
4967
  }
4849
4968
  case 0: {
4850
- $6 = (','+Language_JSON_Data_n__4084_3506_stringifyValues($0, $1.a2));
4969
+ $6 = (','+Language_JSON_Data_n__4587_6424_stringifyValues($0, $1.a2));
4851
4970
  break;
4852
4971
  }
4853
4972
  }
@@ -4856,7 +4975,7 @@ function Language_JSON_Data_n__4084_3506_stringifyValues($0, $1) {
4856
4975
  }
4857
4976
  }
4858
4977
 
4859
- function Language_JSON_Data_n__4084_3551_stringifyProps($0, $1) {
4978
+ function Language_JSON_Data_n__4587_6469_stringifyProps($0, $1) {
4860
4979
  switch($1.h) {
4861
4980
  case 0: return '';
4862
4981
  case undefined: {
@@ -4867,25 +4986,25 @@ function Language_JSON_Data_n__4084_3551_stringifyProps($0, $1) {
4867
4986
  break;
4868
4987
  }
4869
4988
  case 0: {
4870
- $7 = (','+Language_JSON_Data_n__4084_3551_stringifyProps($0, $1.a2));
4989
+ $7 = (','+Language_JSON_Data_n__4587_6469_stringifyProps($0, $1.a2));
4871
4990
  break;
4872
4991
  }
4873
4992
  }
4874
- return (Language_JSON_Data_n__4084_3550_stringifyProp($0, $1.a1)+$7);
4993
+ return (Language_JSON_Data_n__4587_6468_stringifyProp($0, $1.a1)+$7);
4875
4994
  }
4876
4995
  }
4877
4996
  }
4878
4997
 
4879
- function Language_JSON_Data_n__4084_3550_stringifyProp($0, $1) {
4998
+ function Language_JSON_Data_n__4587_6468_stringifyProp($0, $1) {
4880
4999
  return (Language_JSON_Data_showString($1.a1)+(':'+Language_JSON_Data_stringify($1.a2)));
4881
5000
  }
4882
5001
 
4883
- function Language_JSON_Data_n__4348_3751_formatValues($0, $1, $2, $3, $4, $5, $6, $7, $8, $9) {
5002
+ function Language_JSON_Data_n__4851_6669_formatValues($0, $1, $2, $3, $4, $5, $6, $7, $8, $9) {
4884
5003
  const $13 = {a1: $4, a2: $3};
4885
5004
  let $12;
4886
5005
  switch($8.a2.h) {
4887
5006
  case undefined: {
4888
- $12 = (',\n'+Language_JSON_Data_n__4348_3751_formatValues($0, $1, $2, $3, $4, $13, $6, $7, $8.a2, undefined));
5007
+ $12 = (',\n'+Language_JSON_Data_n__4851_6669_formatValues($0, $1, $2, $3, $4, $13, $6, $7, $8.a2, undefined));
4889
5008
  break;
4890
5009
  }
4891
5010
  case 0: {
@@ -4896,19 +5015,19 @@ function Language_JSON_Data_n__4348_3751_formatValues($0, $1, $2, $3, $4, $5, $6
4896
5015
  return (Language_JSON_Data_format(($7+$6), $6, $8.a1)+$12);
4897
5016
  }
4898
5017
 
4899
- function Language_JSON_Data_n__4332_3722_formatValue($0, $1, $2, $3, $4, $5) {
5018
+ function Language_JSON_Data_n__4835_6640_formatValue($0, $1, $2, $3, $4, $5) {
4900
5019
  switch($5.h) {
4901
5020
  case 4: {
4902
5021
  switch($5.a1.h) {
4903
5022
  case 0: return '[]';
4904
- case undefined: return ('[\n'+(Language_JSON_Data_n__4348_3751_formatValues($0, $1, $2, $5.a1.a2, $5.a1.a1, $5.a1, $4, $3, $5.a1, undefined)+Data_String_indent($3, ']')));
5023
+ case undefined: return ('[\n'+(Language_JSON_Data_n__4851_6669_formatValues($0, $1, $2, $5.a1.a2, $5.a1.a1, $5.a1, $4, $3, $5.a1, undefined)+Data_String_indent($3, ']')));
4905
5024
  default: return Language_JSON_Data_stringify($5);
4906
5025
  }
4907
5026
  }
4908
5027
  case 5: {
4909
5028
  switch($5.a1.h) {
4910
5029
  case 0: return '{}';
4911
- case undefined: return ('{\n'+(Language_JSON_Data_n__4348_3856_formatProps($0, $1, $2, $5.a1.a2, $5.a1.a1, $5.a1, $4, $3, $5.a1, undefined)+Data_String_indent($3, '}')));
5030
+ case undefined: return ('{\n'+(Language_JSON_Data_n__4851_6774_formatProps($0, $1, $2, $5.a1.a2, $5.a1.a1, $5.a1, $4, $3, $5.a1, undefined)+Data_String_indent($3, '}')));
4912
5031
  default: return Language_JSON_Data_stringify($5);
4913
5032
  }
4914
5033
  }
@@ -4916,12 +5035,12 @@ function Language_JSON_Data_n__4332_3722_formatValue($0, $1, $2, $3, $4, $5) {
4916
5035
  }
4917
5036
  }
4918
5037
 
4919
- function Language_JSON_Data_n__4348_3856_formatProps($0, $1, $2, $3, $4, $5, $6, $7, $8, $9) {
5038
+ function Language_JSON_Data_n__4851_6774_formatProps($0, $1, $2, $3, $4, $5, $6, $7, $8, $9) {
4920
5039
  const $17 = {a1: $4, a2: $3};
4921
5040
  let $16;
4922
5041
  switch($8.a2.h) {
4923
5042
  case undefined: {
4924
- $16 = (',\n'+Language_JSON_Data_n__4348_3856_formatProps($0, $1, $2, $3, $4, $17, $6, $7, $8.a2, undefined));
5043
+ $16 = (',\n'+Language_JSON_Data_n__4851_6774_formatProps($0, $1, $2, $3, $4, $17, $6, $7, $8.a2, undefined));
4925
5044
  break;
4926
5045
  }
4927
5046
  case 0: {
@@ -4929,11 +5048,11 @@ function Language_JSON_Data_n__4348_3856_formatProps($0, $1, $2, $3, $4, $5, $6,
4929
5048
  break;
4930
5049
  }
4931
5050
  }
4932
- return (Language_JSON_Data_n__4348_3855_formatProp($0, $1, $2, $3, $4, $5, $6, $7, $8.a1)+$16);
5051
+ return (Language_JSON_Data_n__4851_6773_formatProp($0, $1, $2, $3, $4, $5, $6, $7, $8.a1)+$16);
4933
5052
  }
4934
5053
 
4935
- function Language_JSON_Data_n__4348_3855_formatProp($0, $1, $2, $3, $4, $5, $6, $7, $8) {
4936
- return (Data_String_indent(($7+$6), (Language_JSON_Data_showString($8.a1)+': '))+Language_JSON_Data_n__4332_3722_formatValue($0, $1, $2, ($7+$6), $6, $8.a2));
5054
+ function Language_JSON_Data_n__4851_6773_formatProp($0, $1, $2, $3, $4, $5, $6, $7, $8) {
5055
+ return (Data_String_indent(($7+$6), (Language_JSON_Data_showString($8.a1)+': '))+Language_JSON_Data_n__4835_6640_formatValue($0, $1, $2, ($7+$6), $6, $8.a2));
4937
5056
  }
4938
5057
 
4939
5058
  function Language_JSON_Data_show_Show_JSON($0) {
@@ -4955,13 +5074,13 @@ function Language_JSON_Data_stringify($0) {
4955
5074
  }
4956
5075
  case 2: return Prelude_Show_show_Show_Double($0.a1);
4957
5076
  case 3: return Language_JSON_Data_showString($0.a1);
4958
- case 4: return ('['+(Language_JSON_Data_n__4084_3506_stringifyValues($0.a1, $0.a1)+']'));
4959
- case 5: return ('{'+(Language_JSON_Data_n__4084_3551_stringifyProps($0.a1, $0.a1)+'}'));
5077
+ case 4: return ('['+(Language_JSON_Data_n__4587_6424_stringifyValues($0.a1, $0.a1)+']'));
5078
+ case 5: return ('{'+(Language_JSON_Data_n__4587_6469_stringifyProps($0.a1, $0.a1)+'}'));
4960
5079
  }
4961
5080
  }
4962
5081
 
4963
5082
  function Language_JSON_Data_showString($0) {
4964
- return ('\"'+(Prelude_Interfaces_concatMap(csegen_114(), csegen_104(), $a => Language_JSON_Data_showChar($a), Prelude_Types_fastUnpack($0))+'\"'));
5083
+ return ('\"'+(Prelude_Interfaces_concatMap(csegen_62(), csegen_77(), $a => Language_JSON_Data_showChar($a), Prelude_Types_fastUnpack($0))+'\"'));
4965
5084
  }
4966
5085
 
4967
5086
  function Language_JSON_Data_showChar($0) {
@@ -4997,7 +5116,7 @@ function Language_JSON_Data_showChar($0) {
4997
5116
  }
4998
5117
 
4999
5118
  function Language_JSON_Data_format($0, $1, $2) {
5000
- return Data_String_indent($0, Language_JSON_Data_n__4332_3722_formatValue($2, $1, $0, $0, $1, $2));
5119
+ return Data_String_indent($0, Language_JSON_Data_n__4835_6640_formatValue($2, $1, $0, $0, $1, $2));
5001
5120
  }
5002
5121
 
5003
5122
  function Language_JSON_Data_b16ToHexString($0) {
@@ -5022,11 +5141,11 @@ function Language_JSON_Data_b16ToHexString($0) {
5022
5141
  }
5023
5142
  }
5024
5143
 
5025
- const Language_JSON_Parser_n__3375_2403_values = __lazy(function () {
5144
+ const Language_JSON_Parser_n__3581_2407_values = __lazy(function () {
5026
5145
  return Text_Parser_sepBy(1, Language_JSON_Parser_punct({h: 0}), Language_JSON_Parser_json());
5027
5146
  });
5028
5147
 
5029
- const Language_JSON_Parser_n__3372_2312_properties = __lazy(function () {
5148
+ const Language_JSON_Parser_n__3578_2316_properties = __lazy(function () {
5030
5149
  return Text_Parser_sepBy(1, Language_JSON_Parser_punct({h: 0}), {h: 8, a1: 1, a2: Language_JSON_Parser_rawString(), a3: () => key => ({h: 10, a1: 1, a2: Language_JSON_Parser_punct({h: 1}), a3: () => ({h: 8, a1: 0, a2: Language_JSON_Parser_json(), a3: () => value => ({h: 0, a1: {a1: key, a2: value}})})})});
5031
5150
  });
5032
5151
 
@@ -5035,7 +5154,7 @@ const Language_JSON_Parser_string = __lazy(function () {
5035
5154
  });
5036
5155
 
5037
5156
  const Language_JSON_Parser_rawString = __lazy(function () {
5038
- return {h: 8, a1: 0, a2: Text_Parser_match(csegen_295(), csegen_298(), {h: 2}), a3: () => mstr => {
5157
+ return {h: 8, a1: 0, a2: Text_Parser_match(csegen_268(), csegen_271(), {h: 2}), a3: () => mstr => {
5039
5158
  switch(mstr.h) {
5040
5159
  case undefined: return {h: 0, a1: mstr.a1};
5041
5160
  case 0: return {h: 4, a1: {h: 0}, a2: 0, a3: 'invalid string'};
@@ -5044,7 +5163,7 @@ const Language_JSON_Parser_rawString = __lazy(function () {
5044
5163
  });
5045
5164
 
5046
5165
  function Language_JSON_Parser_punct($0) {
5047
- return Text_Parser_match(csegen_295(), csegen_298(), {h: 4, a1: $0});
5166
+ return Text_Parser_match(csegen_268(), csegen_271(), {h: 4, a1: $0});
5048
5167
  }
5049
5168
 
5050
5169
  function Language_JSON_Parser_parseJSON($0) {
@@ -5054,7 +5173,7 @@ function Language_JSON_Parser_parseJSON($0) {
5054
5173
  case 0: return 1;
5055
5174
  }
5056
5175
  };
5057
- const $6 = Data_List_filter($8, $0);
5176
+ const $6 = Prelude_Types_List_filter($8, $0);
5058
5177
  const $1 = Text_Parser_Core_parse(1, Language_JSON_Parser_json(), $6);
5059
5178
  switch($1.h) {
5060
5179
  case 1: {
@@ -5073,15 +5192,15 @@ function Language_JSON_Parser_parseJSON($0) {
5073
5192
  }
5074
5193
 
5075
5194
  const Language_JSON_Parser_object = __lazy(function () {
5076
- return {h: 10, a1: 1, a2: Language_JSON_Parser_punct({h: 3, a1: 0}), a3: () => ({h: 11, a1: 0, a2: 1, a3: {h: 6}, a4: {h: 9, a1: 0, a2: 1, a3: Language_JSON_Parser_n__3372_2312_properties(), a4: props => ({h: 10, a1: 0, a2: Language_JSON_Parser_punct({h: 3, a1: 1}), a3: () => ({h: 0, a1: {h: 5, a1: props}})})}})};
5195
+ return {h: 10, a1: 1, a2: Language_JSON_Parser_punct({h: 3, a1: 0}), a3: () => ({h: 11, a1: 0, a2: 1, a3: {h: 6}, a4: {h: 9, a1: 0, a2: 1, a3: Language_JSON_Parser_n__3578_2316_properties(), a4: props => ({h: 10, a1: 0, a2: Language_JSON_Parser_punct({h: 3, a1: 1}), a3: () => ({h: 0, a1: {h: 5, a1: props}})})}})};
5077
5196
  });
5078
5197
 
5079
5198
  const Language_JSON_Parser_number = __lazy(function () {
5080
- return Text_Parser_Core_map_Functor_x28x28x28Grammarx20x24statex29x20x24tokx29x20x24cx29(1, $3 => ({h: 2, a1: $3}), Text_Parser_match(csegen_295(), csegen_298(), {h: 1}));
5199
+ return Text_Parser_Core_map_Functor_x28x28x28Grammarx20x24statex29x20x24tokx29x20x24cx29(1, $3 => ({h: 2, a1: $3}), Text_Parser_match(csegen_268(), csegen_271(), {h: 1}));
5081
5200
  });
5082
5201
 
5083
5202
  const Language_JSON_Parser_null = __lazy(function () {
5084
- return Text_Parser_Core_map_Functor_x28x28x28Grammarx20x24statex29x20x24tokx29x20x24cx29(1, $3 => ({h: 0}), Text_Parser_match(csegen_295(), csegen_298(), {h: 3}));
5203
+ return Text_Parser_Core_map_Functor_x28x28x28Grammarx20x24statex29x20x24tokx29x20x24cx29(1, $3 => ({h: 0}), Text_Parser_match(csegen_268(), csegen_271(), {h: 3}));
5085
5204
  });
5086
5205
 
5087
5206
  const Language_JSON_Parser_json = __lazy(function () {
@@ -5089,11 +5208,11 @@ const Language_JSON_Parser_json = __lazy(function () {
5089
5208
  });
5090
5209
 
5091
5210
  const Language_JSON_Parser_boolean = __lazy(function () {
5092
- return Text_Parser_Core_map_Functor_x28x28x28Grammarx20x24statex29x20x24tokx29x20x24cx29(1, $3 => ({h: 1, a1: $3}), Text_Parser_match(csegen_295(), csegen_298(), {h: 0}));
5211
+ return Text_Parser_Core_map_Functor_x28x28x28Grammarx20x24statex29x20x24tokx29x20x24cx29(1, $3 => ({h: 1, a1: $3}), Text_Parser_match(csegen_268(), csegen_271(), {h: 0}));
5093
5212
  });
5094
5213
 
5095
5214
  const Language_JSON_Parser_array = __lazy(function () {
5096
- return {h: 10, a1: 1, a2: Language_JSON_Parser_punct({h: 2, a1: 0}), a3: () => ({h: 11, a1: 0, a2: 1, a3: {h: 6}, a4: {h: 9, a1: 0, a2: 1, a3: Language_JSON_Parser_n__3375_2403_values(), a4: vals => ({h: 10, a1: 0, a2: Language_JSON_Parser_punct({h: 2, a1: 1}), a3: () => ({h: 0, a1: {h: 4, a1: vals}})})}})};
5215
+ return {h: 10, a1: 1, a2: Language_JSON_Parser_punct({h: 2, a1: 0}), a3: () => ({h: 11, a1: 0, a2: 1, a3: {h: 6}, a4: {h: 9, a1: 0, a2: 1, a3: Language_JSON_Parser_n__3581_2407_values(), a4: vals => ({h: 10, a1: 0, a2: Language_JSON_Parser_punct({h: 2, a1: 1}), a3: () => ({h: 0, a1: {h: 4, a1: vals}})})}})};
5097
5216
  });
5098
5217
 
5099
5218
  function Language_JSON_Tokens_tokValue_TokenKind_JSONTokenKind($0, $1) {
@@ -5265,7 +5384,7 @@ function Text_Lexer_opt($0) {
5265
5384
  }
5266
5385
 
5267
5386
  function Text_Lexer_oneOf($0) {
5268
- return Text_Lexer_Core_pred(x => Prelude_Types_elem(csegen_104(), csegen_203(), x, Prelude_Types_fastUnpack($0)));
5387
+ return Text_Lexer_Core_pred(x => Prelude_Types_elem(csegen_77(), csegen_176(), x, Prelude_Types_fastUnpack($0)));
5269
5388
  }
5270
5389
 
5271
5390
  function Text_Lexer_non($0) {
@@ -5370,7 +5489,7 @@ function Text_Quantity_atLeast($0) {
5370
5489
  return {a1: $0, a2: {h: 0}};
5371
5490
  }
5372
5491
 
5373
- function Text_Lexer_Core_n__3455_2496_getCols($0, $1, $2, $3, $4, $5, $6, $7) {
5492
+ function Text_Lexer_Core_n__3659_2500_getCols($0, $1, $2, $3, $4, $5, $6, $7) {
5374
5493
  const $8 = Data_List_span($b => Prelude_EqOrd_x2fx3d_Eq_Char($b, '\n'), Prelude_Types_List_reverse($6));
5375
5494
  switch($8.a2.h) {
5376
5495
  case 0: return _add32s($7, Prelude_Cast_cast_Cast_Nat_Int(Prelude_Types_List_lengthTR($8.a1)));
@@ -5378,8 +5497,8 @@ function Text_Lexer_Core_n__3455_2496_getCols($0, $1, $2, $3, $4, $5, $6, $7) {
5378
5497
  }
5379
5498
  }
5380
5499
 
5381
- function Text_Lexer_Core_n__3455_2495_countNLs($0, $1, $2, $3, $4, $5, $6) {
5382
- return Prelude_Types_List_lengthTR(Data_List_filter($b => Prelude_EqOrd_x3dx3d_Eq_Char($b, '\n'), $6));
5500
+ function Text_Lexer_Core_n__3659_2499_countNLs($0, $1, $2, $3, $4, $5, $6) {
5501
+ return Prelude_Types_List_lengthTR(Prelude_Types_List_filter($b => Prelude_EqOrd_x3dx3d_Eq_Char($b, '\n'), $6));
5383
5502
  }
5384
5503
 
5385
5504
  function Text_Lexer_Core_scan($0, $1, $2) {
@@ -5447,7 +5566,7 @@ function Text_Lexer_Core_x3cx7cx3e($0, $1) {
5447
5566
  return {h: 7, a1: $0, a2: $1};
5448
5567
  }
5449
5568
 
5450
- function Language_JSON_String_Tokens_n__3003_1162_hexVal($0, $1) {
5569
+ function Language_JSON_String_Tokens_n__3203_1166_hexVal($0, $1) {
5451
5570
  switch(Prelude_EqOrd_x3ex3d_Ord_Char($1, 'A')) {
5452
5571
  case 1: return _add32s(_sub32s(_truncInt32($1.codePointAt(0)), _truncInt32('A'.codePointAt(0))), 10);
5453
5572
  case 0: return _sub32s(_truncInt32($1.codePointAt(0)), _truncInt32('0'.codePointAt(0)));
@@ -5510,7 +5629,7 @@ function Language_JSON_String_Tokens_x2fx3d_Eq_JSONStringTokenKind($0, $1) {
5510
5629
  }
5511
5630
 
5512
5631
  function Language_JSON_String_Tokens_unicodeEscapeValue($0) {
5513
- return Language_JSON_String_Tokens_n__3003_1163_fromHex($0, Data_List_drop(2n, Prelude_Types_fastUnpack($0)), 0);
5632
+ return Language_JSON_String_Tokens_n__3203_1167_fromHex($0, Data_List_drop(2n, Prelude_Types_fastUnpack($0)), 0);
5514
5633
  }
5515
5634
 
5516
5635
  function Language_JSON_String_Tokens_simpleEscapeValue($0) {
@@ -5542,11 +5661,11 @@ function Language_JSON_String_Tokens_charValue($0) {
5542
5661
  }
5543
5662
 
5544
5663
  const Language_JSON_String_Parser_stringChar = __lazy(function () {
5545
- return {h: 12, a1: 1, a2: 1, a3: Text_Parser_match(csegen_334(), csegen_337(), 1), a4: () => ({h: 12, a1: 1, a2: 1, a3: Text_Parser_match(csegen_334(), csegen_337(), 2), a4: () => Text_Parser_match(csegen_334(), csegen_337(), 3)})};
5664
+ return {h: 12, a1: 1, a2: 1, a3: Text_Parser_match(csegen_307(), csegen_310(), 1), a4: () => ({h: 12, a1: 1, a2: 1, a3: Text_Parser_match(csegen_307(), csegen_310(), 2), a4: () => Text_Parser_match(csegen_307(), csegen_310(), 3)})};
5546
5665
  });
5547
5666
 
5548
5667
  const Language_JSON_String_Parser_quotedString = __lazy(function () {
5549
- const $0 = Text_Parser_match(csegen_334(), csegen_337(), 0);
5668
+ const $0 = Text_Parser_match(csegen_307(), csegen_310(), 0);
5550
5669
  return {h: 8, a1: 0, a2: Text_Parser_between(0, $0, $0, Text_Parser_many(Language_JSON_String_Parser_stringChar())), a3: () => chars => ({h: 11, a1: 0, a2: 0, a3: {h: 3}, a4: {h: 0, a1: Prelude_Types_fastPack(chars)}})};
5551
5670
  });
5552
5671
 
@@ -5605,28 +5724,28 @@ function Text_Parser_between($0, $1, $2, $3) {
5605
5724
  return {h: 9, a1: 1, a2: 1, a3: Text_Parser_Core_map_Functor_x28x28x28Grammarx20x24statex29x20x24tokx29x20x24cx29(1, $a => $b => $a, {h: 9, a1: 1, a2: $0, a3: Text_Parser_Core_map_Functor_x28x28x28Grammarx20x24statex29x20x24tokx29x20x24cx29(1, $13 => $14 => $14, $1), a4: f => Text_Parser_Core_map_Functor_x28x28x28Grammarx20x24statex29x20x24tokx29x20x24cx29($0, f, $3)}), a4: f => Text_Parser_Core_map_Functor_x28x28x28Grammarx20x24statex29x20x24tokx29x20x24cx29(1, f, $2)};
5606
5725
  }
5607
5726
 
5608
- function Text_Parser_Core_case__doParse_5056($0, $1, $2, $3, $4, $5) {
5727
+ function Text_Parser_Core_case__doParse_5194($0, $1, $2, $3, $4, $5) {
5609
5728
  switch($5.h) {
5610
5729
  case 0: return {h: 0, a1: $5.a1, a2: $5.a2, a3: $5.a3};
5611
- case 1: return {h: 1, a1: $5.a1, a2: $5.a2, a3: Prelude_Interfaces_x3cx24x3e(csegen_353(), $11 => $5.a3, $5.a3), a4: $5.a4};
5730
+ case 1: return {h: 1, a1: $5.a1, a2: $5.a2, a3: Prelude_Interfaces_x3cx24x3e(csegen_326(), $11 => $5.a3, $5.a3), a4: $5.a4};
5612
5731
  }
5613
5732
  }
5614
5733
 
5615
- function Text_Parser_Core_case__doParse_4743($0, $1, $2, $3, $4, $5, $6, $7) {
5734
+ function Text_Parser_Core_case__doParse_4881($0, $1, $2, $3, $4, $5, $6, $7) {
5616
5735
  switch($7.h) {
5617
5736
  case 0: return {h: 0, a1: $7.a1, a2: $7.a2, a3: $7.a3};
5618
5737
  case 1: return Text_Parser_Core_mergeWith($7.a3, Text_Parser_Core_doParse($0, $7.a1, $7.a2, $3()($7.a3.a1), $7.a4));
5619
5738
  }
5620
5739
  }
5621
5740
 
5622
- function Text_Parser_Core_case__doParse_4629($0, $1, $2, $3, $4, $5, $6, $7, $8) {
5741
+ function Text_Parser_Core_case__doParse_4767($0, $1, $2, $3, $4, $5, $6, $7, $8) {
5623
5742
  switch($8.h) {
5624
5743
  case 0: return {h: 0, a1: $8.a1, a2: $8.a2, a3: $8.a3};
5625
5744
  case 1: return Text_Parser_Core_mergeWith($8.a3, Text_Parser_Core_doParse($0, $8.a1, $8.a2, $4($8.a3.a1), $8.a4));
5626
5745
  }
5627
5746
  }
5628
5747
 
5629
- function Text_Parser_Core_case__casex20blockx20inx20casex20blockx20inx20doParse_4391($0, $1, $2, $3, $4, $5, $6, $7, $8, $9, $a, $b) {
5748
+ function Text_Parser_Core_case__casex20blockx20inx20casex20blockx20inx20doParse_4529($0, $1, $2, $3, $4, $5, $6, $7, $8, $9, $a, $b) {
5630
5749
  switch($b.h) {
5631
5750
  case 0: {
5632
5751
  let $d;
@@ -5649,7 +5768,7 @@ function Text_Parser_Core_case__casex20blockx20inx20casex20blockx20inx20doParse_
5649
5768
  }
5650
5769
  }
5651
5770
 
5652
- function Text_Parser_Core_case__doParse_4275($0, $1, $2, $3, $4, $5, $6, $7, $8) {
5771
+ function Text_Parser_Core_case__doParse_4413($0, $1, $2, $3, $4, $5, $6, $7, $8) {
5653
5772
  switch($8.h) {
5654
5773
  case 0: {
5655
5774
  let $a;
@@ -5665,21 +5784,21 @@ function Text_Parser_Core_case__doParse_4275($0, $1, $2, $3, $4, $5, $6, $7, $8)
5665
5784
  }
5666
5785
  switch($a) {
5667
5786
  case 1: return {h: 0, a1: $7, a2: $8.a2, a3: $8.a3};
5668
- case 0: return Text_Parser_Core_case__casex20blockx20inx20casex20blockx20inx20doParse_4391($0, $2, $3, $4, $5, $6, $7, $8.a3, $8.a2, $8.a1, $1, Text_Parser_Core_doParse($0, $1, 0, $3(), $6));
5787
+ case 0: return Text_Parser_Core_case__casex20blockx20inx20casex20blockx20inx20doParse_4529($0, $2, $3, $4, $5, $6, $7, $8.a3, $8.a2, $8.a1, $1, Text_Parser_Core_doParse($0, $1, 0, $3(), $6));
5669
5788
  }
5670
5789
  }
5671
5790
  case 1: return {h: 1, a1: $8.a1, a2: $7, a3: $8.a3, a4: $8.a4};
5672
5791
  }
5673
5792
  }
5674
5793
 
5675
- function Text_Parser_Core_case__doParse_3910($0, $1, $2, $3, $4, $5) {
5794
+ function Text_Parser_Core_case__doParse_4048($0, $1, $2, $3, $4, $5) {
5676
5795
  switch($5.h) {
5677
5796
  case 0: return {h: 0, a1: $5.a1, a2: 1, a3: $5.a3};
5678
5797
  default: return $5;
5679
5798
  }
5680
5799
  }
5681
5800
 
5682
- function Text_Parser_Core_case__doParse_3813($0, $1, $2, $3, $4, $5) {
5801
+ function Text_Parser_Core_case__doParse_3951($0, $1, $2, $3, $4, $5) {
5683
5802
  switch($5.h) {
5684
5803
  case 0: return {h: 0, a1: $5.a1, a2: 0, a3: $5.a3};
5685
5804
  default: return $5;
@@ -6026,18 +6145,18 @@ function Text_Parser_Core_mergeWith($0, $1) {
6026
6145
  function Text_Parser_Core_doParse($0, $1, $2, $3, $4) {
6027
6146
  switch($3.h) {
6028
6147
  case 0: return {h: 1, a1: $1, a2: $2, a3: Text_Bounded_irrelevantBounds($3.a1), a4: $4};
6029
- case 4: return {h: 0, a1: $2, a2: $3.a2, a3: {a1: {a1: $3.a3, a2: Prelude_Types_x3cx7cx3e_Alternative_Maybe($3.a1, () => Prelude_Interfaces_x3cx24x3e(csegen_161(), $19 => $19.a3, Data_List_headx27($4)))}, a2: {h: 0}}};
6030
- case 5: return Text_Parser_Core_case__doParse_3813($0, $1, $3.a1, $4, $2, Text_Parser_Core_doParse($0, $1, $2, $3.a1, $4));
6148
+ case 4: return {h: 0, a1: $2, a2: $3.a2, a3: {a1: {a1: $3.a3, a2: Prelude_Types_x3cx7cx3e_Alternative_Maybe($3.a1, () => Prelude_Interfaces_x3cx24x3e(csegen_18(), $19 => $19.a3, Data_List_headx27($4)))}, a2: {h: 0}}};
6149
+ case 5: return Text_Parser_Core_case__doParse_3951($0, $1, $3.a1, $4, $2, Text_Parser_Core_doParse($0, $1, $2, $3.a1, $4));
6031
6150
  case 6: return {h: 1, a1: $1, a2: 1, a3: Text_Bounded_irrelevantBounds(undefined), a4: $4};
6032
- case 7: return Text_Parser_Core_case__doParse_3910($0, $1, $3.a1, $4, $2, Text_Parser_Core_doParse($0, $1, $2, $3.a1, $4));
6151
+ case 7: return Text_Parser_Core_case__doParse_4048($0, $1, $3.a1, $4, $2, Text_Parser_Core_doParse($0, $1, $2, $3.a1, $4));
6033
6152
  case 1: {
6034
6153
  switch($4.h) {
6035
- case 0: return {h: 0, a1: $2, a2: 0, a3: csegen_355()};
6154
+ case 0: return {h: 0, a1: $2, a2: 0, a3: csegen_328()};
6036
6155
  case undefined: {
6037
6156
  const $44 = $3.a2($4.a1.a1);
6038
6157
  switch($44.h) {
6039
6158
  case 0: return {h: 0, a1: $2, a2: 0, a3: {a1: {a1: $3.a1, a2: {a1: $4.a1.a3}}, a2: {h: 0}}};
6040
- case undefined: return {h: 1, a1: $1, a2: $2, a3: Prelude_Interfaces_x3cx24x3e(csegen_353(), $58 => $44.a1, $4.a1), a4: $4.a2};
6159
+ case undefined: return {h: 1, a1: $1, a2: $2, a3: Prelude_Interfaces_x3cx24x3e(csegen_326(), $58 => $44.a1, $4.a1), a4: $4.a2};
6041
6160
  }
6042
6161
  }
6043
6162
  }
@@ -6050,7 +6169,7 @@ function Text_Parser_Core_doParse($0, $1, $2, $3, $4) {
6050
6169
  }
6051
6170
  case 2: {
6052
6171
  switch($4.h) {
6053
- case 0: return {h: 0, a1: $2, a2: 0, a3: csegen_355()};
6172
+ case 0: return {h: 0, a1: $2, a2: 0, a3: csegen_328()};
6054
6173
  case undefined: {
6055
6174
  switch($3.a2($4.a1.a1)) {
6056
6175
  case 1: return {h: 1, a1: $1, a2: $2, a3: Text_Bounded_removeIrrelevance($4.a1), a4: {a1: $4.a1, a2: $4.a2}};
@@ -6059,9 +6178,9 @@ function Text_Parser_Core_doParse($0, $1, $2, $3, $4) {
6059
6178
  }
6060
6179
  }
6061
6180
  }
6062
- case 12: return Text_Parser_Core_case__doParse_4275($0, $1, $3.a2, $3.a4, $3.a1, $3.a3, $4, $2, Text_Parser_Core_doParse($0, $1, 0, $3.a3, $4));
6063
- case 9: return Text_Parser_Core_case__doParse_4629($0, $3.a1, $3.a2, $1, $3.a4, $3.a3, $4, $2, Text_Parser_Core_doParse($0, $1, $2, $3.a3, $4));
6064
- case 8: return Text_Parser_Core_case__doParse_4743($0, $3.a1, $1, $3.a3, $3.a2, $4, $2, Text_Parser_Core_doParse($0, $1, $2, $3.a2, $4));
6181
+ case 12: return Text_Parser_Core_case__doParse_4413($0, $1, $3.a2, $3.a4, $3.a1, $3.a3, $4, $2, Text_Parser_Core_doParse($0, $1, 0, $3.a3, $4));
6182
+ case 9: return Text_Parser_Core_case__doParse_4767($0, $3.a1, $3.a2, $1, $3.a4, $3.a3, $4, $2, Text_Parser_Core_doParse($0, $1, $2, $3.a3, $4));
6183
+ case 8: return Text_Parser_Core_case__doParse_4881($0, $3.a1, $1, $3.a3, $3.a2, $4, $2, Text_Parser_Core_doParse($0, $1, $2, $3.a2, $4));
6065
6184
  case 11: {
6066
6185
  const $b4 = Text_Parser_Core_doParse($0, $1, $2, $3.a3, $4);
6067
6186
  switch($b4.h) {
@@ -6076,10 +6195,10 @@ function Text_Parser_Core_doParse($0, $1, $2, $3, $4) {
6076
6195
  case 1: return Text_Parser_Core_mergeWith($c7.a3, Text_Parser_Core_doParse($0, $c7.a1, $c7.a2, $3.a3(), $c7.a4));
6077
6196
  }
6078
6197
  }
6079
- case 13: return Text_Parser_Core_case__doParse_5056($0, $1, $3.a1, $4, $2, Text_Parser_Core_doParse($0, $1, $2, $3.a1, $4));
6198
+ case 13: return Text_Parser_Core_case__doParse_5194($0, $1, $3.a1, $4, $2, Text_Parser_Core_doParse($0, $1, $2, $3.a1, $4));
6080
6199
  case 14: {
6081
6200
  switch($4.h) {
6082
- case 0: return {h: 0, a1: $2, a2: 0, a3: csegen_355()};
6201
+ case 0: return {h: 0, a1: $2, a2: 0, a3: csegen_328()};
6083
6202
  case undefined: return {h: 1, a1: $1, a2: $2, a3: Text_Bounded_irrelevantBounds($4.a1.a3), a4: {a1: $4.a1, a2: $4.a2}};
6084
6203
  }
6085
6204
  }
@@ -6169,23 +6288,23 @@ const Language_JSON_Lexer_jsonTokenMap = __lazy(function () {
6169
6288
  return Text_Lexer_toTokenMap({a1: {a1: Text_Lexer_spaces(), a2: {h: 5}}, a2: {a1: {a1: Text_Lexer_is(','), a2: {h: 4, a1: {h: 0}}}, a2: {a1: {a1: Text_Lexer_is(':'), a2: {h: 4, a1: {h: 1}}}, a2: {a1: {a1: Text_Lexer_is('['), a2: {h: 4, a1: {h: 2, a1: 0}}}, a2: {a1: {a1: Text_Lexer_is(']'), a2: {h: 4, a1: {h: 2, a1: 1}}}, a2: {a1: {a1: Text_Lexer_is('{'), a2: {h: 4, a1: {h: 3, a1: 0}}}, a2: {a1: {a1: Text_Lexer_is('}'), a2: {h: 4, a1: {h: 3, a1: 1}}}, a2: {a1: {a1: Text_Lexer_exact('null'), a2: {h: 3}}, a2: {a1: {a1: Text_Lexer_Core_x3cx7cx3e(Text_Lexer_exact('true'), Text_Lexer_exact('false')), a2: {h: 0}}, a2: {a1: {a1: Language_JSON_Lexer_numberLit(), a2: {h: 1}}, a2: {a1: {a1: Language_JSON_String_permissiveStringLit(), a2: {h: 2}}, a2: {h: 0}}}}}}}}}}}});
6170
6289
  });
6171
6290
 
6172
- function Decidable_Equality_n__4491_2139_primitiveNotEq($0, $1, $2, $3) {
6291
+ function Decidable_Equality_n__4701_4105_primitiveNotEq($0, $1, $2, $3) {
6173
6292
  return Builtin_believe_me(undefined);
6174
6293
  }
6175
6294
 
6176
- function Decidable_Equality_n__4491_2138_primitiveEq($0, $1, $2) {
6295
+ function Decidable_Equality_n__4701_4104_primitiveEq($0, $1, $2) {
6177
6296
  return Builtin_believe_me(undefined);
6178
6297
  }
6179
6298
 
6180
6299
  function Decidable_Equality_decEq_DecEq_FromEqx24a($0, $1, $2) {
6181
6300
  switch($0.a1($1)($2)) {
6182
- case 1: return {h: 0, a1: Decidable_Equality_n__4491_2138_primitiveEq($0, $1, $2)};
6183
- case 0: return {h: 1, a1: $f => Decidable_Equality_n__4491_2139_primitiveNotEq($0, $1, $2, $f)};
6301
+ case 1: return {h: 0, a1: Decidable_Equality_n__4701_4104_primitiveEq($0, $1, $2)};
6302
+ case 0: return {h: 1, a1: $f => Decidable_Equality_n__4701_4105_primitiveNotEq($0, $1, $2, $f)};
6184
6303
  }
6185
6304
  }
6186
6305
 
6187
6306
  function Decidable_Equality_decEq_DecEq_Char($0, $1) {
6188
- return Decidable_Equality_decEq_DecEq_FromEqx24a(csegen_203(), $0, $1);
6307
+ return Decidable_Equality_decEq_DecEq_FromEqx24a(csegen_176(), $0, $1);
6189
6308
  }
6190
6309
 
6191
6310
  function Data_Either_maybeToEither($0, $1) {
@@ -6195,126 +6314,247 @@ function Data_Either_maybeToEither($0, $1) {
6195
6314
  }
6196
6315
  }
6197
6316
 
6198
- function PullRequest_with__withx20blockx20inx20listPartitionedPRs_1202($0, $1, $2, $3, $4, $5, $6, $7) {
6317
+ function User_Reflect_case__casex20blockx20inx20reflectOnSelf_2298($0, $1, $2, $3, $4, $5, $6, $7, $8, $9) {
6318
+ const $b = Prelude_Interfaces_mapHom({a1: d => b => c => a => $f => $10 => $11 => ({a1: $f($11.a1), a2: $10($11.a2)}), a2: b => c => a => $1a => $1b => ({a1: $1a($1b.a1), a2: $1b.a2}), a3: a => d => b => $22 => $23 => ({a1: $23.a1, a2: $22($23.a2)})}, $2a => Data_List_headx27(Data_List_sort({a1: {a1: $31 => $32 => Data_Date_x3dx3d_Eq_Date($31, $32), a2: $37 => $38 => Data_Date_x2fx3d_Eq_Date($37, $38)}, a2: $3d => $3e => Data_Date_compare_Ord_Date($3d, $3e), a3: $43 => $44 => Data_Date_x3c_Ord_Date($43, $44), a4: $49 => $4a => Data_Date_x3e_Ord_Date($49, $4a), a5: $4f => $50 => Data_Date_x3cx3d_Ord_Date($4f, $50), a6: $55 => $56 => Data_Date_x3ex3d_Ord_Date($55, $56), a7: $5b => $5c => Data_Date_max_Ord_Date($5b, $5c), a8: $61 => $62 => Data_Date_min_Ord_Date($61, $62)}, Prelude_Types_map_Functor_List(csegen_380(), $2a))), {a1: $7, a2: $9.a1});
6319
+ return Util_renderIO($0, csegen_21(), User_Reflect_print(Prelude_Types_String_length(User_Reflect_intro()), Prelude_Types_List_lengthTR($4), Prelude_Types_List_lengthTR($9.a1), Prelude_Types_List_lengthTR($9.a2), Prelude_Types_List_lengthTR($8), Prelude_Types_List_lengthTR($7), $5, $b.a1, $b.a2));
6320
+ }
6321
+
6322
+ function User_Me_n__6251_2415_ul($0, $1, $2, $3) {
6323
+ return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_underline(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($3));
6324
+ }
6325
+
6326
+ function User_Me_n__6251_2421_teams($0, $1, $2) {
6327
+ return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: User_Me_n__6251_2415_ul($0, $1, $2, 'GitHub Teams:'), a2: Prelude_Types_map_Functor_List($e => User_Me_n__6251_2416_it($0, $1, $2, $e), $0)});
6328
+ }
6329
+
6330
+ function User_Me_n__6251_2420_login($0, $1, $2) {
6331
+ return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('GitHub Login:'), User_Me_n__6251_2417_green($0, $1, $2, $1.a1));
6332
+ }
6333
+
6334
+ function User_Reflect_n__5344_1492_ital($0, $1) {
6335
+ return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($1));
6336
+ }
6337
+
6338
+ function User_Me_n__6251_2416_it($0, $1, $2, $3) {
6339
+ return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($3));
6340
+ }
6341
+
6342
+ function User_Me_n__6391_2571_handleUnsetEmail($0, $1, $2, $3) {
6343
+ switch($3) {
6344
+ case '': return {h: 0};
6345
+ default: return {a1: $3};
6346
+ }
6347
+ }
6348
+
6349
+ function User_Me_n__6251_2417_green($0, $1, $2, $3) {
6350
+ return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(2), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($3));
6351
+ }
6352
+
6353
+ function User_Me_n__6251_2419_fullName($0, $1, $2) {
6354
+ return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('GitHub Name:'), User_Me_n__6251_2417_green($0, $1, $2, $1.a2));
6355
+ }
6356
+
6357
+ function User_Me_n__6251_2418_email($0, $1, $2) {
6358
+ let $7;
6359
+ switch($2.h) {
6360
+ case undefined: {
6361
+ $7 = User_Me_n__6251_2417_green($0, $1, $2, $2.a1);
6362
+ break;
6363
+ }
6364
+ case 0: {
6365
+ $7 = User_Me_n__6251_2416_it($0, $1, $2, 'Not set');
6366
+ break;
6367
+ }
6368
+ }
6369
+ return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Git Email:'), $7);
6370
+ }
6371
+
6372
+ const User_Reflect_rightTitle = __lazy(function () {
6373
+ return 'authored';
6374
+ });
6375
+
6376
+ const User_Reflect_reviewDetailsCount = __lazy(function () {
6377
+ return 25n;
6378
+ });
6379
+
6380
+ function User_replicatex27($0, $1, $2) {
6381
+ return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color($0), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Data_String_replicate($1, $2)));
6382
+ }
6383
+
6384
+ function User_Reflect_reflectOnSelf($0, $1, $2, $3) {
6385
+ const $c = prs => $d => $e => {
6386
+ const $19 = myLogin => $1a => $1b => {
6387
+ const $37 = reviews => {
6388
+ const $38 = Prelude_Types_map_Functor_Maybe(csegen_383(), Data_List_headx27(Data_List_sortBy($41 => $42 => Prelude_Basics_on(csegen_141(), csegen_383(), $41, $42), reviews)));
6389
+ const $4b = PullRequest_tuple(prs);
6390
+ const $4e = Prelude_Interfaces_mapHom({a1: d => b => c => a => $52 => $53 => $54 => ({a1: $52($54.a1), a2: $53($54.a2)}), a2: b => c => a => $5d => $5e => ({a1: $5d($5e.a1), a2: $5e.a2}), a3: a => d => b => $65 => $66 => ({a1: $66.a1, a2: $65($66.a2)})}, $6d => Prelude_Types_List_filter($70 => Prelude_EqOrd_x3dx3d_Eq_String($70.a3, myLogin), $6d), $4b);
6391
+ return User_Reflect_case__casex20blockx20inx20reflectOnSelf_2298($0, $1, prs, myLogin, reviews, $38, $4b, $4e.a1, $4e.a2, Prelude_Interfaces_mapHom({a1: d => b => c => a => $85 => $86 => $87 => ({a1: $85($87.a1), a2: $86($87.a2)}), a2: b => c => a => $90 => $91 => ({a1: $90($91.a1), a2: $91.a2}), a3: a => d => b => $98 => $99 => ({a1: $99.a1, a2: $98($99.a2)})}, $a0 => Prelude_Types_List_filter($a3 => Prelude_Interfaces_any(csegen_77(), $a8 => Prelude_EqOrd_x3dx3d_Eq_String($a8, myLogin), $a3.a5), $a0), $4b));
6392
+ };
6393
+ return Data_Promise_x3ex3ex3d_Monad_Promise(PullRequest_reviewsForUser($0, $1, myLogin, Data_List_take(User_Reflect_reviewDetailsCount(), Prelude_Types_List_reverse(Data_List_sortBy($2b => $2c => Prelude_Basics_on(csegen_141(), csegen_380(), $2b, $2c), PullRequest_combined(prs))))), $37, $1a, $1b);
6394
+ };
6395
+ return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_103(), csegen_139(), FFI_GitHub_getSelf($1)), $19, $d, $e);
6396
+ };
6397
+ return Data_Promise_x3ex3ex3d_Monad_Promise(PullRequest_listPartitionedPRs($0, $1, 4n, User_Reflect_prCount()), $c, $2, $3);
6398
+ }
6399
+
6400
+ function User_Me_printInfoOnSelf($0, $1, $2, $3, $4) {
6401
+ return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_103(), $b => User_Me_n__6391_2571_handleUnsetEmail($0, $1, $2, $b), $12 => $13 => FFI_Git_userEmail($2, $12, $13)), gitEmail => $19 => $1a => Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_getSelf($1), githubUser => $20 => $21 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_103(), csegen_112(), FFI_GitHub_listMyTeams($1)), githubTeams => Util_renderIO($0, csegen_21(), User_Me_print(gitEmail, githubUser, githubTeams)), $20, $21), $19, $1a), $3, $4);
6402
+ }
6403
+
6404
+ function User_Reflect_print($0, $1, $2, $3, $4, $5, $6, $7, $8) {
6405
+ return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: User_Reflect_graph($0, $1, $2, $3, $4, $5), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: User_Reflect_details($0, $1, $2, $3, $4, $5, $6, $7, $8), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {h: 0}}}}}});
6406
+ }
6407
+
6408
+ function User_Me_print($0, $1, $2) {
6409
+ return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: User_Me_n__6251_2418_email($2, $1, $0), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: User_Me_n__6251_2419_fullName($2, $1, $0), a2: {a1: User_Me_n__6251_2420_login($2, $1, $0), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: User_Me_n__6251_2421_teams($2, $1, $0), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {h: 0}}}}}}}}});
6410
+ }
6411
+
6412
+ const User_Reflect_prCount = __lazy(function () {
6413
+ return csegen_134();
6414
+ });
6415
+
6416
+ const User_Reflect_leftTitle = __lazy(function () {
6417
+ return 'requested';
6418
+ });
6419
+
6420
+ const User_Reflect_intro = __lazy(function () {
6421
+ return Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Your current pull request summary (out of the past ', a2: {a1: Data_Fin_show_Show_x28Finx20x24nx29(User_Reflect_prCount()), a2: {a1: ' PRs):', a2: {h: 0}}}});
6422
+ });
6423
+
6424
+ function User_Reflect_header($0) {
6425
+ return Text_PrettyPrint_Prettyprinter_Doc_indent(Prelude_Cast_cast_Cast_Nat_Int($0), Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: User_Reflect_n__5344_1492_ital($0, User_Reflect_leftTitle()), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(' '), a2: {a1: User_Reflect_n__5344_1492_ital($0, User_Reflect_rightTitle()), a2: {h: 0}}}}));
6426
+ }
6427
+
6428
+ function User_Reflect_graph($0, $1, $2, $3, $4, $5) {
6429
+ const $6 = ($2+$3);
6430
+ const $9 = ($5+$4);
6431
+ const $c = Prelude_Types_foldr_Foldable_List(csegen_388(), Prelude_Types_String_length(User_Reflect_leftTitle()), {a1: ($6+$1), a2: {a1: $9, a2: {h: 0}}});
6432
+ const $1b = Prelude_Types_foldr_Foldable_List(csegen_388(), Prelude_Types_String_length(User_Reflect_rightTitle()), {a1: $6, a2: {a1: $9, a2: {h: 0}}});
6433
+ const $28 = (($c+$1b)+3n);
6434
+ const $2d = ((Prelude_Cast_cast_Cast_Nat_Double($0)/2.0)-(Prelude_Cast_cast_Cast_Nat_Double($28)/2.0));
6435
+ const $38 = (Prelude_Cast_cast_Cast_Double_Nat($2d)+Prelude_Types_prim__integerToNat(($c-Prelude_Types_String_length(User_Reflect_leftTitle()))));
6436
+ const $44 = (Prelude_Cast_cast_Cast_Double_Nat($2d)+Prelude_Types_prim__integerToNat(($c-($6+$1))));
6437
+ return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: User_Reflect_header($38), a2: {a1: User_Reflect_chart($0, $1, $2, $3, $4, $5, $44), a2: {h: 0}}});
6438
+ }
6439
+
6440
+ function User_Reflect_details($0, $1, $2, $3, $4, $5, $6, $7, $8) {
6441
+ return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(User_Reflect_intro()), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_underline(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Requested Reviews:')), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_vsep(Data_List_catMaybes({a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('unreviewed:')}, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_vsep(Data_List_catMaybes({a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('open:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(3), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Nat($2)), a2: {h: 0}}})}, a2: {a1: Prelude_Interfaces_x3cx26x3e(csegen_18(), $8, csegen_390()), a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('closed:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(1), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Nat($3)), a2: {h: 0}}})}, a2: {h: 0}}}})))}, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('reviews*:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(2), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Nat($1)), a2: {h: 0}}})}, a2: {a1: Prelude_Interfaces_x3cx26x3e(csegen_18(), $6, date => Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('most recent:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Data_Date_show_Show_Date(date)), a2: {h: 0}}}))), a2: {h: 0}}}}}))), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_underline(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Authored Pulls:')), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_vsep(Data_List_catMaybes({a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('open:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(3), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Nat($5)), a2: {h: 0}}})}, a2: {a1: Prelude_Interfaces_x3cx26x3e(csegen_18(), $7, csegen_390()), a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('closed:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(2), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Nat($4)), a2: {h: 0}}})}, a2: {h: 0}}}}))), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: '*review count (not PR count) of most recent ', a2: {a1: Data_Fin_show_Show_x28Finx20x24nx29(User_Reflect_reviewDetailsCount()), a2: {a1: ' PRs.', a2: {h: 0}}}}))), a2: {h: 0}}}}}}}}}});
6442
+ }
6443
+
6444
+ function User_Reflect_chart($0, $1, $2, $3, $4, $5, $6) {
6445
+ return Text_PrettyPrint_Prettyprinter_Doc_indent(Prelude_Cast_cast_Cast_Nat_Int($6), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(User_replicatex27(2, $1, '\u{b7}'), User_replicatex27(1, $3, '\u{25e6}')), User_replicatex27(3, $2, '<')), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('|'), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(User_replicatex27(3, $5, '>'), User_replicatex27(2, $4, '\u{b7}')))));
6446
+ }
6447
+
6448
+ function PullRequest_with__withx20blockx20inx20listPartitionedPRs_1206($0, $1, $2, $3, $4, $5, $6, $7) {
6199
6449
  switch($2.h) {
6200
6450
  case 1: return $9 => PullRequest_partitionx27(Data_Pagination_metaPages($0, 1n, $4, 1n, $4), $7, $9);
6201
6451
  case 0: return $14 => PullRequest_partitionx27(Data_Pagination_metaPagesx27($0, ($1+1n), $4, $2.a1), $7, $14);
6202
6452
  }
6203
6453
  }
6204
6454
 
6205
- function PullRequest_with__listPartitionedPRs_1140($0, $1, $2, $3, $4) {
6455
+ function PullRequest_with__listPartitionedPRs_1144($0, $1, $2, $3, $4) {
6206
6456
  switch($2.a1.h) {
6207
6457
  case 1: return $7 => $8 => Data_Promise_pure_Applicative_Promise(PullRequest_empty(), $7, $8);
6208
6458
  default: {
6209
6459
  switch($2.a2.h) {
6210
- case 1: return Prelude_Interfaces_x3cx24x3e(csegen_80(), $13 => PullRequest_partition($13), FFI_GitHub_listPullRequests($3, $4.a2, $4.a3, {h: 0}, $0, 0n));
6211
- default: return $22 => PullRequest_with__withx20blockx20inx20listPartitionedPRs_1202($0, $1, Data_Nat_isLTE(($1+1n), $0), $3, $2.a1.a1, $2.a2.a1, $4, $22);
6460
+ case 1: return Prelude_Interfaces_x3cx24x3e(csegen_103(), $13 => PullRequest_partition($13), FFI_GitHub_listPullRequests($3, $4.a2, $4.a3, {h: 0}, $0, 0n));
6461
+ default: return $22 => PullRequest_with__withx20blockx20inx20listPartitionedPRs_1206($0, $1, Data_Nat_isLTE(($1+1n), $0), $3, $2.a1.a1, $2.a2.a1, $4, $22);
6212
6462
  }
6213
6463
  }
6214
6464
  }
6215
6465
  }
6216
6466
 
6217
- function PullRequest_case__identifyOrCreatePRx2ccreatePR_2355($0, $1, $2, $3, $4, $5) {
6467
+ function PullRequest_case__identifyOrCreatePRx2ccreatePR_2311($0, $1, $2, $3, $4, $5) {
6218
6468
  switch($5.h) {
6219
6469
  case undefined: return ($5.a1+$5.a2);
6220
6470
  default: return $3.a4;
6221
6471
  }
6222
6472
  }
6223
6473
 
6224
- function PullRequest_n__6325_1425_userNotice($0, $1, $2, $3, $4, $5, $6) {
6474
+ function PullRequest_n__6853_1428_userNotice($0, $1, $2, $3, $4, $5, $6) {
6225
6475
  switch($6.h) {
6226
6476
  case 0: {
6227
6477
  switch($2.h) {
6228
6478
  case 0: return 'no users';
6229
- default: return Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: PullRequest_n__6325_1424_csv($0, $1, $2, $3, $4, $5, $2), a2: {h: 0}});
6479
+ default: return Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: PullRequest_n__6853_1427_csv($0, $1, $2, $3, $4, $5, $2), a2: {h: 0}});
6230
6480
  }
6231
6481
  }
6232
- case undefined: return Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: PullRequest_n__6325_1424_csv($0, $1, $2, $3, $4, $5, {a1: $6.a1, a2: $2}), a2: {h: 0}});
6482
+ case undefined: return Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: PullRequest_n__6853_1427_csv($0, $1, $2, $3, $4, $5, {a1: $6.a1, a2: $2}), a2: {h: 0}});
6233
6483
  }
6234
6484
  }
6235
6485
 
6236
- function PullRequest_n__6325_1426_teamNotice($0, $1, $2, $3, $4, $5, $6) {
6486
+ function PullRequest_n__6853_1429_teamNotice($0, $1, $2, $3, $4, $5, $6) {
6237
6487
  switch($6.h) {
6238
6488
  case 0: return '';
6239
6489
  case undefined: {
6240
6490
  switch($6.a2.h) {
6241
- case 0: return Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: ' and team ', a2: {a1: PullRequest_n__6325_1424_csv($0, $1, $2, $3, $4, $5, {a1: $6.a1, a2: {h: 0}}), a2: {h: 0}}});
6242
- default: return Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: ' and teams ', a2: {a1: PullRequest_n__6325_1424_csv($0, $1, $2, $3, $4, $5, $6), a2: {h: 0}}});
6491
+ case 0: return Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: ' and team ', a2: {a1: PullRequest_n__6853_1427_csv($0, $1, $2, $3, $4, $5, {a1: $6.a1, a2: {h: 0}}), a2: {h: 0}}});
6492
+ default: return Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: ' and teams ', a2: {a1: PullRequest_n__6853_1427_csv($0, $1, $2, $3, $4, $5, $6), a2: {h: 0}}});
6243
6493
  }
6244
6494
  }
6245
- default: return Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: ' and teams ', a2: {a1: PullRequest_n__6325_1424_csv($0, $1, $2, $3, $4, $5, $6), a2: {h: 0}}});
6495
+ default: return Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: ' and teams ', a2: {a1: PullRequest_n__6853_1427_csv($0, $1, $2, $3, $4, $5, $6), a2: {h: 0}}});
6246
6496
  }
6247
6497
  }
6248
6498
 
6249
- function PullRequest_n__6956_2026_prepareDescriptionFile($0, $1, $2, $3, $4) {
6499
+ function PullRequest_n__7433_1982_prepareDescriptionFile($0, $1, $2, $3, $4) {
6250
6500
  return $4.a1.a2(undefined)(undefined)(System_File_Meta_exists($4, '.github/PULL_REQUEST_TEMPLATE.md'))($12 => Prelude_Interfaces_when($4.a1.a1, $12, () => $4.a1.a1.a1(undefined)(undefined)($23 => (undefined))(System_File_copyFile($4, '.github/PULL_REQUEST_TEMPLATE.md', 'pr_description.tmp.md'))));
6251
6501
  }
6252
6502
 
6253
- function PullRequest_n__6325_1427_prComment($0, $1, $2, $3, $4, $5, $6) {
6254
- return Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: ':musical_note: Harmoniously assigned @', a2: {a1: $6, a2: {a1: ' to review this PR.', a2: {h: 0}}}});
6503
+ function PullRequest_n__6853_1430_prComment($0, $1, $2, $3, $4, $5, $6) {
6504
+ return Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: ':musical_note: Harmoniously assigned @', a2: {a1: $6, a2: {a1: ' to review this PR.', a2: {h: 0}}}});
6255
6505
  }
6256
6506
 
6257
- function PullRequest_n__6325_1423_maybeDecorate($0, $1, $2, $3, $4, $5, $6) {
6258
- const $7 = $8 => {
6259
- switch(Data_Config_rf__colors($5)) {
6260
- case 1: return $8;
6261
- case 0: return Text_PrettyPrint_Prettyprinter_Doc_unAnnotate($8);
6262
- }
6263
- };
6264
- return Text_PrettyPrint_Prettyprinter_Render_Terminal_renderString(Text_PrettyPrint_Prettyprinter_Doc_layoutPretty(Text_PrettyPrint_Prettyprinter_Doc_defaultLayoutOptions(), $7($6)));
6265
- }
6266
-
6267
- function PullRequest_n__6956_2025_inlineDescription($0, $1, $2, $3, $4) {
6507
+ function PullRequest_n__7433_1981_inlineDescription($0, $1, $2, $3, $4) {
6268
6508
  return Prelude_Interfaces_x3ex3e($4.a1, Prelude_IO_putStrLn($4, 'What would you like the description to be (two blank lines to finish)?'), () => Prelude_Interfaces_x3cx24x3e($4.a1.a1.a1, $13 => Data_String_fastUnlines($13), Util_getManyLines($4, Data_Fuel_limit(Prelude_Types_prim__integerToNat(100n)))));
6269
6509
  }
6270
6510
 
6271
- function PullRequest_n__6218_1298_forkedReviews($0, $1, $2, $3, $4) {
6272
- return FFI_Concurrency_fork(csegen_20(), ('reviews --json '+Prelude_Show_show_Show_Integer($4.a1)));
6511
+ function PullRequest_n__6746_1302_forkedReviews($0, $1, $2, $3, $4) {
6512
+ return FFI_Concurrency_fork(csegen_21(), ('reviews --json '+Prelude_Show_show_Show_Integer($4.a1)));
6273
6513
  }
6274
6514
 
6275
- function PullRequest_n__6956_2027_editorDescription($0, $1, $2, $3, $4, $5) {
6515
+ function PullRequest_n__7433_1983_editorDescription($0, $1, $2, $3, $4, $5) {
6276
6516
  const $10 = () => {
6277
6517
  const $27 = $28 => {
6278
6518
  switch($28) {
6279
- case 0: return $4.a1.a2(undefined)(undefined)(System_File_ReadWrite_readFile($4, 'pr_description.tmp.md'))(description => Prelude_Interfaces_x3ex3e($4.a1, $4.a1.a2(undefined)(undefined)(System_File_Meta_exists($4, '.github/PULL_REQUEST_TEMPLATE.md'))($48 => Prelude_Interfaces_when($4.a1.a1, $48, () => System_File_Node_removeFile($4, 'pr_description.tmp.md'))), () => $4.a1.a1.a2(undefined)(description)));
6519
+ case 0: return $4.a1.a2(undefined)(undefined)(System_File_ReadWrite_readFile($4, 'pr_description.tmp.md'))(description => Prelude_Interfaces_x3ex3e($4.a1, $4.a1.a2(undefined)(undefined)(System_File_Meta_exists($4, 'pr_description.tmp.md'))($48 => Prelude_Interfaces_when($4.a1.a1, $48, () => System_File_Node_removeFile($4, 'pr_description.tmp.md'))), () => $4.a1.a1.a2(undefined)(description)));
6280
6520
  default: return $4.a1.a1.a2(undefined)({h: 0, a1: {h: 0, a1: $28}});
6281
6521
  }
6282
6522
  };
6283
- return $4.a1.a2(undefined)(undefined)(System_Node_system($4, Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: $5, a2: {a1: ' pr_description.tmp.md', a2: {h: 0}}})))($27);
6523
+ return $4.a1.a2(undefined)(undefined)(System_Node_system($4, Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: $5, a2: {a1: ' pr_description.tmp.md', a2: {h: 0}}})))($27);
6284
6524
  };
6285
- return Prelude_Interfaces_x3ex3e($4.a1, PullRequest_n__6956_2026_prepareDescriptionFile($0, $1, $2, $3, $4), $10);
6525
+ return Prelude_Interfaces_x3ex3e($4.a1, PullRequest_n__7433_1982_prepareDescriptionFile($0, $1, $2, $3, $4), $10);
6286
6526
  }
6287
6527
 
6288
- function PullRequest_n__6325_1424_csv($0, $1, $2, $3, $4, $5, $6) {
6289
- return PullRequest_n__6325_1423_maybeDecorate($0, $1, $2, $3, $4, $5, Text_PrettyPrint_Prettyprinter_Doc_encloseSep(Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(', '), Prelude_Types_map_Functor_List($1a => Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(2), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($1a)), $6)));
6528
+ function PullRequest_n__6853_1427_csv($0, $1, $2, $3, $4, $5, $6) {
6529
+ return Util_renderString($5, Text_PrettyPrint_Prettyprinter_Doc_encloseSep(Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(', '), Prelude_Types_map_Functor_List(csegen_402(), $6)));
6290
6530
  }
6291
6531
 
6292
- function PullRequest_n__6956_2028_createPR($0, $1, $2, $3) {
6293
- return Prelude_Interfaces_x3ex3e(csegen_17(), $8 => $9 => Data_Promise_x3ex3ex3d_Monad_Promise($c => $d => FFI_Git_remoteTrackingBranch($0, $c, $d), $13 => Prelude_Interfaces_when(csegen_11(), Prelude_Types_x3dx3d_Eq_x28Maybex20x24ax29(csegen_71(), $13, {h: 0}), () => Prelude_Interfaces_x3ex3e(csegen_17(), Prelude_IO_putStrLn(csegen_20(), 'Creating a new remote branch...'), () => $27 => $28 => FFI_Git_pushNewBranch($0, 'origin', $2, $27, $28))), $8, $9), () => Prelude_Interfaces_x3ex3e(csegen_17(), Prelude_IO_putStrLn(csegen_20(), Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: 'Creating a new PR for the current branch (', a2: {a1: $2, a2: {a1: ').', a2: {h: 0}}}})), () => Prelude_Interfaces_x3ex3e(csegen_17(), Prelude_IO_putStrLn(csegen_20(), Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: 'What branch are you merging into (ENTER for default: ', a2: {a1: $3.a4, a2: {a1: ')?', a2: {h: 0}}}})), () => $5d => $5e => {
6532
+ function PullRequest_n__7433_1984_createPR($0, $1, $2, $3) {
6533
+ return Prelude_Interfaces_x3ex3e(csegen_15(), $8 => $9 => Data_Promise_x3ex3ex3d_Monad_Promise($c => $d => FFI_Git_remoteTrackingBranch($0, $c, $d), $13 => Prelude_Interfaces_when(csegen_9(), Prelude_Types_x3dx3d_Eq_x28Maybex20x24ax29(csegen_94(), $13, {h: 0}), () => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStrLn(csegen_21(), 'Creating a new remote branch...'), () => $27 => $28 => FFI_Git_pushNewBranch($0, 'origin', $2, $27, $28))), $8, $9), () => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStrLn(csegen_21(), Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Creating a new PR for the current branch (', a2: {a1: $2, a2: {a1: ').', a2: {h: 0}}}})), () => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStrLn(csegen_21(), Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'What branch are you merging into (ENTER for default: ', a2: {a1: $3.a4, a2: {a1: ')?', a2: {h: 0}}}})), () => $5d => $5e => {
6294
6534
  const $6a = baseBranchInput => {
6295
- const $6b = PullRequest_case__identifyOrCreatePRx2ccreatePR_2355($0, $1, $2, $3, baseBranchInput, Data_String_strM(baseBranchInput));
6296
- const $7e = Data_Maybe_fromMaybe(() => '', Prelude_Interfaces_x3cx24x3e(csegen_161(), $86 => ($86+' - '), Util_parseJiraPrefix($2)));
6297
- const $7d = () => Prelude_Interfaces_x3ex3e(csegen_17(), Prelude_IO_putStr(csegen_20(), $7e), () => $95 => $96 => {
6535
+ const $6b = PullRequest_case__identifyOrCreatePRx2ccreatePR_2311($0, $1, $2, $3, baseBranchInput, Data_String_strM(baseBranchInput));
6536
+ const $7e = Data_Maybe_fromMaybe(() => '', Prelude_Interfaces_x3cx24x3e(csegen_18(), $86 => ($86+' - '), Util_parseJiraPrefix($2)));
6537
+ const $7d = () => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStr(csegen_21(), $7e), () => $95 => $96 => {
6298
6538
  const $a4 = title => $a5 => $a6 => {
6299
6539
  const $a9 = Data_Config_rf__editor($3);
6300
6540
  let $a8;
6301
6541
  switch($a9.h) {
6302
6542
  case 0: {
6303
- $a8 = PullRequest_n__6956_2025_inlineDescription($0, $1, $2, $3, csegen_20());
6543
+ $a8 = PullRequest_n__7433_1981_inlineDescription($0, $1, $2, $3, csegen_21());
6304
6544
  break;
6305
6545
  }
6306
6546
  case undefined: {
6307
- $a8 = Prelude_Interfaces_x3cx24x3e(csegen_80(), $b7 => Prelude_Types_either(() => $ba => '', () => $bc => $bc, $b7), PullRequest_n__6956_2027_editorDescription($0, $1, $2, $3, csegen_20(), $a9.a1));
6547
+ $a8 = Prelude_Interfaces_x3cx24x3e(csegen_103(), $b7 => Prelude_Types_either(() => $ba => '', () => $bc => $bc, $b7), PullRequest_n__7433_1983_editorDescription($0, $1, $2, $3, csegen_21(), $a9.a1));
6308
6548
  break;
6309
6549
  }
6310
6550
  }
6311
- return Data_Promise_x3ex3ex3d_Monad_Promise($a8, description => Prelude_Interfaces_x3ex3e(csegen_17(), Prelude_IO_putStrLn(csegen_20(), 'Creating PR...'), () => Prelude_Interfaces_x3ex3e(csegen_17(), Prelude_IO_putStrLn(csegen_20(), $2), () => FFI_GitHub_createPR($1, $3.a2, $3.a3, $2, $6b, title, description))), $a5, $a6);
6551
+ return Data_Promise_x3ex3ex3d_Monad_Promise($a8, description => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStrLn(csegen_21(), 'Creating PR...'), () => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStrLn(csegen_21(), $2), () => FFI_GitHub_createPR($1, $3.a2, $3.a3, $2, $6b, title, description))), $a5, $a6);
6312
6552
  };
6313
- return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_80(), $9d => ($7e+Data_String_trim($9d)), csegen_400()), $a4, $95, $96);
6553
+ return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_103(), $9d => ($7e+Data_String_trim($9d)), csegen_404()), $a4, $95, $96);
6314
6554
  });
6315
- return Prelude_Interfaces_x3ex3e(csegen_17(), Prelude_IO_putStrLn(csegen_20(), 'What would you like the title to be?'), $7d);
6555
+ return Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStrLn(csegen_21(), 'What would you like the title to be?'), $7d);
6316
6556
  };
6317
- return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_80(), $65 => Data_String_trim($65), csegen_400()), $6a, $5d, $5e);
6557
+ return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_103(), $65 => Data_String_trim($65), csegen_404()), $6a, $5d, $5e);
6318
6558
  })));
6319
6559
  }
6320
6560
 
@@ -6344,7 +6584,7 @@ function PullRequest_reviewsForUser($0, $1, $2, $3) {
6344
6584
  case 0: return 1;
6345
6585
  }
6346
6586
  };
6347
- const $4 = Data_List_filter($6, $3);
6587
+ const $4 = Prelude_Types_List_filter($6, $3);
6348
6588
  return $10 => $11 => {
6349
6589
  const $26 = reviewsJson => $27 => $28 => {
6350
6590
  const $2a = $2b => $2c => {
@@ -6367,18 +6607,18 @@ function PullRequest_reviewsForUser($0, $1, $2, $3) {
6367
6607
  };
6368
6608
  const $32 = {a1: $33, a2: a => $3b => ({h: 1, a1: $3b}), a3: $3d};
6369
6609
  const $30 = Prelude_Types_traverse_Traversable_List($32, $48 => Language_JSON_Accessors_array($4b => Data_Review_parseReview($4b), $48), reviewsJson);
6370
- return Data_Promise_either(csegen_107(), $30, $2b, $2c);
6610
+ return Data_Promise_either(csegen_115(), $30, $2b, $2c);
6371
6611
  };
6372
- return Data_Promise_x3ex3ex3d_Monad_Promise($2a, reviews => $53 => $54 => Data_Promise_pure_Applicative_Promise(Data_List_filter($59 => Data_Review_isAuthor($2, $59), Prelude_Types_join_Monad_List(reviews)), $53, $54), $27, $28);
6612
+ return Data_Promise_x3ex3ex3d_Monad_Promise($2a, reviews => $53 => $54 => Data_Promise_pure_Applicative_Promise(Prelude_Types_List_filter($59 => Data_Review_isAuthor($2, $59), Prelude_Types_join_Monad_List(reviews)), $53, $54), $27, $28);
6373
6613
  };
6374
- return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3dx3cx3c(csegen_17(), csegen_105(), Prelude_Types_traverse_Traversable_List(csegen_11(), $1e => PullRequest_n__6218_1298_forkedReviews($1, $3, $2, $0, $1e), $4)), $26, $10, $11);
6614
+ return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3dx3cx3c(csegen_15(), csegen_113(), Prelude_Types_traverse_Traversable_List(csegen_9(), $1e => PullRequest_n__6746_1302_forkedReviews($1, $3, $2, $0, $1e), $4)), $26, $10, $11);
6375
6615
  };
6376
6616
  }
6377
6617
 
6378
6618
  function PullRequest_requestReviewers($0, $1, $2, $3, $4, $5, $6, $7) {
6379
6619
  const $14 = $15 => $16 => $17 => {
6380
6620
  const $2e = teamMembers => {
6381
- const $2f = Reviewer_chooseReviewers(csegen_88(), $15.a2, $15.a1, teamMembers, {h: 0}, $2.a3);
6621
+ const $2f = Reviewer_chooseReviewers(csegen_111(), $15.a2, $15.a1, teamMembers, {h: 0}, $2.a3);
6382
6622
  return $39 => $3a => {
6383
6623
  const $41 = chosenUser => {
6384
6624
  const $42 = Prelude_Types_List_tailRecAppend(Prelude_Types_toList_Foldable_Maybe(chosenUser), $4);
@@ -6404,31 +6644,31 @@ function PullRequest_requestReviewers($0, $1, $2, $3, $4, $5, $6, $7) {
6404
6644
  break;
6405
6645
  }
6406
6646
  }
6407
- const $4e = Prelude_Interfaces_when(csegen_11(), $52, () => Prelude_Interfaces_x3ex3e(csegen_17(), $59 => $5a => Data_Promise_map_Functor_Promise($5d => (undefined), FFI_GitHub_addPullReviewers($1, $0.a2, $0.a3, $2.a1, $42, $48), $59, $5a), () => Prelude_Interfaces_when(csegen_11(), $0.a6, () => $72 => $73 => {
6647
+ const $4e = Prelude_Interfaces_when(csegen_9(), $52, () => Prelude_Interfaces_x3ex3e(csegen_15(), $59 => $5a => Data_Promise_map_Functor_Promise($5d => (undefined), FFI_GitHub_addPullReviewers($1, $0.a2, $0.a3, $2.a1, $42, $48), $59, $5a), () => Prelude_Interfaces_when(csegen_9(), $0.a6, () => $72 => $73 => {
6408
6648
  switch(chosenUser.h) {
6409
- case undefined: return FFI_GitHub_createComment($1, $0.a2, $0.a3, $2.a1, PullRequest_n__6325_1427_prComment($1, $5, $4, $3, $2, $0, chosenUser.a1), $72, $73);
6649
+ case undefined: return FFI_GitHub_createComment($1, $0.a2, $0.a3, $2.a1, PullRequest_n__6853_1430_prComment($1, $5, $4, $3, $2, $0, chosenUser.a1), $72, $73);
6410
6650
  case 0: return Data_Promise_pure_Applicative_Promise(undefined, $72, $73);
6411
6651
  }
6412
6652
  })));
6413
6653
  let $8c;
6414
6654
  switch(Prelude_Types_null_Foldable_List($42)) {
6415
6655
  case 1: {
6416
- $8c = () => Prelude_IO_putStrLn(csegen_20(), PullRequest_n__6325_1423_maybeDecorate($1, $5, $4, $3, $2, $0, Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(3), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Could not pick a user from the given Team ')), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('(perhaps the only option was the author of the pull request?).'), a2: {h: 0}}})));
6656
+ $8c = () => Prelude_IO_putStrLn(csegen_21(), Util_renderString($0, Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(3), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Could not pick a user from the given Team ')), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('(perhaps the only option was the author of the pull request?).'), a2: {h: 0}}})));
6417
6657
  break;
6418
6658
  }
6419
6659
  case 0: {
6420
- $8c = () => Prelude_IO_putStrLn(csegen_20(), PullRequest_n__6325_1423_maybeDecorate($1, $5, $4, $3, $2, $0, Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: 'Assigned ', a2: {a1: PullRequest_n__6325_1425_userNotice($1, $5, $4, $3, $2, $0, chosenUser), a2: {a1: PullRequest_n__6325_1426_teamNotice($1, $5, $4, $3, $2, $0, $48), a2: {a1: ' to the open PR ', a2: {h: 0}}}}})), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: 'for the current branch (', a2: {a1: Data_PullRequest_rf__webURI($0, $2), a2: {a1: ').', a2: {h: 0}}}})), a2: {h: 0}}})));
6660
+ $8c = () => Prelude_IO_putStrLn(csegen_21(), Util_renderString($0, Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Assigned ', a2: {a1: PullRequest_n__6853_1428_userNotice($1, $5, $4, $3, $2, $0, chosenUser), a2: {a1: PullRequest_n__6853_1429_teamNotice($1, $5, $4, $3, $2, $0, $48), a2: {a1: ' to the open PR ', a2: {h: 0}}}}})), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'for the current branch (', a2: {a1: Data_PullRequest_rf__webURI($0, $2), a2: {a1: ').', a2: {h: 0}}}})), a2: {h: 0}}})));
6421
6661
  break;
6422
6662
  }
6423
6663
  }
6424
- return Prelude_Interfaces_x3ex3e(csegen_17(), $4e, $8c);
6664
+ return Prelude_Interfaces_x3ex3e(csegen_15(), $4e, $8c);
6425
6665
  };
6426
- return Data_Promise_x3ex3ex3d_Monad_Promise(Reviewer_randomReviewer(csegen_20(), $2f), $41, $39, $3a);
6666
+ return Data_Promise_x3ex3ex3d_Monad_Promise(Reviewer_randomReviewer(csegen_21(), $2f), $41, $39, $3a);
6427
6667
  };
6428
6668
  };
6429
- return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_80(), $1f => Prelude_Types_join_Monad_List($1f), Prelude_Types_traverse_Traversable_List(csegen_11(), $27 => FFI_GitHub_listTeamMembers($1, $0.a2, $27), $3)), $2e, $16, $17);
6669
+ return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_103(), $1f => Prelude_Types_join_Monad_List($1f), Prelude_Types_traverse_Traversable_List(csegen_9(), $27 => FFI_GitHub_listTeamMembers($1, $0.a2, $27), $3)), $2e, $16, $17);
6430
6670
  };
6431
- return Data_Promise_x3ex3ex3d_Monad_Promise($a => $b => PullRequest_listReviewers($0, $1, 4n, csegen_128(), $a, $b), $14, $6, $7);
6671
+ return Data_Promise_x3ex3ex3d_Monad_Promise($a => $b => PullRequest_listReviewers($0, $1, 4n, csegen_134(), $a, $b), $14, $6, $7);
6432
6672
  }
6433
6673
 
6434
6674
  function PullRequest_partitionx27($0, $1, $2) {
@@ -6452,12 +6692,12 @@ function PullRequest_partitionx27($0, $1, $2) {
6452
6692
  }
6453
6693
  };
6454
6694
  const $4c = {a1: $4d, a2: a => $55 => ({h: 1, a1: $55}), a3: $57};
6455
- const $4a = Prelude_Types_traverse_Traversable_List($4c, csegen_430(), prJsons);
6456
- return Data_Promise_either(csegen_107(), $4a, $45, $46);
6695
+ const $4a = Prelude_Types_traverse_Traversable_List($4c, csegen_434(), prJsons);
6696
+ return Data_Promise_either(csegen_115(), $4a, $45, $46);
6457
6697
  };
6458
6698
  return Data_Promise_x3ex3ex3d_Monad_Promise($44, pulls => $67 => $68 => Data_Promise_pure_Applicative_Promise(PullRequest_partition(Prelude_Types_join_Monad_List(pulls)), $67, $68), $41, $42);
6459
6699
  };
6460
- return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3dx3cx3c(csegen_17(), $9 => $a => $b => FFI_Concurrency_promiseAll({a1: acc => elem => func => init => input => Data_Pagination_foldr_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29(func, init, input), a2: elem => acc => func => init => input => Data_Pagination_foldl_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29(func, init, input), a3: elem => $19 => Data_Pagination_null_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($19), a4: elem => acc => m => $1d => funcM => init => input => Data_Pagination_foldlM_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($1d, funcM, init, input), a5: elem => $24 => Data_Pagination_toList_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($24), a6: a => m => $28 => f => $29 => Data_Pagination_foldMap_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($28, f, $29)}, $9, $a, $b), Data_Pagination_traversex27(csegen_11(), $36 => $37 => $38 => $39 => PullRequest_forkedPRs($36, $37, $38, $39), $0)), $40, $1, $2);
6700
+ return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3dx3cx3c(csegen_15(), $9 => $a => $b => FFI_Concurrency_promiseAll({a1: acc => elem => func => init => input => Data_Pagination_foldr_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29(func, init, input), a2: elem => acc => func => init => input => Data_Pagination_foldl_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29(func, init, input), a3: elem => $19 => Data_Pagination_null_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($19), a4: elem => acc => m => $1d => funcM => init => input => Data_Pagination_foldlM_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($1d, funcM, init, input), a5: elem => $24 => Data_Pagination_toList_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($24), a6: a => m => $28 => f => $29 => Data_Pagination_foldMap_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($28, f, $29)}, $9, $a, $b), Data_Pagination_traversex27(csegen_9(), $36 => $37 => $38 => $39 => PullRequest_forkedPRs($36, $37, $38, $39), $0)), $40, $1, $2);
6461
6701
  }
6462
6702
 
6463
6703
  function PullRequest_partition($0) {
@@ -6469,7 +6709,7 @@ function PullRequest_listReviewers($0, $1, $2, $3, $4, $5) {
6469
6709
  }
6470
6710
 
6471
6711
  function PullRequest_listPartitionedPRs($0, $1, $2, $3) {
6472
- return PullRequest_with__listPartitionedPRs_1140($3, $2, {a1: Data_Nat_isLT(0n, $3), a2: Data_Nat_isLT(0n, $2)}, $1, $0);
6712
+ return PullRequest_with__listPartitionedPRs_1144($3, $2, {a1: Data_Nat_isLT(0n, $3), a2: Data_Nat_isLT(0n, $2)}, $1, $0);
6473
6713
  }
6474
6714
 
6475
6715
  function PullRequest_identifyOrCreatePR($0, $1, $2, $3, $4, $5) {
@@ -6483,7 +6723,7 @@ function PullRequest_identifyOrCreatePR($0, $1, $2, $3, $4, $5) {
6483
6723
  }
6484
6724
  };
6485
6725
  }
6486
- case 0: return Prelude_Interfaces_x3cx24x3e(csegen_80(), $23 => ({a1: 1, a2: $23}), PullRequest_n__6956_2028_createPR($1, $2, $3, $0));
6726
+ case 0: return Prelude_Interfaces_x3cx24x3e(csegen_103(), $23 => ({a1: 1, a2: $23}), PullRequest_n__7433_1984_createPR($1, $2, $3, $0));
6487
6727
  default: return $2c => $2d => Data_Promise_reject('Multiple PRs for the current brach. We only handle 1 PR per branch currently.', $2c, $2d);
6488
6728
  }
6489
6729
  };
@@ -6491,7 +6731,7 @@ function PullRequest_identifyOrCreatePR($0, $1, $2, $3, $4, $5) {
6491
6731
  }
6492
6732
 
6493
6733
  function PullRequest_forkedPRs($0, $1, $2, $3) {
6494
- return FFI_Concurrency_fork(csegen_20(), Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: 'pulls --json ', a2: {a1: Prelude_Show_show_Show_Nat($0), a2: {a1: ' ', a2: {a1: Prelude_Show_show_Show_Nat($1), a2: {h: 0}}}}}));
6734
+ return FFI_Concurrency_fork(csegen_21(), Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'pulls --json ', a2: {a1: Prelude_Show_show_Show_Nat($0), a2: {a1: ' ', a2: {a1: Prelude_Show_show_Show_Nat($1), a2: {h: 0}}}}}));
6495
6735
  }
6496
6736
 
6497
6737
  const PullRequest_empty = __lazy(function () {
@@ -6559,14 +6799,14 @@ function System_File_ReadWrite_readLinesOnto($0, $1, $2, $3, $4) {
6559
6799
  }
6560
6800
  };
6561
6801
  const $26 = {a1: $27, a2: a => $2f => ({h: 1, a1: $2f}), a3: $31};
6562
- const $25 = {a1: $26, a2: csegen_271(), a3: csegen_272()};
6802
+ const $25 = {a1: $26, a2: csegen_244(), a3: csegen_245()};
6563
6803
  const $40 = b => a => func => $41 => {
6564
6804
  switch($41.h) {
6565
6805
  case 0: return {h: 0, a1: $41.a1};
6566
6806
  case 1: return {h: 1, a1: func($41.a1)};
6567
6807
  }
6568
6808
  };
6569
- const $3f = {a1: $40, a2: csegen_450(), a3: csegen_454()};
6809
+ const $3f = {a1: $40, a2: csegen_454(), a3: csegen_458()};
6570
6810
  return Prelude_Interfaces_Monad_x3ex3ex3d_Monad_Composex28x28x2ex20x24mx29x20x24tx29($0.a1, $25, $3f, System_File_ReadWrite_fGetLine($0, $4), str => System_File_ReadWrite_readLinesOnto($0, {a1: str, a2: $1}, 0n, $3.a1(), $4));
6571
6811
  }
6572
6812
  default: {
@@ -6805,7 +7045,7 @@ const System_Info_os = __lazy(function () {
6805
7045
  });
6806
7046
 
6807
7047
  const System_Info_isWindows = __lazy(function () {
6808
- return Prelude_Types_elem(csegen_104(), csegen_71(), System_Info_os(), {a1: 'windows', a2: {a1: 'mingw32', a2: {a1: 'cygwin32', a2: {h: 0}}}});
7048
+ return Prelude_Types_elem(csegen_77(), csegen_94(), System_Info_os(), {a1: 'windows', a2: {a1: 'mingw32', a2: {a1: 'cygwin32', a2: {h: 0}}}});
6809
7049
  });
6810
7050
 
6811
7051
  function System_File_Meta_isTTY($0, $1) {
@@ -6915,63 +7155,63 @@ function System_Node_system($0, $1) {
6915
7155
  return $0.a2(undefined)($7 => System_Node_prim__system($1, $7));
6916
7156
  }
6917
7157
 
6918
- function Reviewer_with__scoredReviewersx2czipReviewsx2ccalc_1694($0, $1, $2, $3, $4, $5, $6, $7, $8, $9, $a, $b, $c, $d, $e) {
7158
+ function Reviewer_with__scoredReviewersx2czipReviewsx2ccalc_1758($0, $1, $2, $3, $4, $5, $6, $7, $8, $9, $a, $b, $c, $d, $e) {
6919
7159
  switch($c.h) {
6920
7160
  case 0: return ($e+$d);
6921
7161
  case 1: return Prelude_Types_prim__integerToNat(($e-$d));
6922
7162
  }
6923
7163
  }
6924
7164
 
6925
- function Reviewer_n__4814_2075_yellowDot($0, $1, $2, $3, $4) {
7165
+ function Reviewer_n__5330_2143_yellowDot($0, $1, $2, $3, $4) {
6926
7166
  return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(3), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('\u{b7}'));
6927
7167
  }
6928
7168
 
6929
- function Reviewer_n__4241_1527_weightReviews($0, $1, $2, $3, $4, $5) {
7169
+ function Reviewer_n__4753_1591_weightReviews($0, $1, $2, $3, $4, $5) {
6930
7170
  const $6 = Data_List_groupAllWith($0, $a => $a, $5);
6931
7171
  const $10 = xs => {
6932
7172
  const $11 = (Prelude_Types_List_lengthTR(Data_List1_forget(xs))*$4);
6933
7173
  return {a1: xs.a1, a2: $11, a3: $11};
6934
7174
  };
6935
- return Prelude_Interfaces_x3cx26x3e(csegen_111(), $6, $10);
7175
+ return Prelude_Interfaces_x3cx26x3e(csegen_119(), $6, $10);
6936
7176
  }
6937
7177
 
6938
- function Reviewer_n__4241_1528_sortx27($0, $1, $2, $3, $4) {
7178
+ function Reviewer_n__4753_1592_sortx27($0, $1, $2, $3, $4) {
6939
7179
  return Data_List_sortBy($7 => $8 => Prelude_Basics_on($b => $c => Prelude_EqOrd_compare_Ord_Integer($b, $c), $11 => $11.a3, $7, $8), $4);
6940
7180
  }
6941
7181
 
6942
- function Reviewer_n__4814_2076_redDot($0, $1, $2, $3, $4) {
7182
+ function Reviewer_n__5330_2144_redDot($0, $1, $2, $3, $4) {
6943
7183
  return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(1), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('\u{25e6}'));
6944
7184
  }
6945
7185
 
6946
- function Reviewer_n__4814_2077_header($0, $1, $2, $3, $4) {
6947
- return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Weighted review workload.'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('4x the numbewr of open review requests'), Text_PrettyPrint_Prettyprinter_Symbols_parens(Reviewer_n__4814_2075_yellowDot($0, $1, $2, $3, $4))), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('1x the number of closed PRs with unanswered review requests'), Text_PrettyPrint_Prettyprinter_Symbols_parens(Reviewer_n__4814_2076_redDot($0, $1, $2, $3, $4))), a2: {a1: Text_PrettyPrint_Prettyprinter_Symbols_parens(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Reviewer_n__4814_2076_redDot($0, $1, $2, $3, $4), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('overlayed on'), Reviewer_n__4814_2075_yellowDot($0, $1, $2, $3, $4)))), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {h: 0}}}}}}}});
7186
+ function Reviewer_n__5330_2145_header($0, $1, $2, $3, $4) {
7187
+ return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Weighted review workload.'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('4x the number of open review requests'), Text_PrettyPrint_Prettyprinter_Symbols_parens(Reviewer_n__5330_2143_yellowDot($0, $1, $2, $3, $4))), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('1x the number of closed PRs with unanswered review requests'), Text_PrettyPrint_Prettyprinter_Symbols_parens(Reviewer_n__5330_2144_redDot($0, $1, $2, $3, $4))), a2: {a1: Text_PrettyPrint_Prettyprinter_Symbols_parens(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Reviewer_n__5330_2144_redDot($0, $1, $2, $3, $4), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('overlayed on'), Reviewer_n__5330_2143_yellowDot($0, $1, $2, $3, $4)))), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {h: 0}}}}}}}});
6948
7188
  }
6949
7189
 
6950
- function Reviewer_n__4814_2079_graphOne($0, $1, $2, $3, $4, $5, $6) {
7190
+ function Reviewer_n__5330_2147_graphOne($0, $1, $2, $3, $4, $5, $6) {
6951
7191
  const $8 = Prelude_Types_prim__integerToNat(($5-$6.a2));
6952
7192
  const $d = Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), $1.a1(undefined)($6.a1));
6953
7193
  const $17 = Prelude_Types_prim__integerToNat(($6.a2-$6.a3));
6954
7194
  const $1c = Prelude_Types_prim__integerToNat(($5-$6.a3));
6955
- return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Reviewer_n__4814_2078_bar($0, $1, $2, $3, $4, $8, $6.a3, Prelude_Types_min_Ord_Nat($1c, $17)), $d);
7195
+ return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Reviewer_n__5330_2146_bar($0, $1, $2, $3, $4, $8, $6.a3, Prelude_Types_min_Ord_Nat($1c, $17)), $d);
6956
7196
  }
6957
7197
 
6958
- function Reviewer_n__4814_2080_graph($0, $1, $2, $3, $4, $5, $6) {
6959
- return Text_PrettyPrint_Prettyprinter_Doc_vsep(Prelude_Types_map_Functor_List($b => Reviewer_n__4814_2079_graphOne($0, $1, $2, $3, $4, $5, $b), $6));
7198
+ function Reviewer_n__5330_2148_graph($0, $1, $2, $3, $4, $5, $6) {
7199
+ return Text_PrettyPrint_Prettyprinter_Doc_vsep(Prelude_Types_map_Functor_List($b => Reviewer_n__5330_2147_graphOne($0, $1, $2, $3, $4, $5, $b), $6));
6960
7200
  }
6961
7201
 
6962
- function Reviewer_n__4268_1684_calc($0, $1, $2, $3, $4, $5, $6, $7, $8, $9, $a, $b, $c, $d) {
6963
- return Reviewer_with__scoredReviewersx2czipReviewsx2ccalc_1694(undefined, $0, $1, $2, $3, $4, $5, $6, $8, $9, $a, $b, $a, $d, $c);
7202
+ function Reviewer_n__4780_1748_calc($0, $1, $2, $3, $4, $5, $6, $7, $8, $9, $a, $b, $c, $d) {
7203
+ return Reviewer_with__scoredReviewersx2czipReviewsx2ccalc_1758(undefined, $0, $1, $2, $3, $4, $5, $6, $8, $9, $a, $b, $a, $d, $c);
6964
7204
  }
6965
7205
 
6966
- function Reviewer_n__4814_2078_bar($0, $1, $2, $3, $4, $5, $6, $7) {
7206
+ function Reviewer_n__5330_2146_bar($0, $1, $2, $3, $4, $5, $6, $7) {
6967
7207
  return Text_PrettyPrint_Prettyprinter_Doc_indent(Prelude_Cast_cast_Cast_Nat_Int($5), Text_PrettyPrint_Prettyprinter_Doc_hcat({a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(1), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Data_String_replicate($7, '\u{25e6}'))), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(3), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Data_String_replicate($6, '\u{b7}'))), a2: {h: 0}}}));
6968
7208
  }
6969
7209
 
6970
7210
  function Reviewer_scoredReviewers($0, $1, $2, $3) {
6971
- const $4 = Reviewer_n__4241_1527_weightReviews($0, $3, $2, $1, 1n, $1);
6972
- const $c = Reviewer_n__4241_1527_weightReviews($0, $3, $2, $1, 4n, $2);
6973
- const $14 = Reviewer_n__4241_1532_zipReviews($0, $3, $2, $1, $c, $4, {h: 1, a1: $0, a2: $3, a3: $2, a4: $1}, 0);
6974
- return Reviewer_n__4241_1528_sortx27($0, $3, $2, $1, Reviewer_n__4241_1532_zipReviews($0, $3, $2, $1, $14, Reviewer_n__4241_1527_weightReviews($0, $3, $2, $1, 0n, $3), {h: 0, a1: $0, a2: $3, a3: $2, a4: $1}, 1));
7211
+ const $4 = Reviewer_n__4753_1591_weightReviews($0, $3, $2, $1, 1n, $1);
7212
+ const $c = Reviewer_n__4753_1591_weightReviews($0, $3, $2, $1, 4n, $2);
7213
+ const $14 = Reviewer_n__4753_1596_zipReviews($0, $3, $2, $1, $c, $4, {h: 1, a1: $0, a2: $3, a3: $2, a4: $1}, 0);
7214
+ return Reviewer_n__4753_1592_sortx27($0, $3, $2, $1, Reviewer_n__4753_1596_zipReviews($0, $3, $2, $1, $14, Reviewer_n__4753_1591_weightReviews($0, $3, $2, $1, 0n, $3), {h: 0, a1: $0, a2: $3, a3: $2, a4: $1}, 1));
6975
7215
  }
6976
7216
 
6977
7217
  function Reviewer_reviewsGraph($0, $1, $2, $3, $4) {
@@ -6991,8 +7231,8 @@ function Reviewer_reviewsGraph($0, $1, $2, $3, $4) {
6991
7231
  break;
6992
7232
  }
6993
7233
  }
6994
- const $28 = Reviewer_n__4814_2080_graph($0, $1, $4, $3, $2, $2f, $5);
6995
- const $1f = Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Reviewer_n__4814_2077_header($0, $1, $4, $3, $2), $28);
7234
+ const $28 = Reviewer_n__5330_2148_graph($0, $1, $4, $3, $2, $2f, $5);
7235
+ const $1f = Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Reviewer_n__5330_2145_header($0, $1, $4, $3, $2), $28);
6996
7236
  return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29($1f, Text_PrettyPrint_Prettyprinter_Doc_line());
6997
7237
  }
6998
7238
  }
@@ -7016,7 +7256,7 @@ function Reviewer_chooseReviewers($0, $1, $2, $3, $4, $5) {
7016
7256
  case 0: return {h: 0};
7017
7257
  case undefined: {
7018
7258
  const $1a = Data_List_takeWhile($1d => (($1d.a3===$12.a1.a3)?1:0), $12.a2);
7019
- const $22 = Prelude_Interfaces_x3cx24x3e(csegen_111(), $27 => Reviewer_loginScore($27), $1a);
7259
+ const $22 = Prelude_Interfaces_x3cx24x3e(csegen_119(), $27 => Reviewer_loginScore($27), $1a);
7020
7260
  return {a1: {a1: $12.a1.a1, a2: $12.a1.a3}, a2: $22};
7021
7261
  }
7022
7262
  }
@@ -7069,15 +7309,15 @@ function FFI_GitHub_pullRequestStateFilter($0) {
7069
7309
  }
7070
7310
 
7071
7311
  function FFI_GitHub_octokit($0) {
7072
- return Prelude_Interfaces_x3cx24x3e(csegen_62(), $5 => $5, $7 => FFI_GitHub_prim__octokit($0, $7));
7312
+ return Prelude_Interfaces_x3cx24x3e(csegen_85(), $5 => $5, $7 => FFI_GitHub_prim__octokit($0, $7));
7073
7313
  }
7074
7314
 
7075
7315
  function FFI_GitHub_listTeams($0, $1) {
7076
- return Prelude_Interfaces_x3cx24x3e(csegen_80(), $6 => Data_String_lines($6), $a => $b => FFI_promiseIO($e => $f => $10 => FFI_GitHub_prim__listTeams($0, $1, $e, $f, $10), $a, $b));
7316
+ return Prelude_Interfaces_x3cx24x3e(csegen_103(), $6 => Data_String_lines($6), $a => $b => FFI_promiseIO($e => $f => $10 => FFI_GitHub_prim__listTeams($0, $1, $e, $f, $10), $a, $b));
7077
7317
  }
7078
7318
 
7079
7319
  function FFI_GitHub_listTeamMembers($0, $1, $2) {
7080
- return Prelude_Interfaces_x3cx24x3e(csegen_80(), $7 => Data_String_lines($7), $b => $c => FFI_promiseIO($f => $10 => $11 => FFI_GitHub_prim__listTeamMembers($0, $1, $2, $f, $10, $11), $b, $c));
7320
+ return Prelude_Interfaces_x3cx24x3e(csegen_103(), $7 => Data_String_lines($7), $b => $c => FFI_promiseIO($f => $10 => $11 => FFI_GitHub_prim__listTeamMembers($0, $1, $2, $f, $10, $11), $b, $c));
7081
7321
  }
7082
7322
 
7083
7323
  function FFI_GitHub_listPullReviewsJsonStr($0, $1, $2, $3, $4, $5) {
@@ -7092,23 +7332,27 @@ function FFI_GitHub_listPullRequestsJsonStr($0, $1, $2, $3, $4, $5) {
7092
7332
  }
7093
7333
 
7094
7334
  function FFI_GitHub_listPullRequests($0, $1, $2, $3, $4, $5) {
7095
- return Prelude_Interfaces_x3dx3cx3c(csegen_17(), csegen_475(), FFI_GitHub_listPullRequestsJsonStr($0, $1, $2, $3, $4, $5));
7335
+ return Prelude_Interfaces_x3dx3cx3c(csegen_15(), csegen_479(), FFI_GitHub_listPullRequestsJsonStr($0, $1, $2, $3, $4, $5));
7096
7336
  }
7097
7337
 
7098
7338
  function FFI_GitHub_listPRsForBranch($0, $1, $2, $3) {
7099
- return Prelude_Interfaces_x3dx3cx3c(csegen_17(), csegen_475(), $a => $b => FFI_promiseIO($e => $f => $10 => FFI_GitHub_prim__listPRsForBranch($0, $1, $2, $3, $e, $f, $10), $a, $b));
7339
+ return Prelude_Interfaces_x3dx3cx3c(csegen_15(), csegen_479(), $a => $b => FFI_promiseIO($e => $f => $10 => FFI_GitHub_prim__listPRsForBranch($0, $1, $2, $3, $e, $f, $10), $a, $b));
7100
7340
  }
7101
7341
 
7102
7342
  function FFI_GitHub_listOrgMembers($0, $1) {
7103
- return Prelude_Interfaces_x3cx24x3e(csegen_80(), $6 => Data_String_lines($6), $a => $b => FFI_promiseIO($e => $f => $10 => FFI_GitHub_prim__listOrgMembers($0, $1, $e, $f, $10), $a, $b));
7343
+ return Prelude_Interfaces_x3cx24x3e(csegen_103(), $6 => Data_String_lines($6), $a => $b => FFI_promiseIO($e => $f => $10 => FFI_GitHub_prim__listOrgMembers($0, $1, $e, $f, $10), $a, $b));
7344
+ }
7345
+
7346
+ function FFI_GitHub_listMyTeams($0) {
7347
+ return Prelude_Interfaces_x3cx24x3e(csegen_103(), $5 => Data_String_lines($5), $9 => $a => FFI_promiseIO($d => $e => $f => FFI_GitHub_prim__listMyTeams($0, $d, $e, $f), $9, $a));
7104
7348
  }
7105
7349
 
7106
7350
  function FFI_GitHub_getUser($0) {
7107
- return Prelude_Interfaces_x3cx3dx3c(csegen_17(), csegen_476(), $7 => $8 => $9 => FFI_promiseIO($c => $d => $e => FFI_GitHub_prim__getUser($0, $7, $c, $d, $e), $8, $9));
7351
+ return Prelude_Interfaces_x3cx3dx3c(csegen_15(), csegen_480(), $7 => $8 => $9 => FFI_promiseIO($c => $d => $e => FFI_GitHub_prim__getUser($0, $7, $c, $d, $e), $8, $9));
7108
7352
  }
7109
7353
 
7110
7354
  function FFI_GitHub_getSelf($0) {
7111
- return Prelude_Interfaces_x3dx3cx3c(csegen_17(), csegen_476(), $7 => $8 => FFI_promiseIO($b => $c => $d => FFI_GitHub_prim__getSelf($0, $b, $c, $d), $7, $8));
7355
+ return Prelude_Interfaces_x3dx3cx3c(csegen_15(), csegen_480(), $7 => $8 => FFI_promiseIO($b => $c => $d => FFI_GitHub_prim__getSelf($0, $b, $c, $d), $7, $8));
7112
7356
  }
7113
7357
 
7114
7358
  function FFI_GitHub_getRepoDefaultBranch($0, $1, $2, $3, $4) {
@@ -7116,7 +7360,7 @@ function FFI_GitHub_getRepoDefaultBranch($0, $1, $2, $3, $4) {
7116
7360
  }
7117
7361
 
7118
7362
  function FFI_GitHub_createPR($0, $1, $2, $3, $4, $5, $6) {
7119
- return Prelude_Interfaces_x3dx3cx3c(csegen_17(), $b => $c => $d => Data_Promise_either(csegen_107(), Data_PullRequest_parsePullRequestString($b), $c, $d), $17 => $18 => FFI_promiseIO($1b => $1c => $1d => FFI_GitHub_prim__createPR($0, $1, $2, $3, $4, $5, $6, $1b, $1c, $1d), $17, $18));
7363
+ return Prelude_Interfaces_x3dx3cx3c(csegen_15(), $b => $c => $d => Data_Promise_either(csegen_115(), Data_PullRequest_parsePullRequestString($b), $c, $d), $17 => $18 => FFI_promiseIO($1b => $1c => $1d => FFI_GitHub_prim__createPR($0, $1, $2, $3, $4, $5, $6, $1b, $1c, $1d), $17, $18));
7120
7364
  }
7121
7365
 
7122
7366
  function FFI_GitHub_createComment($0, $1, $2, $3, $4, $5, $6) {
@@ -7124,7 +7368,7 @@ function FFI_GitHub_createComment($0, $1, $2, $3, $4, $5, $6) {
7124
7368
  }
7125
7369
 
7126
7370
  function FFI_GitHub_addPullReviewers($0, $1, $2, $3, $4, $5) {
7127
- return Prelude_Interfaces_x3cx24x3e(csegen_80(), $a => Data_String_lines($a), $e => $f => FFI_promiseIO($12 => $13 => $14 => FFI_GitHub_prim__addPullReviewers($0, $1, $2, $3, Data_String_Extra_join(',', csegen_104(), $4), Data_String_Extra_join(',', csegen_104(), $5), $12, $13, $14), $e, $f));
7371
+ return Prelude_Interfaces_x3cx24x3e(csegen_103(), $a => Data_String_lines($a), $e => $f => FFI_promiseIO($12 => $13 => $14 => FFI_GitHub_prim__addPullReviewers($0, $1, $2, $3, Data_String_Extra_join(',', csegen_77(), $4), Data_String_Extra_join(',', csegen_77(), $5), $12, $13, $14), $e, $f));
7128
7372
  }
7129
7373
 
7130
7374
  function FFI_promiseIO($0, $1, $2) {
@@ -7157,7 +7401,7 @@ function Data_Promise_x3cx7cx3e_Alternative_Promise($0, $1, $2, $3) {
7157
7401
  }
7158
7402
 
7159
7403
  function Data_Promise_x3cx2ax3e_Applicative_Promise($0, $1, $2, $3) {
7160
- return Data_Promise_bind($0, f => Prelude_Interfaces_x3cx24x3e(csegen_5(), f, $1), $2, $3);
7404
+ return Data_Promise_bind($0, f => Prelude_Interfaces_x3cx24x3e(csegen_3(), f, $1), $2, $3);
7161
7405
  }
7162
7406
 
7163
7407
  function Data_Promise_resolvex27($0, $1, $2) {
@@ -7202,8 +7446,8 @@ function Data_User_parseUserString($0) {
7202
7446
  }
7203
7447
  };
7204
7448
  const $3 = {a1: $4, a2: a => $c => ({h: 1, a1: $c}), a3: $e};
7205
- const $2 = {a1: $3, a2: csegen_271(), a3: csegen_272()};
7206
- return Prelude_Interfaces_x3ex3dx3e($2, csegen_273(), $1f => Data_User_parseUser($1f), $0);
7449
+ const $2 = {a1: $3, a2: csegen_244(), a3: csegen_245()};
7450
+ return Prelude_Interfaces_x3ex3dx3e($2, csegen_246(), $1f => Data_User_parseUser($1f), $0);
7207
7451
  }
7208
7452
 
7209
7453
  function Data_User_parseUser($0) {
@@ -7250,7 +7494,7 @@ function Data_Review_parseReview($0) {
7250
7494
  }
7251
7495
  };
7252
7496
  const $20 = {a1: $21, a2: a => $29 => ({h: 1, a1: $29}), a3: $2b};
7253
- const $1f = {a1: $20, a2: csegen_271(), a3: csegen_272()};
7497
+ const $1f = {a1: $20, a2: csegen_244(), a3: csegen_245()};
7254
7498
  const $1d = Prelude_Interfaces_x3dx3cx3c($1f, $3a => Data_Review_parseState($3a), Language_JSON_Accessors_string($12.a2.a1));
7255
7499
  const $40 = state => {
7256
7500
  const $46 = b => a => func => $47 => {
@@ -7271,7 +7515,7 @@ function Data_Review_parseReview($0) {
7271
7515
  }
7272
7516
  };
7273
7517
  const $45 = {a1: $46, a2: a => $4e => ({h: 1, a1: $4e}), a3: $50};
7274
- const $44 = {a1: $45, a2: csegen_271(), a3: csegen_272()};
7518
+ const $44 = {a1: $45, a2: csegen_244(), a3: csegen_245()};
7275
7519
  const $42 = Prelude_Interfaces_x3dx3cx3c($44, $5f => Data_Review_parseDateTime($5f), Language_JSON_Accessors_string($12.a2.a2.a1));
7276
7520
  return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29($42, submittedAt => ({h: 1, a1: {a1: submittedAt, a2: author, a3: state}}));
7277
7521
  };
@@ -7292,7 +7536,7 @@ function Data_Review_isAuthor($0, $1) {
7292
7536
  return Prelude_EqOrd_x3dx3d_Eq_String($1.a2, $0);
7293
7537
  }
7294
7538
 
7295
- function Data_Date_n__3558_7504_parseNat($0, $1, $2) {
7539
+ function Data_Date_n__4075_9411_parseNat($0, $1, $2) {
7296
7540
  switch($2) {
7297
7541
  case '0': return {a1: 0n};
7298
7542
  case '1': return {a1: 1n};
@@ -7308,14 +7552,14 @@ function Data_Date_n__3558_7504_parseNat($0, $1, $2) {
7308
7552
  }
7309
7553
  }
7310
7554
 
7311
- function Data_Date_n__3168_7152_pad($0, $1, $2, $3) {
7555
+ function Data_Date_n__3685_9059_pad($0, $1, $2, $3) {
7312
7556
  switch(Prelude_Types_x3c_Ord_Nat($3, Prelude_Types_prim__integerToNat(10n))) {
7313
- case 1: return Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: '0', a2: {a1: Prelude_Show_show_Show_Nat($3), a2: {h: 0}}});
7557
+ case 1: return Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: '0', a2: {a1: Prelude_Show_show_Show_Nat($3), a2: {h: 0}}});
7314
7558
  case 0: return Prelude_Show_show_Show_Nat($3);
7315
7559
  }
7316
7560
  }
7317
7561
 
7318
- function Data_Date_n__3675_7621_guardSuccess($0) {
7562
+ function Data_Date_n__4192_9528_guardSuccess($0) {
7319
7563
  switch($0.h) {
7320
7564
  case undefined: {
7321
7565
  switch($0.a1.h) {
@@ -7323,7 +7567,7 @@ function Data_Date_n__3675_7621_guardSuccess($0) {
7323
7567
  switch($0.a2.h) {
7324
7568
  case undefined: {
7325
7569
  switch($0.a2.a2.h) {
7326
- case undefined: return Prelude_Interfaces_x3cx24x3e(csegen_161(), $9 => ({a1: $0.a2.a1, a2: $0.a2.a2.a1, a3: $9}), Data_Date_parsePositiveReversed($0.a2.a2.a2));
7570
+ case undefined: return Prelude_Interfaces_x3cx24x3e(csegen_18(), $9 => ({a1: $0.a2.a1, a2: $0.a2.a2.a1, a3: $9}), Data_Date_parsePositiveReversed($0.a2.a2.a2));
7327
7571
  default: return {h: 0};
7328
7572
  }
7329
7573
  }
@@ -7337,7 +7581,7 @@ function Data_Date_n__3675_7621_guardSuccess($0) {
7337
7581
  }
7338
7582
  }
7339
7583
 
7340
- function Data_Date_n__3675_7622_go($0, $1) {
7584
+ function Data_Date_n__4192_9529_go($0, $1) {
7341
7585
  switch($0.a1.h) {
7342
7586
  case 4: return {a1: {h: 4}, a2: undefined};
7343
7587
  case 0: {
@@ -7395,7 +7639,7 @@ function Data_Date_n__3675_7622_go($0, $1) {
7395
7639
  }
7396
7640
 
7397
7641
  function Data_Date_show_Show_Date($0) {
7398
- return Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: Prelude_Show_show_Show_Nat($0.a1), a2: {a1: '-', a2: {a1: Data_Date_n__3168_7152_pad($0.a3, $0.a2, $0.a1, $0.a2), a2: {a1: '-', a2: {a1: Data_Date_n__3168_7152_pad($0.a3, $0.a2, $0.a1, $0.a3), a2: {h: 0}}}}}});
7642
+ return Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: Prelude_Show_show_Show_Nat($0.a1), a2: {a1: '-', a2: {a1: Data_Date_n__3685_9059_pad($0.a3, $0.a2, $0.a1, $0.a2), a2: {a1: '-', a2: {a1: Data_Date_n__3685_9059_pad($0.a3, $0.a2, $0.a1, $0.a3), a2: {h: 0}}}}}});
7399
7643
  }
7400
7644
 
7401
7645
  function Data_Date_min_Ord_Date($0, $1) {
@@ -7454,7 +7698,7 @@ function Data_Date_x2fx3d_Eq_Date($0, $1) {
7454
7698
  function Data_Date_parsePositiveReversed($0) {
7455
7699
  switch($0.h) {
7456
7700
  case 0: return {a1: 0n};
7457
- case undefined: return Prelude_Types_x3ex3ex3d_Monad_Maybe(Data_Date_n__3558_7504_parseNat($0.a1, $0.a2, $0.a1), n => Prelude_Types_x3ex3ex3d_Monad_Maybe(Data_Date_parsePositiveReversed($0.a2), $f => ({a1: (n+(Prelude_Types_prim__integerToNat(10n)*$f))})));
7701
+ case undefined: return Prelude_Types_x3ex3ex3d_Monad_Maybe(Data_Date_n__4075_9411_parseNat($0.a1, $0.a2, $0.a1), n => Prelude_Types_x3ex3ex3d_Monad_Maybe(Data_Date_parsePositiveReversed($0.a2), $f => ({a1: (n+(Prelude_Types_prim__integerToNat(10n)*$f))})));
7458
7702
  }
7459
7703
  }
7460
7704
 
@@ -7465,7 +7709,7 @@ function Data_Date_parseDateTimeString($0) {
7465
7709
  }
7466
7710
 
7467
7711
  function Data_Date_parseDateString($0) {
7468
- return Data_Date_n__3675_7621_guardSuccess(Prelude_Types_foldl_Foldable_List($5 => $6 => Data_Date_n__3675_7622_go($5, $6), {a1: {h: 0}, a2: undefined}, Prelude_Types_fastUnpack($0)));
7712
+ return Data_Date_n__4192_9528_guardSuccess(Prelude_Types_foldl_Foldable_List($5 => $6 => Data_Date_n__4192_9529_go($5, $6), {a1: {h: 0}, a2: undefined}, Prelude_Types_fastUnpack($0)));
7469
7713
  }
7470
7714
 
7471
7715
  function Data_PullRequest_show_Show_PRState($0) {
@@ -7494,14 +7738,14 @@ function Data_PullRequest_x3dx3d_Eq_PRState($0, $1) {
7494
7738
  }
7495
7739
 
7496
7740
  function Data_PullRequest_rf__webURI($0, $1) {
7497
- return Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: 'https://github.com/', a2: {a1: $0.a2, a2: {a1: '/', a2: {a1: $0.a3, a2: {a1: '/pull/', a2: {a1: Prelude_Show_show_Show_Integer($1.a1), a2: {h: 0}}}}}}});
7741
+ return Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'https://github.com/', a2: {a1: $0.a2, a2: {a1: '/', a2: {a1: $0.a3, a2: {a1: '/pull/', a2: {a1: Prelude_Show_show_Show_Integer($1.a1), a2: {h: 0}}}}}}});
7498
7742
  }
7499
7743
 
7500
7744
  function Data_PullRequest_parseState($0) {
7501
7745
  switch($0) {
7502
7746
  case 'open': return {h: 1, a1: 0};
7503
7747
  case 'closed': return {h: 1, a1: 1};
7504
- default: return {h: 0, a1: Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: 'Failed to parse a Pull Request State (open/closed). Found ', a2: {a1: $0, a2: {a1: '.', a2: {h: 0}}}})};
7748
+ default: return {h: 0, a1: Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Failed to parse a Pull Request State (open/closed). Found ', a2: {a1: $0, a2: {a1: '.', a2: {h: 0}}}})};
7505
7749
  }
7506
7750
  }
7507
7751
 
@@ -7524,8 +7768,8 @@ function Data_PullRequest_parsePullRequestsString($0) {
7524
7768
  }
7525
7769
  };
7526
7770
  const $3 = {a1: $4, a2: a => $c => ({h: 1, a1: $c}), a3: $e};
7527
- const $2 = {a1: $3, a2: csegen_271(), a3: csegen_272()};
7528
- return Prelude_Interfaces_x3ex3dx3e($2, csegen_273(), csegen_430(), $0);
7771
+ const $2 = {a1: $3, a2: csegen_244(), a3: csegen_245()};
7772
+ return Prelude_Interfaces_x3ex3dx3e($2, csegen_246(), csegen_434(), $0);
7529
7773
  }
7530
7774
 
7531
7775
  function Data_PullRequest_parsePullRequestString($0) {
@@ -7547,65 +7791,65 @@ function Data_PullRequest_parsePullRequestString($0) {
7547
7791
  }
7548
7792
  };
7549
7793
  const $3 = {a1: $4, a2: a => $c => ({h: 1, a1: $c}), a3: $e};
7550
- const $2 = {a1: $3, a2: csegen_271(), a3: csegen_272()};
7551
- return Prelude_Interfaces_x3ex3dx3e($2, csegen_273(), $1f => Data_PullRequest_parsePR($1f), $0);
7794
+ const $2 = {a1: $3, a2: csegen_244(), a3: csegen_245()};
7795
+ return Prelude_Interfaces_x3ex3dx3e($2, csegen_246(), $1f => Data_PullRequest_parsePR($1f), $0);
7552
7796
  }
7553
7797
 
7554
7798
  function Data_PullRequest_parsePR($0) {
7555
7799
  const $5 = pr => {
7556
- const $15 = $16 => {
7557
- const $21 = number => {
7558
- const $26 = author => {
7559
- const $2c = b => a => func => $2d => {
7560
- switch($2d.h) {
7561
- case 0: return {h: 0, a1: $2d.a1};
7562
- case 1: return {h: 1, a1: func($2d.a1)};
7800
+ const $17 = $18 => {
7801
+ const $24 = number => {
7802
+ const $29 = author => {
7803
+ const $2f = b => a => func => $30 => {
7804
+ switch($30.h) {
7805
+ case 0: return {h: 0, a1: $30.a1};
7806
+ case 1: return {h: 1, a1: func($30.a1)};
7563
7807
  }
7564
7808
  };
7565
- const $36 = b => a => $37 => $38 => {
7566
- switch($37.h) {
7567
- case 0: return {h: 0, a1: $37.a1};
7809
+ const $39 = b => a => $3a => $3b => {
7810
+ switch($3a.h) {
7811
+ case 0: return {h: 0, a1: $3a.a1};
7568
7812
  case 1: {
7569
- switch($38.h) {
7570
- case 1: return {h: 1, a1: $37.a1($38.a1)};
7571
- case 0: return {h: 0, a1: $38.a1};
7813
+ switch($3b.h) {
7814
+ case 1: return {h: 1, a1: $3a.a1($3b.a1)};
7815
+ case 0: return {h: 0, a1: $3b.a1};
7572
7816
  }
7573
7817
  }
7574
7818
  }
7575
7819
  };
7576
- const $2b = {a1: $2c, a2: a => $34 => ({h: 1, a1: $34}), a3: $36};
7577
- const $2a = {a1: $2b, a2: csegen_271(), a3: csegen_272()};
7578
- const $28 = Prelude_Interfaces_x3dx3cx3c($2a, $45 => Data_PullRequest_parseState($45), Language_JSON_Accessors_string($16.a2.a2.a1));
7579
- const $4b = state => {
7580
- const $51 = b => a => func => $52 => {
7581
- switch($52.h) {
7582
- case 0: return {h: 0, a1: $52.a1};
7583
- case 1: return {h: 1, a1: func($52.a1)};
7820
+ const $2e = {a1: $2f, a2: a => $37 => ({h: 1, a1: $37}), a3: $39};
7821
+ const $2d = {a1: $2e, a2: csegen_244(), a3: csegen_245()};
7822
+ const $2b = Prelude_Interfaces_x3dx3cx3c($2d, $48 => Data_PullRequest_parseState($48), Language_JSON_Accessors_string($18.a2.a2.a1));
7823
+ const $4e = state => {
7824
+ const $54 = b => a => func => $55 => {
7825
+ switch($55.h) {
7826
+ case 0: return {h: 0, a1: $55.a1};
7827
+ case 1: return {h: 1, a1: func($55.a1)};
7584
7828
  }
7585
7829
  };
7586
- const $5b = b => a => $5c => $5d => {
7587
- switch($5c.h) {
7588
- case 0: return {h: 0, a1: $5c.a1};
7830
+ const $5e = b => a => $5f => $60 => {
7831
+ switch($5f.h) {
7832
+ case 0: return {h: 0, a1: $5f.a1};
7589
7833
  case 1: {
7590
- switch($5d.h) {
7591
- case 1: return {h: 1, a1: $5c.a1($5d.a1)};
7592
- case 0: return {h: 0, a1: $5d.a1};
7834
+ switch($60.h) {
7835
+ case 1: return {h: 1, a1: $5f.a1($60.a1)};
7836
+ case 0: return {h: 0, a1: $60.a1};
7593
7837
  }
7594
7838
  }
7595
7839
  }
7596
7840
  };
7597
- const $50 = {a1: $51, a2: a => $59 => ({h: 1, a1: $59}), a3: $5b};
7598
- const $4f = {a1: $50, a2: csegen_271(), a3: csegen_272()};
7599
- const $4d = Prelude_Interfaces_x3dx3cx3c($4f, $6a => Data_PullRequest_parseDateTime($6a), Language_JSON_Accessors_string($16.a2.a2.a2.a1));
7600
- return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29($4d, createdAt => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_array($75 => Language_JSON_Accessors_string($75), $16.a2.a2.a2.a2.a1), reviewers => ({h: 1, a1: {a1: number, a2: createdAt, a3: author, a4: state, a5: reviewers}})));
7841
+ const $53 = {a1: $54, a2: a => $5c => ({h: 1, a1: $5c}), a3: $5e};
7842
+ const $52 = {a1: $53, a2: csegen_244(), a3: csegen_245()};
7843
+ const $50 = Prelude_Interfaces_x3dx3cx3c($52, $6d => Data_PullRequest_parseDateTime($6d), Language_JSON_Accessors_string($18.a2.a2.a2.a1));
7844
+ return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29($50, createdAt => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_array($78 => Language_JSON_Accessors_string($78), $18.a2.a2.a2.a2.a1), reviewers => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_string($18.a2.a2.a2.a2.a2.a1), headRef => ({h: 1, a1: {a1: number, a2: createdAt, a3: author, a4: state, a5: reviewers, a6: headRef}}))));
7601
7845
  };
7602
- return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29($28, $4b);
7846
+ return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29($2b, $4e);
7603
7847
  };
7604
- return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_string($16.a2.a1), $26);
7848
+ return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_string($18.a2.a1), $29);
7605
7849
  };
7606
- return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_integer($16.a1), $21);
7850
+ return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_integer($18.a1), $24);
7607
7851
  };
7608
- return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_lookupAll({a1: 'pull_number', a2: {a1: 'author', a2: {a1: 'state', a2: {a1: 'created_at', a2: {a1: 'reviewers', a2: {h: 0}}}}}}, pr), $15);
7852
+ return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_lookupAll({a1: 'pull_number', a2: {a1: 'author', a2: {a1: 'state', a2: {a1: 'created_at', a2: {a1: 'reviewers', a2: {a1: 'head_ref', a2: {h: 0}}}}}}}, pr), $17);
7609
7853
  };
7610
7854
  return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_object($0), $5);
7611
7855
  }
@@ -7615,14 +7859,14 @@ function Data_PullRequest_parseDateTime($0) {
7615
7859
  }
7616
7860
 
7617
7861
  function Data_PullRequest_isRequestedReviewer($0, $1) {
7618
- return Prelude_Interfaces_any(csegen_104(), $6 => Prelude_EqOrd_x3dx3d_Eq_String($6, $0), $1.a5);
7862
+ return Prelude_Interfaces_any(csegen_77(), $6 => Prelude_EqOrd_x3dx3d_Eq_String($6, $0), $1.a5);
7619
7863
  }
7620
7864
 
7621
7865
  function Data_PullRequest_isAuthor($0, $1) {
7622
7866
  return Prelude_EqOrd_x3dx3d_Eq_String($1.a3, $0);
7623
7867
  }
7624
7868
 
7625
- function FFI_Git_case__remoteTrackingBranch_1696($0, $1, $2) {
7869
+ function FFI_Git_case__remoteTrackingBranch_1746($0, $1, $2) {
7626
7870
  switch($1) {
7627
7871
  case '': {
7628
7872
  switch($2.h) {
@@ -7634,12 +7878,16 @@ function FFI_Git_case__remoteTrackingBranch_1696($0, $1, $2) {
7634
7878
  }
7635
7879
  }
7636
7880
 
7881
+ function FFI_Git_userEmail($0, $1, $2) {
7882
+ return FFI_promiseIO($5 => $6 => $7 => FFI_Git_prim__userEmail($0, $5, $6, $7), $1, $2);
7883
+ }
7884
+
7637
7885
  function FFI_Git_remoteURI($0, $1, $2, $3) {
7638
7886
  return FFI_promiseIO($6 => $7 => $8 => FFI_Git_prim__remoteURI($0, $1, $6, $7, $8), $2, $3);
7639
7887
  }
7640
7888
 
7641
7889
  function FFI_Git_remoteTrackingBranch($0, $1, $2) {
7642
- return Data_Promise_x3ex3ex3d_Monad_Promise($5 => $6 => FFI_promiseIO($9 => $a => $b => FFI_Git_prim__remoteTrackingBranch($0, $9, $a, $b), $5, $6), str => $14 => $15 => Data_Promise_pure_Applicative_Promise(FFI_Git_case__remoteTrackingBranch_1696($0, str, Data_String_strM(str)), $14, $15), $1, $2);
7890
+ return Data_Promise_x3ex3ex3d_Monad_Promise($5 => $6 => FFI_promiseIO($9 => $a => $b => FFI_Git_prim__remoteTrackingBranch($0, $9, $a, $b), $5, $6), str => $14 => $15 => Data_Promise_pure_Applicative_Promise(FFI_Git_case__remoteTrackingBranch_1746($0, str, Data_String_strM(str)), $14, $15), $1, $2);
7643
7891
  }
7644
7892
 
7645
7893
  function FFI_Git_pushNewBranch($0, $1, $2, $3, $4) {
@@ -7654,7 +7902,11 @@ function FFI_Git_currentBranch($0, $1, $2) {
7654
7902
  return FFI_promiseIO($5 => $6 => $7 => FFI_Git_prim__currentBranch($0, $5, $6, $7), $1, $2);
7655
7903
  }
7656
7904
 
7657
- function FFI_Concurrency_n__3749_4144_both($0, $1, $2, $3, $4) {
7905
+ function FFI_Git_checkoutBranch($0, $1, $2, $3) {
7906
+ return Data_Promise_map_Functor_Promise($6 => (undefined), $8 => $9 => FFI_promiseIO($c => $d => $e => FFI_Git_prim__checkoutBranch($0, $1, $c, $d, $e), $8, $9), $2, $3);
7907
+ }
7908
+
7909
+ function FFI_Concurrency_n__3897_7062_both($0, $1, $2, $3, $4) {
7658
7910
  return $0.a1.a2(undefined)(undefined)($0.a2(undefined)($13 => FFI_Concurrency_prim__singleton($3, $13)))(xx27 => $0.a1.a2(undefined)(undefined)($0.a1.a2(undefined)(undefined)($4)($2b => $0.a2(undefined)($31 => FFI_Concurrency_prim__both(xx27, $2b, $31))))(nested => $0.a2(undefined)($3c => FFI_Concurrency_prim__flatten(nested, $3c))));
7659
7911
  }
7660
7912
 
@@ -7664,14 +7916,14 @@ function FFI_Concurrency_promiseAll($0, $1, $2, $3) {
7664
7916
  const $3c = $3d => $3e => $3f => {
7665
7917
  switch($3d.h) {
7666
7918
  case 4: return Data_Promise_pure_Applicative_Promise($3d.a1, $3e, $3f);
7667
- default: return Data_Promise_reject(Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: 'Expected a JSON array from futures but got ', a2: {a1: Language_JSON_Data_show_Show_JSON($3d), a2: {a1: '.', a2: {h: 0}}}}), $3e, $3f);
7919
+ default: return Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Expected a JSON array from futures but got ', a2: {a1: Language_JSON_Data_show_Show_JSON($3d), a2: {a1: '.', a2: {h: 0}}}}), $3e, $3f);
7668
7920
  }
7669
7921
  };
7670
- return Data_Promise_x3ex3ex3d_Monad_Promise($25 => $26 => Data_Promise_either(csegen_107(), Data_Either_maybeToEither(() => Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: 'Failed to parse JSON from ', a2: {a1: str, a2: {h: 0}}}), Language_JSON_parse(str)), $25, $26), $3c, $21, $22);
7922
+ return Data_Promise_x3ex3ex3d_Monad_Promise($25 => $26 => Data_Promise_either(csegen_115(), Data_Either_maybeToEither(() => Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Failed to parse JSON from ', a2: {a1: str, a2: {h: 0}}}), Language_JSON_parse(str)), $25, $26), $3c, $21, $22);
7671
7923
  };
7672
7924
  return Data_Promise_x3ex3ex3d_Monad_Promise($10 => $11 => Data_Promise_promisify(ok => err => $14 => FFI_Concurrency_prim__awaitStringify(f, x => ok(x), y => err(y), $14), $10, $11), $20, $c, $d);
7673
7925
  };
7674
- return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_Concurrency_all(csegen_20(), $0, $1), $b, $2, $3);
7926
+ return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_Concurrency_all(csegen_21(), $0, $1), $b, $2, $3);
7675
7927
  }
7676
7928
 
7677
7929
  function FFI_Concurrency_fork($0, $1) {
@@ -7679,26 +7931,26 @@ function FFI_Concurrency_fork($0, $1) {
7679
7931
  }
7680
7932
 
7681
7933
  function FFI_Concurrency_all($0, $1, $2) {
7682
- return $1.a1(undefined)(undefined)($c => $d => FFI_Concurrency_n__3749_4144_both($0, $1, $2, $c, $d))($0.a2(undefined)($1a => FFI_Concurrency_prim__neutral($1a)))($2);
7934
+ return $1.a1(undefined)(undefined)($c => $d => FFI_Concurrency_n__3897_7062_both($0, $1, $2, $c, $d))($0.a2(undefined)($1a => FFI_Concurrency_prim__neutral($1a)))($2);
7683
7935
  }
7684
7936
 
7685
- function Data_Pagination_with__metaPagesx27_4386($0, $1, $2, $3, $4, $5, $6) {
7937
+ function Data_Pagination_with__metaPagesx27_5846($0, $1, $2, $3, $4, $5, $6) {
7686
7938
  const $7 = $8 => Data_Pagination_divNatNZLemma($0, $1, $6);
7687
7939
  return Data_Pagination_pagesHelper(0n, $0, $3, $7(undefined), $5);
7688
7940
  }
7689
7941
 
7690
- function Data_Pagination_with__withx20blockx20inx20divNatNZLemma_4331($0, $1, $2, $3, $4, $5) {
7942
+ function Data_Pagination_with__withx20blockx20inx20divNatNZLemma_5787($0, $1, $2, $3, $4, $5) {
7691
7943
  return Prelude_Uninhabited_absurd($8 => $8, $3((Data_Nat_lteReflectsLTE(($0+1n), $1, $4)+1n)));
7692
7944
  }
7693
7945
 
7694
- function Data_Pagination_with__divNatNZLemma_4317($0, $1, $2, $3, $4, $5) {
7946
+ function Data_Pagination_with__divNatNZLemma_5769($0, $1, $2, $3, $4, $5) {
7695
7947
  switch($2) {
7696
7948
  case 0: return 1n;
7697
- case 1: return Data_Pagination_with__withx20blockx20inx20divNatNZLemma_4331($1, $0, $5, $c => Data_Nat_LTEImpliesNotGT($5, $c), $3, undefined);
7949
+ case 1: return Data_Pagination_with__withx20blockx20inx20divNatNZLemma_5787($1, $0, $5, $c => Data_Nat_LTEImpliesNotGT($5, $c), $3, undefined);
7698
7950
  }
7699
7951
  }
7700
7952
 
7701
- function Data_Pagination_with__pagesHelper_4159($0, $1, $2, $3, $4, $5) {
7953
+ function Data_Pagination_with__pagesHelper_5611($0, $1, $2, $3, $4, $5) {
7702
7954
  switch($2.h) {
7703
7955
  case 0: {
7704
7956
  const $7 = Data_Pagination_lemma($0, $1, $2.a1);
@@ -7708,16 +7960,16 @@ function Data_Pagination_with__pagesHelper_4159($0, $1, $2, $3, $4, $5) {
7708
7960
  }
7709
7961
  }
7710
7962
 
7711
- function Data_Pagination_with__nonTerminalPage_4131($0, $1, $2, $3, $4, $5, $6, $7) {
7712
- return {h: 0, a1: $7, a2: $1, a3: $0, a4: $6, a5: $5, a6: undefined, a7: Data_Pagination_pagesHelper(($7+1n), $0, $1, $5, $6)};
7963
+ function Data_Pagination_with__nonTerminalPage_5590($0, $1, $2, $3, $4, $5, $6, $7) {
7964
+ return {h: 0, a1: $7, a2: $1, a3: $0, a4: $5, a5: $6, a6: undefined, a7: Data_Pagination_pagesHelper(($7+1n), $0, $1, $6, $5)};
7713
7965
  }
7714
7966
 
7715
- function Data_Pagination_with__lemma_4035($0, $1, $2, $3, $4) {
7967
+ function Data_Pagination_with__lemma_5493($0, $1, $2, $3, $4) {
7716
7968
  return {a1: ($3.a1+1n), a2: {a1: undefined, a2: 1n}};
7717
7969
  }
7718
7970
 
7719
7971
  function Data_Pagination_toList_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($0) {
7720
- return Data_Pagination_foldr_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29(csegen_219(), {h: 0}, $0);
7972
+ return Data_Pagination_foldr_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29(csegen_192(), {h: 0}, $0);
7721
7973
  }
7722
7974
 
7723
7975
  function Data_Pagination_null_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($0) {
@@ -7732,7 +7984,7 @@ function Data_Pagination_foldr_Foldable_x28x28x28Paginationx20x24itemsx29x20x24p
7732
7984
  }
7733
7985
 
7734
7986
  function Data_Pagination_foldl_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($0, $1, $2) {
7735
- return Data_Pagination_foldr_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($6 => $7 => Prelude_Basics_flip(csegen_220(), $c => Prelude_Basics_flip($0, $6, $c), $7), $13 => $13, $2)($1);
7987
+ return Data_Pagination_foldr_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($6 => $7 => Prelude_Basics_flip(csegen_193(), $c => Prelude_Basics_flip($0, $6, $c), $7), $13 => $13, $2)($1);
7736
7988
  }
7737
7989
 
7738
7990
  function Data_Pagination_foldlM_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($0, $1, $2, $3) {
@@ -7751,15 +8003,15 @@ function Data_Pagination_traversex27($0, $1, $2) {
7751
8003
  }
7752
8004
 
7753
8005
  function Data_Pagination_pagesHelper($0, $1, $2, $3, $4) {
7754
- return Data_Pagination_with__pagesHelper_4159($2, $1, Data_Nat_isLT($2, $1), $3, $4, $0);
8006
+ return Data_Pagination_with__pagesHelper_5611($2, $1, Data_Nat_isLT($2, $1), $3, $4, $0);
7755
8007
  }
7756
8008
 
7757
8009
  function Data_Pagination_nonTerminalPage($0, $1, $2, $3, $4, $5) {
7758
- return Data_Pagination_with__nonTerminalPage_4131($0, $3, $2, undefined, undefined, $4, $5, $1);
8010
+ return Data_Pagination_with__nonTerminalPage_5590($0, $3, $2, undefined, undefined, $5, $4, $1);
7759
8011
  }
7760
8012
 
7761
8013
  function Data_Pagination_metaPagesx27($0, $1, $2, $3) {
7762
- return Data_Pagination_with__metaPagesx27_4386($0, $1, undefined, Data_Nat_divNatNZ($0, $1), undefined, $2, $3);
8014
+ return Data_Pagination_with__metaPagesx27_5846($0, $1, undefined, Data_Nat_divNatNZ($0, $1), undefined, $2, $3);
7763
8015
  }
7764
8016
 
7765
8017
  function Data_Pagination_metaPages($0, $1, $2, $3, $4) {
@@ -7779,7 +8031,7 @@ function Data_Pagination_lemma($0, $1, $2) {
7779
8031
  case 0n: _crashExp('Nat case not covered');
7780
8032
  default: {
7781
8033
  const $8 = ($2-1n);
7782
- return Data_Pagination_with__lemma_4035($0, $4, $8, Data_Pagination_lemmax27($0, $4, $8), $1);
8034
+ return Data_Pagination_with__lemma_5493($0, $4, $8, Data_Pagination_lemmax27($0, $4, $8), $1);
7783
8035
  }
7784
8036
  }
7785
8037
  }
@@ -7800,7 +8052,7 @@ function Data_Pagination_divNatNZLemma($0, $1, $2) {
7800
8052
  case 0n: _crashExp('Nat case not covered');
7801
8053
  default: {
7802
8054
  const $f = ($1-1n);
7803
- return Data_Pagination_with__divNatNZLemma_4317($f, $b, Data_Nat_lte(($b+1n), $f), undefined, undefined, $2);
8055
+ return Data_Pagination_with__divNatNZLemma_5769($f, $b, Data_Nat_lte(($b+1n), $f), undefined, undefined, $2);
7804
8056
  }
7805
8057
  }
7806
8058
  }
@@ -7824,7 +8076,7 @@ function System_getEnv($0, $1) {
7824
8076
  function System_getArgs($0) {
7825
8077
  const $12 = n => {
7826
8078
  switch(Prelude_EqOrd_x3e_Ord_Int(n, Number(_truncBigInt32(0n)))) {
7827
- case 1: return Prelude_Interfaces_for($0.a1.a1, {a1: b => a => func => $1e => Prelude_Types_map_Functor_List(func, $1e), a2: csegen_104(), a3: b => a => f => $25 => $26 => $27 => Prelude_Types_traverse_Traversable_List($25, $26, $27)}, Prelude_Types_rangeFromTo_Range_x24a({a1: {a1: csegen_508(), a2: $33 => $34 => Prelude_Num_div_Integral_Int($33, $34), a3: $39 => $3a => Prelude_Num_mod_Integral_Int($39, $3a)}, a2: {a1: csegen_287(), a2: {a1: csegen_508(), a2: $45 => _sub32s(0, $45), a3: $49 => $4a => _sub32s($49, $4a)}}}, 0, _sub32s(n, 1)), $52 => $0.a2(undefined)($58 => System_prim__getArg($52, $58)));
8079
+ case 1: return Prelude_Interfaces_for($0.a1.a1, {a1: b => a => func => $1e => Prelude_Types_map_Functor_List(func, $1e), a2: csegen_77(), a3: b => a => f => $25 => $26 => $27 => Prelude_Types_traverse_Traversable_List($25, $26, $27)}, Prelude_Types_rangeFromTo_Range_x24a({a1: {a1: csegen_513(), a2: $33 => $34 => Prelude_Num_div_Integral_Int($33, $34), a3: $39 => $3a => Prelude_Num_mod_Integral_Int($39, $3a)}, a2: {a1: csegen_260(), a2: {a1: csegen_513(), a2: $45 => _sub32s(0, $45), a3: $49 => $4a => _sub32s($49, $4a)}}}, 0, _sub32s(n, 1)), $52 => $0.a2(undefined)($58 => System_prim__getArg($52, $58)));
7828
8080
  case 0: return $0.a1.a1.a2(undefined)({h: 0});
7829
8081
  }
7830
8082
  };
@@ -7846,55 +8098,59 @@ function System_exitFailure($0) {
7846
8098
  return System_exitWith($0, {a1: 1, a2: undefined});
7847
8099
  }
7848
8100
 
7849
- function Help_n__3757_1016_subcommand($0, $1) {
7850
- return Help_n__3757_1015_maybeDecorate($0, $5 => Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(5), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($5)), $1);
8101
+ function Help_n__4274_1021_subcommand($0, $1) {
8102
+ return Help_n__4274_1019_maybeDecorate($0, $5 => Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(5), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($5)), $1);
7851
8103
  }
7852
8104
 
7853
- function Help_n__3757_1019_shell($0, $1) {
7854
- return Help_n__3757_1015_maybeDecorate($0, $5 => Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($5)), $1);
8105
+ function Help_n__4274_1024_shell($0, $1) {
8106
+ return Help_n__4274_1019_maybeDecorate($0, $5 => Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($5)), $1);
7855
8107
  }
7856
8108
 
7857
- function Help_n__3757_1015_maybeDecorate($0, $1, $2) {
8109
+ function Help_n__4274_1020_option($0, $1) {
8110
+ return Help_n__4274_1019_maybeDecorate($0, $5 => Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_bold(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($5)), $1);
8111
+ }
8112
+
8113
+ function Help_n__4274_1019_maybeDecorate($0, $1, $2) {
7858
8114
  switch($0) {
7859
8115
  case 1: return Text_PrettyPrint_Prettyprinter_Render_Terminal_renderString(Text_PrettyPrint_Prettyprinter_Doc_layoutPretty(Text_PrettyPrint_Prettyprinter_Doc_defaultLayoutOptions(), $1($2)));
7860
8116
  case 0: return $2;
7861
8117
  }
7862
8118
  }
7863
8119
 
7864
- function Help_n__3757_1018_heading($0, $1) {
7865
- return Help_n__3757_1015_maybeDecorate($0, $5 => Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_underline(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($5)), $1);
8120
+ function Help_n__4274_1023_heading($0, $1) {
8121
+ return Help_n__4274_1019_maybeDecorate($0, $5 => Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_underline(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($5)), $1);
7866
8122
  }
7867
8123
 
7868
- function Help_n__3757_1017_argument($0, $1) {
7869
- return Help_n__3757_1015_maybeDecorate($0, $5 => Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(4), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($5)), $1);
8124
+ function Help_n__4274_1022_argument($0, $1) {
8125
+ return Help_n__4274_1019_maybeDecorate($0, csegen_402(), $1);
7870
8126
  }
7871
8127
 
7872
8128
  function Help_help($0) {
7873
- return Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: 'harmony ', a2: {a1: Help_n__3757_1016_subcommand($0, '<subcommand>'), a2: {a1: '\n\n', a2: {a1: Help_n__3757_1018_heading($0, 'Subcommands'), a2: {a1: ':\n ', a2: {a1: Help_n__3757_1016_subcommand($0, 'help'), a2: {a1: '\n - Print help\n ', a2: {a1: Help_n__3757_1016_subcommand($0, 'version'), a2: {a1: '\n - Print version\n ', a2: {a1: Help_n__3757_1016_subcommand($0, 'config'), a2: {a1: ' {', a2: {a1: Help_n__3757_1017_argument($0, '<property>'), a2: {a1: '} [', a2: {a1: Help_n__3757_1017_argument($0, 'value'), a2: {a1: ']\n - Get or set the value of a configuration property. Not all properties\n can be set and read via this subcommand.\n ', a2: {a1: Help_n__3757_1017_argument($0, 'properties'), a2: {a1: ': ', a2: {a1: Data_String_Extra_join(', ', csegen_104(), Data_Config_settableProps()), a2: {a1: '.\n ', a2: {a1: Help_n__3757_1016_subcommand($0, 'sync'), a2: {a1: '\n - Synchronize local config with information from GitHub.\n ', a2: {a1: Help_n__3757_1016_subcommand($0, 'pr'), a2: {a1: '\n - Identify an existing PR or create a new one for the current branch.\n ', a2: {a1: Help_n__3757_1016_subcommand($0, 'contribute'), a2: {a1: '\n - Contribute to an open PR. Prints a URL. Prioritizes PRs you are\n requested to review but will also return other PRs.\n ', a2: {a1: Help_n__3757_1016_subcommand($0, 'reflect'), a2: {a1: '\n - Reflect on the current state of ones own PRs and review requests.\n ', a2: {a1: Help_n__3757_1016_subcommand($0, 'list'), a2: {a1: ' {', a2: {a1: Help_n__3757_1017_argument($0, '<team-slug>'), a2: {a1: '}\n - List the members of the given GitHub Team.\n ', a2: {a1: Help_n__3757_1016_subcommand($0, 'graph'), a2: {a1: ' {', a2: {a1: Help_n__3757_1017_argument($0, '<team-slug>'), a2: {a1: '}\n - Graph the relative review workload of the members of the given GitHub Team.\n ', a2: {a1: Help_n__3757_1016_subcommand($0, 'assign'), a2: {a1: ' {', a2: {a1: Help_n__3757_1017_argument($0, '<team-slug>'), a2: {a1: ' | ', a2: {a1: Help_n__3757_1017_argument($0, '+<user-login>'), a2: {a1: '} [...]\n - Assign the given team(s) and one lucky member from one of those teams\n to review the PR for the current branch.\n \n Also assign any users with logins specified. You specify these\n additional users by prefixing their logins with \'+\'.\n \n', a2: {a1: Help_n__3757_1018_heading($0, 'Bash Completion'), a2: {a1: ':\n You can set up bash completion by adding the following to your resource\n or bash profile:\n \n ', a2: {a1: Help_n__3757_1019_shell($0, 'eval \"$(harmony --bash-completion-script)\"'), a2: {a1: '\n \n Zsh users will also need to have the following in their resource or\n zsh profile before the above eval:\n \n ', a2: {a1: Help_n__3757_1019_shell($0, 'autoload -U +X compinit && compinit'), a2: {a1: '\n ', a2: {a1: Help_n__3757_1019_shell($0, 'autoload -U +X bashcompinit && bashcompinit'), a2: {a1: '\n ', a2: {h: 0}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}});
8129
+ return Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'harmony ', a2: {a1: Help_n__4274_1021_subcommand($0, '<subcommand>'), a2: {a1: '\n\n', a2: {a1: Help_n__4274_1023_heading($0, 'Subcommands'), a2: {a1: ':\n ', a2: {a1: Help_n__4274_1021_subcommand($0, 'help'), a2: {a1: '\n - Print help\n ', a2: {a1: Help_n__4274_1021_subcommand($0, 'version'), a2: {a1: '\n - Print version\n ', a2: {a1: Help_n__4274_1021_subcommand($0, 'config'), a2: {a1: ' {', a2: {a1: Help_n__4274_1022_argument($0, '<property>'), a2: {a1: '} [', a2: {a1: Help_n__4274_1022_argument($0, '<value>'), a2: {a1: ']\n - Get or set the value of a configuration property. Not all properties\n can be set and read via this subcommand.\n ', a2: {a1: Help_n__4274_1022_argument($0, 'properties'), a2: {a1: ': ', a2: {a1: Data_String_Extra_join(', ', csegen_77(), Prelude_Interfaces_x3cx24x3e(csegen_119(), $4b => Help_n__4274_1020_option($0, $4b), Data_Config_settableProps())), a2: {a1: '.\n ', a2: {a1: Help_n__4274_1021_subcommand($0, 'sync'), a2: {a1: '\n - Synchronize local config with information from GitHub.\n ', a2: {a1: Help_n__4274_1021_subcommand($0, 'branch'), a2: {a1: '\n - Print the GitHub URI for the currently checked out branch.\n ', a2: {a1: Help_n__4274_1021_subcommand($0, 'pr'), a2: {a1: '\n - Identify an existing PR or create a new one for the current branch.\n ', a2: {a1: Help_n__4274_1021_subcommand($0, 'contribute'), a2: {a1: ' [', a2: {a1: Help_n__4274_1022_argument($0, '-c/--checkout'), a2: {a1: '] [', a2: {a1: Help_n__4274_1022_argument($0, '-<num>'), a2: {a1: ']\n - Contribute to an open PR. Prints a URL. Prioritizes PRs you are\n requested to review but will also return other PRs.\n ', a2: {a1: Help_n__4274_1021_subcommand($0, 'whoami'), a2: {a1: '\n - Print information about the configured and authenticated user.\n ', a2: {a1: Help_n__4274_1021_subcommand($0, 'reflect'), a2: {a1: '\n - Reflect on the current state of ones own PRs and review requests.\n ', a2: {a1: Help_n__4274_1021_subcommand($0, 'list'), a2: {a1: ' {', a2: {a1: Help_n__4274_1022_argument($0, '<team-slug>'), a2: {a1: '}\n - List the members of the given GitHub Team.\n ', a2: {a1: Help_n__4274_1021_subcommand($0, 'graph'), a2: {a1: ' {', a2: {a1: Help_n__4274_1022_argument($0, '<team-slug>'), a2: {a1: '}\n - Graph the relative review workload of the members of the given GitHub Team.\n ', a2: {a1: Help_n__4274_1021_subcommand($0, 'assign'), a2: {a1: ' {', a2: {a1: Help_n__4274_1022_argument($0, '<team-slug>'), a2: {a1: ' | ', a2: {a1: Help_n__4274_1022_argument($0, '+<user-login>'), a2: {a1: '} [...]\n - Assign the given team(s) and one lucky member from one of those teams\n to review the PR for the current branch.\n \n Also assign any users with logins specified. You specify these\n additional users by prefixing their logins with \'+\'.\n \n', a2: {a1: Help_n__4274_1023_heading($0, 'Bash Completion'), a2: {a1: ':\n You can set up bash completion by adding the following to your resource\n or bash profile:\n \n ', a2: {a1: Help_n__4274_1024_shell($0, 'eval \"$(harmony --bash-completion-script)\"'), a2: {a1: '\n \n Zsh users will also need to have the following in their resource or\n zsh profile before the above eval:\n \n ', a2: {a1: Help_n__4274_1024_shell($0, 'autoload -U +X compinit && compinit'), a2: {a1: '\n ', a2: {a1: Help_n__4274_1024_shell($0, 'autoload -U +X bashcompinit && bashcompinit'), a2: {a1: '\n ', a2: {h: 0}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}});
7874
8130
  }
7875
8131
 
7876
- function Config_with__getConfig_4544($0, $1, $2, $3, $4) {
8132
+ function Config_with__getConfig_5595($0, $1, $2, $3, $4) {
7877
8133
  switch($1.h) {
7878
- case 0: return Data_Promise_reject(Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: $0, a2: {a1: ' cannot get read via `config` command.', a2: {h: 0}}}), $3, $4);
8134
+ case 0: return Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: $0, a2: {a1: ' cannot get read via `config` command.', a2: {h: 0}}}), $3, $4);
7879
8135
  case undefined: return Data_Promise_pure_Applicative_Promise($1.a1($2), $3, $4);
7880
8136
  }
7881
8137
  }
7882
8138
 
7883
- function Config_with__withx20blockx20inx20setConfig_4443($0, $1, $2, $3, $4, $5) {
8139
+ function Config_with__withx20blockx20inx20setConfig_5494($0, $1, $2, $3, $4, $5) {
7884
8140
  switch($3.h) {
7885
- case 0: return $7 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: $2, a2: {a1: ' is not a valid value for ', a2: {a1: $4, a2: {a1: '.', a2: {h: 0}}}}}), $5, $7);
8141
+ case 0: return $7 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: $2, a2: {a1: ' is not a valid value for ', a2: {a1: $4, a2: {a1: '.', a2: {h: 0}}}}}), $5, $7);
7886
8142
  case undefined: return $1a => Config_writeConfig($3.a1, $5, $1a);
7887
8143
  }
7888
8144
  }
7889
8145
 
7890
- function Config_with__setConfig_4415($0, $1, $2, $3) {
8146
+ function Config_with__setConfig_5466($0, $1, $2, $3) {
7891
8147
  switch($1.h) {
7892
- case 0: return $5 => $6 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: $0, a2: {a1: ' cannot be set via `config` command.', a2: {h: 0}}}), $5, $6);
7893
- case undefined: return $15 => Config_with__withx20blockx20inx20setConfig_4443($1.a1, $3, $2, $1.a1($3)($2), $0, $15);
8148
+ case 0: return $5 => $6 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: $0, a2: {a1: ' cannot be set via `config` command.', a2: {h: 0}}}), $5, $6);
8149
+ case undefined: return $15 => Config_with__withx20blockx20inx20setConfig_5494($1.a1, $3, $2, $1.a1($3)($2), $0, $15);
7894
8150
  }
7895
8151
  }
7896
8152
 
7897
- function Config_with__propSettersx2cparseBool_4221($0, $1) {
8153
+ function Config_with__propSettersx2cparseBool_5272($0, $1) {
7898
8154
  switch($1) {
7899
8155
  case 'yes': return {a1: 1};
7900
8156
  case 'true': return {a1: 1};
@@ -7904,14 +8160,14 @@ function Config_with__propSettersx2cparseBool_4221($0, $1) {
7904
8160
  }
7905
8161
  }
7906
8162
 
7907
- function Config_with__dropPrefixx27x2cdropx27_4037($0, $1, $2) {
8163
+ function Config_with__dropPrefixx27x2cdropx27_5088($0, $1, $2) {
7908
8164
  switch($2.h) {
7909
8165
  case 0: return {a1: $2.a1.a1};
7910
8166
  case 1: return {h: 0};
7911
8167
  }
7912
8168
  }
7913
8169
 
7914
- function Config_case__parseGitHubURIx2cparseSuffix_4097($0, $1, $2) {
8170
+ function Config_case__parseGitHubURIx2cparseSuffix_5148($0, $1, $2) {
7915
8171
  const $e = $f => {
7916
8172
  switch($f.h) {
7917
8173
  case undefined: {
@@ -7931,7 +8187,7 @@ function Config_case__parseGitHubURIx2cparseSuffix_4097($0, $1, $2) {
7931
8187
  return Prelude_Types_x3ex3ex3d_Monad_Maybe({a1: Data_String_split($9 => Prelude_EqOrd_x3dx3d_Eq_Char($9, '/'), $2.a1)}, $e);
7932
8188
  }
7933
8189
 
7934
- function Config_n__5368_4595_yesUnlessNo($0, $1, $2, $3, $4) {
8190
+ function Config_n__5884_5646_yesUnlessNo($0, $1, $2, $3, $4) {
7935
8191
  switch($4) {
7936
8192
  case 'n': return 0;
7937
8193
  case 'N': return 0;
@@ -7939,35 +8195,35 @@ function Config_n__5368_4595_yesUnlessNo($0, $1, $2, $3, $4) {
7939
8195
  }
7940
8196
  }
7941
8197
 
7942
- function Config_n__5012_4213_update($0, $1, $2, $3, $4) {
8198
+ function Config_n__5528_5264_update($0, $1, $2, $3, $4) {
7943
8199
  return $0(undefined)(undefined)($c => Prelude_Basics_flip($2, $3, $c))($1($4));
7944
8200
  }
7945
8201
 
7946
- function Config_n__5368_4597_repo($0, $1, $2, $3, $4) {
7947
- return Prelude_Types_map_Functor_Maybe(csegen_524(), $4);
8202
+ function Config_n__5884_5648_repo($0, $1, $2, $3, $4) {
8203
+ return Prelude_Types_map_Functor_Maybe(csegen_528(), $4);
7948
8204
  }
7949
8205
 
7950
- function Config_n__4880_4076_parseSuffix($0, $1) {
7951
- return Config_case__parseGitHubURIx2cparseSuffix_4097($0, $1, Data_String_break$($8 => Prelude_EqOrd_x3dx3d_Eq_Char($8, '.'), $1));
8206
+ function Config_n__5396_5127_parseSuffix($0, $1) {
8207
+ return Config_case__parseGitHubURIx2cparseSuffix_5148($0, $1, Data_String_break$($8 => Prelude_EqOrd_x3dx3d_Eq_Char($8, '.'), $1));
7952
8208
  }
7953
8209
 
7954
- function Config_n__4880_4078_parseSSH($0, $1) {
7955
- return Prelude_Interfaces_x3ex3dx3e(csegen_39(), $6 => Config_dropPrefixx27('git@github.com:', $6), $b => Config_n__4880_4076_parseSuffix($0, $b), $1);
8210
+ function Config_n__5396_5129_parseSSH($0, $1) {
8211
+ return Prelude_Interfaces_x3ex3dx3e(csegen_42(), $6 => Config_dropPrefixx27('git@github.com:', $6), $b => Config_n__5396_5127_parseSuffix($0, $b), $1);
7956
8212
  }
7957
8213
 
7958
- function Config_n__4880_4077_parseHTTPS($0, $1) {
7959
- return Prelude_Interfaces_x3ex3dx3e(csegen_39(), $6 => Config_dropPrefixx27('https://github/com/', $6), $b => Config_n__4880_4076_parseSuffix($0, $b), $1);
8214
+ function Config_n__5396_5128_parseHTTPS($0, $1) {
8215
+ return Prelude_Interfaces_x3ex3dx3e(csegen_42(), $6 => Config_dropPrefixx27('https://github/com/', $6), $b => Config_n__5396_5127_parseSuffix($0, $b), $1);
7960
8216
  }
7961
8217
 
7962
- function Config_n__5012_4212_parseBool($0) {
7963
- return Config_with__propSettersx2cparseBool_4221($0, Data_String_toLower($0));
8218
+ function Config_n__5528_5263_parseBool($0) {
8219
+ return Config_with__propSettersx2cparseBool_5272($0, Data_String_toLower($0));
7964
8220
  }
7965
8221
 
7966
- function Config_n__5368_4596_org($0, $1, $2, $3, $4) {
7967
- return Prelude_Types_map_Functor_Maybe(csegen_528(), $4);
8222
+ function Config_n__5884_5647_org($0, $1, $2, $3, $4) {
8223
+ return Prelude_Types_map_Functor_Maybe(csegen_532(), $4);
7968
8224
  }
7969
8225
 
7970
- function Config_n__5368_4594_orIfEmpty($0, $1, $2, $3, $4, $5) {
8226
+ function Config_n__5884_5645_orIfEmpty($0, $1, $2, $3, $4, $5) {
7971
8227
  switch($4.h) {
7972
8228
  case 0: return $5;
7973
8229
  case undefined: {
@@ -7979,20 +8235,20 @@ function Config_n__5368_4594_orIfEmpty($0, $1, $2, $3, $4, $5) {
7979
8235
  }
7980
8236
  }
7981
8237
 
7982
- function Config_n__4706_3911_oneDayAgo($0, $1, $2) {
8238
+ function Config_n__5222_4962_oneDayAgo($0, $1, $2) {
7983
8239
  return $2.a1.a2(undefined)(undefined)(System_time($2))(now => $2.a1.a1.a2(undefined)(Prelude_Cast_cast_Cast_Integer_Bits32((now-86400n))));
7984
8240
  }
7985
8241
 
7986
- function Config_n__5368_4598_enterForDefaultStr($0, $1, $2, $3, $4) {
7987
- return Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: ' (ENTER for default: ', a2: {a1: $4, a2: {a1: ')', a2: {h: 0}}}});
8242
+ function Config_n__5884_5649_enterForDefaultStr($0, $1, $2, $3, $4) {
8243
+ return Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: ' (ENTER for default: ', a2: {a1: $4, a2: {a1: ')', a2: {h: 0}}}});
7988
8244
  }
7989
8245
 
7990
- function Config_n__4833_4029_dropx27($0, $1) {
7991
- return Config_with__dropPrefixx27x2cdropx27_4037($0, $1, Data_List_PrefixSuffix_dropPrefix($8 => $9 => Decidable_Equality_decEq_DecEq_Char($8, $9), Prelude_Types_fastUnpack($0), $1));
8246
+ function Config_n__5349_5080_dropx27($0, $1) {
8247
+ return Config_with__dropPrefixx27x2cdropx27_5088($0, $1, Data_List_PrefixSuffix_dropPrefix($8 => $9 => Decidable_Equality_decEq_DecEq_Char($8, $9), Prelude_Types_fastUnpack($0), $1));
7992
8248
  }
7993
8249
 
7994
- function Config_n__5368_4599_defaultStr($0, $1, $2, $3, $4, $5) {
7995
- return Data_Maybe_fromMaybe(() => '', Prelude_Types_map_Functor_Maybe($b => Config_n__5368_4598_enterForDefaultStr($0, $1, $2, $3, $4($b)), $5));
8250
+ function Config_n__5884_5650_defaultStr($0, $1, $2, $3, $4, $5) {
8251
+ return Data_Maybe_fromMaybe(() => '', Prelude_Types_map_Functor_Maybe($b => Config_n__5884_5649_enterForDefaultStr($0, $1, $2, $3, $4($b)), $5));
7996
8252
  }
7997
8253
 
7998
8254
  function Config_show_Show_ConfigError($0) {
@@ -8006,10 +8262,10 @@ function Config_writeConfig($0, $1, $2) {
8006
8262
  const $12 = res => $13 => $14 => {
8007
8263
  switch(res.h) {
8008
8264
  case 1: return Data_Promise_pure_Applicative_Promise($0, $13, $14);
8009
- case 0: return Data_Promise_reject(Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: 'Failed to write updated config file to ', a2: {a1: Data_Config_rf__filepath($0), a2: {a1: ': ', a2: {a1: System_File_Error_show_Show_FileError(res.a1), a2: {a1: '.', a2: {h: 0}}}}}}), $13, $14);
8265
+ case 0: return Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Failed to write updated config file to ', a2: {a1: Data_Config_rf__filepath($0), a2: {a1: ': ', a2: {a1: System_File_Error_show_Show_FileError(res.a1), a2: {a1: '.', a2: {h: 0}}}}}}), $13, $14);
8010
8266
  }
8011
8267
  };
8012
- return Data_Promise_x3ex3ex3d_Monad_Promise(System_File_ReadWrite_writeFile(csegen_20(), Data_Config_rf__filepath($0), Language_JSON_Data_format(0n, 2n, Data_Config_json($0))), $12, $1, $2);
8268
+ return Data_Promise_x3ex3ex3d_Monad_Promise(System_File_ReadWrite_writeFile(csegen_21(), Data_Config_rf__filepath($0), Language_JSON_Data_format(0n, 2n, Data_Config_json($0))), $12, $1, $2);
8013
8269
  }
8014
8270
 
8015
8271
  function Config_syncIfOld($0, $1, $2, $3) {
@@ -8019,7 +8275,7 @@ function Config_syncIfOld($0, $1, $2, $3) {
8019
8275
  case 0: return $1a => Data_Promise_pure_Applicative_Promise($1, $d, $1a);
8020
8276
  }
8021
8277
  };
8022
- return Data_Promise_x3ex3ex3d_Monad_Promise(Config_n__4706_3911_oneDayAgo($0, $1, csegen_20()), $b, $2, $3);
8278
+ return Data_Promise_x3ex3ex3d_Monad_Promise(Config_n__5222_4962_oneDayAgo($0, $1, csegen_21()), $b, $2, $3);
8023
8279
  }
8024
8280
 
8025
8281
  function Config_syncConfig($0, $1, $2, $3, $4) {
@@ -8027,9 +8283,9 @@ function Config_syncConfig($0, $1, $2, $3, $4) {
8027
8283
  const $14 = orgMembers => $15 => $16 => {
8028
8284
  const $1a = updatedAt => {
8029
8285
  const $1b = {a1: updatedAt, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5, a6: $0.a6, a7: teamSlugs, a8: orgMembers, a9: $0.a9};
8030
- return Prelude_Interfaces_x3ex3e(csegen_17(), $2a => $2b => Data_Promise_map_Functor_Promise($2e => (undefined), $30 => $31 => Config_writeConfig($1b, $30, $31), $2a, $2b), () => Prelude_Interfaces_x3ex3e(csegen_17(), Prelude_Interfaces_when(csegen_11(), $2, () => Prelude_Interfaces_x3ex3e(csegen_17(), Prelude_IO_putStrLn(csegen_20(), 'Your updated configuration is:'), () => Prelude_IO_printLn(csegen_535(), $0))), () => $50 => $51 => Data_Promise_pure_Applicative_Promise($1b, $50, $51)));
8286
+ return Prelude_Interfaces_x3ex3e(csegen_15(), $2a => $2b => Data_Promise_map_Functor_Promise($2e => (undefined), $30 => $31 => Config_writeConfig($1b, $30, $31), $2a, $2b), () => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_Interfaces_when(csegen_9(), $2, () => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStrLn(csegen_21(), 'Your updated configuration is:'), () => Prelude_IO_printLn(csegen_539(), $0))), () => $50 => $51 => Data_Promise_pure_Applicative_Promise($1b, $50, $51)));
8031
8287
  };
8032
- return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_531(), $1a, $15, $16);
8288
+ return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_535(), $1a, $15, $16);
8033
8289
  };
8034
8290
  return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listOrgMembers($1, $0.a2), $14, $c, $d);
8035
8291
  };
@@ -8037,11 +8293,11 @@ function Config_syncConfig($0, $1, $2, $3, $4) {
8037
8293
  }
8038
8294
 
8039
8295
  function Config_setConfig($0, $1, $2) {
8040
- return Config_with__setConfig_4415($1, Data_List_lookup(csegen_71(), $1, Config_propSetters()), $2, $0);
8296
+ return Config_with__setConfig_5466($1, Data_List_lookup(csegen_94(), $1, Config_propSetters()), $2, $0);
8041
8297
  }
8042
8298
 
8043
8299
  const Config_propSetters = __lazy(function () {
8044
- return {a1: {a1: 'assignTeams', a2: $3 => $4 => Config_n__5012_4213_update(csegen_161(), $9 => Config_n__5012_4212_parseBool($9), b => $d => ({a1: $d.a1, a2: $d.a2, a3: $d.a3, a4: $d.a4, a5: b, a6: $d.a6, a7: $d.a7, a8: $d.a8, a9: $d.a9}), $3, $4)}, a2: {a1: {a1: 'commentOnAssign', a2: $1e => $1f => Config_n__5012_4213_update(csegen_161(), $24 => Config_n__5012_4212_parseBool($24), b => $28 => ({a1: $28.a1, a2: $28.a2, a3: $28.a3, a4: $28.a4, a5: $28.a5, a6: b, a7: $28.a7, a8: $28.a8, a9: $28.a9}), $1e, $1f)}, a2: {h: 0}}};
8300
+ return {a1: {a1: 'assignTeams', a2: $3 => $4 => Config_n__5528_5264_update(csegen_18(), $9 => Config_n__5528_5263_parseBool($9), b => $d => ({a1: $d.a1, a2: $d.a2, a3: $d.a3, a4: $d.a4, a5: b, a6: $d.a6, a7: $d.a7, a8: $d.a8, a9: $d.a9}), $3, $4)}, a2: {a1: {a1: 'commentOnAssign', a2: $1e => $1f => Config_n__5528_5264_update(csegen_18(), $24 => Config_n__5528_5263_parseBool($24), b => $28 => ({a1: $28.a1, a2: $28.a2, a3: $28.a3, a4: $28.a4, a5: $28.a5, a6: b, a7: $28.a7, a8: $28.a8, a9: $28.a9}), $1e, $1f)}, a2: {h: 0}}};
8045
8301
  });
8046
8302
 
8047
8303
  const Config_propGetters = __lazy(function () {
@@ -8049,7 +8305,7 @@ const Config_propGetters = __lazy(function () {
8049
8305
  });
8050
8306
 
8051
8307
  function Config_parseGitHubURI($0) {
8052
- return Prelude_Types_x3cx7cx3e_Alternative_Maybe(Config_n__4880_4077_parseHTTPS($0, $0), () => Config_n__4880_4078_parseSSH($0, $0));
8308
+ return Prelude_Types_x3cx7cx3e_Alternative_Maybe(Config_n__5396_5128_parseHTTPS($0, $0), () => Config_n__5396_5129_parseSSH($0, $0));
8053
8309
  }
8054
8310
 
8055
8311
  function Config_loadOrCreateConfig($0, $1, $2, $3, $4, $5) {
@@ -8061,15 +8317,15 @@ function Config_loadOrCreateConfig($0, $1, $2, $3, $4, $5) {
8061
8317
  case 0: {
8062
8318
  switch($e.a1.a1.h) {
8063
8319
  case 3: return Config_createConfig($0, $1, $2, $3);
8064
- default: return $1d => $1e => Data_Promise_reject(Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: 'Error loading ', a2: {a1: Data_Config_filename(), a2: {a1: ': ', a2: {a1: Config_show_Show_ConfigError($e.a1), a2: {a1: '.', a2: {h: 0}}}}}}), $1d, $1e);
8320
+ default: return $1d => $1e => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Error loading ', a2: {a1: Data_Config_filename(), a2: {a1: ': ', a2: {a1: Config_show_Show_ConfigError($e.a1), a2: {a1: '.', a2: {h: 0}}}}}}), $1d, $1e);
8065
8321
  }
8066
8322
  }
8067
- default: return $36 => $37 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: 'Error loading ', a2: {a1: Data_Config_filename(), a2: {a1: ': ', a2: {a1: Config_show_Show_ConfigError($e.a1), a2: {a1: '.', a2: {h: 0}}}}}}), $36, $37);
8323
+ default: return $36 => $37 => Data_Promise_reject(Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Error loading ', a2: {a1: Data_Config_filename(), a2: {a1: ': ', a2: {a1: Config_show_Show_ConfigError($e.a1), a2: {a1: '.', a2: {h: 0}}}}}}), $36, $37);
8068
8324
  }
8069
8325
  }
8070
8326
  }
8071
8327
  };
8072
- return Data_Promise_x3ex3ex3d_Monad_Promise(Config_loadConfig(csegen_20(), $2, $3), $d, $4, $5);
8328
+ return Data_Promise_x3ex3ex3d_Monad_Promise(Config_loadConfig(csegen_21(), $2, $3), $d, $4, $5);
8073
8329
  }
8074
8330
 
8075
8331
  function Config_loadConfig($0, $1, $2) {
@@ -8092,14 +8348,14 @@ function Config_loadConfig($0, $1, $2) {
8092
8348
  }
8093
8349
  };
8094
8350
  const $a = {a1: $b, a2: a => $13 => ({h: 1, a1: $13}), a3: $15};
8095
- const $9 = {a1: $a, a2: csegen_271(), a3: csegen_272()};
8351
+ const $9 = {a1: $a, a2: csegen_244(), a3: csegen_245()};
8096
8352
  const $24 = b => a => func => $25 => {
8097
8353
  switch($25.h) {
8098
8354
  case 0: return {h: 0, a1: $25.a1};
8099
8355
  case 1: return {h: 1, a1: func($25.a1)};
8100
8356
  }
8101
8357
  };
8102
- const $23 = {a1: $24, a2: csegen_450(), a3: csegen_454()};
8358
+ const $23 = {a1: $24, a2: csegen_454(), a3: csegen_458()};
8103
8359
  return Prelude_Interfaces_Monad_x3ex3ex3d_Monad_Composex28x28x2ex20x24mx29x20x24tx29($0.a1, $9, $23, $4, $5);
8104
8360
  };
8105
8361
  const $39 = $3a => {
@@ -8141,18 +8397,18 @@ function Config_loadConfig($0, $1, $2) {
8141
8397
  }
8142
8398
 
8143
8399
  function Config_getConfig($0, $1, $2) {
8144
- return $3 => Config_with__getConfig_4544($1, Data_List_lookup(csegen_71(), $1, Config_propGetters()), $0, $2, $3);
8400
+ return $3 => Config_with__getConfig_5595($1, Data_List_lookup(csegen_94(), $1, Config_propGetters()), $0, $2, $3);
8145
8401
  }
8146
8402
 
8147
8403
  function Config_findConfig($0, $1, $2) {
8148
8404
  switch($2.h) {
8149
8405
  case 0: return $0.a1.a1.a2(undefined)({h: 0});
8150
8406
  case undefined: {
8151
- const $b = Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: $1, a2: {a1: '/', a2: {a1: Data_Config_filename(), a2: {h: 0}}}});
8407
+ const $b = Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: $1, a2: {a1: '/', a2: {a1: Data_Config_filename(), a2: {h: 0}}}});
8152
8408
  const $25 = $26 => {
8153
8409
  switch($26) {
8154
8410
  case 1: return $0.a1.a1.a2(undefined)({a1: $b});
8155
- case 0: return Config_findConfig($0, Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: $1, a2: {a1: '/..', a2: {h: 0}}}), $2.a1());
8411
+ case 0: return Config_findConfig($0, Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: $1, a2: {a1: '/..', a2: {h: 0}}}), $2.a1());
8156
8412
  }
8157
8413
  };
8158
8414
  return $0.a1.a2(undefined)(undefined)(System_File_Meta_exists($0, $b))($25);
@@ -8161,54 +8417,54 @@ function Config_findConfig($0, $1, $2) {
8161
8417
  }
8162
8418
 
8163
8419
  function Config_dropPrefixx27($0, $1) {
8164
- return Prelude_Types_map_Functor_Maybe($4 => Prelude_Types_fastPack($4), Config_n__4833_4029_dropx27($0, Prelude_Types_fastUnpack($1)));
8420
+ return Prelude_Types_map_Functor_Maybe($4 => Prelude_Types_fastPack($4), Config_n__5349_5080_dropx27($0, Prelude_Types_fastUnpack($1)));
8165
8421
  }
8166
8422
 
8167
8423
  function Config_createConfig($0, $1, $2, $3) {
8168
- return Prelude_Interfaces_x3ex3e(csegen_17(), Prelude_IO_putStrLn(csegen_20(), Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: 'Creating a new configuration (storing in ', a2: {a1: Data_Config_filename(), a2: {a1: ')...', a2: {h: 0}}}})), () => $1a => $1b => {
8424
+ return Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStrLn(csegen_21(), Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Creating a new configuration (storing in ', a2: {a1: Data_Config_filename(), a2: {a1: ')...', a2: {h: 0}}}})), () => $1a => $1b => {
8169
8425
  const $3a = defaultOrgAndRepo => {
8170
- const $3b = Config_n__5368_4599_defaultStr($0, $1, $3, $2, csegen_528(), defaultOrgAndRepo);
8171
- return Prelude_Interfaces_x3ex3e(csegen_17(), Prelude_IO_putStrLn(csegen_20(), Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: 'What GitHub org would you like to use harmony for', a2: {a1: $3b, a2: {a1: '?', a2: {h: 0}}}})), () => $59 => $5a => {
8426
+ const $3b = Config_n__5884_5650_defaultStr($0, $1, $3, $2, csegen_532(), defaultOrgAndRepo);
8427
+ return Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStrLn(csegen_21(), Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'What GitHub org would you like to use harmony for', a2: {a1: $3b, a2: {a1: '?', a2: {h: 0}}}})), () => $59 => $5a => {
8172
8428
  const $73 = org => {
8173
- const $74 = Config_n__5368_4599_defaultStr($0, $1, $3, $2, csegen_524(), defaultOrgAndRepo);
8174
- return Prelude_Interfaces_x3ex3e(csegen_17(), Prelude_IO_putStrLn(csegen_20(), Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: 'What repository would you like to use harmony for', a2: {a1: $74, a2: {a1: '?', a2: {h: 0}}}})), () => $92 => $93 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_80(), $9a => Config_n__5368_4594_orIfEmpty($0, $1, $3, $2, Config_n__5368_4597_repo($0, $1, $3, $2, defaultOrgAndRepo), Data_String_trim($9a)), csegen_400()), repo => Prelude_Interfaces_x3ex3e(csegen_17(), Prelude_IO_putStr(csegen_20(), 'Would you like harmony to comment when it assigns reviewers? [Y/n] '), () => $b6 => $b7 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_80(), $be => Config_n__5368_4595_yesUnlessNo($0, $1, $3, $2, Data_String_trim($be)), csegen_400()), commentOnAssign => Prelude_Interfaces_x3ex3e(csegen_17(), Prelude_IO_putStr(csegen_20(), 'Would you like harmony to assign teams in addition to individuals when it assigns reviewers? [Y/n] '), () => $d3 => $d4 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_80(), $db => Config_n__5368_4595_yesUnlessNo($0, $1, $3, $2, Data_String_trim($db)), csegen_400()), assignTeams => Prelude_Interfaces_x3ex3e(csegen_17(), Prelude_IO_putStrLn(csegen_20(), 'Creating config...'), () => $f0 => $f1 => {
8429
+ const $74 = Config_n__5884_5650_defaultStr($0, $1, $3, $2, csegen_528(), defaultOrgAndRepo);
8430
+ return Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStrLn(csegen_21(), Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'What repository would you like to use harmony for', a2: {a1: $74, a2: {a1: '?', a2: {h: 0}}}})), () => $92 => $93 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_103(), $9a => Config_n__5884_5645_orIfEmpty($0, $1, $3, $2, Config_n__5884_5648_repo($0, $1, $3, $2, defaultOrgAndRepo), Data_String_trim($9a)), csegen_404()), repo => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStr(csegen_21(), 'Would you like harmony to comment when it assigns reviewers? [Y/n] '), () => $b6 => $b7 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_103(), $be => Config_n__5884_5646_yesUnlessNo($0, $1, $3, $2, Data_String_trim($be)), csegen_404()), commentOnAssign => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStr(csegen_21(), 'Would you like harmony to assign teams in addition to individuals when it assigns reviewers? [Y/n] '), () => $d3 => $d4 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_103(), $db => Config_n__5884_5646_yesUnlessNo($0, $1, $3, $2, Data_String_trim($db)), csegen_404()), assignTeams => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStrLn(csegen_21(), 'Creating config...'), () => $f0 => $f1 => {
8175
8431
  const $fc = mainBranch => $fd => $fe => {
8176
8432
  const $102 = updatedAt => {
8177
- const $103 = {a1: Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: './', a2: {a1: Data_Config_filename(), a2: {h: 0}}}), a2: $2, a3: $3};
8433
+ const $103 = {a1: Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: './', a2: {a1: Data_Config_filename(), a2: {h: 0}}}), a2: $2, a3: $3};
8178
8434
  return $112 => $113 => {
8179
8435
  const $119 = teamSlugs => $11a => $11b => {
8180
8436
  const $121 = orgMembers => {
8181
8437
  const $122 = {a1: updatedAt, a2: org, a3: repo, a4: mainBranch, a5: assignTeams, a6: commentOnAssign, a7: teamSlugs, a8: orgMembers, a9: $103};
8182
- return Prelude_Interfaces_x3ex3e(csegen_17(), $130 => $131 => Data_Promise_map_Functor_Promise($134 => (undefined), $136 => $137 => Config_writeConfig($122, $136, $137), $130, $131), () => Prelude_Interfaces_x3ex3e(csegen_17(), Prelude_IO_putStrLn(csegen_20(), 'Your new configuration is:'), () => Prelude_Interfaces_x3ex3e(csegen_17(), Prelude_IO_printLn(csegen_535(), $122), () => $151 => $152 => Data_Promise_pure_Applicative_Promise($122, $151, $152))));
8438
+ return Prelude_Interfaces_x3ex3e(csegen_15(), $130 => $131 => Data_Promise_map_Functor_Promise($134 => (undefined), $136 => $137 => Config_writeConfig($122, $136, $137), $130, $131), () => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_putStrLn(csegen_21(), 'Your new configuration is:'), () => Prelude_Interfaces_x3ex3e(csegen_15(), Prelude_IO_printLn(csegen_539(), $122), () => $151 => $152 => Data_Promise_pure_Applicative_Promise($122, $151, $152))));
8183
8439
  };
8184
8440
  return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listOrgMembers($1, org), $121, $11a, $11b);
8185
8441
  };
8186
8442
  return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listTeams($1, org), $119, $112, $113);
8187
8443
  };
8188
8444
  };
8189
- return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_531(), $102, $fd, $fe);
8445
+ return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_535(), $102, $fd, $fe);
8190
8446
  };
8191
8447
  return Data_Promise_x3ex3ex3d_Monad_Promise($f4 => $f5 => FFI_GitHub_getRepoDefaultBranch($1, org, repo, $f4, $f5), $fc, $f0, $f1);
8192
8448
  }), $d3, $d4)), $b6, $b7)), $92, $93));
8193
8449
  };
8194
- return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_80(), $61 => Config_n__5368_4594_orIfEmpty($0, $1, $3, $2, Config_n__5368_4596_org($0, $1, $3, $2, defaultOrgAndRepo), Data_String_trim($61)), csegen_400()), $73, $59, $5a);
8450
+ return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_103(), $61 => Config_n__5884_5645_orIfEmpty($0, $1, $3, $2, Config_n__5884_5647_org($0, $1, $3, $2, defaultOrgAndRepo), Data_String_trim($61)), csegen_404()), $73, $59, $5a);
8195
8451
  });
8196
8452
  };
8197
- return Data_Promise_x3ex3ex3d_Monad_Promise($1e => $1f => Data_Promise_x3cx7cx3e_Alternative_Promise(Prelude_Interfaces_x3cx24x3e(csegen_80(), $26 => Config_parseGitHubURI($26), $2a => $2b => FFI_Git_remoteURI($0, 'origin', $2a, $2b)), () => $32 => $33 => Data_Promise_pure_Applicative_Promise({h: 0}, $32, $33), $1e, $1f), $3a, $1a, $1b);
8453
+ return Data_Promise_x3ex3ex3d_Monad_Promise($1e => $1f => Data_Promise_x3cx7cx3e_Alternative_Promise(Prelude_Interfaces_x3cx24x3e(csegen_103(), $26 => Config_parseGitHubURI($26), $2a => $2b => FFI_Git_remoteURI($0, 'origin', $2a, $2b)), () => $32 => $33 => Data_Promise_pure_Applicative_Promise({h: 0}, $32, $33), $1e, $1f), $3a, $1a, $1b);
8198
8454
  });
8199
8455
  }
8200
8456
 
8201
- function Data_List_PrefixSuffix_with__withx20blockx20inx20dropPrefix_1581($0, $1, $2, $3, $4, $5) {
8457
+ function Data_List_PrefixSuffix_with__withx20blockx20inx20dropPrefix_3662($0, $1, $2, $3, $4, $5) {
8202
8458
  switch($4.h) {
8203
8459
  case 1: return {h: 1, a1: $8 => $4.a1({a1: $8.a1, a2: Builtin_snd(Data_List_PrefixSuffix_prefixSuffixConsInjective($8.a2))})};
8204
8460
  case 0: return {h: 0, a1: {a1: $4.a1.a1, a2: {a1: {a1: $5, a2: $3}, a2: $4.a1.a1}}};
8205
8461
  }
8206
8462
  }
8207
8463
 
8208
- function Data_List_PrefixSuffix_with__dropPrefix_1548($0, $1, $2, $3, $4, $5, $6) {
8464
+ function Data_List_PrefixSuffix_with__dropPrefix_3625($0, $1, $2, $3, $4, $5, $6) {
8209
8465
  switch($4.h) {
8210
8466
  case 1: return {h: 1, a1: $9 => Data_List_PrefixSuffix_prefixDifferentVoid($4.a1, $9)};
8211
- case 0: return Data_List_PrefixSuffix_with__withx20blockx20inx20dropPrefix_1581(undefined, $1, $6, $5, Data_List_PrefixSuffix_dropPrefix($1, $5, $6), $2);
8467
+ case 0: return Data_List_PrefixSuffix_with__withx20blockx20inx20dropPrefix_3662(undefined, $1, $6, $5, Data_List_PrefixSuffix_dropPrefix($1, $5, $6), $2);
8212
8468
  }
8213
8469
  }
8214
8470
 
@@ -8230,21 +8486,21 @@ function Data_List_PrefixSuffix_dropPrefix($0, $1, $2) {
8230
8486
  case undefined: {
8231
8487
  switch($2.h) {
8232
8488
  case 0: return {h: 1, a1: $b => Prelude_Uninhabited_absurd($f => Data_List_PrefixSuffix_uninhabited_Uninhabited_x28x28x28PrefixSuffixx20x28x28x3ax3ax20x24xx29x20x24xsx29x29x20x24suffixListx29x20Nilx29($f), $b.a2)};
8233
- case undefined: return Data_List_PrefixSuffix_with__dropPrefix_1548(undefined, $0, $1.a1, $2.a1, $0($1.a1)($2.a1), $1.a2, $2.a2);
8489
+ case undefined: return Data_List_PrefixSuffix_with__dropPrefix_3625(undefined, $0, $1.a1, $2.a1, $0($1.a1)($2.a1), $1.a2, $2.a2);
8234
8490
  }
8235
8491
  }
8236
8492
  }
8237
8493
  }
8238
8494
 
8239
- function BashCompletion_n__3159_1015_slugsOrLogins($0, $1, $2) {
8495
+ function BashCompletion_n__3745_1119_slugsOrLogins($0, $1, $2) {
8240
8496
  switch(Data_String_isPrefixOf('+', $1)) {
8241
- case 1: return Prelude_Interfaces_x3cx24x3e(csegen_111(), $b => ('+'+$b), $2.a8);
8497
+ case 1: return Prelude_Interfaces_x3cx24x3e(csegen_119(), $b => ('+'+$b), $2.a8);
8242
8498
  case 0: return $2.a7;
8243
8499
  }
8244
8500
  }
8245
8501
 
8246
8502
  const BashCompletion_script = __lazy(function () {
8247
- return Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: '_harmony()\n{\n ED=$([ -z $2 ] && echo \"--\" || echo $2)\n COMPREPLY=($(harmony --bash-completion $ED $3))\n}\n\ncomplete -F _harmony harmony', a2: {h: 0}});
8503
+ return Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: '_harmony()\n{\n ED=$([ -z $2 ] && echo \"--\" || echo \"$2\")\n COMPREPLY=($(harmony --bash-completion \"$ED\" \"$3\"))\n}\n\ncomplete -F _harmony harmony', a2: {h: 0}});
8248
8504
  });
8249
8505
 
8250
8506
  function BashCompletion_opts($0, $1, $2) {
@@ -8254,7 +8510,7 @@ function BashCompletion_opts($0, $1, $2) {
8254
8510
  case 'config': return Data_Config_settableProps();
8255
8511
  default: {
8256
8512
  switch($2) {
8257
- case 'config': return Data_List_filter($9 => Data_String_isPrefixOf($1, $9), Data_Config_settableProps());
8513
+ case 'config': return Prelude_Types_List_filter($9 => Data_String_isPrefixOf($1, $9), Data_Config_settableProps());
8258
8514
  default: {
8259
8515
  switch($1) {
8260
8516
  case '--': {
@@ -8262,11 +8518,11 @@ function BashCompletion_opts($0, $1, $2) {
8262
8518
  case 'list': return $0.a7;
8263
8519
  default: {
8264
8520
  switch($2) {
8265
- case 'list': return Data_List_filter($15 => Data_String_isPrefixOf($1, $15), $0.a7);
8521
+ case 'list': return Prelude_Types_List_filter($15 => Data_String_isPrefixOf($1, $15), $0.a7);
8266
8522
  default: {
8267
8523
  switch($1) {
8268
8524
  case '--': return $0.a7;
8269
- default: return Data_List_filter($1f => Data_String_isPrefixOf($1, $1f), BashCompletion_n__3159_1015_slugsOrLogins($2, $1, $0));
8525
+ default: return Prelude_Types_List_filter($1f => Data_String_isPrefixOf($1, $1f), BashCompletion_n__3745_1119_slugsOrLogins($2, $1, $0));
8270
8526
  }
8271
8527
  }
8272
8528
  }
@@ -8275,11 +8531,11 @@ function BashCompletion_opts($0, $1, $2) {
8275
8531
  }
8276
8532
  default: {
8277
8533
  switch($2) {
8278
- case 'list': return Data_List_filter($2b => Data_String_isPrefixOf($1, $2b), $0.a7);
8534
+ case 'list': return Prelude_Types_List_filter($2b => Data_String_isPrefixOf($1, $2b), $0.a7);
8279
8535
  default: {
8280
8536
  switch($1) {
8281
8537
  case '--': return $0.a7;
8282
- default: return Data_List_filter($35 => Data_String_isPrefixOf($1, $35), BashCompletion_n__3159_1015_slugsOrLogins($2, $1, $0));
8538
+ default: return Prelude_Types_List_filter($35 => Data_String_isPrefixOf($1, $35), BashCompletion_n__3745_1119_slugsOrLogins($2, $1, $0));
8283
8539
  }
8284
8540
  }
8285
8541
  }
@@ -8292,7 +8548,7 @@ function BashCompletion_opts($0, $1, $2) {
8292
8548
  }
8293
8549
  default: {
8294
8550
  switch($2) {
8295
- case 'config': return Data_List_filter($41 => Data_String_isPrefixOf($1, $41), Data_Config_settableProps());
8551
+ case 'config': return Prelude_Types_List_filter($41 => Data_String_isPrefixOf($1, $41), Data_Config_settableProps());
8296
8552
  default: {
8297
8553
  switch($1) {
8298
8554
  case '--': {
@@ -8300,11 +8556,11 @@ function BashCompletion_opts($0, $1, $2) {
8300
8556
  case 'list': return $0.a7;
8301
8557
  default: {
8302
8558
  switch($2) {
8303
- case 'list': return Data_List_filter($4d => Data_String_isPrefixOf($1, $4d), $0.a7);
8559
+ case 'list': return Prelude_Types_List_filter($4d => Data_String_isPrefixOf($1, $4d), $0.a7);
8304
8560
  default: {
8305
8561
  switch($1) {
8306
8562
  case '--': return $0.a7;
8307
- default: return Data_List_filter($57 => Data_String_isPrefixOf($1, $57), BashCompletion_n__3159_1015_slugsOrLogins($2, $1, $0));
8563
+ default: return Prelude_Types_List_filter($57 => Data_String_isPrefixOf($1, $57), BashCompletion_n__3745_1119_slugsOrLogins($2, $1, $0));
8308
8564
  }
8309
8565
  }
8310
8566
  }
@@ -8313,11 +8569,11 @@ function BashCompletion_opts($0, $1, $2) {
8313
8569
  }
8314
8570
  default: {
8315
8571
  switch($2) {
8316
- case 'list': return Data_List_filter($63 => Data_String_isPrefixOf($1, $63), $0.a7);
8572
+ case 'list': return Prelude_Types_List_filter($63 => Data_String_isPrefixOf($1, $63), $0.a7);
8317
8573
  default: {
8318
8574
  switch($1) {
8319
8575
  case '--': return $0.a7;
8320
- default: return Data_List_filter($6d => Data_String_isPrefixOf($1, $6d), BashCompletion_n__3159_1015_slugsOrLogins($2, $1, $0));
8576
+ default: return Prelude_Types_List_filter($6d => Data_String_isPrefixOf($1, $6d), BashCompletion_n__3745_1119_slugsOrLogins($2, $1, $0));
8321
8577
  }
8322
8578
  }
8323
8579
  }
@@ -8336,45 +8592,135 @@ function BashCompletion_cmdOpts($0, $1) {
8336
8592
  case 'harmony': return {a1: BashCompletion_allRootCmds()};
8337
8593
  default: {
8338
8594
  switch($1) {
8339
- case 'harmony': return {a1: Data_List_filter($a => Data_String_isPrefixOf($0, $a), BashCompletion_allRootCmds())};
8595
+ case 'harmony': return {a1: Prelude_Types_List_filter($a => Data_String_isPrefixOf($0, $a), BashCompletion_allRootCmds())};
8340
8596
  case 'pr': return {a1: {h: 0}};
8341
- case 'contribute': return {a1: {h: 0}};
8342
8597
  case 'sync': return {a1: {h: 0}};
8343
8598
  case 'help': return {a1: {h: 0}};
8344
8599
  case '--help': return {a1: {h: 0}};
8345
8600
  case 'reflect': return {a1: {h: 0}};
8346
8601
  case 'version': return {a1: {h: 0}};
8347
- default: return {h: 0};
8602
+ default: {
8603
+ switch($0) {
8604
+ case '-': {
8605
+ switch($1) {
8606
+ case 'contribute': return csegen_564();
8607
+ default: {
8608
+ switch($1) {
8609
+ case 'contribute': {
8610
+ switch(Data_String_isPrefixOf($0, '--checkout')) {
8611
+ case 1: return {a1: {a1: '--checkout', a2: {h: 0}}};
8612
+ case 0: return {a1: {h: 0}};
8613
+ }
8614
+ }
8615
+ default: return {h: 0};
8616
+ }
8617
+ }
8618
+ }
8619
+ }
8620
+ case '--': {
8621
+ switch($1) {
8622
+ case 'contribute': return csegen_564();
8623
+ default: {
8624
+ switch($1) {
8625
+ case 'contribute': {
8626
+ switch(Data_String_isPrefixOf($0, '--checkout')) {
8627
+ case 1: return {a1: {a1: '--checkout', a2: {h: 0}}};
8628
+ case 0: return {a1: {h: 0}};
8629
+ }
8630
+ }
8631
+ default: return {h: 0};
8632
+ }
8633
+ }
8634
+ }
8635
+ }
8636
+ default: {
8637
+ switch($1) {
8638
+ case 'contribute': {
8639
+ switch(Data_String_isPrefixOf($0, '--checkout')) {
8640
+ case 1: return {a1: {a1: '--checkout', a2: {h: 0}}};
8641
+ case 0: return {a1: {h: 0}};
8642
+ }
8643
+ }
8644
+ default: return {h: 0};
8645
+ }
8646
+ }
8647
+ }
8648
+ }
8348
8649
  }
8349
8650
  }
8350
8651
  }
8351
8652
  }
8352
8653
  default: {
8353
8654
  switch($1) {
8354
- case 'harmony': return {a1: Data_List_filter($1b => Data_String_isPrefixOf($0, $1b), BashCompletion_allRootCmds())};
8655
+ case 'harmony': return {a1: Prelude_Types_List_filter($3a => Data_String_isPrefixOf($0, $3a), BashCompletion_allRootCmds())};
8355
8656
  case 'pr': return {a1: {h: 0}};
8356
- case 'contribute': return {a1: {h: 0}};
8357
8657
  case 'sync': return {a1: {h: 0}};
8358
8658
  case 'help': return {a1: {h: 0}};
8359
8659
  case '--help': return {a1: {h: 0}};
8360
8660
  case 'reflect': return {a1: {h: 0}};
8361
8661
  case 'version': return {a1: {h: 0}};
8362
- default: return {h: 0};
8662
+ default: {
8663
+ switch($0) {
8664
+ case '-': {
8665
+ switch($1) {
8666
+ case 'contribute': return csegen_564();
8667
+ default: {
8668
+ switch($1) {
8669
+ case 'contribute': {
8670
+ switch(Data_String_isPrefixOf($0, '--checkout')) {
8671
+ case 1: return {a1: {a1: '--checkout', a2: {h: 0}}};
8672
+ case 0: return {a1: {h: 0}};
8673
+ }
8674
+ }
8675
+ default: return {h: 0};
8676
+ }
8677
+ }
8678
+ }
8679
+ }
8680
+ case '--': {
8681
+ switch($1) {
8682
+ case 'contribute': return csegen_564();
8683
+ default: {
8684
+ switch($1) {
8685
+ case 'contribute': {
8686
+ switch(Data_String_isPrefixOf($0, '--checkout')) {
8687
+ case 1: return {a1: {a1: '--checkout', a2: {h: 0}}};
8688
+ case 0: return {a1: {h: 0}};
8689
+ }
8690
+ }
8691
+ default: return {h: 0};
8692
+ }
8693
+ }
8694
+ }
8695
+ }
8696
+ default: {
8697
+ switch($1) {
8698
+ case 'contribute': {
8699
+ switch(Data_String_isPrefixOf($0, '--checkout')) {
8700
+ case 1: return {a1: {a1: '--checkout', a2: {h: 0}}};
8701
+ case 0: return {a1: {h: 0}};
8702
+ }
8703
+ }
8704
+ default: return {h: 0};
8705
+ }
8706
+ }
8707
+ }
8708
+ }
8363
8709
  }
8364
8710
  }
8365
8711
  }
8366
8712
  }
8367
8713
 
8368
8714
  const BashCompletion_allRootCmds = __lazy(function () {
8369
- return {a1: 'assign', a2: {a1: 'config', a2: {a1: 'contribute', a2: {a1: 'graph', a2: {a1: 'help', a2: {a1: 'list', a2: {a1: 'pr', a2: {a1: 'reflect', a2: {a1: 'sync', a2: {a1: 'version', a2: {h: 0}}}}}}}}}}};
8715
+ return {a1: 'assign', a2: {a1: 'branch', a2: {a1: 'config', a2: {a1: 'contribute', a2: {a1: 'graph', a2: {a1: 'help', a2: {a1: 'list', a2: {a1: 'pr', a2: {a1: 'reflect', a2: {a1: 'sync', a2: {a1: 'version', a2: {a1: 'whoami', a2: {h: 0}}}}}}}}}}}}};
8370
8716
  });
8371
8717
 
8372
8718
  function AppVersion_printVersion($0) {
8373
- return Prelude_IO_putStrLn($0, Prelude_Interfaces_concat(csegen_114(), csegen_104(), {a1: 'Harmony v', a2: {a1: AppVersion_appVersion(), a2: {h: 0}}}));
8719
+ return Prelude_IO_putStrLn($0, Prelude_Interfaces_concat(csegen_62(), csegen_77(), {a1: 'Harmony v', a2: {a1: AppVersion_appVersion(), a2: {h: 0}}}));
8374
8720
  }
8375
8721
 
8376
8722
  const AppVersion_appVersion = __lazy(function () {
8377
- return '0.5.0';
8723
+ return '0.7.1';
8378
8724
  });
8379
8725
 
8380
8726