@mattpolzin/harmony 4.0.1 → 4.1.0

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 (3) hide show
  1. package/README.md +2 -0
  2. package/harmony +320 -312
  3. package/package.json +1 -1
package/harmony CHANGED
@@ -871,7 +871,7 @@ function x24tcOpt_1($0) {
871
871
  case 0: return {h: 0 /* {TcDone:1} */, a1: $0.a5};
872
872
  default: {
873
873
  const $17 = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3};
874
- const $1b = Data_List_DeleteBy_deleteByx27($1e => $1f => Prelude_Basics_on($22 => $23 => $0.a1.a1.a1($22)($23), csegen_592(), $1e, $1f), $17, $0.a6);
874
+ const $1b = Data_List_DeleteBy_deleteByx27($1e => $1f => Prelude_Basics_on($22 => $23 => $0.a1.a1.a1($22)($23), csegen_595(), $1e, $1f), $17, $0.a6);
875
875
  switch($1b.a1.h) {
876
876
  case 0: /* nothing */ {
877
877
  switch($0.a8) {
@@ -886,7 +886,7 @@ function x24tcOpt_1($0) {
886
886
  }
887
887
  default: {
888
888
  const $6a = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3};
889
- const $6e = Data_List_DeleteBy_deleteByx27($71 => $72 => Prelude_Basics_on($75 => $76 => $0.a1.a1.a1($75)($76), csegen_592(), $71, $72), $6a, $0.a6);
889
+ const $6e = Data_List_DeleteBy_deleteByx27($71 => $72 => Prelude_Basics_on($75 => $76 => $0.a1.a1.a1($75)($76), csegen_595(), $71, $72), $6a, $0.a6);
890
890
  switch($6e.a1.h) {
891
891
  case 0: /* nothing */ {
892
892
  switch($0.a8) {
@@ -911,7 +911,7 @@ function x24tcOpt_1($0) {
911
911
  case 0: return {h: 0 /* {TcDone:1} */, a1: $0.a5};
912
912
  default: {
913
913
  const $c1 = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3};
914
- const $c5 = Data_List_DeleteBy_deleteByx27($c8 => $c9 => Prelude_Basics_on($cc => $cd => $0.a1.a1.a1($cc)($cd), csegen_592(), $c8, $c9), $c1, $0.a6);
914
+ const $c5 = Data_List_DeleteBy_deleteByx27($c8 => $c9 => Prelude_Basics_on($cc => $cd => $0.a1.a1.a1($cc)($cd), csegen_595(), $c8, $c9), $c1, $0.a6);
915
915
  switch($c5.a1.h) {
916
916
  case 0: /* nothing */ {
917
917
  switch($0.a8) {
@@ -926,7 +926,7 @@ function x24tcOpt_1($0) {
926
926
  }
927
927
  default: {
928
928
  const $114 = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3};
929
- const $118 = Data_List_DeleteBy_deleteByx27($11b => $11c => Prelude_Basics_on($11f => $120 => $0.a1.a1.a1($11f)($120), csegen_592(), $11b, $11c), $114, $0.a6);
929
+ const $118 = Data_List_DeleteBy_deleteByx27($11b => $11c => Prelude_Basics_on($11f => $120 => $0.a1.a1.a1($11f)($120), csegen_595(), $11b, $11c), $114, $0.a6);
930
930
  switch($118.a1.h) {
931
931
  case 0: /* nothing */ {
932
932
  switch($0.a8) {
@@ -1499,19 +1499,19 @@ function x24tcOpt_14($0) {
1499
1499
  switch($0.a7.a2.a1.a1.a1) {
1500
1500
  case ',': return {h: 1 /* {TcContinue14:1} */, a1: $0.a6, a2: {a1: $0.a5, a2: {a1: $0.a3, a2: $0.a7.a1}}, a3: $0.a7.a2.a2};
1501
1501
  case '}': return {h: 0 /* {TcDone:14} */, a1: {h: 0 /* Succ0 */, a1: {h: 6 /* JObject */, a1: Prelude_Types_SnocList_x3cx3ex3e($0.a5, {a1: {a1: $0.a3, a2: $0.a7.a1}, a2: {h: 0}})}, a2: $0.a7.a2.a2}};
1502
- default: return {h: 0 /* {TcDone:14} */, a1: Text_ParseError_failInParenEOI($0.a6, {h: 0 /* Symbol */, a1: '{'}, csegen_229(), $0.a7)};
1502
+ default: return {h: 0 /* {TcDone:14} */, a1: Text_ParseError_failInParenEOI($0.a6, {h: 0 /* Symbol */, a1: '{'}, csegen_230(), $0.a7)};
1503
1503
  }
1504
1504
  }
1505
- default: return {h: 0 /* {TcDone:14} */, a1: Text_ParseError_failInParenEOI($0.a6, {h: 0 /* Symbol */, a1: '{'}, csegen_229(), $0.a7)};
1505
+ default: return {h: 0 /* {TcDone:14} */, a1: Text_ParseError_failInParenEOI($0.a6, {h: 0 /* Symbol */, a1: '{'}, csegen_230(), $0.a7)};
1506
1506
  }
1507
1507
  }
1508
- default: return {h: 0 /* {TcDone:14} */, a1: Text_ParseError_failInParenEOI($0.a6, {h: 0 /* Symbol */, a1: '{'}, csegen_229(), $0.a7)};
1508
+ default: return {h: 0 /* {TcDone:14} */, a1: Text_ParseError_failInParenEOI($0.a6, {h: 0 /* Symbol */, a1: '{'}, csegen_230(), $0.a7)};
1509
1509
  }
1510
1510
  }
1511
- default: return {h: 0 /* {TcDone:14} */, a1: Text_ParseError_failInParenEOI($0.a6, {h: 0 /* Symbol */, a1: '{'}, csegen_229(), $0.a7)};
1511
+ default: return {h: 0 /* {TcDone:14} */, a1: Text_ParseError_failInParenEOI($0.a6, {h: 0 /* Symbol */, a1: '{'}, csegen_230(), $0.a7)};
1512
1512
  }
1513
1513
  }
1514
- default: return {h: 0 /* {TcDone:14} */, a1: Text_ParseError_failInParenEOI($0.a6, {h: 0 /* Symbol */, a1: '{'}, csegen_229(), $0.a7)};
1514
+ default: return {h: 0 /* {TcDone:14} */, a1: Text_ParseError_failInParenEOI($0.a6, {h: 0 /* Symbol */, a1: '{'}, csegen_230(), $0.a7)};
1515
1515
  }
1516
1516
  }
1517
1517
  }
@@ -2300,19 +2300,19 @@ function x24tcOpt_48($0) {
2300
2300
  switch($0.a4.a2.a1.a1.a1) {
2301
2301
  case ',': return {h: 1 /* {TcContinue48:1} */, a1: $0.a3, a2: {a1: $0.a2, a2: $0.a4.a1}, a3: $0.a4.a2.a2};
2302
2302
  case ']': return {h: 0 /* {TcDone:48} */, a1: {h: 0 /* Succ0 */, a1: {h: 5 /* JArray */, a1: Prelude_Types_SnocList_x3cx3ex3e($0.a2, {a1: $0.a4.a1, a2: {h: 0}})}, a2: $0.a4.a2.a2}};
2303
- default: return {h: 0 /* {TcDone:48} */, a1: Text_ParseError_failInParenEOI($0.a3, {h: 0 /* Symbol */, a1: '['}, csegen_229(), $0.a4)};
2303
+ default: return {h: 0 /* {TcDone:48} */, a1: Text_ParseError_failInParenEOI($0.a3, {h: 0 /* Symbol */, a1: '['}, csegen_230(), $0.a4)};
2304
2304
  }
2305
2305
  }
2306
- default: return {h: 0 /* {TcDone:48} */, a1: Text_ParseError_failInParenEOI($0.a3, {h: 0 /* Symbol */, a1: '['}, csegen_229(), $0.a4)};
2306
+ default: return {h: 0 /* {TcDone:48} */, a1: Text_ParseError_failInParenEOI($0.a3, {h: 0 /* Symbol */, a1: '['}, csegen_230(), $0.a4)};
2307
2307
  }
2308
2308
  }
2309
- default: return {h: 0 /* {TcDone:48} */, a1: Text_ParseError_failInParenEOI($0.a3, {h: 0 /* Symbol */, a1: '['}, csegen_229(), $0.a4)};
2309
+ default: return {h: 0 /* {TcDone:48} */, a1: Text_ParseError_failInParenEOI($0.a3, {h: 0 /* Symbol */, a1: '['}, csegen_230(), $0.a4)};
2310
2310
  }
2311
2311
  }
2312
- default: return {h: 0 /* {TcDone:48} */, a1: Text_ParseError_failInParenEOI($0.a3, {h: 0 /* Symbol */, a1: '['}, csegen_229(), $0.a4)};
2312
+ default: return {h: 0 /* {TcDone:48} */, a1: Text_ParseError_failInParenEOI($0.a3, {h: 0 /* Symbol */, a1: '['}, csegen_230(), $0.a4)};
2313
2313
  }
2314
2314
  }
2315
- default: return {h: 0 /* {TcDone:48} */, a1: Text_ParseError_failInParenEOI($0.a3, {h: 0 /* Symbol */, a1: '['}, csegen_229(), $0.a4)};
2315
+ default: return {h: 0 /* {TcDone:48} */, a1: Text_ParseError_failInParenEOI($0.a3, {h: 0 /* Symbol */, a1: '['}, csegen_230(), $0.a4)};
2316
2316
  }
2317
2317
  }
2318
2318
  }
@@ -2377,9 +2377,9 @@ function Prelude_Types_SnocList_x3cx3ex3e($0, $1) {
2377
2377
  }
2378
2378
 
2379
2379
  /* {__mainExpression:0} */
2380
- const __mainExpression_0 = __lazy(function () {
2380
+ function __mainExpression_0() {
2381
2381
  return PrimIO_unsafePerformIO($2 => Main_main($2));
2382
- });
2382
+ }
2383
2383
 
2384
2384
  /* {csegen:0} */
2385
2385
  const csegen_0 = __lazy(function () {
@@ -2525,18 +2525,18 @@ const csegen_156 = __lazy(function () {
2525
2525
  return {a1: {a1: '--completed', a2: {a1: '-c', a2: {h: 0}}}};
2526
2526
  });
2527
2527
 
2528
- /* {csegen:203} */
2529
- const csegen_203 = __lazy(function () {
2530
- return b => a => $0 => $1 => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29($0, $1);
2531
- });
2532
-
2533
2528
  /* {csegen:204} */
2534
2529
  const csegen_204 = __lazy(function () {
2535
- return a => $0 => Prelude_Types_join_Monad_x28Eitherx20x24ex29($0);
2530
+ return b => a => $0 => $1 => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29($0, $1);
2536
2531
  });
2537
2532
 
2538
2533
  /* {csegen:205} */
2539
2534
  const csegen_205 = __lazy(function () {
2535
+ return a => $0 => Prelude_Types_join_Monad_x28Eitherx20x24ex29($0);
2536
+ });
2537
+
2538
+ /* {csegen:206} */
2539
+ const csegen_206 = __lazy(function () {
2540
2540
  return $0 => {
2541
2541
  const $1 = JSON_Parser_parseJSON({h: 0}, $0);
2542
2542
  switch($1.h) {
@@ -2546,33 +2546,33 @@ const csegen_205 = __lazy(function () {
2546
2546
  };
2547
2547
  });
2548
2548
 
2549
- /* {csegen:206} */
2550
- const csegen_206 = __lazy(function () {
2549
+ /* {csegen:207} */
2550
+ const csegen_207 = __lazy(function () {
2551
2551
  return $0 => $1 => Prelude_Types_max_Ord_Nat($0, $1);
2552
2552
  });
2553
2553
 
2554
- /* {csegen:217} */
2555
- const csegen_217 = __lazy(function () {
2554
+ /* {csegen:218} */
2555
+ const csegen_218 = __lazy(function () {
2556
2556
  return {a1: csegen_39(), 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)};
2557
2557
  });
2558
2558
 
2559
- /* {csegen:220} */
2560
- const csegen_220 = __lazy(function () {
2559
+ /* {csegen:221} */
2560
+ const csegen_221 = __lazy(function () {
2561
2561
  return {a1: $1 => $2 => Prelude_EqOrd_x3dx3d_Eq_Integer($1, $2), a2: $7 => $8 => Prelude_EqOrd_x2fx3d_Eq_Integer($7, $8)};
2562
2562
  });
2563
2563
 
2564
- /* {csegen:221} */
2565
- const csegen_221 = __lazy(function () {
2564
+ /* {csegen:222} */
2565
+ const csegen_222 = __lazy(function () {
2566
2566
  return $0 => $1 => Prelude_EqOrd_compare_Ord_Integer($0, $1);
2567
2567
  });
2568
2568
 
2569
- /* {csegen:229} */
2570
- const csegen_229 = __lazy(function () {
2569
+ /* {csegen:230} */
2570
+ const csegen_230 = __lazy(function () {
2571
2571
  return $0 => JSON_Parser_eqJSToken({h: 2 /* EOI */}, $0);
2572
2572
  });
2573
2573
 
2574
- /* {csegen:234} */
2575
- const csegen_234 = __lazy(function () {
2574
+ /* {csegen:235} */
2575
+ const csegen_235 = __lazy(function () {
2576
2576
  const $6 = a => b => {
2577
2577
  switch(JSON_Parser_eqJSON(a, b)) {
2578
2578
  case 1: return 0;
@@ -2582,179 +2582,179 @@ const csegen_234 = __lazy(function () {
2582
2582
  return {a1: $1 => $2 => JSON_Parser_eqJSON($1, $2), a2: $6};
2583
2583
  });
2584
2584
 
2585
- /* {csegen:241} */
2586
- const csegen_241 = __lazy(function () {
2585
+ /* {csegen:242} */
2586
+ const csegen_242 = __lazy(function () {
2587
2587
  const $0 = a => $1 => $2 => ({h: 1 /* Fail0 */, a1: {a1: $2, a2: $1}});
2588
2588
  return $6 => $7 => $0(undefined)($6)($7);
2589
2589
  });
2590
2590
 
2591
- /* {csegen:261} */
2592
- const csegen_261 = __lazy(function () {
2591
+ /* {csegen:262} */
2592
+ const csegen_262 = __lazy(function () {
2593
2593
  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)};
2594
2594
  });
2595
2595
 
2596
- /* {csegen:265} */
2597
- const csegen_265 = __lazy(function () {
2596
+ /* {csegen:266} */
2597
+ const csegen_266 = __lazy(function () {
2598
2598
  return b => a => f => $0 => $1 => $2 => Prelude_Types_traverse_Traversable_x28Eitherx20x24ex29($0, $1, $2);
2599
2599
  });
2600
2600
 
2601
- /* {csegen:279} */
2602
- const csegen_279 = __lazy(function () {
2601
+ /* {csegen:280} */
2602
+ const csegen_280 = __lazy(function () {
2603
2603
  return {a1: $1 => $2 => _add32s($1, $2), a2: $6 => $7 => _mul32s($6, $7), a3: $b => Number(_truncBigInt32($b))};
2604
2604
  });
2605
2605
 
2606
- /* {csegen:299} */
2607
- const csegen_299 = __lazy(function () {
2606
+ /* {csegen:300} */
2607
+ const csegen_300 = __lazy(function () {
2608
2608
  return {a1: Help_argument(0, '...'), a2: {h: 0}};
2609
2609
  });
2610
2610
 
2611
- /* {csegen:304} */
2612
- const csegen_304 = __lazy(function () {
2613
- return {a1: Help_argument(0, '#<label>'), a2: csegen_299()};
2611
+ /* {csegen:305} */
2612
+ const csegen_305 = __lazy(function () {
2613
+ return {a1: Help_argument(0, '#<label>'), a2: csegen_300()};
2614
2614
  });
2615
2615
 
2616
- /* {csegen:310} */
2617
- const csegen_310 = __lazy(function () {
2616
+ /* {csegen:311} */
2617
+ const csegen_311 = __lazy(function () {
2618
2618
  return {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Optionally apply any number of labels by prefixing them with \'#\'.'), a2: {h: 0}};
2619
2619
  });
2620
2620
 
2621
- /* {csegen:344} */
2622
- const csegen_344 = __lazy(function () {
2621
+ /* {csegen:345} */
2622
+ const csegen_345 = __lazy(function () {
2623
2623
  return {a1: Help_argument(1, '<team-slug>'), a2: {h: 0}};
2624
2624
  });
2625
2625
 
2626
- /* {csegen:398} */
2627
- const csegen_398 = __lazy(function () {
2626
+ /* {csegen:401} */
2627
+ const csegen_401 = __lazy(function () {
2628
2628
  return $0 => $1 => $2 => $3 => Data_Promise_x3ex3ex3d_Monad_Promise($0, $1, $2, $3);
2629
2629
  });
2630
2630
 
2631
- /* {csegen:399} */
2632
- const csegen_399 = __lazy(function () {
2631
+ /* {csegen:402} */
2632
+ const csegen_402 = __lazy(function () {
2633
2633
  return $0 => $1 => Data_Promise_either(csegen_51(), Data_PullRequest_parsePullRequestsString($0), $1);
2634
2634
  });
2635
2635
 
2636
- /* {csegen:400} */
2637
- const csegen_400 = __lazy(function () {
2636
+ /* {csegen:403} */
2637
+ const csegen_403 = __lazy(function () {
2638
2638
  return $0 => $1 => Data_Promise_either(csegen_51(), Data_User_parseUserString($0), $1);
2639
2639
  });
2640
2640
 
2641
- /* {csegen:405} */
2642
- const csegen_405 = __lazy(function () {
2641
+ /* {csegen:408} */
2642
+ const csegen_408 = __lazy(function () {
2643
2643
  return $0 => $1 => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29($0, $1);
2644
2644
  });
2645
2645
 
2646
- /* {csegen:418} */
2647
- const csegen_418 = __lazy(function () {
2646
+ /* {csegen:421} */
2647
+ const csegen_421 = __lazy(function () {
2648
2648
  return $0 => Language_JSON_Accessors_array($3 => Data_PullRequest_parsePR($3), $0);
2649
2649
  });
2650
2650
 
2651
- /* {csegen:426} */
2652
- const csegen_426 = __lazy(function () {
2651
+ /* {csegen:429} */
2652
+ const csegen_429 = __lazy(function () {
2653
2653
  return $0 => $1 => $2 => Data_Promise_pure_Applicative_Promise($0, $1, $2);
2654
2654
  });
2655
2655
 
2656
- /* {csegen:427} */
2657
- const csegen_427 = __lazy(function () {
2656
+ /* {csegen:430} */
2657
+ const csegen_430 = __lazy(function () {
2658
2658
  return $0 => Prelude_EqOrd_x3dx3d_Eq_Char($0, '/');
2659
2659
  });
2660
2660
 
2661
- /* {csegen:428} */
2662
- const csegen_428 = __lazy(function () {
2661
+ /* {csegen:431} */
2662
+ const csegen_431 = __lazy(function () {
2663
2663
  return $0 => $0.a2;
2664
2664
  });
2665
2665
 
2666
- /* {csegen:432} */
2667
- const csegen_432 = __lazy(function () {
2666
+ /* {csegen:435} */
2667
+ const csegen_435 = __lazy(function () {
2668
2668
  return $0 => $0.a1;
2669
2669
  });
2670
2670
 
2671
- /* {csegen:443} */
2672
- const csegen_443 = __lazy(function () {
2671
+ /* {csegen:446} */
2672
+ const csegen_446 = __lazy(function () {
2673
2673
  return $0 => $1 => Data_Promise_map_Functor_Promise($4 => Number(_truncUBigInt32($4)), System_time(csegen_72()), $0, $1);
2674
2674
  });
2675
2675
 
2676
- /* {csegen:448} */
2677
- const csegen_448 = __lazy(function () {
2676
+ /* {csegen:451} */
2677
+ const csegen_451 = __lazy(function () {
2678
2678
  return $0 => $1 => $2 => $3 => Prelude_Types_map_Functor_Maybe($2, $3);
2679
2679
  });
2680
2680
 
2681
- /* {csegen:461} */
2682
- const csegen_461 = __lazy(function () {
2681
+ /* {csegen:464} */
2682
+ const csegen_464 = __lazy(function () {
2683
2683
  return $0 => $1 => $2 => Data_Promise_liftIO_HasIO_Promise($5 => Prelude_IO_prim__getStr($5), $0, $1, $2);
2684
2684
  });
2685
2685
 
2686
- /* {csegen:463} */
2687
- const csegen_463 = __lazy(function () {
2686
+ /* {csegen:466} */
2687
+ const csegen_466 = __lazy(function () {
2688
2688
  return $0 => $1 => Data_Promise_pure_Applicative_Promise({h: 0}, $0, $1);
2689
2689
  });
2690
2690
 
2691
- /* {csegen:491} */
2692
- const csegen_491 = __lazy(function () {
2691
+ /* {csegen:494} */
2692
+ const csegen_494 = __lazy(function () {
2693
2693
  return {a1: csegen_9(), a2: a => ({h: 0}), a3: a => $4 => $5 => Prelude_Types_x3cx7cx3e_Alternative_Maybe($4, $5)};
2694
2694
  });
2695
2695
 
2696
- /* {csegen:492} */
2697
- const csegen_492 = __lazy(function () {
2698
- return $0 => Data_List_sort(csegen_217(), $0);
2696
+ /* {csegen:495} */
2697
+ const csegen_495 = __lazy(function () {
2698
+ return $0 => Data_List_sort(csegen_218(), $0);
2699
2699
  });
2700
2700
 
2701
- /* {csegen:493} */
2702
- const csegen_493 = __lazy(function () {
2701
+ /* {csegen:496} */
2702
+ const csegen_496 = __lazy(function () {
2703
2703
  return $0 => $1 => $2 => FFI_Concurrency_promiseAll(csegen_145(), $0, $1, $2);
2704
2704
  });
2705
2705
 
2706
- /* {csegen:501} */
2707
- const csegen_501 = __lazy(function () {
2706
+ /* {csegen:504} */
2707
+ const csegen_504 = __lazy(function () {
2708
2708
  return $0 => $0.a1;
2709
2709
  });
2710
2710
 
2711
- /* {csegen:503} */
2712
- const csegen_503 = __lazy(function () {
2711
+ /* {csegen:506} */
2712
+ const csegen_506 = __lazy(function () {
2713
2713
  return $0 => $1 => Data_Date_compare_Ord_Date($0, $1);
2714
2714
  });
2715
2715
 
2716
- /* {csegen:504} */
2717
- const csegen_504 = __lazy(function () {
2716
+ /* {csegen:507} */
2717
+ const csegen_507 = __lazy(function () {
2718
2718
  return $0 => $0.a2;
2719
2719
  });
2720
2720
 
2721
- /* {csegen:505} */
2722
- const csegen_505 = __lazy(function () {
2723
- return $0 => $1 => Prelude_Basics_on(csegen_503(), csegen_504(), $0, $1);
2721
+ /* {csegen:508} */
2722
+ const csegen_508 = __lazy(function () {
2723
+ return $0 => $1 => Prelude_Basics_on(csegen_506(), csegen_507(), $0, $1);
2724
2724
  });
2725
2725
 
2726
- /* {csegen:518} */
2727
- const csegen_518 = __lazy(function () {
2726
+ /* {csegen:521} */
2727
+ const csegen_521 = __lazy(function () {
2728
2728
  return $0 => $0.a2;
2729
2729
  });
2730
2730
 
2731
- /* {csegen:521} */
2732
- const csegen_521 = __lazy(function () {
2731
+ /* {csegen:524} */
2732
+ const csegen_524 = __lazy(function () {
2733
2733
  return $0 => $0.a1;
2734
2734
  });
2735
2735
 
2736
- /* {csegen:527} */
2737
- const csegen_527 = __lazy(function () {
2736
+ /* {csegen:530} */
2737
+ const csegen_530 = __lazy(function () {
2738
2738
  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}}}));
2739
2739
  });
2740
2740
 
2741
- /* {csegen:557} */
2742
- const csegen_557 = __lazy(function () {
2741
+ /* {csegen:560} */
2742
+ const csegen_560 = __lazy(function () {
2743
2743
  return $0 => Util_yesNoPrompt(csegen_72(), 'Would you like to continue creating a Pull Request anyway?');
2744
2744
  });
2745
2745
 
2746
- /* {csegen:592} */
2747
- const csegen_592 = __lazy(function () {
2746
+ /* {csegen:595} */
2747
+ const csegen_595 = __lazy(function () {
2748
2748
  return $0 => $0.a1;
2749
2749
  });
2750
2750
 
2751
- /* {csegen:604} */
2752
- const csegen_604 = __lazy(function () {
2751
+ /* {csegen:607} */
2752
+ const csegen_607 = __lazy(function () {
2753
2753
  return {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc()}, a2: {h: 0}};
2754
2754
  });
2755
2755
 
2756
- /* {csegen:623} */
2757
- const csegen_623 = __lazy(function () {
2756
+ /* {csegen:626} */
2757
+ const csegen_626 = __lazy(function () {
2758
2758
  return {a1: ann => $1 => Graph_pretty_Pretty_Date($1), a2: ann => $5 => $6 => Graph_prettyPrec_Pretty_Date($5, $6)};
2759
2759
  });
2760
2760
 
@@ -2763,18 +2763,18 @@ function prim__sub_Integer($0, $1) {
2763
2763
  return ($0-$1);
2764
2764
  }
2765
2765
 
2766
- /* Main.8436:1484:parsePg */
2767
- function Main_n__8436_1484_parsePg($0, $1, $2, $3, $4, $5, $6) {
2766
+ /* Main.8437:1484:parsePg */
2767
+ function Main_n__8437_1484_parsePg($0, $1, $2, $3, $4, $5, $6) {
2768
2768
  return Data_String_parsePositive(csegen_2(), $6);
2769
2769
  }
2770
2770
 
2771
- /* Main.8436:1483:parseLim */
2772
- function Main_n__8436_1483_parseLim($0, $1, $2, $3, $4, $5) {
2771
+ /* Main.8437:1483:parseLim */
2772
+ function Main_n__8437_1483_parseLim($0, $1, $2, $3, $4, $5) {
2773
2773
  return Prelude_Interfaces_x3cx3dx3c(csegen_14(), x => Data_Fin_natToFin(x, 101n), $e => Data_String_parsePositive(csegen_2(), $e));
2774
2774
  }
2775
2775
 
2776
- /* Main.8297:1285:configuredOpts */
2777
- function Main_n__8297_1285_configuredOpts($0, $1, $2, $3) {
2776
+ /* Main.8298:1285:configuredOpts */
2777
+ function Main_n__8298_1285_configuredOpts($0, $1, $2, $3) {
2778
2778
  const $11 = $12 => {
2779
2779
  switch($12.h) {
2780
2780
  case 1: /* Right */ return $0.a1.a1.a2(undefined)(BashCompletion_opts($12.a1, $3, $2, $1));
@@ -3027,7 +3027,7 @@ function Main_handleAuthenticatedArgs($0, $1, $2, $3) {
3027
3027
  }
3028
3028
  return Prelude_Types_x3ex3ex3d_Monad_Maybe($b1, filter => ({a1: {a1: filter, a2: {a1: $ae.a1, a2: $ae.a2}}}));
3029
3029
  };
3030
- const $8e = Prelude_Types_x3ex3ex3d_Monad_Maybe(Prelude_Types_x3cx2ax3e_Applicative_Maybe(Prelude_Types_x3cx2ax3e_Applicative_Maybe({a1: $96 => $97 => ({a1: $96, a2: $97})}, Main_n__8436_1483_parseLim($1, $2, $3.a2.a2.a1, $3.a2.a2.a2.a1, $3.a2.a2.a2.a2.a1, $0)($3.a2.a2.a2.a1)), Main_n__8436_1484_parsePg($1, $2, $3.a2.a2.a1, $3.a2.a2.a2.a1, $3.a2.a2.a2.a2.a1, $0, $3.a2.a2.a2.a2.a1)), $ad);
3030
+ const $8e = Prelude_Types_x3ex3ex3d_Monad_Maybe(Prelude_Types_x3cx2ax3e_Applicative_Maybe(Prelude_Types_x3cx2ax3e_Applicative_Maybe({a1: $96 => $97 => ({a1: $96, a2: $97})}, Main_n__8437_1483_parseLim($1, $2, $3.a2.a2.a1, $3.a2.a2.a2.a1, $3.a2.a2.a2.a2.a1, $0)($3.a2.a2.a2.a1)), Main_n__8437_1484_parsePg($1, $2, $3.a2.a2.a1, $3.a2.a2.a2.a1, $3.a2.a2.a2.a2.a1, $0, $3.a2.a2.a2.a2.a1)), $ad);
3031
3031
  return $be => {
3032
3032
  switch($8e.h) {
3033
3033
  case undefined: /* just */ return $c0 => Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listPullRequestsJsonStr($2, $0.a2, $0.a3, $8e.a1.a1, $8e.a1.a2.a1, $8e.a1.a2.a2), pullsJsonStr => $cf => $d0 => $d1 => Data_Promise_liftIO_HasIO_Promise($d4 => Prelude_IO_prim__putStr(pullsJsonStr, $d4), $cf, $d0, $d1), $be, $c0);
@@ -3175,6 +3175,17 @@ function Main_handleAuthenticatedArgs($0, $1, $2, $3) {
3175
3175
  }
3176
3176
  };
3177
3177
  }
3178
+ case 'rq': {
3179
+ switch($3.a2.h) {
3180
+ case undefined: /* cons */ {
3181
+ switch($3.a2.a1) {
3182
+ case '--dry': return Commands_request($0, $1, $2, $3.a2.a2, 1);
3183
+ default: return Commands_request($0, $1, $2, $3.a2, 0);
3184
+ }
3185
+ }
3186
+ default: return Commands_request($0, $1, $2, $3.a2, 0);
3187
+ }
3188
+ }
3178
3189
  case 'request': {
3179
3190
  switch($3.a2.h) {
3180
3191
  case undefined: /* cons */ {
@@ -3187,18 +3198,18 @@ function Main_handleAuthenticatedArgs($0, $1, $2, $3) {
3187
3198
  }
3188
3199
  }
3189
3200
  case 'label': {
3190
- return $316 => $317 => {
3201
+ return $32a => $32b => {
3191
3202
  switch($3.a2.h) {
3192
- case 0: /* nil */ return Data_Promise_reject('The label command expects one or more labels as arguments.', $316, $317);
3193
- case undefined: /* cons */ return Commands_label($0, $1, $2, {a1: $3.a2.a1, a2: $3.a2.a2}, $316, $317);
3194
- default: return Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_49(), $32c => $32c, {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_51(), $3), a2: {a1: '.', a2: {h: 0}}}}), $316, $317);
3203
+ case 0: /* nil */ return Data_Promise_reject('The label command expects one or more labels as arguments.', $32a, $32b);
3204
+ case undefined: /* cons */ return Commands_label($0, $1, $2, {a1: $3.a2.a1, a2: $3.a2.a2}, $32a, $32b);
3205
+ default: return Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_49(), $340 => $340, {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_51(), $3), a2: {a1: '.', a2: {h: 0}}}}), $32a, $32b);
3195
3206
  }
3196
3207
  };
3197
3208
  }
3198
- default: return $33a => $33b => Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_49(), $342 => $342, {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_51(), $3), a2: {a1: '.', a2: {h: 0}}}}), $33a, $33b);
3209
+ default: return $34e => $34f => Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_49(), $356 => $356, {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_51(), $3), a2: {a1: '.', a2: {h: 0}}}}), $34e, $34f);
3199
3210
  }
3200
3211
  }
3201
- default: return $350 => $351 => Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_49(), $358 => $358, {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_51(), $3), a2: {a1: '.', a2: {h: 0}}}}), $350, $351);
3212
+ default: return $364 => $365 => Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_49(), $36c => $36c, {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_51(), $3), a2: {a1: '.', a2: {h: 0}}}}), $364, $365);
3202
3213
  }
3203
3214
  }
3204
3215
 
@@ -3269,7 +3280,7 @@ function Main_exitError($0, $1) {
3269
3280
 
3270
3281
  /* Main.bashCompletion : HasIO io => String -> String -> String -> io () */
3271
3282
  function Main_bashCompletion($0, $1, $2, $3) {
3272
- const $4 = Prelude_Types_maybe(() => Main_n__8297_1285_configuredOpts($0, $3, $2, $1), () => $d => $0.a1.a1.a2(undefined)($d), BashCompletion_cmdOpts($1, $2, $3));
3283
+ const $4 = Prelude_Types_maybe(() => Main_n__8298_1285_configuredOpts($0, $3, $2, $1), () => $d => $0.a1.a1.a2(undefined)($d), BashCompletion_cmdOpts($1, $2, $3));
3273
3284
  return $0.a1.a2(undefined)(undefined)($4)($24 => $0.a2(undefined)($2a => Prelude_IO_prim__putStr(Data_String_fastUnlines($24), $2a)));
3274
3285
  }
3275
3286
 
@@ -5783,7 +5794,7 @@ const ZshCompletion_script = __lazy(function () {
5783
5794
  });
5784
5795
 
5785
5796
  /* BashCompletion.case block in case block in unhashify */
5786
- function BashCompletion_case__casex20blockx20inx20unhashify_9349($0, $1, $2) {
5797
+ function BashCompletion_case__casex20blockx20inx20unhashify_9354($0, $1, $2) {
5787
5798
  switch($0) {
5788
5799
  case '': {
5789
5800
  switch($2.h) {
@@ -5806,7 +5817,7 @@ function BashCompletion_case__casex20blockx20inx20unhashify_9349($0, $1, $2) {
5806
5817
  }
5807
5818
 
5808
5819
  /* BashCompletion.case block in unhashify */
5809
- function BashCompletion_case__unhashify_9329($0, $1) {
5820
+ function BashCompletion_case__unhashify_9334($0, $1) {
5810
5821
  switch($0) {
5811
5822
  case '': {
5812
5823
  switch($1.h) {
@@ -5816,7 +5827,7 @@ function BashCompletion_case__unhashify_9329($0, $1) {
5816
5827
  case '#': return $1.a2;
5817
5828
  case '\u{5c}': {
5818
5829
  const $6 = ('\u{5c}'+$1.a2);
5819
- return BashCompletion_case__casex20blockx20inx20unhashify_9349($1.a2, $6, Data_String_strM($1.a2));
5830
+ return BashCompletion_case__casex20blockx20inx20unhashify_9354($1.a2, $6, Data_String_strM($1.a2));
5820
5831
  }
5821
5832
  default: return $0;
5822
5833
  }
@@ -5828,7 +5839,7 @@ function BashCompletion_case__unhashify_9329($0, $1) {
5828
5839
  case '#': return $1.a2;
5829
5840
  case '\u{5c}': {
5830
5841
  const $11 = ('\u{5c}'+$1.a2);
5831
- return BashCompletion_case__casex20blockx20inx20unhashify_9349($1.a2, $11, Data_String_strM($1.a2));
5842
+ return BashCompletion_case__casex20blockx20inx20unhashify_9354($1.a2, $11, Data_String_strM($1.a2));
5832
5843
  }
5833
5844
  default: return $0;
5834
5845
  }
@@ -5836,27 +5847,14 @@ function BashCompletion_case__unhashify_9329($0, $1) {
5836
5847
  }
5837
5848
  }
5838
5849
 
5839
- /* BashCompletion.4751:10151:slugsOrLoginsOrLabels */
5840
- function BashCompletion_n__4751_10151_slugsOrLoginsOrLabels($0, $1, $2) {
5841
- switch(Data_String_isPrefixOf('+', $1)) {
5842
- case 1: return Prelude_Types_List_mapAppend({h: 0}, $a => ('+'+$a), $2.a11);
5843
- case 0: {
5844
- switch(BashCompletion_isHashPrefix($1)) {
5845
- case 1: return Prelude_Types_List_mapAppend({h: 0}, csegen_148(), $2.a10);
5846
- case 0: return $2.a9;
5847
- }
5848
- }
5849
- }
5850
- }
5851
-
5852
- /* BashCompletion.4751:10039:slugsOrLoginsOrLabels */
5853
- function BashCompletion_n__4751_10039_slugsOrLoginsOrLabels($0, $1, $2) {
5854
- switch(Data_String_isPrefixOf('+', $1)) {
5855
- case 1: return Prelude_Types_List_mapAppend({h: 0}, $a => ('+'+$a), $2.a11);
5850
+ /* BashCompletion.4756:9823:slugsOrLoginsOrLabels */
5851
+ function BashCompletion_n__4756_9823_slugsOrLoginsOrLabels($0, $1) {
5852
+ switch(Data_String_isPrefixOf('+', $0)) {
5853
+ case 1: return Prelude_Types_List_mapAppend({h: 0}, $9 => ('+'+$9), $1.a11);
5856
5854
  case 0: {
5857
- switch(BashCompletion_isHashPrefix($1)) {
5858
- case 1: return Prelude_Types_List_mapAppend({h: 0}, csegen_148(), $2.a10);
5859
- case 0: return $2.a9;
5855
+ switch(BashCompletion_isHashPrefix($0)) {
5856
+ case 1: return Prelude_Types_List_mapAppend({h: 0}, csegen_148(), $1.a10);
5857
+ case 0: return $1.a9;
5860
5858
  }
5861
5859
  }
5862
5860
  }
@@ -5869,7 +5867,7 @@ function BashCompletion_unslugify($0) {
5869
5867
 
5870
5868
  /* BashCompletion.unhashify : String -> String */
5871
5869
  function BashCompletion_unhashify($0) {
5872
- return BashCompletion_case__unhashify_9329($0, Data_String_strM($0));
5870
+ return BashCompletion_case__unhashify_9334($0, Data_String_strM($0));
5873
5871
  }
5874
5872
 
5875
5873
  /* BashCompletion.slugify : String -> String */
@@ -5882,6 +5880,14 @@ const BashCompletion_script = __lazy(function () {
5882
5880
  return Prelude_Types_foldMap_Foldable_List(csegen_49(), $4 => $4, {a1: '_harmony()\n{\n CURRENT_PARTIAL=$([ -z $2 ] && echo \"--\" || echo \"$2\")\n PREVIOUS=\"$3\"\n SUBCOMMAND=$([ -z ${COMP_WORDS[1]} ] && echo \"--\" || echo \"${COMP_WORDS[1]}\")\n COMPREPLY=($(harmony --bash-completion \"$SUBCOMMAND\" \"$CURRENT_PARTIAL\" \"$PREVIOUS\"))\n}\n\ncomplete -F _harmony harmony', a2: {h: 0}});
5883
5881
  });
5884
5882
 
5883
+ /* BashCompletion.optsForRequestCmd : Config => String -> List String */
5884
+ function BashCompletion_optsForRequestCmd($0, $1) {
5885
+ switch(Data_String_isPrefixOf($1, '--dry')) {
5886
+ case 1: return {a1: '--dry', a2: {h: 0}};
5887
+ case 0: return BashCompletion_n__4756_9823_slugsOrLoginsOrLabels($1, $0);
5888
+ }
5889
+ }
5890
+
5885
5891
  /* BashCompletion.opts : Config => String -> String -> String -> List String */
5886
5892
  function BashCompletion_opts($0, $1, $2, $3) {
5887
5893
  switch($1) {
@@ -5979,12 +5985,18 @@ function BashCompletion_opts($0, $1, $2, $3) {
5979
5985
  default: return $0.a9;
5980
5986
  }
5981
5987
  }
5982
- default: {
5983
- switch(Data_String_isPrefixOf($2, '--dry')) {
5984
- case 1: return {a1: '--dry', a2: {h: 0}};
5985
- case 0: return BashCompletion_n__4751_10039_slugsOrLoginsOrLabels($3, $2, $0);
5988
+ default: return BashCompletion_optsForRequestCmd($0, $2);
5989
+ }
5990
+ }
5991
+ case 'rq': {
5992
+ switch($2) {
5993
+ case '--': {
5994
+ switch($3) {
5995
+ case 'rq': return {a1: '--dry', a2: $0.a9};
5996
+ default: return $0.a9;
5986
5997
  }
5987
5998
  }
5999
+ default: return BashCompletion_optsForRequestCmd($0, $2);
5988
6000
  }
5989
6001
  }
5990
6002
  case 'request': {
@@ -5995,12 +6007,7 @@ function BashCompletion_opts($0, $1, $2, $3) {
5995
6007
  default: return $0.a9;
5996
6008
  }
5997
6009
  }
5998
- default: {
5999
- switch(Data_String_isPrefixOf($2, '--dry')) {
6000
- case 1: return {a1: '--dry', a2: {h: 0}};
6001
- case 0: return BashCompletion_n__4751_10151_slugsOrLoginsOrLabels($3, $2, $0);
6002
- }
6003
- }
6010
+ default: return BashCompletion_optsForRequestCmd($0, $2);
6004
6011
  }
6005
6012
  }
6006
6013
  default: return {h: 0};
@@ -6287,16 +6294,16 @@ function BashCompletion_cmdOpts($0, $1, $2) {
6287
6294
 
6288
6295
  /* BashCompletion.allRootCmds : List String */
6289
6296
  const BashCompletion_allRootCmds = __lazy(function () {
6290
- return {a1: 'request', a2: {a1: 'assign', a2: {a1: 'branch', a2: {a1: 'config', a2: {a1: 'contribute', a2: {a1: 'graph', a2: {a1: 'health', a2: {a1: 'help', a2: {a1: 'label', a2: {a1: 'list', a2: {a1: 'pr', a2: {a1: 'reflect', a2: {a1: 'sync', a2: {a1: 'version', a2: {a1: 'whoami', a2: {h: 0}}}}}}}}}}}}}}}};
6297
+ return {a1: 'request', a2: {a1: 'rq', a2: {a1: 'assign', a2: {a1: 'branch', a2: {a1: 'config', a2: {a1: 'contribute', a2: {a1: 'graph', a2: {a1: 'health', a2: {a1: 'help', a2: {a1: 'label', a2: {a1: 'list', a2: {a1: 'pr', a2: {a1: 'reflect', a2: {a1: 'sync', a2: {a1: 'version', a2: {a1: 'whoami', a2: {h: 0}}}}}}}}}}}}}}}}};
6291
6298
  });
6292
6299
 
6293
- /* Data.Config.8977:4025:personalAccessToken */
6294
- function Data_Config_n__8977_4025_personalAccessToken($0) {
6300
+ /* Data.Config.8993:4025:personalAccessToken */
6301
+ function Data_Config_n__8993_4025_personalAccessToken($0) {
6295
6302
  return Prelude_Types_maybe(() => 'Not set (will use $GITHUB_PAT environment variable)', () => $4 => Data_Config_show_Show_x28Hiddenx20x24ax29($4), $0.a13);
6296
6303
  }
6297
6304
 
6298
- /* Data.Config.9464:4502:parseConfigJson */
6299
- function Data_Config_n__9464_4502_parseConfigJson($0, $1) {
6305
+ /* Data.Config.9480:4502:parseConfigJson */
6306
+ function Data_Config_n__9480_4502_parseConfigJson($0, $1) {
6300
6307
  switch($1.h) {
6301
6308
  case 6: /* JObject */ {
6302
6309
  const $1a = $1b => {
@@ -6318,11 +6325,11 @@ function Data_Config_n__9464_4502_parseConfigJson($0, $1) {
6318
6325
  }
6319
6326
  return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29($45, ua => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_string($1b.a2.a1), o => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_string($1b.a2.a2.a1), r => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_string($1b.a2.a2.a2.a2.a2.a2.a1), dr => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_string($1b.a2.a2.a2.a1), mb => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_bool(requestTeams), at => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_bool(requestUsers), au => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_bool(commentOnRequest), ca => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_array($74 => Language_JSON_Accessors_string($74), $1b.a2.a2.a2.a2.a1), ts => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_array($7d => Language_JSON_Accessors_string($7d), $1b.a2.a2.a2.a2.a2.a2.a2.a1), rl => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_array($86 => Language_JSON_Accessors_string($86), $1b.a2.a2.a2.a2.a2.a1), om => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_array($8f => Language_JSON_Accessors_integer($8f), $1b.a2.a2.a2.a2.a2.a2.a2.a2.a1), ip => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Prelude_Types_maybe(() => ({h: 1 /* Right */, a1: {h: 0}}), () => $9a => Language_JSON_Accessors_optional($9d => Language_JSON_Accessors_string($9d), $9a), $3e), gp => ({h: 1 /* Right */, a1: {a1: ua, a2: o, a3: r, a4: dr, a5: mb, a6: at, a7: au, a8: ca, a9: ts, a10: rl, a11: om, a12: ip, a13: Prelude_Types_map_Functor_Maybe($b3 => $b3, gp), a14: $0}}))))))))))))));
6320
6327
  };
6321
- return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Data_Config_n__9473_4509_exactlyOneOf($0, $1.a1, 'commentOnAssign', 'commentOnRequest'), $3d);
6328
+ return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Data_Config_n__9489_4509_exactlyOneOf($0, $1.a1, 'commentOnAssign', 'commentOnRequest'), $3d);
6322
6329
  };
6323
- return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Data_Config_n__9473_4509_exactlyOneOf($0, $1.a1, 'assignUsers', 'requestUsers'), $35);
6330
+ return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Data_Config_n__9489_4509_exactlyOneOf($0, $1.a1, 'assignUsers', 'requestUsers'), $35);
6324
6331
  };
6325
- return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Data_Config_n__9473_4509_exactlyOneOf($0, $1.a1, 'assignTeams', 'requestTeams'), $2d);
6332
+ return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Data_Config_n__9489_4509_exactlyOneOf($0, $1.a1, 'assignTeams', 'requestTeams'), $2d);
6326
6333
  };
6327
6334
  return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_lookupAll({a1: 'updatedAt', a2: {a1: 'org', a2: {a1: 'repo', a2: {a1: 'mainBranch', a2: {a1: 'teamSlugs', a2: {a1: 'orgMembers', a2: {a1: 'defaultRemote', a2: {a1: 'repoLabels', a2: {a1: 'ignoredPRs', a2: {h: 0}}}}}}}}}}, $1.a1), $1a);
6328
6335
  }
@@ -6331,8 +6338,8 @@ function Data_Config_n__9464_4502_parseConfigJson($0, $1) {
6331
6338
  }
6332
6339
  }
6333
6340
 
6334
- /* Data.Config.9473:4509:exactlyOneOf */
6335
- function Data_Config_n__9473_4509_exactlyOneOf($0, $1, $2, $3) {
6341
+ /* Data.Config.9489:4509:exactlyOneOf */
6342
+ function Data_Config_n__9489_4509_exactlyOneOf($0, $1, $2, $3) {
6336
6343
  const $4 = Data_List_lookup(csegen_39(), $2, $1);
6337
6344
  const $a = Data_List_lookup(csegen_39(), $3, $1);
6338
6345
  switch($4.h) {
@@ -6353,7 +6360,7 @@ function Data_Config_n__9473_4509_exactlyOneOf($0, $1, $2, $3) {
6353
6360
 
6354
6361
  /* Data.Config.show */
6355
6362
  function Data_Config_show_Show_Config($0) {
6356
- return Data_String_fastUnlines({a1: Prelude_Types_foldMap_Foldable_List(csegen_49(), $8 => $8, {a1: ' updatedAt: ', a2: {a1: Prelude_Show_show_Show_Bits32($0.a1), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_49(), $17 => $17, {a1: ' org: ', a2: {a1: Prelude_Show_show_Show_String($0.a2), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_49(), $26 => $26, {a1: ' repo: ', a2: {a1: Prelude_Show_show_Show_String($0.a3), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_49(), $35 => $35, {a1: ' defaultRemote: ', a2: {a1: Prelude_Show_show_Show_String($0.a4), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_49(), $44 => $44, {a1: ' mainBranch: ', a2: {a1: Prelude_Show_show_Show_String($0.a5), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_49(), $53 => $53, {a1: ' requestTeams: ', a2: {a1: Prelude_Show_show_Show_Bool($0.a6), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_49(), $62 => $62, {a1: ' requestUsers: ', a2: {a1: Prelude_Show_show_Show_Bool($0.a7), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_49(), $71 => $71, {a1: 'commentOnRequest: ', a2: {a1: Prelude_Show_show_Show_Bool($0.a8), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_49(), $80 => $80, {a1: ' teamSlugs: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_51(), $0.a9), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_49(), $91 => $91, {a1: ' repoLabels: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_51(), $0.a10), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_49(), $a2 => $a2, {a1: ' orgMembers: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_51(), $0.a11), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_49(), $b3 => $b3, {a1: ' ignoredPRs: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29({a1: x => Prelude_Show_show_Show_Integer(x), a2: d => x => Prelude_Show_showPrec_Show_Integer(d, x)}, $0.a12), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_49(), $ca => $ca, {a1: ' githubPAT: ', a2: {a1: Data_Config_n__8977_4025_personalAccessToken($0), a2: {h: 0}}}), a2: {h: 0}}}}}}}}}}}}}});
6363
+ return Data_String_fastUnlines({a1: Prelude_Types_foldMap_Foldable_List(csegen_49(), $8 => $8, {a1: ' updatedAt: ', a2: {a1: Prelude_Show_show_Show_Bits32($0.a1), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_49(), $17 => $17, {a1: ' org: ', a2: {a1: Prelude_Show_show_Show_String($0.a2), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_49(), $26 => $26, {a1: ' repo: ', a2: {a1: Prelude_Show_show_Show_String($0.a3), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_49(), $35 => $35, {a1: ' defaultRemote: ', a2: {a1: Prelude_Show_show_Show_String($0.a4), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_49(), $44 => $44, {a1: ' mainBranch: ', a2: {a1: Prelude_Show_show_Show_String($0.a5), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_49(), $53 => $53, {a1: ' requestTeams: ', a2: {a1: Prelude_Show_show_Show_Bool($0.a6), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_49(), $62 => $62, {a1: ' requestUsers: ', a2: {a1: Prelude_Show_show_Show_Bool($0.a7), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_49(), $71 => $71, {a1: 'commentOnRequest: ', a2: {a1: Prelude_Show_show_Show_Bool($0.a8), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_49(), $80 => $80, {a1: ' teamSlugs: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_51(), $0.a9), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_49(), $91 => $91, {a1: ' repoLabels: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_51(), $0.a10), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_49(), $a2 => $a2, {a1: ' orgMembers: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_51(), $0.a11), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_49(), $b3 => $b3, {a1: ' ignoredPRs: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29({a1: x => Prelude_Show_show_Show_Integer(x), a2: d => x => Prelude_Show_showPrec_Show_Integer(d, x)}, $0.a12), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_49(), $ca => $ca, {a1: ' githubPAT: ', a2: {a1: Data_Config_n__8993_4025_personalAccessToken($0), a2: {h: 0}}}), a2: {h: 0}}}}}}}}}}}}}});
6357
6364
  }
6358
6365
 
6359
6366
  /* Data.Config.show */
@@ -6436,18 +6443,18 @@ function Data_Config_parseConfig($0, $1) {
6436
6443
  }
6437
6444
  };
6438
6445
  const $4 = {a1: $5, a2: a => $d => ({h: 1 /* Right */, a1: $d}), a3: $f};
6439
- const $3 = {a1: $4, a2: csegen_203(), a3: csegen_204()};
6440
- return Prelude_Interfaces_x3ex3dx3e($3, csegen_205(), $20 => Data_Config_n__9464_4502_parseConfigJson($0, $20), $1);
6446
+ const $3 = {a1: $4, a2: csegen_204(), a3: csegen_205()};
6447
+ return Prelude_Interfaces_x3ex3dx3e($3, csegen_206(), $20 => Data_Config_n__9480_4502_parseConfigJson($0, $20), $1);
6441
6448
  }
6442
6449
 
6443
6450
  /* Data.Config.longestSettablePropName : Nat */
6444
6451
  const Data_Config_longestSettablePropName = __lazy(function () {
6445
- return Prelude_Types_foldr_Foldable_List(csegen_206(), 0n, Prelude_Types_List_mapAppend({h: 0}, $8 => Prelude_Types_String_length(Data_Config_propNamex27($8)), Data_Config_settableProps()));
6452
+ return Prelude_Types_foldr_Foldable_List(csegen_207(), 0n, Prelude_Types_List_mapAppend({h: 0}, $8 => Prelude_Types_String_length(Data_Config_propNamex27($8)), Data_Config_settableProps()));
6446
6453
  });
6447
6454
 
6448
6455
  /* Data.Config.json : Config -> JSON */
6449
6456
  function Data_Config_json($0) {
6450
- return {h: 6 /* JObject */, a1: {a1: {a1: 'requestTeams', a2: {h: 3 /* JBool */, a1: $0.a6}}, a2: {a1: {a1: 'requestUsers', a2: {h: 3 /* JBool */, a1: $0.a7}}, a2: {a1: {a1: 'commentOnRequest', a2: {h: 3 /* JBool */, a1: $0.a8}}, a2: {a1: {a1: 'org', a2: {h: 4 /* JString */, a1: $0.a2}}, a2: {a1: {a1: 'repo', a2: {h: 4 /* JString */, a1: $0.a3}}, a2: {a1: {a1: 'defaultRemote', a2: {h: 4 /* JString */, a1: $0.a4}}, a2: {a1: {a1: 'mainBranch', a2: {h: 4 /* JString */, a1: $0.a5}}, a2: {a1: {a1: 'orgMembers', a2: {h: 5 /* JArray */, a1: Prelude_Types_List_mapAppend({h: 0}, $2d => ({h: 4 /* JString */, a1: $2d}), Data_List_sort(csegen_217(), $0.a11))}}, a2: {a1: {a1: 'teamSlugs', a2: {h: 5 /* JArray */, a1: Prelude_Types_List_mapAppend({h: 0}, $3c => ({h: 4 /* JString */, a1: $3c}), Data_List_sort(csegen_217(), $0.a9))}}, a2: {a1: {a1: 'repoLabels', a2: {h: 5 /* JArray */, a1: Prelude_Types_List_mapAppend({h: 0}, $4b => ({h: 4 /* JString */, a1: $4b}), Data_List_sort(csegen_217(), $0.a10))}}, a2: {a1: {a1: 'ignoredPRs', a2: {h: 5 /* JArray */, a1: Prelude_Types_List_mapAppend({h: 0}, $5a => ({h: 1 /* JInteger */, a1: $5a}), Data_List_sort({a1: csegen_220(), a2: csegen_221(), a3: $64 => $65 => Prelude_EqOrd_x3c_Ord_Integer($64, $65), a4: $6a => $6b => Prelude_EqOrd_x3e_Ord_Integer($6a, $6b), a5: $70 => $71 => Prelude_EqOrd_x3cx3d_Ord_Integer($70, $71), a6: $76 => $77 => Prelude_EqOrd_x3ex3d_Ord_Integer($76, $77), a7: $7c => $7d => Prelude_EqOrd_max_Ord_Integer($7c, $7d), a8: $82 => $83 => Prelude_EqOrd_min_Ord_Integer($82, $83)}, $0.a12))}}, a2: {a1: {a1: 'githubPAT', a2: Prelude_Types_maybe(() => ({h: 0 /* JNull */}), () => $8f => ({h: 4 /* JString */, a1: $8f}), $0.a13)}, a2: {a1: {a1: 'updatedAt', a2: {h: 1 /* JInteger */, a1: BigInt($0.a1)}}, a2: {h: 0}}}}}}}}}}}}}}};
6457
+ return {h: 6 /* JObject */, a1: {a1: {a1: 'requestTeams', a2: {h: 3 /* JBool */, a1: $0.a6}}, a2: {a1: {a1: 'requestUsers', a2: {h: 3 /* JBool */, a1: $0.a7}}, a2: {a1: {a1: 'commentOnRequest', a2: {h: 3 /* JBool */, a1: $0.a8}}, a2: {a1: {a1: 'org', a2: {h: 4 /* JString */, a1: $0.a2}}, a2: {a1: {a1: 'repo', a2: {h: 4 /* JString */, a1: $0.a3}}, a2: {a1: {a1: 'defaultRemote', a2: {h: 4 /* JString */, a1: $0.a4}}, a2: {a1: {a1: 'mainBranch', a2: {h: 4 /* JString */, a1: $0.a5}}, a2: {a1: {a1: 'orgMembers', a2: {h: 5 /* JArray */, a1: Prelude_Types_List_mapAppend({h: 0}, $2d => ({h: 4 /* JString */, a1: $2d}), Data_List_sort(csegen_218(), $0.a11))}}, a2: {a1: {a1: 'teamSlugs', a2: {h: 5 /* JArray */, a1: Prelude_Types_List_mapAppend({h: 0}, $3c => ({h: 4 /* JString */, a1: $3c}), Data_List_sort(csegen_218(), $0.a9))}}, a2: {a1: {a1: 'repoLabels', a2: {h: 5 /* JArray */, a1: Prelude_Types_List_mapAppend({h: 0}, $4b => ({h: 4 /* JString */, a1: $4b}), Data_List_sort(csegen_218(), $0.a10))}}, a2: {a1: {a1: 'ignoredPRs', a2: {h: 5 /* JArray */, a1: Prelude_Types_List_mapAppend({h: 0}, $5a => ({h: 1 /* JInteger */, a1: $5a}), Data_List_sort({a1: csegen_221(), a2: csegen_222(), a3: $64 => $65 => Prelude_EqOrd_x3c_Ord_Integer($64, $65), a4: $6a => $6b => Prelude_EqOrd_x3e_Ord_Integer($6a, $6b), a5: $70 => $71 => Prelude_EqOrd_x3cx3d_Ord_Integer($70, $71), a6: $76 => $77 => Prelude_EqOrd_x3ex3d_Ord_Integer($76, $77), a7: $7c => $7d => Prelude_EqOrd_max_Ord_Integer($7c, $7d), a8: $82 => $83 => Prelude_EqOrd_min_Ord_Integer($82, $83)}, $0.a12))}}, a2: {a1: {a1: 'githubPAT', a2: Prelude_Types_maybe(() => ({h: 0 /* JNull */}), () => $8f => ({h: 4 /* JString */, a1: $8f}), $0.a13)}, a2: {a1: {a1: 'updatedAt', a2: {h: 1 /* JInteger */, a1: BigInt($0.a1)}}, a2: {h: 0}}}}}}}}}}}}}}};
6451
6458
  }
6452
6459
 
6453
6460
  /* Data.Config.filename : String */
@@ -7009,13 +7016,13 @@ function JSON_Parser_eqJSON($0, $1) {
7009
7016
  }
7010
7017
  case 5: /* JArray */ {
7011
7018
  switch($1.h) {
7012
- case 5: /* JArray */ return Prelude_Types_x3dx3d_Eq_x28Listx20x24ax29(csegen_234(), $0.a1, $1.a1);
7019
+ case 5: /* JArray */ return Prelude_Types_x3dx3d_Eq_x28Listx20x24ax29(csegen_235(), $0.a1, $1.a1);
7013
7020
  default: return 0;
7014
7021
  }
7015
7022
  }
7016
7023
  case 6: /* JObject */ {
7017
7024
  switch($1.h) {
7018
- case 6: /* JObject */ return Prelude_Types_x3dx3d_Eq_x28Listx20x24ax29({a1: $1e => $1f => Prelude_EqOrd_x3dx3d_Eq_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_39(), csegen_234(), $1e, $1f), a2: $28 => $29 => Prelude_EqOrd_x2fx3d_Eq_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_39(), csegen_234(), $28, $29)}, $0.a1, $1.a1);
7025
+ case 6: /* JObject */ return Prelude_Types_x3dx3d_Eq_x28Listx20x24ax29({a1: $1e => $1f => Prelude_EqOrd_x3dx3d_Eq_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_39(), csegen_235(), $1e, $1f), a2: $28 => $29 => Prelude_EqOrd_x2fx3d_Eq_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_39(), csegen_235(), $28, $29)}, $0.a1, $1.a1);
7019
7026
  default: return 0;
7020
7027
  }
7021
7028
  }
@@ -7255,7 +7262,7 @@ function Text_ParseError_failInParenEOI($0, $1, $2, $3) {
7255
7262
  case 1: /* Right */ {
7256
7263
  const $8 = {h: 1 /* Fail0 */, a1: {a1: {h: 9 /* Unexpected */, a1: {h: 1 /* Right */, a1: $3.a1.a1.a1.a1}}, a2: $3.a1.a2}};
7257
7264
  switch($2($3.a1.a1.a1.a1)) {
7258
- case 1: return csegen_241()($0)({h: 8 /* Unclosed */, a1: {h: 1 /* Right */, a1: $1}});
7265
+ case 1: return csegen_242()($0)({h: 8 /* Unclosed */, a1: {h: 1 /* Right */, a1: $1}});
7259
7266
  case 0: return Text_ParseError_failInParen($0, $1, $8);
7260
7267
  }
7261
7268
  }
@@ -7275,7 +7282,7 @@ function Text_ParseError_failInParenEOI($0, $1, $2, $3) {
7275
7282
  case undefined: /* cons */ {
7276
7283
  const $2a = {h: 0 /* Succ0 */, a1: $3.a1, a2: {a1: {a1: $3.a2.a1.a1, a2: $3.a2.a1.a2}, a2: $3.a2.a2}};
7277
7284
  switch($2($3.a2.a1.a1)) {
7278
- case 1: return csegen_241()($0)({h: 8 /* Unclosed */, a1: {h: 1 /* Right */, a1: $1}});
7285
+ case 1: return csegen_242()($0)({h: 8 /* Unclosed */, a1: {h: 1 /* Right */, a1: $1}});
7279
7286
  case 0: return Text_ParseError_failInParen($0, $1, $2a);
7280
7287
  }
7281
7288
  }
@@ -7296,7 +7303,7 @@ function Text_ParseError_failInParen($0, $1, $2) {
7296
7303
  switch($2.a1.h) {
7297
7304
  case undefined: /* cons */ {
7298
7305
  switch($2.a1.a1.h) {
7299
- case 1: /* EOI */ return csegen_241()($0)({h: 8 /* Unclosed */, a1: {h: 1 /* Right */, a1: $1}});
7306
+ case 1: /* EOI */ return csegen_242()($0)({h: 8 /* Unclosed */, a1: {h: 1 /* Right */, a1: $1}});
7300
7307
  default: return {h: 1 /* Fail0 */, a1: $2.a1};
7301
7308
  }
7302
7309
  }
@@ -7305,8 +7312,8 @@ function Text_ParseError_failInParen($0, $1, $2) {
7305
7312
  }
7306
7313
  case 0: /* Succ0 */ {
7307
7314
  switch($2.a2.h) {
7308
- case 0: /* nil */ return csegen_241()($0)({h: 8 /* Unclosed */, a1: {h: 1 /* Right */, a1: $1}});
7309
- case undefined: /* cons */ return csegen_241()($2.a2.a1.a2)({h: 9 /* Unexpected */, a1: {h: 1 /* Right */, a1: $2.a2.a1.a1}});
7315
+ case 0: /* nil */ return csegen_242()($0)({h: 8 /* Unclosed */, a1: {h: 1 /* Right */, a1: $1}});
7316
+ case undefined: /* cons */ return csegen_242()($2.a2.a1.a2)({h: 9 /* Unexpected */, a1: {h: 1 /* Right */, a1: $2.a2.a1.a1}});
7310
7317
  }
7311
7318
  }
7312
7319
  }
@@ -7315,8 +7322,8 @@ function Text_ParseError_failInParen($0, $1, $2) {
7315
7322
  /* Text.ParseError.fail : List (Bounded t) -> Result0 b (Bounded t) ts (Bounded (ParseError t y)) a */
7316
7323
  function Text_ParseError_fail($0) {
7317
7324
  switch($0.h) {
7318
- case undefined: /* cons */ return csegen_241()($0.a1.a2)({h: 9 /* Unexpected */, a1: {h: 1 /* Right */, a1: $0.a1.a1}});
7319
- case 0: /* nil */ return csegen_241()({h: 0})({h: 1 /* EOI */});
7325
+ case undefined: /* cons */ return csegen_242()($0.a1.a2)({h: 9 /* Unexpected */, a1: {h: 1 /* Right */, a1: $0.a1.a1}});
7326
+ case 0: /* nil */ return csegen_242()({h: 0})({h: 1 /* EOI */});
7320
7327
  }
7321
7328
  }
7322
7329
 
@@ -7798,14 +7805,14 @@ function System_File_ReadWrite_readLinesOnto($0, $1, $2, $3, $4) {
7798
7805
  }
7799
7806
  };
7800
7807
  const $26 = {a1: $27, a2: a => $2f => ({h: 1 /* Right */, a1: $2f}), a3: $31};
7801
- const $25 = {a1: $26, a2: csegen_203(), a3: csegen_204()};
7808
+ const $25 = {a1: $26, a2: csegen_204(), a3: csegen_205()};
7802
7809
  const $40 = b => a => func => $41 => {
7803
7810
  switch($41.h) {
7804
7811
  case 0: /* Left */ return {h: 0 /* Left */, a1: $41.a1};
7805
7812
  case 1: /* Right */ return {h: 1 /* Right */, a1: func($41.a1)};
7806
7813
  }
7807
7814
  };
7808
- const $3f = {a1: $40, a2: csegen_261(), a3: csegen_265()};
7815
+ const $3f = {a1: $40, a2: csegen_262(), a3: csegen_266()};
7809
7816
  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));
7810
7817
  }
7811
7818
  default: {
@@ -8243,7 +8250,7 @@ function System_getEnv($0, $1) {
8243
8250
  function System_getArgs($0) {
8244
8251
  const $12 = n => {
8245
8252
  switch(Prelude_EqOrd_x3e_Ord_Int(n, Number(_truncBigInt32(0n)))) {
8246
- case 1: return Prelude_Basics_flip($1a => $1b => Prelude_Types_traverse_Traversable_List($0.a1.a1, $1a, $1b), Prelude_Types_rangeFromTo_Range_x24a({a1: {a1: csegen_279(), a2: $29 => $2a => Prelude_Num_div_Integral_Int($29, $2a), a3: $2f => $30 => Prelude_Num_mod_Integral_Int($2f, $30)}, a2: {a1: {a1: {a1: $38 => $39 => Prelude_EqOrd_x3dx3d_Eq_Int($38, $39), a2: $3e => $3f => Prelude_EqOrd_x2fx3d_Eq_Int($3e, $3f)}, a2: $44 => $45 => Prelude_EqOrd_compare_Ord_Int($44, $45), a3: $4a => $4b => Prelude_EqOrd_x3c_Ord_Int($4a, $4b), a4: $50 => $51 => Prelude_EqOrd_x3e_Ord_Int($50, $51), a5: $56 => $57 => Prelude_EqOrd_x3cx3d_Ord_Int($56, $57), a6: $5c => $5d => Prelude_EqOrd_x3ex3d_Ord_Int($5c, $5d), a7: $62 => $63 => Prelude_EqOrd_max_Ord_Int($62, $63), a8: $68 => $69 => Prelude_EqOrd_min_Ord_Int($68, $69)}, a2: {a1: csegen_279(), a2: $71 => _sub32s(0, $71), a3: $75 => $76 => _sub32s($75, $76)}}}, 0, _sub32s(n, 1)), $7e => $0.a2(undefined)($84 => System_prim__getArg($7e, $84)));
8253
+ case 1: return Prelude_Basics_flip($1a => $1b => Prelude_Types_traverse_Traversable_List($0.a1.a1, $1a, $1b), Prelude_Types_rangeFromTo_Range_x24a({a1: {a1: csegen_280(), a2: $29 => $2a => Prelude_Num_div_Integral_Int($29, $2a), a3: $2f => $30 => Prelude_Num_mod_Integral_Int($2f, $30)}, a2: {a1: {a1: {a1: $38 => $39 => Prelude_EqOrd_x3dx3d_Eq_Int($38, $39), a2: $3e => $3f => Prelude_EqOrd_x2fx3d_Eq_Int($3e, $3f)}, a2: $44 => $45 => Prelude_EqOrd_compare_Ord_Int($44, $45), a3: $4a => $4b => Prelude_EqOrd_x3c_Ord_Int($4a, $4b), a4: $50 => $51 => Prelude_EqOrd_x3e_Ord_Int($50, $51), a5: $56 => $57 => Prelude_EqOrd_x3cx3d_Ord_Int($56, $57), a6: $5c => $5d => Prelude_EqOrd_x3ex3d_Ord_Int($5c, $5d), a7: $62 => $63 => Prelude_EqOrd_max_Ord_Int($62, $63), a8: $68 => $69 => Prelude_EqOrd_min_Ord_Int($68, $69)}, a2: {a1: csegen_280(), a2: $71 => _sub32s(0, $71), a3: $75 => $76 => _sub32s($75, $76)}}}, 0, _sub32s(n, 1)), $7e => $0.a2(undefined)($84 => System_prim__getArg($7e, $84)));
8247
8254
  case 0: return $0.a1.a1.a2(undefined)({h: 0});
8248
8255
  }
8249
8256
  };
@@ -8276,22 +8283,23 @@ function Help_warning($0) {
8276
8283
  /* Help.subcommandHelp' : String -> Doc AnsiStyle */
8277
8284
  function Help_subcommandHelpx27($0) {
8278
8285
  switch($0) {
8279
- case 'label': return Help_subcommand($0, {a1: Help_argument(1, '<label>'), a2: csegen_299()}, {a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Add one or more labels to a PR, creating a new PR if one does not exist.'), Text_PrettyPrint_Prettyprinter_Doc_line()), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Labels that do not exist yet will be created automatically.')), a2: {h: 0}});
8280
- case 'request': return Help_subcommand($0, {a1: Help_argument(1, '<team-slug> | +<user-login>'), a2: csegen_304()}, {a1: Text_PrettyPrint_Prettyprinter_Util_reflow(Prelude_Types_foldMap_Foldable_List(csegen_49(), $2a => $2a, {a1: 'Request review from the given team(s) and one lucky member from one\nof those teams to review the PR for the current branch.', a2: {h: 0}})), a2: {a1: Text_PrettyPrint_Prettyprinter_Util_reflow(Prelude_Types_foldMap_Foldable_List(csegen_49(), $36 => $36, {a1: 'Also request reviews from any users with logins specified. You specify\nthese additional users by prefixing their logins with \'+\'.', a2: {h: 0}})), a2: csegen_310()}});
8286
+ case 'label': return Help_subcommand($0, {a1: Help_argument(1, '<label>'), a2: csegen_300()}, {a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Add one or more labels to a PR, creating a new PR if one does not exist.'), Text_PrettyPrint_Prettyprinter_Doc_line()), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Labels that do not exist yet will be created automatically.')), a2: {h: 0}});
8287
+ case 'request': return Help_subcommand($0, {a1: Help_argument(1, '<team-slug> | +<user-login>'), a2: csegen_305()}, {a1: Text_PrettyPrint_Prettyprinter_Util_reflow(Prelude_Types_foldMap_Foldable_List(csegen_49(), $2a => $2a, {a1: 'Request review from the given team(s) and one lucky member from one\nof those teams to review the PR for the current branch.', a2: {h: 0}})), a2: {a1: Text_PrettyPrint_Prettyprinter_Util_reflow(Prelude_Types_foldMap_Foldable_List(csegen_49(), $36 => $36, {a1: 'Also request reviews from any users with logins specified. You specify\nthese additional users by prefixing their logins with \'+\'.', a2: {h: 0}})), a2: csegen_311()}});
8281
8288
  case 'config': return Help_subcommand($0, {a1: Help_argument(1, '<property>'), a2: {a1: Help_argument(0, '<value>'), a2: {h: 0}}}, {a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Util_reflow(Prelude_Types_foldMap_Foldable_List(csegen_49(), $59 => $59, {a1: 'Get or set the value of a configuration property. Not all properties\ncan be set and read via this subcommand.', a2: {h: 0}})), Text_PrettyPrint_Prettyprinter_Doc_line()), Help_argumentx27('properties')), Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_unsafeTextWithoutNewLines(':'), a2: {h: 0}})), Text_PrettyPrint_Prettyprinter_Doc_align(Text_PrettyPrint_Prettyprinter_Doc_concatWith(a => b => Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(a, Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_unsafeTextWithoutNewLines(','), a2: {h: 0}})), Text_PrettyPrint_Prettyprinter_Doc_softline()), b), Prelude_Types_List_mapAppend({h: 0}, $82 => Help_option($82), Data_Config_settablePropNames())))), a2: {h: 0}});
8282
- case 'pr': return Help_subcommand($0, {a1: Help_argument(0, '--draft'), a2: csegen_304()}, {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Identify an existing PR or create a new one for the current branch.'), a2: csegen_310()});
8289
+ case 'pr': return Help_subcommand($0, {a1: Help_argument(0, '--draft'), a2: csegen_305()}, {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Identify an existing PR or create a new one for the current branch.'), a2: csegen_311()});
8283
8290
  case 'contribute': return Help_subcommand($0, {a1: Help_argument(0, '-c/--checkout'), a2: {a1: Help_argument(0, '-<num>'), a2: {a1: Help_argument(0, '-i/--ignore {<uri>/<pr-number>}'), a2: {h: 0}}}}, {a1: Text_PrettyPrint_Prettyprinter_Util_reflow(Prelude_Types_foldMap_Foldable_List(csegen_49(), $b1 => $b1, {a1: 'Contribute to an open PR. Prints a URL. Prioritizes PRs you are\nrequested to review but will also return other PRs.', a2: {h: 0}})), a2: {a1: Text_PrettyPrint_Prettyprinter_Util_reflow(Prelude_Types_foldMap_Foldable_List(csegen_49(), $bd => $bd, {a1: 'Use dash followed by a number (e.g. \'-3\') to skip that number of\npotential PRs and return the next.', a2: {h: 0}})), a2: {a1: Text_PrettyPrint_Prettyprinter_Util_reflow(Prelude_Types_foldMap_Foldable_List(csegen_49(), $c9 => $c9, {a1: 'Specify a PR to ignore (only affects the local Harmony config on\nthis machine) if you would like to more permanently skip a potential\nPR. Do this with the \'--ignore\' option followed by a GitHub URI or\nPull Request number.', a2: {h: 0}})), a2: {h: 0}}}});
8284
- case 'graph': return Help_subcommand($0, {a1: Help_argument(0, '-c/--completed'), a2: csegen_344()}, {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Graph the relative review workload of the members of the given GitHub Team.'), a2: {h: 0}});
8291
+ case 'graph': return Help_subcommand($0, {a1: Help_argument(0, '-c/--completed'), a2: csegen_345()}, {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Graph the relative review workload of the members of the given GitHub Team.'), a2: {h: 0}});
8285
8292
  case 'help': return Help_subcommand($0, {a1: Help_argument(0, '<subcommand>'), a2: {h: 0}}, {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Print help'), a2: {h: 0}});
8286
8293
  case 'version': return Help_subcommand($0, {h: 0}, {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Print version'), a2: {h: 0}});
8287
8294
  case 'sync': return Help_subcommand($0, {h: 0}, {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Synchronize local config with information from GitHub.'), a2: {h: 0}});
8288
8295
  case 'branch': return Help_subcommand($0, {h: 0}, {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Print the GitHub URI for the currently checked out branch.'), a2: {h: 0}});
8289
8296
  case 'whoami': return Help_subcommand($0, {h: 0}, {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Print information about the configured and authenticated user.'), a2: {h: 0}});
8290
8297
  case 'reflect': return Help_subcommand($0, {h: 0}, {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Reflect on the current state of ones own PRs and review requests.'), a2: {h: 0}});
8291
- case 'list': return Help_subcommand($0, csegen_344(), {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('List the members of the given GitHub Team.'), a2: {h: 0}});
8298
+ case 'list': return Help_subcommand($0, csegen_345(), {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('List the members of the given GitHub Team.'), a2: {h: 0}});
8292
8299
  case 'health': return Help_subcommand($0, {h: 0}, {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Graph all open PRs grouped by the month they were created.'), a2: {h: 0}});
8300
+ case 'rq': return Help_subcommand($0, {h: 0}, {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Alias for \'request\' command.'), a2: {h: 0}});
8293
8301
  case 'assign': return Help_subcommand($0, {h: 0}, {a1: Help_warning('Deprecated alias for \'request\' command.'), a2: {h: 0}});
8294
- default: return Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_foldMap_Foldable_List(csegen_49(), $130 => $130, {a1: 'Unreconized command: ', a2: {a1: $0, a2: {h: 0}}}));
8302
+ default: return Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_foldMap_Foldable_List(csegen_49(), $138 => $138, {a1: 'Unreconized command: ', a2: {a1: $0, a2: {h: 0}}}));
8295
8303
  }
8296
8304
  }
8297
8305
 
@@ -8331,7 +8339,7 @@ function Help_option($0) {
8331
8339
 
8332
8340
  /* Help.helpDocs : Doc AnsiStyle */
8333
8341
  const Help_helpDocs = __lazy(function () {
8334
- return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('harmony'), Help_subcommandx27('<subcommand>')), a2: {a1: Help_heading('Subcommands', Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Help_subcommandHelpx27('assign'), a2: {a1: Help_subcommandHelpx27('branch'), a2: {a1: Help_subcommandHelpx27('config'), a2: {a1: Help_subcommandHelpx27('contribute'), a2: {a1: Help_subcommandHelpx27('graph'), a2: {a1: Help_subcommandHelpx27('health'), a2: {a1: Help_subcommandHelpx27('help'), a2: {a1: Help_subcommandHelpx27('label'), a2: {a1: Help_subcommandHelpx27('list'), a2: {a1: Help_subcommandHelpx27('pr'), a2: {a1: Help_subcommandHelpx27('reflect'), a2: {a1: Help_subcommandHelpx27('request'), a2: {a1: Help_subcommandHelpx27('sync'), a2: {a1: Help_subcommandHelpx27('version'), a2: {a1: Help_subcommandHelpx27('whoami'), a2: {h: 0}}}}}}}}}}}}}}}})), a2: {a1: Help_heading('Prompt Completion', Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Util_reflow(Prelude_Types_foldMap_Foldable_List(csegen_49(), $5b => $5b, {a1: 'You can set up bash completion by adding the following to your bashrc\nfile or bash profile:', a2: {h: 0}})), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_vsep({h: 0}), a2: {a1: Help_shell('eval \"$(harmony --bash-completion-script)\"'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_vsep({h: 0}), a2: {a1: Text_PrettyPrint_Prettyprinter_Util_reflow(Prelude_Types_foldMap_Foldable_List(csegen_49(), $73 => $73, {a1: 'You can set up zsh completion by adding the following to your zshrc\nfile or zsh profile:', a2: {h: 0}})), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_vsep({h: 0}), a2: {a1: Help_shell('eval \"$(harmony --zsh-completion-script)\"'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_vsep({h: 0}), a2: {h: 0}}}}}}}}})), a2: {h: 0}}}});
8342
+ return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('harmony'), Help_subcommandx27('<subcommand>')), a2: {a1: Help_heading('Subcommands', Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Help_subcommandHelpx27('assign'), a2: {a1: Help_subcommandHelpx27('branch'), a2: {a1: Help_subcommandHelpx27('config'), a2: {a1: Help_subcommandHelpx27('contribute'), a2: {a1: Help_subcommandHelpx27('graph'), a2: {a1: Help_subcommandHelpx27('health'), a2: {a1: Help_subcommandHelpx27('help'), a2: {a1: Help_subcommandHelpx27('label'), a2: {a1: Help_subcommandHelpx27('list'), a2: {a1: Help_subcommandHelpx27('pr'), a2: {a1: Help_subcommandHelpx27('reflect'), a2: {a1: Help_subcommandHelpx27('request'), a2: {a1: Help_subcommandHelpx27('rq'), a2: {a1: Help_subcommandHelpx27('sync'), a2: {a1: Help_subcommandHelpx27('version'), a2: {a1: Help_subcommandHelpx27('whoami'), a2: {h: 0}}}}}}}}}}}}}}}}})), a2: {a1: Help_heading('Prompt Completion', Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Util_reflow(Prelude_Types_foldMap_Foldable_List(csegen_49(), $5f => $5f, {a1: 'You can set up bash completion by adding the following to your bashrc\nfile or bash profile:', a2: {h: 0}})), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_vsep({h: 0}), a2: {a1: Help_shell('eval \"$(harmony --bash-completion-script)\"'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_vsep({h: 0}), a2: {a1: Text_PrettyPrint_Prettyprinter_Util_reflow(Prelude_Types_foldMap_Foldable_List(csegen_49(), $77 => $77, {a1: 'You can set up zsh completion by adding the following to your zshrc\nfile or zsh profile:', a2: {h: 0}})), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_vsep({h: 0}), a2: {a1: Help_shell('eval \"$(harmony --zsh-completion-script)\"'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_vsep({h: 0}), a2: {h: 0}}}}}}}}})), a2: {h: 0}}}});
8335
8343
  });
8336
8344
 
8337
8345
  /* Help.help : Bool -> String */
@@ -8446,12 +8454,12 @@ function FFI_GitHub_listPullRequestsJsonStr($0, $1, $2, $3, $4, $5) {
8446
8454
  String -> String -> Maybe GitHubPRState -> Fin 101 -> {default 0 _ : Nat} ->
8447
8455
  Promise (List PullRequest) */
8448
8456
  function FFI_GitHub_listPullRequests($0, $1, $2, $3, $4, $5) {
8449
- return Prelude_Basics_flip(csegen_398(), csegen_399(), FFI_GitHub_listPullRequestsJsonStr($0, $1, $2, $3, $4, $5));
8457
+ return Prelude_Basics_flip(csegen_401(), csegen_402(), FFI_GitHub_listPullRequestsJsonStr($0, $1, $2, $3, $4, $5));
8450
8458
  }
8451
8459
 
8452
8460
  /* FFI.GitHub.listPRsForBranch : Octokit => String -> String -> String -> Promise (List PullRequest) */
8453
8461
  function FFI_GitHub_listPRsForBranch($0, $1, $2, $3) {
8454
- return Prelude_Basics_flip(csegen_398(), csegen_399(), $a => $b => FFI_promiseIO($e => $f => $10 => FFI_GitHub_prim__listPRsForBranch($0, $1, $2, $3, $e, $f, $10), $a, $b));
8462
+ return Prelude_Basics_flip(csegen_401(), csegen_402(), $a => $b => FFI_promiseIO($e => $f => $10 => FFI_GitHub_prim__listPRsForBranch($0, $1, $2, $3, $e, $f, $10), $a, $b));
8455
8463
  }
8456
8464
 
8457
8465
  /* FFI.GitHub.listOrgMembers : Octokit => String -> Promise (List String) */
@@ -8466,12 +8474,12 @@ function FFI_GitHub_listMyTeams($0, $1, $2) {
8466
8474
 
8467
8475
  /* FFI.GitHub.getUser : Octokit => String -> Promise User */
8468
8476
  function FFI_GitHub_getUser($0) {
8469
- return Prelude_Interfaces_x3cx3dx3c(csegen_69(), csegen_400(), $7 => $8 => $9 => FFI_promiseIO($c => $d => $e => FFI_GitHub_prim__getUser($0, $7, $c, $d, $e), $8, $9));
8477
+ return Prelude_Interfaces_x3cx3dx3c(csegen_69(), csegen_403(), $7 => $8 => $9 => FFI_promiseIO($c => $d => $e => FFI_GitHub_prim__getUser($0, $7, $c, $d, $e), $8, $9));
8470
8478
  }
8471
8479
 
8472
8480
  /* FFI.GitHub.getSelf : Octokit => Promise User */
8473
8481
  function FFI_GitHub_getSelf($0) {
8474
- return Prelude_Basics_flip(csegen_398(), csegen_400(), $7 => $8 => FFI_promiseIO($b => $c => $d => FFI_GitHub_prim__getSelf($0, $b, $c, $d), $7, $8));
8482
+ return Prelude_Basics_flip(csegen_401(), csegen_403(), $7 => $8 => FFI_promiseIO($b => $c => $d => FFI_GitHub_prim__getSelf($0, $b, $c, $d), $7, $8));
8475
8483
  }
8476
8484
 
8477
8485
  /* FFI.GitHub.getRepoDefaultBranch : Octokit => String -> String -> Promise String */
@@ -8482,7 +8490,7 @@ function FFI_GitHub_getRepoDefaultBranch($0, $1, $2, $3, $4) {
8482
8490
  /* FFI.GitHub.createPR : Octokit => {default False _ : Bool} ->
8483
8491
  String -> String -> String -> String -> String -> String -> Promise PullRequest */
8484
8492
  function FFI_GitHub_createPR($0, $1, $2, $3, $4, $5, $6, $7) {
8485
- return Prelude_Basics_flip(csegen_398(), $c => $d => Data_Promise_either(csegen_51(), Data_PullRequest_parsePullRequestString($c), $d), $16 => $17 => FFI_promiseIO($1a => $1b => $1c => FFI_GitHub_prim__createPR($0, $2, $3, $4, $5, $6, $7, $1, $1a, $1b, $1c), $16, $17));
8493
+ return Prelude_Basics_flip(csegen_401(), $c => $d => Data_Promise_either(csegen_51(), Data_PullRequest_parsePullRequestString($c), $d), $16 => $17 => FFI_promiseIO($1a => $1b => $1c => FFI_GitHub_prim__createPR($0, $2, $3, $4, $5, $6, $7, $1, $1a, $1b, $1c), $16, $17));
8486
8494
  }
8487
8495
 
8488
8496
  /* FFI.GitHub.createComment : Octokit => String -> String -> Integer -> String -> Promise () */
@@ -8521,8 +8529,8 @@ function Data_User_parseUserString($0) {
8521
8529
  }
8522
8530
  };
8523
8531
  const $3 = {a1: $4, a2: a => $c => ({h: 1 /* Right */, a1: $c}), a3: $e};
8524
- const $2 = {a1: $3, a2: csegen_203(), a3: csegen_204()};
8525
- return Prelude_Interfaces_x3ex3dx3e($2, csegen_205(), $1f => Data_User_parseUser($1f), $0);
8532
+ const $2 = {a1: $3, a2: csegen_204(), a3: csegen_205()};
8533
+ return Prelude_Interfaces_x3ex3dx3e($2, csegen_206(), $1f => Data_User_parseUser($1f), $0);
8526
8534
  }
8527
8535
 
8528
8536
  /* Data.User.parseUser : JSON -> Either String User */
@@ -8552,7 +8560,7 @@ function Data_Review_parseState($0) {
8552
8560
 
8553
8561
  /* Data.Review.parseReview : JSON -> Either String Review */
8554
8562
  function Data_Review_parseReview($0) {
8555
- return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_object($0), review => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_lookupAll({a1: 'author', a2: {a1: 'state', a2: {a1: 'submitted_at', a2: {h: 0}}}}, review), $12 => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_string($12.a1), author => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Prelude_Basics_flip(csegen_405(), $22 => Data_Review_parseState($22), Language_JSON_Accessors_string($12.a2.a1)), state => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Prelude_Basics_flip(csegen_405(), $2f => Data_Review_parseDateTime($2f), Language_JSON_Accessors_string($12.a2.a2.a1)), submittedAt => ({h: 1 /* Right */, a1: {a1: submittedAt, a2: author, a3: state}}))))));
8563
+ return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_object($0), review => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_lookupAll({a1: 'author', a2: {a1: 'state', a2: {a1: 'submitted_at', a2: {h: 0}}}}, review), $12 => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_string($12.a1), author => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Prelude_Basics_flip(csegen_408(), $22 => Data_Review_parseState($22), Language_JSON_Accessors_string($12.a2.a1)), state => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Prelude_Basics_flip(csegen_408(), $2f => Data_Review_parseDateTime($2f), Language_JSON_Accessors_string($12.a2.a2.a1)), submittedAt => ({h: 1 /* Right */, a1: {a1: submittedAt, a2: author, a3: state}}))))));
8556
8564
  }
8557
8565
 
8558
8566
  /* Data.Review.parseDateTime : String -> Either String Date */
@@ -8686,7 +8694,7 @@ function Data_Date_max_Ord_Date($0, $1) {
8686
8694
 
8687
8695
  /* Data.Date.compare */
8688
8696
  function Data_Date_compare_Ord_Date($0, $1) {
8689
- return Prelude_Types_compare_Ord_x28Listx20x24ax29({a1: {a1: $8 => $9 => (($8===$9)?1:0), a2: $d => $e => Prelude_Types_x2fx3d_Eq_Nat($d, $e)}, a2: csegen_221(), a3: $15 => $16 => Prelude_Types_x3c_Ord_Nat($15, $16), a4: $1b => $1c => Prelude_Types_x3e_Ord_Nat($1b, $1c), a5: $21 => $22 => Prelude_Types_x3cx3d_Ord_Nat($21, $22), a6: $27 => $28 => Prelude_Types_x3ex3d_Ord_Nat($27, $28), a7: $2d => $2e => Prelude_Types_max_Ord_Nat($2d, $2e), a8: $33 => $34 => Prelude_Types_min_Ord_Nat($33, $34)}, {a1: $0.a1, a2: {a1: $0.a2, a2: {a1: $0.a3, a2: {h: 0}}}}, {a1: $1.a1, a2: {a1: $1.a2, a2: {a1: $1.a3, a2: {h: 0}}}});
8697
+ return Prelude_Types_compare_Ord_x28Listx20x24ax29({a1: {a1: $8 => $9 => (($8===$9)?1:0), a2: $d => $e => Prelude_Types_x2fx3d_Eq_Nat($d, $e)}, a2: csegen_222(), a3: $15 => $16 => Prelude_Types_x3c_Ord_Nat($15, $16), a4: $1b => $1c => Prelude_Types_x3e_Ord_Nat($1b, $1c), a5: $21 => $22 => Prelude_Types_x3cx3d_Ord_Nat($21, $22), a6: $27 => $28 => Prelude_Types_x3ex3d_Ord_Nat($27, $28), a7: $2d => $2e => Prelude_Types_max_Ord_Nat($2d, $2e), a8: $33 => $34 => Prelude_Types_min_Ord_Nat($33, $34)}, {a1: $0.a1, a2: {a1: $0.a2, a2: {a1: $0.a3, a2: {h: 0}}}}, {a1: $1.a1, a2: {a1: $1.a2, a2: {a1: $1.a3, a2: {h: 0}}}});
8690
8698
  }
8691
8699
 
8692
8700
  /* Data.Date.> */
@@ -8842,8 +8850,8 @@ function Data_PullRequest_parsePullRequestsString($0) {
8842
8850
  }
8843
8851
  };
8844
8852
  const $3 = {a1: $4, a2: a => $c => ({h: 1 /* Right */, a1: $c}), a3: $e};
8845
- const $2 = {a1: $3, a2: csegen_203(), a3: csegen_204()};
8846
- return Prelude_Interfaces_x3ex3dx3e($2, csegen_205(), csegen_418(), $0);
8853
+ const $2 = {a1: $3, a2: csegen_204(), a3: csegen_205()};
8854
+ return Prelude_Interfaces_x3ex3dx3e($2, csegen_206(), csegen_421(), $0);
8847
8855
  }
8848
8856
 
8849
8857
  /* Data.PullRequest.parsePullRequestString : String -> Either String PullRequest */
@@ -8866,13 +8874,13 @@ function Data_PullRequest_parsePullRequestString($0) {
8866
8874
  }
8867
8875
  };
8868
8876
  const $3 = {a1: $4, a2: a => $c => ({h: 1 /* Right */, a1: $c}), a3: $e};
8869
- const $2 = {a1: $3, a2: csegen_203(), a3: csegen_204()};
8870
- return Prelude_Interfaces_x3ex3dx3e($2, csegen_205(), $1f => Data_PullRequest_parsePR($1f), $0);
8877
+ const $2 = {a1: $3, a2: csegen_204(), a3: csegen_205()};
8878
+ return Prelude_Interfaces_x3ex3dx3e($2, csegen_206(), $1f => Data_PullRequest_parsePR($1f), $0);
8871
8879
  }
8872
8880
 
8873
8881
  /* Data.PullRequest.parsePR : JSON -> Either String PullRequest */
8874
8882
  function Data_PullRequest_parsePR($0) {
8875
- return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_object($0), pr => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_lookupAll({a1: 'pull_number', a2: {a1: 'author', a2: {a1: 'state', a2: {a1: 'created_at', a2: {a1: 'merged', a2: {a1: 'draft', a2: {a1: 'reviewers', a2: {a1: 'head_ref', a2: {h: 0}}}}}}}}}, pr), $1c => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_integer($1c.a1), number => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_string($1c.a2.a1), author => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_bool($1c.a2.a2.a2.a2.a1), merged => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_bool($1c.a2.a2.a2.a2.a2.a1), isDraft => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Prelude_Basics_flip(csegen_405(), $40 => Data_PullRequest_parseState(merged, $40), Language_JSON_Accessors_string($1c.a2.a2.a1)), state => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Prelude_Basics_flip(csegen_405(), $4e => Data_PullRequest_parseDateTime($4e), Language_JSON_Accessors_string($1c.a2.a2.a2.a1)), createdAt => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_array($59 => Language_JSON_Accessors_string($59), $1c.a2.a2.a2.a2.a2.a2.a1), reviewers => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_string($1c.a2.a2.a2.a2.a2.a2.a2.a1), headRef => ({h: 1 /* Right */, a1: {a1: number, a2: createdAt, a3: isDraft, a4: author, a5: state, a6: reviewers, a7: headRef}})))))))))));
8883
+ return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_object($0), pr => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_lookupAll({a1: 'pull_number', a2: {a1: 'author', a2: {a1: 'state', a2: {a1: 'created_at', a2: {a1: 'merged', a2: {a1: 'draft', a2: {a1: 'reviewers', a2: {a1: 'head_ref', a2: {h: 0}}}}}}}}}, pr), $1c => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_integer($1c.a1), number => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_string($1c.a2.a1), author => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_bool($1c.a2.a2.a2.a2.a1), merged => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_bool($1c.a2.a2.a2.a2.a2.a1), isDraft => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Prelude_Basics_flip(csegen_408(), $40 => Data_PullRequest_parseState(merged, $40), Language_JSON_Accessors_string($1c.a2.a2.a1)), state => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Prelude_Basics_flip(csegen_408(), $4e => Data_PullRequest_parseDateTime($4e), Language_JSON_Accessors_string($1c.a2.a2.a2.a1)), createdAt => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_array($59 => Language_JSON_Accessors_string($59), $1c.a2.a2.a2.a2.a2.a2.a1), reviewers => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_string($1c.a2.a2.a2.a2.a2.a2.a2.a1), headRef => ({h: 1 /* Right */, a1: {a1: number, a2: createdAt, a3: isDraft, a4: author, a5: state, a6: reviewers, a7: headRef}})))))))))));
8876
8884
  }
8877
8885
 
8878
8886
  /* Data.PullRequest.parseDateTime : String -> Either String Date */
@@ -8905,7 +8913,7 @@ function Config_with__withx20blockx20inx20setConfig_2104($0, $1, $2, $3, $4, $5,
8905
8913
  return $7 => {
8906
8914
  switch($5.h) {
8907
8915
  case 0: /* nothing */ return Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_49(), $f => $f, {a1: $4, a2: {a1: ' is not a valid value for ', a2: {a1: $1, a2: {a1: '.', a2: {h: 0}}}}}), $6, $7);
8908
- case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Types_either(() => $1f => Util_renderIO($5.a1, csegen_72(), $1f), () => csegen_426(), Config_checkConfigConsistency($5.a1)), $2b => $2c => $2d => Config_writeConfig($5.a1, $2c, $2d), $6, $7);
8916
+ case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Types_either(() => $1f => Util_renderIO($5.a1, csegen_72(), $1f), () => csegen_429(), Config_checkConfigConsistency($5.a1)), $2b => $2c => $2d => Config_writeConfig($5.a1, $2c, $2d), $6, $7);
8909
8917
  }
8910
8918
  };
8911
8919
  }
@@ -8955,12 +8963,12 @@ function Config_case__parseGitHubURIx2cparseSuffix_1509($0, $1, $2) {
8955
8963
  default: return {h: 0};
8956
8964
  }
8957
8965
  };
8958
- return Prelude_Types_x3ex3ex3d_Monad_Maybe({a1: Data_String_split(csegen_427(), $2.a1)}, $b);
8966
+ return Prelude_Types_x3ex3ex3d_Monad_Maybe({a1: Data_String_split(csegen_430(), $2.a1)}, $b);
8959
8967
  }
8960
8968
 
8961
8969
  /* Config.9228:2418:repo */
8962
8970
  function Config_n__9228_2418_repo($0, $1, $2, $3, $4) {
8963
- return Prelude_Types_map_Functor_Maybe(csegen_428(), $4);
8971
+ return Prelude_Types_map_Functor_Maybe(csegen_431(), $4);
8964
8972
  }
8965
8973
 
8966
8974
  /* Config.8332:1489:parseSuffix */
@@ -8980,7 +8988,7 @@ function Config_n__8332_1487_parseHTTPS($0, $1) {
8980
8988
 
8981
8989
  /* Config.9228:2417:org */
8982
8990
  function Config_n__9228_2417_org($0, $1, $2, $3, $4) {
8983
- return Prelude_Types_map_Functor_Maybe(csegen_432(), $4);
8991
+ return Prelude_Types_map_Functor_Maybe(csegen_435(), $4);
8984
8992
  }
8985
8993
 
8986
8994
  /* Config.9228:2416:orIfEmpty */
@@ -9084,7 +9092,7 @@ function Config_syncConfig($0, $1, $2, $3, $4) {
9084
9092
  const $32 = {a1: updatedAt, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5, a6: $0.a6, a7: $0.a7, a8: $0.a8, a9: teamSlugs, a10: labelNames, a11: orgMembers, a12: $0.a12, a13: $0.a13, a14: $0.a14};
9085
9093
  return $42 => $43 => Data_Promise_x3ex3ex3d_Monad_Promise($46 => $47 => Data_Promise_map_Functor_Promise($4a => (undefined), $4c => $4d => Config_writeConfig($32, $4c, $4d), $46, $47), $55 => $56 => $57 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_when(csegen_64(), $2, () => $5f => $60 => Data_Promise_x3ex3ex3d_Monad_Promise($63 => $64 => $65 => Data_Promise_liftIO_HasIO_Promise($68 => Prelude_IO_prim__putStr('Your updated configuration is:\n', $68), $63, $64, $65), $70 => $71 => $72 => $73 => Data_Promise_liftIO_HasIO_Promise($76 => Prelude_IO_prim__putStr((Data_Config_show_Show_Config($32)+'\n'), $76), $71, $72, $73), $5f, $60)), $84 => $85 => $86 => Data_Promise_pure_Applicative_Promise($32, $85, $86), $56, $57), $42, $43);
9086
9094
  };
9087
- return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_443(), $31, $2c, $2d);
9095
+ return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_446(), $31, $2c, $2d);
9088
9096
  };
9089
9097
  return Data_Promise_x3ex3ex3d_Monad_Promise($23 => $24 => FFI_GitHub_listOrgMembers($1, $0.a2, $23, $24), $2b, $1f, $20);
9090
9098
  };
@@ -9107,14 +9115,14 @@ function Config_setConfig($0, $1, $2) {
9107
9115
  function Config_propSetter($0, $1) {
9108
9116
  return $2 => {
9109
9117
  switch($0) {
9110
- case 0: return Config_update(csegen_448(), $8 => Config_parseBool($8), b => $c => ({a1: $c.a1, a2: $c.a2, a3: $c.a3, a4: $c.a4, a5: $c.a5, a6: b, a7: $c.a7, a8: $c.a8, a9: $c.a9, a10: $c.a10, a11: $c.a11, a12: $c.a12, a13: $c.a13, a14: $c.a14}), $1, $2);
9111
- case 1: return Config_update(csegen_448(), $22 => Config_parseBool($22), b => $26 => ({a1: $26.a1, a2: $26.a2, a3: $26.a3, a4: $26.a4, a5: $26.a5, a6: $26.a6, a7: b, a8: $26.a8, a9: $26.a9, a10: $26.a10, a11: $26.a11, a12: $26.a12, a13: $26.a13, a14: $26.a14}), $1, $2);
9112
- case 2: return Config_update(csegen_448(), $3c => Config_parseBool($3c), b => $40 => ({a1: $40.a1, a2: $40.a2, a3: $40.a3, a4: $40.a4, a5: $40.a5, a6: $40.a6, a7: $40.a7, a8: b, a9: $40.a9, a10: $40.a10, a11: $40.a11, a12: $40.a12, a13: $40.a13, a14: $40.a14}), $1, $2);
9113
- case 3: return Config_update(csegen_448(), $56 => ({a1: $56}), s => $59 => ({a1: $59.a1, a2: $59.a2, a3: $59.a3, a4: s, a5: $59.a5, a6: $59.a6, a7: $59.a7, a8: $59.a8, a9: $59.a9, a10: $59.a10, a11: $59.a11, a12: $59.a12, a13: $59.a13, a14: $59.a14}), $1, $2);
9114
- case 4: return Config_update(csegen_448(), $6f => ({a1: $6f}), s => $72 => ({a1: $72.a1, a2: $72.a2, a3: $72.a3, a4: $72.a4, a5: $72.a5, a6: $72.a6, a7: $72.a7, a8: $72.a8, a9: $72.a9, a10: $72.a10, a11: $72.a11, a12: $72.a12, a13: {a1: s}, a14: $72.a14}), $1, $2);
9115
- case 5: return Config_update(csegen_448(), $89 => Config_parseBool($89), b => $8d => ({a1: $8d.a1, a2: $8d.a2, a3: $8d.a3, a4: $8d.a4, a5: $8d.a5, a6: b, a7: $8d.a7, a8: $8d.a8, a9: $8d.a9, a10: $8d.a10, a11: $8d.a11, a12: $8d.a12, a13: $8d.a13, a14: $8d.a14}), $1, $2);
9116
- case 6: return Config_update(csegen_448(), $a3 => Config_parseBool($a3), b => $a7 => ({a1: $a7.a1, a2: $a7.a2, a3: $a7.a3, a4: $a7.a4, a5: $a7.a5, a6: $a7.a6, a7: b, a8: $a7.a8, a9: $a7.a9, a10: $a7.a10, a11: $a7.a11, a12: $a7.a12, a13: $a7.a13, a14: $a7.a14}), $1, $2);
9117
- case 7: return Config_update(csegen_448(), $bd => Config_parseBool($bd), b => $c1 => ({a1: $c1.a1, a2: $c1.a2, a3: $c1.a3, a4: $c1.a4, a5: $c1.a5, a6: $c1.a6, a7: $c1.a7, a8: b, a9: $c1.a9, a10: $c1.a10, a11: $c1.a11, a12: $c1.a12, a13: $c1.a13, a14: $c1.a14}), $1, $2);
9118
+ case 0: return Config_update(csegen_451(), $8 => Config_parseBool($8), b => $c => ({a1: $c.a1, a2: $c.a2, a3: $c.a3, a4: $c.a4, a5: $c.a5, a6: b, a7: $c.a7, a8: $c.a8, a9: $c.a9, a10: $c.a10, a11: $c.a11, a12: $c.a12, a13: $c.a13, a14: $c.a14}), $1, $2);
9119
+ case 1: return Config_update(csegen_451(), $22 => Config_parseBool($22), b => $26 => ({a1: $26.a1, a2: $26.a2, a3: $26.a3, a4: $26.a4, a5: $26.a5, a6: $26.a6, a7: b, a8: $26.a8, a9: $26.a9, a10: $26.a10, a11: $26.a11, a12: $26.a12, a13: $26.a13, a14: $26.a14}), $1, $2);
9120
+ case 2: return Config_update(csegen_451(), $3c => Config_parseBool($3c), b => $40 => ({a1: $40.a1, a2: $40.a2, a3: $40.a3, a4: $40.a4, a5: $40.a5, a6: $40.a6, a7: $40.a7, a8: b, a9: $40.a9, a10: $40.a10, a11: $40.a11, a12: $40.a12, a13: $40.a13, a14: $40.a14}), $1, $2);
9121
+ case 3: return Config_update(csegen_451(), $56 => ({a1: $56}), s => $59 => ({a1: $59.a1, a2: $59.a2, a3: $59.a3, a4: s, a5: $59.a5, a6: $59.a6, a7: $59.a7, a8: $59.a8, a9: $59.a9, a10: $59.a10, a11: $59.a11, a12: $59.a12, a13: $59.a13, a14: $59.a14}), $1, $2);
9122
+ case 4: return Config_update(csegen_451(), $6f => ({a1: $6f}), s => $72 => ({a1: $72.a1, a2: $72.a2, a3: $72.a3, a4: $72.a4, a5: $72.a5, a6: $72.a6, a7: $72.a7, a8: $72.a8, a9: $72.a9, a10: $72.a10, a11: $72.a11, a12: $72.a12, a13: {a1: s}, a14: $72.a14}), $1, $2);
9123
+ case 5: return Config_update(csegen_451(), $89 => Config_parseBool($89), b => $8d => ({a1: $8d.a1, a2: $8d.a2, a3: $8d.a3, a4: $8d.a4, a5: $8d.a5, a6: b, a7: $8d.a7, a8: $8d.a8, a9: $8d.a9, a10: $8d.a10, a11: $8d.a11, a12: $8d.a12, a13: $8d.a13, a14: $8d.a14}), $1, $2);
9124
+ case 6: return Config_update(csegen_451(), $a3 => Config_parseBool($a3), b => $a7 => ({a1: $a7.a1, a2: $a7.a2, a3: $a7.a3, a4: $a7.a4, a5: $a7.a5, a6: $a7.a6, a7: b, a8: $a7.a8, a9: $a7.a9, a10: $a7.a10, a11: $a7.a11, a12: $a7.a12, a13: $a7.a13, a14: $a7.a14}), $1, $2);
9125
+ case 7: return Config_update(csegen_451(), $bd => Config_parseBool($bd), b => $c1 => ({a1: $c1.a1, a2: $c1.a2, a3: $c1.a3, a4: $c1.a4, a5: $c1.a5, a6: $c1.a6, a7: $c1.a7, a8: b, a9: $c1.a9, a10: $c1.a10, a11: $c1.a11, a12: $c1.a12, a13: $c1.a13, a14: $c1.a14}), $1, $2);
9118
9126
  }
9119
9127
  };
9120
9128
  }
@@ -9198,14 +9206,14 @@ function Config_loadConfig($0, $1, $2) {
9198
9206
  }
9199
9207
  };
9200
9208
  const $a = {a1: $b, a2: a => $13 => ({h: 1 /* Right */, a1: $13}), a3: $15};
9201
- const $9 = {a1: $a, a2: csegen_203(), a3: csegen_204()};
9209
+ const $9 = {a1: $a, a2: csegen_204(), a3: csegen_205()};
9202
9210
  const $24 = b => a => func => $25 => {
9203
9211
  switch($25.h) {
9204
9212
  case 0: /* Left */ return {h: 0 /* Left */, a1: $25.a1};
9205
9213
  case 1: /* Right */ return {h: 1 /* Right */, a1: func($25.a1)};
9206
9214
  }
9207
9215
  };
9208
- const $23 = {a1: $24, a2: csegen_261(), a3: csegen_265()};
9216
+ const $23 = {a1: $24, a2: csegen_262(), a3: csegen_266()};
9209
9217
  return Prelude_Interfaces_Monad_x3ex3ex3d_Monad_Composex28x28x2ex20x24mx29x20x24tx29($0.a1, $9, $23, $4, $5);
9210
9218
  };
9211
9219
  const $3d = $3e => {
@@ -9289,7 +9297,7 @@ function Config_createConfig($0, $1, $2, $3, $4, $5) {
9289
9297
  default: return {a1: Data_String_trim($73)};
9290
9298
  }
9291
9299
  };
9292
- return Data_Promise_map_Functor_Promise($72, csegen_461(), $6f, $70);
9300
+ return Data_Promise_map_Functor_Promise($72, csegen_464(), $6f, $70);
9293
9301
  };
9294
9302
  const $7e = configPAT => $7f => $80 => {
9295
9303
  const $8c = $8d => $8e => $8f => {
@@ -9297,11 +9305,11 @@ function Config_createConfig($0, $1, $2, $3, $4, $5) {
9297
9305
  case undefined: /* just */ {
9298
9306
  const $a3 = remoteGuess => $a4 => $a5 => {
9299
9307
  const $c1 = defaultOrgAndRepo => {
9300
- const $c2 = Config_n__9228_2414_defaultStr($0, $3, $2, $1, csegen_432(), defaultOrgAndRepo);
9308
+ const $c2 = Config_n__9228_2414_defaultStr($0, $3, $2, $1, csegen_435(), defaultOrgAndRepo);
9301
9309
  return $cb => $cc => {
9302
9310
  const $e9 = $ea => $eb => $ec => {
9303
9311
  const $107 = org => {
9304
- const $108 = Config_n__9228_2414_defaultStr($0, $3, $2, $1, csegen_428(), defaultOrgAndRepo);
9312
+ const $108 = Config_n__9228_2414_defaultStr($0, $3, $2, $1, csegen_431(), defaultOrgAndRepo);
9305
9313
  return $111 => $112 => {
9306
9314
  const $12f = $130 => $131 => $132 => {
9307
9315
  const $14d = repo => {
@@ -9322,7 +9330,7 @@ function Config_createConfig($0, $1, $2, $3, $4, $5) {
9322
9330
  const $205 = repoLabels => $206 => $207 => {
9323
9331
  const $211 = orgMembers => {
9324
9332
  const $212 = {a1: updatedAt, a2: org, a3: repo, a4: defaultRemote, a5: mainBranch, a6: requestTeams, a7: requestUsers, a8: commentOnRequest, a9: teamSlugs, a10: repoLabels, a11: orgMembers, a12: {h: 0}, a13: Prelude_Types_map_Functor_Maybe($222 => $222, configPAT), a14: $1de};
9325
- return $225 => $226 => Data_Promise_x3ex3ex3d_Monad_Promise($229 => $22a => Data_Promise_map_Functor_Promise($22d => (undefined), $22f => $230 => Config_writeConfig($212, $22f, $230), $229, $22a), $238 => $239 => $23a => Data_Promise_x3ex3ex3d_Monad_Promise($23d => $23e => $23f => Data_Promise_liftIO_HasIO_Promise($242 => Prelude_IO_prim__putStr('Your new configuration is:\n', $242), $23d, $23e, $23f), $24a => $24b => $24c => Data_Promise_x3ex3ex3d_Monad_Promise($24f => $250 => $251 => Data_Promise_liftIO_HasIO_Promise($254 => Prelude_IO_prim__putStr((Data_Config_show_Show_Config($212)+'\n'), $254), $24f, $250, $251), $260 => $261 => $262 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Types_either(() => $267 => Util_renderIO($212, csegen_72(), $267), () => csegen_426(), Config_checkConfigConsistency($212)), $273 => $274 => $275 => Data_Promise_pure_Applicative_Promise($212, $274, $275), $261, $262), $24b, $24c), $239, $23a), $225, $226);
9333
+ return $225 => $226 => Data_Promise_x3ex3ex3d_Monad_Promise($229 => $22a => Data_Promise_map_Functor_Promise($22d => (undefined), $22f => $230 => Config_writeConfig($212, $22f, $230), $229, $22a), $238 => $239 => $23a => Data_Promise_x3ex3ex3d_Monad_Promise($23d => $23e => $23f => Data_Promise_liftIO_HasIO_Promise($242 => Prelude_IO_prim__putStr('Your new configuration is:\n', $242), $23d, $23e, $23f), $24a => $24b => $24c => Data_Promise_x3ex3ex3d_Monad_Promise($24f => $250 => $251 => Data_Promise_liftIO_HasIO_Promise($254 => Prelude_IO_prim__putStr((Data_Config_show_Show_Config($212)+'\n'), $254), $24f, $250, $251), $260 => $261 => $262 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Types_either(() => $267 => Util_renderIO($212, csegen_72(), $267), () => csegen_429(), Config_checkConfigConsistency($212)), $273 => $274 => $275 => Data_Promise_pure_Applicative_Promise($212, $274, $275), $261, $262), $24b, $24c), $239, $23a), $225, $226);
9326
9334
  };
9327
9335
  return Data_Promise_x3ex3ex3d_Monad_Promise($20a => $20b => FFI_GitHub_listOrgMembers(_, org, $20a, $20b), $211, $206, $207);
9328
9336
  };
@@ -9331,7 +9339,7 @@ function Config_createConfig($0, $1, $2, $3, $4, $5) {
9331
9339
  return Data_Promise_x3ex3ex3d_Monad_Promise($1f1 => $1f2 => FFI_GitHub_listTeams(_, org, $1f1, $1f2), $1f8, $1ed, $1ee);
9332
9340
  };
9333
9341
  };
9334
- return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_443(), $1dd, $1d8, $1d9);
9342
+ return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_446(), $1dd, $1d8, $1d9);
9335
9343
  };
9336
9344
  return Data_Promise_x3ex3ex3d_Monad_Promise($1cf => $1d0 => FFI_GitHub_getRepoDefaultBranch(_, org, repo, $1cf, $1d0), $1d7, $1cb, $1cc);
9337
9345
  };
@@ -9345,22 +9353,22 @@ function Config_createConfig($0, $1, $2, $3, $4, $5) {
9345
9353
  };
9346
9354
  return Data_Promise_x3ex3ex3d_Monad_Promise(Util_yesNoPrompt(csegen_72(), 'Would you like harmony to comment when it requests reviewers?'), $195, $18d, $18e);
9347
9355
  };
9348
- return Data_Promise_x3ex3ex3d_Monad_Promise($179 => $17a => Data_Promise_map_Functor_Promise($17d => Config_n__9228_2416_orIfEmpty($0, $3, $2, $1, {a1: remoteGuess}, Data_String_trim($17d)), csegen_461(), $179, $17a), $18c, $175, $176);
9356
+ return Data_Promise_x3ex3ex3d_Monad_Promise($179 => $17a => Data_Promise_map_Functor_Promise($17d => Config_n__9228_2416_orIfEmpty($0, $3, $2, $1, {a1: remoteGuess}, Data_String_trim($17d)), csegen_464(), $179, $17a), $18c, $175, $176);
9349
9357
  };
9350
9358
  return Data_Promise_x3ex3ex3d_Monad_Promise($159 => $15a => $15b => Data_Promise_liftIO_HasIO_Promise($15e => Prelude_IO_prim__putStr((Prelude_Types_foldMap_Foldable_List(csegen_49(), $166 => $166, {a1: 'What GitHub remote repo would you like to use harmony for', a2: {a1: $14e, a2: {a1: '?', a2: {h: 0}}}})+'\n'), $15e), $159, $15a, $15b), $173, $155, $156);
9351
9359
  };
9352
9360
  };
9353
- return Data_Promise_x3ex3ex3d_Monad_Promise($135 => $136 => Data_Promise_map_Functor_Promise($139 => Config_n__9228_2416_orIfEmpty($0, $3, $2, $1, Config_n__9228_2418_repo($0, $3, $2, $1, defaultOrgAndRepo), Data_String_trim($139)), csegen_461(), $135, $136), $14d, $131, $132);
9361
+ return Data_Promise_x3ex3ex3d_Monad_Promise($135 => $136 => Data_Promise_map_Functor_Promise($139 => Config_n__9228_2416_orIfEmpty($0, $3, $2, $1, Config_n__9228_2418_repo($0, $3, $2, $1, defaultOrgAndRepo), Data_String_trim($139)), csegen_464(), $135, $136), $14d, $131, $132);
9354
9362
  };
9355
9363
  return Data_Promise_x3ex3ex3d_Monad_Promise($115 => $116 => $117 => Data_Promise_liftIO_HasIO_Promise($11a => Prelude_IO_prim__putStr((Prelude_Types_foldMap_Foldable_List(csegen_49(), $122 => $122, {a1: 'What repository would you like to use harmony for', a2: {a1: $108, a2: {a1: '?', a2: {h: 0}}}})+'\n'), $11a), $115, $116, $117), $12f, $111, $112);
9356
9364
  };
9357
9365
  };
9358
- return Data_Promise_x3ex3ex3d_Monad_Promise($ef => $f0 => Data_Promise_map_Functor_Promise($f3 => Config_n__9228_2416_orIfEmpty($0, $3, $2, $1, Config_n__9228_2417_org($0, $3, $2, $1, defaultOrgAndRepo), Data_String_trim($f3)), csegen_461(), $ef, $f0), $107, $eb, $ec);
9366
+ return Data_Promise_x3ex3ex3d_Monad_Promise($ef => $f0 => Data_Promise_map_Functor_Promise($f3 => Config_n__9228_2416_orIfEmpty($0, $3, $2, $1, Config_n__9228_2417_org($0, $3, $2, $1, defaultOrgAndRepo), Data_String_trim($f3)), csegen_464(), $ef, $f0), $107, $eb, $ec);
9359
9367
  };
9360
9368
  return Data_Promise_x3ex3ex3d_Monad_Promise($cf => $d0 => $d1 => Data_Promise_liftIO_HasIO_Promise($d4 => Prelude_IO_prim__putStr((Prelude_Types_foldMap_Foldable_List(csegen_49(), $dc => $dc, {a1: 'What GitHub org would you like to use harmony for', a2: {a1: $c2, a2: {a1: '?', a2: {h: 0}}}})+'\n'), $d4), $cf, $d0, $d1), $e9, $cb, $cc);
9361
9369
  };
9362
9370
  };
9363
- return Data_Promise_x3ex3ex3d_Monad_Promise($a8 => $a9 => Data_Promise_x3cx7cx3e_Alternative_Promise($ac => $ad => Data_Promise_map_Functor_Promise($b0 => Config_parseGitHubURI($b0), $b4 => $b5 => FFI_Git_remoteURI($0, remoteGuess, $b4, $b5), $ac, $ad), () => csegen_463(), $a8, $a9), $c1, $a4, $a5);
9371
+ return Data_Promise_x3ex3ex3d_Monad_Promise($a8 => $a9 => Data_Promise_x3cx7cx3e_Alternative_Promise($ac => $ad => Data_Promise_map_Functor_Promise($b0 => Config_parseGitHubURI($b0), $b4 => $b5 => FFI_Git_remoteURI($0, remoteGuess, $b4, $b5), $ac, $ad), () => csegen_466(), $a8, $a9), $c1, $a4, $a5);
9364
9372
  };
9365
9373
  return Data_Promise_x3ex3ex3d_Monad_Promise($93 => $94 => Data_Promise_map_Functor_Promise($97 => Config_preferOriginRemote($97), $9b => $9c => FFI_Git_listRemotes($0, $9b, $9c), $93, $94), $a3, $8e, $8f);
9366
9374
  }
@@ -9387,7 +9395,7 @@ function Config_checkConfigConsistency($0) {
9387
9395
 
9388
9396
  /* Config.addIgnoredPRs : Config -> List Integer -> Promise Config */
9389
9397
  function Config_addIgnoredPRs($0, $1, $2, $3) {
9390
- return Config_writeConfig({a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5, a6: $0.a6, a7: $0.a7, a8: $0.a8, a9: $0.a9, a10: $0.a10, a11: $0.a11, a12: Data_List_nub(csegen_220(), Prelude_Types_List_tailRecAppend($0.a12, $1)), a13: $0.a13, a14: $0.a14}, $2, $3);
9398
+ return Config_writeConfig({a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5, a6: $0.a6, a7: $0.a7, a8: $0.a8, a9: $0.a9, a10: $0.a10, a11: $0.a11, a12: Data_List_nub(csegen_221(), Prelude_Types_List_tailRecAppend($0.a12, $1)), a13: $0.a13, a14: $0.a14}, $2, $3);
9391
9399
  }
9392
9400
 
9393
9401
  /* Data.List.PrefixSuffix.with block in with block in dropPrefix */
@@ -9466,7 +9474,7 @@ function Commands_case__casex20blockx20inx20graph_2168($0, $1, $2, $3, $4, $5, $
9466
9474
  case 0: return Data_Promise_pure_Applicative_Promise({h: 0}, $d, $e);
9467
9475
  }
9468
9476
  };
9469
- return Data_Promise_x3ex3ex3d_Monad_Promise($c, completedReviews => Util_renderIO($2, csegen_72(), Graph_reviewsGraph(csegen_217(), {a1: ann => $2f => Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($2f), a2: ann => $33 => $34 => Text_PrettyPrint_Prettyprinter_Doc_prettyPrec_Pretty_String($33, $34)}, $7.a2, $7.a1, $5, completedReviews)), $8, $9);
9477
+ return Data_Promise_x3ex3ex3d_Monad_Promise($c, completedReviews => Util_renderIO($2, csegen_72(), Graph_reviewsGraph(csegen_218(), {a1: ann => $2f => Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($2f), a2: ann => $33 => $34 => Text_PrettyPrint_Prettyprinter_Doc_prettyPrec_Pretty_String($33, $34)}, $7.a2, $7.a1, $5, completedReviews)), $8, $9);
9470
9478
  };
9471
9479
  }
9472
9480
 
@@ -9542,8 +9550,8 @@ function Commands_case__requestx2cpartitionedArgs_1663($0, $1, $2, $3, $4, $5) {
9542
9550
  return Commands_case__casex20blockx20inx20requestx2cpartitionedArgs_1686($0, $1, $2, $3, $4, $5.a1, $5.a2, Data_List_partition($12 => BashCompletion_isHashPrefix($12), $5.a2));
9543
9551
  }
9544
9552
 
9545
- /* Commands.9789:2511:recombineIgnoreArgs */
9546
- function Commands_n__9789_2511_recombineIgnoreArgs($0, $1) {
9553
+ /* Commands.9787:2511:recombineIgnoreArgs */
9554
+ function Commands_n__9787_2511_recombineIgnoreArgs($0, $1) {
9547
9555
  switch($1.h) {
9548
9556
  case 0: /* nil */ return {a1: {h: 0}, a2: {h: 0}};
9549
9557
  case undefined: /* cons */ {
@@ -9552,20 +9560,20 @@ function Commands_n__9789_2511_recombineIgnoreArgs($0, $1) {
9552
9560
  switch($1.a2.h) {
9553
9561
  case 0: /* nil */ return {a1: {h: 0}, a2: {a1: '-i', a2: {h: 0}}};
9554
9562
  case undefined: /* cons */ {
9555
- const $b = Commands_n__9789_2509_parseIgnoreOpt($0, $1.a2.a1);
9563
+ const $b = Commands_n__9787_2509_parseIgnoreOpt($0, $1.a2.a1);
9556
9564
  switch($b.h) {
9557
9565
  case undefined: /* just */ {
9558
- const $f = Commands_n__9789_2511_recombineIgnoreArgs($0, $1.a2.a2);
9566
+ const $f = Commands_n__9787_2511_recombineIgnoreArgs($0, $1.a2.a2);
9559
9567
  return {a1: {a1: $b.a1, a2: $f.a1}, a2: $f.a2};
9560
9568
  }
9561
9569
  case 0: /* nothing */ {
9562
- const $17 = Commands_n__9789_2511_recombineIgnoreArgs($0, $1.a2.a2);
9570
+ const $17 = Commands_n__9787_2511_recombineIgnoreArgs($0, $1.a2.a2);
9563
9571
  return {a1: $17.a1, a2: {a1: '-i', a2: {a1: $1.a2.a1, a2: $17.a2}}};
9564
9572
  }
9565
9573
  }
9566
9574
  }
9567
9575
  default: {
9568
- const $21 = Commands_n__9789_2511_recombineIgnoreArgs($0, $1.a2);
9576
+ const $21 = Commands_n__9787_2511_recombineIgnoreArgs($0, $1.a2);
9569
9577
  return {a1: $21.a1, a2: {a1: $1.a1, a2: $21.a2}};
9570
9578
  }
9571
9579
  }
@@ -9574,26 +9582,26 @@ function Commands_n__9789_2511_recombineIgnoreArgs($0, $1) {
9574
9582
  switch($1.a2.h) {
9575
9583
  case 0: /* nil */ return {a1: {h: 0}, a2: {a1: '--ignore', a2: {h: 0}}};
9576
9584
  case undefined: /* cons */ {
9577
- const $2e = Commands_n__9789_2509_parseIgnoreOpt($0, $1.a2.a1);
9585
+ const $2e = Commands_n__9787_2509_parseIgnoreOpt($0, $1.a2.a1);
9578
9586
  switch($2e.h) {
9579
9587
  case undefined: /* just */ {
9580
- const $32 = Commands_n__9789_2511_recombineIgnoreArgs($0, $1.a2.a2);
9588
+ const $32 = Commands_n__9787_2511_recombineIgnoreArgs($0, $1.a2.a2);
9581
9589
  return {a1: {a1: $2e.a1, a2: $32.a1}, a2: $32.a2};
9582
9590
  }
9583
9591
  case 0: /* nothing */ {
9584
- const $3a = Commands_n__9789_2511_recombineIgnoreArgs($0, $1.a2.a2);
9592
+ const $3a = Commands_n__9787_2511_recombineIgnoreArgs($0, $1.a2.a2);
9585
9593
  return {a1: $3a.a1, a2: {a1: '--ignore', a2: {a1: $1.a2.a1, a2: $3a.a2}}};
9586
9594
  }
9587
9595
  }
9588
9596
  }
9589
9597
  default: {
9590
- const $44 = Commands_n__9789_2511_recombineIgnoreArgs($0, $1.a2);
9598
+ const $44 = Commands_n__9787_2511_recombineIgnoreArgs($0, $1.a2);
9591
9599
  return {a1: $44.a1, a2: {a1: $1.a1, a2: $44.a2}};
9592
9600
  }
9593
9601
  }
9594
9602
  }
9595
9603
  default: {
9596
- const $4c = Commands_n__9789_2511_recombineIgnoreArgs($0, $1.a2);
9604
+ const $4c = Commands_n__9787_2511_recombineIgnoreArgs($0, $1.a2);
9597
9605
  return {a1: $4c.a1, a2: {a1: $1.a1, a2: $4c.a2}};
9598
9606
  }
9599
9607
  }
@@ -9601,33 +9609,33 @@ function Commands_n__9789_2511_recombineIgnoreArgs($0, $1) {
9601
9609
  }
9602
9610
  }
9603
9611
 
9604
- /* Commands.9180:1922:putNameLn */
9605
- function Commands_n__9180_1922_putNameLn($0, $1, $2, $3) {
9612
+ /* Commands.9178:1922:putNameLn */
9613
+ function Commands_n__9178_1922_putNameLn($0, $1, $2, $3) {
9606
9614
  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}}}});
9607
9615
  }
9608
9616
 
9609
- /* Commands.8501:1299:putLabels */
9610
- function Commands_n__8501_1299_putLabels($0, $1, $2, $3, $4) {
9611
- return Text_PrettyPrint_Prettyprinter_Doc_hcat(Data_List_intersperse(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(', '), Prelude_Types_List_mapAppend({h: 0}, $f => Commands_n__8501_1298_putLabel($0, $1, $2, $3, $f), $4)));
9617
+ /* Commands.8499:1299:putLabels */
9618
+ function Commands_n__8499_1299_putLabels($0, $1, $2, $3, $4) {
9619
+ return Text_PrettyPrint_Prettyprinter_Doc_hcat(Data_List_intersperse(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(', '), Prelude_Types_List_mapAppend({h: 0}, $f => Commands_n__8499_1298_putLabel($0, $1, $2, $3, $f), $4)));
9612
9620
  }
9613
9621
 
9614
- /* Commands.8501:1298:putLabel */
9615
- function Commands_n__8501_1298_putLabel($0, $1, $2, $3, $4) {
9622
+ /* Commands.8499:1298:putLabel */
9623
+ function Commands_n__8499_1298_putLabel($0, $1, $2, $3, $4) {
9616
9624
  return Text_PrettyPrint_Prettyprinter_Doc_enclose(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('\"'), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('\"'), Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(2), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($4)));
9617
9625
  }
9618
9626
 
9619
- /* Commands.8856:1651:partitionedArgs */
9620
- function Commands_n__8856_1651_partitionedArgs($0, $1, $2, $3, $4) {
9627
+ /* Commands.8854:1651:partitionedArgs */
9628
+ function Commands_n__8854_1651_partitionedArgs($0, $1, $2, $3, $4) {
9621
9629
  return Commands_case__requestx2cpartitionedArgs_1663($0, $1, $2, $3, $4, Data_List_partition($e => Data_String_isPrefixOf('+', $e), $4));
9622
9630
  }
9623
9631
 
9624
- /* Commands.9630:2373:parseTeamArg */
9625
- function Commands_n__9630_2373_parseTeamArg($0, $1) {
9632
+ /* Commands.9628:2373:parseTeamArg */
9633
+ function Commands_n__9628_2373_parseTeamArg($0, $1) {
9626
9634
  return {a1: {a1: $1}};
9627
9635
  }
9628
9636
 
9629
- /* Commands.9789:2510:parseSkipArg */
9630
- function Commands_n__9789_2510_parseSkipArg($0, $1) {
9637
+ /* Commands.9787:2510:parseSkipArg */
9638
+ function Commands_n__9787_2510_parseSkipArg($0, $1) {
9631
9639
  const $2 = Prelude_Types_fastUnpack($1);
9632
9640
  switch($2.h) {
9633
9641
  case undefined: /* cons */ {
@@ -9640,15 +9648,15 @@ function Commands_n__9789_2510_parseSkipArg($0, $1) {
9640
9648
  }
9641
9649
  }
9642
9650
 
9643
- /* Commands.9789:2509:parseIgnoreOpt */
9644
- function Commands_n__9789_2509_parseIgnoreOpt($0, $1) {
9645
- const $2 = Data_String_split(csegen_427(), $1);
9651
+ /* Commands.9787:2509:parseIgnoreOpt */
9652
+ function Commands_n__9787_2509_parseIgnoreOpt($0, $1) {
9653
+ const $2 = Data_String_split(csegen_430(), $1);
9646
9654
  const $7 = Data_List1_last($2);
9647
9655
  return Prelude_Types_map_Functor_Maybe($c => $c, Data_String_parsePositive(csegen_2(), $7));
9648
9656
  }
9649
9657
 
9650
- /* Commands.9630:2372:parseCompletedFlag */
9651
- function Commands_n__9630_2372_parseCompletedFlag($0, $1) {
9658
+ /* Commands.9628:2372:parseCompletedFlag */
9659
+ function Commands_n__9628_2372_parseCompletedFlag($0, $1) {
9652
9660
  switch($1) {
9653
9661
  case '-c': return {a1: {h: 0}};
9654
9662
  case '--completed': return {a1: {h: 0}};
@@ -9656,8 +9664,8 @@ function Commands_n__9630_2372_parseCompletedFlag($0, $1) {
9656
9664
  }
9657
9665
  }
9658
9666
 
9659
- /* Commands.9789:2508:parseCheckoutFlag */
9660
- function Commands_n__9789_2508_parseCheckoutFlag($0, $1) {
9667
+ /* Commands.9787:2508:parseCheckoutFlag */
9668
+ function Commands_n__9787_2508_parseCheckoutFlag($0, $1) {
9661
9669
  switch($1) {
9662
9670
  case '-c': return {a1: {h: 0 /* Checkout */}};
9663
9671
  case '--checkout': return {a1: {h: 0 /* Checkout */}};
@@ -9665,13 +9673,13 @@ function Commands_n__9789_2508_parseCheckoutFlag($0, $1) {
9665
9673
  }
9666
9674
  }
9667
9675
 
9668
- /* Commands.10119:2847:isNotIgnored */
9669
- function Commands_n__10119_2847_isNotIgnored($0, $1, $2, $3, $4, $5) {
9676
+ /* Commands.10117:2847:isNotIgnored */
9677
+ function Commands_n__10117_2847_isNotIgnored($0, $1, $2, $3, $4, $5) {
9670
9678
  return Data_Maybe_isNothing(Data_List_find($a => Prelude_EqOrd_x3dx3d_Eq_Integer($a, $5.a1), $4.a12));
9671
9679
  }
9672
9680
 
9673
- /* Commands.9180:1921:forkedUser */
9674
- function Commands_n__9180_1921_forkedUser($0, $1, $2, $3) {
9681
+ /* Commands.9178:1921:forkedUser */
9682
+ function Commands_n__9178_1921_forkedUser($0, $1, $2, $3) {
9675
9683
  return FFI_Concurrency_fork(csegen_72(), ('user --json '+$3));
9676
9684
  }
9677
9685
 
@@ -9713,7 +9721,7 @@ function Commands_skipArg($0) {
9713
9721
  /* Commands.request : Config => Git => Octokit => List String -> {default False _ : Bool} ->
9714
9722
  Promise () */
9715
9723
  function Commands_request($0, $1, $2, $3, $4) {
9716
- return Commands_case__request_1766($0, $1, $2, $4, $3, Commands_n__8856_1651_partitionedArgs($0, $1, $2, $4, $3));
9724
+ return Commands_case__request_1766($0, $1, $2, $4, $3, Commands_n__8854_1651_partitionedArgs($0, $1, $2, $4, $3));
9717
9725
  }
9718
9726
 
9719
9727
  /* Commands.reflect : Config => Octokit => Promise () */
@@ -9767,7 +9775,7 @@ function Commands_parseGraphArgs($0) {
9767
9775
  switch($0.a2.a2.h) {
9768
9776
  case undefined: /* cons */ return {h: 0 /* Left */, a1: 'graph accepts at most one team name and the --completed flag.'};
9769
9777
  default: {
9770
- const $6 = Prelude_Types_traverse_Traversable_List(csegen_9(), $b => Commands_x3cx7cx7cx3e(csegen_491(), $10 => Commands_n__9630_2372_parseCompletedFlag($0, $10), $15 => Commands_n__9630_2373_parseTeamArg($0, $15), $b), $0);
9778
+ const $6 = Prelude_Types_traverse_Traversable_List(csegen_9(), $b => Commands_x3cx7cx7cx3e(csegen_494(), $10 => Commands_n__9628_2372_parseCompletedFlag($0, $10), $15 => Commands_n__9628_2373_parseTeamArg($0, $15), $b), $0);
9771
9779
  switch($6.h) {
9772
9780
  case undefined: /* just */ return {h: 1 /* Right */, a1: $6.a1};
9773
9781
  case 0: /* nothing */ return {h: 0 /* Left */, a1: 'The graph command expects the name of a GitHub Team and optionally --completed as arguments.'};
@@ -9776,7 +9784,7 @@ function Commands_parseGraphArgs($0) {
9776
9784
  }
9777
9785
  }
9778
9786
  default: {
9779
- const $1d = Prelude_Types_traverse_Traversable_List(csegen_9(), $22 => Commands_x3cx7cx7cx3e(csegen_491(), $27 => Commands_n__9630_2372_parseCompletedFlag($0, $27), $2c => Commands_n__9630_2373_parseTeamArg($0, $2c), $22), $0);
9787
+ const $1d = Prelude_Types_traverse_Traversable_List(csegen_9(), $22 => Commands_x3cx7cx7cx3e(csegen_494(), $27 => Commands_n__9628_2372_parseCompletedFlag($0, $27), $2c => Commands_n__9628_2373_parseTeamArg($0, $2c), $22), $0);
9780
9788
  switch($1d.h) {
9781
9789
  case undefined: /* just */ return {h: 1 /* Right */, a1: $1d.a1};
9782
9790
  case 0: /* nothing */ return {h: 0 /* Left */, a1: 'The graph command expects the name of a GitHub Team and optionally --completed as arguments.'};
@@ -9785,7 +9793,7 @@ function Commands_parseGraphArgs($0) {
9785
9793
  }
9786
9794
  }
9787
9795
  default: {
9788
- const $34 = Prelude_Types_traverse_Traversable_List(csegen_9(), $39 => Commands_x3cx7cx7cx3e(csegen_491(), $3e => Commands_n__9630_2372_parseCompletedFlag($0, $3e), $43 => Commands_n__9630_2373_parseTeamArg($0, $43), $39), $0);
9796
+ const $34 = Prelude_Types_traverse_Traversable_List(csegen_9(), $39 => Commands_x3cx7cx7cx3e(csegen_494(), $3e => Commands_n__9628_2372_parseCompletedFlag($0, $3e), $43 => Commands_n__9628_2373_parseTeamArg($0, $43), $39), $0);
9789
9797
  switch($34.h) {
9790
9798
  case undefined: /* just */ return {h: 1 /* Right */, a1: $34.a1};
9791
9799
  case 0: /* nothing */ return {h: 0 /* Left */, a1: 'The graph command expects the name of a GitHub Team and optionally --completed as arguments.'};
@@ -9799,9 +9807,9 @@ function Commands_parseContributeArgs($0) {
9799
9807
  switch($0.h) {
9800
9808
  case 0: /* nil */ return {h: 1 /* Right */, a1: {h: 0}};
9801
9809
  default: {
9802
- const $3 = Commands_n__9789_2511_recombineIgnoreArgs($0, $0);
9810
+ const $3 = Commands_n__9787_2511_recombineIgnoreArgs($0, $0);
9803
9811
  const $7 = Prelude_Types_List_mapAppend({h: 0}, $b => ({h: 1 /* Ignore */, a1: $b}), $3.a1);
9804
- const $e = Prelude_Types_traverse_Traversable_List(csegen_9(), $13 => Commands_x3cx7cx7cx3e(csegen_491(), $18 => Commands_n__9789_2510_parseSkipArg($0, $18), $1d => Commands_n__9789_2508_parseCheckoutFlag($0, $1d), $13), $3.a2);
9812
+ const $e = Prelude_Types_traverse_Traversable_List(csegen_9(), $13 => Commands_x3cx7cx7cx3e(csegen_494(), $18 => Commands_n__9787_2510_parseSkipArg($0, $18), $1d => Commands_n__9787_2508_parseCheckoutFlag($0, $1d), $13), $3.a2);
9805
9813
  return Data_Either_maybeToEither(() => Commands_contributeUsageError(), Prelude_Types_map_Functor_Maybe($29 => Prelude_Types_List_tailRecAppend($7, $29), $e));
9806
9814
  }
9807
9815
  }
@@ -9809,14 +9817,14 @@ function Commands_parseContributeArgs($0) {
9809
9817
 
9810
9818
  /* Commands.list : Config => Octokit => String -> Promise () */
9811
9819
  function Commands_list($0, $1, $2, $3, $4) {
9812
- return Data_Promise_x3ex3ex3d_Monad_Promise($7 => $8 => Data_Promise_map_Functor_Promise(csegen_492(), $d => $e => FFI_GitHub_listTeamMembers($1, $0.a2, $2, $d, $e), $7, $8), teamMemberLogins => $19 => $1a => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Basics_flip(csegen_398(), csegen_493(), Prelude_Types_traverse_Traversable_List(csegen_64(), $27 => Commands_n__9180_1921_forkedUser($1, $2, $0, $27), teamMemberLogins)), teamMembersJson => $2f => $30 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Types_traverse_Traversable_List(csegen_64(), $37 => $38 => Data_Promise_either(csegen_51(), Data_User_parseUser($37), $38), teamMembersJson), teamMembers => Util_renderIO($0, csegen_72(), Text_PrettyPrint_Prettyprinter_Doc_vsep(Prelude_Types_List_mapAppend({h: 0}, $4c => Commands_n__9180_1922_putNameLn($1, $2, $0, $4c), teamMembers))), $2f, $30), $19, $1a), $3, $4);
9820
+ return Data_Promise_x3ex3ex3d_Monad_Promise($7 => $8 => Data_Promise_map_Functor_Promise(csegen_495(), $d => $e => FFI_GitHub_listTeamMembers($1, $0.a2, $2, $d, $e), $7, $8), teamMemberLogins => $19 => $1a => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Basics_flip(csegen_401(), csegen_496(), Prelude_Types_traverse_Traversable_List(csegen_64(), $27 => Commands_n__9178_1921_forkedUser($1, $2, $0, $27), teamMemberLogins)), teamMembersJson => $2f => $30 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Types_traverse_Traversable_List(csegen_64(), $37 => $38 => Data_Promise_either(csegen_51(), Data_User_parseUser($37), $38), teamMembersJson), teamMembers => Util_renderIO($0, csegen_72(), Text_PrettyPrint_Prettyprinter_Doc_vsep(Prelude_Types_List_mapAppend({h: 0}, $4c => Commands_n__9178_1922_putNameLn($1, $2, $0, $4c), teamMembers))), $2f, $30), $19, $1a), $3, $4);
9813
9821
  }
9814
9822
 
9815
9823
  /* Commands.label : Config => Git => Octokit => List String -> Promise () */
9816
9824
  function Commands_label($0, $1, $2, $3, $4, $5) {
9817
9825
  const $20 = $21 => {
9818
9826
  const $23 = Prelude_Types_List_mapAppend({h: 0}, $27 => Commands_unslugifyLabel($0.a10, $27), $3);
9819
- return $2d => $2e => Data_Promise_x3ex3ex3d_Monad_Promise($31 => $32 => Label_addLabels($0, $2, $21.a2, $23, $31, $32), allLabels => Util_renderIO($0, csegen_72(), Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Added'), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Commands_n__8501_1299_putLabels($1, $2, $3, $0, $23), Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_unsafeTextWithoutNewLines(' to PR.'), a2: {h: 0}}))), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_foldMap_Foldable_List(csegen_49(), $61 => $61, {a1: 'All labels for PR of ', a2: {a1: $21.a2.a7, a2: {a1: ':', a2: {h: 0}}}})), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Commands_n__8501_1299_putLabels($1, $2, $3, $0, allLabels), Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_unsafeTextWithoutNewLines('.'), a2: {h: 0}}))), a2: {h: 0}}})), $2d, $2e);
9827
+ return $2d => $2e => Data_Promise_x3ex3ex3d_Monad_Promise($31 => $32 => Label_addLabels($0, $2, $21.a2, $23, $31, $32), allLabels => Util_renderIO($0, csegen_72(), Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Added'), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Commands_n__8499_1299_putLabels($1, $2, $3, $0, $23), Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_unsafeTextWithoutNewLines(' to PR.'), a2: {h: 0}}))), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_foldMap_Foldable_List(csegen_49(), $61 => $61, {a1: 'All labels for PR of ', a2: {a1: $21.a2.a7, a2: {a1: ':', a2: {h: 0}}}})), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Commands_n__8499_1299_putLabels($1, $2, $3, $0, allLabels), Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_unsafeTextWithoutNewLines('.'), a2: {h: 0}}))), a2: {h: 0}}})), $2d, $2e);
9820
9828
  };
9821
9829
  return Data_Promise_x3ex3ex3d_Monad_Promise($8 => $9 => Data_Promise_x3ex3ex3d_Monad_Promise($c => $d => FFI_Git_currentBranch($1, $c, $d), $13 => $14 => $15 => PullRequest_identifyOrCreatePR($0, $1, $2, 0, $13, $14, $15), $8, $9), $20, $4, $5);
9822
9830
  }
@@ -9879,14 +9887,14 @@ function Commands_contribute($0, $1, $2, $3, $4, $5) {
9879
9887
  }
9880
9888
  };
9881
9889
  const $53 = Prelude_Types_List_filterAppend({h: 0}, $56, $13);
9882
- const $5d = Prelude_Types_List_filterAppend({h: 0}, $61 => Commands_n__10119_2847_isNotIgnored($1, $2, $3, $0, configx27, $61), $53);
9890
+ const $5d = Prelude_Types_List_filterAppend({h: 0}, $61 => Commands_n__10117_2847_isNotIgnored($1, $2, $3, $0, configx27, $61), $53);
9883
9891
  const $6a = Data_List_partition($6d => Data_PullRequest_isRequestedReviewer(myLogin, $6d), $5d);
9884
- return Commands_case__contribute_3017($1, $2, $3, $0, openPrs, $13, myLogin, $2a, configx27, $40, $4d, $53, $5d, $6a, 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_sortBy(csegen_505(), $a0), $6a));
9892
+ return Commands_case__contribute_3017($1, $2, $3, $0, openPrs, $13, myLogin, $2a, configx27, $40, $4d, $53, $5d, $6a, 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_sortBy(csegen_508(), $a0), $6a));
9885
9893
  };
9886
9894
  return Data_Promise_x3ex3ex3d_Monad_Promise($30, $3f, $2d, $2e);
9887
9895
  };
9888
9896
  };
9889
- return Data_Promise_x3ex3ex3d_Monad_Promise($1f => $20 => Data_Promise_map_Functor_Promise(csegen_501(), FFI_GitHub_getSelf($2), $1f, $20), $29, $1b, $1c);
9897
+ return Data_Promise_x3ex3ex3d_Monad_Promise($1f => $20 => Data_Promise_map_Functor_Promise(csegen_504(), FFI_GitHub_getSelf($2), $1f, $20), $29, $1b, $1c);
9890
9898
  };
9891
9899
  };
9892
9900
  return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listPullRequests($2, $0.a2, $0.a3, {a1: 0}, 100n, 0n), $12, $4, $5);
@@ -9910,7 +9918,7 @@ function Commands_x3cx7cx7cx3e($0, $1, $2, $3) {
9910
9918
 
9911
9919
  /* User.Reflect.case block in case block in reflectOnSelf */
9912
9920
  function User_Reflect_case__casex20blockx20inx20reflectOnSelf_1862($0, $1, $2, $3, $4, $5, $6, $7, $8, $9) {
9913
- 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_List_mapAppend({h: 0}, csegen_518(), $2a))), {a1: $7, a2: $9.a1});
9921
+ 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_List_mapAppend({h: 0}, csegen_521(), $2a))), {a1: $7, a2: $9.a1});
9914
9922
  return Util_renderIO($0, csegen_72(), 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));
9915
9923
  }
9916
9924
 
@@ -9993,21 +10001,21 @@ function User_Reflect_reflectOnSelf($0, $1, $2, $3) {
9993
10001
  const $c = prs => $d => $e => {
9994
10002
  const $1b = myLogin => $1c => $1d => {
9995
10003
  const $39 = reviews => {
9996
- const $3a = Prelude_Types_map_Functor_Maybe(csegen_521(), Data_List_headx27(Data_List_sortBy($43 => $44 => Prelude_Basics_on(csegen_503(), csegen_521(), $43, $44), reviews)));
10004
+ const $3a = Prelude_Types_map_Functor_Maybe(csegen_524(), Data_List_headx27(Data_List_sortBy($43 => $44 => Prelude_Basics_on(csegen_506(), csegen_524(), $43, $44), reviews)));
9997
10005
  const $4d = PullRequest_tuple(prs);
9998
10006
  const $50 = Prelude_Interfaces_mapHom({a1: d => b => c => a => $54 => $55 => $56 => ({a1: $54($56.a1), a2: $55($56.a2)}), a2: b => c => a => $5f => $60 => ({a1: $5f($60.a1), a2: $60.a2}), a3: a => d => b => $67 => $68 => ({a1: $68.a1, a2: $67($68.a2)})}, $6f => Prelude_Types_List_filterAppend({h: 0}, $73 => Prelude_EqOrd_x3dx3d_Eq_String($73.a4, myLogin), $6f), $4d);
9999
10007
  return User_Reflect_case__casex20blockx20inx20reflectOnSelf_1862($0, $1, prs, myLogin, reviews, $3a, $4d, $50.a1, $50.a2, Prelude_Interfaces_mapHom({a1: d => b => c => a => $88 => $89 => $8a => ({a1: $88($8a.a1), a2: $89($8a.a2)}), a2: b => c => a => $93 => $94 => ({a1: $93($94.a1), a2: $94.a2}), a3: a => d => b => $9b => $9c => ({a1: $9c.a1, a2: $9b($9c.a2)})}, $a3 => Prelude_Types_List_filterAppend({h: 0}, $a7 => Prelude_Types_foldMap_Foldable_List(csegen_95(), $ac => Prelude_EqOrd_x3dx3d_Eq_String($ac, myLogin), $a7.a6), $a3), $4d));
10000
10008
  };
10001
- return Data_Promise_x3ex3ex3d_Monad_Promise(PullRequest_reviewsByUser($0, $1, myLogin, Data_List_take(User_Reflect_reviewDetailsCount(), Prelude_Types_List_reverse(Data_List_sortBy($2d => $2e => Prelude_Basics_on(csegen_503(), csegen_518(), $2d, $2e), PullRequest_combined(prs))))), $39, $1c, $1d);
10009
+ return Data_Promise_x3ex3ex3d_Monad_Promise(PullRequest_reviewsByUser($0, $1, myLogin, Data_List_take(User_Reflect_reviewDetailsCount(), Prelude_Types_List_reverse(Data_List_sortBy($2d => $2e => Prelude_Basics_on(csegen_506(), csegen_521(), $2d, $2e), PullRequest_combined(prs))))), $39, $1c, $1d);
10002
10010
  };
10003
- return Data_Promise_x3ex3ex3d_Monad_Promise($11 => $12 => Data_Promise_map_Functor_Promise(csegen_501(), FFI_GitHub_getSelf($1), $11, $12), $1b, $d, $e);
10011
+ return Data_Promise_x3ex3ex3d_Monad_Promise($11 => $12 => Data_Promise_map_Functor_Promise(csegen_504(), FFI_GitHub_getSelf($1), $11, $12), $1b, $d, $e);
10004
10012
  };
10005
10013
  return Data_Promise_x3ex3ex3d_Monad_Promise(PullRequest_listPartitionedPRs($0, $1, 4n, User_Reflect_prCount()), $c, $2, $3);
10006
10014
  }
10007
10015
 
10008
10016
  /* User.Me.printInfoOnSelf : Config => Octokit => Git => Promise () */
10009
10017
  function User_Me_printInfoOnSelf($0, $1, $2, $3, $4) {
10010
- return Data_Promise_x3ex3ex3d_Monad_Promise($7 => $8 => Data_Promise_map_Functor_Promise($b => User_Me_n__7361_2135_handleUnsetEmail($0, $1, $2, $b), $12 => $13 => FFI_Git_userEmail($2, $12, $13), $7, $8), gitEmail => $1b => $1c => Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_getSelf($1), githubUser => $22 => $23 => Data_Promise_x3ex3ex3d_Monad_Promise($26 => $27 => Data_Promise_map_Functor_Promise(csegen_492(), $2c => $2d => FFI_GitHub_listMyTeams($1, $2c, $2d), $26, $27), githubTeams => Util_renderIO($0, csegen_72(), User_Me_print(gitEmail, githubUser, githubTeams)), $22, $23), $1b, $1c), $3, $4);
10018
+ return Data_Promise_x3ex3ex3d_Monad_Promise($7 => $8 => Data_Promise_map_Functor_Promise($b => User_Me_n__7361_2135_handleUnsetEmail($0, $1, $2, $b), $12 => $13 => FFI_Git_userEmail($2, $12, $13), $7, $8), gitEmail => $1b => $1c => Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_getSelf($1), githubUser => $22 => $23 => Data_Promise_x3ex3ex3d_Monad_Promise($26 => $27 => Data_Promise_map_Functor_Promise(csegen_495(), $2c => $2d => FFI_GitHub_listMyTeams($1, $2c, $2d), $26, $27), githubTeams => Util_renderIO($0, csegen_72(), User_Me_print(gitEmail, githubUser, githubTeams)), $22, $23), $1b, $1c), $3, $4);
10011
10019
  }
10012
10020
 
10013
10021
  /* User.Reflect.print : Nat -> Nat -> Nat -> Nat -> Nat -> Nat -> Maybe Date -> Maybe Date -> Maybe Date -> Doc AnsiStyle */
@@ -10044,8 +10052,8 @@ function User_Reflect_header($0) {
10044
10052
  function User_Reflect_graph($0, $1, $2, $3, $4, $5) {
10045
10053
  const $6 = ($2+$3);
10046
10054
  const $9 = ($5+$4);
10047
- const $c = Prelude_Types_foldr_Foldable_List(csegen_206(), Prelude_Types_String_length(User_Reflect_leftTitle()), {a1: ($6+$1), a2: {a1: $9, a2: {h: 0}}});
10048
- const $1b = Prelude_Types_foldr_Foldable_List(csegen_206(), Prelude_Types_String_length(User_Reflect_rightTitle()), {a1: $6, a2: {a1: $9, a2: {h: 0}}});
10055
+ const $c = Prelude_Types_foldr_Foldable_List(csegen_207(), Prelude_Types_String_length(User_Reflect_leftTitle()), {a1: ($6+$1), a2: {a1: $9, a2: {h: 0}}});
10056
+ const $1b = Prelude_Types_foldr_Foldable_List(csegen_207(), Prelude_Types_String_length(User_Reflect_rightTitle()), {a1: $6, a2: {a1: $9, a2: {h: 0}}});
10049
10057
  const $28 = (($c+$1b)+3n);
10050
10058
  const $2d = ((Number($0)/2.0)-(Number($28)/2.0));
10051
10059
  const $36 = (Prelude_Types_prim__integerToNat(BigInt(Math.trunc($2d)))+Prelude_Types_prim__integerToNat(($c-Prelude_Types_String_length(User_Reflect_leftTitle()))));
@@ -10055,7 +10063,7 @@ function User_Reflect_graph($0, $1, $2, $3, $4, $5) {
10055
10063
 
10056
10064
  /* User.Reflect.details : Nat -> Nat -> Nat -> Nat -> Nat -> Nat -> Maybe Date -> Maybe Date -> Maybe Date -> Doc AnsiStyle */
10057
10065
  function User_Reflect_details($0, $1, $2, $3, $4, $5, $6, $7, $8) {
10058
- 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_Types_map_Functor_Maybe(csegen_527(), $8), 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_Types_map_Functor_Maybe(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}}})), $6), 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_Types_map_Functor_Maybe(csegen_527(), $7), 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_Types_foldMap_Foldable_List(csegen_49(), $cf => $cf, {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}}}}}}}}}});
10066
+ 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_Types_map_Functor_Maybe(csegen_530(), $8), 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_Types_map_Functor_Maybe(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}}})), $6), 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_Types_map_Functor_Maybe(csegen_530(), $7), 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_Types_foldMap_Foldable_List(csegen_49(), $cf => $cf, {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}}}}}}}}}});
10059
10067
  }
10060
10068
 
10061
10069
  /* User.Reflect.chart : Nat -> Nat -> Nat -> Nat -> Nat -> Nat -> Nat -> Doc AnsiStyle */
@@ -10242,7 +10250,7 @@ function PullRequest_n__10285_2626_createPR($0, $1, $2, $3, $4, $5, $6) {
10242
10250
  };
10243
10251
  return Data_Promise_x3ex3ex3d_Monad_Promise($16f => $170 => Util_relativeToRoot($0, '.github/PULL_REQUEST_TEMPLATE.md', $16f, $170), $176, $16b, $16c);
10244
10252
  };
10245
- return Data_Promise_x3ex3ex3d_Monad_Promise($15d => $15e => Data_Promise_map_Functor_Promise($161 => ($13b+Data_String_trim($161)), csegen_461(), $15d, $15e), $16a, $159, $15a);
10253
+ return Data_Promise_x3ex3ex3d_Monad_Promise($15d => $15e => Data_Promise_map_Functor_Promise($161 => ($13b+Data_String_trim($161)), csegen_464(), $15d, $15e), $16a, $159, $15a);
10246
10254
  };
10247
10255
  return Data_Promise_x3ex3ex3d_Monad_Promise($14b => $14c => $14d => Data_Promise_liftIO_HasIO_Promise($150 => Prelude_IO_prim__putStr($13b, $150), $14b, $14c, $14d), $157, $147, $148);
10248
10256
  };
@@ -10251,7 +10259,7 @@ function PullRequest_n__10285_2626_createPR($0, $1, $2, $3, $4, $5, $6) {
10251
10259
  return Data_Promise_x3ex3ex3d_Monad_Promise($12c => $12d => $12e => Data_Promise_liftIO_HasIO_Promise($131 => Prelude_IO_prim__putStr('What would you like the title to be?\n', $131), $12c, $12d, $12e), $138, $128, $129);
10252
10260
  };
10253
10261
  };
10254
- return Data_Promise_x3ex3ex3d_Monad_Promise($10f => $110 => Data_Promise_map_Functor_Promise($113 => Data_String_trim($113), csegen_461(), $10f, $110), $11a, $10b, $10c);
10262
+ return Data_Promise_x3ex3ex3d_Monad_Promise($10f => $110 => Data_Promise_map_Functor_Promise($113 => Data_String_trim($113), csegen_464(), $10f, $110), $11a, $10b, $10c);
10255
10263
  };
10256
10264
  return Data_Promise_x3ex3ex3d_Monad_Promise($ee => $ef => $f0 => Data_Promise_liftIO_HasIO_Promise($f3 => Prelude_IO_prim__putStr((Prelude_Types_foldMap_Foldable_List(csegen_49(), $fb => $fb, {a1: 'What branch are you merging into (ENTER for default: ', a2: {a1: $4.a5, a2: {a1: ')?', a2: {h: 0}}}})+'\n'), $f3), $ee, $ef, $f0), $109, $ea, $eb);
10257
10265
  };
@@ -10276,7 +10284,7 @@ function PullRequest_n__10285_2626_createPR($0, $1, $2, $3, $4, $5, $6) {
10276
10284
  function PullRequest_n__10285_2625_continueGivenUncommittedChanges($0, $1, $2, $3, $4, $5, $6) {
10277
10285
  const $f = $10 => $11 => $12 => {
10278
10286
  switch($10.h) {
10279
- case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_Promise($16 => $17 => $18 => Data_Promise_liftIO_HasIO_Promise($1b => Prelude_IO_prim__putStr('The following files have uncommitted changes:\n', $1b), $16, $17, $18), $23 => $24 => $25 => Data_Promise_x3ex3ex3d_Monad_Promise($28 => $29 => $2a => Data_Promise_liftIO_HasIO_Promise($2d => Prelude_IO_prim__putStr(($10.a1+'\n'), $2d), $28, $29, $2a), csegen_557(), $24, $25), $11, $12);
10287
+ case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_Promise($16 => $17 => $18 => Data_Promise_liftIO_HasIO_Promise($1b => Prelude_IO_prim__putStr('The following files have uncommitted changes:\n', $1b), $16, $17, $18), $23 => $24 => $25 => Data_Promise_x3ex3ex3d_Monad_Promise($28 => $29 => $2a => Data_Promise_liftIO_HasIO_Promise($2d => Prelude_IO_prim__putStr(($10.a1+'\n'), $2d), $28, $29, $2a), csegen_560(), $24, $25), $11, $12);
10280
10288
  case 0: /* nothing */ return Data_Promise_pure_Applicative_Promise(1, $11, $12);
10281
10289
  }
10282
10290
  };
@@ -10287,7 +10295,7 @@ function PullRequest_n__10285_2625_continueGivenUncommittedChanges($0, $1, $2, $
10287
10295
  function PullRequest_n__10285_2624_continueGivenStagedChanges($0, $1, $2, $3, $4, $5, $6) {
10288
10296
  const $f = $10 => $11 => $12 => {
10289
10297
  switch($10.h) {
10290
- case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_Promise($16 => $17 => $18 => Data_Promise_liftIO_HasIO_Promise($1b => Prelude_IO_prim__putStr('The following files have staged but uncommitted changes:\n', $1b), $16, $17, $18), $23 => $24 => $25 => Data_Promise_x3ex3ex3d_Monad_Promise($28 => $29 => $2a => Data_Promise_liftIO_HasIO_Promise($2d => Prelude_IO_prim__putStr(($10.a1+'\n'), $2d), $28, $29, $2a), csegen_557(), $24, $25), $11, $12);
10298
+ case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_Promise($16 => $17 => $18 => Data_Promise_liftIO_HasIO_Promise($1b => Prelude_IO_prim__putStr('The following files have staged but uncommitted changes:\n', $1b), $16, $17, $18), $23 => $24 => $25 => Data_Promise_x3ex3ex3d_Monad_Promise($28 => $29 => $2a => Data_Promise_liftIO_HasIO_Promise($2d => Prelude_IO_prim__putStr(($10.a1+'\n'), $2d), $28, $29, $2a), csegen_560(), $24, $25), $11, $12);
10291
10299
  case 0: /* nothing */ return Data_Promise_pure_Applicative_Promise(1, $11, $12);
10292
10300
  }
10293
10301
  };
@@ -10331,7 +10339,7 @@ function PullRequest_reviewsForPrs($0, $1, $2, $3, $4) {
10331
10339
  };
10332
10340
  return Data_Promise_x3ex3ex3d_Monad_Promise($1c, reviews => $43 => $44 => Data_Promise_pure_Applicative_Promise(Prelude_Types_join_Monad_List(reviews), $43, $44), $19, $1a);
10333
10341
  };
10334
- return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Basics_flip(csegen_398(), csegen_493(), Prelude_Types_traverse_Traversable_List(csegen_64(), $11 => PullRequest_n__9368_1704_forkedReviews($0, $1, $2, $11), $2)), $18, $3, $4);
10342
+ return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Basics_flip(csegen_401(), csegen_496(), Prelude_Types_traverse_Traversable_List(csegen_64(), $11 => PullRequest_n__9368_1704_forkedReviews($0, $1, $2, $11), $2)), $18, $3, $4);
10335
10343
  }
10336
10344
 
10337
10345
  /* PullRequest.reviewsByUser : Config => Octokit => String -> List PullRequest -> Promise (List Review) */
@@ -10361,9 +10369,9 @@ function PullRequest_reviewsByUser($0, $1, $2, $3) {
10361
10369
  List PullRequest -> Promise (SortedMap String (List Review)) */
10362
10370
  function PullRequest_reviewsByEachUser($0, $1, $2, $3, $4) {
10363
10371
  const $f = reviews => {
10364
- const $10 = Data_List_groupAllWith(csegen_217(), $15 => $15.a2, reviews);
10372
+ const $10 = Data_List_groupAllWith(csegen_218(), $15 => $15.a2, reviews);
10365
10373
  const $18 = Prelude_Types_List_mapAppend({h: 0}, rs => ({a1: rs.a1.a2, a2: Data_List1_forget(rs)}), $10);
10366
- return $23 => $24 => Data_Promise_pure_Applicative_Promise(Data_SortedMap_fromList(csegen_217(), $18), $23, $24);
10374
+ return $23 => $24 => Data_Promise_pure_Applicative_Promise(Data_SortedMap_fromList(csegen_218(), $18), $23, $24);
10367
10375
  };
10368
10376
  return Data_Promise_x3ex3ex3d_Monad_Promise($7 => $8 => PullRequest_reviewsForPrs($0, $1, $2, $7, $8), $f, $3, $4);
10369
10377
  }
@@ -10377,12 +10385,12 @@ function PullRequest_requestReviewers($0, $1, $2, $3, $4, $5, $6, $7) {
10377
10385
  let $37;
10378
10386
  switch($0.a7) {
10379
10387
  case 1: {
10380
- const $3a = Reviewer_chooseReviewers(csegen_217(), $14.a2, $14.a1, teamMembers, {h: 0}, $2.a4);
10388
+ const $3a = Reviewer_chooseReviewers(csegen_218(), $14.a2, $14.a1, teamMembers, {h: 0}, $2.a4);
10381
10389
  $37 = Reviewer_randomReviewer(csegen_72(), $3a);
10382
10390
  break;
10383
10391
  }
10384
10392
  case 0: {
10385
- $37 = csegen_463();
10393
+ $37 = csegen_466();
10386
10394
  break;
10387
10395
  }
10388
10396
  }
@@ -10501,12 +10509,12 @@ function PullRequest_listx27($0, $1, $2, $3) {
10501
10509
  }
10502
10510
  };
10503
10511
  const $4d = {a1: $4e, a2: a => $56 => ({h: 1 /* Right */, a1: $56}), a3: $58};
10504
- const $4b = Prelude_Types_traverse_Traversable_List($4d, csegen_418(), prJsons);
10512
+ const $4b = Prelude_Types_traverse_Traversable_List($4d, csegen_421(), prJsons);
10505
10513
  return Data_Promise_either(csegen_51(), $4b, $47);
10506
10514
  };
10507
10515
  return Data_Promise_x3ex3ex3d_Monad_Promise($46, pulls => $67 => $68 => Data_Promise_pure_Applicative_Promise(Prelude_Types_join_Monad_List(pulls), $67, $68), $43, $44);
10508
10516
  };
10509
- return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Basics_flip(csegen_398(), $a => $b => $c => 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 => $1a => Data_Pagination_null_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($1a), a4: elem => acc => m => $1e => funcM => init => input => Data_Pagination_foldlM_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($1e, funcM, init, input), a5: elem => $25 => Data_Pagination_toList_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($25), a6: a => m => $29 => f => $2a => Data_Pagination_foldMap_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($29, f, $2a)}, $a, $b, $c), Data_Pagination_traversex27(csegen_64(), $37 => $38 => $39 => $3a => PullRequest_forkedPRs($0, $37, $38, $39, $3a), $1)), $42, $2, $3);
10517
+ return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Basics_flip(csegen_401(), $a => $b => $c => 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 => $1a => Data_Pagination_null_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($1a), a4: elem => acc => m => $1e => funcM => init => input => Data_Pagination_foldlM_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($1e, funcM, init, input), a5: elem => $25 => Data_Pagination_toList_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($25), a6: a => m => $29 => f => $2a => Data_Pagination_foldMap_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($29, f, $2a)}, $a, $b, $c), Data_Pagination_traversex27(csegen_64(), $37 => $38 => $39 => $3a => PullRequest_forkedPRs($0, $37, $38, $39, $3a), $1)), $42, $2, $3);
10510
10518
  }
10511
10519
 
10512
10520
  /* PullRequest.identifyOrCreatePR : Config => Git => Octokit => {default False _ : Bool} ->
@@ -10902,26 +10910,26 @@ function Data_SortedMap_Dependent_empty($0) {
10902
10910
  }
10903
10911
 
10904
10912
  /* Data.Pagination.with block in metaPages' */
10905
- function Data_Pagination_with__metaPagesx27_7396($0, $1, $2, $3, $4, $5, $6) {
10913
+ function Data_Pagination_with__metaPagesx27_7387($0, $1, $2, $3, $4, $5, $6) {
10906
10914
  const $7 = $8 => Data_Pagination_divNatNZLemma($0, $1, $6);
10907
10915
  return Data_Pagination_pagesHelper(0n, $0, $3, $7(undefined), $5);
10908
10916
  }
10909
10917
 
10910
10918
  /* Data.Pagination.with block in with block in divNatNZLemma */
10911
- function Data_Pagination_with__withx20blockx20inx20divNatNZLemma_7337($0, $1, $2, $3, $4, $5) {
10919
+ function Data_Pagination_with__withx20blockx20inx20divNatNZLemma_7328($0, $1, $2, $3, $4, $5) {
10912
10920
  return Prelude_Uninhabited_absurd($8 => $8, $3((Data_Nat_lteReflectsLTE(($0+1n), $1, $4)+1n)));
10913
10921
  }
10914
10922
 
10915
10923
  /* Data.Pagination.with block in divNatNZLemma */
10916
- function Data_Pagination_with__divNatNZLemma_7319($0, $1, $2, $3, $4, $5) {
10924
+ function Data_Pagination_with__divNatNZLemma_7310($0, $1, $2, $3, $4, $5) {
10917
10925
  switch($2) {
10918
10926
  case 0: return 1n;
10919
- case 1: return Data_Pagination_with__withx20blockx20inx20divNatNZLemma_7337($1, $0, $5, $c => Data_Nat_LTEImpliesNotGT($5, $c), $3, undefined);
10927
+ case 1: return Data_Pagination_with__withx20blockx20inx20divNatNZLemma_7328($1, $0, $5, $c => Data_Nat_LTEImpliesNotGT($5, $c), $3, undefined);
10920
10928
  }
10921
10929
  }
10922
10930
 
10923
10931
  /* Data.Pagination.with block in pagesHelper */
10924
- function Data_Pagination_with__pagesHelper_7161($0, $1, $2, $3, $4, $5) {
10932
+ function Data_Pagination_with__pagesHelper_7152($0, $1, $2, $3, $4, $5) {
10925
10933
  switch($2.h) {
10926
10934
  case 0: /* Yes */ {
10927
10935
  const $7 = Data_Pagination_lemma($0, $1, $2.a1);
@@ -10932,12 +10940,12 @@ function Data_Pagination_with__pagesHelper_7161($0, $1, $2, $3, $4, $5) {
10932
10940
  }
10933
10941
 
10934
10942
  /* Data.Pagination.with block in nonTerminalPage */
10935
- function Data_Pagination_with__nonTerminalPage_7140($0, $1, $2, $3, $4, $5, $6, $7) {
10943
+ function Data_Pagination_with__nonTerminalPage_7131($0, $1, $2, $3, $4, $5, $6, $7) {
10936
10944
  return {h: 0 /* NonTerminal */, a1: $7, a2: $1, a3: $0, a4: $5, a5: $6, a6: undefined, a7: Data_Pagination_pagesHelper(($7+1n), $0, $1, $6, $5)};
10937
10945
  }
10938
10946
 
10939
10947
  /* Data.Pagination.with block in lemma */
10940
- function Data_Pagination_with__lemma_7043($0, $1, $2, $3, $4) {
10948
+ function Data_Pagination_with__lemma_7034($0, $1, $2, $3, $4) {
10941
10949
  return {a1: ($3.a1+1n), a2: {a1: undefined, a2: 1n}};
10942
10950
  }
10943
10951
 
@@ -10986,21 +10994,21 @@ function Data_Pagination_traversex27($0, $1, $2) {
10986
10994
  /* Data.Pagination.pagesHelper : (page : Nat) -> (remainingItems : Nat) -> (perPage : Nat) -> GT perPage 0 =>
10987
10995
  GT remainingItems 0 => PaginationShape remainingItems perPage page */
10988
10996
  function Data_Pagination_pagesHelper($0, $1, $2, $3, $4) {
10989
- return Data_Pagination_with__pagesHelper_7161($2, $1, Data_Nat_isLT($2, $1), $3, $4, $0);
10997
+ return Data_Pagination_with__pagesHelper_7152($2, $1, Data_Nat_isLT($2, $1), $3, $4, $0);
10990
10998
  }
10991
10999
 
10992
11000
  /* Data.Pagination.nonTerminalPage : (page : Nat) -> (remainingItems : Nat) -> (perPage : Nat) ->
10993
11001
  {auto 0 _ : remainder + perPage = remainingItems} -> GT perPage 0 =>
10994
11002
  GT remainder 0 => PaginationShape remainingItems perPage page */
10995
11003
  function Data_Pagination_nonTerminalPage($0, $1, $2, $3, $4, $5) {
10996
- return Data_Pagination_with__nonTerminalPage_7140($0, $3, $2, undefined, undefined, $5, $4, $1);
11004
+ return Data_Pagination_with__nonTerminalPage_7131($0, $3, $2, undefined, undefined, $5, $4, $1);
10997
11005
  }
10998
11006
 
10999
11007
  /* Data.Pagination.metaPages' : (items : Nat) -> (pages : Nat) -> GT items 0 => {auto 0 pagesOk : GT pages 0} ->
11000
11008
  LTE pages items =>
11001
11009
  PaginationShape items (divNatNZ items pages (gtIsNonZero pagesOk)) 0 */
11002
11010
  function Data_Pagination_metaPagesx27($0, $1, $2, $3) {
11003
- return Data_Pagination_with__metaPagesx27_7396($0, $1, undefined, Data_Nat_divNatNZ($0, $1), undefined, $2, $3);
11011
+ return Data_Pagination_with__metaPagesx27_7387($0, $1, undefined, Data_Nat_divNatNZ($0, $1), undefined, $2, $3);
11004
11012
  }
11005
11013
 
11006
11014
  /* Data.Pagination.metaPages : (items : Nat) -> (perPage : Nat) -> GT items 0 => GT perPage 0 =>
@@ -11024,7 +11032,7 @@ function Data_Pagination_lemma($0, $1, $2) {
11024
11032
  case 0n: _crashExp('Nat case not covered');
11025
11033
  default: {
11026
11034
  const $8 = ($2-1n);
11027
- return Data_Pagination_with__lemma_7043($0, $4, $8, Data_Pagination_lemmax27($0, $4, $8), $1);
11035
+ return Data_Pagination_with__lemma_7034($0, $4, $8, Data_Pagination_lemmax27($0, $4, $8), $1);
11028
11036
  }
11029
11037
  }
11030
11038
  }
@@ -11046,7 +11054,7 @@ function Data_Pagination_divNatNZLemma($0, $1, $2) {
11046
11054
  case 0n: _crashExp('Nat case not covered');
11047
11055
  default: {
11048
11056
  const $f = ($1-1n);
11049
- return Data_Pagination_with__divNatNZLemma_7319($f, $b, Data_Nat_lte(($b+1n), $f), undefined, undefined, $2);
11057
+ return Data_Pagination_with__divNatNZLemma_7310($f, $b, Data_Nat_lte(($b+1n), $f), undefined, undefined, $2);
11050
11058
  }
11051
11059
  }
11052
11060
  }
@@ -11099,7 +11107,7 @@ function Graph_n__6343_6621_header($0, $1, $2, $3, $4, $5) {
11099
11107
  break;
11100
11108
  }
11101
11109
  }
11102
- const $34 = {a1: $35, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Symbols_parens(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Graph_n__6343_6624_redDot($0, $1, $2, $3, $4, $5), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('overlayed on'), Graph_n__6343_6625_yellowDot($0, $1, $2, $3, $4, $5))))}, a2: csegen_604()}};
11110
+ const $34 = {a1: $35, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Symbols_parens(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Graph_n__6343_6624_redDot($0, $1, $2, $3, $4, $5), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('overlayed on'), Graph_n__6343_6625_yellowDot($0, $1, $2, $3, $4, $5))))}, a2: csegen_607()}};
11103
11111
  const $23 = {a1: {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(Graph_n__6343_6624_redDot($0, $1, $2, $3, $4, $5)))}, a2: $34};
11104
11112
  const $12 = {a1: {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(Graph_n__6343_6625_yellowDot($0, $1, $2, $3, $4, $5)))}, a2: $23};
11105
11113
  const $d = {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Weighted review workload.')}, a2: $12};
@@ -11110,7 +11118,7 @@ function Graph_n__6343_6621_header($0, $1, $2, $3, $4, $5) {
11110
11118
 
11111
11119
  /* Graph.5952:6229:header */
11112
11120
  function Graph_n__5952_6229_header($0, $1, $2) {
11113
- return Text_PrettyPrint_Prettyprinter_Doc_vsep(Data_List_catMaybes({a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc()}, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Open Pull Requests grouped by month created.')}, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc()}, a2: csegen_604()}}}));
11121
+ return Text_PrettyPrint_Prettyprinter_Doc_vsep(Data_List_catMaybes({a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc()}, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Open Pull Requests grouped by month created.')}, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc()}, a2: csegen_607()}}}));
11114
11122
  }
11115
11123
 
11116
11124
  /* Graph.6343:6620:greenBox */
@@ -11260,9 +11268,9 @@ function Graph_reviewsGraph($0, $1, $2, $3, $4, $5) {
11260
11268
 
11261
11269
  /* Graph.healthGraph : List PullRequest -> String -> String -> Doc AnsiStyle */
11262
11270
  function Graph_healthGraph($0, $1, $2) {
11263
- const $3 = Data_List_groupBy($6 => $7 => Prelude_Basics_on($a => $b => Prelude_Basics_on($e => $f => (($e===$f)?1:0), $13 => $13.a2, $a, $b), csegen_504(), $6, $7), Data_List_sortBy(csegen_505(), $0));
11271
+ const $3 = Data_List_groupBy($6 => $7 => Prelude_Basics_on($a => $b => Prelude_Basics_on($e => $f => (($e===$f)?1:0), $13 => $13.a2, $a, $b), csegen_507(), $6, $7), Data_List_sortBy(csegen_508(), $0));
11264
11272
  const $20 = Prelude_Types_foldr_Foldable_List(xs => m => Prelude_Types_max_Ord_Nat(Data_List1_length(xs), m), 1n, $3);
11265
- return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Graph_n__5952_6229_header($2, $1, $0), a2: {a1: Graph_graph({a1: $36 => Graph_totalWidth_Graphable_x28PRsOnDatex20x24dateTyx29(csegen_623(), $36), a2: $3c => Graph_label_Graphable_x28PRsOnDatex20x24dateTyx29(csegen_623(), $3c), a3: $42 => Graph_score_Graphable_x28PRsOnDatex20x24dateTyx29(csegen_623(), $42), a4: $48 => Graph_detractor_Graphable_x28PRsOnDatex20x24dateTyx29(csegen_623(), $48), a5: $4e => Graph_bonus_Graphable_x28PRsOnDatex20x24dateTyx29(csegen_623(), $4e)}, $20, Graph_n__5952_6231_unfoldGraph($2, $1, $0, Data_Fuel_limit(48n), $3, {h: 0})), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Graph_n__5952_6230_link($2, $1, $0)), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {h: 0}}}}}});
11273
+ return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Graph_n__5952_6229_header($2, $1, $0), a2: {a1: Graph_graph({a1: $36 => Graph_totalWidth_Graphable_x28PRsOnDatex20x24dateTyx29(csegen_626(), $36), a2: $3c => Graph_label_Graphable_x28PRsOnDatex20x24dateTyx29(csegen_626(), $3c), a3: $42 => Graph_score_Graphable_x28PRsOnDatex20x24dateTyx29(csegen_626(), $42), a4: $48 => Graph_detractor_Graphable_x28PRsOnDatex20x24dateTyx29(csegen_626(), $48), a5: $4e => Graph_bonus_Graphable_x28PRsOnDatex20x24dateTyx29(csegen_626(), $4e)}, $20, Graph_n__5952_6231_unfoldGraph($2, $1, $0, Data_Fuel_limit(48n), $3, {h: 0})), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Graph_n__5952_6230_link($2, $1, $0)), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {h: 0}}}}}});
11266
11274
  }
11267
11275
 
11268
11276
  /* Graph.graphOne : Graphable g => Nat -> g -> Doc AnsiStyle */
@@ -11289,7 +11297,7 @@ function AppVersion_printVersion($0) {
11289
11297
 
11290
11298
  /* AppVersion.appVersion : String */
11291
11299
  const AppVersion_appVersion = __lazy(function () {
11292
- return '4.0.1';
11300
+ return '4.1.0';
11293
11301
  });
11294
11302
 
11295
11303