@mattpolzin/harmony 2.3.0 → 2.4.1

This diff represents the content of publicly available package versions that have been released to one of the supported registries. The information contained in this diff is provided for informational purposes only and reflects changes between package versions as they appear in their respective public registries.
@@ -633,6 +633,16 @@ function support_system_file_getStr () {
633
633
  return support_system_file_readLine({ fd: 0, buffer: Buffer.alloc(0), name: '<stdin>', eof: false })
634
634
  }
635
635
 
636
+ function support_system_file_getChar() {
637
+ const readBuf = Buffer.alloc(1);
638
+ if (support_system_file_fs.readSync(process.stdin.fd, readBuf, 0, 1) === 0) {
639
+ // No bytes read, getChar from libc returns -1 in this case.
640
+ return String.fromCharCode(-1)
641
+ } else {
642
+ return readBuf.toString('utf-8')
643
+ }
644
+ }
645
+
636
646
  function support_system_file_parseMode(mode) {
637
647
  return mode.replace('b', '')
638
648
  }
@@ -683,12 +693,6 @@ function support_system_file_popen (cmd, m) {
683
693
  }
684
694
 
685
695
  const tmp_file = require('os').tmpdir() + "/" + require('crypto').randomBytes(15).toString('hex')
686
- // try {
687
- // support_system_file_fs.writeFileSync(tmp_file, '')
688
- // } catch (e) {
689
- // process.__lasterr = e
690
- // return null
691
- // }
692
696
  const write_fd = support_system_file_fs.openSync(
693
697
  tmp_file,
694
698
  'w'
@@ -806,8 +810,8 @@ function x24tcOpt_1($0) {
806
810
  case 0: /* nil */ return {h: 0 /* {TcDone:1} */, a1: {h: 0}};
807
811
  default: {
808
812
  switch($0.a7.h) {
809
- case 0: /* 3348:1047:Add */ return {h: 0 /* {TcDone:1} */, a1: $0.a6};
810
- case 1: /* 3348:1048:Subtract */ return {h: 0 /* {TcDone:1} */, a1: csegen_116()($c => ({a1: $c.a1, a2: $c.a2, a3: 0n}))($0.a6)};
813
+ case 0: /* 3350:1047:Add */ return {h: 0 /* {TcDone:1} */, a1: $0.a6};
814
+ case 1: /* 3350:1048:Subtract */ return {h: 0 /* {TcDone:1} */, a1: csegen_116()($c => ({a1: $c.a1, a2: $c.a2, a3: 0n}))($0.a6)};
811
815
  default: {
812
816
  switch($0.a6.h) {
813
817
  case 0: /* nil */ {
@@ -816,30 +820,30 @@ function x24tcOpt_1($0) {
816
820
  case 0: return {h: 0 /* {TcDone:1} */, a1: $0.a5};
817
821
  default: {
818
822
  const $18 = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3};
819
- const $1c = Data_List_DeleteBy_deleteByx27($1f => $20 => Prelude_Basics_on($23 => $24 => $0.a1.a1.a1($23)($24), csegen_723(), $1f, $20), $18, $0.a6);
823
+ const $1c = Data_List_DeleteBy_deleteByx27($1f => $20 => Prelude_Basics_on($23 => $24 => $0.a1.a1.a1($23)($24), csegen_729(), $1f, $20), $18, $0.a6);
820
824
  switch($1c.a1.h) {
821
825
  case 0: /* nothing */ {
822
826
  switch($0.a8) {
823
- case 0: return {h: 0 /* {TcDone:1} */, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3}, a2: Data_ReviewScore_n__3348_1049_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $1c.a2, $0.a7, $0.a8)}};
827
+ case 0: return {h: 0 /* {TcDone:1} */, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3}, a2: Data_ReviewScore_n__3350_1049_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $1c.a2, $0.a7, $0.a8)}};
824
828
  case 1: return {h: 1 /* {TcContinue1:1} */, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5.a2, a6: $1c.a2, a7: $0.a7, a8: $0.a8};
825
829
  }
826
830
  }
827
- case undefined: /* just */ return {h: 0 /* {TcDone:1} */, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: Data_ReviewScore_n__3375_1201_calc($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a1.a1, $0.a5.a1.a3, $0.a5.a1.a2, $18, $0.a5.a2, $0.a8, $0.a7, $0.a6, $0.a5.a1.a3, $1c.a1.a1.a3)}, a2: Data_ReviewScore_n__3348_1049_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $1c.a2, $0.a7, $0.a8)}};
831
+ case undefined: /* just */ return {h: 0 /* {TcDone:1} */, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: Data_ReviewScore_n__3377_1201_calc($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a1.a1, $0.a5.a1.a3, $0.a5.a1.a2, $18, $0.a5.a2, $0.a8, $0.a7, $0.a6, $0.a5.a1.a3, $1c.a1.a1.a3)}, a2: Data_ReviewScore_n__3350_1049_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $1c.a2, $0.a7, $0.a8)}};
828
832
  }
829
833
  }
830
834
  }
831
835
  }
832
836
  default: {
833
837
  const $6b = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3};
834
- const $6f = Data_List_DeleteBy_deleteByx27($72 => $73 => Prelude_Basics_on($76 => $77 => $0.a1.a1.a1($76)($77), csegen_723(), $72, $73), $6b, $0.a6);
838
+ const $6f = Data_List_DeleteBy_deleteByx27($72 => $73 => Prelude_Basics_on($76 => $77 => $0.a1.a1.a1($76)($77), csegen_729(), $72, $73), $6b, $0.a6);
835
839
  switch($6f.a1.h) {
836
840
  case 0: /* nothing */ {
837
841
  switch($0.a8) {
838
- case 0: return {h: 0 /* {TcDone:1} */, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3}, a2: Data_ReviewScore_n__3348_1049_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $6f.a2, $0.a7, $0.a8)}};
842
+ case 0: return {h: 0 /* {TcDone:1} */, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3}, a2: Data_ReviewScore_n__3350_1049_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $6f.a2, $0.a7, $0.a8)}};
839
843
  case 1: return {h: 1 /* {TcContinue1:1} */, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5.a2, a6: $6f.a2, a7: $0.a7, a8: $0.a8};
840
844
  }
841
845
  }
842
- case undefined: /* just */ return {h: 0 /* {TcDone:1} */, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: Data_ReviewScore_n__3375_1201_calc($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a1.a1, $0.a5.a1.a3, $0.a5.a1.a2, $6b, $0.a5.a2, $0.a8, $0.a7, $0.a6, $0.a5.a1.a3, $6f.a1.a1.a3)}, a2: Data_ReviewScore_n__3348_1049_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $6f.a2, $0.a7, $0.a8)}};
846
+ case undefined: /* just */ return {h: 0 /* {TcDone:1} */, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: Data_ReviewScore_n__3377_1201_calc($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a1.a1, $0.a5.a1.a3, $0.a5.a1.a2, $6b, $0.a5.a2, $0.a8, $0.a7, $0.a6, $0.a5.a1.a3, $6f.a1.a1.a3)}, a2: Data_ReviewScore_n__3350_1049_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $6f.a2, $0.a7, $0.a8)}};
843
847
  }
844
848
  }
845
849
  }
@@ -856,30 +860,30 @@ function x24tcOpt_1($0) {
856
860
  case 0: return {h: 0 /* {TcDone:1} */, a1: $0.a5};
857
861
  default: {
858
862
  const $c2 = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3};
859
- const $c6 = Data_List_DeleteBy_deleteByx27($c9 => $ca => Prelude_Basics_on($cd => $ce => $0.a1.a1.a1($cd)($ce), csegen_723(), $c9, $ca), $c2, $0.a6);
863
+ const $c6 = Data_List_DeleteBy_deleteByx27($c9 => $ca => Prelude_Basics_on($cd => $ce => $0.a1.a1.a1($cd)($ce), csegen_729(), $c9, $ca), $c2, $0.a6);
860
864
  switch($c6.a1.h) {
861
865
  case 0: /* nothing */ {
862
866
  switch($0.a8) {
863
- case 0: return {h: 0 /* {TcDone:1} */, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3}, a2: Data_ReviewScore_n__3348_1049_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $c6.a2, $0.a7, $0.a8)}};
867
+ case 0: return {h: 0 /* {TcDone:1} */, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3}, a2: Data_ReviewScore_n__3350_1049_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $c6.a2, $0.a7, $0.a8)}};
864
868
  case 1: return {h: 1 /* {TcContinue1:1} */, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5.a2, a6: $c6.a2, a7: $0.a7, a8: $0.a8};
865
869
  }
866
870
  }
867
- case undefined: /* just */ return {h: 0 /* {TcDone:1} */, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: Data_ReviewScore_n__3375_1201_calc($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a1.a1, $0.a5.a1.a3, $0.a5.a1.a2, $c2, $0.a5.a2, $0.a8, $0.a7, $0.a6, $0.a5.a1.a3, $c6.a1.a1.a3)}, a2: Data_ReviewScore_n__3348_1049_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $c6.a2, $0.a7, $0.a8)}};
871
+ case undefined: /* just */ return {h: 0 /* {TcDone:1} */, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: Data_ReviewScore_n__3377_1201_calc($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a1.a1, $0.a5.a1.a3, $0.a5.a1.a2, $c2, $0.a5.a2, $0.a8, $0.a7, $0.a6, $0.a5.a1.a3, $c6.a1.a1.a3)}, a2: Data_ReviewScore_n__3350_1049_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $c6.a2, $0.a7, $0.a8)}};
868
872
  }
869
873
  }
870
874
  }
871
875
  }
872
876
  default: {
873
877
  const $115 = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3};
874
- const $119 = Data_List_DeleteBy_deleteByx27($11c => $11d => Prelude_Basics_on($120 => $121 => $0.a1.a1.a1($120)($121), csegen_723(), $11c, $11d), $115, $0.a6);
878
+ const $119 = Data_List_DeleteBy_deleteByx27($11c => $11d => Prelude_Basics_on($120 => $121 => $0.a1.a1.a1($120)($121), csegen_729(), $11c, $11d), $115, $0.a6);
875
879
  switch($119.a1.h) {
876
880
  case 0: /* nothing */ {
877
881
  switch($0.a8) {
878
- case 0: return {h: 0 /* {TcDone:1} */, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3}, a2: Data_ReviewScore_n__3348_1049_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $119.a2, $0.a7, $0.a8)}};
882
+ case 0: return {h: 0 /* {TcDone:1} */, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3}, a2: Data_ReviewScore_n__3350_1049_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $119.a2, $0.a7, $0.a8)}};
879
883
  case 1: return {h: 1 /* {TcContinue1:1} */, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5.a2, a6: $119.a2, a7: $0.a7, a8: $0.a8};
880
884
  }
881
885
  }
882
- case undefined: /* just */ return {h: 0 /* {TcDone:1} */, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: Data_ReviewScore_n__3375_1201_calc($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a1.a1, $0.a5.a1.a3, $0.a5.a1.a2, $115, $0.a5.a2, $0.a8, $0.a7, $0.a6, $0.a5.a1.a3, $119.a1.a1.a3)}, a2: Data_ReviewScore_n__3348_1049_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $119.a2, $0.a7, $0.a8)}};
886
+ case undefined: /* just */ return {h: 0 /* {TcDone:1} */, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: Data_ReviewScore_n__3377_1201_calc($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a1.a1, $0.a5.a1.a3, $0.a5.a1.a2, $115, $0.a5.a2, $0.a8, $0.a7, $0.a6, $0.a5.a1.a3, $119.a1.a1.a3)}, a2: Data_ReviewScore_n__3350_1049_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $119.a2, $0.a7, $0.a8)}};
883
887
  }
884
888
  }
885
889
  }
@@ -887,8 +891,8 @@ function x24tcOpt_1($0) {
887
891
  }
888
892
  }
889
893
 
890
- /* Data.ReviewScore.3348:1049:zipReviews */
891
- function Data_ReviewScore_n__3348_1049_zipReviews($0, $1, $2, $3, $4, $5, $6, $7) {
894
+ /* Data.ReviewScore.3350:1049:zipReviews */
895
+ function Data_ReviewScore_n__3350_1049_zipReviews($0, $1, $2, $3, $4, $5, $6, $7) {
892
896
  return __tailRec(x24tcOpt_1, {h: 1 /* {TcContinue1:1} */, a1: $0, a2: $1, a3: $2, a4: $3, a5: $4, a6: $5, a7: $6, a8: $7});
893
897
  }
894
898
 
@@ -910,8 +914,8 @@ function x24tcOpt_2($0) {
910
914
  }
911
915
  }
912
916
 
913
- /* Data.List.7261:6697:splitRec */
914
- function Data_List_n__7261_6697_splitRec($0, $1, $2, $3, $4) {
917
+ /* Data.List.7716:6697:splitRec */
918
+ function Data_List_n__7716_6697_splitRec($0, $1, $2, $3, $4) {
915
919
  return __tailRec(x24tcOpt_2, {h: 1 /* {TcContinue2:1} */, a1: $0, a2: $1, a3: $2, a4: $3, a5: $4});
916
920
  }
917
921
 
@@ -928,15 +932,15 @@ function x24tcOpt_3($0) {
928
932
  }
929
933
  }
930
934
 
931
- /* Prelude.Show.3219:12504:show' */
932
- function Prelude_Show_n__3219_12504_showx27($0, $1, $2, $3) {
935
+ /* Prelude.Show.3219:12510:show' */
936
+ function Prelude_Show_n__3219_12510_showx27($0, $1, $2, $3) {
933
937
  return __tailRec(x24tcOpt_3, {h: 1 /* {TcContinue3:1} */, a1: $0, a2: $1, a3: $2, a4: $3});
934
938
  }
935
939
 
936
940
  /* {$tcOpt:4} */
937
941
  function x24tcOpt_4($0) {
938
942
  switch($0.h) {
939
- case 1: /* {TcContinue4:1} */ return {h: 2 /* {TcContinue4:2} */, a1: $0.a1, a2: $0.a2(), a3: $0.a6, a4: {a1: {a1: $0.a3.a2, a2: {a1: Graph_n__5457_1929_graphable($0.a1, $0.a5), a2: Data_List1_forget($0.a8)}}}};
943
+ case 1: /* {TcContinue4:1} */ return {h: 2 /* {TcContinue4:2} */, a1: $0.a1, a2: $0.a2(), a3: $0.a6, a4: {a1: {a1: $0.a3.a2, a2: {a1: Graph_n__5908_1929_graphable($0.a1, $0.a5), a2: Data_List1_forget($0.a8)}}}};
940
944
  case 2: /* {TcContinue4:2} */ {
941
945
  switch($0.a2.h) {
942
946
  case 0: /* nothing */ {
@@ -955,7 +959,7 @@ function x24tcOpt_4($0) {
955
959
  case undefined: /* cons */ return {h: 0 /* {TcDone:4} */, a1: Data_List1_forget($0.a4.a1.a2)};
956
960
  default: {
957
961
  switch($0.a4.h) {
958
- case 0: /* nothing */ return {h: 2 /* {TcContinue4:2} */, a1: $0.a1, a2: $0.a2.a1(), a3: $0.a3.a2, a4: {a1: {a1: $0.a3.a1.a1.a2, a2: {a1: Graph_n__5457_1929_graphable($0.a1, $0.a3.a1), a2: {h: 0}}}}};
962
+ case 0: /* nothing */ return {h: 2 /* {TcContinue4:2} */, a1: $0.a1, a2: $0.a2.a1(), a3: $0.a3.a2, a4: {a1: {a1: $0.a3.a1.a1.a2, a2: {a1: Graph_n__5908_1929_graphable($0.a1, $0.a3.a1), a2: {h: 0}}}}};
959
963
  case undefined: /* just */ {
960
964
  const $33 = {a1: $0.a3.a1.a1, a2: $0.a3.a1.a2};
961
965
  switch(((Data_Date_nextMonth($0.a4.a1.a1.a2)===$0.a3.a1.a1.a2.a2)?1:0)) {
@@ -969,7 +973,7 @@ function x24tcOpt_4($0) {
969
973
  }
970
974
  default: {
971
975
  switch($0.a4.h) {
972
- case 0: /* nothing */ return {h: 2 /* {TcContinue4:2} */, a1: $0.a1, a2: $0.a2.a1(), a3: $0.a3.a2, a4: {a1: {a1: $0.a3.a1.a1.a2, a2: {a1: Graph_n__5457_1929_graphable($0.a1, $0.a3.a1), a2: {h: 0}}}}};
976
+ case 0: /* nothing */ return {h: 2 /* {TcContinue4:2} */, a1: $0.a1, a2: $0.a2.a1(), a3: $0.a3.a2, a4: {a1: {a1: $0.a3.a1.a1.a2, a2: {a1: Graph_n__5908_1929_graphable($0.a1, $0.a3.a1), a2: {h: 0}}}}};
973
977
  case undefined: /* just */ {
974
978
  const $61 = {a1: $0.a3.a1.a1, a2: $0.a3.a1.a2};
975
979
  switch(((Data_Date_nextMonth($0.a4.a1.a1.a2)===$0.a3.a1.a1.a2.a2)?1:0)) {
@@ -983,7 +987,7 @@ function x24tcOpt_4($0) {
983
987
  }
984
988
  default: {
985
989
  switch($0.a4.h) {
986
- case 0: /* nothing */ return {h: 2 /* {TcContinue4:2} */, a1: $0.a1, a2: $0.a2.a1(), a3: $0.a3.a2, a4: {a1: {a1: $0.a3.a1.a1.a2, a2: {a1: Graph_n__5457_1929_graphable($0.a1, $0.a3.a1), a2: {h: 0}}}}};
990
+ case 0: /* nothing */ return {h: 2 /* {TcContinue4:2} */, a1: $0.a1, a2: $0.a2.a1(), a3: $0.a3.a2, a4: {a1: {a1: $0.a3.a1.a1.a2, a2: {a1: Graph_n__5908_1929_graphable($0.a1, $0.a3.a1), a2: {h: 0}}}}};
987
991
  case undefined: /* just */ {
988
992
  const $8f = {a1: $0.a3.a1.a1, a2: $0.a3.a1.a2};
989
993
  switch(((Data_Date_nextMonth($0.a4.a1.a1.a2)===$0.a3.a1.a1.a2.a2)?1:0)) {
@@ -1007,7 +1011,7 @@ function x24tcOpt_4($0) {
1007
1011
  case undefined: /* cons */ return {h: 0 /* {TcDone:4} */, a1: Data_List1_forget($0.a4.a1.a2)};
1008
1012
  default: {
1009
1013
  switch($0.a4.h) {
1010
- case 0: /* nothing */ return {h: 2 /* {TcContinue4:2} */, a1: $0.a1, a2: $0.a2.a1(), a3: $0.a3.a2, a4: {a1: {a1: $0.a3.a1.a1.a2, a2: {a1: Graph_n__5457_1929_graphable($0.a1, $0.a3.a1), a2: {h: 0}}}}};
1014
+ case 0: /* nothing */ return {h: 2 /* {TcContinue4:2} */, a1: $0.a1, a2: $0.a2.a1(), a3: $0.a3.a2, a4: {a1: {a1: $0.a3.a1.a1.a2, a2: {a1: Graph_n__5908_1929_graphable($0.a1, $0.a3.a1), a2: {h: 0}}}}};
1011
1015
  case undefined: /* just */ {
1012
1016
  const $c4 = {a1: $0.a3.a1.a1, a2: $0.a3.a1.a2};
1013
1017
  switch(((Data_Date_nextMonth($0.a4.a1.a1.a2)===$0.a3.a1.a1.a2.a2)?1:0)) {
@@ -1021,7 +1025,7 @@ function x24tcOpt_4($0) {
1021
1025
  }
1022
1026
  default: {
1023
1027
  switch($0.a4.h) {
1024
- case 0: /* nothing */ return {h: 2 /* {TcContinue4:2} */, a1: $0.a1, a2: $0.a2.a1(), a3: $0.a3.a2, a4: {a1: {a1: $0.a3.a1.a1.a2, a2: {a1: Graph_n__5457_1929_graphable($0.a1, $0.a3.a1), a2: {h: 0}}}}};
1028
+ case 0: /* nothing */ return {h: 2 /* {TcContinue4:2} */, a1: $0.a1, a2: $0.a2.a1(), a3: $0.a3.a2, a4: {a1: {a1: $0.a3.a1.a1.a2, a2: {a1: Graph_n__5908_1929_graphable($0.a1, $0.a3.a1), a2: {h: 0}}}}};
1025
1029
  case undefined: /* just */ {
1026
1030
  const $f2 = {a1: $0.a3.a1.a1, a2: $0.a3.a1.a2};
1027
1031
  switch(((Data_Date_nextMonth($0.a4.a1.a1.a2)===$0.a3.a1.a1.a2.a2)?1:0)) {
@@ -1035,7 +1039,7 @@ function x24tcOpt_4($0) {
1035
1039
  }
1036
1040
  default: {
1037
1041
  switch($0.a4.h) {
1038
- case 0: /* nothing */ return {h: 2 /* {TcContinue4:2} */, a1: $0.a1, a2: $0.a2.a1(), a3: $0.a3.a2, a4: {a1: {a1: $0.a3.a1.a1.a2, a2: {a1: Graph_n__5457_1929_graphable($0.a1, $0.a3.a1), a2: {h: 0}}}}};
1042
+ case 0: /* nothing */ return {h: 2 /* {TcContinue4:2} */, a1: $0.a1, a2: $0.a2.a1(), a3: $0.a3.a2, a4: {a1: {a1: $0.a3.a1.a1.a2, a2: {a1: Graph_n__5908_1929_graphable($0.a1, $0.a3.a1), a2: {h: 0}}}}};
1039
1043
  case undefined: /* just */ {
1040
1044
  const $120 = {a1: $0.a3.a1.a1, a2: $0.a3.a1.a2};
1041
1045
  switch(((Data_Date_nextMonth($0.a4.a1.a1.a2)===$0.a3.a1.a1.a2.a2)?1:0)) {
@@ -1059,7 +1063,7 @@ function x24tcOpt_4($0) {
1059
1063
  case undefined: /* cons */ return {h: 0 /* {TcDone:4} */, a1: Data_List1_forget($0.a4.a1.a2)};
1060
1064
  default: {
1061
1065
  switch($0.a4.h) {
1062
- case 0: /* nothing */ return {h: 2 /* {TcContinue4:2} */, a1: $0.a1, a2: $0.a2.a1(), a3: $0.a3.a2, a4: {a1: {a1: $0.a3.a1.a1.a2, a2: {a1: Graph_n__5457_1929_graphable($0.a1, $0.a3.a1), a2: {h: 0}}}}};
1066
+ case 0: /* nothing */ return {h: 2 /* {TcContinue4:2} */, a1: $0.a1, a2: $0.a2.a1(), a3: $0.a3.a2, a4: {a1: {a1: $0.a3.a1.a1.a2, a2: {a1: Graph_n__5908_1929_graphable($0.a1, $0.a3.a1), a2: {h: 0}}}}};
1063
1067
  case undefined: /* just */ {
1064
1068
  const $155 = {a1: $0.a3.a1.a1, a2: $0.a3.a1.a2};
1065
1069
  switch(((Data_Date_nextMonth($0.a4.a1.a1.a2)===$0.a3.a1.a1.a2.a2)?1:0)) {
@@ -1073,7 +1077,7 @@ function x24tcOpt_4($0) {
1073
1077
  }
1074
1078
  default: {
1075
1079
  switch($0.a4.h) {
1076
- case 0: /* nothing */ return {h: 2 /* {TcContinue4:2} */, a1: $0.a1, a2: $0.a2.a1(), a3: $0.a3.a2, a4: {a1: {a1: $0.a3.a1.a1.a2, a2: {a1: Graph_n__5457_1929_graphable($0.a1, $0.a3.a1), a2: {h: 0}}}}};
1080
+ case 0: /* nothing */ return {h: 2 /* {TcContinue4:2} */, a1: $0.a1, a2: $0.a2.a1(), a3: $0.a3.a2, a4: {a1: {a1: $0.a3.a1.a1.a2, a2: {a1: Graph_n__5908_1929_graphable($0.a1, $0.a3.a1), a2: {h: 0}}}}};
1077
1081
  case undefined: /* just */ {
1078
1082
  const $183 = {a1: $0.a3.a1.a1, a2: $0.a3.a1.a2};
1079
1083
  switch(((Data_Date_nextMonth($0.a4.a1.a1.a2)===$0.a3.a1.a1.a2.a2)?1:0)) {
@@ -1087,7 +1091,7 @@ function x24tcOpt_4($0) {
1087
1091
  }
1088
1092
  default: {
1089
1093
  switch($0.a4.h) {
1090
- case 0: /* nothing */ return {h: 2 /* {TcContinue4:2} */, a1: $0.a1, a2: $0.a2.a1(), a3: $0.a3.a2, a4: {a1: {a1: $0.a3.a1.a1.a2, a2: {a1: Graph_n__5457_1929_graphable($0.a1, $0.a3.a1), a2: {h: 0}}}}};
1094
+ case 0: /* nothing */ return {h: 2 /* {TcContinue4:2} */, a1: $0.a1, a2: $0.a2.a1(), a3: $0.a3.a2, a4: {a1: {a1: $0.a3.a1.a1.a2, a2: {a1: Graph_n__5908_1929_graphable($0.a1, $0.a3.a1), a2: {h: 0}}}}};
1091
1095
  case undefined: /* just */ {
1092
1096
  const $1b1 = {a1: $0.a3.a1.a1, a2: $0.a3.a1.a2};
1093
1097
  switch(((Data_Date_nextMonth($0.a4.a1.a1.a2)===$0.a3.a1.a1.a2.a2)?1:0)) {
@@ -1109,18 +1113,18 @@ function x24tcOpt_4($0) {
1109
1113
  }
1110
1114
  }
1111
1115
 
1112
- /* Graph.5464:2026:insertNext */
1113
- function Graph_n__5464_2026_insertNext($0, $1, $2, $3, $4, $5, $6, $7) {
1116
+ /* Graph.5915:2026:insertNext */
1117
+ function Graph_n__5915_2026_insertNext($0, $1, $2, $3, $4, $5, $6, $7) {
1114
1118
  return __tailRec(x24tcOpt_4, {h: 1 /* {TcContinue4:1} */, a1: $0, a2: $1, a3: $2, a4: $3, a5: $4, a6: $5, a7: $6, a8: $7});
1115
1119
  }
1116
1120
 
1117
- /* Graph.5457:1930:unfoldGraph */
1118
- function Graph_n__5457_1930_unfoldGraph($0, $1, $2, $3) {
1121
+ /* Graph.5908:1930:unfoldGraph */
1122
+ function Graph_n__5908_1930_unfoldGraph($0, $1, $2, $3) {
1119
1123
  return __tailRec(x24tcOpt_4, {h: 2 /* {TcContinue4:2} */, a1: $0, a2: $1, a3: $2, a4: $3});
1120
1124
  }
1121
1125
 
1122
- /* Graph.5464:2027:insertPlaceholder */
1123
- function Graph_n__5464_2027_insertPlaceholder($0, $1, $2, $3, $4, $5, $6, $7) {
1126
+ /* Graph.5915:2027:insertPlaceholder */
1127
+ function Graph_n__5915_2027_insertPlaceholder($0, $1, $2, $3, $4, $5, $6, $7) {
1124
1128
  return __tailRec(x24tcOpt_4, {h: 3 /* {TcContinue4:3} */, a1: $0, a2: $1, a3: $2, a4: $3, a5: $4, a6: $5, a7: $6, a8: $7});
1125
1129
  }
1126
1130
 
@@ -1134,8 +1138,8 @@ function x24tcOpt_5($0) {
1134
1138
  }
1135
1139
  }
1136
1140
 
1137
- /* Text.PrettyPrint.Prettyprinter.Doc.8889:6790:initialIndentation */
1138
- function Text_PrettyPrint_Prettyprinter_Doc_n__8889_6790_initialIndentation($0, $1, $2, $3) {
1141
+ /* Text.PrettyPrint.Prettyprinter.Doc.8891:6790:initialIndentation */
1142
+ function Text_PrettyPrint_Prettyprinter_Doc_n__8891_6790_initialIndentation($0, $1, $2, $3) {
1139
1143
  return __tailRec(x24tcOpt_5, {h: 1 /* {TcContinue5:1} */, a1: $0, a2: $1, a3: $2, a4: $3});
1140
1144
  }
1141
1145
 
@@ -1151,8 +1155,8 @@ function x24tcOpt_6($0) {
1151
1155
  case 2: /* {TcContinue6:2} */ {
1152
1156
  switch($0.a11.h) {
1153
1157
  case undefined: /* just */ {
1154
- const $16 = _add32s($0.a5, Number(_truncBigInt32(Text_Lexer_Core_n__3740_2499_countNLs($0.a1, $0.a2, $0.a3, $0.a4, $0.a5, $0.a6, $0.a11.a1.a1))));
1155
- const $22 = Text_Lexer_Core_n__3740_2500_getCols($0.a1, $0.a2, $0.a3, $0.a4, $0.a5, $0.a6, $0.a11.a1.a1, $0.a4);
1158
+ const $16 = _add32s($0.a5, Number(_truncBigInt32(Text_Lexer_Core_n__3742_2499_countNLs($0.a1, $0.a2, $0.a3, $0.a4, $0.a5, $0.a6, $0.a11.a1.a1))));
1159
+ const $22 = Text_Lexer_Core_n__3742_2500_getCols($0.a1, $0.a2, $0.a3, $0.a4, $0.a5, $0.a6, $0.a11.a1.a1, $0.a4);
1156
1160
  return {h: 0 /* {TcDone:6} */, a1: {a1: {a1: {a1: $0.a8(Prelude_Types_fastPack(Prelude_Types_List_reverse($0.a11.a1.a1))), a2: 0, a3: {a1: $0.a5, a2: $0.a4, a3: $16, a4: $22}}, a2: {a1: $16, a2: {a1: $22, a2: $0.a11.a1.a2}}}}};
1157
1161
  }
1158
1162
  case 0: /* nothing */ return {h: 1 /* {TcContinue6:1} */, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5, a6: $0.a6, a7: $0.a9, a8: $0.a10};
@@ -1161,8 +1165,8 @@ function x24tcOpt_6($0) {
1161
1165
  }
1162
1166
  }
1163
1167
 
1164
- /* Text.Lexer.Core.3740:2501:getFirstToken */
1165
- function Text_Lexer_Core_n__3740_2501_getFirstToken($0, $1, $2, $3, $4, $5, $6, $7) {
1168
+ /* Text.Lexer.Core.3742:2501:getFirstToken */
1169
+ function Text_Lexer_Core_n__3742_2501_getFirstToken($0, $1, $2, $3, $4, $5, $6, $7) {
1166
1170
  return __tailRec(x24tcOpt_6, {h: 1 /* {TcContinue6:1} */, a1: $0, a2: $1, a3: $2, a4: $3, a5: $4, a6: $5, a7: $6, a8: $7});
1167
1171
  }
1168
1172
 
@@ -1205,7 +1209,7 @@ function Prelude_Types_compare_Ord_x28Listx20x24ax29($0, $1, $2) {
1205
1209
  }
1206
1210
 
1207
1211
  /* Prelude.Types.case block in compare */
1208
- function Prelude_Types_case__compare_6659($0, $1, $2, $3, $4, $5) {
1212
+ function Prelude_Types_case__compare_6665($0, $1, $2, $3, $4, $5) {
1209
1213
  return __tailRec(x24tcOpt_7, {h: 2 /* {TcContinue7:2} */, a1: $0, a2: $1, a3: $2, a4: $3, a5: $4, a6: $5});
1210
1214
  }
1211
1215
 
@@ -1242,19 +1246,19 @@ function Prelude_Types_x3dx3d_Eq_x28Listx20x24ax29($0, $1, $2) {
1242
1246
  function x24tcOpt_9($0) {
1243
1247
  switch($0.a2.h) {
1244
1248
  case 0: /* nil */ return {h: 0 /* {TcDone:9} */, a1: _truncToChar($0.a3)};
1245
- case undefined: /* cons */ return {h: 1 /* {TcContinue9:1} */, a1: $0.a1, a2: $0.a2.a2, a3: _add32s(Language_JSON_String_Tokens_n__3288_1166_hexVal($0.a1, $0.a2.a1), _mul32s(Number(_truncBigInt32(16n)), $0.a3))};
1249
+ case undefined: /* cons */ return {h: 1 /* {TcContinue9:1} */, a1: $0.a1, a2: $0.a2.a2, a3: _add32s(Language_JSON_String_Tokens_n__3290_1166_hexVal($0.a1, $0.a2.a1), _mul32s(Number(_truncBigInt32(16n)), $0.a3))};
1246
1250
  }
1247
1251
  }
1248
1252
 
1249
- /* Language.JSON.String.Tokens.3288:1167:fromHex */
1250
- function Language_JSON_String_Tokens_n__3288_1167_fromHex($0, $1, $2) {
1253
+ /* Language.JSON.String.Tokens.3290:1167:fromHex */
1254
+ function Language_JSON_String_Tokens_n__3290_1167_fromHex($0, $1, $2) {
1251
1255
  return __tailRec(x24tcOpt_9, {h: 1 /* {TcContinue9:1} */, a1: $0, a2: $1, a3: $2});
1252
1256
  }
1253
1257
 
1254
1258
  /* {$tcOpt:10} */
1255
1259
  function x24tcOpt_10($0) {
1256
1260
  switch($0.h) {
1257
- case 1: /* {TcContinue10:1} */ return {h: 2 /* {TcContinue10:2} */, a1: $0.a6, a2: $0.a5, a3: $0.a4, a4: $0.a3, a5: $0.a2, a6: $0.a1, a7: Text_Lexer_Core_n__3740_2501_getFirstToken($0.a6, $0.a5, $0.a4, $0.a3, $0.a2, $0.a1, $0.a5, $0.a6)};
1261
+ case 1: /* {TcContinue10:1} */ return {h: 2 /* {TcContinue10:2} */, a1: $0.a6, a2: $0.a5, a3: $0.a4, a4: $0.a3, a5: $0.a2, a6: $0.a1, a7: Text_Lexer_Core_n__3742_2501_getFirstToken($0.a6, $0.a5, $0.a4, $0.a3, $0.a2, $0.a1, $0.a5, $0.a6)};
1258
1262
  case 2: /* {TcContinue10:2} */ {
1259
1263
  switch($0.a7.h) {
1260
1264
  case undefined: /* just */ {
@@ -1284,13 +1288,13 @@ function Text_Lexer_Core_case__tokenise_2724($0, $1, $2, $3, $4, $5, $6) {
1284
1288
  function x24tcOpt_11($0) {
1285
1289
  switch($0.a2.h) {
1286
1290
  case 0: /* Leaf */ return {h: 0 /* {TcDone:11} */, a1: $0.a1({a1: $0.a2.a1, a2: $0.a2.a2})};
1287
- case 1: /* Branch2 */ return {h: 1 /* {TcContinue11:1} */, a1: $9 => ({a1: $9, a2: Data_SortedMap_Dependent_n__6748_6807_treeToListx27($0.a1, $0.a2.a3)}), a2: $0.a2.a1};
1288
- case 2: /* Branch3 */ return {h: 1 /* {TcContinue11:1} */, a1: $11 => ({a1: $11, a2: Data_SortedMap_Dependent_n__6748_6807_treeToListx27($16 => ({a1: $16, a2: Data_SortedMap_Dependent_n__6748_6807_treeToListx27($0.a1, $0.a2.a5)}), $0.a2.a3)}), a2: $0.a2.a1};
1291
+ case 1: /* Branch2 */ return {h: 1 /* {TcContinue11:1} */, a1: $9 => ({a1: $9, a2: Data_SortedMap_Dependent_n__6750_6807_treeToListx27($0.a1, $0.a2.a3)}), a2: $0.a2.a1};
1292
+ case 2: /* Branch3 */ return {h: 1 /* {TcContinue11:1} */, a1: $11 => ({a1: $11, a2: Data_SortedMap_Dependent_n__6750_6807_treeToListx27($16 => ({a1: $16, a2: Data_SortedMap_Dependent_n__6750_6807_treeToListx27($0.a1, $0.a2.a5)}), $0.a2.a3)}), a2: $0.a2.a1};
1289
1293
  }
1290
1294
  }
1291
1295
 
1292
- /* Data.SortedMap.Dependent.6748:6807:treeToList' */
1293
- function Data_SortedMap_Dependent_n__6748_6807_treeToListx27($0, $1) {
1296
+ /* Data.SortedMap.Dependent.6750:6807:treeToList' */
1297
+ function Data_SortedMap_Dependent_n__6750_6807_treeToListx27($0, $1) {
1294
1298
  return __tailRec(x24tcOpt_11, {h: 1 /* {TcContinue11:1} */, a1: $0, a2: $1});
1295
1299
  }
1296
1300
 
@@ -1344,16 +1348,16 @@ function x24tcOpt_14($0) {
1344
1348
  switch($0.a3.h) {
1345
1349
  case 0: /* nil */ return {h: 0 /* {TcDone:14} */, a1: {h: 0}};
1346
1350
  case undefined: /* cons */ {
1347
- switch(Prelude_Types_elemBy(csegen_189(), $0.a2, $0.a3.a1, $0.a1)) {
1351
+ switch(Prelude_Types_elemBy(csegen_193(), $0.a2, $0.a3.a1, $0.a1)) {
1348
1352
  case 1: return {h: 1 /* {TcContinue14:1} */, a1: $0.a1, a2: $0.a2, a3: $0.a3.a2};
1349
- case 0: return {h: 0 /* {TcDone:14} */, a1: {a1: $0.a3.a1, a2: Data_List_n__4413_3930_nubByx27({a1: $0.a3.a1, a2: $0.a1}, $0.a2, $0.a3.a2)}};
1353
+ case 0: return {h: 0 /* {TcDone:14} */, a1: {a1: $0.a3.a1, a2: Data_List_n__4868_3930_nubByx27({a1: $0.a3.a1, a2: $0.a1}, $0.a2, $0.a3.a2)}};
1350
1354
  }
1351
1355
  }
1352
1356
  }
1353
1357
  }
1354
1358
 
1355
- /* Data.List.4413:3930:nubBy' */
1356
- function Data_List_n__4413_3930_nubByx27($0, $1, $2) {
1359
+ /* Data.List.4868:3930:nubBy' */
1360
+ function Data_List_n__4868_3930_nubByx27($0, $1, $2) {
1357
1361
  return __tailRec(x24tcOpt_14, {h: 1 /* {TcContinue14:1} */, a1: $0, a2: $1, a3: $2});
1358
1362
  }
1359
1363
 
@@ -1508,16 +1512,16 @@ function x24tcOpt_21($0) {
1508
1512
  case 0: /* nil */ return {h: 0 /* {TcDone:21} */, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: {h: 0}}};
1509
1513
  case undefined: /* cons */ {
1510
1514
  switch($0.a3.a1) {
1511
- case '\n': return {h: 0 /* {TcDone:21} */, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: Data_String_n__3921_7830_linesHelp($0.a1, {h: 0}, $0.a3.a2)}};
1515
+ case '\n': return {h: 0 /* {TcDone:21} */, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: Data_String_n__3923_7830_linesHelp($0.a1, {h: 0}, $0.a3.a2)}};
1512
1516
  case '\r': {
1513
1517
  switch($0.a3.a2.h) {
1514
1518
  case undefined: /* cons */ {
1515
1519
  switch($0.a3.a2.a1) {
1516
- case '\n': return {h: 0 /* {TcDone:21} */, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: Data_String_n__3921_7830_linesHelp($0.a1, {h: 0}, $0.a3.a2.a2)}};
1517
- default: return {h: 0 /* {TcDone:21} */, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: Data_String_n__3921_7830_linesHelp($0.a1, {h: 0}, $0.a3.a2)}};
1520
+ case '\n': return {h: 0 /* {TcDone:21} */, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: Data_String_n__3923_7830_linesHelp($0.a1, {h: 0}, $0.a3.a2.a2)}};
1521
+ default: return {h: 0 /* {TcDone:21} */, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: Data_String_n__3923_7830_linesHelp($0.a1, {h: 0}, $0.a3.a2)}};
1518
1522
  }
1519
1523
  }
1520
- default: return {h: 0 /* {TcDone:21} */, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: Data_String_n__3921_7830_linesHelp($0.a1, {h: 0}, $0.a3.a2)}};
1524
+ default: return {h: 0 /* {TcDone:21} */, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: Data_String_n__3923_7830_linesHelp($0.a1, {h: 0}, $0.a3.a2)}};
1521
1525
  }
1522
1526
  }
1523
1527
  default: return {h: 1 /* {TcContinue21:1} */, a1: $0.a1, a2: {a1: $0.a3.a1, a2: $0.a2}, a3: $0.a3.a2};
@@ -1532,16 +1536,16 @@ function x24tcOpt_21($0) {
1532
1536
  case 0: /* nil */ return {h: 0 /* {TcDone:21} */, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: {h: 0}}};
1533
1537
  case undefined: /* cons */ {
1534
1538
  switch($0.a3.a1) {
1535
- case '\n': return {h: 0 /* {TcDone:21} */, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: Data_String_n__3921_7830_linesHelp($0.a1, {h: 0}, $0.a3.a2)}};
1539
+ case '\n': return {h: 0 /* {TcDone:21} */, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: Data_String_n__3923_7830_linesHelp($0.a1, {h: 0}, $0.a3.a2)}};
1536
1540
  case '\r': {
1537
1541
  switch($0.a3.a2.h) {
1538
1542
  case undefined: /* cons */ {
1539
1543
  switch($0.a3.a2.a1) {
1540
- case '\n': return {h: 0 /* {TcDone:21} */, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: Data_String_n__3921_7830_linesHelp($0.a1, {h: 0}, $0.a3.a2.a2)}};
1541
- default: return {h: 0 /* {TcDone:21} */, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: Data_String_n__3921_7830_linesHelp($0.a1, {h: 0}, $0.a3.a2)}};
1544
+ case '\n': return {h: 0 /* {TcDone:21} */, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: Data_String_n__3923_7830_linesHelp($0.a1, {h: 0}, $0.a3.a2.a2)}};
1545
+ default: return {h: 0 /* {TcDone:21} */, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: Data_String_n__3923_7830_linesHelp($0.a1, {h: 0}, $0.a3.a2)}};
1542
1546
  }
1543
1547
  }
1544
- default: return {h: 0 /* {TcDone:21} */, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: Data_String_n__3921_7830_linesHelp($0.a1, {h: 0}, $0.a3.a2)}};
1548
+ default: return {h: 0 /* {TcDone:21} */, a1: {a1: Prelude_Types_List_reverse($0.a2), a2: Data_String_n__3923_7830_linesHelp($0.a1, {h: 0}, $0.a3.a2)}};
1545
1549
  }
1546
1550
  }
1547
1551
  default: return {h: 1 /* {TcContinue21:1} */, a1: $0.a1, a2: {a1: $0.a3.a1, a2: $0.a2}, a3: $0.a3.a2};
@@ -1552,8 +1556,8 @@ function x24tcOpt_21($0) {
1552
1556
  }
1553
1557
  }
1554
1558
 
1555
- /* Data.String.3921:7830:linesHelp */
1556
- function Data_String_n__3921_7830_linesHelp($0, $1, $2) {
1559
+ /* Data.String.3923:7830:linesHelp */
1560
+ function Data_String_n__3923_7830_linesHelp($0, $1, $2) {
1557
1561
  return __tailRec(x24tcOpt_21, {h: 1 /* {TcContinue21:1} */, a1: $0, a2: $1, a3: $2});
1558
1562
  }
1559
1563
 
@@ -1574,14 +1578,14 @@ function Prelude_Types_List_lengthPlus($0, $1) {
1574
1578
  function x24tcOpt_23($0) {
1575
1579
  switch($0.a6.h) {
1576
1580
  case 0: /* Nil */ return {h: 0 /* {TcDone:23} */, a1: {h: 0 /* SEmpty */}};
1577
- case 2: /* UndoAnn */ return {h: 0 /* {TcDone:23} */, a1: {h: 5 /* SAnnPop */, a1: Text_PrettyPrint_Prettyprinter_Doc_n__8889_6792_best($0.a1, $0.a2, $0.a3, $0.a4, $0.a5, $0.a6.a1)}};
1581
+ case 2: /* UndoAnn */ return {h: 0 /* {TcDone:23} */, a1: {h: 5 /* SAnnPop */, a1: Text_PrettyPrint_Prettyprinter_Doc_n__8891_6792_best($0.a1, $0.a2, $0.a3, $0.a4, $0.a5, $0.a6.a1)}};
1578
1582
  case 1: /* Cons */ {
1579
1583
  switch($0.a6.a2.h) {
1580
1584
  case 0: /* Empty */ return {h: 1 /* {TcContinue23:1} */, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5, a6: $0.a6.a3};
1581
- case 1: /* Chara */ return {h: 0 /* {TcDone:23} */, a1: {h: 1 /* SChar */, a1: $0.a6.a2.a1, a2: () => Text_PrettyPrint_Prettyprinter_Doc_n__8889_6792_best($0.a1, $0.a2, $0.a3, $0.a4, _add32s($0.a5, 1), $0.a6.a3)}};
1582
- case 2: /* Text */ return {h: 0 /* {TcDone:23} */, a1: {h: 2 /* SText */, a1: $0.a6.a2.a1, a2: $0.a6.a2.a2, a3: () => Text_PrettyPrint_Prettyprinter_Doc_n__8889_6792_best($0.a1, $0.a2, $0.a3, $0.a4, _add32s($0.a5, $0.a6.a2.a1), $0.a6.a3)}};
1585
+ case 1: /* Chara */ return {h: 0 /* {TcDone:23} */, a1: {h: 1 /* SChar */, a1: $0.a6.a2.a1, a2: () => Text_PrettyPrint_Prettyprinter_Doc_n__8891_6792_best($0.a1, $0.a2, $0.a3, $0.a4, _add32s($0.a5, 1), $0.a6.a3)}};
1586
+ case 2: /* Text */ return {h: 0 /* {TcDone:23} */, a1: {h: 2 /* SText */, a1: $0.a6.a2.a1, a2: $0.a6.a2.a2, a3: () => Text_PrettyPrint_Prettyprinter_Doc_n__8891_6792_best($0.a1, $0.a2, $0.a3, $0.a4, _add32s($0.a5, $0.a6.a2.a1), $0.a6.a3)}};
1583
1587
  case 3: /* Line */ {
1584
- const $2d = Text_PrettyPrint_Prettyprinter_Doc_n__8889_6792_best($0.a1, $0.a2, $0.a3, $0.a6.a1, $0.a6.a1, $0.a6.a3);
1588
+ const $2d = Text_PrettyPrint_Prettyprinter_Doc_n__8891_6792_best($0.a1, $0.a2, $0.a3, $0.a6.a1, $0.a6.a1, $0.a6.a3);
1585
1589
  let $35;
1586
1590
  switch($2d.h) {
1587
1591
  case 0: /* SEmpty */ {
@@ -1600,21 +1604,21 @@ function x24tcOpt_23($0) {
1600
1604
  case 5: /* Cat */ return {h: 1 /* {TcContinue23:1} */, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5, a6: {h: 1 /* Cons */, a1: $0.a6.a1, a2: $0.a6.a2.a1, a3: {h: 1 /* Cons */, a1: $0.a6.a1, a2: $0.a6.a2.a2, a3: $0.a6.a3}}};
1601
1605
  case 6: /* Nest */ return {h: 1 /* {TcContinue23:1} */, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5, a6: {h: 1 /* Cons */, a1: _add32s($0.a6.a1, $0.a6.a2.a1), a2: $0.a6.a2.a2, a3: $0.a6.a3}};
1602
1606
  case 7: /* Union */ {
1603
- const $5d = Text_PrettyPrint_Prettyprinter_Doc_n__8889_6792_best($0.a1, $0.a2, $0.a3, $0.a4, $0.a5, {h: 1 /* Cons */, a1: $0.a6.a1, a2: $0.a6.a2.a1(), a3: $0.a6.a3});
1604
- const $69 = Text_PrettyPrint_Prettyprinter_Doc_n__8889_6792_best($0.a1, $0.a2, $0.a3, $0.a4, $0.a5, {h: 1 /* Cons */, a1: $0.a6.a1, a2: $0.a6.a2.a2(), a3: $0.a6.a3});
1605
- return {h: 0 /* {TcDone:23} */, a1: Text_PrettyPrint_Prettyprinter_Doc_n__8889_6791_selectNicer($0.a1, $0.a2, $0.a3, $0.a4, $0.a5, $5d, () => $69)};
1607
+ const $5d = Text_PrettyPrint_Prettyprinter_Doc_n__8891_6792_best($0.a1, $0.a2, $0.a3, $0.a4, $0.a5, {h: 1 /* Cons */, a1: $0.a6.a1, a2: $0.a6.a2.a1(), a3: $0.a6.a3});
1608
+ const $69 = Text_PrettyPrint_Prettyprinter_Doc_n__8891_6792_best($0.a1, $0.a2, $0.a3, $0.a4, $0.a5, {h: 1 /* Cons */, a1: $0.a6.a1, a2: $0.a6.a2.a2(), a3: $0.a6.a3});
1609
+ return {h: 0 /* {TcDone:23} */, a1: Text_PrettyPrint_Prettyprinter_Doc_n__8891_6791_selectNicer($0.a1, $0.a2, $0.a3, $0.a4, $0.a5, $5d, () => $69)};
1606
1610
  }
1607
1611
  case 8: /* Column */ return {h: 1 /* {TcContinue23:1} */, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5, a6: {h: 1 /* Cons */, a1: $0.a6.a1, a2: $0.a6.a2.a1($0.a5), a3: $0.a6.a3}};
1608
1612
  case 9: /* WithPageWidth */ return {h: 1 /* {TcContinue23:1} */, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5, a6: {h: 1 /* Cons */, a1: $0.a6.a1, a2: $0.a6.a2.a1($0.a2), a3: $0.a6.a3}};
1609
1613
  case 10: /* Nesting */ return {h: 1 /* {TcContinue23:1} */, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5, a6: {h: 1 /* Cons */, a1: $0.a6.a1, a2: $0.a6.a2.a1($0.a6.a1), a3: $0.a6.a3}};
1610
- case 11: /* Annotated */ return {h: 0 /* {TcDone:23} */, a1: {h: 4 /* SAnnPush */, a1: $0.a6.a2.a1, a2: Text_PrettyPrint_Prettyprinter_Doc_n__8889_6792_best($0.a1, $0.a2, $0.a3, $0.a4, $0.a5, {h: 1 /* Cons */, a1: $0.a6.a1, a2: $0.a6.a2.a2, a3: {h: 2 /* UndoAnn */, a1: $0.a6.a3}})}};
1614
+ case 11: /* Annotated */ return {h: 0 /* {TcDone:23} */, a1: {h: 4 /* SAnnPush */, a1: $0.a6.a2.a1, a2: Text_PrettyPrint_Prettyprinter_Doc_n__8891_6792_best($0.a1, $0.a2, $0.a3, $0.a4, $0.a5, {h: 1 /* Cons */, a1: $0.a6.a1, a2: $0.a6.a2.a2, a3: {h: 2 /* UndoAnn */, a1: $0.a6.a3}})}};
1611
1615
  }
1612
1616
  }
1613
1617
  }
1614
1618
  }
1615
1619
 
1616
- /* Text.PrettyPrint.Prettyprinter.Doc.8889:6792:best */
1617
- function Text_PrettyPrint_Prettyprinter_Doc_n__8889_6792_best($0, $1, $2, $3, $4, $5) {
1620
+ /* Text.PrettyPrint.Prettyprinter.Doc.8891:6792:best */
1621
+ function Text_PrettyPrint_Prettyprinter_Doc_n__8891_6792_best($0, $1, $2, $3, $4, $5) {
1618
1622
  return __tailRec(x24tcOpt_23, {h: 1 /* {TcContinue23:1} */, a1: $0, a2: $1, a3: $2, a4: $3, a5: $4, a6: $5});
1619
1623
  }
1620
1624
 
@@ -1898,14 +1902,27 @@ function Data_Nat_LTEImpliesNotGT($0, $1) {
1898
1902
  /* {$tcOpt:39} */
1899
1903
  function x24tcOpt_39($0) {
1900
1904
  switch($0.a1.h) {
1901
- case 0: /* nil */ return {h: 0 /* {TcDone:39} */, a1: $0.a2};
1902
- case undefined: /* cons */ return {h: 1 /* {TcContinue39:1} */, a1: $0.a1.a1, a2: {a1: $0.a1.a2, a2: $0.a2}};
1905
+ case 0: /* nil */ return {h: 0 /* {TcDone:39} */, a1: undefined};
1906
+ case undefined: /* cons */ return {h: 1 /* {TcContinue39:1} */, a1: $0.a1.a1};
1907
+ }
1908
+ }
1909
+
1910
+ /* Syntax.PreorderReasoning.Calc : FastDerivation x y -> x = y */
1911
+ function Syntax_PreorderReasoning_Calc($0) {
1912
+ return __tailRec(x24tcOpt_39, {h: 1 /* {TcContinue39:1} */, a1: $0});
1913
+ }
1914
+
1915
+ /* {$tcOpt:40} */
1916
+ function x24tcOpt_40($0) {
1917
+ switch($0.a1.h) {
1918
+ case 0: /* nil */ return {h: 0 /* {TcDone:40} */, a1: $0.a2};
1919
+ case undefined: /* cons */ return {h: 1 /* {TcContinue40:1} */, a1: $0.a1.a1, a2: {a1: $0.a1.a2, a2: $0.a2}};
1903
1920
  }
1904
1921
  }
1905
1922
 
1906
1923
  /* Prelude.Types.SnocList.<>> : SnocList a -> List a -> List a */
1907
1924
  function Prelude_Types_SnocList_x3cx3ex3e($0, $1) {
1908
- return __tailRec(x24tcOpt_39, {h: 1 /* {TcContinue39:1} */, a1: $0, a2: $1});
1925
+ return __tailRec(x24tcOpt_40, {h: 1 /* {TcContinue40:1} */, a1: $0, a2: $1});
1909
1926
  }
1910
1927
 
1911
1928
  /* {__mainExpression:0} */
@@ -2104,340 +2121,350 @@ const csegen_136 = __lazy(function () {
2104
2121
  return {a1: $1 => $2 => Prelude_Interfaces_Bool_Semigroup_x3cx2bx3e_Semigroup_AnyBool($1, $2), a2: 0};
2105
2122
  });
2106
2123
 
2107
- /* {csegen:189} */
2108
- const csegen_189 = __lazy(function () {
2124
+ /* {csegen:174} */
2125
+ const csegen_174 = __lazy(function () {
2126
+ return {a1: {a1: {h: 0}, a2: undefined}, a2: undefined};
2127
+ });
2128
+
2129
+ /* {csegen:193} */
2130
+ const csegen_193 = __lazy(function () {
2109
2131
  return {a1: acc => elem => func => init => input => Prelude_Types_foldr_Foldable_List(func, init, input), a2: elem => acc => func => init => input => Prelude_Types_foldl_Foldable_List(func, init, input), a3: elem => $b => Prelude_Types_null_Foldable_List($b), a4: elem => acc => m => $f => funcM => init => input => Prelude_Types_foldlM_Foldable_List($f, funcM, init, input), a5: elem => $16 => $16, a6: a => m => $18 => f => $19 => Prelude_Types_foldMap_Foldable_List($18, f, $19)};
2110
2132
  });
2111
2133
 
2112
- /* {csegen:196} */
2113
- const csegen_196 = __lazy(function () {
2134
+ /* {csegen:200} */
2135
+ const csegen_200 = __lazy(function () {
2114
2136
  return b => a => $0 => $1 => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29($0, $1);
2115
2137
  });
2116
2138
 
2117
- /* {csegen:197} */
2118
- const csegen_197 = __lazy(function () {
2139
+ /* {csegen:201} */
2140
+ const csegen_201 = __lazy(function () {
2119
2141
  return a => $0 => Prelude_Types_join_Monad_x28Eitherx20x24ex29($0);
2120
2142
  });
2121
2143
 
2122
- /* {csegen:213} */
2123
- const csegen_213 = __lazy(function () {
2144
+ /* {csegen:217} */
2145
+ const csegen_217 = __lazy(function () {
2124
2146
  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)};
2125
2147
  });
2126
2148
 
2127
- /* {csegen:217} */
2128
- const csegen_217 = __lazy(function () {
2149
+ /* {csegen:221} */
2150
+ const csegen_221 = __lazy(function () {
2129
2151
  return b => a => f => $0 => $1 => $2 => Prelude_Types_traverse_Traversable_x28Eitherx20x24ex29($0, $1, $2);
2130
2152
  });
2131
2153
 
2132
- /* {csegen:231} */
2133
- const csegen_231 = __lazy(function () {
2154
+ /* {csegen:235} */
2155
+ const csegen_235 = __lazy(function () {
2134
2156
  return {a1: $1 => $2 => _add32s($1, $2), a2: $6 => $7 => _mul32s($6, $7), a3: $b => Number(_truncBigInt32($b))};
2135
2157
  });
2136
2158
 
2137
- /* {csegen:245} */
2138
- const csegen_245 = __lazy(function () {
2159
+ /* {csegen:249} */
2160
+ const csegen_249 = __lazy(function () {
2139
2161
  return {a1: {a1: $2 => $3 => Prelude_EqOrd_x3dx3d_Eq_Int($2, $3), a2: $8 => $9 => Prelude_EqOrd_x2fx3d_Eq_Int($8, $9)}, a2: $e => $f => Prelude_EqOrd_compare_Ord_Int($e, $f), a3: $14 => $15 => Prelude_EqOrd_x3c_Ord_Int($14, $15), a4: $1a => $1b => Prelude_EqOrd_x3e_Ord_Int($1a, $1b), a5: $20 => $21 => Prelude_EqOrd_x3cx3d_Ord_Int($20, $21), a6: $26 => $27 => Prelude_EqOrd_x3ex3d_Ord_Int($26, $27), a7: $2c => $2d => Prelude_EqOrd_max_Ord_Int($2c, $2d), a8: $32 => $33 => Prelude_EqOrd_min_Ord_Int($32, $33)};
2140
2162
  });
2141
2163
 
2142
- /* {csegen:254} */
2143
- const csegen_254 = __lazy(function () {
2164
+ /* {csegen:258} */
2165
+ const csegen_258 = __lazy(function () {
2144
2166
  const $0 = b => a => func => $1 => Text_Bounded_map_Functor_WithBounds(func, $1);
2145
2167
  return $5 => $6 => $0(undefined)(undefined)($5)($6);
2146
2168
  });
2147
2169
 
2148
- /* {csegen:264} */
2149
- const csegen_264 = __lazy(function () {
2170
+ /* {csegen:270} */
2171
+ const csegen_270 = __lazy(function () {
2150
2172
  const $0 = $1 => $2 => $3 => $4 => Text_Parser_Core_map_Functor_x28x28x28Grammarx20x24statex29x20x24tokx29x20x24cx29(1, $3, $4);
2151
2173
  return $9 => $a => $0(undefined)(undefined)($9)($a);
2152
2174
  });
2153
2175
 
2154
- /* {csegen:268} */
2155
- const csegen_268 = __lazy(function () {
2176
+ /* {csegen:274} */
2177
+ const csegen_274 = __lazy(function () {
2156
2178
  return {a1: $1 => Language_JSON_Tokens_TokType_TokenKind_JSONTokenKind($1), a2: kind => $5 => Language_JSON_Tokens_tokValue_TokenKind_JSONTokenKind(kind, $5)};
2157
2179
  });
2158
2180
 
2159
- /* {csegen:271} */
2160
- const csegen_271 = __lazy(function () {
2181
+ /* {csegen:277} */
2182
+ const csegen_277 = __lazy(function () {
2161
2183
  return {a1: $1 => $2 => Language_JSON_Tokens_x3dx3d_Eq_JSONTokenKind($1, $2), a2: $7 => $8 => Language_JSON_Tokens_x2fx3d_Eq_JSONTokenKind($7, $8)};
2162
2184
  });
2163
2185
 
2164
- /* {csegen:313} */
2165
- const csegen_313 = __lazy(function () {
2186
+ /* {csegen:319} */
2187
+ const csegen_319 = __lazy(function () {
2166
2188
  return {a1: $1 => Language_JSON_String_Tokens_TokType_TokenKind_JSONStringTokenKind($1), a2: kind => $5 => Language_JSON_String_Tokens_tokValue_TokenKind_JSONStringTokenKind(kind, $5)};
2167
2189
  });
2168
2190
 
2169
- /* {csegen:316} */
2170
- const csegen_316 = __lazy(function () {
2191
+ /* {csegen:322} */
2192
+ const csegen_322 = __lazy(function () {
2171
2193
  return {a1: $1 => $2 => Language_JSON_String_Tokens_x3dx3d_Eq_JSONStringTokenKind($1, $2), a2: $7 => $8 => Language_JSON_String_Tokens_x2fx3d_Eq_JSONStringTokenKind($7, $8)};
2172
2194
  });
2173
2195
 
2174
- /* {csegen:334} */
2175
- const csegen_334 = __lazy(function () {
2196
+ /* {csegen:340} */
2197
+ const csegen_340 = __lazy(function () {
2176
2198
  const $0 = b => a => func => $1 => Text_Parser_Core_map_Functor_x28x28x28Grammarx20x24statex29x20x24tokx29x20x24cx29(1, func, $1);
2177
2199
  return $6 => $7 => $0(undefined)(undefined)($6)($7);
2178
2200
  });
2179
2201
 
2180
- /* {csegen:335} */
2181
- const csegen_335 = __lazy(function () {
2182
- return csegen_334()($3 => $4 => $4);
2183
- });
2184
-
2185
2202
  /* {csegen:341} */
2186
2203
  const csegen_341 = __lazy(function () {
2204
+ return csegen_340()($3 => $4 => $4);
2205
+ });
2206
+
2207
+ /* {csegen:347} */
2208
+ const csegen_347 = __lazy(function () {
2187
2209
  const $0 = $1 => $2 => $3 => $4 => Text_Bounded_map_Functor_WithBounds($3, $4);
2188
2210
  return $8 => $9 => $0(undefined)(undefined)($8)($9);
2189
2211
  });
2190
2212
 
2191
- /* {csegen:346} */
2192
- const csegen_346 = __lazy(function () {
2213
+ /* {csegen:352} */
2214
+ const csegen_352 = __lazy(function () {
2193
2215
  return {a1: {a1: csegen_62()('End of input'), a2: {h: 0}}, a2: {h: 0}};
2194
2216
  });
2195
2217
 
2196
- /* {csegen:392} */
2197
- const csegen_392 = __lazy(function () {
2218
+ /* {csegen:398} */
2219
+ const csegen_398 = __lazy(function () {
2198
2220
  return $0 => Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(2), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($0));
2199
2221
  });
2200
2222
 
2201
- /* {csegen:403} */
2202
- const csegen_403 = __lazy(function () {
2223
+ /* {csegen:409} */
2224
+ const csegen_409 = __lazy(function () {
2203
2225
  const $0 = $1 => Number(_truncUBigInt32($1));
2204
2226
  return $3 => $0($3);
2205
2227
  });
2206
2228
 
2207
- /* {csegen:404} */
2208
- const csegen_404 = __lazy(function () {
2229
+ /* {csegen:410} */
2230
+ const csegen_410 = __lazy(function () {
2209
2231
  return $0 => Language_JSON_Accessors_optional($3 => Language_JSON_Accessors_string($3), $0);
2210
2232
  });
2211
2233
 
2212
- /* {csegen:406} */
2213
- const csegen_406 = __lazy(function () {
2234
+ /* {csegen:412} */
2235
+ const csegen_412 = __lazy(function () {
2214
2236
  return csegen_60()($3 => $3);
2215
2237
  });
2216
2238
 
2217
- /* {csegen:422} */
2218
- const csegen_422 = __lazy(function () {
2239
+ /* {csegen:428} */
2240
+ const csegen_428 = __lazy(function () {
2219
2241
  return $0 => Data_Either_maybeToEither(() => 'Failed to parse JSON', Language_JSON_parse($0));
2220
2242
  });
2221
2243
 
2222
- /* {csegen:423} */
2223
- const csegen_423 = __lazy(function () {
2244
+ /* {csegen:429} */
2245
+ const csegen_429 = __lazy(function () {
2224
2246
  return $0 => $1 => Prelude_Types_max_Ord_Nat($0, $1);
2225
2247
  });
2226
2248
 
2227
- /* {csegen:428} */
2228
- const csegen_428 = __lazy(function () {
2249
+ /* {csegen:434} */
2250
+ const csegen_434 = __lazy(function () {
2229
2251
  return csegen_116()($3 => ({h: 3 /* JString */, a1: $3}));
2230
2252
  });
2231
2253
 
2232
- /* {csegen:436} */
2233
- const csegen_436 = __lazy(function () {
2254
+ /* {csegen:442} */
2255
+ const csegen_442 = __lazy(function () {
2234
2256
  return {a1: csegen_45(), 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)};
2235
2257
  });
2236
2258
 
2237
- /* {csegen:442} */
2238
- const csegen_442 = __lazy(function () {
2259
+ /* {csegen:446} */
2260
+ const csegen_446 = __lazy(function () {
2239
2261
  return {a1: csegen_62()('.'), a2: {h: 0}};
2240
2262
  });
2241
2263
 
2242
- /* {csegen:444} */
2243
- const csegen_444 = __lazy(function () {
2264
+ /* {csegen:448} */
2265
+ const csegen_448 = __lazy(function () {
2244
2266
  return csegen_55()($3 => Data_String_lines($3));
2245
2267
  });
2246
2268
 
2247
- /* {csegen:445} */
2248
- const csegen_445 = __lazy(function () {
2269
+ /* {csegen:449} */
2270
+ const csegen_449 = __lazy(function () {
2249
2271
  return $0 => $1 => Data_Promise_x3ex3ex3d_Monad_Promise($0, $1);
2250
2272
  });
2251
2273
 
2252
- /* {csegen:446} */
2253
- const csegen_446 = __lazy(function () {
2274
+ /* {csegen:450} */
2275
+ const csegen_450 = __lazy(function () {
2254
2276
  return $0 => $1 => Data_Promise_either(csegen_72(), Data_PullRequest_parsePullRequestsString($0), $1);
2255
2277
  });
2256
2278
 
2257
- /* {csegen:447} */
2258
- const csegen_447 = __lazy(function () {
2279
+ /* {csegen:451} */
2280
+ const csegen_451 = __lazy(function () {
2259
2281
  return $0 => $1 => Data_Promise_either(csegen_72(), Data_User_parseUserString($0), $1);
2260
2282
  });
2261
2283
 
2262
- /* {csegen:456} */
2263
- const csegen_456 = __lazy(function () {
2284
+ /* {csegen:460} */
2285
+ const csegen_460 = __lazy(function () {
2264
2286
  return $0 => $1 => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29($0, $1);
2265
2287
  });
2266
2288
 
2267
- /* {csegen:470} */
2268
- const csegen_470 = __lazy(function () {
2289
+ /* {csegen:474} */
2290
+ const csegen_474 = __lazy(function () {
2269
2291
  return $0 => Language_JSON_Accessors_array($3 => Data_PullRequest_parsePR($3), $0);
2270
2292
  });
2271
2293
 
2272
- /* {csegen:478} */
2273
- const csegen_478 = __lazy(function () {
2294
+ /* {csegen:482} */
2295
+ const csegen_482 = __lazy(function () {
2274
2296
  return $0 => $1 => $2 => Data_Promise_pure_Applicative_Promise($0, $1, $2);
2275
2297
  });
2276
2298
 
2277
- /* {csegen:480} */
2278
- const csegen_480 = __lazy(function () {
2299
+ /* {csegen:484} */
2300
+ const csegen_484 = __lazy(function () {
2279
2301
  return $0 => $0.a2;
2280
2302
  });
2281
2303
 
2282
- /* {csegen:485} */
2283
- const csegen_485 = __lazy(function () {
2304
+ /* {csegen:489} */
2305
+ const csegen_489 = __lazy(function () {
2284
2306
  return $0 => $0.a1;
2285
2307
  });
2286
2308
 
2287
- /* {csegen:487} */
2288
- const csegen_487 = __lazy(function () {
2309
+ /* {csegen:491} */
2310
+ const csegen_491 = __lazy(function () {
2289
2311
  const $0 = csegen_126();
2290
2312
  return $2 => $3 => $0($2)($3);
2291
2313
  });
2292
2314
 
2293
- /* {csegen:498} */
2294
- const csegen_498 = __lazy(function () {
2315
+ /* {csegen:502} */
2316
+ const csegen_502 = __lazy(function () {
2295
2317
  return csegen_62()(': ');
2296
2318
  });
2297
2319
 
2298
- /* {csegen:501} */
2299
- const csegen_501 = __lazy(function () {
2300
- return csegen_55()(csegen_403())(System_time(csegen_94()));
2320
+ /* {csegen:505} */
2321
+ const csegen_505 = __lazy(function () {
2322
+ return csegen_55()(csegen_409())(System_time(csegen_94()));
2301
2323
  });
2302
2324
 
2303
- /* {csegen:507} */
2304
- const csegen_507 = __lazy(function () {
2325
+ /* {csegen:511} */
2326
+ const csegen_511 = __lazy(function () {
2305
2327
  return csegen_62()('Error loading ');
2306
2328
  });
2307
2329
 
2308
- /* {csegen:508} */
2309
- const csegen_508 = __lazy(function () {
2330
+ /* {csegen:512} */
2331
+ const csegen_512 = __lazy(function () {
2310
2332
  return csegen_62()(Data_Config_filename());
2311
2333
  });
2312
2334
 
2313
- /* {csegen:524} */
2314
- const csegen_524 = __lazy(function () {
2335
+ /* {csegen:528} */
2336
+ const csegen_528 = __lazy(function () {
2315
2337
  return $0 => $1 => $2 => Data_Promise_liftIO_HasIO_Promise($5 => Prelude_IO_prim__getStr($5), $0, $1, $2);
2316
2338
  });
2317
2339
 
2318
- /* {csegen:528} */
2319
- const csegen_528 = __lazy(function () {
2340
+ /* {csegen:532} */
2341
+ const csegen_532 = __lazy(function () {
2320
2342
  return $0 => $1 => Data_Promise_pure_Applicative_Promise({h: 0}, $0, $1);
2321
2343
  });
2322
2344
 
2323
- /* {csegen:531} */
2324
- const csegen_531 = __lazy(function () {
2345
+ /* {csegen:535} */
2346
+ const csegen_535 = __lazy(function () {
2325
2347
  return {a1: csegen_62()('?'), a2: {h: 0}};
2326
2348
  });
2327
2349
 
2328
- /* {csegen:575} */
2329
- const csegen_575 = __lazy(function () {
2350
+ /* {csegen:578} */
2351
+ const csegen_578 = __lazy(function () {
2330
2352
  return Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(csegen_62()(', '));
2331
2353
  });
2332
2354
 
2333
- /* {csegen:582} */
2334
- const csegen_582 = __lazy(function () {
2355
+ /* {csegen:588} */
2356
+ const csegen_588 = __lazy(function () {
2335
2357
  return {a1: csegen_9(), a2: a => ({h: 0}), a3: a => $4 => $5 => Prelude_Types_x3cx7cx3e_Alternative_Maybe($4, $5)};
2336
2358
  });
2337
2359
 
2338
- /* {csegen:584} */
2339
- const csegen_584 = __lazy(function () {
2340
- return csegen_55()($3 => Data_List_sort(csegen_436(), $3));
2360
+ /* {csegen:590} */
2361
+ const csegen_590 = __lazy(function () {
2362
+ return csegen_55()($3 => Data_List_sort(csegen_442(), $3));
2341
2363
  });
2342
2364
 
2343
- /* {csegen:585} */
2344
- const csegen_585 = __lazy(function () {
2345
- return $0 => FFI_Concurrency_promiseAll(csegen_189(), $0);
2365
+ /* {csegen:591} */
2366
+ const csegen_591 = __lazy(function () {
2367
+ return $0 => FFI_Concurrency_promiseAll(csegen_193(), $0);
2346
2368
  });
2347
2369
 
2348
- /* {csegen:587} */
2349
- const csegen_587 = __lazy(function () {
2370
+ /* {csegen:593} */
2371
+ const csegen_593 = __lazy(function () {
2350
2372
  const $0 = $1 => Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($1);
2351
2373
  return $4 => $0($4);
2352
2374
  });
2353
2375
 
2354
- /* {csegen:598} */
2355
- const csegen_598 = __lazy(function () {
2376
+ /* {csegen:604} */
2377
+ const csegen_604 = __lazy(function () {
2356
2378
  return csegen_55()($3 => $3.a1);
2357
2379
  });
2358
2380
 
2359
- /* {csegen:600} */
2360
- const csegen_600 = __lazy(function () {
2381
+ /* {csegen:606} */
2382
+ const csegen_606 = __lazy(function () {
2361
2383
  return $0 => $1 => Data_Date_compare_Ord_Date($0, $1);
2362
2384
  });
2363
2385
 
2364
- /* {csegen:601} */
2365
- const csegen_601 = __lazy(function () {
2386
+ /* {csegen:607} */
2387
+ const csegen_607 = __lazy(function () {
2366
2388
  return $0 => $0.a2;
2367
2389
  });
2368
2390
 
2369
- /* {csegen:602} */
2370
- const csegen_602 = __lazy(function () {
2371
- return $0 => $1 => Prelude_Basics_on(csegen_600(), csegen_601(), $0, $1);
2391
+ /* {csegen:608} */
2392
+ const csegen_608 = __lazy(function () {
2393
+ return $0 => $1 => Prelude_Basics_on(csegen_606(), csegen_607(), $0, $1);
2372
2394
  });
2373
2395
 
2374
- /* {csegen:615} */
2375
- const csegen_615 = __lazy(function () {
2396
+ /* {csegen:621} */
2397
+ const csegen_621 = __lazy(function () {
2376
2398
  return $0 => $0.a2;
2377
2399
  });
2378
2400
 
2379
- /* {csegen:622} */
2380
- const csegen_622 = __lazy(function () {
2401
+ /* {csegen:628} */
2402
+ const csegen_628 = __lazy(function () {
2381
2403
  return $0 => $0.a1;
2382
2404
  });
2383
2405
 
2384
- /* {csegen:637} */
2385
- const csegen_637 = __lazy(function () {
2406
+ /* {csegen:643} */
2407
+ const csegen_643 = __lazy(function () {
2386
2408
  return Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(csegen_62()('open:'));
2387
2409
  });
2388
2410
 
2389
- /* {csegen:641} */
2390
- const csegen_641 = __lazy(function () {
2411
+ /* {csegen:647} */
2412
+ const csegen_647 = __lazy(function () {
2391
2413
  return csegen_60()(date => Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(csegen_62()('earliest:')), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Data_Date_show_Show_Date(date)), a2: {h: 0}}})));
2392
2414
  });
2393
2415
 
2394
- /* {csegen:643} */
2395
- const csegen_643 = __lazy(function () {
2416
+ /* {csegen:649} */
2417
+ const csegen_649 = __lazy(function () {
2396
2418
  return Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(csegen_62()('closed:'));
2397
2419
  });
2398
2420
 
2399
- /* {csegen:666} */
2400
- const csegen_666 = __lazy(function () {
2421
+ /* {csegen:672} */
2422
+ const csegen_672 = __lazy(function () {
2401
2423
  return csegen_62()('pr_description.tmp.md');
2402
2424
  });
2403
2425
 
2404
- /* {csegen:716} */
2405
- const csegen_716 = __lazy(function () {
2426
+ /* {csegen:722} */
2427
+ const csegen_722 = __lazy(function () {
2406
2428
  return $0 => $1 => Data_Promise_reject('Multiple PRs for the current brach. Harmony only handles 1 PR per branch currently.', $0, $1);
2407
2429
  });
2408
2430
 
2409
- /* {csegen:723} */
2410
- const csegen_723 = __lazy(function () {
2431
+ /* {csegen:729} */
2432
+ const csegen_729 = __lazy(function () {
2411
2433
  return $0 => $0.a1;
2412
2434
  });
2413
2435
 
2414
- /* {csegen:749} */
2415
- const csegen_749 = __lazy(function () {
2436
+ /* {csegen:755} */
2437
+ const csegen_755 = __lazy(function () {
2416
2438
  return {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc()}, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc()}, a2: {h: 0}}};
2417
2439
  });
2418
2440
 
2419
- /* {csegen:770} */
2420
- const csegen_770 = __lazy(function () {
2441
+ /* {csegen:776} */
2442
+ const csegen_776 = __lazy(function () {
2421
2443
  return {a1: ann => $1 => Graph_pretty_Pretty_Date($1), a2: ann => $5 => $6 => Graph_prettyPrec_Pretty_Date($5, $6)};
2422
2444
  });
2423
2445
 
2424
- /* {csegen:787} */
2425
- const csegen_787 = __lazy(function () {
2446
+ /* {csegen:791} */
2447
+ const csegen_791 = __lazy(function () {
2448
+ return csegen_116()($3 => BashCompletion_hashify(BashCompletion_slugify($3)));
2449
+ });
2450
+
2451
+ /* {csegen:793} */
2452
+ const csegen_793 = __lazy(function () {
2426
2453
  return csegen_116()($3 => BashCompletion_slugify($3));
2427
2454
  });
2428
2455
 
2429
- /* {csegen:788} */
2430
- const csegen_788 = __lazy(function () {
2456
+ /* {csegen:794} */
2457
+ const csegen_794 = __lazy(function () {
2431
2458
  return {a1: '--completed', a2: {a1: 'graph', a2: {h: 0}}};
2432
2459
  });
2433
2460
 
2434
- /* {csegen:790} */
2435
- const csegen_790 = __lazy(function () {
2461
+ /* {csegen:796} */
2462
+ const csegen_796 = __lazy(function () {
2436
2463
  return {a1: {a1: '--checkout', a2: {a1: '-c', a2: {h: 0}}}};
2437
2464
  });
2438
2465
 
2439
- /* {csegen:792} */
2440
- const csegen_792 = __lazy(function () {
2466
+ /* {csegen:798} */
2467
+ const csegen_798 = __lazy(function () {
2441
2468
  return {a1: {a1: '--completed', a2: {a1: '-c', a2: {h: 0}}}};
2442
2469
  });
2443
2470
 
@@ -2446,18 +2473,18 @@ function prim__sub_Integer($0, $1) {
2446
2473
  return ($0-$1);
2447
2474
  }
2448
2475
 
2449
- /* Main.6463:1348:parsePg */
2450
- function Main_n__6463_1348_parsePg($0, $1, $2, $3, $4, $5, $6) {
2476
+ /* Main.6951:1348:parsePg */
2477
+ function Main_n__6951_1348_parsePg($0, $1, $2, $3, $4, $5, $6) {
2451
2478
  return Data_String_parsePositive(csegen_2(), $6);
2452
2479
  }
2453
2480
 
2454
- /* Main.6463:1347:parseLim */
2455
- function Main_n__6463_1347_parseLim($0, $1, $2, $3, $4, $5) {
2481
+ /* Main.6951:1347:parseLim */
2482
+ function Main_n__6951_1347_parseLim($0, $1, $2, $3, $4, $5) {
2456
2483
  return Prelude_Interfaces_x3cx3dx3c(csegen_14(), x => Data_Fin_natToFin(x, 101n), $e => Data_String_parsePositive(csegen_2(), $e));
2457
2484
  }
2458
2485
 
2459
- /* Main.6324:1149:configuredOpts */
2460
- function Main_n__6324_1149_configuredOpts($0, $1, $2, $3) {
2486
+ /* Main.6812:1149:configuredOpts */
2487
+ function Main_n__6812_1149_configuredOpts($0, $1, $2, $3) {
2461
2488
  const $11 = $12 => {
2462
2489
  switch($12.h) {
2463
2490
  case 1: /* Right */ return $0.a1.a1.a2(undefined)(BashCompletion_opts($12.a1, $3, $2, $1));
@@ -2679,7 +2706,7 @@ function Main_handleAuthenticatedArgs($0, $1, $2, $3) {
2679
2706
  }
2680
2707
  return Prelude_Types_x3ex3ex3d_Monad_Maybe($a7, filter => ({a1: {a1: filter, a2: {a1: $a4.a1, a2: $a4.a2}}}));
2681
2708
  };
2682
- const $84 = Prelude_Types_x3ex3ex3d_Monad_Maybe(Prelude_Types_x3cx2ax3e_Applicative_Maybe(Prelude_Types_x3cx2ax3e_Applicative_Maybe({a1: $8c => $8d => ({a1: $8c, a2: $8d})}, Main_n__6463_1347_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__6463_1348_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)), $a3);
2709
+ const $84 = Prelude_Types_x3ex3ex3d_Monad_Maybe(Prelude_Types_x3cx2ax3e_Applicative_Maybe(Prelude_Types_x3cx2ax3e_Applicative_Maybe({a1: $8c => $8d => ({a1: $8c, a2: $8d})}, Main_n__6951_1347_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__6951_1348_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)), $a3);
2683
2710
  switch($84.h) {
2684
2711
  case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listPullRequestsJsonStr($2, $0.a2, $0.a3, $84.a1.a1, $84.a1.a2.a1, $84.a1.a2.a2), pullsJsonStr => $c3 => $c4 => $c5 => Data_Promise_liftIO_HasIO_Promise($c8 => Prelude_IO_prim__putStr(pullsJsonStr, $c8), $c3, $c4, $c5));
2685
2712
  case 0: /* nothing */ return csegen_68();
@@ -2753,49 +2780,43 @@ function Main_handleAuthenticatedArgs($0, $1, $2, $3) {
2753
2780
  switch($3.a2.h) {
2754
2781
  case undefined: /* cons */ {
2755
2782
  switch($3.a2.a1) {
2756
- case '--draft': {
2757
- switch($3.a2.a2.h) {
2758
- case 0: /* nil */ return Commands_pr($0, $1, $2, 1);
2759
- default: return $23f => $240 => Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_70(), $247 => $247, {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_72(), $3), a2: {a1: '.', a2: {h: 0}}}}), $23f, $240);
2760
- }
2761
- }
2762
- default: return $255 => $256 => Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_70(), $25d => $25d, {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_72(), $3), a2: {a1: '.', a2: {h: 0}}}}), $255, $256);
2783
+ case '--draft': return Commands_pr($0, $1, $2, 1, $3.a2.a2);
2784
+ default: return Commands_pr($0, $1, $2, 0, $3.a2);
2763
2785
  }
2764
2786
  }
2765
- case 0: /* nil */ return Commands_pr($0, $1, $2, 0);
2766
- default: return $270 => $271 => Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_70(), $278 => $278, {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_72(), $3), a2: {a1: '.', a2: {h: 0}}}}), $270, $271);
2787
+ default: return Commands_pr($0, $1, $2, 0, $3.a2);
2767
2788
  }
2768
2789
  }
2769
2790
  case 'reflect': {
2770
2791
  switch($3.a2.h) {
2771
2792
  case 0: /* nil */ return Commands_reflect($0, $2);
2772
- default: return $28a => $28b => Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_70(), $292 => $292, {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_72(), $3), a2: {a1: '.', a2: {h: 0}}}}), $28a, $28b);
2793
+ default: return $24f => $250 => Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_70(), $257 => $257, {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_72(), $3), a2: {a1: '.', a2: {h: 0}}}}), $24f, $250);
2773
2794
  }
2774
2795
  }
2775
2796
  case 'contribute': {
2776
- const $2a0 = Commands_parseContributeArgs($3.a2);
2777
- switch($2a0.h) {
2778
- case 1: /* Right */ return Commands_contribute($0, $1, $2, $2a0.a1);
2779
- case 0: /* Left */ return Main_exitError(csegen_94(), $2a0.a1);
2797
+ const $265 = Commands_parseContributeArgs($3.a2);
2798
+ switch($265.h) {
2799
+ case 1: /* Right */ return Commands_contribute($0, $1, $2, $265.a1);
2800
+ case 0: /* Left */ return Main_exitError(csegen_94(), $265.a1);
2780
2801
  }
2781
2802
  }
2782
2803
  case 'list': {
2783
2804
  switch($3.a2.h) {
2784
- case 0: /* nil */ return $2ad => $2ae => Data_Promise_reject('The list command expects the name of a GitHub Team as an argument.', $2ad, $2ae);
2805
+ case 0: /* nil */ return $272 => $273 => Data_Promise_reject('The list command expects the name of a GitHub Team as an argument.', $272, $273);
2785
2806
  case undefined: /* cons */ {
2786
2807
  switch($3.a2.a2.h) {
2787
2808
  case 0: /* nil */ return Commands_list($0, $2, $3.a2.a1);
2788
- default: return $2b8 => $2b9 => Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_70(), $2c0 => $2c0, {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_72(), $3), a2: {a1: '.', a2: {h: 0}}}}), $2b8, $2b9);
2809
+ default: return $27d => $27e => Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_70(), $285 => $285, {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_72(), $3), a2: {a1: '.', a2: {h: 0}}}}), $27d, $27e);
2789
2810
  }
2790
2811
  }
2791
- default: return $2ce => $2cf => Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_70(), $2d6 => $2d6, {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_72(), $3), a2: {a1: '.', a2: {h: 0}}}}), $2ce, $2cf);
2812
+ default: return $293 => $294 => Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_70(), $29b => $29b, {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_72(), $3), a2: {a1: '.', a2: {h: 0}}}}), $293, $294);
2792
2813
  }
2793
2814
  }
2794
2815
  case 'graph': {
2795
- const $2e4 = Commands_parseGraphArgs($3.a2);
2796
- switch($2e4.h) {
2797
- case 1: /* Right */ return Commands_graph($0, $2, $2e4.a1);
2798
- case 0: /* Left */ return Main_exitError(csegen_94(), $2e4.a1);
2816
+ const $2a9 = Commands_parseGraphArgs($3.a2);
2817
+ switch($2a9.h) {
2818
+ case 1: /* Right */ return Commands_graph($0, $2, $2a9.a1);
2819
+ case 0: /* Left */ return Main_exitError(csegen_94(), $2a9.a1);
2799
2820
  }
2800
2821
  }
2801
2822
  case 'assign': {
@@ -2811,15 +2832,15 @@ function Main_handleAuthenticatedArgs($0, $1, $2, $3) {
2811
2832
  }
2812
2833
  case 'label': {
2813
2834
  switch($3.a2.h) {
2814
- case 0: /* nil */ return $304 => $305 => Data_Promise_reject('The label command expects one or more labels as arguments.', $304, $305);
2835
+ case 0: /* nil */ return $2c9 => $2ca => Data_Promise_reject('The label command expects one or more labels as arguments.', $2c9, $2ca);
2815
2836
  case undefined: /* cons */ return Commands_label($0, $1, $2, {a1: $3.a2.a1, a2: $3.a2.a2});
2816
- default: return $311 => $312 => Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_70(), $319 => $319, {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_72(), $3), a2: {a1: '.', a2: {h: 0}}}}), $311, $312);
2837
+ default: return $2d6 => $2d7 => Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_70(), $2de => $2de, {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_72(), $3), a2: {a1: '.', a2: {h: 0}}}}), $2d6, $2d7);
2817
2838
  }
2818
2839
  }
2819
- default: return $327 => $328 => Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_70(), $32f => $32f, {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_72(), $3), a2: {a1: '.', a2: {h: 0}}}}), $327, $328);
2840
+ default: return $2ec => $2ed => Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_70(), $2f4 => $2f4, {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_72(), $3), a2: {a1: '.', a2: {h: 0}}}}), $2ec, $2ed);
2820
2841
  }
2821
2842
  }
2822
- default: return $33d => $33e => Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_70(), $345 => $345, {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_72(), $3), a2: {a1: '.', a2: {h: 0}}}}), $33d, $33e);
2843
+ default: return $302 => $303 => Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_70(), $30a => $30a, {a1: 'Unexpected command line arguments: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_72(), $3), a2: {a1: '.', a2: {h: 0}}}}), $302, $303);
2823
2844
  }
2824
2845
  }
2825
2846
 
@@ -2891,22 +2912,22 @@ function Main_exitError($0, $1) {
2891
2912
 
2892
2913
  /* Main.bashCompletion : HasIO io => String -> String -> String -> io () */
2893
2914
  function Main_bashCompletion($0, $1, $2, $3) {
2894
- const $4 = Prelude_Types_maybe(() => Main_n__6324_1149_configuredOpts($0, $3, $2, $1), () => $d => $0.a1.a1.a2(undefined)($d), BashCompletion_cmdOpts($1, $2, $3));
2915
+ const $4 = Prelude_Types_maybe(() => Main_n__6812_1149_configuredOpts($0, $3, $2, $1), () => $d => $0.a1.a1.a2(undefined)($d), BashCompletion_cmdOpts($1, $2, $3));
2895
2916
  return $0.a1.a2(undefined)(undefined)($4)($24 => $0.a2(undefined)($2a => Prelude_IO_prim__putStr(Data_String_fastUnlines($24), $2a)));
2896
2917
  }
2897
2918
 
2898
- /* Text.PrettyPrint.Prettyprinter.Render.Terminal.4412:5087:writeOutput */
2899
- function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4412_5087_writeOutput($0, $1, $2) {
2919
+ /* Text.PrettyPrint.Prettyprinter.Render.Terminal.4414:5087:writeOutput */
2920
+ function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4414_5087_writeOutput($0, $1, $2) {
2900
2921
  return Control_Monad_ST_modifySTRef($1, $6 => csegen_100()($6)($2));
2901
2922
  }
2902
2923
 
2903
- /* Text.PrettyPrint.Prettyprinter.Render.Terminal.4412:5084:push */
2904
- function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4412_5084_push($0, $1, $2) {
2924
+ /* Text.PrettyPrint.Prettyprinter.Render.Terminal.4414:5084:push */
2925
+ function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4414_5084_push($0, $1, $2) {
2905
2926
  return Control_Monad_ST_modifySTRef($1, $6 => ({a1: $2, a2: $6}));
2906
2927
  }
2907
2928
 
2908
- /* Text.PrettyPrint.Prettyprinter.Render.Terminal.4412:5086:pop */
2909
- function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4412_5086_pop($0, $1) {
2929
+ /* Text.PrettyPrint.Prettyprinter.Render.Terminal.4414:5086:pop */
2930
+ function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4414_5086_pop($0, $1) {
2910
2931
  const $4 = $1;
2911
2932
  const $5 = $4;
2912
2933
  const $3 = $6 => ($5.value);
@@ -2924,8 +2945,8 @@ function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4412_5086_pop($0, $1)
2924
2945
  return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($3, $a);
2925
2946
  }
2926
2947
 
2927
- /* Text.PrettyPrint.Prettyprinter.Render.Terminal.4412:5085:peek */
2928
- function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4412_5085_peek($0, $1) {
2948
+ /* Text.PrettyPrint.Prettyprinter.Render.Terminal.4414:5085:peek */
2949
+ function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4414_5085_peek($0, $1) {
2929
2950
  const $4 = $1;
2930
2951
  const $5 = $4;
2931
2952
  const $3 = $6 => ($5.value);
@@ -2938,13 +2959,13 @@ function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4412_5085_peek($0, $1
2938
2959
  return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($3, $a);
2939
2960
  }
2940
2961
 
2941
- /* Text.PrettyPrint.Prettyprinter.Render.Terminal.4412:5088:go */
2942
- function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4412_5088_go($0, $1, $2, $3) {
2962
+ /* Text.PrettyPrint.Prettyprinter.Render.Terminal.4414:5088:go */
2963
+ function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4414_5088_go($0, $1, $2, $3) {
2943
2964
  switch($3.h) {
2944
2965
  case 0: /* SEmpty */ return $5 => (undefined);
2945
- case 1: /* SChar */ return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29(Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4412_5087_writeOutput($0, $2, Data_String_singleton($3.a1)), $f => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4412_5088_go($0, $1, $2, $3.a2()));
2946
- case 2: /* SText */ return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29(Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4412_5087_writeOutput($0, $2, $3.a2), $1d => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4412_5088_go($0, $1, $2, $3.a3()));
2947
- case 3: /* SLine */ return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29(Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4412_5087_writeOutput($0, $2, csegen_100()(Data_String_singleton('\n'))(Text_PrettyPrint_Prettyprinter_Doc_textSpaces($3.a1))), $34 => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4412_5088_go($0, $1, $2, $3.a2));
2966
+ case 1: /* SChar */ return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29(Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4414_5087_writeOutput($0, $2, Data_String_singleton($3.a1)), $f => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4414_5088_go($0, $1, $2, $3.a2()));
2967
+ case 2: /* SText */ return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29(Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4414_5087_writeOutput($0, $2, $3.a2), $1d => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4414_5088_go($0, $1, $2, $3.a3()));
2968
+ case 3: /* SLine */ return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29(Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4414_5087_writeOutput($0, $2, csegen_100()(Data_String_singleton('\n'))(Text_PrettyPrint_Prettyprinter_Doc_textSpaces($3.a1))), $34 => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4414_5088_go($0, $1, $2, $3.a2));
2948
2969
  case 4: /* SAnnPush */ {
2949
2970
  const $3f = $40 => {
2950
2971
  switch($40.h) {
@@ -2953,7 +2974,7 @@ function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4412_5088_go($0, $1,
2953
2974
  const $44 = $4b => $4c => $45($4b)($4c);
2954
2975
  const $43 = $44($3.a1);
2955
2976
  const $42 = $43($40.a1);
2956
- return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29(Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4412_5084_push($0, $1, $42), $5a => Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29(Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4412_5087_writeOutput($0, $2, Control_ANSI_SGR_escapeSGR($42)), $64 => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4412_5088_go($0, $1, $2, $3.a2)));
2977
+ return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29(Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4414_5084_push($0, $1, $42), $5a => Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29(Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4414_5087_writeOutput($0, $2, Control_ANSI_SGR_escapeSGR($42)), $64 => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4414_5088_go($0, $1, $2, $3.a2)));
2957
2978
  }
2958
2979
  case 0: /* nothing */ {
2959
2980
  const $6a = $1;
@@ -2962,13 +2983,13 @@ function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4412_5088_go($0, $1,
2962
2983
  }
2963
2984
  }
2964
2985
  };
2965
- return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29(Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4412_5085_peek($0, $1), $3f);
2986
+ return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29(Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4414_5085_peek($0, $1), $3f);
2966
2987
  }
2967
2988
  case 5: /* SAnnPop */ {
2968
2989
  const $76 = _ => {
2969
2990
  const $7c = $7d => {
2970
2991
  switch($7d.h) {
2971
- case undefined: /* just */ return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29(Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4412_5087_writeOutput($0, $2, Control_ANSI_SGR_escapeSGR({a1: {h: 0 /* Reset */}, a2: $7d.a1})), $8a => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4412_5088_go($0, $1, $2, $3.a1));
2992
+ case undefined: /* just */ return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29(Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4414_5087_writeOutput($0, $2, Control_ANSI_SGR_escapeSGR({a1: {h: 0 /* Reset */}, a2: $7d.a1})), $8a => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4414_5088_go($0, $1, $2, $3.a1));
2972
2993
  case 0: /* nothing */ {
2973
2994
  const $90 = $1;
2974
2995
  const $91 = $90;
@@ -2976,9 +2997,9 @@ function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4412_5088_go($0, $1,
2976
2997
  }
2977
2998
  }
2978
2999
  };
2979
- return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29(Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4412_5085_peek($0, $1), $7c);
3000
+ return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29(Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4414_5085_peek($0, $1), $7c);
2980
3001
  };
2981
- return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29(Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4412_5086_pop($0, $1), $76);
3002
+ return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29(Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4414_5086_pop($0, $1), $76);
2982
3003
  }
2983
3004
  }
2984
3005
  }
@@ -3019,7 +3040,7 @@ function Text_PrettyPrint_Prettyprinter_Render_Terminal_renderString($0) {
3019
3040
  };
3020
3041
  return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($21, $28);
3021
3042
  };
3022
- return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29(Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4412_5088_go($0, styleStackRef, outputRef, $0), $1e);
3043
+ return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29(Text_PrettyPrint_Prettyprinter_Render_Terminal_n__4414_5088_go($0, styleStackRef, outputRef, $0), $1e);
3023
3044
  };
3024
3045
  return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($12 => Control_Monad_ST_newSTRef('', $12), $16);
3025
3046
  };
@@ -3107,9 +3128,9 @@ function Text_PrettyPrint_Prettyprinter_Doc_case__changesUponFlattening_2403($0,
3107
3128
  }
3108
3129
  }
3109
3130
 
3110
- /* Text.PrettyPrint.Prettyprinter.Doc.8889:6791:selectNicer */
3111
- function Text_PrettyPrint_Prettyprinter_Doc_n__8889_6791_selectNicer($0, $1, $2, $3, $4, $5, $6) {
3112
- switch($2($3)($4)(Text_PrettyPrint_Prettyprinter_Doc_n__8889_6790_initialIndentation($0, $1, $2, $6()))($5)) {
3131
+ /* Text.PrettyPrint.Prettyprinter.Doc.8891:6791:selectNicer */
3132
+ function Text_PrettyPrint_Prettyprinter_Doc_n__8891_6791_selectNicer($0, $1, $2, $3, $4, $5, $6) {
3133
+ switch($2($3)($4)(Text_PrettyPrint_Prettyprinter_Doc_n__8891_6790_initialIndentation($0, $1, $2, $6()))($5)) {
3113
3134
  case 1: return $5;
3114
3135
  case 0: return $6();
3115
3136
  }
@@ -3262,7 +3283,7 @@ const Text_PrettyPrint_Prettyprinter_Doc_line = __lazy(function () {
3262
3283
 
3263
3284
  /* Text.PrettyPrint.Prettyprinter.Doc.layoutWadlerLeijen : FittingPredicate ann -> PageWidth -> Doc ann -> SimpleDocStream ann */
3264
3285
  function Text_PrettyPrint_Prettyprinter_Doc_layoutWadlerLeijen($0, $1, $2) {
3265
- return Text_PrettyPrint_Prettyprinter_Doc_n__8889_6792_best($2, $1, $0, 0, 0, {h: 1 /* Cons */, a1: 0, a2: $2, a3: {h: 0 /* Nil */}});
3286
+ return Text_PrettyPrint_Prettyprinter_Doc_n__8891_6792_best($2, $1, $0, 0, 0, {h: 1 /* Cons */, a1: 0, a2: $2, a3: {h: 0 /* Nil */}});
3266
3287
  }
3267
3288
 
3268
3289
  /* Text.PrettyPrint.Prettyprinter.Doc.layoutUnbounded : Doc ann -> SimpleDocStream ann */
@@ -3536,16 +3557,16 @@ function Data_String_with__asList_7968($0, $1) {
3536
3557
  }
3537
3558
  }
3538
3559
 
3539
- /* Data.String.3788:7700:unlines' */
3540
- function Data_String_n__3788_7700_unlinesx27($0) {
3560
+ /* Data.String.3790:7700:unlines' */
3561
+ function Data_String_n__3790_7700_unlinesx27($0) {
3541
3562
  switch($0.h) {
3542
3563
  case 0: /* nil */ return {h: 0};
3543
- case undefined: /* cons */ return {a1: $0.a1, a2: {a1: '\n', a2: Data_String_n__3788_7700_unlinesx27($0.a2)}};
3564
+ case undefined: /* cons */ return {a1: $0.a1, a2: {a1: '\n', a2: Data_String_n__3790_7700_unlinesx27($0.a2)}};
3544
3565
  }
3545
3566
  }
3546
3567
 
3547
- /* Data.String.4392:8313:parsePosTrimmed */
3548
- function Data_String_n__4392_8313_parsePosTrimmed($0, $1, $2) {
3568
+ /* Data.String.4394:8313:parsePosTrimmed */
3569
+ function Data_String_n__4394_8313_parsePosTrimmed($0, $1, $2) {
3549
3570
  return Data_String_with__parsePositivex2cparsePosTrimmed_8319(undefined, $0, $2, $2, Data_String_strM($2));
3550
3571
  }
3551
3572
 
@@ -3590,7 +3611,7 @@ function Data_String_replicate($0, $1) {
3590
3611
 
3591
3612
  /* Data.String.parsePositive : Num a => String -> Maybe a */
3592
3613
  function Data_String_parsePositive($0, $1) {
3593
- return Data_String_n__4392_8313_parsePosTrimmed($0, $1, Data_String_trim($1));
3614
+ return Data_String_n__4394_8313_parsePosTrimmed($0, $1, Data_String_trim($1));
3594
3615
  }
3595
3616
 
3596
3617
  /* Data.String.ltrim : String -> String */
@@ -3600,7 +3621,7 @@ function Data_String_ltrim($0) {
3600
3621
 
3601
3622
  /* Data.String.lines' : List Char -> List (List Char) */
3602
3623
  function Data_String_linesx27($0) {
3603
- return Data_String_n__3921_7830_linesHelp($0, {h: 0}, $0);
3624
+ return Data_String_n__3923_7830_linesHelp($0, {h: 0}, $0);
3604
3625
  }
3605
3626
 
3606
3627
  /* Data.String.lines : String -> List String */
@@ -3625,7 +3646,7 @@ function Data_String_indent($0, $1) {
3625
3646
 
3626
3647
  /* Data.String.fastUnlines : List String -> String */
3627
3648
  function Data_String_fastUnlines($0) {
3628
- return Prelude_Types_fastConcat(Data_String_n__3788_7700_unlinesx27($0));
3649
+ return Prelude_Types_fastConcat(Data_String_n__3790_7700_unlinesx27($0));
3629
3650
  }
3630
3651
 
3631
3652
  /* Data.String.break : (Char -> Bool) -> String -> (String, String) */
@@ -4611,6 +4632,14 @@ function Prelude_Interfaces_Bool_Semigroup_x3cx2bx3e_Semigroup_AnyBool($0, $1) {
4611
4632
  }
4612
4633
  }
4613
4634
 
4635
+ /* Prelude.Interfaces.Bool.Semigroup.<+> */
4636
+ function Prelude_Interfaces_Bool_Semigroup_x3cx2bx3e_Semigroup_AllBool($0, $1) {
4637
+ switch($0) {
4638
+ case 1: return $1;
4639
+ case 0: return 0;
4640
+ }
4641
+ }
4642
+
4614
4643
  /* Prelude.Interfaces.Applicative.<*> */
4615
4644
  function Prelude_Interfaces_Applicative_x3cx2ax3e_Applicative_Composex28x28x2ex20x24fx29x20x24gx29($0, $1, $2, $3) {
4616
4645
  return $0.a3(undefined)(undefined)($0.a3(undefined)(undefined)($0.a2(undefined)($19 => $1a => $1.a3(undefined)(undefined)($19)($1a)))($2))($3);
@@ -4649,8 +4678,8 @@ function Prelude_Interfaces_x2ax3e($0, $1, $2) {
4649
4678
  return $4($2);
4650
4679
  }
4651
4680
 
4652
- /* Prelude.Show.2437:11783:asciiTab */
4653
- function Prelude_Show_n__2437_11783_asciiTab($0) {
4681
+ /* Prelude.Show.2437:11789:asciiTab */
4682
+ function Prelude_Show_n__2437_11789_asciiTab($0) {
4654
4683
  return {a1: 'NUL', a2: {a1: 'SOH', a2: {a1: 'STX', a2: {a1: 'ETX', a2: {a1: 'EOT', a2: {a1: 'ENQ', a2: {a1: 'ACK', a2: {a1: 'BEL', a2: {a1: 'BS', a2: {a1: 'HT', a2: {a1: 'LF', a2: {a1: 'VT', a2: {a1: 'FF', a2: {a1: 'CR', a2: {a1: 'SO', a2: {a1: 'SI', a2: {a1: 'DLE', a2: {a1: 'DC1', a2: {a1: 'DC2', a2: {a1: 'DC3', a2: {a1: 'DC4', a2: {a1: 'NAK', a2: {a1: 'SYN', a2: {a1: 'ETB', a2: {a1: 'CAN', a2: {a1: 'EM', a2: {a1: 'SUB', a2: {a1: 'ESC', a2: {a1: 'FS', a2: {a1: 'GS', a2: {a1: 'RS', a2: {a1: 'US', a2: {h: 0}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}};
4655
4684
  }
4656
4685
 
@@ -4694,7 +4723,7 @@ function Prelude_Show_show_Show_Bits32($0) {
4694
4723
 
4695
4724
  /* Prelude.Show.show */
4696
4725
  function Prelude_Show_show_Show_x28Listx20x24ax29($0, $1) {
4697
- return ('['+(Prelude_Show_n__3219_12504_showx27($0, $1, '', $1)+']'));
4726
+ return ('['+(Prelude_Show_n__3219_12510_showx27($0, $1, '', $1)+']'));
4698
4727
  }
4699
4728
 
4700
4729
  /* Prelude.Show.showPrec */
@@ -4778,7 +4807,7 @@ function Prelude_Show_showLitChar($0) {
4778
4807
  case '\u{5c}': return $23 => ('\u{5c}\u{5c}'+$23);
4779
4808
  default: {
4780
4809
  return $26 => {
4781
- const $27 = Prelude_Types_getAt(Prelude_Types_prim__integerToNat(BigInt($0.codePointAt(0))), Prelude_Show_n__2437_11783_asciiTab($0));
4810
+ const $27 = Prelude_Types_getAt(Prelude_Types_prim__integerToNat(BigInt($0.codePointAt(0))), Prelude_Show_n__2437_11789_asciiTab($0));
4782
4811
  switch($27.h) {
4783
4812
  case undefined: /* just */ return ('\u{5c}'+($27.a1+$26));
4784
4813
  case 0: /* nothing */ {
@@ -4884,22 +4913,14 @@ function Data_Nat_succNotLTEzero($0) {
4884
4913
  _crashExp('No clauses');
4885
4914
  }
4886
4915
 
4887
- /* Data.Nat.plusZeroRightNeutral : (left : Nat) -> left + 0 = left */
4888
- function Data_Nat_plusZeroRightNeutral($0) {
4889
- switch($0) {
4890
- case 0n: return undefined;
4891
- default: return undefined;
4892
- }
4893
- }
4894
-
4895
4916
  /* Data.Nat.plusMinusLte : (n : Nat) -> (m : Nat) -> LTE n m -> minus m n + n = m */
4896
4917
  function Data_Nat_plusMinusLte($0, $1, $2) {
4897
4918
  switch($0) {
4898
- case 0n: return Data_Nat_plusZeroRightNeutral($1);
4919
+ case 0n: return Syntax_PreorderReasoning_Calc(csegen_174());
4899
4920
  default: {
4900
4921
  switch($1) {
4901
- case 0n: return Prelude_Uninhabited_absurd($9 => Data_Nat_uninhabited_Uninhabited_x28x28LTEx20x28Sx20x24nx29x29x20Zx29($9), $2);
4902
- default: return undefined;
4922
+ case 0n: return Prelude_Uninhabited_absurd($a => Data_Nat_uninhabited_Uninhabited_x28x28LTEx20x28Sx20x24nx29x29x20Zx29($a), $2);
4923
+ default: return Syntax_PreorderReasoning_Calc({a1: csegen_174(), a2: undefined});
4903
4924
  }
4904
4925
  }
4905
4926
  }
@@ -5070,17 +5091,17 @@ function Data_List1_x2bx2b($0, $1) {
5070
5091
  return Data_List1_appendl($0, Data_List1_forget($1));
5071
5092
  }
5072
5093
 
5073
- /* Data.List.7261:6698:split */
5074
- function Data_List_n__7261_6698_split($0, $1, $2) {
5075
- return Data_List_n__7261_6697_splitRec($0, $1, $2, $2, $9 => $9);
5094
+ /* Data.List.7716:6698:split */
5095
+ function Data_List_n__7716_6698_split($0, $1, $2) {
5096
+ return Data_List_n__7716_6697_splitRec($0, $1, $2, $2, $9 => $9);
5076
5097
  }
5077
5098
 
5078
- /* Data.List.7760:7190:go */
5079
- function Data_List_n__7760_7190_go($0, $1, $2, $3, $4) {
5099
+ /* Data.List.8215:7190:go */
5100
+ function Data_List_n__8215_7190_go($0, $1, $2, $3, $4) {
5080
5101
  switch($4.h) {
5081
5102
  case 0: /* nil */ return {a1: Data_List1_singleton($3), a2: {h: 0}};
5082
5103
  case undefined: /* cons */ {
5083
- const $a = Data_List_n__7760_7190_go($0, $1, $2, $4.a1, $4.a2);
5104
+ const $a = Data_List_n__8215_7190_go($0, $1, $2, $4.a1, $4.a2);
5084
5105
  switch($2($3)($4.a1)) {
5085
5106
  case 1: return {a1: Data_List1_cons($3, $a.a1), a2: $a.a2};
5086
5107
  case 0: return {a1: Data_List1_singleton($3), a2: {a1: $a.a1, a2: $a.a2}};
@@ -5162,13 +5183,13 @@ function Data_List_sortBy($0, $1) {
5162
5183
  switch($1.a2.h) {
5163
5184
  case 0: /* nil */ return {a1: $1.a1, a2: {h: 0}};
5164
5185
  default: {
5165
- const $6 = Data_List_n__7261_6698_split($1, $0, $1);
5186
+ const $6 = Data_List_n__7716_6698_split($1, $0, $1);
5166
5187
  return Data_List_mergeBy($0, Data_List_sortBy($0, $6.a1), Data_List_sortBy($0, $6.a2));
5167
5188
  }
5168
5189
  }
5169
5190
  }
5170
5191
  default: {
5171
- const $15 = Data_List_n__7261_6698_split($1, $0, $1);
5192
+ const $15 = Data_List_n__7716_6698_split($1, $0, $1);
5172
5193
  return Data_List_mergeBy($0, Data_List_sortBy($0, $15.a1), Data_List_sortBy($0, $15.a2));
5173
5194
  }
5174
5195
  }
@@ -5212,7 +5233,7 @@ function Data_List_partition($0, $1) {
5212
5233
 
5213
5234
  /* Data.List.nubBy : (a -> a -> Bool) -> List a -> List a */
5214
5235
  function Data_List_nubBy($0, $1) {
5215
- return Data_List_n__4413_3930_nubByx27({h: 0}, $0, $1);
5236
+ return Data_List_n__4868_3930_nubByx27({h: 0}, $0, $1);
5216
5237
  }
5217
5238
 
5218
5239
  /* Data.List.nub : Eq a => List a -> List a */
@@ -5300,7 +5321,7 @@ function Data_List_groupBy($0, $1) {
5300
5321
  switch($1.h) {
5301
5322
  case 0: /* nil */ return {h: 0};
5302
5323
  case undefined: /* cons */ {
5303
- const $3 = Data_List_n__7760_7190_go($1.a1, $1.a2, $0, $1.a1, $1.a2);
5324
+ const $3 = Data_List_n__8215_7190_go($1.a1, $1.a2, $0, $1.a1, $1.a2);
5304
5325
  return {a1: $3.a1, a2: $3.a2};
5305
5326
  }
5306
5327
  }
@@ -5397,8 +5418,8 @@ function Data_IORef_newIORef($0, $1) {
5397
5418
  return $0.a1.a2(undefined)(undefined)($0.a2(undefined)($10 => ({value:$1})))(m => $0.a1.a1.a2(undefined)(m));
5398
5419
  }
5399
5420
 
5400
- /* Control.ANSI.SGR.3283:2726:toCode */
5401
- function Control_ANSI_SGR_n__3283_2726_toCode($0, $1) {
5421
+ /* Control.ANSI.SGR.3285:2726:toCode */
5422
+ function Control_ANSI_SGR_n__3285_2726_toCode($0, $1) {
5402
5423
  switch($1.h) {
5403
5424
  case 0: /* Reset */ return '0';
5404
5425
  case 1: /* SetForeground */ return ('38;5;'+Control_ANSI_SGR_cast_Cast_Color_String($1.a1));
@@ -5456,7 +5477,7 @@ function Control_ANSI_SGR_cast_Cast_Blink_String($0) {
5456
5477
 
5457
5478
  /* Control.ANSI.SGR.escapeSGR : List SGR -> String */
5458
5479
  function Control_ANSI_SGR_escapeSGR($0) {
5459
- return ('\u{1b}['+(Prelude_Types_foldMap_Foldable_List(csegen_70(), $8 => $8, Data_List_intersperse(';', csegen_116()($11 => Control_ANSI_SGR_n__3283_2726_toCode($0, $11))($0)))+'m'));
5480
+ return ('\u{1b}['+(Prelude_Types_foldMap_Foldable_List(csegen_70(), $8 => $8, Data_List_intersperse(';', csegen_116()($11 => Control_ANSI_SGR_n__3285_2726_toCode($0, $11))($0)))+'m'));
5460
5481
  }
5461
5482
 
5462
5483
  /* Text.PrettyPrint.Prettyprinter.Symbols.rparen : Doc ann */
@@ -5545,14 +5566,14 @@ function System_File_ReadWrite_readLinesOnto($0, $1, $2, $3, $4) {
5545
5566
  }
5546
5567
  };
5547
5568
  const $26 = {a1: $27, a2: a => $2f => ({h: 1 /* Right */, a1: $2f}), a3: $31};
5548
- const $25 = {a1: $26, a2: csegen_196(), a3: csegen_197()};
5569
+ const $25 = {a1: $26, a2: csegen_200(), a3: csegen_201()};
5549
5570
  const $40 = b => a => func => $41 => {
5550
5571
  switch($41.h) {
5551
5572
  case 0: /* Left */ return {h: 0 /* Left */, a1: $41.a1};
5552
5573
  case 1: /* Right */ return {h: 1 /* Right */, a1: func($41.a1)};
5553
5574
  }
5554
5575
  };
5555
- const $3f = {a1: $40, a2: csegen_213(), a3: csegen_217()};
5576
+ const $3f = {a1: $40, a2: csegen_217(), a3: csegen_221()};
5556
5577
  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));
5557
5578
  }
5558
5579
  default: {
@@ -5833,7 +5854,7 @@ const System_Info_os = __lazy(function () {
5833
5854
 
5834
5855
  /* System.Info.isWindows : Bool */
5835
5856
  const System_Info_isWindows = __lazy(function () {
5836
- return Prelude_Types_elem(csegen_189(), csegen_45(), System_Info_os(), {a1: 'windows', a2: {a1: 'mingw32', a2: {a1: 'cygwin32', a2: {h: 0}}}});
5857
+ return Prelude_Types_elem(csegen_193(), csegen_45(), System_Info_os(), {a1: 'windows', a2: {a1: 'mingw32', a2: {a1: 'cygwin32', a2: {h: 0}}}});
5837
5858
  });
5838
5859
 
5839
5860
  /* Data.Fuel.limit : Nat -> Fuel */
@@ -5995,7 +6016,7 @@ function System_getEnv($0, $1) {
5995
6016
  function System_getArgs($0) {
5996
6017
  const $12 = n => {
5997
6018
  switch(Prelude_EqOrd_x3e_Ord_Int(n, Number(_truncBigInt32(0n)))) {
5998
- 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_231(), a2: $29 => $2a => Prelude_Num_div_Integral_Int($29, $2a), a3: $2f => $30 => Prelude_Num_mod_Integral_Int($2f, $30)}, a2: {a1: csegen_245(), a2: {a1: csegen_231(), a2: $3b => _sub32s(0, $3b), a3: $3f => $40 => _sub32s($3f, $40)}}}, 0, _sub32s(n, 1)), $48 => $0.a2(undefined)($4e => System_prim__getArg($48, $4e)));
6019
+ 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_235(), a2: $29 => $2a => Prelude_Num_div_Integral_Int($29, $2a), a3: $2f => $30 => Prelude_Num_mod_Integral_Int($2f, $30)}, a2: {a1: csegen_249(), a2: {a1: csegen_235(), a2: $3b => _sub32s(0, $3b), a3: $3f => $40 => _sub32s($3f, $40)}}}, 0, _sub32s(n, 1)), $48 => $0.a2(undefined)($4e => System_prim__getArg($48, $4e)));
5999
6020
  case 0: return $0.a1.a1.a2(undefined)({h: 0});
6000
6021
  }
6001
6022
  };
@@ -6065,17 +6086,17 @@ function Text_Bounded_mergeBounds($0, $1) {
6065
6086
  switch($1.h) {
6066
6087
  case undefined: /* record */ {
6067
6088
  switch($1.a2) {
6068
- case 1: return csegen_254()($e => $1.a1)($0);
6089
+ case 1: return csegen_258()($e => $1.a1)($0);
6069
6090
  default: {
6070
- const $10 = Prelude_EqOrd_min_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_245(), csegen_245(), Text_Bounded_start($0), Text_Bounded_start($1));
6071
- const $1c = Prelude_EqOrd_max_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_245(), csegen_245(), Text_Bounded_end($0), Text_Bounded_end($1));
6091
+ const $10 = Prelude_EqOrd_min_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_249(), csegen_249(), Text_Bounded_start($0), Text_Bounded_start($1));
6092
+ const $1c = Prelude_EqOrd_max_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_249(), csegen_249(), Text_Bounded_end($0), Text_Bounded_end($1));
6072
6093
  return {a1: $1.a1, a2: 0, a3: {a1: $10.a1, a2: $10.a2, a3: $1c.a1, a4: $1c.a2}};
6073
6094
  }
6074
6095
  }
6075
6096
  }
6076
6097
  default: {
6077
- const $30 = Prelude_EqOrd_min_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_245(), csegen_245(), Text_Bounded_start($0), Text_Bounded_start($1));
6078
- const $3c = Prelude_EqOrd_max_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_245(), csegen_245(), Text_Bounded_end($0), Text_Bounded_end($1));
6098
+ const $30 = Prelude_EqOrd_min_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_249(), csegen_249(), Text_Bounded_start($0), Text_Bounded_start($1));
6099
+ const $3c = Prelude_EqOrd_max_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_249(), csegen_249(), Text_Bounded_end($0), Text_Bounded_end($1));
6079
6100
  return {a1: $1.a1, a2: 0, a3: {a1: $30.a1, a2: $30.a2, a3: $3c.a1, a4: $3c.a2}};
6080
6101
  }
6081
6102
  }
@@ -6086,17 +6107,17 @@ function Text_Bounded_mergeBounds($0, $1) {
6086
6107
  switch($1.h) {
6087
6108
  case undefined: /* record */ {
6088
6109
  switch($1.a2) {
6089
- case 1: return csegen_254()($56 => $1.a1)($0);
6110
+ case 1: return csegen_258()($56 => $1.a1)($0);
6090
6111
  default: {
6091
- const $58 = Prelude_EqOrd_min_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_245(), csegen_245(), Text_Bounded_start($0), Text_Bounded_start($1));
6092
- const $64 = Prelude_EqOrd_max_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_245(), csegen_245(), Text_Bounded_end($0), Text_Bounded_end($1));
6112
+ const $58 = Prelude_EqOrd_min_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_249(), csegen_249(), Text_Bounded_start($0), Text_Bounded_start($1));
6113
+ const $64 = Prelude_EqOrd_max_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_249(), csegen_249(), Text_Bounded_end($0), Text_Bounded_end($1));
6093
6114
  return {a1: $1.a1, a2: 0, a3: {a1: $58.a1, a2: $58.a2, a3: $64.a1, a4: $64.a2}};
6094
6115
  }
6095
6116
  }
6096
6117
  }
6097
6118
  default: {
6098
- const $78 = Prelude_EqOrd_min_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_245(), csegen_245(), Text_Bounded_start($0), Text_Bounded_start($1));
6099
- const $84 = Prelude_EqOrd_max_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_245(), csegen_245(), Text_Bounded_end($0), Text_Bounded_end($1));
6119
+ const $78 = Prelude_EqOrd_min_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_249(), csegen_249(), Text_Bounded_start($0), Text_Bounded_start($1));
6120
+ const $84 = Prelude_EqOrd_max_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_249(), csegen_249(), Text_Bounded_end($0), Text_Bounded_end($1));
6100
6121
  return {a1: $1.a1, a2: 0, a3: {a1: $78.a1, a2: $78.a2, a3: $84.a1, a4: $84.a2}};
6101
6122
  }
6102
6123
  }
@@ -6119,8 +6140,8 @@ function Text_Bounded_end($0) {
6119
6140
  return Text_Bounded_endBounds($0.a3);
6120
6141
  }
6121
6142
 
6122
- /* Language.JSON.Data.4777:7913:stringifyValues */
6123
- function Language_JSON_Data_n__4777_7913_stringifyValues($0, $1) {
6143
+ /* Language.JSON.Data.5292:7913:stringifyValues */
6144
+ function Language_JSON_Data_n__5292_7913_stringifyValues($0, $1) {
6124
6145
  switch($1.h) {
6125
6146
  case 0: /* nil */ return '';
6126
6147
  case undefined: /* cons */ {
@@ -6131,7 +6152,7 @@ function Language_JSON_Data_n__4777_7913_stringifyValues($0, $1) {
6131
6152
  break;
6132
6153
  }
6133
6154
  case 0: {
6134
- $6 = (','+Language_JSON_Data_n__4777_7913_stringifyValues($0, $1.a2));
6155
+ $6 = (','+Language_JSON_Data_n__5292_7913_stringifyValues($0, $1.a2));
6135
6156
  break;
6136
6157
  }
6137
6158
  }
@@ -6140,8 +6161,8 @@ function Language_JSON_Data_n__4777_7913_stringifyValues($0, $1) {
6140
6161
  }
6141
6162
  }
6142
6163
 
6143
- /* Language.JSON.Data.4777:7958:stringifyProps */
6144
- function Language_JSON_Data_n__4777_7958_stringifyProps($0, $1) {
6164
+ /* Language.JSON.Data.5292:7958:stringifyProps */
6165
+ function Language_JSON_Data_n__5292_7958_stringifyProps($0, $1) {
6145
6166
  switch($1.h) {
6146
6167
  case 0: /* nil */ return '';
6147
6168
  case undefined: /* cons */ {
@@ -6152,27 +6173,27 @@ function Language_JSON_Data_n__4777_7958_stringifyProps($0, $1) {
6152
6173
  break;
6153
6174
  }
6154
6175
  case 0: {
6155
- $7 = (','+Language_JSON_Data_n__4777_7958_stringifyProps($0, $1.a2));
6176
+ $7 = (','+Language_JSON_Data_n__5292_7958_stringifyProps($0, $1.a2));
6156
6177
  break;
6157
6178
  }
6158
6179
  }
6159
- return (Language_JSON_Data_n__4777_7957_stringifyProp($0, $1.a1)+$7);
6180
+ return (Language_JSON_Data_n__5292_7957_stringifyProp($0, $1.a1)+$7);
6160
6181
  }
6161
6182
  }
6162
6183
  }
6163
6184
 
6164
- /* Language.JSON.Data.4777:7957:stringifyProp */
6165
- function Language_JSON_Data_n__4777_7957_stringifyProp($0, $1) {
6185
+ /* Language.JSON.Data.5292:7957:stringifyProp */
6186
+ function Language_JSON_Data_n__5292_7957_stringifyProp($0, $1) {
6166
6187
  return (Language_JSON_Data_showString($1.a1)+(':'+Language_JSON_Data_stringify($1.a2)));
6167
6188
  }
6168
6189
 
6169
- /* Language.JSON.Data.5041:8158:formatValues */
6170
- function Language_JSON_Data_n__5041_8158_formatValues($0, $1, $2, $3, $4, $5, $6, $7, $8, $9) {
6190
+ /* Language.JSON.Data.5556:8158:formatValues */
6191
+ function Language_JSON_Data_n__5556_8158_formatValues($0, $1, $2, $3, $4, $5, $6, $7, $8, $9) {
6171
6192
  const $13 = {a1: $4, a2: $3};
6172
6193
  let $12;
6173
6194
  switch($8.a2.h) {
6174
6195
  case undefined: /* cons */ {
6175
- $12 = (',\n'+Language_JSON_Data_n__5041_8158_formatValues($0, $1, $2, $3, $4, $13, $6, $7, $8.a2, undefined));
6196
+ $12 = (',\n'+Language_JSON_Data_n__5556_8158_formatValues($0, $1, $2, $3, $4, $13, $6, $7, $8.a2, undefined));
6176
6197
  break;
6177
6198
  }
6178
6199
  case 0: /* nil */ {
@@ -6183,20 +6204,20 @@ function Language_JSON_Data_n__5041_8158_formatValues($0, $1, $2, $3, $4, $5, $6
6183
6204
  return (Language_JSON_Data_format(($7+$6), $6, $8.a1)+$12);
6184
6205
  }
6185
6206
 
6186
- /* Language.JSON.Data.5025:8129:formatValue */
6187
- function Language_JSON_Data_n__5025_8129_formatValue($0, $1, $2, $3, $4, $5) {
6207
+ /* Language.JSON.Data.5540:8129:formatValue */
6208
+ function Language_JSON_Data_n__5540_8129_formatValue($0, $1, $2, $3, $4, $5) {
6188
6209
  switch($5.h) {
6189
6210
  case 4: /* JArray */ {
6190
6211
  switch($5.a1.h) {
6191
6212
  case 0: /* nil */ return '[]';
6192
- case undefined: /* cons */ return ('[\n'+(Language_JSON_Data_n__5041_8158_formatValues($0, $1, $2, $5.a1.a2, $5.a1.a1, $5.a1, $4, $3, $5.a1, undefined)+Data_String_indent($3, ']')));
6213
+ case undefined: /* cons */ return ('[\n'+(Language_JSON_Data_n__5556_8158_formatValues($0, $1, $2, $5.a1.a2, $5.a1.a1, $5.a1, $4, $3, $5.a1, undefined)+Data_String_indent($3, ']')));
6193
6214
  default: return Language_JSON_Data_stringify($5);
6194
6215
  }
6195
6216
  }
6196
6217
  case 5: /* JObject */ {
6197
6218
  switch($5.a1.h) {
6198
6219
  case 0: /* nil */ return '{}';
6199
- case undefined: /* cons */ return ('{\n'+(Language_JSON_Data_n__5041_8263_formatProps($0, $1, $2, $5.a1.a2, $5.a1.a1, $5.a1, $4, $3, $5.a1, undefined)+Data_String_indent($3, '}')));
6220
+ case undefined: /* cons */ return ('{\n'+(Language_JSON_Data_n__5556_8263_formatProps($0, $1, $2, $5.a1.a2, $5.a1.a1, $5.a1, $4, $3, $5.a1, undefined)+Data_String_indent($3, '}')));
6200
6221
  default: return Language_JSON_Data_stringify($5);
6201
6222
  }
6202
6223
  }
@@ -6204,13 +6225,13 @@ function Language_JSON_Data_n__5025_8129_formatValue($0, $1, $2, $3, $4, $5) {
6204
6225
  }
6205
6226
  }
6206
6227
 
6207
- /* Language.JSON.Data.5041:8263:formatProps */
6208
- function Language_JSON_Data_n__5041_8263_formatProps($0, $1, $2, $3, $4, $5, $6, $7, $8, $9) {
6228
+ /* Language.JSON.Data.5556:8263:formatProps */
6229
+ function Language_JSON_Data_n__5556_8263_formatProps($0, $1, $2, $3, $4, $5, $6, $7, $8, $9) {
6209
6230
  const $17 = {a1: $4, a2: $3};
6210
6231
  let $16;
6211
6232
  switch($8.a2.h) {
6212
6233
  case undefined: /* cons */ {
6213
- $16 = (',\n'+Language_JSON_Data_n__5041_8263_formatProps($0, $1, $2, $3, $4, $17, $6, $7, $8.a2, undefined));
6234
+ $16 = (',\n'+Language_JSON_Data_n__5556_8263_formatProps($0, $1, $2, $3, $4, $17, $6, $7, $8.a2, undefined));
6214
6235
  break;
6215
6236
  }
6216
6237
  case 0: /* nil */ {
@@ -6218,12 +6239,12 @@ function Language_JSON_Data_n__5041_8263_formatProps($0, $1, $2, $3, $4, $5, $6,
6218
6239
  break;
6219
6240
  }
6220
6241
  }
6221
- return (Language_JSON_Data_n__5041_8262_formatProp($0, $1, $2, $3, $4, $5, $6, $7, $8.a1)+$16);
6242
+ return (Language_JSON_Data_n__5556_8262_formatProp($0, $1, $2, $3, $4, $5, $6, $7, $8.a1)+$16);
6222
6243
  }
6223
6244
 
6224
- /* Language.JSON.Data.5041:8262:formatProp */
6225
- function Language_JSON_Data_n__5041_8262_formatProp($0, $1, $2, $3, $4, $5, $6, $7, $8) {
6226
- return (Data_String_indent(($7+$6), (Language_JSON_Data_showString($8.a1)+': '))+Language_JSON_Data_n__5025_8129_formatValue($0, $1, $2, ($7+$6), $6, $8.a2));
6245
+ /* Language.JSON.Data.5556:8262:formatProp */
6246
+ function Language_JSON_Data_n__5556_8262_formatProp($0, $1, $2, $3, $4, $5, $6, $7, $8) {
6247
+ return (Data_String_indent(($7+$6), (Language_JSON_Data_showString($8.a1)+': '))+Language_JSON_Data_n__5540_8129_formatValue($0, $1, $2, ($7+$6), $6, $8.a2));
6227
6248
  }
6228
6249
 
6229
6250
  /* Language.JSON.Data.show */
@@ -6243,8 +6264,8 @@ function Language_JSON_Data_stringify($0) {
6243
6264
  }
6244
6265
  case 2: /* JNumber */ return Prelude_Show_show_Show_Double($0.a1);
6245
6266
  case 3: /* JString */ return Language_JSON_Data_showString($0.a1);
6246
- case 4: /* JArray */ return ('['+(Language_JSON_Data_n__4777_7913_stringifyValues($0.a1, $0.a1)+']'));
6247
- case 5: /* JObject */ return ('{'+(Language_JSON_Data_n__4777_7958_stringifyProps($0.a1, $0.a1)+'}'));
6267
+ case 4: /* JArray */ return ('['+(Language_JSON_Data_n__5292_7913_stringifyValues($0.a1, $0.a1)+']'));
6268
+ case 5: /* JObject */ return ('{'+(Language_JSON_Data_n__5292_7958_stringifyProps($0.a1, $0.a1)+'}'));
6248
6269
  }
6249
6270
  }
6250
6271
 
@@ -6288,7 +6309,7 @@ function Language_JSON_Data_showChar($0) {
6288
6309
 
6289
6310
  /* Language.JSON.Data.format : {default 0 _ : Nat} -> Nat -> JSON -> String */
6290
6311
  function Language_JSON_Data_format($0, $1, $2) {
6291
- return Data_String_indent($0, Language_JSON_Data_n__5025_8129_formatValue($2, $1, $0, $0, $1, $2));
6312
+ return Data_String_indent($0, Language_JSON_Data_n__5540_8129_formatValue($2, $1, $0, $0, $1, $2));
6292
6313
  }
6293
6314
 
6294
6315
  /* Language.JSON.Data.b16ToHexString : Bits16 -> String */
@@ -6314,24 +6335,66 @@ function Language_JSON_Data_b16ToHexString($0) {
6314
6335
  }
6315
6336
  }
6316
6337
 
6317
- /* Language.JSON.Parser.3662:2407:values */
6318
- const Language_JSON_Parser_n__3662_2407_values = __lazy(function () {
6338
+ /* Data.Vect.reverse : Vect len elem -> Vect len elem */
6339
+ function Data_Vect_reverse($0) {
6340
+ return Data_Vect_reverseOnto({h: 0}, $0);
6341
+ }
6342
+
6343
+ /* Data.Vect.fromList : (xs : List elem) -> Vect (length xs) elem */
6344
+ function Data_Vect_fromList($0) {
6345
+ return Data_Vect_reverse(Data_Vect_fromListx27({h: 0}, $0));
6346
+ }
6347
+
6348
+ /* Decidable.Equality.5871:4214:primitiveNotEq */
6349
+ function Decidable_Equality_n__5871_4214_primitiveNotEq($0, $1, $2, $3) {
6350
+ return undefined;
6351
+ }
6352
+
6353
+ /* Decidable.Equality.5871:4213:primitiveEq */
6354
+ function Decidable_Equality_n__5871_4213_primitiveEq($0, $1, $2) {
6355
+ return undefined;
6356
+ }
6357
+
6358
+ /* Decidable.Equality.decEq */
6359
+ function Decidable_Equality_decEq_DecEq_FromEqx24a($0, $1, $2) {
6360
+ switch($0.a1($1)($2)) {
6361
+ case 1: return {h: 0 /* Yes */, a1: Decidable_Equality_n__5871_4213_primitiveEq($0, $1, $2)};
6362
+ case 0: return {h: 1 /* No */, a1: $f => Decidable_Equality_n__5871_4214_primitiveNotEq($0, $1, $2, $f)};
6363
+ }
6364
+ }
6365
+
6366
+ /* Decidable.Equality.decEq */
6367
+ const Decidable_Equality_decEq_DecEq_Char = __lazy(function () {
6368
+ const $0 = x1 => x2 => Decidable_Equality_decEq_DecEq_FromEqx24a(csegen_132(), x1, x2);
6369
+ return $6 => $7 => $0($6)($7);
6370
+ });
6371
+
6372
+ /* Data.Either.maybeToEither : Lazy e -> Maybe a -> Either e a */
6373
+ function Data_Either_maybeToEither($0, $1) {
6374
+ switch($1.h) {
6375
+ case undefined: /* just */ return {h: 1 /* Right */, a1: $1.a1};
6376
+ case 0: /* nothing */ return {h: 0 /* Left */, a1: $0()};
6377
+ }
6378
+ }
6379
+
6380
+ /* Language.JSON.Parser.3664:2407:values */
6381
+ const Language_JSON_Parser_n__3664_2407_values = __lazy(function () {
6319
6382
  return Text_Parser_sepBy(1, Language_JSON_Parser_punct({h: 0 /* Comma */}), Language_JSON_Parser_json());
6320
6383
  });
6321
6384
 
6322
- /* Language.JSON.Parser.3659:2316:properties */
6323
- const Language_JSON_Parser_n__3659_2316_properties = __lazy(function () {
6385
+ /* Language.JSON.Parser.3661:2316:properties */
6386
+ const Language_JSON_Parser_n__3661_2316_properties = __lazy(function () {
6324
6387
  return Text_Parser_sepBy(1, Language_JSON_Parser_punct({h: 0 /* Comma */}), {h: 8 /* SeqEat */, a1: 1, a2: Language_JSON_Parser_rawString(), a3: () => key => ({h: 10 /* ThenEat */, a1: 1, a2: Language_JSON_Parser_punct({h: 1 /* Colon */}), a3: () => ({h: 8 /* SeqEat */, a1: 0, a2: Language_JSON_Parser_json(), a3: () => value => ({h: 0 /* Empty */, a1: {a1: key, a2: value}})})})});
6325
6388
  });
6326
6389
 
6327
6390
  /* Language.JSON.Parser.string : Grammar state JSONToken True JSON */
6328
6391
  const Language_JSON_Parser_string = __lazy(function () {
6329
- return csegen_264()($4 => ({h: 3 /* JString */, a1: $4}))(Language_JSON_Parser_rawString());
6392
+ return csegen_270()($4 => ({h: 3 /* JString */, a1: $4}))(Language_JSON_Parser_rawString());
6330
6393
  });
6331
6394
 
6332
6395
  /* Language.JSON.Parser.rawString : Grammar state JSONToken True String */
6333
6396
  const Language_JSON_Parser_rawString = __lazy(function () {
6334
- return {h: 8 /* SeqEat */, a1: 0, a2: Text_Parser_match(csegen_268(), csegen_271(), {h: 2 /* JTString */}), a3: () => mstr => {
6397
+ return {h: 8 /* SeqEat */, a1: 0, a2: Text_Parser_match(csegen_274(), csegen_277(), {h: 2 /* JTString */}), a3: () => mstr => {
6335
6398
  switch(mstr.h) {
6336
6399
  case undefined: /* just */ return {h: 0 /* Empty */, a1: mstr.a1};
6337
6400
  case 0: /* nothing */ return {h: 4 /* Fail */, a1: {h: 0}, a2: 0, a3: csegen_62()('invalid string')};
@@ -6341,7 +6404,7 @@ const Language_JSON_Parser_rawString = __lazy(function () {
6341
6404
 
6342
6405
  /* Language.JSON.Parser.punct : Punctuation -> Grammar state JSONToken True () */
6343
6406
  function Language_JSON_Parser_punct($0) {
6344
- return Text_Parser_match(csegen_268(), csegen_271(), {h: 4 /* JTPunct */, a1: $0});
6407
+ return Text_Parser_match(csegen_274(), csegen_277(), {h: 4 /* JTPunct */, a1: $0});
6345
6408
  }
6346
6409
 
6347
6410
  /* Language.JSON.Parser.parseJSON : List (WithBounds JSONToken) -> Maybe JSON */
@@ -6372,17 +6435,17 @@ function Language_JSON_Parser_parseJSON($0) {
6372
6435
 
6373
6436
  /* Language.JSON.Parser.object : Grammar state JSONToken True JSON */
6374
6437
  const Language_JSON_Parser_object = __lazy(function () {
6375
- return {h: 10 /* ThenEat */, a1: 1, a2: Language_JSON_Parser_punct({h: 3 /* Curly */, a1: 0}), a3: () => ({h: 11 /* ThenEmpty */, a1: 0, a2: 1, a3: {h: 6 /* Commit */}, a4: {h: 9 /* SeqEmpty */, a1: 0, a2: 1, a3: Language_JSON_Parser_n__3659_2316_properties(), a4: props => ({h: 10 /* ThenEat */, a1: 0, a2: Language_JSON_Parser_punct({h: 3 /* Curly */, a1: 1}), a3: () => ({h: 0 /* Empty */, a1: {h: 5 /* JObject */, a1: props}})})}})};
6438
+ return {h: 10 /* ThenEat */, a1: 1, a2: Language_JSON_Parser_punct({h: 3 /* Curly */, a1: 0}), a3: () => ({h: 11 /* ThenEmpty */, a1: 0, a2: 1, a3: {h: 6 /* Commit */}, a4: {h: 9 /* SeqEmpty */, a1: 0, a2: 1, a3: Language_JSON_Parser_n__3661_2316_properties(), a4: props => ({h: 10 /* ThenEat */, a1: 0, a2: Language_JSON_Parser_punct({h: 3 /* Curly */, a1: 1}), a3: () => ({h: 0 /* Empty */, a1: {h: 5 /* JObject */, a1: props}})})}})};
6376
6439
  });
6377
6440
 
6378
6441
  /* Language.JSON.Parser.number : Grammar state JSONToken True JSON */
6379
6442
  const Language_JSON_Parser_number = __lazy(function () {
6380
- return csegen_264()($4 => ({h: 2 /* JNumber */, a1: $4}))(Text_Parser_match(csegen_268(), csegen_271(), {h: 1 /* JTNumber */}));
6443
+ return csegen_270()($4 => ({h: 2 /* JNumber */, a1: $4}))(Text_Parser_match(csegen_274(), csegen_277(), {h: 1 /* JTNumber */}));
6381
6444
  });
6382
6445
 
6383
6446
  /* Language.JSON.Parser.null : Grammar state JSONToken True JSON */
6384
6447
  const Language_JSON_Parser_null$ = __lazy(function () {
6385
- return csegen_264()($4 => ({h: 0 /* JNull */}))(Text_Parser_match(csegen_268(), csegen_271(), {h: 3 /* JTNull */}));
6448
+ return csegen_270()($4 => ({h: 0 /* JNull */}))(Text_Parser_match(csegen_274(), csegen_277(), {h: 3 /* JTNull */}));
6386
6449
  });
6387
6450
 
6388
6451
  /* Language.JSON.Parser.json : Grammar state JSONToken True JSON */
@@ -6392,12 +6455,12 @@ const Language_JSON_Parser_json = __lazy(function () {
6392
6455
 
6393
6456
  /* Language.JSON.Parser.boolean : Grammar state JSONToken True JSON */
6394
6457
  const Language_JSON_Parser_boolean = __lazy(function () {
6395
- return csegen_264()($4 => ({h: 1 /* JBoolean */, a1: $4}))(Text_Parser_match(csegen_268(), csegen_271(), {h: 0 /* JTBoolean */}));
6458
+ return csegen_270()($4 => ({h: 1 /* JBoolean */, a1: $4}))(Text_Parser_match(csegen_274(), csegen_277(), {h: 0 /* JTBoolean */}));
6396
6459
  });
6397
6460
 
6398
6461
  /* Language.JSON.Parser.array : Grammar state JSONToken True JSON */
6399
6462
  const Language_JSON_Parser_array = __lazy(function () {
6400
- return {h: 10 /* ThenEat */, a1: 1, a2: Language_JSON_Parser_punct({h: 2 /* Square */, a1: 0}), a3: () => ({h: 11 /* ThenEmpty */, a1: 0, a2: 1, a3: {h: 6 /* Commit */}, a4: {h: 9 /* SeqEmpty */, a1: 0, a2: 1, a3: Language_JSON_Parser_n__3662_2407_values(), a4: vals => ({h: 10 /* ThenEat */, a1: 0, a2: Language_JSON_Parser_punct({h: 2 /* Square */, a1: 1}), a3: () => ({h: 0 /* Empty */, a1: {h: 4 /* JArray */, a1: vals}})})}})};
6463
+ return {h: 10 /* ThenEat */, a1: 1, a2: Language_JSON_Parser_punct({h: 2 /* Square */, a1: 0}), a3: () => ({h: 11 /* ThenEmpty */, a1: 0, a2: 1, a3: {h: 6 /* Commit */}, a4: {h: 9 /* SeqEmpty */, a1: 0, a2: 1, a3: Language_JSON_Parser_n__3664_2407_values(), a4: vals => ({h: 10 /* ThenEat */, a1: 0, a2: Language_JSON_Parser_punct({h: 2 /* Square */, a1: 1}), a3: () => ({h: 0 /* Empty */, a1: {h: 4 /* JArray */, a1: vals}})})}})};
6401
6464
  });
6402
6465
 
6403
6466
  /* Language.JSON.Tokens.tokValue */
@@ -6585,7 +6648,7 @@ function Text_Lexer_opt($0) {
6585
6648
 
6586
6649
  /* Text.Lexer.oneOf : String -> Lexer */
6587
6650
  function Text_Lexer_oneOf($0) {
6588
- return Text_Lexer_Core_pred(x => Prelude_Types_elem(csegen_189(), csegen_132(), x, Prelude_Types_fastUnpack($0)));
6651
+ return Text_Lexer_Core_pred(x => Prelude_Types_elem(csegen_193(), csegen_132(), x, Prelude_Types_fastUnpack($0)));
6589
6652
  }
6590
6653
 
6591
6654
  /* Text.Lexer.non : Lexer -> Lexer */
@@ -6707,8 +6770,8 @@ function Text_Quantity_atLeast($0) {
6707
6770
  return {a1: $0, a2: {h: 0}};
6708
6771
  }
6709
6772
 
6710
- /* Text.Lexer.Core.3740:2500:getCols */
6711
- function Text_Lexer_Core_n__3740_2500_getCols($0, $1, $2, $3, $4, $5, $6, $7) {
6773
+ /* Text.Lexer.Core.3742:2500:getCols */
6774
+ function Text_Lexer_Core_n__3742_2500_getCols($0, $1, $2, $3, $4, $5, $6, $7) {
6712
6775
  const $8 = Data_List_span($b => Prelude_EqOrd_x2fx3d_Eq_Char($b, '\n'), $6);
6713
6776
  switch($8.a2.h) {
6714
6777
  case 0: /* nil */ return _add32s($7, Number(_truncBigInt32(Prelude_Types_List_lengthTR($8.a1))));
@@ -6716,8 +6779,8 @@ function Text_Lexer_Core_n__3740_2500_getCols($0, $1, $2, $3, $4, $5, $6, $7) {
6716
6779
  }
6717
6780
  }
6718
6781
 
6719
- /* Text.Lexer.Core.3740:2499:countNLs */
6720
- function Text_Lexer_Core_n__3740_2499_countNLs($0, $1, $2, $3, $4, $5, $6) {
6782
+ /* Text.Lexer.Core.3742:2499:countNLs */
6783
+ function Text_Lexer_Core_n__3742_2499_countNLs($0, $1, $2, $3, $4, $5, $6) {
6721
6784
  return Prelude_Types_List_lengthTR(Prelude_Types_List_filterAppend({h: 0}, $c => Prelude_EqOrd_x3dx3d_Eq_Char($c, '\n'), $6));
6722
6785
  }
6723
6786
 
@@ -6794,8 +6857,8 @@ function Text_Lexer_Core_x3cx7cx3e($0, $1) {
6794
6857
  return {h: 7 /* Alt */, a1: $0, a2: $1};
6795
6858
  }
6796
6859
 
6797
- /* Language.JSON.String.Tokens.3288:1166:hexVal */
6798
- function Language_JSON_String_Tokens_n__3288_1166_hexVal($0, $1) {
6860
+ /* Language.JSON.String.Tokens.3290:1166:hexVal */
6861
+ function Language_JSON_String_Tokens_n__3290_1166_hexVal($0, $1) {
6799
6862
  switch(Prelude_EqOrd_x3ex3d_Ord_Char($1, 'A')) {
6800
6863
  case 1: return _add32s(_sub32s(_truncInt32($1.codePointAt(0)), _truncInt32('A'.codePointAt(0))), 10);
6801
6864
  case 0: return _sub32s(_truncInt32($1.codePointAt(0)), _truncInt32('0'.codePointAt(0)));
@@ -6863,7 +6926,7 @@ function Language_JSON_String_Tokens_x2fx3d_Eq_JSONStringTokenKind($0, $1) {
6863
6926
 
6864
6927
  /* Language.JSON.String.Tokens.unicodeEscapeValue : String -> Char */
6865
6928
  function Language_JSON_String_Tokens_unicodeEscapeValue($0) {
6866
- return Language_JSON_String_Tokens_n__3288_1167_fromHex($0, Data_List_drop(2n, Prelude_Types_fastUnpack($0)), 0);
6929
+ return Language_JSON_String_Tokens_n__3290_1167_fromHex($0, Data_List_drop(2n, Prelude_Types_fastUnpack($0)), 0);
6867
6930
  }
6868
6931
 
6869
6932
  /* Language.JSON.String.Tokens.simpleEscapeValue : String -> Char */
@@ -6898,12 +6961,12 @@ function Language_JSON_String_Tokens_charValue($0) {
6898
6961
 
6899
6962
  /* Language.JSON.String.Parser.stringChar : Grammar state JSONStringToken True Char */
6900
6963
  const Language_JSON_String_Parser_stringChar = __lazy(function () {
6901
- return {h: 12 /* Alt */, a1: 1, a2: 1, a3: Text_Parser_match(csegen_313(), csegen_316(), 1), a4: () => ({h: 12 /* Alt */, a1: 1, a2: 1, a3: Text_Parser_match(csegen_313(), csegen_316(), 2), a4: () => Text_Parser_match(csegen_313(), csegen_316(), 3)})};
6964
+ return {h: 12 /* Alt */, a1: 1, a2: 1, a3: Text_Parser_match(csegen_319(), csegen_322(), 1), a4: () => ({h: 12 /* Alt */, a1: 1, a2: 1, a3: Text_Parser_match(csegen_319(), csegen_322(), 2), a4: () => Text_Parser_match(csegen_319(), csegen_322(), 3)})};
6902
6965
  });
6903
6966
 
6904
6967
  /* Language.JSON.String.Parser.quotedString : Grammar state JSONStringToken True String */
6905
6968
  const Language_JSON_String_Parser_quotedString = __lazy(function () {
6906
- const $0 = Text_Parser_match(csegen_313(), csegen_316(), 0);
6969
+ const $0 = Text_Parser_match(csegen_319(), csegen_322(), 0);
6907
6970
  return {h: 8 /* SeqEat */, a1: 0, a2: Text_Parser_between(0, $0, $0, Text_Parser_many(Language_JSON_String_Parser_stringChar())), a3: () => chars => ({h: 11 /* ThenEmpty */, a1: 0, a2: 0, a3: {h: 3 /* EOF */}, a4: {h: 0 /* Empty */, a1: Prelude_Types_fastPack(chars)}})};
6908
6971
  });
6909
6972
 
@@ -6950,7 +7013,7 @@ function Text_Parser_sepBy1($0, $1, $2) {
6950
7013
  const $42 = $43($41);
6951
7014
  return $42($2);
6952
7015
  };
6953
- const $39 = {h: 9 /* SeqEmpty */, a1: 1, a2: $0, a3: csegen_335()($1), a4: $40};
7016
+ const $39 = {h: 9 /* SeqEmpty */, a1: 1, a2: $0, a3: csegen_341()($1), a4: $40};
6954
7017
  const $37 = Text_Parser_many($39);
6955
7018
  return $24($37);
6956
7019
  };
@@ -6988,7 +7051,7 @@ function Text_Parser_match($0, $1, $2) {
6988
7051
 
6989
7052
  /* Text.Parser.many : Grammar state tok True a -> Grammar state tok False (List a) */
6990
7053
  function Text_Parser_many($0) {
6991
- return Text_Parser_option(1, {h: 0}, csegen_264()($9 => Data_List1_forget($9))(Text_Parser_some($0)));
7054
+ return Text_Parser_option(1, {h: 0}, csegen_270()($9 => Data_List1_forget($9))(Text_Parser_some($0)));
6992
7055
  }
6993
7056
 
6994
7057
  /* Text.Parser.between : Grammar state tok True l -> Grammar state tok True r -> Grammar state tok c a -> Grammar state tok True a */
@@ -6999,16 +7062,16 @@ function Text_Parser_between($0, $1, $2, $3) {
6999
7062
  const $15 = $16(f);
7000
7063
  return $15($3);
7001
7064
  };
7002
- const $d = {h: 9 /* SeqEmpty */, a1: 1, a2: $0, a3: csegen_335()($1), a4: $14};
7003
- const $6 = csegen_334()($b => $c => $b)($d);
7004
- return {h: 9 /* SeqEmpty */, a1: 1, a2: 1, a3: $6, a4: f => csegen_334()(f)($2)};
7065
+ const $d = {h: 9 /* SeqEmpty */, a1: 1, a2: $0, a3: csegen_341()($1), a4: $14};
7066
+ const $6 = csegen_340()($b => $c => $b)($d);
7067
+ return {h: 9 /* SeqEmpty */, a1: 1, a2: 1, a3: $6, a4: f => csegen_340()(f)($2)};
7005
7068
  }
7006
7069
 
7007
7070
  /* Text.Parser.Core.case block in doParse */
7008
7071
  function Text_Parser_Core_case__doParse_5194($0, $1, $2, $3, $4, $5) {
7009
7072
  switch($5.h) {
7010
7073
  case 0: /* Failure */ return {h: 0 /* Failure */, a1: $5.a1, a2: $5.a2, a3: $5.a3};
7011
- case 1: /* Res */ return {h: 1 /* Res */, a1: $5.a1, a2: $5.a2, a3: csegen_341()($11 => $5.a3)($5.a3), a4: $5.a4};
7074
+ case 1: /* Res */ return {h: 1 /* Res */, a1: $5.a1, a2: $5.a2, a3: csegen_347()($11 => $5.a3)($5.a3), a4: $5.a4};
7012
7075
  }
7013
7076
  }
7014
7077
 
@@ -7768,12 +7831,12 @@ function Text_Parser_Core_doParse($0, $1, $2, $3, $4) {
7768
7831
  case 7: /* MustWork */ return Text_Parser_Core_case__doParse_4048($0, $1, $3.a1, $4, $2, Text_Parser_Core_doParse($0, $1, $2, $3.a1, $4));
7769
7832
  case 1: /* Terminal */ {
7770
7833
  switch($4.h) {
7771
- case 0: /* nil */ return {h: 0 /* Failure */, a1: $2, a2: 0, a3: csegen_346()};
7834
+ case 0: /* nil */ return {h: 0 /* Failure */, a1: $2, a2: 0, a3: csegen_352()};
7772
7835
  case undefined: /* cons */ {
7773
7836
  const $44 = $3.a2($4.a1.a1);
7774
7837
  switch($44.h) {
7775
7838
  case 0: /* nothing */ return {h: 0 /* Failure */, a1: $2, a2: 0, a3: {a1: {a1: $3.a1, a2: {a1: $4.a1.a3}}, a2: {h: 0}}};
7776
- case undefined: /* just */ return {h: 1 /* Res */, a1: $1, a2: $2, a3: csegen_341()($58 => $44.a1)($4.a1), a4: $4.a2};
7839
+ case undefined: /* just */ return {h: 1 /* Res */, a1: $1, a2: $2, a3: csegen_347()($58 => $44.a1)($4.a1), a4: $4.a2};
7777
7840
  }
7778
7841
  }
7779
7842
  }
@@ -7786,7 +7849,7 @@ function Text_Parser_Core_doParse($0, $1, $2, $3, $4) {
7786
7849
  }
7787
7850
  case 2: /* NextIs */ {
7788
7851
  switch($4.h) {
7789
- case 0: /* nil */ return {h: 0 /* Failure */, a1: $2, a2: 0, a3: csegen_346()};
7852
+ case 0: /* nil */ return {h: 0 /* Failure */, a1: $2, a2: 0, a3: csegen_352()};
7790
7853
  case undefined: /* cons */ {
7791
7854
  switch($3.a2($4.a1.a1)) {
7792
7855
  case 1: return {h: 1 /* Res */, a1: $1, a2: $2, a3: Text_Bounded_removeIrrelevance($4.a1), a4: {a1: $4.a1, a2: $4.a2}};
@@ -7815,7 +7878,7 @@ function Text_Parser_Core_doParse($0, $1, $2, $3, $4) {
7815
7878
  case 13: /* Bounds */ return Text_Parser_Core_case__doParse_5194($0, $1, $3.a1, $4, $2, Text_Parser_Core_doParse($0, $1, $2, $3.a1, $4));
7816
7879
  case 14: /* Position */ {
7817
7880
  switch($4.h) {
7818
- case 0: /* nil */ return {h: 0 /* Failure */, a1: $2, a2: 0, a3: csegen_346()};
7881
+ case 0: /* nil */ return {h: 0 /* Failure */, a1: $2, a2: 0, a3: csegen_352()};
7819
7882
  case undefined: /* cons */ return {h: 1 /* Res */, a1: $1, a2: $2, a3: Text_Bounded_irrelevantBounds($4.a1.a3), a4: {a1: $4.a1, a2: $4.a2}};
7820
7883
  }
7821
7884
  }
@@ -7921,51 +7984,51 @@ const Language_JSON_Lexer_jsonTokenMap = __lazy(function () {
7921
7984
  return Text_Lexer_toTokenMap()({a1: {a1: Text_Lexer_spaces(), a2: {h: 5 /* JTIgnore */}}, a2: {a1: {a1: Text_Lexer_is(','), a2: {h: 4 /* JTPunct */, a1: {h: 0 /* Comma */}}}, a2: {a1: {a1: Text_Lexer_is(':'), a2: {h: 4 /* JTPunct */, a1: {h: 1 /* Colon */}}}, a2: {a1: {a1: Text_Lexer_is('['), a2: {h: 4 /* JTPunct */, a1: {h: 2 /* Square */, a1: 0}}}, a2: {a1: {a1: Text_Lexer_is(']'), a2: {h: 4 /* JTPunct */, a1: {h: 2 /* Square */, a1: 1}}}, a2: {a1: {a1: Text_Lexer_is('{'), a2: {h: 4 /* JTPunct */, a1: {h: 3 /* Curly */, a1: 0}}}, a2: {a1: {a1: Text_Lexer_is('}'), a2: {h: 4 /* JTPunct */, a1: {h: 3 /* Curly */, a1: 1}}}, a2: {a1: {a1: Text_Lexer_exact('null'), a2: {h: 3 /* JTNull */}}, a2: {a1: {a1: Text_Lexer_Core_x3cx7cx3e(Text_Lexer_exact('true'), Text_Lexer_exact('false')), a2: {h: 0 /* JTBoolean */}}, a2: {a1: {a1: Language_JSON_Lexer_numberLit(), a2: {h: 1 /* JTNumber */}}, a2: {a1: {a1: Language_JSON_String_permissiveStringLit(), a2: {h: 2 /* JTString */}}, a2: {h: 0}}}}}}}}}}}});
7922
7985
  });
7923
7986
 
7924
- /* Help.4667:1021:subcommand */
7925
- function Help_n__4667_1021_subcommand($0, $1) {
7926
- return Help_n__4667_1019_maybeDecorate($0, $5 => Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(5), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($5)), $1);
7987
+ /* Help.4669:1021:subcommand */
7988
+ function Help_n__4669_1021_subcommand($0, $1) {
7989
+ return Help_n__4669_1019_maybeDecorate($0, $5 => Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(5), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($5)), $1);
7927
7990
  }
7928
7991
 
7929
- /* Help.4667:1024:shell */
7930
- function Help_n__4667_1024_shell($0, $1) {
7931
- return Help_n__4667_1019_maybeDecorate($0, $5 => Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($5)), $1);
7992
+ /* Help.4669:1024:shell */
7993
+ function Help_n__4669_1024_shell($0, $1) {
7994
+ return Help_n__4669_1019_maybeDecorate($0, $5 => Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($5)), $1);
7932
7995
  }
7933
7996
 
7934
- /* Help.4667:1020:option */
7935
- function Help_n__4667_1020_option($0, $1) {
7936
- return Help_n__4667_1019_maybeDecorate($0, $5 => Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_bold(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($5)), $1);
7997
+ /* Help.4669:1020:option */
7998
+ function Help_n__4669_1020_option($0, $1) {
7999
+ return Help_n__4669_1019_maybeDecorate($0, $5 => Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_bold(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($5)), $1);
7937
8000
  }
7938
8001
 
7939
- /* Help.4667:1019:maybeDecorate */
7940
- function Help_n__4667_1019_maybeDecorate($0, $1, $2) {
8002
+ /* Help.4669:1019:maybeDecorate */
8003
+ function Help_n__4669_1019_maybeDecorate($0, $1, $2) {
7941
8004
  switch($0) {
7942
8005
  case 1: return Text_PrettyPrint_Prettyprinter_Render_Terminal_renderString(Text_PrettyPrint_Prettyprinter_Doc_layoutPretty(Text_PrettyPrint_Prettyprinter_Doc_defaultLayoutOptions())($1($2)));
7943
8006
  case 0: return $2;
7944
8007
  }
7945
8008
  }
7946
8009
 
7947
- /* Help.4667:1023:heading */
7948
- function Help_n__4667_1023_heading($0, $1) {
7949
- return Help_n__4667_1019_maybeDecorate($0, $5 => Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_underline(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($5)), $1);
8010
+ /* Help.4669:1023:heading */
8011
+ function Help_n__4669_1023_heading($0, $1) {
8012
+ return Help_n__4669_1019_maybeDecorate($0, $5 => Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_underline(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($5)), $1);
7950
8013
  }
7951
8014
 
7952
- /* Help.4667:1022:argument */
7953
- function Help_n__4667_1022_argument($0, $1) {
7954
- return Help_n__4667_1019_maybeDecorate($0, csegen_392(), $1);
8015
+ /* Help.4669:1022:argument */
8016
+ function Help_n__4669_1022_argument($0, $1) {
8017
+ return Help_n__4669_1019_maybeDecorate($0, csegen_398(), $1);
7955
8018
  }
7956
8019
 
7957
8020
  /* Help.help : Bool -> String */
7958
8021
  function Help_help($0) {
7959
- return Prelude_Types_foldMap_Foldable_List(csegen_70(), $5 => $5, {a1: 'harmony ', a2: {a1: Help_n__4667_1021_subcommand($0, '<subcommand>'), a2: {a1: '\n\n', a2: {a1: Help_n__4667_1023_heading($0, 'Subcommands'), a2: {a1: ':\n ', a2: {a1: Help_n__4667_1021_subcommand($0, 'help'), a2: {a1: '\n - Print help\n ', a2: {a1: Help_n__4667_1021_subcommand($0, 'version'), a2: {a1: '\n - Print version\n ', a2: {a1: Help_n__4667_1021_subcommand($0, 'config'), a2: {a1: ' {', a2: {a1: Help_n__4667_1022_argument($0, '<property>'), a2: {a1: '} [', a2: {a1: Help_n__4667_1022_argument($0, '<value>'), a2: {a1: ']\n - Get or set the value of a configuration property. Not all properties\n can be set and read via this subcommand.\n ', a2: {a1: Help_n__4667_1022_argument($0, 'properties'), a2: {a1: ': ', a2: {a1: Data_String_Extra_join(', ', csegen_189(), csegen_116()($4b => Help_n__4667_1020_option($0, $4b))(Data_Config_settablePropNames())), a2: {a1: '.\n ', a2: {a1: Help_n__4667_1021_subcommand($0, 'sync'), a2: {a1: '\n - Synchronize local config with information from GitHub.\n ', a2: {a1: Help_n__4667_1021_subcommand($0, 'branch'), a2: {a1: '\n - Print the GitHub URI for the currently checked out branch.\n ', a2: {a1: Help_n__4667_1021_subcommand($0, 'pr'), a2: {a1: ' [', a2: {a1: Help_n__4667_1022_argument($0, '--draft'), a2: {a1: ']\n - Identify an existing PR or create a new one for the current branch.\n ', a2: {a1: Help_n__4667_1021_subcommand($0, 'contribute'), a2: {a1: ' [', a2: {a1: Help_n__4667_1022_argument($0, '-c/--checkout'), a2: {a1: '] [', a2: {a1: Help_n__4667_1022_argument($0, '-<num>'), a2: {a1: ']\n - Contribute to an open PR. Prints a URL. Prioritizes PRs you are\n requested to review but will also return other PRs.\n ', a2: {a1: Help_n__4667_1021_subcommand($0, 'whoami'), a2: {a1: '\n - Print information about the configured and authenticated user.\n ', a2: {a1: Help_n__4667_1021_subcommand($0, 'reflect'), a2: {a1: '\n - Reflect on the current state of ones own PRs and review requests.\n ', a2: {a1: Help_n__4667_1021_subcommand($0, 'list'), a2: {a1: ' {', a2: {a1: Help_n__4667_1022_argument($0, '<team-slug>'), a2: {a1: '}\n - List the members of the given GitHub Team.\n ', a2: {a1: Help_n__4667_1021_subcommand($0, 'graph'), a2: {a1: ' [', a2: {a1: Help_n__4667_1022_argument($0, '-c/--completed'), a2: {a1: '] {', a2: {a1: Help_n__4667_1022_argument($0, '<team-slug>'), a2: {a1: '}\n - Graph the relative review workload of the members of the given GitHub Team.\n ', a2: {a1: Help_n__4667_1021_subcommand($0, 'health'), a2: {a1: '\n - Graph all open PRs grouped by the month they were created.\n ', a2: {a1: Help_n__4667_1021_subcommand($0, 'label'), a2: {a1: ' {', a2: {a1: Help_n__4667_1022_argument($0, '<label>'), a2: {a1: '} [...]\n - Add one or more labels to a PR, creating a new PR if one does not exist.\n Labels that do not exist yet will be created automatically.\n ', a2: {a1: Help_n__4667_1021_subcommand($0, 'assign'), a2: {a1: ' {', a2: {a1: Help_n__4667_1022_argument($0, '<team-slug>'), a2: {a1: ' | ', a2: {a1: Help_n__4667_1022_argument($0, '+<user-login>'), a2: {a1: '} [', a2: {a1: Help_n__4667_1022_argument($0, '#<label>'), a2: {a1: '] [...]\n - Assign the given team(s) and one lucky member from one of those teams\n to review the PR for the current branch.\n \n Also assign any users with logins specified. You specify these\n additional users by prefixing their logins with \'+\'.\n\n Optionally apply any number of labels by prefixing them with \'#\'.\n \n', a2: {a1: Help_n__4667_1023_heading($0, 'Bash Completion'), a2: {a1: ':\n You can set up bash completion by adding the following to your resource\n or bash profile:\n \n ', a2: {a1: Help_n__4667_1024_shell($0, 'eval \"$(harmony --bash-completion-script)\"'), a2: {a1: '\n \n Zsh users will also need to have the following in their resource or\n zsh profile before the above eval:\n \n ', a2: {a1: Help_n__4667_1024_shell($0, 'autoload -U +X compinit && compinit'), a2: {a1: '\n ', a2: {a1: Help_n__4667_1024_shell($0, 'autoload -U +X bashcompinit && bashcompinit'), a2: {a1: '\n ', a2: {h: 0}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}});
8022
+ return Prelude_Types_foldMap_Foldable_List(csegen_70(), $5 => $5, {a1: 'harmony ', a2: {a1: Help_n__4669_1021_subcommand($0, '<subcommand>'), a2: {a1: '\n\n', a2: {a1: Help_n__4669_1023_heading($0, 'Subcommands'), a2: {a1: ':\n ', a2: {a1: Help_n__4669_1021_subcommand($0, 'help'), a2: {a1: '\n - Print help\n ', a2: {a1: Help_n__4669_1021_subcommand($0, 'version'), a2: {a1: '\n - Print version\n ', a2: {a1: Help_n__4669_1021_subcommand($0, 'config'), a2: {a1: ' {', a2: {a1: Help_n__4669_1022_argument($0, '<property>'), a2: {a1: '} [', a2: {a1: Help_n__4669_1022_argument($0, '<value>'), a2: {a1: ']\n - Get or set the value of a configuration property. Not all properties\n can be set and read via this subcommand.\n ', a2: {a1: Help_n__4669_1022_argument($0, 'properties'), a2: {a1: ': ', a2: {a1: Data_String_Extra_join(', ', csegen_193(), csegen_116()($4b => Help_n__4669_1020_option($0, $4b))(Data_Config_settablePropNames())), a2: {a1: '.\n ', a2: {a1: Help_n__4669_1021_subcommand($0, 'sync'), a2: {a1: '\n - Synchronize local config with information from GitHub.\n ', a2: {a1: Help_n__4669_1021_subcommand($0, 'branch'), a2: {a1: '\n - Print the GitHub URI for the currently checked out branch.\n ', a2: {a1: Help_n__4669_1021_subcommand($0, 'pr'), a2: {a1: ' [', a2: {a1: Help_n__4669_1022_argument($0, '--draft'), a2: {a1: '] [', a2: {a1: Help_n__4669_1022_argument($0, '#<label>'), a2: {a1: '] [...]\n - Identify an existing PR or create a new one for the current branch.\n \n Optionally apply any number of labels by prefixing them with \'#\'.\n\n ', a2: {a1: Help_n__4669_1021_subcommand($0, 'contribute'), a2: {a1: ' [', a2: {a1: Help_n__4669_1022_argument($0, '-c/--checkout'), a2: {a1: '] [', a2: {a1: Help_n__4669_1022_argument($0, '-<num>'), a2: {a1: ']\n - Contribute to an open PR. Prints a URL. Prioritizes PRs you are\n requested to review but will also return other PRs.\n ', a2: {a1: Help_n__4669_1021_subcommand($0, 'whoami'), a2: {a1: '\n - Print information about the configured and authenticated user.\n ', a2: {a1: Help_n__4669_1021_subcommand($0, 'reflect'), a2: {a1: '\n - Reflect on the current state of ones own PRs and review requests.\n ', a2: {a1: Help_n__4669_1021_subcommand($0, 'list'), a2: {a1: ' {', a2: {a1: Help_n__4669_1022_argument($0, '<team-slug>'), a2: {a1: '}\n - List the members of the given GitHub Team.\n ', a2: {a1: Help_n__4669_1021_subcommand($0, 'graph'), a2: {a1: ' [', a2: {a1: Help_n__4669_1022_argument($0, '-c/--completed'), a2: {a1: '] {', a2: {a1: Help_n__4669_1022_argument($0, '<team-slug>'), a2: {a1: '}\n - Graph the relative review workload of the members of the given GitHub Team.\n ', a2: {a1: Help_n__4669_1021_subcommand($0, 'health'), a2: {a1: '\n - Graph all open PRs grouped by the month they were created.\n ', a2: {a1: Help_n__4669_1021_subcommand($0, 'label'), a2: {a1: ' {', a2: {a1: Help_n__4669_1022_argument($0, '<label>'), a2: {a1: '} [...]\n - Add one or more labels to a PR, creating a new PR if one does not exist.\n Labels that do not exist yet will be created automatically.\n ', a2: {a1: Help_n__4669_1021_subcommand($0, 'assign'), a2: {a1: ' {', a2: {a1: Help_n__4669_1022_argument($0, '<team-slug>'), a2: {a1: ' | ', a2: {a1: Help_n__4669_1022_argument($0, '+<user-login>'), a2: {a1: '} [', a2: {a1: Help_n__4669_1022_argument($0, '#<label>'), a2: {a1: '] [...]\n - Assign the given team(s) and one lucky member from one of those teams\n to review the PR for the current branch.\n \n Also assign any users with logins specified. You specify these\n additional users by prefixing their logins with \'+\'.\n\n Optionally apply any number of labels by prefixing them with \'#\'.\n \n', a2: {a1: Help_n__4669_1023_heading($0, 'Bash Completion'), a2: {a1: ':\n You can set up bash completion by adding the following to your resource\n or bash profile:\n \n ', a2: {a1: Help_n__4669_1024_shell($0, 'eval \"$(harmony --bash-completion-script)\"'), a2: {a1: '\n \n Zsh users will also need to have the following in their resource or\n zsh profile before the above eval:\n \n ', a2: {a1: Help_n__4669_1024_shell($0, 'autoload -U +X compinit && compinit'), a2: {a1: '\n ', a2: {a1: Help_n__4669_1024_shell($0, 'autoload -U +X bashcompinit && bashcompinit'), a2: {a1: '\n ', a2: {h: 0}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}});
7960
8023
  }
7961
8024
 
7962
- /* Data.Config.5939:5961:personalAccessToken */
7963
- function Data_Config_n__5939_5961_personalAccessToken($0) {
8025
+ /* Data.Config.6403:5961:personalAccessToken */
8026
+ function Data_Config_n__6403_5961_personalAccessToken($0) {
7964
8027
  return Prelude_Types_maybe(() => 'Not set (will use $GITHUB_PAT environment variable)', () => $4 => Data_Config_show_Show_x28Hiddenx20x24ax29($4), $0.a12);
7965
8028
  }
7966
8029
 
7967
- /* Data.Config.6388:6398:parseConfigJson */
7968
- function Data_Config_n__6388_6398_parseConfigJson($0, $1) {
8030
+ /* Data.Config.6852:6398:parseConfigJson */
8031
+ function Data_Config_n__6852_6398_parseConfigJson($0, $1) {
7969
8032
  switch($1.h) {
7970
8033
  case 5: /* JObject */ {
7971
8034
  const $18 = $19 => {
@@ -7980,9 +8043,9 @@ function Data_Config_n__6388_6398_parseConfigJson($0, $1) {
7980
8043
  }
7981
8044
  };
7982
8045
  const $47 = $52 => $53 => $48(undefined)(undefined)($52)($53);
7983
- const $46 = $47(csegen_403());
8046
+ const $46 = $47(csegen_409());
7984
8047
  const $45 = $46(Language_JSON_Accessors_integer($19.a1));
7985
- return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29($45, ua => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_string($19.a2.a1), o => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_string($19.a2.a2.a1), r => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Prelude_Types_maybe(() => ({h: 1 /* Right */, a1: {h: 0}}), () => csegen_404(), $35), dr => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_string($19.a2.a2.a2.a1), mb => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_bool($19.a2.a2.a2.a2.a1), at => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Prelude_Types_maybe(() => ({h: 1 /* Right */, a1: 1}), () => $85 => Language_JSON_Accessors_bool($85), $23), au => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_bool($19.a2.a2.a2.a2.a2.a1), ca => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_array($93 => Language_JSON_Accessors_string($93), $19.a2.a2.a2.a2.a2.a2.a1), ts => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Prelude_Types_maybe(() => ({h: 1 /* Right */, a1: {h: 0}}), () => $9e => Language_JSON_Accessors_array($a1 => Language_JSON_Accessors_string($a1), $9e), $2c), rl => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_array($ab => Language_JSON_Accessors_string($ab), $19.a2.a2.a2.a2.a2.a2.a2.a1), om => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Prelude_Types_maybe(() => ({h: 1 /* Right */, a1: {h: 0}}), () => csegen_404(), $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: csegen_406()(gp), a13: $0}})))))))))))));
8048
+ return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29($45, ua => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_string($19.a2.a1), o => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_string($19.a2.a2.a1), r => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Prelude_Types_maybe(() => ({h: 1 /* Right */, a1: {h: 0}}), () => csegen_410(), $35), dr => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_string($19.a2.a2.a2.a1), mb => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_bool($19.a2.a2.a2.a2.a1), at => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Prelude_Types_maybe(() => ({h: 1 /* Right */, a1: 1}), () => $85 => Language_JSON_Accessors_bool($85), $23), au => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_bool($19.a2.a2.a2.a2.a2.a1), ca => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_array($93 => Language_JSON_Accessors_string($93), $19.a2.a2.a2.a2.a2.a2.a1), ts => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Prelude_Types_maybe(() => ({h: 1 /* Right */, a1: {h: 0}}), () => $9e => Language_JSON_Accessors_array($a1 => Language_JSON_Accessors_string($a1), $9e), $2c), rl => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_array($ab => Language_JSON_Accessors_string($ab), $19.a2.a2.a2.a2.a2.a2.a2.a1), om => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Prelude_Types_maybe(() => ({h: 1 /* Right */, a1: {h: 0}}), () => csegen_410(), $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: csegen_412()(gp), a13: $0}})))))))))))));
7986
8049
  };
7987
8050
  return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_lookupAll({a1: 'updatedAt', a2: {a1: 'org', a2: {a1: 'repo', a2: {a1: 'mainBranch', a2: {a1: 'assignTeams', a2: {a1: 'commentOnAssign', a2: {a1: 'teamSlugs', a2: {a1: 'orgMembers', a2: {h: 0}}}}}}}}}, $1.a1), $18);
7988
8051
  }
@@ -7991,14 +8054,14 @@ function Data_Config_n__6388_6398_parseConfigJson($0, $1) {
7991
8054
  }
7992
8055
  }
7993
8056
 
7994
- /* Data.Config.5939:5960:defaultRemote */
7995
- function Data_Config_n__5939_5960_defaultRemote($0) {
8057
+ /* Data.Config.6403:5960:defaultRemote */
8058
+ function Data_Config_n__6403_5960_defaultRemote($0) {
7996
8059
  return Prelude_Types_maybe(() => 'Not set (defaults to \"origin\")', () => $4 => Prelude_Show_show_Show_String($4), $0.a4);
7997
8060
  }
7998
8061
 
7999
8062
  /* Data.Config.show */
8000
8063
  function Data_Config_show_Show_Config($0) {
8001
- return Data_String_fastUnlines({a1: Prelude_Types_foldMap_Foldable_List(csegen_70(), $8 => $8, {a1: ' updatedAt: ', a2: {a1: Prelude_Show_show_Show_Bits32($0.a1), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_70(), $17 => $17, {a1: ' org: ', a2: {a1: Prelude_Show_show_Show_String($0.a2), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_70(), $26 => $26, {a1: ' repo: ', a2: {a1: Prelude_Show_show_Show_String($0.a3), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_70(), $35 => $35, {a1: ' defaultRemote: ', a2: {a1: Data_Config_n__5939_5960_defaultRemote($0), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_70(), $43 => $43, {a1: ' mainBranch: ', a2: {a1: Prelude_Show_show_Show_String($0.a5), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_70(), $52 => $52, {a1: ' assignTeams: ', a2: {a1: Prelude_Show_show_Show_Bool($0.a6), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_70(), $61 => $61, {a1: ' assignUsers: ', a2: {a1: Prelude_Show_show_Show_Bool($0.a7), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_70(), $70 => $70, {a1: 'commentOnAssign: ', a2: {a1: Prelude_Show_show_Show_Bool($0.a8), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_70(), $7f => $7f, {a1: ' teamSlugs: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_72(), $0.a9), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_70(), $90 => $90, {a1: ' repoLabels: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_72(), $0.a10), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_70(), $a1 => $a1, {a1: ' orgMembers: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_72(), $0.a11), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_70(), $b2 => $b2, {a1: ' githubPAT: ', a2: {a1: Data_Config_n__5939_5961_personalAccessToken($0), a2: {h: 0}}}), a2: {h: 0}}}}}}}}}}}}});
8064
+ return Data_String_fastUnlines({a1: Prelude_Types_foldMap_Foldable_List(csegen_70(), $8 => $8, {a1: ' updatedAt: ', a2: {a1: Prelude_Show_show_Show_Bits32($0.a1), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_70(), $17 => $17, {a1: ' org: ', a2: {a1: Prelude_Show_show_Show_String($0.a2), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_70(), $26 => $26, {a1: ' repo: ', a2: {a1: Prelude_Show_show_Show_String($0.a3), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_70(), $35 => $35, {a1: ' defaultRemote: ', a2: {a1: Data_Config_n__6403_5960_defaultRemote($0), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_70(), $43 => $43, {a1: ' mainBranch: ', a2: {a1: Prelude_Show_show_Show_String($0.a5), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_70(), $52 => $52, {a1: ' assignTeams: ', a2: {a1: Prelude_Show_show_Show_Bool($0.a6), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_70(), $61 => $61, {a1: ' assignUsers: ', a2: {a1: Prelude_Show_show_Show_Bool($0.a7), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_70(), $70 => $70, {a1: 'commentOnAssign: ', a2: {a1: Prelude_Show_show_Show_Bool($0.a8), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_70(), $7f => $7f, {a1: ' teamSlugs: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_72(), $0.a9), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_70(), $90 => $90, {a1: ' repoLabels: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_72(), $0.a10), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_70(), $a1 => $a1, {a1: ' orgMembers: ', a2: {a1: Prelude_Show_show_Show_x28Listx20x24ax29(csegen_72(), $0.a11), a2: {h: 0}}}), a2: {a1: Prelude_Types_foldMap_Foldable_List(csegen_70(), $b2 => $b2, {a1: ' githubPAT: ', a2: {a1: Data_Config_n__6403_5961_personalAccessToken($0), a2: {h: 0}}}), a2: {h: 0}}}}}}}}}}}}});
8002
8065
  }
8003
8066
 
8004
8067
  /* Data.Config.show */
@@ -8078,18 +8141,18 @@ function Data_Config_parseConfig($0, $1) {
8078
8141
  }
8079
8142
  };
8080
8143
  const $4 = {a1: $5, a2: a => $d => ({h: 1 /* Right */, a1: $d}), a3: $f};
8081
- const $3 = {a1: $4, a2: csegen_196(), a3: csegen_197()};
8082
- return Prelude_Interfaces_x3ex3dx3e($3, csegen_422(), $20 => Data_Config_n__6388_6398_parseConfigJson($0, $20), $1);
8144
+ const $3 = {a1: $4, a2: csegen_200(), a3: csegen_201()};
8145
+ return Prelude_Interfaces_x3ex3dx3e($3, csegen_428(), $20 => Data_Config_n__6852_6398_parseConfigJson($0, $20), $1);
8083
8146
  }
8084
8147
 
8085
8148
  /* Data.Config.longestSettablePropName : Nat */
8086
8149
  const Data_Config_longestSettablePropName = __lazy(function () {
8087
- return Prelude_Types_foldr_Foldable_List(csegen_423(), 0n, csegen_116()($9 => Prelude_Types_String_length(Data_Config_propNamex27($9)))(Data_Config_settableProps()));
8150
+ return Prelude_Types_foldr_Foldable_List(csegen_429(), 0n, csegen_116()($9 => Prelude_Types_String_length(Data_Config_propNamex27($9)))(Data_Config_settableProps()));
8088
8151
  });
8089
8152
 
8090
8153
  /* Data.Config.json : Config -> JSON */
8091
8154
  function Data_Config_json($0) {
8092
- return {h: 5 /* JObject */, a1: {a1: {a1: 'assignTeams', a2: {h: 1 /* JBoolean */, a1: $0.a6}}, a2: {a1: {a1: 'assignUsers', a2: {h: 1 /* JBoolean */, a1: $0.a7}}, a2: {a1: {a1: 'commentOnAssign', a2: {h: 1 /* JBoolean */, a1: $0.a8}}, a2: {a1: {a1: 'org', a2: {h: 3 /* JString */, a1: $0.a2}}, a2: {a1: {a1: 'repo', a2: {h: 3 /* JString */, a1: $0.a3}}, a2: {a1: {a1: 'defaultRemote', a2: Prelude_Types_maybe(() => ({h: 0 /* JNull */}), () => $22 => ({h: 3 /* JString */, a1: $22}), $0.a4)}, a2: {a1: {a1: 'mainBranch', a2: {h: 3 /* JString */, a1: $0.a5}}, a2: {a1: {a1: 'orgMembers', a2: {h: 4 /* JArray */, a1: csegen_428()(Data_List_sort(csegen_436(), $0.a11))}}, a2: {a1: {a1: 'teamSlugs', a2: {h: 4 /* JArray */, a1: csegen_428()(Data_List_sort(csegen_436(), $0.a9))}}, a2: {a1: {a1: 'repoLabels', a2: {h: 4 /* JArray */, a1: csegen_428()(Data_List_sort(csegen_436(), $0.a10))}}, a2: {a1: {a1: 'githubPAT', a2: Prelude_Types_maybe(() => ({h: 0 /* JNull */}), () => $55 => ({h: 3 /* JString */, a1: Data_Config_expose($55)}), $0.a12)}, a2: {a1: {a1: 'updatedAt', a2: {h: 2 /* JNumber */, a1: $0.a1}}, a2: {h: 0}}}}}}}}}}}}}};
8155
+ return {h: 5 /* JObject */, a1: {a1: {a1: 'assignTeams', a2: {h: 1 /* JBoolean */, a1: $0.a6}}, a2: {a1: {a1: 'assignUsers', a2: {h: 1 /* JBoolean */, a1: $0.a7}}, a2: {a1: {a1: 'commentOnAssign', a2: {h: 1 /* JBoolean */, a1: $0.a8}}, a2: {a1: {a1: 'org', a2: {h: 3 /* JString */, a1: $0.a2}}, a2: {a1: {a1: 'repo', a2: {h: 3 /* JString */, a1: $0.a3}}, a2: {a1: {a1: 'defaultRemote', a2: Prelude_Types_maybe(() => ({h: 0 /* JNull */}), () => $22 => ({h: 3 /* JString */, a1: $22}), $0.a4)}, a2: {a1: {a1: 'mainBranch', a2: {h: 3 /* JString */, a1: $0.a5}}, a2: {a1: {a1: 'orgMembers', a2: {h: 4 /* JArray */, a1: csegen_434()(Data_List_sort(csegen_442(), $0.a11))}}, a2: {a1: {a1: 'teamSlugs', a2: {h: 4 /* JArray */, a1: csegen_434()(Data_List_sort(csegen_442(), $0.a9))}}, a2: {a1: {a1: 'repoLabels', a2: {h: 4 /* JArray */, a1: csegen_434()(Data_List_sort(csegen_442(), $0.a10))}}, a2: {a1: {a1: 'githubPAT', a2: Prelude_Types_maybe(() => ({h: 0 /* JNull */}), () => $55 => ({h: 3 /* JString */, a1: Data_Config_expose($55)}), $0.a12)}, a2: {a1: {a1: 'updatedAt', a2: {h: 2 /* JNumber */, a1: $0.a1}}, a2: {h: 0}}}}}}}}}}}}}};
8093
8156
  }
8094
8157
 
8095
8158
  /* Data.Config.filename : String */
@@ -8103,41 +8166,9 @@ function Data_Config_expose($0) {
8103
8166
  return $1;
8104
8167
  }
8105
8168
 
8106
- /* Decidable.Equality.5420:4214:primitiveNotEq */
8107
- function Decidable_Equality_n__5420_4214_primitiveNotEq($0, $1, $2, $3) {
8108
- return undefined;
8109
- }
8110
-
8111
- /* Decidable.Equality.5420:4213:primitiveEq */
8112
- function Decidable_Equality_n__5420_4213_primitiveEq($0, $1, $2) {
8113
- return undefined;
8114
- }
8115
-
8116
- /* Decidable.Equality.decEq */
8117
- function Decidable_Equality_decEq_DecEq_FromEqx24a($0, $1, $2) {
8118
- switch($0.a1($1)($2)) {
8119
- case 1: return {h: 0 /* Yes */, a1: Decidable_Equality_n__5420_4213_primitiveEq($0, $1, $2)};
8120
- case 0: return {h: 1 /* No */, a1: $f => Decidable_Equality_n__5420_4214_primitiveNotEq($0, $1, $2, $f)};
8121
- }
8122
- }
8123
-
8124
- /* Decidable.Equality.decEq */
8125
- const Decidable_Equality_decEq_DecEq_Char = __lazy(function () {
8126
- const $0 = x1 => x2 => Decidable_Equality_decEq_DecEq_FromEqx24a(csegen_132(), x1, x2);
8127
- return $6 => $7 => $0($6)($7);
8128
- });
8129
-
8130
- /* Data.Either.maybeToEither : Lazy e -> Maybe a -> Either e a */
8131
- function Data_Either_maybeToEither($0, $1) {
8132
- switch($1.h) {
8133
- case undefined: /* just */ return {h: 1 /* Right */, a1: $1.a1};
8134
- case 0: /* nothing */ return {h: 0 /* Left */, a1: $0()};
8135
- }
8136
- }
8137
-
8138
- /* Language.JSON.Accessors.4085:8487:lookup' */
8139
- function Language_JSON_Accessors_n__4085_8487_lookupx27($0, $1, $2, $3, $4) {
8140
- return Data_Either_maybeToEither(() => Prelude_Types_foldMap_Foldable_List(csegen_70(), $b => $b, {a1: csegen_62()('Missing required key: '), a2: {a1: csegen_62()($3), a2: csegen_442()}}), Data_List_lookup(csegen_45(), $3, $4));
8169
+ /* Language.JSON.Accessors.4549:8487:lookup' */
8170
+ function Language_JSON_Accessors_n__4549_8487_lookupx27($0, $1, $2, $3, $4) {
8171
+ return Data_Either_maybeToEither(() => Prelude_Types_foldMap_Foldable_List(csegen_70(), $b => $b, {a1: csegen_62()('Missing required key: '), a2: {a1: csegen_62()($3), a2: csegen_446()}}), Data_List_lookup(csegen_45(), $3, $4));
8141
8172
  }
8142
8173
 
8143
8174
  /* Language.JSON.Accessors.string : JSON -> Either String String */
@@ -8179,7 +8210,7 @@ function Language_JSON_Accessors_lookupAll($0, $1) {
8179
8210
  switch($0.h) {
8180
8211
  case 0: /* nil */ return {h: 1 /* Right */, a1: {h: 0}};
8181
8212
  case undefined: /* cons */ {
8182
- const $4 = Language_JSON_Accessors_n__4085_8487_lookupx27($0.a1, $0.a2, $1, $0.a1, $1);
8213
+ const $4 = Language_JSON_Accessors_n__4549_8487_lookupx27($0.a1, $0.a2, $1, $0.a1, $1);
8183
8214
  switch($4.h) {
8184
8215
  case 1: /* Right */ {
8185
8216
  const $b = Language_JSON_Accessors_lookupAll($0.a2, $1);
@@ -8238,16 +8269,6 @@ function Language_JSON_Accessors_array($0, $1) {
8238
8269
  }
8239
8270
  }
8240
8271
 
8241
- /* Data.Vect.reverse : Vect len elem -> Vect len elem */
8242
- function Data_Vect_reverse($0) {
8243
- return Data_Vect_reverseOnto({h: 0}, $0);
8244
- }
8245
-
8246
- /* Data.Vect.fromList : (xs : List elem) -> Vect (length xs) elem */
8247
- function Data_Vect_fromList($0) {
8248
- return Data_Vect_reverse(Data_Vect_fromListx27({h: 0}, $0));
8249
- }
8250
-
8251
8272
  /* FFI.GitHub.show */
8252
8273
  function FFI_GitHub_show_Show_GitHubPRState($0) {
8253
8274
  switch($0) {
@@ -8272,19 +8293,19 @@ function FFI_GitHub_octokit($0) {
8272
8293
  /* FFI.GitHub.listTeams : Octokit => String -> Promise (List String) */
8273
8294
  function FFI_GitHub_listTeams($0, $1) {
8274
8295
  const $2 = $0;
8275
- return csegen_444()($6 => $7 => FFI_promiseIO($a => $b => $c => FFI_GitHub_prim__listTeams($2, $1, $a, $b, $c), $6, $7));
8296
+ return csegen_448()($6 => $7 => FFI_promiseIO($a => $b => $c => FFI_GitHub_prim__listTeams($2, $1, $a, $b, $c), $6, $7));
8276
8297
  }
8277
8298
 
8278
8299
  /* FFI.GitHub.listTeamMembers : Octokit => String -> String -> Promise (List String) */
8279
8300
  function FFI_GitHub_listTeamMembers($0, $1, $2) {
8280
8301
  const $3 = $0;
8281
- return csegen_444()($7 => $8 => FFI_promiseIO($b => $c => $d => FFI_GitHub_prim__listTeamMembers($3, $1, $2, $b, $c, $d), $7, $8));
8302
+ return csegen_448()($7 => $8 => FFI_promiseIO($b => $c => $d => FFI_GitHub_prim__listTeamMembers($3, $1, $2, $b, $c, $d), $7, $8));
8282
8303
  }
8283
8304
 
8284
8305
  /* FFI.GitHub.listRepoLabels : Octokit => String -> String -> Promise (List String) */
8285
8306
  function FFI_GitHub_listRepoLabels($0, $1, $2) {
8286
8307
  const $3 = $0;
8287
- return csegen_444()($7 => $8 => FFI_promiseIO($b => $c => $d => FFI_GitHub_prim__listRepoLabels($3, $1, $2, $b, $c, $d), $7, $8));
8308
+ return csegen_448()($7 => $8 => FFI_promiseIO($b => $c => $d => FFI_GitHub_prim__listRepoLabels($3, $1, $2, $b, $c, $d), $7, $8));
8288
8309
  }
8289
8310
 
8290
8311
  /* FFI.GitHub.listPullReviewsJsonStr : Octokit => String -> String -> Integer -> Promise String */
@@ -8309,37 +8330,37 @@ String -> String -> Maybe GitHubPRState -> Fin 101 -> {default 0 _ : Nat} ->
8309
8330
  Promise (List PullRequest) */
8310
8331
  function FFI_GitHub_listPullRequests($0, $1, $2, $3, $4, $5) {
8311
8332
  const $6 = $0;
8312
- return Prelude_Basics_flip(csegen_445(), csegen_446(), FFI_GitHub_listPullRequestsJsonStr($6, $1, $2, $3, $4, $5));
8333
+ return Prelude_Basics_flip(csegen_449(), csegen_450(), FFI_GitHub_listPullRequestsJsonStr($6, $1, $2, $3, $4, $5));
8313
8334
  }
8314
8335
 
8315
8336
  /* FFI.GitHub.listPRsForBranch : Octokit => String -> String -> String -> Promise (List PullRequest) */
8316
8337
  function FFI_GitHub_listPRsForBranch($0, $1, $2, $3) {
8317
8338
  const $4 = $0;
8318
- return Prelude_Basics_flip(csegen_445(), csegen_446(), $b => $c => FFI_promiseIO($f => $10 => $11 => FFI_GitHub_prim__listPRsForBranch($4, $1, $2, $3, $f, $10, $11), $b, $c));
8339
+ return Prelude_Basics_flip(csegen_449(), csegen_450(), $b => $c => FFI_promiseIO($f => $10 => $11 => FFI_GitHub_prim__listPRsForBranch($4, $1, $2, $3, $f, $10, $11), $b, $c));
8319
8340
  }
8320
8341
 
8321
8342
  /* FFI.GitHub.listOrgMembers : Octokit => String -> Promise (List String) */
8322
8343
  function FFI_GitHub_listOrgMembers($0, $1) {
8323
8344
  const $2 = $0;
8324
- return csegen_444()($6 => $7 => FFI_promiseIO($a => $b => $c => FFI_GitHub_prim__listOrgMembers($2, $1, $a, $b, $c), $6, $7));
8345
+ return csegen_448()($6 => $7 => FFI_promiseIO($a => $b => $c => FFI_GitHub_prim__listOrgMembers($2, $1, $a, $b, $c), $6, $7));
8325
8346
  }
8326
8347
 
8327
8348
  /* FFI.GitHub.listMyTeams : Octokit => Promise (List String) */
8328
8349
  function FFI_GitHub_listMyTeams($0) {
8329
8350
  const $1 = $0;
8330
- return csegen_444()($5 => $6 => FFI_promiseIO($9 => $a => $b => FFI_GitHub_prim__listMyTeams($1, $9, $a, $b), $5, $6));
8351
+ return csegen_448()($5 => $6 => FFI_promiseIO($9 => $a => $b => FFI_GitHub_prim__listMyTeams($1, $9, $a, $b), $5, $6));
8331
8352
  }
8332
8353
 
8333
8354
  /* FFI.GitHub.getUser : Octokit => String -> Promise User */
8334
8355
  function FFI_GitHub_getUser($0) {
8335
8356
  const $1 = $0;
8336
- return Prelude_Interfaces_x3cx3dx3c(csegen_91(), csegen_447(), $8 => $9 => $a => FFI_promiseIO($d => $e => $f => FFI_GitHub_prim__getUser($1, $8, $d, $e, $f), $9, $a));
8357
+ return Prelude_Interfaces_x3cx3dx3c(csegen_91(), csegen_451(), $8 => $9 => $a => FFI_promiseIO($d => $e => $f => FFI_GitHub_prim__getUser($1, $8, $d, $e, $f), $9, $a));
8337
8358
  }
8338
8359
 
8339
8360
  /* FFI.GitHub.getSelf : Octokit => Promise User */
8340
8361
  function FFI_GitHub_getSelf($0) {
8341
8362
  const $1 = $0;
8342
- return Prelude_Basics_flip(csegen_445(), csegen_447(), $8 => $9 => FFI_promiseIO($c => $d => $e => FFI_GitHub_prim__getSelf($1, $c, $d, $e), $8, $9));
8363
+ return Prelude_Basics_flip(csegen_449(), csegen_451(), $8 => $9 => FFI_promiseIO($c => $d => $e => FFI_GitHub_prim__getSelf($1, $c, $d, $e), $8, $9));
8343
8364
  }
8344
8365
 
8345
8366
  /* FFI.GitHub.getRepoDefaultBranch : Octokit => String -> String -> Promise String */
@@ -8352,7 +8373,7 @@ function FFI_GitHub_getRepoDefaultBranch($0, $1, $2) {
8352
8373
  String -> String -> String -> String -> String -> String -> Promise PullRequest */
8353
8374
  function FFI_GitHub_createPR($0, $1, $2, $3, $4, $5, $6, $7) {
8354
8375
  const $8 = $0;
8355
- return Prelude_Basics_flip(csegen_445(), $d => $e => Data_Promise_either(csegen_72(), Data_PullRequest_parsePullRequestString($d), $e), $17 => $18 => FFI_promiseIO($1b => $1c => $1d => FFI_GitHub_prim__createPR($8, $2, $3, $4, $5, $6, $7, $1, $1b, $1c, $1d), $17, $18));
8376
+ return Prelude_Basics_flip(csegen_449(), $d => $e => Data_Promise_either(csegen_72(), Data_PullRequest_parsePullRequestString($d), $e), $17 => $18 => FFI_promiseIO($1b => $1c => $1d => FFI_GitHub_prim__createPR($8, $2, $3, $4, $5, $6, $7, $1, $1b, $1c, $1d), $17, $18));
8356
8377
  }
8357
8378
 
8358
8379
  /* FFI.GitHub.createComment : Octokit => String -> String -> Integer -> String -> Promise () */
@@ -8365,13 +8386,13 @@ function FFI_GitHub_createComment($0, $1, $2, $3, $4) {
8365
8386
  String -> String -> Integer -> List String -> List String -> Promise (List String) */
8366
8387
  function FFI_GitHub_addPullReviewers($0, $1, $2, $3, $4, $5) {
8367
8388
  const $6 = $0;
8368
- return csegen_444()($a => $b => FFI_promiseIO($e => $f => $10 => FFI_GitHub_prim__addPullReviewers($6, $1, $2, $3, Data_String_Extra_join(',', csegen_189(), $4), Data_String_Extra_join(',', csegen_189(), $5), $e, $f, $10), $a, $b));
8389
+ return csegen_448()($a => $b => FFI_promiseIO($e => $f => $10 => FFI_GitHub_prim__addPullReviewers($6, $1, $2, $3, Data_String_Extra_join(',', csegen_193(), $4), Data_String_Extra_join(',', csegen_193(), $5), $e, $f, $10), $a, $b));
8369
8390
  }
8370
8391
 
8371
8392
  /* FFI.GitHub.addPullLabels : Octokit => String -> String -> Integer -> List String -> Promise (List String) */
8372
8393
  function FFI_GitHub_addPullLabels($0, $1, $2, $3, $4) {
8373
8394
  const $5 = $0;
8374
- return csegen_444()($9 => $a => FFI_promiseIO($d => $e => $f => FFI_GitHub_prim__addLabels($5, $1, $2, $3, Data_String_Extra_join(',', csegen_189(), $4), $d, $e, $f), $9, $a));
8395
+ return csegen_448()($9 => $a => FFI_promiseIO($d => $e => $f => FFI_GitHub_prim__addLabels($5, $1, $2, $3, Data_String_Extra_join(',', csegen_193(), $4), $d, $e, $f), $9, $a));
8375
8396
  }
8376
8397
 
8377
8398
  /* FFI.promiseIO : ((String -> PrimIO ()) -> (String -> PrimIO ()) -> PrimIO ()) -> Promise String */
@@ -8502,8 +8523,8 @@ function Data_User_parseUserString($0) {
8502
8523
  }
8503
8524
  };
8504
8525
  const $3 = {a1: $4, a2: a => $c => ({h: 1 /* Right */, a1: $c}), a3: $e};
8505
- const $2 = {a1: $3, a2: csegen_196(), a3: csegen_197()};
8506
- return Prelude_Interfaces_x3ex3dx3e($2, csegen_422(), $1f => Data_User_parseUser($1f), $0);
8526
+ const $2 = {a1: $3, a2: csegen_200(), a3: csegen_201()};
8527
+ return Prelude_Interfaces_x3ex3dx3e($2, csegen_428(), $1f => Data_User_parseUser($1f), $0);
8507
8528
  }
8508
8529
 
8509
8530
  /* Data.User.parseUser : JSON -> Either String User */
@@ -8533,7 +8554,7 @@ function Data_Review_parseState($0) {
8533
8554
 
8534
8555
  /* Data.Review.parseReview : JSON -> Either String Review */
8535
8556
  function Data_Review_parseReview($0) {
8536
- 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_456(), $22 => Data_Review_parseState($22), Language_JSON_Accessors_string($12.a2.a1)), state => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Prelude_Basics_flip(csegen_456(), $2f => Data_Review_parseDateTime($2f), Language_JSON_Accessors_string($12.a2.a2.a1)), submittedAt => ({h: 1 /* Right */, a1: {a1: submittedAt, a2: author, a3: state}}))))));
8557
+ 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_460(), $22 => Data_Review_parseState($22), Language_JSON_Accessors_string($12.a2.a1)), state => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Prelude_Basics_flip(csegen_460(), $2f => Data_Review_parseDateTime($2f), Language_JSON_Accessors_string($12.a2.a2.a1)), submittedAt => ({h: 1 /* Right */, a1: {a1: submittedAt, a2: author, a3: state}}))))));
8537
8558
  }
8538
8559
 
8539
8560
  /* Data.Review.parseDateTime : String -> Either String Date */
@@ -8546,8 +8567,8 @@ function Data_Review_isAuthor($0, $1) {
8546
8567
  return Prelude_EqOrd_x3dx3d_Eq_String($1.a2, $0);
8547
8568
  }
8548
8569
 
8549
- /* Data.Date.4653:9771:parseNat */
8550
- function Data_Date_n__4653_9771_parseNat($0, $1, $2) {
8570
+ /* Data.Date.5104:9771:parseNat */
8571
+ function Data_Date_n__5104_9771_parseNat($0, $1, $2) {
8551
8572
  switch($2) {
8552
8573
  case '0': return {a1: 0n};
8553
8574
  case '1': return {a1: 1n};
@@ -8563,12 +8584,12 @@ function Data_Date_n__4653_9771_parseNat($0, $1, $2) {
8563
8584
  }
8564
8585
  }
8565
8586
 
8566
- /* Data.Date.4770:9888:guardSuccess */
8567
- function Data_Date_n__4770_9888_guardSuccess($0) {
8587
+ /* Data.Date.5221:9888:guardSuccess */
8588
+ function Data_Date_n__5221_9888_guardSuccess($0) {
8568
8589
  switch($0.h) {
8569
8590
  case undefined: /* cons */ {
8570
8591
  switch($0.a1.h) {
8571
- case 3: /* 4770:9885:Day */ {
8592
+ case 3: /* 5221:9885:Day */ {
8572
8593
  switch($0.a2.h) {
8573
8594
  case undefined: /* cons */ {
8574
8595
  switch($0.a2.a2.h) {
@@ -8586,28 +8607,28 @@ function Data_Date_n__4770_9888_guardSuccess($0) {
8586
8607
  }
8587
8608
  }
8588
8609
 
8589
- /* Data.Date.4770:9889:go */
8590
- function Data_Date_n__4770_9889_go($0, $1) {
8610
+ /* Data.Date.5221:9889:go */
8611
+ function Data_Date_n__5221_9889_go($0, $1) {
8591
8612
  switch($0.a1.h) {
8592
- case 4: /* 4770:9886:Fail */ return {a1: {h: 4 /* 4770:9886:Fail */}, a2: undefined};
8593
- case 0: /* 4770:9882:Start */ {
8613
+ case 4: /* 5221:9886:Fail */ return {a1: {h: 4 /* 5221:9886:Fail */}, a2: undefined};
8614
+ case 0: /* 5221:9882:Start */ {
8594
8615
  switch(Prelude_Types_isDigit($1)) {
8595
- case 1: return {a1: {h: 1 /* 4770:9883:P */, a1: 0}, a2: {a1: $1, a2: {h: 0}}};
8596
- case 0: return {a1: {h: 4 /* 4770:9886:Fail */}, a2: undefined};
8616
+ case 1: return {a1: {h: 1 /* 5221:9883:P */, a1: 0}, a2: {a1: $1, a2: {h: 0}}};
8617
+ case 0: return {a1: {h: 4 /* 5221:9886:Fail */}, a2: undefined};
8597
8618
  }
8598
8619
  }
8599
- case 1: /* 4770:9883:P */ {
8620
+ case 1: /* 5221:9883:P */ {
8600
8621
  switch($0.a1.a1) {
8601
8622
  case 0: {
8602
8623
  switch($1) {
8603
8624
  case '-': {
8604
8625
  const $12 = Data_Date_parsePositiveReversed($0.a2);
8605
8626
  switch($12.h) {
8606
- case 0: /* nothing */ return {a1: {h: 4 /* 4770:9886:Fail */}, a2: undefined};
8607
- case undefined: /* just */ return {a1: {h: 2 /* 4770:9884:S */, a1: 0}, a2: $12.a1};
8627
+ case 0: /* nothing */ return {a1: {h: 4 /* 5221:9886:Fail */}, a2: undefined};
8628
+ case undefined: /* just */ return {a1: {h: 2 /* 5221:9884:S */, a1: 0}, a2: $12.a1};
8608
8629
  }
8609
8630
  }
8610
- default: return {a1: {h: 1 /* 4770:9883:P */, a1: 0}, a2: {a1: $1, a2: $0.a2}};
8631
+ default: return {a1: {h: 1 /* 5221:9883:P */, a1: 0}, a2: {a1: $1, a2: $0.a2}};
8611
8632
  }
8612
8633
  }
8613
8634
  case 1: {
@@ -8615,32 +8636,32 @@ function Data_Date_n__4770_9889_go($0, $1) {
8615
8636
  case '-': {
8616
8637
  const $21 = Data_Date_parsePositiveReversed($0.a2.a2);
8617
8638
  switch($21.h) {
8618
- case 0: /* nothing */ return {a1: {h: 4 /* 4770:9886:Fail */}, a2: undefined};
8619
- case undefined: /* just */ return {a1: {h: 2 /* 4770:9884:S */, a1: 1}, a2: {a1: $0.a2.a1, a2: $21.a1}};
8639
+ case 0: /* nothing */ return {a1: {h: 4 /* 5221:9886:Fail */}, a2: undefined};
8640
+ case undefined: /* just */ return {a1: {h: 2 /* 5221:9884:S */, a1: 1}, a2: {a1: $0.a2.a1, a2: $21.a1}};
8620
8641
  }
8621
8642
  }
8622
- default: return {a1: {h: 1 /* 4770:9883:P */, a1: 1}, a2: {a1: $0.a2.a1, a2: {a1: $1, a2: $0.a2.a2}}};
8643
+ default: return {a1: {h: 1 /* 5221:9883:P */, a1: 1}, a2: {a1: $0.a2.a1, a2: {a1: $1, a2: $0.a2.a2}}};
8623
8644
  }
8624
8645
  }
8625
8646
  }
8626
8647
  }
8627
- case 2: /* 4770:9884:S */ {
8648
+ case 2: /* 5221:9884:S */ {
8628
8649
  switch($0.a1.a1) {
8629
8650
  case 0: {
8630
8651
  switch(Prelude_Types_isDigit($1)) {
8631
- case 1: return {a1: {h: 1 /* 4770:9883:P */, a1: 1}, a2: {a1: $0.a2, a2: {a1: $1, a2: {h: 0}}}};
8632
- case 0: return {a1: {h: 4 /* 4770:9886:Fail */}, a2: undefined};
8652
+ case 1: return {a1: {h: 1 /* 5221:9883:P */, a1: 1}, a2: {a1: $0.a2, a2: {a1: $1, a2: {h: 0}}}};
8653
+ case 0: return {a1: {h: 4 /* 5221:9886:Fail */}, a2: undefined};
8633
8654
  }
8634
8655
  }
8635
8656
  case 1: {
8636
8657
  switch(Prelude_Types_isDigit($1)) {
8637
- case 1: return {a1: {h: 3 /* 4770:9885:Day */}, a2: {a1: $0.a2.a1, a2: {a1: $0.a2.a2, a2: {a1: $1, a2: {h: 0}}}}};
8638
- case 0: return {a1: {h: 4 /* 4770:9886:Fail */}, a2: undefined};
8658
+ case 1: return {a1: {h: 3 /* 5221:9885:Day */}, a2: {a1: $0.a2.a1, a2: {a1: $0.a2.a2, a2: {a1: $1, a2: {h: 0}}}}};
8659
+ case 0: return {a1: {h: 4 /* 5221:9886:Fail */}, a2: undefined};
8639
8660
  }
8640
8661
  }
8641
8662
  }
8642
8663
  }
8643
- case 3: /* 4770:9885:Day */ return {a1: {h: 3 /* 4770:9885:Day */}, a2: {a1: $0.a2.a1, a2: {a1: $0.a2.a2.a1, a2: {a1: $1, a2: $0.a2.a2.a2}}}};
8664
+ case 3: /* 5221:9885:Day */ return {a1: {h: 3 /* 5221:9885:Day */}, a2: {a1: $0.a2.a1, a2: {a1: $0.a2.a2.a1, a2: {a1: $1, a2: $0.a2.a2.a2}}}};
8644
8665
  }
8645
8666
  }
8646
8667
 
@@ -8720,7 +8741,7 @@ function Data_Date_showYearAndMonth($0) {
8720
8741
  function Data_Date_parsePositiveReversed($0) {
8721
8742
  switch($0.h) {
8722
8743
  case 0: /* nil */ return {a1: 0n};
8723
- case undefined: /* cons */ return Prelude_Types_x3ex3ex3d_Monad_Maybe(Data_Date_n__4653_9771_parseNat($0.a1, $0.a2, $0.a1), n => Prelude_Types_x3ex3ex3d_Monad_Maybe(Data_Date_parsePositiveReversed($0.a2), $f => ({a1: (n+($f*10n))})));
8744
+ case undefined: /* cons */ return Prelude_Types_x3ex3ex3d_Monad_Maybe(Data_Date_n__5104_9771_parseNat($0.a1, $0.a2, $0.a1), n => Prelude_Types_x3ex3ex3d_Monad_Maybe(Data_Date_parsePositiveReversed($0.a2), $f => ({a1: (n+($f*10n))})));
8724
8745
  }
8725
8746
  }
8726
8747
 
@@ -8733,7 +8754,7 @@ function Data_Date_parseDateTimeString($0) {
8733
8754
 
8734
8755
  /* Data.Date.parseDateString : String -> Maybe Date */
8735
8756
  function Data_Date_parseDateString($0) {
8736
- return Data_Date_n__4770_9888_guardSuccess(Prelude_Types_foldl_Foldable_List($5 => $6 => Data_Date_n__4770_9889_go($5, $6), {a1: {h: 0 /* 4770:9882:Start */}, a2: undefined}, Prelude_Types_fastUnpack($0)));
8757
+ return Data_Date_n__5221_9888_guardSuccess(Prelude_Types_foldl_Foldable_List($5 => $6 => Data_Date_n__5221_9889_go($5, $6), {a1: {h: 0 /* 5221:9882:Start */}, a2: undefined}, Prelude_Types_fastUnpack($0)));
8737
8758
  }
8738
8759
 
8739
8760
  /* Data.Date.pad : Nat -> String */
@@ -8823,8 +8844,8 @@ function Data_PullRequest_parsePullRequestsString($0) {
8823
8844
  }
8824
8845
  };
8825
8846
  const $3 = {a1: $4, a2: a => $c => ({h: 1 /* Right */, a1: $c}), a3: $e};
8826
- const $2 = {a1: $3, a2: csegen_196(), a3: csegen_197()};
8827
- return Prelude_Interfaces_x3ex3dx3e($2, csegen_422(), csegen_470(), $0);
8847
+ const $2 = {a1: $3, a2: csegen_200(), a3: csegen_201()};
8848
+ return Prelude_Interfaces_x3ex3dx3e($2, csegen_428(), csegen_474(), $0);
8828
8849
  }
8829
8850
 
8830
8851
  /* Data.PullRequest.parsePullRequestString : String -> Either String PullRequest */
@@ -8847,13 +8868,13 @@ function Data_PullRequest_parsePullRequestString($0) {
8847
8868
  }
8848
8869
  };
8849
8870
  const $3 = {a1: $4, a2: a => $c => ({h: 1 /* Right */, a1: $c}), a3: $e};
8850
- const $2 = {a1: $3, a2: csegen_196(), a3: csegen_197()};
8851
- return Prelude_Interfaces_x3ex3dx3e($2, csegen_422(), $1f => Data_PullRequest_parsePR($1f), $0);
8871
+ const $2 = {a1: $3, a2: csegen_200(), a3: csegen_201()};
8872
+ return Prelude_Interfaces_x3ex3dx3e($2, csegen_428(), $1f => Data_PullRequest_parsePR($1f), $0);
8852
8873
  }
8853
8874
 
8854
8875
  /* Data.PullRequest.parsePR : JSON -> Either String PullRequest */
8855
8876
  function Data_PullRequest_parsePR($0) {
8856
- 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_456(), $40 => Data_PullRequest_parseState(merged, $40), Language_JSON_Accessors_string($1c.a2.a2.a1)), state => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Prelude_Basics_flip(csegen_456(), $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}})))))))))));
8877
+ 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_460(), $40 => Data_PullRequest_parseState(merged, $40), Language_JSON_Accessors_string($1c.a2.a2.a1)), state => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Prelude_Basics_flip(csegen_460(), $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}})))))))))));
8857
8878
  }
8858
8879
 
8859
8880
  /* Data.PullRequest.parseDateTime : String -> Either String Date */
@@ -8917,7 +8938,7 @@ function FFI_Git_pushNewBranch($0, $1, $2) {
8917
8938
  /* FFI.Git.listRemotes : Git => Promise (List String) */
8918
8939
  function FFI_Git_listRemotes($0) {
8919
8940
  const $1 = $0;
8920
- return csegen_444()($5 => $6 => FFI_promiseIO($9 => $a => $b => FFI_Git_prim__listRemotes($1, $9, $a, $b), $5, $6));
8941
+ return csegen_448()($5 => $6 => FFI_promiseIO($9 => $a => $b => FFI_Git_prim__listRemotes($1, $9, $a, $b), $5, $6));
8921
8942
  }
8922
8943
 
8923
8944
  /* FFI.Git.git : HasIO io => io Git */
@@ -8964,7 +8985,7 @@ function Config_with__getConfig_2069($0, $1, $2) {
8964
8985
  function Config_with__withx20blockx20inx20setConfig_1934($0, $1, $2, $3, $4, $5) {
8965
8986
  switch($5.h) {
8966
8987
  case 0: /* nothing */ return $7 => $8 => Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_70(), $f => $f, {a1: $4, a2: {a1: ' is not a valid value for ', a2: {a1: $1, a2: {a1: '.', a2: {h: 0}}}}}), $7, $8);
8967
- case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Types_either(() => $1f => Util_renderIO($5.a1, csegen_94(), $1f), () => csegen_478(), Config_checkConfigConsistency($5.a1)), $2b => Config_writeConfig($5.a1));
8988
+ case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Types_either(() => $1f => Util_renderIO($5.a1, csegen_94(), $1f), () => csegen_482(), Config_checkConfigConsistency($5.a1)), $2b => Config_writeConfig($5.a1));
8968
8989
  }
8969
8990
  }
8970
8991
 
@@ -9019,38 +9040,38 @@ function Config_case__parseGitHubURIx2cparseSuffix_1470($0, $1, $2) {
9019
9040
  return Prelude_Types_x3ex3ex3d_Monad_Maybe({a1: Data_String_split($9 => Prelude_EqOrd_x3dx3d_Eq_Char($9, '/'), $2.a1)}, $e);
9020
9041
  }
9021
9042
 
9022
- /* Config.7286:2216:yesUnlessNo */
9023
- function Config_n__7286_2216_yesUnlessNo($0, $1, $2, $3, $4) {
9043
+ /* Config.7751:2216:yesUnlessNo */
9044
+ function Config_n__7751_2216_yesUnlessNo($0, $1, $2, $3, $4) {
9024
9045
  return Config_with__createConfigx2cyesUnlessNo_2250($0, $1, $2, $3, $4, Data_String_toLower($4));
9025
9046
  }
9026
9047
 
9027
- /* Config.7286:2218:repo */
9028
- function Config_n__7286_2218_repo($0, $1, $2, $3) {
9029
- return csegen_60()(csegen_480());
9048
+ /* Config.7751:2218:repo */
9049
+ function Config_n__7751_2218_repo($0, $1, $2, $3) {
9050
+ return csegen_60()(csegen_484());
9030
9051
  }
9031
9052
 
9032
- /* Config.6543:1449:parseSuffix */
9033
- function Config_n__6543_1449_parseSuffix($0, $1) {
9053
+ /* Config.7008:1449:parseSuffix */
9054
+ function Config_n__7008_1449_parseSuffix($0, $1) {
9034
9055
  return Config_case__parseGitHubURIx2cparseSuffix_1470($0, $1, Data_String_break$($8 => Prelude_EqOrd_x3dx3d_Eq_Char($8, '.'), $1));
9035
9056
  }
9036
9057
 
9037
- /* Config.6543:1451:parseSSH */
9038
- function Config_n__6543_1451_parseSSH($0, $1) {
9039
- return Prelude_Interfaces_x3ex3dx3e(csegen_14(), $6 => Config_dropPrefixx27('git@github.com:', $6), $b => Config_n__6543_1449_parseSuffix($0, $b), $1);
9058
+ /* Config.7008:1451:parseSSH */
9059
+ function Config_n__7008_1451_parseSSH($0, $1) {
9060
+ return Prelude_Interfaces_x3ex3dx3e(csegen_14(), $6 => Config_dropPrefixx27('git@github.com:', $6), $b => Config_n__7008_1449_parseSuffix($0, $b), $1);
9040
9061
  }
9041
9062
 
9042
- /* Config.6543:1450:parseHTTPS */
9043
- function Config_n__6543_1450_parseHTTPS($0, $1) {
9044
- return Prelude_Interfaces_x3ex3dx3e(csegen_14(), $6 => Config_dropPrefixx27('https://github/com/', $6), $b => Config_n__6543_1449_parseSuffix($0, $b), $1);
9063
+ /* Config.7008:1450:parseHTTPS */
9064
+ function Config_n__7008_1450_parseHTTPS($0, $1) {
9065
+ return Prelude_Interfaces_x3ex3dx3e(csegen_14(), $6 => Config_dropPrefixx27('https://github/com/', $6), $b => Config_n__7008_1449_parseSuffix($0, $b), $1);
9045
9066
  }
9046
9067
 
9047
- /* Config.7286:2217:org */
9048
- function Config_n__7286_2217_org($0, $1, $2, $3) {
9049
- return csegen_60()(csegen_485());
9068
+ /* Config.7751:2217:org */
9069
+ function Config_n__7751_2217_org($0, $1, $2, $3) {
9070
+ return csegen_60()(csegen_489());
9050
9071
  }
9051
9072
 
9052
- /* Config.7286:2215:orIfEmpty */
9053
- function Config_n__7286_2215_orIfEmpty($0, $1, $2, $3, $4, $5) {
9073
+ /* Config.7751:2215:orIfEmpty */
9074
+ function Config_n__7751_2215_orIfEmpty($0, $1, $2, $3, $4, $5) {
9054
9075
  switch($4.h) {
9055
9076
  case 0: /* nothing */ return $5;
9056
9077
  case undefined: /* just */ {
@@ -9062,33 +9083,33 @@ function Config_n__7286_2215_orIfEmpty($0, $1, $2, $3, $4, $5) {
9062
9083
  }
9063
9084
  }
9064
9085
 
9065
- /* Config.6297:1212:oneDayAgo */
9066
- function Config_n__6297_1212_oneDayAgo($0, $1, $2) {
9067
- return $2.a1.a2(undefined)(undefined)(System_time($2))(now => $2.a1.a1.a2(undefined)(csegen_403()((now-86400n))));
9086
+ /* Config.6762:1212:oneDayAgo */
9087
+ function Config_n__6762_1212_oneDayAgo($0, $1, $2) {
9088
+ return $2.a1.a2(undefined)(undefined)(System_time($2))(now => $2.a1.a1.a2(undefined)(csegen_409()((now-86400n))));
9068
9089
  }
9069
9090
 
9070
- /* Config.7190:2109:help */
9071
- function Config_n__7190_2109_help($0, $1) {
9072
- return csegen_487()(Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(2), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($1.a1)))(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_foldMap_Foldable_List(csegen_70(), $15 => $15, {a1: ': ', a2: {a1: (Data_String_replicate(Prelude_Types_prim__integerToNat((Data_Config_longestSettablePropName()-Prelude_Types_String_length($1.a1))), ' ')+$1.a2), a2: {h: 0}}})));
9091
+ /* Config.7655:2109:help */
9092
+ function Config_n__7655_2109_help($0, $1) {
9093
+ return csegen_491()(Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(2), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($1.a1)))(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_foldMap_Foldable_List(csegen_70(), $15 => $15, {a1: ': ', a2: {a1: (Data_String_replicate(Prelude_Types_prim__integerToNat((Data_Config_longestSettablePropName()-Prelude_Types_String_length($1.a1))), ' ')+$1.a2), a2: {h: 0}}})));
9073
9094
  }
9074
9095
 
9075
- /* Config.7286:2219:enterForDefaultStr */
9076
- function Config_n__7286_2219_enterForDefaultStr($0, $1, $2, $3, $4) {
9096
+ /* Config.7751:2219:enterForDefaultStr */
9097
+ function Config_n__7751_2219_enterForDefaultStr($0, $1, $2, $3, $4) {
9077
9098
  return Prelude_Types_foldMap_Foldable_List(csegen_70(), $9 => $9, {a1: ' (ENTER for default: ', a2: {a1: $4, a2: {a1: ')', a2: {h: 0}}}});
9078
9099
  }
9079
9100
 
9080
- /* Config.6496:1402:drop' */
9081
- function Config_n__6496_1402_dropx27($0, $1) {
9101
+ /* Config.6961:1402:drop' */
9102
+ function Config_n__6961_1402_dropx27($0, $1) {
9082
9103
  return Config_with__dropPrefixx27x2cdropx27_1410($0, $1, Data_List_PrefixSuffix_dropPrefix($8 => $9 => Decidable_Equality_decEq_DecEq_Char()($8)($9), Prelude_Types_fastUnpack($0), $1));
9083
9104
  }
9084
9105
 
9085
- /* Config.7286:2220:defaultStr */
9086
- function Config_n__7286_2220_defaultStr($0, $1, $2, $3, $4, $5) {
9087
- return Data_Maybe_fromMaybe(() => '', csegen_60()($d => Config_n__7286_2219_enterForDefaultStr($0, $1, $2, $3, $4($d)))($5));
9106
+ /* Config.7751:2220:defaultStr */
9107
+ function Config_n__7751_2220_defaultStr($0, $1, $2, $3, $4, $5) {
9108
+ return Data_Maybe_fromMaybe(() => '', csegen_60()($d => Config_n__7751_2219_enterForDefaultStr($0, $1, $2, $3, $4($d)))($5));
9088
9109
  }
9089
9110
 
9090
- /* Config.6385:1295:checkAssignSettings */
9091
- function Config_n__6385_1295_checkAssignSettings($0, $1) {
9111
+ /* Config.6850:1295:checkAssignSettings */
9112
+ function Config_n__6850_1295_checkAssignSettings($0, $1) {
9092
9113
  let $2;
9093
9114
  switch($1.a6) {
9094
9115
  case 1: {
@@ -9119,7 +9140,7 @@ function Config_writeConfig($0) {
9119
9140
  const $10 = res => $11 => $12 => {
9120
9141
  switch(res.h) {
9121
9142
  case 1: /* Right */ return Data_Promise_pure_Applicative_Promise($0, $11, $12);
9122
- case 0: /* Left */ return Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_70(), $1e => $1e, {a1: csegen_62()('Failed to write updated config file to '), a2: {a1: csegen_62()(Data_Config_rf__filepath($0)), a2: {a1: csegen_498(), a2: {a1: csegen_62()(System_File_Error_show_Show_FileError(res.a1)), a2: csegen_442()}}}}), $11, $12);
9143
+ case 0: /* Left */ return Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_70(), $1e => $1e, {a1: csegen_62()('Failed to write updated config file to '), a2: {a1: csegen_62()(Data_Config_rf__filepath($0)), a2: {a1: csegen_502(), a2: {a1: csegen_62()(System_File_Error_show_Show_FileError(res.a1)), a2: csegen_446()}}}}), $11, $12);
9123
9144
  }
9124
9145
  };
9125
9146
  return Data_Promise_x3ex3ex3d_Monad_Promise(System_File_ReadWrite_writeFile(csegen_94(), Data_Config_rf__filepath($0), Language_JSON_Data_format(0n, 2n, Data_Config_json($0))), $10);
@@ -9141,7 +9162,7 @@ function Config_syncIfOld($0, $1) {
9141
9162
  case 0: return $14 => $15 => Data_Promise_pure_Applicative_Promise($1, $14, $15);
9142
9163
  }
9143
9164
  };
9144
- return Data_Promise_x3ex3ex3d_Monad_Promise(Config_n__6297_1212_oneDayAgo($0, $1, csegen_94()), $9);
9165
+ return Data_Promise_x3ex3ex3d_Monad_Promise(Config_n__6762_1212_oneDayAgo($0, $1, csegen_94()), $9);
9145
9166
  }
9146
9167
 
9147
9168
  /* Config.syncConfig : Config => Octokit => Bool -> Promise Config */
@@ -9153,7 +9174,7 @@ function Config_syncConfig($0, $1, $2) {
9153
9174
  const $1e = {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};
9154
9175
  return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_56()(Config_writeConfig($1e)), $35 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_when(csegen_86(), $2, () => Data_Promise_x3ex3ex3d_Monad_Promise($3f => $40 => $41 => Data_Promise_liftIO_HasIO_Promise($44 => Prelude_IO_prim__putStr('Your updated configuration is:\n', $44), $3f, $40, $41), $4c => $4d => $4e => $4f => Data_Promise_liftIO_HasIO_Promise($52 => Prelude_IO_prim__putStr((Data_Config_show_Show_Config($1e)+'\n'), $52), $4d, $4e, $4f))), $5e => $5f => $60 => Data_Promise_pure_Applicative_Promise($1e, $5f, $60)));
9155
9176
  };
9156
- return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_501(), $1d);
9177
+ return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_505(), $1d);
9157
9178
  };
9158
9179
  return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listOrgMembers($1, $0.a2), $19);
9159
9180
  };
@@ -9164,7 +9185,7 @@ function Config_syncConfig($0, $1, $2) {
9164
9185
 
9165
9186
  /* Config.settablePropsWithHelp : Config => String */
9166
9187
  function Config_settablePropsWithHelp($0) {
9167
- return Util_renderString($0, Text_PrettyPrint_Prettyprinter_Doc_vsep(csegen_116()($a => Config_n__7190_2109_help($0, $a))(Data_Config_settablePropNamesAndHelp())));
9188
+ return Util_renderString($0, Text_PrettyPrint_Prettyprinter_Doc_vsep(csegen_116()($a => Config_n__7655_2109_help($0, $a))(Data_Config_settablePropNamesAndHelp())));
9168
9189
  }
9169
9190
 
9170
9191
  /* Config.setConfig : Config => String -> String -> Promise Config */
@@ -9207,7 +9228,7 @@ function Config_preferOriginRemote($0) {
9207
9228
 
9208
9229
  /* Config.parseGitHubURI : String -> Maybe GitRemote */
9209
9230
  function Config_parseGitHubURI($0) {
9210
- return Prelude_Types_x3cx7cx3e_Alternative_Maybe(Config_n__6543_1450_parseHTTPS($0, $0), () => Config_n__6543_1451_parseSSH($0, $0));
9231
+ return Prelude_Types_x3cx7cx3e_Alternative_Maybe(Config_n__7008_1450_parseHTTPS($0, $0), () => Config_n__7008_1451_parseSSH($0, $0));
9211
9232
  }
9212
9233
 
9213
9234
  /* Config.parseBool : String -> Maybe Bool */
@@ -9225,10 +9246,10 @@ function Config_loadOrCreateConfig($0, $1, $2, $3) {
9225
9246
  case 0: /* File */ {
9226
9247
  switch($c.a1.a1.h) {
9227
9248
  case 3: /* FileNotFound */ return Config_createConfig($0, $1, $2, $3);
9228
- default: return $1b => $1c => Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_70(), $23 => $23, {a1: csegen_507(), a2: {a1: csegen_508(), a2: {a1: csegen_498(), a2: {a1: csegen_62()(Config_show_Show_ConfigError($c.a1)), a2: csegen_442()}}}}), $1b, $1c);
9249
+ default: return $1b => $1c => Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_70(), $23 => $23, {a1: csegen_511(), a2: {a1: csegen_512(), a2: {a1: csegen_502(), a2: {a1: csegen_62()(Config_show_Show_ConfigError($c.a1)), a2: csegen_446()}}}}), $1b, $1c);
9229
9250
  }
9230
9251
  }
9231
- default: return $38 => $39 => Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_70(), $40 => $40, {a1: csegen_507(), a2: {a1: csegen_508(), a2: {a1: csegen_498(), a2: {a1: csegen_62()(Config_show_Show_ConfigError($c.a1)), a2: csegen_442()}}}}), $38, $39);
9252
+ default: return $38 => $39 => Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_70(), $40 => $40, {a1: csegen_511(), a2: {a1: csegen_512(), a2: {a1: csegen_502(), a2: {a1: csegen_62()(Config_show_Show_ConfigError($c.a1)), a2: csegen_446()}}}}), $38, $39);
9232
9253
  }
9233
9254
  }
9234
9255
  }
@@ -9257,14 +9278,14 @@ function Config_loadConfig($0, $1, $2) {
9257
9278
  }
9258
9279
  };
9259
9280
  const $a = {a1: $b, a2: a => $13 => ({h: 1 /* Right */, a1: $13}), a3: $15};
9260
- const $9 = {a1: $a, a2: csegen_196(), a3: csegen_197()};
9281
+ const $9 = {a1: $a, a2: csegen_200(), a3: csegen_201()};
9261
9282
  const $24 = b => a => func => $25 => {
9262
9283
  switch($25.h) {
9263
9284
  case 0: /* Left */ return {h: 0 /* Left */, a1: $25.a1};
9264
9285
  case 1: /* Right */ return {h: 1 /* Right */, a1: func($25.a1)};
9265
9286
  }
9266
9287
  };
9267
- const $23 = {a1: $24, a2: csegen_213(), a3: csegen_217()};
9288
+ const $23 = {a1: $24, a2: csegen_217(), a3: csegen_221()};
9268
9289
  return Prelude_Interfaces_Monad_x3ex3ex3d_Monad_Composex28x28x2ex20x24mx29x20x24tx29($0.a1, $9, $23, $4, $5);
9269
9290
  };
9270
9291
  const $36 = $0.a1.a1.a1;
@@ -9335,14 +9356,14 @@ function Config_findConfig($0, $1, $2) {
9335
9356
 
9336
9357
  /* Config.dropPrefix' : String -> String -> Maybe String */
9337
9358
  function Config_dropPrefixx27($0, $1) {
9338
- return csegen_60()($6 => Prelude_Types_fastPack($6))(Config_n__6496_1402_dropx27($0, Prelude_Types_fastUnpack($1)));
9359
+ return csegen_60()($6 => Prelude_Types_fastPack($6))(Config_n__6961_1402_dropx27($0, Prelude_Types_fastUnpack($1)));
9339
9360
  }
9340
9361
 
9341
9362
  /* Config.createConfig : Git => Maybe String -> Bool -> Maybe String -> Promise Config */
9342
9363
  function Config_createConfig($0, $1, $2, $3) {
9343
9364
  const $21 = $22 => {
9344
9365
  const $31 = $32 => {
9345
- const $34 = Config_n__7286_2219_enterForDefaultStr($0, $3, $2, $1, 'unset');
9366
+ const $34 = Config_n__7751_2219_enterForDefaultStr($0, $3, $2, $1, 'unset');
9346
9367
  const $33 = () => {
9347
9368
  const $63 = $64 => {
9348
9369
  const $6a = $6b => {
@@ -9352,20 +9373,20 @@ function Config_createConfig($0, $1, $2, $3) {
9352
9373
  }
9353
9374
  };
9354
9375
  const $67 = csegen_55()($6a);
9355
- const $66 = $67(csegen_524());
9376
+ const $66 = $67(csegen_528());
9356
9377
  const $74 = configPAT => {
9357
9378
  const $80 = $81 => {
9358
9379
  switch($81.h) {
9359
9380
  case undefined: /* just */ {
9360
9381
  const $8f = remoteGuess => {
9361
9382
  const $a5 = defaultOrgAndRepo => {
9362
- const $a6 = Config_n__7286_2220_defaultStr($0, $3, $2, $1, csegen_485(), defaultOrgAndRepo);
9383
+ const $a6 = Config_n__7751_2220_defaultStr($0, $3, $2, $1, csegen_489(), defaultOrgAndRepo);
9363
9384
  const $d0 = $d1 => {
9364
9385
  const $eb = org => {
9365
- const $ec = Config_n__7286_2220_defaultStr($0, $3, $2, $1, csegen_480(), defaultOrgAndRepo);
9386
+ const $ec = Config_n__7751_2220_defaultStr($0, $3, $2, $1, csegen_484(), defaultOrgAndRepo);
9366
9387
  const $116 = $117 => {
9367
9388
  const $131 = repo => {
9368
- const $132 = Config_n__7286_2219_enterForDefaultStr($0, $3, $2, $1, remoteGuess);
9389
+ const $132 = Config_n__7751_2219_enterForDefaultStr($0, $3, $2, $1, remoteGuess);
9369
9390
  const $15a = $15b => {
9370
9391
  const $170 = defaultRemote => {
9371
9392
  const $182 = $183 => {
@@ -9378,12 +9399,12 @@ function Config_createConfig($0, $1, $2, $3) {
9378
9399
  const $200 = $201 => {
9379
9400
  const $208 = mainBranch => {
9380
9401
  const $20c = updatedAt => {
9381
- const $20d = {a1: Prelude_Types_foldMap_Foldable_List(csegen_70(), $213 => $213, {a1: csegen_62()('./'), a2: {a1: csegen_508(), a2: {h: 0}}}), a2: $2, a3: $3};
9402
+ const $20d = {a1: Prelude_Types_foldMap_Foldable_List(csegen_70(), $213 => $213, {a1: csegen_62()('./'), a2: {a1: csegen_512(), a2: {h: 0}}}), a2: $2, a3: $3};
9382
9403
  const $224 = teamSlugs => {
9383
9404
  const $22b = repoLabels => {
9384
9405
  const $231 = orgMembers => {
9385
- const $232 = {a1: updatedAt, a2: org, a3: repo, a4: defaultRemote, a5: mainBranch, a6: assignTeams, a7: assignUsers, a8: commentOnAssign, a9: teamSlugs, a10: repoLabels, a11: orgMembers, a12: csegen_406()(configPAT), a13: $20d};
9386
- return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_56()(Config_writeConfig($232)), $24b => Data_Promise_x3ex3ex3d_Monad_Promise($24e => $24f => $250 => Data_Promise_liftIO_HasIO_Promise($253 => Prelude_IO_prim__putStr((csegen_62()('Your new configuration is:')+'\n'), $253), $24e, $24f, $250), $260 => Data_Promise_x3ex3ex3d_Monad_Promise($263 => $264 => $265 => Data_Promise_liftIO_HasIO_Promise($268 => Prelude_IO_prim__putStr((Data_Config_show_Show_Config($232)+'\n'), $268), $263, $264, $265), $274 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Types_either(() => $279 => Util_renderIO($232, csegen_94(), $279), () => csegen_478(), Config_checkConfigConsistency($232)), $285 => $286 => $287 => Data_Promise_pure_Applicative_Promise($232, $286, $287)))));
9406
+ const $232 = {a1: updatedAt, a2: org, a3: repo, a4: defaultRemote, a5: mainBranch, a6: assignTeams, a7: assignUsers, a8: commentOnAssign, a9: teamSlugs, a10: repoLabels, a11: orgMembers, a12: csegen_412()(configPAT), a13: $20d};
9407
+ return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_56()(Config_writeConfig($232)), $24b => Data_Promise_x3ex3ex3d_Monad_Promise($24e => $24f => $250 => Data_Promise_liftIO_HasIO_Promise($253 => Prelude_IO_prim__putStr((csegen_62()('Your new configuration is:')+'\n'), $253), $24e, $24f, $250), $260 => Data_Promise_x3ex3ex3d_Monad_Promise($263 => $264 => $265 => Data_Promise_liftIO_HasIO_Promise($268 => Prelude_IO_prim__putStr((Data_Config_show_Show_Config($232)+'\n'), $268), $263, $264, $265), $274 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Types_either(() => $279 => Util_renderIO($232, csegen_94(), $279), () => csegen_482(), Config_checkConfigConsistency($232)), $285 => $286 => $287 => Data_Promise_pure_Applicative_Promise($232, $286, $287)))));
9387
9408
  };
9388
9409
  return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listOrgMembers(_, org), $231);
9389
9410
  };
@@ -9391,7 +9412,7 @@ function Config_createConfig($0, $1, $2, $3) {
9391
9412
  };
9392
9413
  return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listTeams(_, org), $224);
9393
9414
  };
9394
- return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_501(), $20c);
9415
+ return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_505(), $20c);
9395
9416
  };
9396
9417
  return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_getRepoDefaultBranch(_, org, repo), $208);
9397
9418
  };
@@ -9399,31 +9420,31 @@ function Config_createConfig($0, $1, $2, $3) {
9399
9420
  };
9400
9421
  return Data_Promise_x3ex3ex3d_Monad_Promise($1e2 => $1e3 => $1e4 => Data_Promise_liftIO_HasIO_Promise(FFI_GitHub_octokit($81.a1), $1e2, $1e3, $1e4), $1ec);
9401
9422
  };
9402
- return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_55()($1d4 => Config_n__7286_2216_yesUnlessNo($0, $3, $2, $1, Data_String_trim($1d4)))(csegen_524()), $1df);
9423
+ return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_55()($1d4 => Config_n__7751_2216_yesUnlessNo($0, $3, $2, $1, Data_String_trim($1d4)))(csegen_528()), $1df);
9403
9424
  };
9404
9425
  return Data_Promise_x3ex3ex3d_Monad_Promise($1bd => $1be => $1bf => Data_Promise_liftIO_HasIO_Promise($1c2 => Prelude_IO_prim__putStr(csegen_62()('Would you like harmony to assign individual users when it assigns reviewers? [Y/n] '), $1c2), $1bd, $1be, $1bf), $1cc);
9405
9426
  };
9406
- return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_55()($1af => Config_n__7286_2216_yesUnlessNo($0, $3, $2, $1, Data_String_trim($1af)))(csegen_524()), $1ba);
9427
+ return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_55()($1af => Config_n__7751_2216_yesUnlessNo($0, $3, $2, $1, Data_String_trim($1af)))(csegen_528()), $1ba);
9407
9428
  };
9408
9429
  return Data_Promise_x3ex3ex3d_Monad_Promise($198 => $199 => $19a => Data_Promise_liftIO_HasIO_Promise($19d => Prelude_IO_prim__putStr(csegen_62()('Would you like harmony to assign teams when it assigns reviewers? [Y/n] '), $19d), $198, $199, $19a), $1a7);
9409
9430
  };
9410
- return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_55()($18a => Config_n__7286_2216_yesUnlessNo($0, $3, $2, $1, Data_String_trim($18a)))(csegen_524()), $195);
9431
+ return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_55()($18a => Config_n__7751_2216_yesUnlessNo($0, $3, $2, $1, Data_String_trim($18a)))(csegen_528()), $195);
9411
9432
  };
9412
9433
  return Data_Promise_x3ex3ex3d_Monad_Promise($173 => $174 => $175 => Data_Promise_liftIO_HasIO_Promise($178 => Prelude_IO_prim__putStr(csegen_62()('Would you like harmony to comment when it assigns reviewers? [Y/n] '), $178), $173, $174, $175), $182);
9413
9434
  };
9414
- return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_55()($162 => ({a1: Config_n__7286_2215_orIfEmpty($0, $3, $2, $1, {a1: remoteGuess}, Data_String_trim($162))}))(csegen_524()), $170);
9435
+ return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_55()($162 => ({a1: Config_n__7751_2215_orIfEmpty($0, $3, $2, $1, {a1: remoteGuess}, Data_String_trim($162))}))(csegen_528()), $170);
9415
9436
  };
9416
- return Data_Promise_x3ex3ex3d_Monad_Promise($13b => $13c => $13d => Data_Promise_liftIO_HasIO_Promise($140 => Prelude_IO_prim__putStr((Prelude_Types_foldMap_Foldable_List(csegen_70(), $148 => $148, {a1: csegen_62()('What GitHub remote repo would you like to use harmony for'), a2: {a1: csegen_62()($132), a2: csegen_531()}})+'\n'), $140), $13b, $13c, $13d), $15a);
9437
+ return Data_Promise_x3ex3ex3d_Monad_Promise($13b => $13c => $13d => Data_Promise_liftIO_HasIO_Promise($140 => Prelude_IO_prim__putStr((Prelude_Types_foldMap_Foldable_List(csegen_70(), $148 => $148, {a1: csegen_62()('What GitHub remote repo would you like to use harmony for'), a2: {a1: csegen_62()($132), a2: csegen_535()}})+'\n'), $140), $13b, $13c, $13d), $15a);
9417
9438
  };
9418
- return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_55()($11e => Config_n__7286_2215_orIfEmpty($0, $3, $2, $1, Config_n__7286_2218_repo($0, $3, $2, $1)(defaultOrgAndRepo), Data_String_trim($11e)))(csegen_524()), $131);
9439
+ return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_55()($11e => Config_n__7751_2215_orIfEmpty($0, $3, $2, $1, Config_n__7751_2218_repo($0, $3, $2, $1)(defaultOrgAndRepo), Data_String_trim($11e)))(csegen_528()), $131);
9419
9440
  };
9420
- return Data_Promise_x3ex3ex3d_Monad_Promise($f7 => $f8 => $f9 => Data_Promise_liftIO_HasIO_Promise($fc => Prelude_IO_prim__putStr((Prelude_Types_foldMap_Foldable_List(csegen_70(), $104 => $104, {a1: csegen_62()('What repository would you like to use harmony for'), a2: {a1: csegen_62()($ec), a2: csegen_531()}})+'\n'), $fc), $f7, $f8, $f9), $116);
9441
+ return Data_Promise_x3ex3ex3d_Monad_Promise($f7 => $f8 => $f9 => Data_Promise_liftIO_HasIO_Promise($fc => Prelude_IO_prim__putStr((Prelude_Types_foldMap_Foldable_List(csegen_70(), $104 => $104, {a1: csegen_62()('What repository would you like to use harmony for'), a2: {a1: csegen_62()($ec), a2: csegen_535()}})+'\n'), $fc), $f7, $f8, $f9), $116);
9421
9442
  };
9422
- return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_55()($d8 => Config_n__7286_2215_orIfEmpty($0, $3, $2, $1, Config_n__7286_2217_org($0, $3, $2, $1)(defaultOrgAndRepo), Data_String_trim($d8)))(csegen_524()), $eb);
9443
+ return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_55()($d8 => Config_n__7751_2215_orIfEmpty($0, $3, $2, $1, Config_n__7751_2217_org($0, $3, $2, $1)(defaultOrgAndRepo), Data_String_trim($d8)))(csegen_528()), $eb);
9423
9444
  };
9424
- return Data_Promise_x3ex3ex3d_Monad_Promise($b1 => $b2 => $b3 => Data_Promise_liftIO_HasIO_Promise($b6 => Prelude_IO_prim__putStr((Prelude_Types_foldMap_Foldable_List(csegen_70(), $be => $be, {a1: csegen_62()('What GitHub org would you like to use harmony for'), a2: {a1: csegen_62()($a6), a2: csegen_531()}})+'\n'), $b6), $b1, $b2, $b3), $d0);
9445
+ return Data_Promise_x3ex3ex3d_Monad_Promise($b1 => $b2 => $b3 => Data_Promise_liftIO_HasIO_Promise($b6 => Prelude_IO_prim__putStr((Prelude_Types_foldMap_Foldable_List(csegen_70(), $be => $be, {a1: csegen_62()('What GitHub org would you like to use harmony for'), a2: {a1: csegen_62()($a6), a2: csegen_535()}})+'\n'), $b6), $b1, $b2, $b3), $d0);
9425
9446
  };
9426
- return Data_Promise_x3ex3ex3d_Monad_Promise($92 => $93 => Data_Promise_x3cx7cx3e_Alternative_Promise(csegen_55()($9a => Config_parseGitHubURI($9a))(FFI_Git_remoteURI($0, remoteGuess)), () => csegen_528(), $92, $93), $a5);
9447
+ return Data_Promise_x3ex3ex3d_Monad_Promise($92 => $93 => Data_Promise_x3cx7cx3e_Alternative_Promise(csegen_55()($9a => Config_parseGitHubURI($9a))(FFI_Git_remoteURI($0, remoteGuess)), () => csegen_532(), $92, $93), $a5);
9427
9448
  };
9428
9449
  return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_55()($89 => Config_preferOriginRemote($89))(FFI_Git_listRemotes($0)), $8f);
9429
9450
  }
@@ -9445,16 +9466,16 @@ function Config_createConfig($0, $1, $2, $3) {
9445
9466
 
9446
9467
  /* Config.checkConfigConsistency : Config -> Either (Doc AnsiStyle) () */
9447
9468
  function Config_checkConfigConsistency($0) {
9448
- return Config_n__6385_1295_checkAssignSettings($0, $0);
9469
+ return Config_n__6850_1295_checkAssignSettings($0, $0);
9449
9470
  }
9450
9471
 
9451
- /* Util.4980:1271:startOver */
9452
- const Util_n__4980_1271_startOver = __lazy(function () {
9472
+ /* Util.4982:1271:startOver */
9473
+ const Util_n__4982_1271_startOver = __lazy(function () {
9453
9474
  return {a1: 0, a2: {h: 0}};
9454
9475
  });
9455
9476
 
9456
- /* Util.4980:1272:guardSuccess */
9457
- function Util_n__4980_1272_guardSuccess($0) {
9477
+ /* Util.4982:1272:guardSuccess */
9478
+ function Util_n__4982_1272_guardSuccess($0) {
9458
9479
  switch($0.h) {
9459
9480
  case undefined: /* cons */ {
9460
9481
  switch($0.a1) {
@@ -9467,13 +9488,13 @@ function Util_n__4980_1272_guardSuccess($0) {
9467
9488
  }
9468
9489
  }
9469
9490
 
9470
- /* Util.4980:1273:go */
9471
- function Util_n__4980_1273_go($0, $1) {
9491
+ /* Util.4982:1273:go */
9492
+ function Util_n__4982_1273_go($0, $1) {
9472
9493
  switch($0.a1) {
9473
9494
  case 0: {
9474
9495
  switch(Prelude_Types_isAlpha($1)) {
9475
9496
  case 1: return {a1: 1, a2: {a1: $1, a2: $0.a2}};
9476
- case 0: return Util_n__4980_1271_startOver();
9497
+ case 0: return Util_n__4982_1271_startOver();
9477
9498
  }
9478
9499
  }
9479
9500
  case 1: {
@@ -9482,7 +9503,7 @@ function Util_n__4980_1273_go($0, $1) {
9482
9503
  default: {
9483
9504
  switch(Prelude_Types_isAlpha($1)) {
9484
9505
  case 1: return {a1: 1, a2: {a1: $1, a2: $0.a2}};
9485
- case 0: return Util_n__4980_1271_startOver();
9506
+ case 0: return Util_n__4982_1271_startOver();
9486
9507
  }
9487
9508
  }
9488
9509
  }
@@ -9490,7 +9511,7 @@ function Util_n__4980_1273_go($0, $1) {
9490
9511
  case 2: {
9491
9512
  switch(Prelude_Types_isDigit($1)) {
9492
9513
  case 1: return {a1: 3, a2: {a1: $1, a2: $0.a2}};
9493
- case 0: return Util_n__4980_1271_startOver();
9514
+ case 0: return Util_n__4982_1271_startOver();
9494
9515
  }
9495
9516
  }
9496
9517
  case 3: {
@@ -9503,8 +9524,8 @@ function Util_n__4980_1273_go($0, $1) {
9503
9524
  }
9504
9525
  }
9505
9526
 
9506
- /* Util.4834:1128:getMoreLines */
9507
- function Util_n__4834_1128_getMoreLines($0, $1, $2) {
9527
+ /* Util.4836:1128:getMoreLines */
9528
+ function Util_n__4836_1128_getMoreLines($0, $1, $2) {
9508
9529
  switch($2.h) {
9509
9530
  case 0: /* nothing */ return $0.a1.a1.a2(undefined)(Prelude_Types_List_reverse($1));
9510
9531
  case undefined: /* just */ {
@@ -9520,13 +9541,13 @@ function Util_n__4834_1128_getMoreLines($0, $1, $2) {
9520
9541
  case '': {
9521
9542
  switch(line) {
9522
9543
  case '': return $0.a1.a1.a2(undefined)(Prelude_Types_List_reverse($1.a2));
9523
- default: return Util_n__4834_1128_getMoreLines($0, {a1: line, a2: $1}, $2.a1());
9544
+ default: return Util_n__4836_1128_getMoreLines($0, {a1: line, a2: $1}, $2.a1());
9524
9545
  }
9525
9546
  }
9526
- default: return Util_n__4834_1128_getMoreLines($0, {a1: line, a2: $1}, $2.a1());
9547
+ default: return Util_n__4836_1128_getMoreLines($0, {a1: line, a2: $1}, $2.a1());
9527
9548
  }
9528
9549
  }
9529
- default: return Util_n__4834_1128_getMoreLines($0, {a1: line, a2: $1}, $2.a1());
9550
+ default: return Util_n__4836_1128_getMoreLines($0, {a1: line, a2: $1}, $2.a1());
9530
9551
  }
9531
9552
  };
9532
9553
  return $f($33);
@@ -9577,12 +9598,12 @@ function Util_relativeToRoot($0, $1) {
9577
9598
 
9578
9599
  /* Util.parseJiraPrefix : String -> Maybe String */
9579
9600
  function Util_parseJiraPrefix($0) {
9580
- return csegen_60()($5 => Prelude_Types_fastPack(Prelude_Types_List_reverse($5)))(Util_n__4980_1272_guardSuccess(Prelude_Types_foldl_Foldable_List($f => $10 => Util_n__4980_1273_go($f, $10), Util_n__4980_1271_startOver(), Prelude_Types_fastUnpack($0))));
9601
+ return csegen_60()($5 => Prelude_Types_fastPack(Prelude_Types_List_reverse($5)))(Util_n__4982_1272_guardSuccess(Prelude_Types_foldl_Foldable_List($f => $10 => Util_n__4982_1273_go($f, $10), Util_n__4982_1271_startOver(), Prelude_Types_fastUnpack($0))));
9581
9602
  }
9582
9603
 
9583
9604
  /* Util.getManyLines : HasIO io => Fuel -> io (List String) */
9584
9605
  function Util_getManyLines($0, $1) {
9585
- return Util_n__4834_1128_getMoreLines($0, {h: 0}, $1);
9606
+ return Util_n__4836_1128_getMoreLines($0, {h: 0}, $1);
9586
9607
  }
9587
9608
 
9588
9609
  /* Data.List.PrefixSuffix.with block in with block in dropPrefix */
@@ -9639,7 +9660,7 @@ function Data_List_PrefixSuffix_dropPrefix($0, $1, $2) {
9639
9660
  }
9640
9661
 
9641
9662
  /* Commands.case block in contribute */
9642
- function Commands_case__contribute_2366($0, $1, $2, $3, $4, $5, $6, $7, $8, $9, $a) {
9663
+ function Commands_case__contribute_2594($0, $1, $2, $3, $4, $5, $6, $7, $8, $9, $a) {
9643
9664
  const $c = Data_List_headx27(Data_List_drop($6, Prelude_Types_List_tailRecAppend($a.a1, $a.a2)));
9644
9665
  switch($c.h) {
9645
9666
  case 0: /* nothing */ return $16 => $17 => Data_Promise_reject(csegen_62()('No open PRs to review!'), $16, $17);
@@ -9662,7 +9683,7 @@ function Commands_case__contribute_2366($0, $1, $2, $3, $4, $5, $6, $7, $8, $9,
9662
9683
  }
9663
9684
 
9664
9685
  /* Commands.case block in case block in graph */
9665
- function Commands_case__casex20blockx20inx20graph_1940($0, $1, $2, $3, $4, $5, $6, $7) {
9686
+ function Commands_case__casex20blockx20inx20graph_2168($0, $1, $2, $3, $4, $5, $6, $7) {
9666
9687
  let $a;
9667
9688
  switch(Data_Maybe_isJust($3)) {
9668
9689
  case 1: {
@@ -9670,23 +9691,23 @@ function Commands_case__casex20blockx20inx20graph_1940($0, $1, $2, $3, $4, $5, $
9670
9691
  break;
9671
9692
  }
9672
9693
  case 0: {
9673
- $a = $15 => $16 => Data_Promise_pure_Applicative_Promise(Data_SortedMap_empty(csegen_436()), $15, $16);
9694
+ $a = $15 => $16 => Data_Promise_pure_Applicative_Promise(Data_SortedMap_empty(csegen_442()), $15, $16);
9674
9695
  break;
9675
9696
  }
9676
9697
  }
9677
- return Data_Promise_x3ex3ex3d_Monad_Promise($a, completedReviews => Util_renderIO($2, csegen_94(), Graph_reviewsGraph(csegen_436(), {a1: ann => $29 => Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($29), a2: ann => $2d => $2e => Text_PrettyPrint_Prettyprinter_Doc_prettyPrec_Pretty_String($2d, $2e)}, $7.a2, $7.a1, $5, {a1: completedReviews})));
9698
+ return Data_Promise_x3ex3ex3d_Monad_Promise($a, completedReviews => Util_renderIO($2, csegen_94(), Graph_reviewsGraph(csegen_442(), {a1: ann => $29 => Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($29), a2: ann => $2d => $2e => Text_PrettyPrint_Prettyprinter_Doc_prettyPrec_Pretty_String($2d, $2e)}, $7.a2, $7.a1, $5, {a1: completedReviews})));
9678
9699
  }
9679
9700
 
9680
9701
  /* Commands.case block in graph */
9681
- function Commands_case__graph_1898($0, $1, $2, $3, $4) {
9702
+ function Commands_case__graph_2126($0, $1, $2, $3, $4) {
9682
9703
  switch($4.h) {
9683
- case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listTeamMembers($0, $2.a2, $4.a1), teamMemberLogins => Data_Promise_x3ex3ex3d_Monad_Promise(PullRequest_listPartitionedPRs($2, $0, 4n, 100n), prs => Commands_case__casex20blockx20inx20graph_1940($0, $1, $2, $3, $4.a1, teamMemberLogins, prs, PullRequest_rf__allReviewers(prs))));
9704
+ case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listTeamMembers($0, $2.a2, $4.a1), teamMemberLogins => Data_Promise_x3ex3ex3d_Monad_Promise(PullRequest_listPartitionedPRs($2, $0, 4n, 100n), prs => Commands_case__casex20blockx20inx20graph_2168($0, $1, $2, $3, $4.a1, teamMemberLogins, prs, PullRequest_rf__allReviewers(prs))));
9684
9705
  case 0: /* nothing */ return $21 => $22 => Data_Promise_reject('The graph command expects the name of a GitHub Team as an argument.', $21, $22);
9685
9706
  }
9686
9707
  }
9687
9708
 
9688
9709
  /* Commands.case block in assign */
9689
- function Commands_case__assign_1538($0, $1, $2, $3, $4, $5) {
9710
+ function Commands_case__assign_1766($0, $1, $2, $3, $4, $5) {
9690
9711
  let $8;
9691
9712
  switch(Prelude_Types_null_Foldable_List($5.a1)) {
9692
9713
  case 1: {
@@ -9735,52 +9756,43 @@ function Commands_case__assign_1538($0, $1, $2, $3, $4, $5) {
9735
9756
  }
9736
9757
 
9737
9758
  /* Commands.case block in case block in assign,partitionedArgs */
9738
- function Commands_case__casex20blockx20inx20assignx2cpartitionedArgs_1458($0, $1, $2, $3, $4, $5, $6, $7) {
9759
+ function Commands_case__casex20blockx20inx20assignx2cpartitionedArgs_1686($0, $1, $2, $3, $4, $5, $6, $7) {
9739
9760
  const $9 = Prelude_Interfaces_mapHom({a1: d => b => c => a => $d => $e => $f => ({a1: $d($f.a1), a2: $e($f.a2)}), a2: b => c => a => $18 => $19 => ({a1: $18($19.a1), a2: $19.a2}), a3: a => d => b => $20 => $21 => ({a1: $21.a1, a2: $20($21.a2)})}, csegen_116()($2b => Data_String_Extra_drop(1n, $2b)), {a1: $5, a2: $7.a1});
9740
9761
  return {a1: $9.a1, a2: {a1: $7.a2, a2: $9.a2}};
9741
9762
  }
9742
9763
 
9743
9764
  /* Commands.case block in assign,partitionedArgs */
9744
- function Commands_case__assignx2cpartitionedArgs_1432($0, $1, $2, $3, $4, $5) {
9745
- return Commands_case__casex20blockx20inx20assignx2cpartitionedArgs_1458($0, $1, $2, $3, $4, $5.a1, $5.a2, Data_List_partition($12 => Data_String_isPrefixOf('#', $12), $5.a2));
9746
- }
9747
-
9748
- /* Commands.6581:1175:unslugify */
9749
- function Commands_n__6581_1175_unslugify($0, $1, $2, $3, $4, $5) {
9750
- const $6 = Data_List_find($9 => Prelude_EqOrd_x3dx3d_Eq_String($9, $5), $4);
9751
- switch($6.h) {
9752
- case undefined: /* just */ return $6.a1;
9753
- case 0: /* nothing */ return BashCompletion_unslugify($5);
9754
- }
9765
+ function Commands_case__assignx2cpartitionedArgs_1663($0, $1, $2, $3, $4, $5) {
9766
+ return Commands_case__casex20blockx20inx20assignx2cpartitionedArgs_1686($0, $1, $2, $3, $4, $5.a1, $5.a2, Data_List_partition($12 => BashCompletion_isHashPrefix($12), $5.a2));
9755
9767
  }
9756
9768
 
9757
- /* Commands.7146:1694:putNameLn */
9758
- function Commands_n__7146_1694_putNameLn($0, $1, $2, $3) {
9769
+ /* Commands.7860:1922:putNameLn */
9770
+ function Commands_n__7860_1922_putNameLn($0, $1, $2, $3) {
9759
9771
  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}}}});
9760
9772
  }
9761
9773
 
9762
- /* Commands.6581:1177:putLabels */
9763
- function Commands_n__6581_1177_putLabels($0, $1, $2, $3, $4) {
9764
- return Text_PrettyPrint_Prettyprinter_Doc_hcat(Data_List_intersperse(csegen_575(), csegen_116()($f => Commands_n__6581_1176_putLabel($0, $1, $2, $3, $f))($4)));
9774
+ /* Commands.7181:1299:putLabels */
9775
+ function Commands_n__7181_1299_putLabels($0, $1, $2, $3, $4) {
9776
+ return Text_PrettyPrint_Prettyprinter_Doc_hcat(Data_List_intersperse(csegen_578(), csegen_116()($f => Commands_n__7181_1298_putLabel($0, $1, $2, $3, $f))($4)));
9765
9777
  }
9766
9778
 
9767
- /* Commands.6581:1176:putLabel */
9768
- function Commands_n__6581_1176_putLabel($0, $1, $2, $3, $4) {
9779
+ /* Commands.7181:1298:putLabel */
9780
+ function Commands_n__7181_1298_putLabel($0, $1, $2, $3, $4) {
9769
9781
  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)));
9770
9782
  }
9771
9783
 
9772
- /* Commands.6819:1420:partitionedArgs */
9773
- function Commands_n__6819_1420_partitionedArgs($0, $1, $2, $3, $4) {
9774
- return Commands_case__assignx2cpartitionedArgs_1432($0, $1, $2, $3, $4, Data_List_partition($e => Data_String_isPrefixOf('+', $e), $4));
9784
+ /* Commands.7536:1651:partitionedArgs */
9785
+ function Commands_n__7536_1651_partitionedArgs($0, $1, $2, $3, $4) {
9786
+ return Commands_case__assignx2cpartitionedArgs_1663($0, $1, $2, $3, $4, Data_List_partition($e => Data_String_isPrefixOf('+', $e), $4));
9775
9787
  }
9776
9788
 
9777
- /* Commands.7596:2145:parseTeamArg */
9778
- function Commands_n__7596_2145_parseTeamArg($0, $1) {
9789
+ /* Commands.8310:2373:parseTeamArg */
9790
+ function Commands_n__8310_2373_parseTeamArg($0, $1) {
9779
9791
  return {a1: {a1: $1}};
9780
9792
  }
9781
9793
 
9782
- /* Commands.7987:2521:parseSkipArg */
9783
- function Commands_n__7987_2521_parseSkipArg($0, $1) {
9794
+ /* Commands.8701:2749:parseSkipArg */
9795
+ function Commands_n__8701_2749_parseSkipArg($0, $1) {
9784
9796
  const $2 = Prelude_Types_fastUnpack($1);
9785
9797
  switch($2.h) {
9786
9798
  case undefined: /* cons */ {
@@ -9802,8 +9814,8 @@ function Commands_n__7987_2521_parseSkipArg($0, $1) {
9802
9814
  }
9803
9815
  }
9804
9816
 
9805
- /* Commands.7596:2144:parseCompletedFlag */
9806
- function Commands_n__7596_2144_parseCompletedFlag($0, $1) {
9817
+ /* Commands.8310:2372:parseCompletedFlag */
9818
+ function Commands_n__8310_2372_parseCompletedFlag($0, $1) {
9807
9819
  switch($1) {
9808
9820
  case '-c': return {a1: {h: 0}};
9809
9821
  case '--completed': return {a1: {h: 0}};
@@ -9811,8 +9823,8 @@ function Commands_n__7596_2144_parseCompletedFlag($0, $1) {
9811
9823
  }
9812
9824
  }
9813
9825
 
9814
- /* Commands.7987:2520:parseCheckoutFlag */
9815
- function Commands_n__7987_2520_parseCheckoutFlag($0, $1) {
9826
+ /* Commands.8701:2748:parseCheckoutFlag */
9827
+ function Commands_n__8701_2748_parseCheckoutFlag($0, $1) {
9816
9828
  switch($1) {
9817
9829
  case '-c': return {a1: {h: 0}};
9818
9830
  case '--checkout': return {a1: {h: 0}};
@@ -9820,8 +9832,8 @@ function Commands_n__7987_2520_parseCheckoutFlag($0, $1) {
9820
9832
  }
9821
9833
  }
9822
9834
 
9823
- /* Commands.7146:1693:forkedUser */
9824
- function Commands_n__7146_1693_forkedUser($0, $1, $2, $3) {
9835
+ /* Commands.7860:1921:forkedUser */
9836
+ function Commands_n__7860_1921_forkedUser($0, $1, $2, $3) {
9825
9837
  return FFI_Concurrency_fork(csegen_94(), ('user --json '+$3));
9826
9838
  }
9827
9839
 
@@ -9830,6 +9842,15 @@ function Commands_whoami($0, $1, $2) {
9830
9842
  return User_Me_printInfoOnSelf($0, $2, $1);
9831
9843
  }
9832
9844
 
9845
+ /* Commands.unslugifyLabel : List String -> String -> String */
9846
+ function Commands_unslugifyLabel($0, $1) {
9847
+ const $2 = Data_List_find($5 => Prelude_EqOrd_x3dx3d_Eq_String($5, $1), $0);
9848
+ switch($2.h) {
9849
+ case undefined: /* just */ return $2.a1;
9850
+ case 0: /* nothing */ return BashCompletion_unslugify(BashCompletion_unhashify($1));
9851
+ }
9852
+ }
9853
+
9833
9854
  /* Commands.teamNameArg : GraphArg -> Maybe String */
9834
9855
  function Commands_teamNameArg($0) {
9835
9856
  switch($0.h) {
@@ -9856,22 +9877,38 @@ function Commands_reflect($0, $1) {
9856
9877
  return User_Reflect_reflectOnSelf($0, $1);
9857
9878
  }
9858
9879
 
9859
- /* Commands.pr : Config => Git => Octokit => {default False _ : Bool} -> Promise () */
9860
- function Commands_pr($0, $1, $2, $3) {
9861
- const $12 = $13 => $14 => {
9862
- switch($13.h) {
9863
- case undefined: /* cons */ {
9864
- return $16 => {
9865
- switch($13.a1) {
9866
- case 0: return $18 => Data_Promise_liftIO_HasIO_Promise($1b => Prelude_IO_prim__putStr((Data_PullRequest_rf__webURI($0, $13.a2)+'\n'), $1b), $14, $16, $18);
9867
- default: return Data_Promise_pure_Applicative_Promise(undefined, $14, $16);
9880
+ /* Commands.pr : Config => Git => Octokit => {default False _ : Bool} ->
9881
+ List String -> Promise () */
9882
+ function Commands_pr($0, $1, $2, $3, $4) {
9883
+ switch(Prelude_Types_foldMap_Foldable_List({a1: $9 => $a => Prelude_Interfaces_Bool_Semigroup_x3cx2bx3e_Semigroup_AllBool($9, $a), a2: 1}, $10 => BashCompletion_isHashPrefix($10), $4)) {
9884
+ case 1: {
9885
+ const $22 = $23 => {
9886
+ const $26 = $27 => $28 => {
9887
+ switch($23.a1) {
9888
+ case 0: return $2a => Data_Promise_liftIO_HasIO_Promise($2d => Prelude_IO_prim__putStr((Data_PullRequest_rf__webURI($0, $23.a2)+'\n'), $2d), $27, $28, $2a);
9889
+ case 1: return Data_Promise_pure_Applicative_Promise(undefined, $27, $28);
9868
9890
  }
9869
9891
  };
9870
- }
9871
- default: return $2b => Data_Promise_pure_Applicative_Promise(undefined, $14, $2b);
9892
+ const $3d = $3e => {
9893
+ let $42;
9894
+ switch(Prelude_Types_null_Foldable_List($4)) {
9895
+ case 1: {
9896
+ $42 = 0;
9897
+ break;
9898
+ }
9899
+ case 0: {
9900
+ $42 = 1;
9901
+ break;
9902
+ }
9903
+ }
9904
+ return Prelude_Interfaces_when(csegen_86(), $42, () => Commands_label($0, $1, $2, $4));
9905
+ };
9906
+ return Data_Promise_x3ex3ex3d_Monad_Promise($26, $3d);
9907
+ };
9908
+ return Data_Promise_x3ex3ex3d_Monad_Promise(Data_Promise_x3ex3ex3d_Monad_Promise(FFI_Git_currentBranch($1), $1b => PullRequest_identifyOrCreatePR($0, $1, $2, $3, $1b)), $22);
9872
9909
  }
9873
- };
9874
- return Data_Promise_x3ex3ex3d_Monad_Promise(Data_Promise_x3ex3ex3d_Monad_Promise(FFI_Git_currentBranch($1), $b => PullRequest_identifyOrCreatePR($0, $1, $2, $3, $b)), $12);
9910
+ case 0: return $4c => $4d => Data_Promise_reject('The pr command only accepts labels prefixed with \'#\' and the --draft flag.', $4c, $4d);
9911
+ }
9875
9912
  }
9876
9913
 
9877
9914
  /* Commands.parseGraphArgs : List String -> Either String (List GraphArg) */
@@ -9884,7 +9921,7 @@ function Commands_parseGraphArgs($0) {
9884
9921
  switch($0.a2.a2.h) {
9885
9922
  case undefined: /* cons */ return {h: 0 /* Left */, a1: 'graph accepts at most one team name and the --completed flag.'};
9886
9923
  default: {
9887
- const $6 = Prelude_Types_traverse_Traversable_List(csegen_9(), $b => Commands_x3cx7cx7cx3e(csegen_582(), $10 => Commands_n__7596_2144_parseCompletedFlag($0, $10), $15 => Commands_n__7596_2145_parseTeamArg($0, $15), $b), $0);
9924
+ const $6 = Prelude_Types_traverse_Traversable_List(csegen_9(), $b => Commands_x3cx7cx7cx3e(csegen_588(), $10 => Commands_n__8310_2372_parseCompletedFlag($0, $10), $15 => Commands_n__8310_2373_parseTeamArg($0, $15), $b), $0);
9888
9925
  switch($6.h) {
9889
9926
  case undefined: /* just */ return {h: 1 /* Right */, a1: $6.a1};
9890
9927
  case 0: /* nothing */ return {h: 0 /* Left */, a1: 'The graph command expects the name of a GitHub Team and optionally --completed as arguments.'};
@@ -9893,7 +9930,7 @@ function Commands_parseGraphArgs($0) {
9893
9930
  }
9894
9931
  }
9895
9932
  default: {
9896
- const $1d = Prelude_Types_traverse_Traversable_List(csegen_9(), $22 => Commands_x3cx7cx7cx3e(csegen_582(), $27 => Commands_n__7596_2144_parseCompletedFlag($0, $27), $2c => Commands_n__7596_2145_parseTeamArg($0, $2c), $22), $0);
9933
+ const $1d = Prelude_Types_traverse_Traversable_List(csegen_9(), $22 => Commands_x3cx7cx7cx3e(csegen_588(), $27 => Commands_n__8310_2372_parseCompletedFlag($0, $27), $2c => Commands_n__8310_2373_parseTeamArg($0, $2c), $22), $0);
9897
9934
  switch($1d.h) {
9898
9935
  case undefined: /* just */ return {h: 1 /* Right */, a1: $1d.a1};
9899
9936
  case 0: /* nothing */ return {h: 0 /* Left */, a1: 'The graph command expects the name of a GitHub Team and optionally --completed as arguments.'};
@@ -9902,7 +9939,7 @@ function Commands_parseGraphArgs($0) {
9902
9939
  }
9903
9940
  }
9904
9941
  default: {
9905
- const $34 = Prelude_Types_traverse_Traversable_List(csegen_9(), $39 => Commands_x3cx7cx7cx3e(csegen_582(), $3e => Commands_n__7596_2144_parseCompletedFlag($0, $3e), $43 => Commands_n__7596_2145_parseTeamArg($0, $43), $39), $0);
9942
+ const $34 = Prelude_Types_traverse_Traversable_List(csegen_9(), $39 => Commands_x3cx7cx7cx3e(csegen_588(), $3e => Commands_n__8310_2372_parseCompletedFlag($0, $3e), $43 => Commands_n__8310_2373_parseTeamArg($0, $43), $39), $0);
9906
9943
  switch($34.h) {
9907
9944
  case undefined: /* just */ return {h: 1 /* Right */, a1: $34.a1};
9908
9945
  case 0: /* nothing */ return {h: 0 /* Left */, a1: 'The graph command expects the name of a GitHub Team and optionally --completed as arguments.'};
@@ -9921,7 +9958,7 @@ function Commands_parseContributeArgs($0) {
9921
9958
  switch($0.a2.a2.h) {
9922
9959
  case undefined: /* cons */ return {h: 0 /* Left */, a1: 'contribute\'s arguments must be either -<num> to skip num PRs or --checkout (-c) to checkout the branch needing review.'};
9923
9960
  default: {
9924
- const $6 = Prelude_Types_traverse_Traversable_List(csegen_9(), $b => Commands_x3cx7cx7cx3e(csegen_582(), $10 => Commands_n__7987_2521_parseSkipArg($0, $10), $15 => Commands_n__7987_2520_parseCheckoutFlag($0, $15), $b), $0);
9961
+ const $6 = Prelude_Types_traverse_Traversable_List(csegen_9(), $b => Commands_x3cx7cx7cx3e(csegen_588(), $10 => Commands_n__8701_2749_parseSkipArg($0, $10), $15 => Commands_n__8701_2748_parseCheckoutFlag($0, $15), $b), $0);
9925
9962
  switch($6.h) {
9926
9963
  case undefined: /* just */ return {h: 1 /* Right */, a1: $6.a1};
9927
9964
  case 0: /* nothing */ return {h: 0 /* Left */, a1: 'contribute\'s arguments must be either -<num> to skip num PRs or --checkout (-c) to checkout the branch needing review.'};
@@ -9930,7 +9967,7 @@ function Commands_parseContributeArgs($0) {
9930
9967
  }
9931
9968
  }
9932
9969
  default: {
9933
- const $1d = Prelude_Types_traverse_Traversable_List(csegen_9(), $22 => Commands_x3cx7cx7cx3e(csegen_582(), $27 => Commands_n__7987_2521_parseSkipArg($0, $27), $2c => Commands_n__7987_2520_parseCheckoutFlag($0, $2c), $22), $0);
9970
+ const $1d = Prelude_Types_traverse_Traversable_List(csegen_9(), $22 => Commands_x3cx7cx7cx3e(csegen_588(), $27 => Commands_n__8701_2749_parseSkipArg($0, $27), $2c => Commands_n__8701_2748_parseCheckoutFlag($0, $2c), $22), $0);
9934
9971
  switch($1d.h) {
9935
9972
  case undefined: /* just */ return {h: 1 /* Right */, a1: $1d.a1};
9936
9973
  case 0: /* nothing */ return {h: 0 /* Left */, a1: 'contribute\'s arguments must be either -<num> to skip num PRs or --checkout (-c) to checkout the branch needing review.'};
@@ -9939,7 +9976,7 @@ function Commands_parseContributeArgs($0) {
9939
9976
  }
9940
9977
  }
9941
9978
  default: {
9942
- const $34 = Prelude_Types_traverse_Traversable_List(csegen_9(), $39 => Commands_x3cx7cx7cx3e(csegen_582(), $3e => Commands_n__7987_2521_parseSkipArg($0, $3e), $43 => Commands_n__7987_2520_parseCheckoutFlag($0, $43), $39), $0);
9979
+ const $34 = Prelude_Types_traverse_Traversable_List(csegen_9(), $39 => Commands_x3cx7cx7cx3e(csegen_588(), $3e => Commands_n__8701_2749_parseSkipArg($0, $3e), $43 => Commands_n__8701_2748_parseCheckoutFlag($0, $43), $39), $0);
9943
9980
  switch($34.h) {
9944
9981
  case undefined: /* just */ return {h: 1 /* Right */, a1: $34.a1};
9945
9982
  case 0: /* nothing */ return {h: 0 /* Left */, a1: 'contribute\'s arguments must be either -<num> to skip num PRs or --checkout (-c) to checkout the branch needing review.'};
@@ -9950,14 +9987,14 @@ function Commands_parseContributeArgs($0) {
9950
9987
 
9951
9988
  /* Commands.list : Config => Octokit => String -> Promise () */
9952
9989
  function Commands_list($0, $1, $2) {
9953
- return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_584()(FFI_GitHub_listTeamMembers($1, $0.a2, $2)), teamMemberLogins => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Basics_flip(csegen_445(), csegen_585(), Prelude_Types_traverse_Traversable_List(csegen_86(), $1a => Commands_n__7146_1693_forkedUser($1, $2, $0, $1a), teamMemberLogins)), teamMembersJson => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Types_traverse_Traversable_List(csegen_86(), $28 => $29 => Data_Promise_either(csegen_72(), Data_User_parseUser($28), $29), teamMembersJson), teamMembers => Util_renderIO($0, csegen_94(), Text_PrettyPrint_Prettyprinter_Doc_vsep(csegen_116()($3e => Commands_n__7146_1694_putNameLn($1, $2, $0, $3e))(teamMembers))))));
9990
+ return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_590()(FFI_GitHub_listTeamMembers($1, $0.a2, $2)), teamMemberLogins => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Basics_flip(csegen_449(), csegen_591(), Prelude_Types_traverse_Traversable_List(csegen_86(), $1a => Commands_n__7860_1921_forkedUser($1, $2, $0, $1a), teamMemberLogins)), teamMembersJson => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Types_traverse_Traversable_List(csegen_86(), $28 => $29 => Data_Promise_either(csegen_72(), Data_User_parseUser($28), $29), teamMembersJson), teamMembers => Util_renderIO($0, csegen_94(), Text_PrettyPrint_Prettyprinter_Doc_vsep(csegen_116()($3e => Commands_n__7860_1922_putNameLn($1, $2, $0, $3e))(teamMembers))))));
9954
9991
  }
9955
9992
 
9956
9993
  /* Commands.label : Config => Git => Octokit => List String -> Promise () */
9957
9994
  function Commands_label($0, $1, $2, $3) {
9958
9995
  const $12 = $13 => {
9959
- const $15 = csegen_116()($1a => Commands_n__6581_1175_unslugify($1, $2, $3, $0, $0.a10, $1a))($3);
9960
- return Data_Promise_x3ex3ex3d_Monad_Promise(Label_addLabels($0, $2, $13.a2, $15), allLabels => Util_renderIO($0, csegen_94(), Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(csegen_587()('Added'), csegen_487()(Commands_n__6581_1177_putLabels($1, $2, $3, $0, $15))(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_70(), $55 => $55, {a1: csegen_62()('All labels for PR of '), a2: {a1: csegen_62()($13.a2.a7), a2: {a1: csegen_62()(':'), a2: {h: 0}}}})), csegen_487()(Commands_n__6581_1177_putLabels($1, $2, $3, $0, allLabels))(Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_unsafeTextWithoutNewLines('.'), a2: {h: 0}}))), a2: {h: 0}}})));
9996
+ const $15 = csegen_116()($1a => Commands_unslugifyLabel($0.a10, $1a))($3);
9997
+ return Data_Promise_x3ex3ex3d_Monad_Promise(Label_addLabels($0, $2, $13.a2, $15), allLabels => Util_renderIO($0, csegen_94(), Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(csegen_593()('Added'), csegen_491()(Commands_n__7181_1299_putLabels($1, $2, $3, $0, $15))(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_70(), $51 => $51, {a1: csegen_62()('All labels for PR of '), a2: {a1: csegen_62()($13.a2.a7), a2: {a1: csegen_62()(':'), a2: {h: 0}}}})), csegen_491()(Commands_n__7181_1299_putLabels($1, $2, $3, $0, allLabels))(Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_unsafeTextWithoutNewLines('.'), a2: {h: 0}}))), a2: {h: 0}}})));
9961
9998
  };
9962
9999
  return Data_Promise_x3ex3ex3d_Monad_Promise(Data_Promise_x3ex3ex3d_Monad_Promise(FFI_Git_currentBranch($1), $b => PullRequest_identifyOrCreatePR($0, $1, $2, 0, $b)), $12);
9963
10000
  }
@@ -9976,7 +10013,7 @@ function Commands_graph($0, $1, $2) {
9976
10013
  }
9977
10014
  };
9978
10015
  const $3 = Data_List_find($5, $2);
9979
- return Commands_case__graph_1898($1, $2, $0, $3, Data_List_headx27(Prelude_Types_List_mapMaybeAppend({h: 0}, $14 => Commands_teamNameArg($14), $2)));
10016
+ return Commands_case__graph_2126($1, $2, $0, $3, Data_List_headx27(Prelude_Types_List_mapMaybeAppend({h: 0}, $14 => Commands_teamNameArg($14), $2)));
9980
10017
  }
9981
10018
 
9982
10019
  /* Commands.contribute : Config => Git => Octokit => List ContributeArg -> Promise () */
@@ -9999,9 +10036,9 @@ function Commands_contribute($0, $1, $2, $3) {
9999
10036
  };
10000
10037
  const $2c = Prelude_Types_List_filterAppend({h: 0}, $2f, openPrs);
10001
10038
  const $36 = Data_List_partition($39 => Data_PullRequest_isRequestedReviewer(myLogin, $39), $2c);
10002
- return Commands_case__contribute_2366($1, $2, $3, $0, openPrs, myLogin, $19, $26, $2c, $36, Prelude_Interfaces_mapHom({a1: d => b => c => a => $4d => $4e => $4f => ({a1: $4d($4f.a1), a2: $4e($4f.a2)}), a2: b => c => a => $58 => $59 => ({a1: $58($59.a1), a2: $59.a2}), a3: a => d => b => $60 => $61 => ({a1: $61.a1, a2: $60($61.a2)})}, $68 => Data_List_sortBy(csegen_602(), $68), $36));
10039
+ return Commands_case__contribute_2594($1, $2, $3, $0, openPrs, myLogin, $19, $26, $2c, $36, Prelude_Interfaces_mapHom({a1: d => b => c => a => $4d => $4e => $4f => ({a1: $4d($4f.a1), a2: $4e($4f.a2)}), a2: b => c => a => $58 => $59 => ({a1: $58($59.a1), a2: $59.a2}), a3: a => d => b => $60 => $61 => ({a1: $61.a1, a2: $60($61.a2)})}, $68 => Data_List_sortBy(csegen_608(), $68), $36));
10003
10040
  };
10004
- return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_598()(FFI_GitHub_getSelf($2)), $18);
10041
+ return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_604()(FFI_GitHub_getSelf($2)), $18);
10005
10042
  };
10006
10043
  return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listPullRequests($2, $0.a2, $0.a3, {a1: 0}, 100n, 0n), $10);
10007
10044
  }
@@ -10020,7 +10057,7 @@ function Commands_branch($0, $1) {
10020
10057
  /* Commands.assign : Config => Git => Octokit => List String -> {default False _ : Bool} ->
10021
10058
  Promise () */
10022
10059
  function Commands_assign($0, $1, $2, $3, $4) {
10023
- return Commands_case__assign_1538($0, $1, $2, $4, $3, Commands_n__6819_1420_partitionedArgs($0, $1, $2, $4, $3));
10060
+ return Commands_case__assign_1766($0, $1, $2, $4, $3, Commands_n__7536_1651_partitionedArgs($0, $1, $2, $4, $3));
10024
10061
  }
10025
10062
 
10026
10063
  /* Commands.<||> : Alternative t => (a -> t b) -> (a -> t b) -> a -> t b */
@@ -10030,67 +10067,67 @@ function Commands_x3cx7cx7cx3e($0, $1, $2, $3) {
10030
10067
 
10031
10068
  /* User.Reflect.case block in case block in reflectOnSelf */
10032
10069
  function User_Reflect_case__casex20blockx20inx20reflectOnSelf_1862($0, $1, $2, $3, $4, $5, $6, $7, $8, $9) {
10033
- 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)}, csegen_116()(csegen_615())($2a))), {a1: $7, a2: $9.a1});
10070
+ 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)}, csegen_116()(csegen_621())($2a))), {a1: $7, a2: $9.a1});
10034
10071
  return Util_renderIO($0, csegen_94(), 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));
10035
10072
  }
10036
10073
 
10037
- /* User.Me.6729:1979:ul */
10038
- function User_Me_n__6729_1979_ul($0, $1, $2, $3) {
10074
+ /* User.Me.7184:1979:ul */
10075
+ function User_Me_n__7184_1979_ul($0, $1, $2, $3) {
10039
10076
  return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_underline(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($3));
10040
10077
  }
10041
10078
 
10042
- /* User.Me.6729:1985:teams */
10043
- function User_Me_n__6729_1985_teams($0, $1, $2) {
10044
- return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: User_Me_n__6729_1979_ul($0, $1, $2, 'GitHub Teams:'), a2: csegen_116()($10 => User_Me_n__6729_1980_it($0, $1, $2, $10))($0)});
10079
+ /* User.Me.7184:1985:teams */
10080
+ function User_Me_n__7184_1985_teams($0, $1, $2) {
10081
+ return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: User_Me_n__7184_1979_ul($0, $1, $2, 'GitHub Teams:'), a2: csegen_116()($10 => User_Me_n__7184_1980_it($0, $1, $2, $10))($0)});
10045
10082
  }
10046
10083
 
10047
- /* User.Me.6729:1984:login */
10048
- function User_Me_n__6729_1984_login($0, $1, $2) {
10049
- return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(csegen_587()('GitHub Login:'), User_Me_n__6729_1981_green($0, $1, $2, $1.a1));
10084
+ /* User.Me.7184:1984:login */
10085
+ function User_Me_n__7184_1984_login($0, $1, $2) {
10086
+ return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(csegen_593()('GitHub Login:'), User_Me_n__7184_1981_green($0, $1, $2, $1.a1));
10050
10087
  }
10051
10088
 
10052
- /* User.Reflect.5822:1056:ital */
10053
- function User_Reflect_n__5822_1056_ital($0, $1) {
10089
+ /* User.Reflect.6277:1056:ital */
10090
+ function User_Reflect_n__6277_1056_ital($0, $1) {
10054
10091
  return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($1));
10055
10092
  }
10056
10093
 
10057
- /* User.Me.6729:1980:it */
10058
- function User_Me_n__6729_1980_it($0, $1, $2, $3) {
10094
+ /* User.Me.7184:1980:it */
10095
+ function User_Me_n__7184_1980_it($0, $1, $2, $3) {
10059
10096
  return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($3));
10060
10097
  }
10061
10098
 
10062
- /* User.Me.6869:2135:handleUnsetEmail */
10063
- function User_Me_n__6869_2135_handleUnsetEmail($0, $1, $2, $3) {
10099
+ /* User.Me.7324:2135:handleUnsetEmail */
10100
+ function User_Me_n__7324_2135_handleUnsetEmail($0, $1, $2, $3) {
10064
10101
  switch($3) {
10065
10102
  case '': return {h: 0};
10066
10103
  default: return {a1: $3};
10067
10104
  }
10068
10105
  }
10069
10106
 
10070
- /* User.Me.6729:1981:green */
10071
- function User_Me_n__6729_1981_green($0, $1, $2, $3) {
10107
+ /* User.Me.7184:1981:green */
10108
+ function User_Me_n__7184_1981_green($0, $1, $2, $3) {
10072
10109
  return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(2), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($3));
10073
10110
  }
10074
10111
 
10075
- /* User.Me.6729:1983:fullName */
10076
- function User_Me_n__6729_1983_fullName($0, $1, $2) {
10077
- return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(csegen_587()('GitHub Name:'), User_Me_n__6729_1981_green($0, $1, $2, $1.a2));
10112
+ /* User.Me.7184:1983:fullName */
10113
+ function User_Me_n__7184_1983_fullName($0, $1, $2) {
10114
+ return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(csegen_593()('GitHub Name:'), User_Me_n__7184_1981_green($0, $1, $2, $1.a2));
10078
10115
  }
10079
10116
 
10080
- /* User.Me.6729:1982:email */
10081
- function User_Me_n__6729_1982_email($0, $1, $2) {
10117
+ /* User.Me.7184:1982:email */
10118
+ function User_Me_n__7184_1982_email($0, $1, $2) {
10082
10119
  let $8;
10083
10120
  switch($2.h) {
10084
10121
  case undefined: /* just */ {
10085
- $8 = User_Me_n__6729_1981_green($0, $1, $2, $2.a1);
10122
+ $8 = User_Me_n__7184_1981_green($0, $1, $2, $2.a1);
10086
10123
  break;
10087
10124
  }
10088
10125
  case 0: /* nothing */ {
10089
- $8 = User_Me_n__6729_1980_it($0, $1, $2, 'Not set');
10126
+ $8 = User_Me_n__7184_1980_it($0, $1, $2, 'Not set');
10090
10127
  break;
10091
10128
  }
10092
10129
  }
10093
- return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(csegen_587()('Git Email:'), $8);
10130
+ return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(csegen_593()('Git Email:'), $8);
10094
10131
  }
10095
10132
 
10096
10133
  /* User.Reflect.rightTitle : String */
@@ -10113,21 +10150,21 @@ function User_Reflect_reflectOnSelf($0, $1) {
10113
10150
  const $a = prs => {
10114
10151
  const $12 = myLogin => {
10115
10152
  const $2e = reviews => {
10116
- const $2f = csegen_60()(csegen_622())(Data_List_headx27(Data_List_sortBy($3a => $3b => Prelude_Basics_on(csegen_600(), csegen_622(), $3a, $3b), reviews)));
10153
+ const $2f = csegen_60()(csegen_628())(Data_List_headx27(Data_List_sortBy($3a => $3b => Prelude_Basics_on(csegen_606(), csegen_628(), $3a, $3b), reviews)));
10117
10154
  const $44 = PullRequest_tuple(prs);
10118
10155
  const $47 = Prelude_Interfaces_mapHom({a1: d => b => c => a => $4b => $4c => $4d => ({a1: $4b($4d.a1), a2: $4c($4d.a2)}), a2: b => c => a => $56 => $57 => ({a1: $56($57.a1), a2: $57.a2}), a3: a => d => b => $5e => $5f => ({a1: $5f.a1, a2: $5e($5f.a2)})}, $66 => Prelude_Types_List_filterAppend({h: 0}, $6a => Prelude_EqOrd_x3dx3d_Eq_String($6a.a4, myLogin), $66), $44);
10119
10156
  return User_Reflect_case__casex20blockx20inx20reflectOnSelf_1862($0, $1, prs, myLogin, reviews, $2f, $44, $47.a1, $47.a2, Prelude_Interfaces_mapHom({a1: d => b => c => a => $7f => $80 => $81 => ({a1: $7f($81.a1), a2: $80($81.a2)}), a2: b => c => a => $8a => $8b => ({a1: $8a($8b.a1), a2: $8b.a2}), a3: a => d => b => $92 => $93 => ({a1: $93.a1, a2: $92($93.a2)})}, $9a => Prelude_Types_List_filterAppend({h: 0}, $9e => Prelude_Types_foldMap_Foldable_List(csegen_136(), $a3 => Prelude_EqOrd_x3dx3d_Eq_String($a3, myLogin), $9e.a6), $9a), $44));
10120
10157
  };
10121
- return Data_Promise_x3ex3ex3d_Monad_Promise(PullRequest_reviewsByUser($0, $1, myLogin, Data_List_take(User_Reflect_reviewDetailsCount(), Prelude_Types_List_reverse(Data_List_sortBy($22 => $23 => Prelude_Basics_on(csegen_600(), csegen_615(), $22, $23), PullRequest_combined(prs))))), $2e);
10158
+ return Data_Promise_x3ex3ex3d_Monad_Promise(PullRequest_reviewsByUser($0, $1, myLogin, Data_List_take(User_Reflect_reviewDetailsCount(), Prelude_Types_List_reverse(Data_List_sortBy($22 => $23 => Prelude_Basics_on(csegen_606(), csegen_621(), $22, $23), PullRequest_combined(prs))))), $2e);
10122
10159
  };
10123
- return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_598()(FFI_GitHub_getSelf($1)), $12);
10160
+ return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_604()(FFI_GitHub_getSelf($1)), $12);
10124
10161
  };
10125
10162
  return Data_Promise_x3ex3ex3d_Monad_Promise(PullRequest_listPartitionedPRs($0, $1, 4n, User_Reflect_prCount()), $a);
10126
10163
  }
10127
10164
 
10128
10165
  /* User.Me.printInfoOnSelf : Config => Octokit => Git => Promise () */
10129
10166
  function User_Me_printInfoOnSelf($0, $1, $2) {
10130
- return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_55()($9 => User_Me_n__6869_2135_handleUnsetEmail($0, $1, $2, $9))(FFI_Git_userEmail($2)), gitEmail => Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_getSelf($1), githubUser => Data_Promise_x3ex3ex3d_Monad_Promise(csegen_584()(FFI_GitHub_listMyTeams($1)), githubTeams => Util_renderIO($0, csegen_94(), User_Me_print(gitEmail, githubUser, githubTeams)))));
10167
+ return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_55()($9 => User_Me_n__7324_2135_handleUnsetEmail($0, $1, $2, $9))(FFI_Git_userEmail($2)), gitEmail => Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_getSelf($1), githubUser => Data_Promise_x3ex3ex3d_Monad_Promise(csegen_590()(FFI_GitHub_listMyTeams($1)), githubTeams => Util_renderIO($0, csegen_94(), User_Me_print(gitEmail, githubUser, githubTeams)))));
10131
10168
  }
10132
10169
 
10133
10170
  /* User.Reflect.print : Nat -> Nat -> Nat -> Nat -> Nat -> Nat -> Maybe Date -> Maybe Date -> Maybe Date -> Doc AnsiStyle */
@@ -10137,7 +10174,7 @@ function User_Reflect_print($0, $1, $2, $3, $4, $5, $6, $7, $8) {
10137
10174
 
10138
10175
  /* User.Me.print : Maybe String -> User -> List String -> Doc AnsiStyle */
10139
10176
  function User_Me_print($0, $1, $2) {
10140
- return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: User_Me_n__6729_1982_email($2, $1, $0), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: User_Me_n__6729_1983_fullName($2, $1, $0), a2: {a1: User_Me_n__6729_1984_login($2, $1, $0), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: User_Me_n__6729_1985_teams($2, $1, $0), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {h: 0}}}}}}}}});
10177
+ return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: User_Me_n__7184_1982_email($2, $1, $0), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: User_Me_n__7184_1983_fullName($2, $1, $0), a2: {a1: User_Me_n__7184_1984_login($2, $1, $0), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: User_Me_n__7184_1985_teams($2, $1, $0), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {h: 0}}}}}}}}});
10141
10178
  }
10142
10179
 
10143
10180
  /* User.Reflect.prCount : Fin 101 */
@@ -10157,15 +10194,15 @@ const User_Reflect_intro = __lazy(function () {
10157
10194
 
10158
10195
  /* User.Reflect.header : Nat -> Doc AnsiStyle */
10159
10196
  function User_Reflect_header($0) {
10160
- return Text_PrettyPrint_Prettyprinter_Doc_indent(Number(_truncBigInt32($0)), Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: User_Reflect_n__5822_1056_ital($0, User_Reflect_leftTitle()), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(csegen_62()(' ')), a2: {a1: User_Reflect_n__5822_1056_ital($0, User_Reflect_rightTitle()), a2: {h: 0}}}}));
10197
+ return Text_PrettyPrint_Prettyprinter_Doc_indent(Number(_truncBigInt32($0)), Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: User_Reflect_n__6277_1056_ital($0, User_Reflect_leftTitle()), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(csegen_62()(' ')), a2: {a1: User_Reflect_n__6277_1056_ital($0, User_Reflect_rightTitle()), a2: {h: 0}}}}));
10161
10198
  }
10162
10199
 
10163
10200
  /* User.Reflect.graph : Nat -> Nat -> Nat -> Nat -> Nat -> Nat -> Doc AnsiStyle */
10164
10201
  function User_Reflect_graph($0, $1, $2, $3, $4, $5) {
10165
10202
  const $6 = ($2+$3);
10166
10203
  const $9 = ($5+$4);
10167
- const $c = Prelude_Types_foldr_Foldable_List(csegen_423(), Prelude_Types_String_length(User_Reflect_leftTitle()), {a1: ($6+$1), a2: {a1: $9, a2: {h: 0}}});
10168
- const $1b = Prelude_Types_foldr_Foldable_List(csegen_423(), Prelude_Types_String_length(User_Reflect_rightTitle()), {a1: $6, a2: {a1: $9, a2: {h: 0}}});
10204
+ const $c = Prelude_Types_foldr_Foldable_List(csegen_429(), Prelude_Types_String_length(User_Reflect_leftTitle()), {a1: ($6+$1), a2: {a1: $9, a2: {h: 0}}});
10205
+ const $1b = Prelude_Types_foldr_Foldable_List(csegen_429(), Prelude_Types_String_length(User_Reflect_rightTitle()), {a1: $6, a2: {a1: $9, a2: {h: 0}}});
10169
10206
  const $28 = (($c+$1b)+3n);
10170
10207
  const $2d = ((Number($0)/2.0)-(Number($28)/2.0));
10171
10208
  const $36 = (Prelude_Types_prim__integerToNat(BigInt(Math.trunc($2d)))+Prelude_Types_prim__integerToNat(($c-Prelude_Types_String_length(User_Reflect_leftTitle()))));
@@ -10175,7 +10212,7 @@ function User_Reflect_graph($0, $1, $2, $3, $4, $5) {
10175
10212
 
10176
10213
  /* User.Reflect.details : Nat -> Nat -> Nat -> Nat -> Nat -> Nat -> Maybe Date -> Maybe Date -> Maybe Date -> Doc AnsiStyle */
10177
10214
  function User_Reflect_details($0, $1, $2, $3, $4, $5, $6, $7, $8) {
10178
- 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(csegen_62()('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(csegen_62()('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: csegen_637(), 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: csegen_641()($8), a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: csegen_643(), 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(csegen_62()('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: csegen_60()(date => Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(csegen_62()('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(csegen_62()('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: csegen_637(), 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: csegen_641()($7), a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: csegen_643(), 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_70(), $da => $da, {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}}}}}}}}}});
10215
+ 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(csegen_62()('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(csegen_62()('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: csegen_643(), 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: csegen_647()($8), a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: csegen_649(), 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(csegen_62()('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: csegen_60()(date => Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(csegen_62()('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(csegen_62()('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: csegen_643(), 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: csegen_647()($7), a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: csegen_649(), 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_70(), $da => $da, {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}}}}}}}}}});
10179
10216
  }
10180
10217
 
10181
10218
  /* User.Reflect.chart : Nat -> Nat -> Nat -> Nat -> Nat -> Nat -> Nat -> Doc AnsiStyle */
@@ -10233,35 +10270,35 @@ function PullRequest_case__identifyOrCreatePRx2ccreatePR_2973($0, $1, $2, $3, $4
10233
10270
  }
10234
10271
  }
10235
10272
 
10236
- /* PullRequest.7858:1961:userNotice */
10237
- function PullRequest_n__7858_1961_userNotice($0, $1, $2, $3, $4, $5, $6) {
10273
+ /* PullRequest.8323:1961:userNotice */
10274
+ function PullRequest_n__8323_1961_userNotice($0, $1, $2, $3, $4, $5, $6) {
10238
10275
  switch($6.h) {
10239
10276
  case 0: /* nothing */ {
10240
10277
  switch($2.h) {
10241
10278
  case 0: /* nil */ return 'no users';
10242
- default: return Prelude_Types_foldMap_Foldable_List(csegen_70(), $d => $d, {a1: csegen_62()(PullRequest_n__7858_1960_csv($0, $1, $2, $3, $4, $5, $2)), a2: {h: 0}});
10279
+ default: return Prelude_Types_foldMap_Foldable_List(csegen_70(), $d => $d, {a1: csegen_62()(PullRequest_n__8323_1960_csv($0, $1, $2, $3, $4, $5, $2)), a2: {h: 0}});
10243
10280
  }
10244
10281
  }
10245
- case undefined: /* just */ return Prelude_Types_foldMap_Foldable_List(csegen_70(), $20 => $20, {a1: PullRequest_n__7858_1960_csv($0, $1, $2, $3, $4, $5, {a1: $6.a1, a2: $2}), a2: {h: 0}});
10282
+ case undefined: /* just */ return Prelude_Types_foldMap_Foldable_List(csegen_70(), $20 => $20, {a1: PullRequest_n__8323_1960_csv($0, $1, $2, $3, $4, $5, {a1: $6.a1, a2: $2}), a2: {h: 0}});
10246
10283
  }
10247
10284
  }
10248
10285
 
10249
- /* PullRequest.7858:1962:teamNotice */
10250
- function PullRequest_n__7858_1962_teamNotice($0, $1, $2, $3, $4, $5, $6) {
10286
+ /* PullRequest.8323:1962:teamNotice */
10287
+ function PullRequest_n__8323_1962_teamNotice($0, $1, $2, $3, $4, $5, $6) {
10251
10288
  switch($6.h) {
10252
10289
  case 0: /* nil */ return '';
10253
10290
  case undefined: /* cons */ {
10254
10291
  switch($6.a2.h) {
10255
- case 0: /* nil */ return Prelude_Types_foldMap_Foldable_List(csegen_70(), $d => $d, {a1: ' and team ', a2: {a1: PullRequest_n__7858_1960_csv($0, $1, $2, $3, $4, $5, {a1: $6.a1, a2: {h: 0}}), a2: {h: 0}}});
10256
- default: return Prelude_Types_foldMap_Foldable_List(csegen_70(), $21 => $21, {a1: ' and teams ', a2: {a1: PullRequest_n__7858_1960_csv($0, $1, $2, $3, $4, $5, $6), a2: {h: 0}}});
10292
+ case 0: /* nil */ return Prelude_Types_foldMap_Foldable_List(csegen_70(), $d => $d, {a1: ' and team ', a2: {a1: PullRequest_n__8323_1960_csv($0, $1, $2, $3, $4, $5, {a1: $6.a1, a2: {h: 0}}), a2: {h: 0}}});
10293
+ default: return Prelude_Types_foldMap_Foldable_List(csegen_70(), $21 => $21, {a1: ' and teams ', a2: {a1: PullRequest_n__8323_1960_csv($0, $1, $2, $3, $4, $5, $6), a2: {h: 0}}});
10257
10294
  }
10258
10295
  }
10259
- default: return Prelude_Types_foldMap_Foldable_List(csegen_70(), $33 => $33, {a1: ' and teams ', a2: {a1: PullRequest_n__7858_1960_csv($0, $1, $2, $3, $4, $5, $6), a2: {h: 0}}});
10296
+ default: return Prelude_Types_foldMap_Foldable_List(csegen_70(), $33 => $33, {a1: ' and teams ', a2: {a1: PullRequest_n__8323_1960_csv($0, $1, $2, $3, $4, $5, $6), a2: {h: 0}}});
10260
10297
  }
10261
10298
  }
10262
10299
 
10263
- /* PullRequest.8548:2623:prepareDescriptionFile */
10264
- function PullRequest_n__8548_2623_prepareDescriptionFile($0, $1, $2, $3, $4, $5, $6) {
10300
+ /* PullRequest.9013:2623:prepareDescriptionFile */
10301
+ function PullRequest_n__9013_2623_prepareDescriptionFile($0, $1, $2, $3, $4, $5, $6) {
10265
10302
  const $13 = $14 => {
10266
10303
  const $1a = () => {
10267
10304
  const $1d = $5.a1.a1.a1;
@@ -10274,13 +10311,13 @@ function PullRequest_n__8548_2623_prepareDescriptionFile($0, $1, $2, $3, $4, $5,
10274
10311
  return $5.a1.a2(undefined)(undefined)(System_File_Meta_exists($5, $6))($13);
10275
10312
  }
10276
10313
 
10277
- /* PullRequest.7858:1963:prComment */
10278
- function PullRequest_n__7858_1963_prComment($0, $1, $2, $3, $4, $5, $6) {
10314
+ /* PullRequest.8323:1963:prComment */
10315
+ function PullRequest_n__8323_1963_prComment($0, $1, $2, $3, $4, $5, $6) {
10279
10316
  return Prelude_Types_foldMap_Foldable_List(csegen_70(), $b => $b, {a1: ':musical_note: Harmoniously assigned @', a2: {a1: $6, a2: {a1: ' to review this PR.', a2: {h: 0}}}});
10280
10317
  }
10281
10318
 
10282
- /* PullRequest.8548:2622:inlineDescription */
10283
- function PullRequest_n__8548_2622_inlineDescription($0, $1, $2, $3, $4, $5) {
10319
+ /* PullRequest.9013:2622:inlineDescription */
10320
+ function PullRequest_n__9013_2622_inlineDescription($0, $1, $2, $3, $4, $5) {
10284
10321
  const $18 = $19 => {
10285
10322
  const $1c = $5.a1.a1.a1;
10286
10323
  const $1b = $20 => $21 => $1c(undefined)(undefined)($20)($21);
@@ -10290,13 +10327,13 @@ function PullRequest_n__8548_2622_inlineDescription($0, $1, $2, $3, $4, $5) {
10290
10327
  return $5.a1.a2(undefined)(undefined)($5.a2(undefined)($14 => Prelude_IO_prim__putStr('What would you like the description to be (two blank lines to finish)?\n', $14)))($18);
10291
10328
  }
10292
10329
 
10293
- /* PullRequest.7633:1704:forkedReviews */
10294
- function PullRequest_n__7633_1704_forkedReviews($0, $1, $2, $3) {
10330
+ /* PullRequest.8098:1704:forkedReviews */
10331
+ function PullRequest_n__8098_1704_forkedReviews($0, $1, $2, $3) {
10295
10332
  return FFI_Concurrency_fork(csegen_94(), ('reviews --json '+Prelude_Show_show_Show_Integer($3.a1)));
10296
10333
  }
10297
10334
 
10298
- /* PullRequest.7066:1169:filterString */
10299
- function PullRequest_n__7066_1169_filterString($0, $1, $2, $3, $4) {
10335
+ /* PullRequest.7531:1169:filterString */
10336
+ function PullRequest_n__7531_1169_filterString($0, $1, $2, $3, $4) {
10300
10337
  switch($4.h) {
10301
10338
  case 0: /* nothing */ return 'none';
10302
10339
  case undefined: /* just */ {
@@ -10308,8 +10345,8 @@ function PullRequest_n__7066_1169_filterString($0, $1, $2, $3, $4) {
10308
10345
  }
10309
10346
  }
10310
10347
 
10311
- /* PullRequest.8548:2624:editorDescription */
10312
- function PullRequest_n__8548_2624_editorDescription($0, $1, $2, $3, $4, $5, $6, $7) {
10348
+ /* PullRequest.9013:2624:editorDescription */
10349
+ function PullRequest_n__9013_2624_editorDescription($0, $1, $2, $3, $4, $5, $6, $7) {
10313
10350
  const $19 = $1a => {
10314
10351
  const $31 = $32 => {
10315
10352
  switch($32) {
@@ -10320,31 +10357,31 @@ function PullRequest_n__8548_2624_editorDescription($0, $1, $2, $3, $4, $5, $6,
10320
10357
  const $62 = $5.a1.a1.a1;
10321
10358
  const $61 = $66 => $67 => $62(undefined)(undefined)($66)($67);
10322
10359
  const $60 = $61($71 => (undefined));
10323
- return $60(System_File_ReadWrite_removeFile($5, csegen_666()));
10360
+ return $60(System_File_ReadWrite_removeFile($5, csegen_672()));
10324
10361
  };
10325
10362
  return Prelude_Interfaces_when($5.a1.a1, $59, $5f);
10326
10363
  };
10327
- const $4a = $5.a1.a2(undefined)(undefined)(System_File_Meta_exists($5, csegen_666()))($58);
10364
+ const $4a = $5.a1.a2(undefined)(undefined)(System_File_Meta_exists($5, csegen_672()))($58);
10328
10365
  const $44 = $5.a1.a2(undefined)(undefined)($4a);
10329
10366
  return $44($78 => $5.a1.a1.a2(undefined)(description));
10330
10367
  };
10331
- return $5.a1.a2(undefined)(undefined)(System_File_ReadWrite_readFile($5, csegen_666()))($41);
10368
+ return $5.a1.a2(undefined)(undefined)(System_File_ReadWrite_readFile($5, csegen_672()))($41);
10332
10369
  }
10333
10370
  default: return $5.a1.a1.a2(undefined)({h: 0 /* Left */, a1: {h: 0 /* GenericFileError */, a1: $32}});
10334
10371
  }
10335
10372
  };
10336
10373
  return $5.a1.a2(undefined)(undefined)(System_system($5, Prelude_Types_foldMap_Foldable_List(csegen_70(), $2b => $2b, {a1: $6, a2: {a1: ' pr_description.tmp.md', a2: {h: 0}}})))($31);
10337
10374
  };
10338
- return $5.a1.a2(undefined)(undefined)(PullRequest_n__8548_2623_prepareDescriptionFile($0, $1, $2, $3, $4, $5, $7))($19);
10375
+ return $5.a1.a2(undefined)(undefined)(PullRequest_n__9013_2623_prepareDescriptionFile($0, $1, $2, $3, $4, $5, $7))($19);
10339
10376
  }
10340
10377
 
10341
- /* PullRequest.7858:1960:csv */
10342
- function PullRequest_n__7858_1960_csv($0, $1, $2, $3, $4, $5, $6) {
10343
- return Util_renderString($5, Text_PrettyPrint_Prettyprinter_Doc_encloseSep(Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), csegen_575(), csegen_116()(csegen_392())($6)));
10378
+ /* PullRequest.8323:1960:csv */
10379
+ function PullRequest_n__8323_1960_csv($0, $1, $2, $3, $4, $5, $6) {
10380
+ return Util_renderString($5, Text_PrettyPrint_Prettyprinter_Doc_encloseSep(Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), csegen_578(), csegen_116()(csegen_398())($6)));
10344
10381
  }
10345
10382
 
10346
- /* PullRequest.8548:2625:createPR */
10347
- function PullRequest_n__8548_2625_createPR($0, $1, $2, $3, $4) {
10383
+ /* PullRequest.9013:2625:createPR */
10384
+ function PullRequest_n__9013_2625_createPR($0, $1, $2, $3, $4) {
10348
10385
  const $2f = $30 => {
10349
10386
  const $4d = $4e => {
10350
10387
  const $6c = $6d => {
@@ -10360,11 +10397,11 @@ function PullRequest_n__8548_2625_createPR($0, $1, $2, $3, $4) {
10360
10397
  let $c9;
10361
10398
  switch($ca.h) {
10362
10399
  case 0: /* nothing */ {
10363
- $c9 = PullRequest_n__8548_2622_inlineDescription($0, $1, $2, $3, $4, csegen_94());
10400
+ $c9 = PullRequest_n__9013_2622_inlineDescription($0, $1, $2, $3, $4, csegen_94());
10364
10401
  break;
10365
10402
  }
10366
10403
  case undefined: /* just */ {
10367
- $c9 = csegen_55()($d9 => Prelude_Types_either(() => $dc => '', () => $de => $de, $d9))(PullRequest_n__8548_2624_editorDescription($0, $1, $2, $3, $4, csegen_94(), $ca.a1, templateFilePath));
10404
+ $c9 = csegen_55()($d9 => Prelude_Types_either(() => $dc => '', () => $de => $de, $d9))(PullRequest_n__9013_2624_editorDescription($0, $1, $2, $3, $4, csegen_94(), $ca.a1, templateFilePath));
10368
10405
  break;
10369
10406
  }
10370
10407
  }
@@ -10372,7 +10409,7 @@ function PullRequest_n__8548_2625_createPR($0, $1, $2, $3, $4) {
10372
10409
  };
10373
10410
  return Data_Promise_x3ex3ex3d_Monad_Promise(Util_relativeToRoot($0, '.github/PULL_REQUEST_TEMPLATE.md'), $c7);
10374
10411
  };
10375
- return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_55()($ba => ($96+Data_String_trim($ba)))(csegen_524()), $c1);
10412
+ return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_55()($ba => ($96+Data_String_trim($ba)))(csegen_528()), $c1);
10376
10413
  };
10377
10414
  return Data_Promise_x3ex3ex3d_Monad_Promise($a6 => $a7 => $a8 => Data_Promise_liftIO_HasIO_Promise($ab => Prelude_IO_prim__putStr($96, $ab), $a6, $a7, $a8), $b2);
10378
10415
  };
@@ -10380,7 +10417,7 @@ function PullRequest_n__8548_2625_createPR($0, $1, $2, $3, $4) {
10380
10417
  };
10381
10418
  return Data_Promise_x3ex3ex3d_Monad_Promise($87 => $88 => $89 => Data_Promise_liftIO_HasIO_Promise($8c => Prelude_IO_prim__putStr('What would you like the title to be?\n', $8c), $87, $88, $89), $93);
10382
10419
  };
10383
- return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_55()($74 => Data_String_trim($74))(csegen_524()), $79);
10420
+ return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_55()($74 => Data_String_trim($74))(csegen_528()), $79);
10384
10421
  };
10385
10422
  return Data_Promise_x3ex3ex3d_Monad_Promise($51 => $52 => $53 => Data_Promise_liftIO_HasIO_Promise($56 => Prelude_IO_prim__putStr((Prelude_Types_foldMap_Foldable_List(csegen_70(), $5e => $5e, {a1: 'What branch are you merging into (ENTER for default: ', a2: {a1: $4.a5, a2: {a1: ')?', a2: {h: 0}}}})+'\n'), $56), $51, $52, $53), $6c);
10386
10423
  };
@@ -10426,7 +10463,7 @@ function PullRequest_reviewsForPrs($0, $1, $2) {
10426
10463
  };
10427
10464
  return Data_Promise_x3ex3ex3d_Monad_Promise($18, reviews => $3f => $40 => Data_Promise_pure_Applicative_Promise(Prelude_Types_join_Monad_List(reviews), $3f, $40));
10428
10465
  };
10429
- return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Basics_flip(csegen_445(), csegen_585(), Prelude_Types_traverse_Traversable_List(csegen_86(), $f => PullRequest_n__7633_1704_forkedReviews($0, $1, $2, $f), $2)), $16);
10466
+ return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Basics_flip(csegen_449(), csegen_591(), Prelude_Types_traverse_Traversable_List(csegen_86(), $f => PullRequest_n__8098_1704_forkedReviews($0, $1, $2, $f), $2)), $16);
10430
10467
  }
10431
10468
 
10432
10469
  /* PullRequest.reviewsByUser : Config => Octokit => String -> List PullRequest -> Promise (List Review) */
@@ -10456,9 +10493,9 @@ function PullRequest_reviewsByUser($0, $1, $2, $3) {
10456
10493
  List PullRequest -> Promise (SortedMap String (List Review)) */
10457
10494
  function PullRequest_reviewsByEachUser($0, $1, $2) {
10458
10495
  const $9 = reviews => {
10459
- const $a = Data_List_groupAllWith(csegen_436(), $f => $f.a2, reviews);
10496
+ const $a = Data_List_groupAllWith(csegen_442(), $f => $f.a2, reviews);
10460
10497
  const $12 = csegen_116()(rs => ({a1: rs.a1.a2, a2: Data_List1_forget(rs)}))($a);
10461
- return $1e => $1f => Data_Promise_pure_Applicative_Promise(Data_SortedMap_fromList(csegen_436(), $12), $1e, $1f);
10498
+ return $1e => $1f => Data_Promise_pure_Applicative_Promise(Data_SortedMap_fromList(csegen_442(), $12), $1e, $1f);
10462
10499
  };
10463
10500
  return Data_Promise_x3ex3ex3d_Monad_Promise(PullRequest_reviewsForPrs($0, $1, $2), $9);
10464
10501
  }
@@ -10472,12 +10509,12 @@ function PullRequest_requestReviewers($0, $1, $2, $3, $4, $5) {
10472
10509
  let $27;
10473
10510
  switch($0.a7) {
10474
10511
  case 1: {
10475
- const $2a = Reviewer_chooseReviewers(csegen_436(), $e.a2, $e.a1, teamMembers, {h: 0}, $2.a4);
10512
+ const $2a = Reviewer_chooseReviewers(csegen_442(), $e.a2, $e.a1, teamMembers, {h: 0}, $2.a4);
10476
10513
  $27 = Reviewer_randomReviewer(csegen_94(), $2a);
10477
10514
  break;
10478
10515
  }
10479
10516
  case 0: {
10480
- $27 = csegen_528();
10517
+ $27 = csegen_532();
10481
10518
  break;
10482
10519
  }
10483
10520
  }
@@ -10509,7 +10546,7 @@ function PullRequest_requestReviewers($0, $1, $2, $3, $4, $5) {
10509
10546
  const $5a = $5b => {
10510
10547
  const $61 = () => {
10511
10548
  switch(chosenUser.h) {
10512
- case undefined: /* just */ return FFI_GitHub_createComment($1, $0.a2, $0.a3, $2.a1, PullRequest_n__7858_1963_prComment($1, $5, $4, $3, $2, $0, chosenUser.a1));
10549
+ case undefined: /* just */ return FFI_GitHub_createComment($1, $0.a2, $0.a3, $2.a1, PullRequest_n__8323_1963_prComment($1, $5, $4, $3, $2, $0, chosenUser.a1));
10513
10550
  case 0: /* nothing */ return csegen_68();
10514
10551
  }
10515
10552
  };
@@ -10533,11 +10570,11 @@ function PullRequest_requestReviewers($0, $1, $2, $3, $4, $5) {
10533
10570
  let $77;
10534
10571
  switch($78) {
10535
10572
  case 1: {
10536
- $77 = () => $7d => $7e => $7f => Data_Promise_liftIO_HasIO_Promise($82 => Prelude_IO_prim__putStr((Util_renderString($0, Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(3), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(csegen_62()('Could not pick a user from the given Team '))), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(csegen_62()('(perhaps the only option was the author of the pull request?).')), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_foldMap_Foldable_List(csegen_70(), $a5 => $a5, {a1: 'Assigned ', a2: {a1: PullRequest_n__7858_1962_teamNotice($1, $5, $4, $3, $2, $0, $40), a2: {a1: ' to the open PR ', a2: {h: 0}}}})), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_foldMap_Foldable_List(csegen_70(), $bd => $bd, {a1: 'for the current branch (', a2: {a1: Data_PullRequest_rf__webURI($0, $2), a2: {a1: ').', a2: {h: 0}}}})), a2: {h: 0}}}}}))+'\n'), $82), $7d, $7e, $7f);
10573
+ $77 = () => $7d => $7e => $7f => Data_Promise_liftIO_HasIO_Promise($82 => Prelude_IO_prim__putStr((Util_renderString($0, Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(3), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(csegen_62()('Could not pick a user from the given Team '))), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(csegen_62()('(perhaps the only option was the author of the pull request?).')), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_foldMap_Foldable_List(csegen_70(), $a5 => $a5, {a1: 'Assigned ', a2: {a1: PullRequest_n__8323_1962_teamNotice($1, $5, $4, $3, $2, $0, $40), a2: {a1: ' to the open PR ', a2: {h: 0}}}})), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_foldMap_Foldable_List(csegen_70(), $bd => $bd, {a1: 'for the current branch (', a2: {a1: Data_PullRequest_rf__webURI($0, $2), a2: {a1: ').', a2: {h: 0}}}})), a2: {h: 0}}}}}))+'\n'), $82), $7d, $7e, $7f);
10537
10574
  break;
10538
10575
  }
10539
10576
  case 0: {
10540
- $77 = () => $ce => $cf => $d0 => Data_Promise_liftIO_HasIO_Promise($d3 => Prelude_IO_prim__putStr((Util_renderString($0, Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_foldMap_Foldable_List(csegen_70(), $e3 => $e3, {a1: 'Assigned ', a2: {a1: PullRequest_n__7858_1961_userNotice($1, $5, $4, $3, $2, $0, chosenUser), a2: {a1: PullRequest_n__7858_1962_teamNotice($1, $5, $4, $3, $2, $0, $40), a2: {a1: ' to the open PR ', a2: {h: 0}}}}})), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_foldMap_Foldable_List(csegen_70(), $105 => $105, {a1: 'for the current branch (', a2: {a1: Data_PullRequest_rf__webURI($0, $2), a2: {a1: ').', a2: {h: 0}}}})), a2: {h: 0}}}))+'\n'), $d3), $ce, $cf, $d0);
10577
+ $77 = () => $ce => $cf => $d0 => Data_Promise_liftIO_HasIO_Promise($d3 => Prelude_IO_prim__putStr((Util_renderString($0, Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_foldMap_Foldable_List(csegen_70(), $e3 => $e3, {a1: 'Assigned ', a2: {a1: PullRequest_n__8323_1961_userNotice($1, $5, $4, $3, $2, $0, chosenUser), a2: {a1: PullRequest_n__8323_1962_teamNotice($1, $5, $4, $3, $2, $0, $40), a2: {a1: ' to the open PR ', a2: {h: 0}}}}})), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_foldMap_Foldable_List(csegen_70(), $105 => $105, {a1: 'for the current branch (', a2: {a1: Data_PullRequest_rf__webURI($0, $2), a2: {a1: ').', a2: {h: 0}}}})), a2: {h: 0}}}))+'\n'), $d3), $ce, $cf, $d0);
10541
10578
  break;
10542
10579
  }
10543
10580
  }
@@ -10601,12 +10638,12 @@ function PullRequest_listx27($0, $1) {
10601
10638
  }
10602
10639
  };
10603
10640
  const $45 = {a1: $46, a2: a => $4e => ({h: 1 /* Right */, a1: $4e}), a3: $50};
10604
- const $43 = Prelude_Types_traverse_Traversable_List($45, csegen_470(), prJsons);
10641
+ const $43 = Prelude_Types_traverse_Traversable_List($45, csegen_474(), prJsons);
10605
10642
  return Data_Promise_either(csegen_72(), $43, $3f);
10606
10643
  };
10607
10644
  return Data_Promise_x3ex3ex3d_Monad_Promise($3e, pulls => $5f => $60 => Data_Promise_pure_Applicative_Promise(Prelude_Types_join_Monad_List(pulls), $5f, $60));
10608
10645
  };
10609
- return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Basics_flip(csegen_445(), $8 => 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 => $16 => Data_Pagination_null_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($16), a4: elem => acc => m => $1a => funcM => init => input => Data_Pagination_foldlM_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($1a, funcM, init, input), a5: elem => $21 => Data_Pagination_toList_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($21), a6: a => m => $25 => f => $26 => Data_Pagination_foldMap_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($25, f, $26)}, $8), Data_Pagination_traversex27(csegen_86(), $31 => $32 => $33 => $34 => PullRequest_forkedPRs($0, $31, $32, $33, $34), $1)), $3c);
10646
+ return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Basics_flip(csegen_449(), $8 => 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 => $16 => Data_Pagination_null_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($16), a4: elem => acc => m => $1a => funcM => init => input => Data_Pagination_foldlM_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($1a, funcM, init, input), a5: elem => $21 => Data_Pagination_toList_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($21), a6: a => m => $25 => f => $26 => Data_Pagination_foldMap_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($25, f, $26)}, $8), Data_Pagination_traversex27(csegen_86(), $31 => $32 => $33 => $34 => PullRequest_forkedPRs($0, $31, $32, $33, $34), $1)), $3c);
10610
10647
  }
10611
10648
 
10612
10649
  /* PullRequest.identifyOrCreatePR : Config => Git => Octokit => {default False _ : Bool} ->
@@ -10640,11 +10677,11 @@ function PullRequest_identifyOrCreatePR($0, $1, $2, $3, $4) {
10640
10677
  const $13 = Prelude_Interfaces_when(csegen_86(), $17, () => $1c => $1d => Data_Promise_reject(csegen_62()('There is already a PR for the current branch and Harmony does not currently support converting existing PRs to drafts.'), $1c, $1d));
10641
10678
  return Data_Promise_x3ex3ex3d_Monad_Promise($13, $26 => $27 => $28 => Data_Promise_pure_Applicative_Promise({a1: 0, a2: $f.a1}, $27, $28));
10642
10679
  }
10643
- default: return csegen_716();
10680
+ default: return csegen_722();
10644
10681
  }
10645
10682
  }
10646
- case 0: /* nil */ return csegen_55()($34 => ({a1: 1, a2: $34}))(PullRequest_n__8548_2625_createPR($1, $2, $4, $3, $0));
10647
- default: return csegen_716();
10683
+ case 0: /* nil */ return csegen_55()($34 => ({a1: 1, a2: $34}))(PullRequest_n__9013_2625_createPR($1, $2, $4, $3, $0));
10684
+ default: return csegen_722();
10648
10685
  }
10649
10686
  };
10650
10687
  return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listPRsForBranch($2, $0.a2, $0.a3, $4), $e);
@@ -10652,7 +10689,7 @@ function PullRequest_identifyOrCreatePR($0, $1, $2, $3, $4) {
10652
10689
 
10653
10690
  /* PullRequest.forkedPRs : Maybe GitHubPRState -> Nat -> Nat -> Nat -> () -> Promise Future */
10654
10691
  function PullRequest_forkedPRs($0, $1, $2, $3, $4) {
10655
- return FFI_Concurrency_fork(csegen_94(), Prelude_Types_foldMap_Foldable_List(csegen_70(), $d => $d, {a1: 'pulls --json ', a2: {a1: PullRequest_n__7066_1169_filterString($3, $4, $2, $1, $0), a2: {a1: ' ', a2: {a1: Prelude_Show_show_Show_Nat($1), a2: {a1: ' ', a2: {a1: Prelude_Show_show_Show_Nat($2), a2: {h: 0}}}}}}}));
10692
+ return FFI_Concurrency_fork(csegen_94(), Prelude_Types_foldMap_Foldable_List(csegen_70(), $d => $d, {a1: 'pulls --json ', a2: {a1: PullRequest_n__7531_1169_filterString($3, $4, $2, $1, $0), a2: {a1: ' ', a2: {a1: Prelude_Show_show_Show_Nat($1), a2: {a1: ' ', a2: {a1: Prelude_Show_show_Show_Nat($2), a2: {h: 0}}}}}}}));
10656
10693
  }
10657
10694
 
10658
10695
  /* PullRequest.empty : PRHistory */
@@ -10735,13 +10772,13 @@ function System_Random_randomBits32($0, $1) {
10735
10772
  /* Data.ReviewScore.with block in scoredReviewers,zipReviews,calc */
10736
10773
  function Data_ReviewScore_with__scoredReviewersx2czipReviewsx2ccalc_1211($0, $1, $2, $3, $4, $5, $6, $7, $8, $9, $a, $b, $c, $d, $e) {
10737
10774
  switch($c.h) {
10738
- case 0: /* 3348:1047:Add */ return ($e+$d);
10739
- case 1: /* 3348:1048:Subtract */ return Prelude_Types_prim__integerToNat(($e-$d));
10775
+ case 0: /* 3350:1047:Add */ return ($e+$d);
10776
+ case 1: /* 3350:1048:Subtract */ return Prelude_Types_prim__integerToNat(($e-$d));
10740
10777
  }
10741
10778
  }
10742
10779
 
10743
- /* Data.ReviewScore.3348:1044:weightReviews */
10744
- function Data_ReviewScore_n__3348_1044_weightReviews($0, $1, $2, $3, $4, $5) {
10780
+ /* Data.ReviewScore.3350:1044:weightReviews */
10781
+ function Data_ReviewScore_n__3350_1044_weightReviews($0, $1, $2, $3, $4, $5) {
10745
10782
  const $6 = Data_List_groupAllWith($0, $a => $a, $5);
10746
10783
  const $f = xs => {
10747
10784
  const $10 = (Prelude_Types_List_lengthTR(Data_List1_forget(xs))*$4);
@@ -10751,22 +10788,22 @@ function Data_ReviewScore_n__3348_1044_weightReviews($0, $1, $2, $3, $4, $5) {
10751
10788
  return $c($6);
10752
10789
  }
10753
10790
 
10754
- /* Data.ReviewScore.3348:1045:sort' */
10755
- function Data_ReviewScore_n__3348_1045_sortx27($0, $1, $2, $3, $4) {
10791
+ /* Data.ReviewScore.3350:1045:sort' */
10792
+ function Data_ReviewScore_n__3350_1045_sortx27($0, $1, $2, $3, $4) {
10756
10793
  return Data_List_sortBy($7 => $8 => Prelude_Basics_on($b => $c => Prelude_EqOrd_compare_Ord_Integer($b, $c), $11 => $11.a3, $7, $8), $4);
10757
10794
  }
10758
10795
 
10759
- /* Data.ReviewScore.3375:1201:calc */
10760
- function Data_ReviewScore_n__3375_1201_calc($0, $1, $2, $3, $4, $5, $6, $7, $8, $9, $a, $b, $c, $d) {
10796
+ /* Data.ReviewScore.3377:1201:calc */
10797
+ function Data_ReviewScore_n__3377_1201_calc($0, $1, $2, $3, $4, $5, $6, $7, $8, $9, $a, $b, $c, $d) {
10761
10798
  return Data_ReviewScore_with__scoredReviewersx2czipReviewsx2ccalc_1211(undefined, $0, $1, $2, $3, $4, $5, $6, $8, $9, $a, $b, $a, $d, $c);
10762
10799
  }
10763
10800
 
10764
10801
  /* Data.ReviewScore.scoredReviewers : Ord login => List login -> List login -> List login -> List (ReviewScore login) */
10765
10802
  function Data_ReviewScore_scoredReviewers($0, $1, $2, $3) {
10766
- const $4 = Data_ReviewScore_n__3348_1044_weightReviews($0, $3, $2, $1, 1n, $1);
10767
- const $c = Data_ReviewScore_n__3348_1044_weightReviews($0, $3, $2, $1, 4n, $2);
10768
- const $14 = Data_ReviewScore_n__3348_1049_zipReviews($0, $3, $2, $1, $c, $4, {h: 1 /* 3348:1048:Subtract */, a1: $0, a2: $3, a3: $2, a4: $1}, 0);
10769
- return Data_ReviewScore_n__3348_1045_sortx27($0, $3, $2, $1, Data_ReviewScore_n__3348_1049_zipReviews($0, $3, $2, $1, $14, Data_ReviewScore_n__3348_1044_weightReviews($0, $3, $2, $1, 0n, $3), {h: 0 /* 3348:1047:Add */, a1: $0, a2: $3, a3: $2, a4: $1}, 1));
10803
+ const $4 = Data_ReviewScore_n__3350_1044_weightReviews($0, $3, $2, $1, 1n, $1);
10804
+ const $c = Data_ReviewScore_n__3350_1044_weightReviews($0, $3, $2, $1, 4n, $2);
10805
+ const $14 = Data_ReviewScore_n__3350_1049_zipReviews($0, $3, $2, $1, $c, $4, {h: 1 /* 3350:1048:Subtract */, a1: $0, a2: $3, a3: $2, a4: $1}, 0);
10806
+ return Data_ReviewScore_n__3350_1045_sortx27($0, $3, $2, $1, Data_ReviewScore_n__3350_1049_zipReviews($0, $3, $2, $1, $14, Data_ReviewScore_n__3350_1044_weightReviews($0, $3, $2, $1, 0n, $3), {h: 0 /* 3350:1047:Add */, a1: $0, a2: $3, a3: $2, a4: $1}, 1));
10770
10807
  }
10771
10808
 
10772
10809
  /* Data.ReviewScore.loginScore : ReviewScore login -> (login, Nat) */
@@ -10790,8 +10827,8 @@ function Data_List_DeleteBy_deleteByx27($0, $1, $2) {
10790
10827
  }
10791
10828
  }
10792
10829
 
10793
- /* FFI.Concurrency.3967:8551:both */
10794
- function FFI_Concurrency_n__3967_8551_both($0, $1, $2, $3, $4) {
10830
+ /* FFI.Concurrency.4431:8551:both */
10831
+ function FFI_Concurrency_n__4431_8551_both($0, $1, $2, $3, $4) {
10795
10832
  return $0.a1.a2(undefined)(undefined)($0.a2(undefined)($13 => FFI_Concurrency_prim__singleton($3, $13)))(xx27 => $0.a1.a2(undefined)(undefined)($0.a1.a2(undefined)(undefined)($4)($2b => $0.a2(undefined)($31 => FFI_Concurrency_prim__both(xx27, $2b, $31))))(nested => $0.a2(undefined)($3c => FFI_Concurrency_prim__flatten(nested, $3c))));
10796
10833
  }
10797
10834
 
@@ -10816,7 +10853,7 @@ function FFI_Concurrency_promiseAll($0, $1) {
10816
10853
  const $36 = $37 => $38 => $39 => {
10817
10854
  switch($37.h) {
10818
10855
  case 4: /* JArray */ return Data_Promise_pure_Applicative_Promise($37.a1, $38, $39);
10819
- default: return Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_70(), $45 => $45, {a1: csegen_62()('Expected a JSON array from futures but got '), a2: {a1: csegen_62()(Language_JSON_Data_show_Show_JSON($37)), a2: csegen_442()}}), $38, $39);
10856
+ default: return Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_70(), $45 => $45, {a1: csegen_62()('Expected a JSON array from futures but got '), a2: {a1: csegen_62()(Language_JSON_Data_show_Show_JSON($37)), a2: csegen_446()}}), $38, $39);
10820
10857
  }
10821
10858
  };
10822
10859
  return Data_Promise_x3ex3ex3d_Monad_Promise($21 => Data_Promise_either(csegen_72(), Data_Either_maybeToEither(() => Prelude_Types_foldMap_Foldable_List(csegen_70(), $2c => $2c, {a1: 'Failed to parse JSON from ', a2: {a1: str, a2: {h: 0}}}), Language_JSON_parse(str)), $21), $36);
@@ -10833,7 +10870,7 @@ function FFI_Concurrency_fork($0, $1) {
10833
10870
 
10834
10871
  /* FFI.Concurrency.all : HasIO io => Foldable t => t Future -> io Future */
10835
10872
  function FFI_Concurrency_all($0, $1, $2) {
10836
- return $1.a1(undefined)(undefined)($c => $d => FFI_Concurrency_n__3967_8551_both($0, $1, $2, $c, $d))($0.a2(undefined)($1a => FFI_Concurrency_prim__neutral($1a)))($2);
10873
+ return $1.a1(undefined)(undefined)($c => $d => FFI_Concurrency_n__4431_8551_both($0, $1, $2, $c, $d))($0.a2(undefined)($1a => FFI_Concurrency_prim__neutral($1a)))($2);
10837
10874
  }
10838
10875
 
10839
10876
  /* Data.SortedMap.map */
@@ -10878,7 +10915,7 @@ function Data_SortedMap_insert($0, $1, $2) {
10878
10915
 
10879
10916
  /* Data.SortedMap.fromList : Ord k => List (k, v) -> SortedMap k v */
10880
10917
  function Data_SortedMap_fromList($0, $1) {
10881
- return Prelude_Basics_flip($4 => $5 => Data_SortedMap_insertFrom(csegen_189(), $4, $5), Data_SortedMap_empty($0), $1);
10918
+ return Prelude_Basics_flip($4 => $5 => Data_SortedMap_insertFrom(csegen_193(), $4, $5), Data_SortedMap_empty($0), $1);
10882
10919
  }
10883
10920
 
10884
10921
  /* Data.SortedMap.empty : Ord k => SortedMap k v */
@@ -10888,7 +10925,7 @@ function Data_SortedMap_empty($0) {
10888
10925
 
10889
10926
  /* Data.SortedMap.Dependent.treeToList : Tree n k v o -> List (x : k ** v x) */
10890
10927
  function Data_SortedMap_Dependent_treeToList($0) {
10891
- return Data_SortedMap_Dependent_n__6748_6807_treeToListx27($3 => ({a1: $3, a2: {h: 0}}), $0);
10928
+ return Data_SortedMap_Dependent_n__6750_6807_treeToListx27($3 => ({a1: $3, a2: {h: 0}}), $0);
10892
10929
  }
10893
10930
 
10894
10931
  /* Data.SortedMap.Dependent.treeMap : (a x -> b x) -> Tree n k a o -> Tree n k b o */
@@ -11188,26 +11225,26 @@ function Label_addLabels($0, $1, $2, $3) {
11188
11225
  return FFI_GitHub_addPullLabels($1, $0.a2, $0.a3, $2.a1, $3);
11189
11226
  }
11190
11227
 
11191
- /* Graph.5778:2260:yellowDot */
11192
- function Graph_n__5778_2260_yellowDot($0, $1, $2, $3, $4, $5) {
11228
+ /* Graph.6229:2260:yellowDot */
11229
+ function Graph_n__6229_2260_yellowDot($0, $1, $2, $3, $4, $5) {
11193
11230
  return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(3), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('\u{b7}'));
11194
11231
  }
11195
11232
 
11196
- /* Graph.5778:2261:redDot */
11197
- function Graph_n__5778_2261_redDot($0, $1, $2, $3, $4, $5) {
11233
+ /* Graph.6229:2261:redDot */
11234
+ function Graph_n__6229_2261_redDot($0, $1, $2, $3, $4, $5) {
11198
11235
  return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(1), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('\u{25e6}'));
11199
11236
  }
11200
11237
 
11201
- /* Graph.5778:2265:maxValue */
11202
- function Graph_n__5778_2265_maxValue($0, $1, $2, $3, $4, $5, $6) {
11238
+ /* Graph.6229:2265:maxValue */
11239
+ function Graph_n__6229_2265_maxValue($0, $1, $2, $3, $4, $5, $6) {
11203
11240
  switch($6.h) {
11204
11241
  case 0: /* nil */ return 0n;
11205
- case undefined: /* cons */ return Prelude_Types_max_Ord_Nat($6.a1.a2, Graph_n__5778_2265_maxValue($0, $1, $2, $3, $4, $5, $6.a2));
11242
+ case undefined: /* cons */ return Prelude_Types_max_Ord_Nat($6.a1.a2, Graph_n__6229_2265_maxValue($0, $1, $2, $3, $4, $5, $6.a2));
11206
11243
  }
11207
11244
  }
11208
11245
 
11209
- /* Graph.5778:2263:header */
11210
- function Graph_n__5778_2263_header($0, $1, $2, $3, $4, $5) {
11246
+ /* Graph.6229:2263:header */
11247
+ function Graph_n__6229_2263_header($0, $1, $2, $3, $4, $5) {
11211
11248
  let $3e;
11212
11249
  switch(Prelude_Types_null_Foldable_Maybe($2)) {
11213
11250
  case 1: {
@@ -11215,44 +11252,44 @@ function Graph_n__5778_2263_header($0, $1, $2, $3, $4, $5) {
11215
11252
  break;
11216
11253
  }
11217
11254
  case 0: {
11218
- $3e = {a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(csegen_62()('1x the number of completed reviews')), Text_PrettyPrint_Prettyprinter_Symbols_parens(Graph_n__5778_2262_greenBox($0, $1, $2, $3, $4, $5)))};
11255
+ $3e = {a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(csegen_62()('1x the number of completed reviews')), Text_PrettyPrint_Prettyprinter_Symbols_parens(Graph_n__6229_2262_greenBox($0, $1, $2, $3, $4, $5)))};
11219
11256
  break;
11220
11257
  }
11221
11258
  }
11222
- const $3d = {a1: $3e, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Symbols_parens(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Graph_n__5778_2261_redDot($0, $1, $2, $3, $4, $5), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(csegen_62()('overlayed on')), Graph_n__5778_2260_yellowDot($0, $1, $2, $3, $4, $5))))}, a2: csegen_749()}};
11223
- const $29 = {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(csegen_62()('1x the number of closed PRs with unanswered review requests')), Text_PrettyPrint_Prettyprinter_Symbols_parens(Graph_n__5778_2261_redDot($0, $1, $2, $3, $4, $5)))}, a2: $3d};
11224
- const $15 = {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(csegen_62()('4x the number of open review requests')), Text_PrettyPrint_Prettyprinter_Symbols_parens(Graph_n__5778_2260_yellowDot($0, $1, $2, $3, $4, $5)))}, a2: $29};
11259
+ const $3d = {a1: $3e, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Symbols_parens(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Graph_n__6229_2261_redDot($0, $1, $2, $3, $4, $5), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(csegen_62()('overlayed on')), Graph_n__6229_2260_yellowDot($0, $1, $2, $3, $4, $5))))}, a2: csegen_755()}};
11260
+ const $29 = {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(csegen_62()('1x the number of closed PRs with unanswered review requests')), Text_PrettyPrint_Prettyprinter_Symbols_parens(Graph_n__6229_2261_redDot($0, $1, $2, $3, $4, $5)))}, a2: $3d};
11261
+ const $15 = {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(csegen_62()('4x the number of open review requests')), Text_PrettyPrint_Prettyprinter_Symbols_parens(Graph_n__6229_2260_yellowDot($0, $1, $2, $3, $4, $5)))}, a2: $29};
11225
11262
  const $d = {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(csegen_62()('Weighted review workload.'))}, a2: $15};
11226
11263
  const $9 = {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc()}, a2: $d};
11227
11264
  const $7 = Data_List_catMaybes($9);
11228
11265
  return Text_PrettyPrint_Prettyprinter_Doc_vsep($7);
11229
11266
  }
11230
11267
 
11231
- /* Graph.5457:1932:header */
11232
- function Graph_n__5457_1932_header($0) {
11233
- 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(csegen_62()('Open Pull Requests grouped by month craetaed.'))}, a2: csegen_749()}}));
11268
+ /* Graph.5908:1932:header */
11269
+ function Graph_n__5908_1932_header($0) {
11270
+ 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(csegen_62()('Open Pull Requests grouped by month craetaed.'))}, a2: csegen_755()}}));
11234
11271
  }
11235
11272
 
11236
- /* Graph.5778:2262:greenBox */
11237
- function Graph_n__5778_2262_greenBox($0, $1, $2, $3, $4, $5) {
11273
+ /* Graph.6229:2262:greenBox */
11274
+ function Graph_n__6229_2262_greenBox($0, $1, $2, $3, $4, $5) {
11238
11275
  return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(2), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('\u{25aa}'));
11239
11276
  }
11240
11277
 
11241
- /* Graph.5457:1929:graphable */
11242
- function Graph_n__5457_1929_graphable($0, $1) {
11278
+ /* Graph.5908:1929:graphable */
11279
+ function Graph_n__5908_1929_graphable($0, $1) {
11243
11280
  return {a1: $1.a1.a2, a2: (Prelude_Types_List_lengthTR($1.a2)+1n)};
11244
11281
  }
11245
11282
 
11246
- /* Graph.4965:1524:countInParens */
11247
- function Graph_n__4965_1524_countInParens($0, $1) {
11283
+ /* Graph.5416:1524:countInParens */
11284
+ function Graph_n__5416_1524_countInParens($0, $1) {
11248
11285
  switch(Prelude_Types_x3e_Ord_Nat($1.a2, 4n)) {
11249
11286
  case 1: return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_foldMap_Foldable_List(csegen_70(), $11 => $11, {a1: '(', a2: {a1: Prelude_Show_show_Show_Nat($1.a2), a2: {a1: ')', a2: {h: 0}}}})));
11250
11287
  case 0: return Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(csegen_112());
11251
11288
  }
11252
11289
  }
11253
11290
 
11254
- /* Graph.4965:1523:coloredLabel */
11255
- function Graph_n__4965_1523_coloredLabel($0, $1) {
11291
+ /* Graph.5416:1523:coloredLabel */
11292
+ function Graph_n__5416_1523_coloredLabel($0, $1) {
11256
11293
  switch((($1.a2===0n)?1:0)) {
11257
11294
  case 1: return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(2), $0.a1(undefined)($1.a1));
11258
11295
  case 0: {
@@ -11269,8 +11306,8 @@ function Graph_n__4965_1523_coloredLabel($0, $1) {
11269
11306
  }
11270
11307
  }
11271
11308
 
11272
- /* Graph.5778:2264:augment */
11273
- function Graph_n__5778_2264_augment($0, $1, $2, $3, $4, $5, $6, $7) {
11309
+ /* Graph.6229:2264:augment */
11310
+ function Graph_n__6229_2264_augment($0, $1, $2, $3, $4, $5, $6, $7) {
11274
11311
  return {a1: $7, a2: Prelude_Types_maybe(() => 0n, () => $d => $d, Data_SortedMap_lookup($7.a1, $6))};
11275
11312
  }
11276
11313
 
@@ -11306,7 +11343,7 @@ function Graph_prettyPrec_Pretty_Date($0, $1) {
11306
11343
 
11307
11344
  /* Graph.label */
11308
11345
  function Graph_label_Graphable_x28PRsOnDatex20x24dateTyx29($0, $1) {
11309
- return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Graph_n__4965_1523_coloredLabel($0, $1), Graph_n__4965_1524_countInParens($0, $1));
11346
+ return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Graph_n__5416_1523_coloredLabel($0, $1), Graph_n__5416_1524_countInParens($0, $1));
11310
11347
  }
11311
11348
 
11312
11349
  /* Graph.label */
@@ -11345,11 +11382,11 @@ function Graph_reviewsGraph($0, $1, $2, $3, $4, $5) {
11345
11382
  break;
11346
11383
  }
11347
11384
  case undefined: /* just */ {
11348
- $15 = csegen_116()($29 => Graph_n__5778_2264_augment($0, $1, $5, $4, $3, $2, $5.a1, $29))($6);
11385
+ $15 = csegen_116()($29 => Graph_n__6229_2264_augment($0, $1, $5, $4, $3, $2, $5.a1, $29))($6);
11349
11386
  break;
11350
11387
  }
11351
11388
  }
11352
- const $34 = Prelude_Types_maybe(() => 0n, () => $38 => $38, csegen_60()($3e => Graph_n__5778_2265_maxValue($0, $1, $5, $4, $3, $2, Data_SortedMap_toList($3e)))($5));
11389
+ const $34 = Prelude_Types_maybe(() => 0n, () => $38 => $38, csegen_60()($3e => Graph_n__6229_2265_maxValue($0, $1, $5, $4, $3, $2, Data_SortedMap_toList($3e)))($5));
11353
11390
  switch($6.h) {
11354
11391
  case 0: /* nil */ return Text_PrettyPrint_Prettyprinter_Doc_emptyDoc();
11355
11392
  case undefined: /* cons */ {
@@ -11366,8 +11403,8 @@ function Graph_reviewsGraph($0, $1, $2, $3, $4, $5) {
11366
11403
  }
11367
11404
  }
11368
11405
  const $65 = Graph_graph({a1: $69 => Graph_totalWidth_Graphable_x28AugmentedReviewScorex20x24loginx29($1, $69), a2: $6e => Graph_label_Graphable_x28AugmentedReviewScorex20x24loginx29($1, $6e), a3: $73 => Graph_score_Graphable_x28AugmentedReviewScorex20x24loginx29($1, $73), a4: $78 => Graph_detractor_Graphable_x28AugmentedReviewScorex20x24loginx29($1, $78), a5: $7d => Graph_bonus_Graphable_x28AugmentedReviewScorex20x24loginx29($1, $7d)}, $81, $15);
11369
- const $59 = csegen_487()(Graph_n__5778_2263_header($0, $1, $5, $4, $3, $2))($65);
11370
- const $56 = csegen_487()($59);
11406
+ const $59 = csegen_491()(Graph_n__6229_2263_header($0, $1, $5, $4, $3, $2))($65);
11407
+ const $56 = csegen_491()($59);
11371
11408
  return $56(Text_PrettyPrint_Prettyprinter_Doc_line());
11372
11409
  }
11373
11410
  }
@@ -11375,9 +11412,9 @@ function Graph_reviewsGraph($0, $1, $2, $3, $4, $5) {
11375
11412
 
11376
11413
  /* Graph.healthGraph : List PullRequest -> Doc AnsiStyle */
11377
11414
  function Graph_healthGraph($0) {
11378
- const $1 = Data_List_groupBy($4 => $5 => Prelude_Basics_on($8 => $9 => Prelude_Basics_on($c => $d => (($c===$d)?1:0), $11 => $11.a2, $8, $9), csegen_601(), $4, $5), Data_List_sortBy(csegen_602(), $0));
11415
+ const $1 = Data_List_groupBy($4 => $5 => Prelude_Basics_on($8 => $9 => Prelude_Basics_on($c => $d => (($c===$d)?1:0), $11 => $11.a2, $8, $9), csegen_607(), $4, $5), Data_List_sortBy(csegen_608(), $0));
11379
11416
  const $1e = Prelude_Types_foldr_Foldable_List(xs => m => Prelude_Types_max_Ord_Nat(Data_List1_length(xs), m), 1n, $1);
11380
- return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Graph_n__5457_1932_header($0), a2: {a1: Graph_graph({a1: $32 => Graph_totalWidth_Graphable_x28PRsOnDatex20x24dateTyx29(csegen_770(), $32), a2: $38 => Graph_label_Graphable_x28PRsOnDatex20x24dateTyx29(csegen_770(), $38), a3: $3e => Graph_score_Graphable_x28PRsOnDatex20x24dateTyx29(csegen_770(), $3e), a4: $44 => Graph_detractor_Graphable_x28PRsOnDatex20x24dateTyx29(csegen_770(), $44), a5: $4a => Graph_bonus_Graphable_x28PRsOnDatex20x24dateTyx29(csegen_770(), $4a)}, $1e, Graph_n__5457_1930_unfoldGraph($0, Data_Fuel_limit(48n), $1, {h: 0})), a2: {h: 0}}});
11417
+ return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Graph_n__5908_1932_header($0), a2: {a1: Graph_graph({a1: $32 => Graph_totalWidth_Graphable_x28PRsOnDatex20x24dateTyx29(csegen_776(), $32), a2: $38 => Graph_label_Graphable_x28PRsOnDatex20x24dateTyx29(csegen_776(), $38), a3: $3e => Graph_score_Graphable_x28PRsOnDatex20x24dateTyx29(csegen_776(), $3e), a4: $44 => Graph_detractor_Graphable_x28PRsOnDatex20x24dateTyx29(csegen_776(), $44), a5: $4a => Graph_bonus_Graphable_x28PRsOnDatex20x24dateTyx29(csegen_776(), $4a)}, $1e, Graph_n__5908_1930_unfoldGraph($0, Data_Fuel_limit(48n), $1, {h: 0})), a2: {h: 0}}});
11381
11418
  }
11382
11419
 
11383
11420
  /* Graph.graphOne : Graphable g => Nat -> g -> Doc AnsiStyle */
@@ -11397,13 +11434,67 @@ function Graph_bar($0, $1, $2, $3) {
11397
11434
  return Text_PrettyPrint_Prettyprinter_Doc_indent(Number(_truncBigInt32($0)), Text_PrettyPrint_Prettyprinter_Doc_hcat({a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(1), Text_PrettyPrint_Prettyprinter_Doc_hcat(Data_List_replicateTR({h: 0}, $2, Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Char(csegen_62()('\u{25e6}'))))), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(3), Text_PrettyPrint_Prettyprinter_Doc_hcat(Data_List_replicateTR({h: 0}, $1, Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Char(csegen_62()('\u{b7}'))))), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(2), Text_PrettyPrint_Prettyprinter_Doc_hcat(Data_List_replicateTR({h: 0}, $3, Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Char(csegen_62()('\u{25aa}'))))), a2: {h: 0}}}}));
11398
11435
  }
11399
11436
 
11400
- /* BashCompletion.4358:8249:slugsOrLoginsOrLabels */
11401
- function BashCompletion_n__4358_8249_slugsOrLoginsOrLabels($0, $1, $2) {
11437
+ /* BashCompletion.case block in case block in unhashify */
11438
+ function BashCompletion_case__casex20blockx20inx20unhashify_7794($0, $1, $2) {
11439
+ switch($0) {
11440
+ case '': {
11441
+ switch($2.h) {
11442
+ case 0: /* nil */ return $1;
11443
+ default: {
11444
+ switch($2.a1) {
11445
+ case '#': return $2.a2;
11446
+ default: return $1;
11447
+ }
11448
+ }
11449
+ }
11450
+ }
11451
+ default: {
11452
+ switch($2.a1) {
11453
+ case '#': return $2.a2;
11454
+ default: return $1;
11455
+ }
11456
+ }
11457
+ }
11458
+ }
11459
+
11460
+ /* BashCompletion.case block in unhashify */
11461
+ function BashCompletion_case__unhashify_7774($0, $1) {
11462
+ switch($0) {
11463
+ case '': {
11464
+ switch($1.h) {
11465
+ case 0: /* nil */ return '';
11466
+ default: {
11467
+ switch($1.a1) {
11468
+ case '#': return $1.a2;
11469
+ case '\u{5c}': {
11470
+ const $6 = ('\u{5c}'+$1.a2);
11471
+ return BashCompletion_case__casex20blockx20inx20unhashify_7794($1.a2, $6, Data_String_strM($1.a2));
11472
+ }
11473
+ default: return $0;
11474
+ }
11475
+ }
11476
+ }
11477
+ }
11478
+ default: {
11479
+ switch($1.a1) {
11480
+ case '#': return $1.a2;
11481
+ case '\u{5c}': {
11482
+ const $11 = ('\u{5c}'+$1.a2);
11483
+ return BashCompletion_case__casex20blockx20inx20unhashify_7794($1.a2, $11, Data_String_strM($1.a2));
11484
+ }
11485
+ default: return $0;
11486
+ }
11487
+ }
11488
+ }
11489
+ }
11490
+
11491
+ /* BashCompletion.4506:8427:slugsOrLoginsOrLabels */
11492
+ function BashCompletion_n__4506_8427_slugsOrLoginsOrLabels($0, $1, $2) {
11402
11493
  switch(Data_String_isPrefixOf('+', $1)) {
11403
11494
  case 1: return csegen_116()($b => ('+'+$b))($2.a11);
11404
11495
  case 0: {
11405
- switch(Data_String_isPrefixOf('#', $1)) {
11406
- case 1: return csegen_116()($18 => ('#'+BashCompletion_slugify($18)))($2.a10);
11496
+ switch(BashCompletion_isHashPrefix($1)) {
11497
+ case 1: return csegen_791()($2.a10);
11407
11498
  case 0: return $2.a9;
11408
11499
  }
11409
11500
  }
@@ -11415,6 +11506,11 @@ function BashCompletion_unslugify($0) {
11415
11506
  return Prelude_Types_fastPack(Data_List_replaceOn(csegen_132(), '\u{25cc}', ' ', Prelude_Types_fastUnpack($0)));
11416
11507
  }
11417
11508
 
11509
+ /* BashCompletion.unhashify : String -> String */
11510
+ function BashCompletion_unhashify($0) {
11511
+ return BashCompletion_case__unhashify_7774($0, Data_String_strM($0));
11512
+ }
11513
+
11418
11514
  /* BashCompletion.slugify : String -> String */
11419
11515
  function BashCompletion_slugify($0) {
11420
11516
  return Prelude_Types_fastPack(Data_List_replaceOn(csegen_132(), ' ', '\u{25cc}', Prelude_Types_fastUnpack($0)));
@@ -11451,8 +11547,8 @@ function BashCompletion_opts($0, $1, $2, $3) {
11451
11547
  }
11452
11548
  case 'label': {
11453
11549
  switch($2) {
11454
- case '--': return csegen_787()($0.a10);
11455
- default: return Prelude_Types_List_filterAppend({h: 0}, $24 => Data_String_isPrefixOf($2, $24), csegen_787()($0.a10));
11550
+ case '--': return csegen_793()($0.a10);
11551
+ default: return Prelude_Types_List_filterAppend({h: 0}, $24 => Data_String_isPrefixOf($2, $24), csegen_793()($0.a10));
11456
11552
  }
11457
11553
  }
11458
11554
  case 'list': {
@@ -11493,7 +11589,7 @@ function BashCompletion_opts($0, $1, $2, $3) {
11493
11589
  case 'graph': return {a1: '--completed', a2: $0.a9};
11494
11590
  case '--completed': return $0.a9;
11495
11591
  default: {
11496
- switch(Data_Maybe_isJust(Data_List_find($51 => Prelude_EqOrd_x3dx3d_Eq_String($51, $3), csegen_788()))) {
11592
+ switch(Data_Maybe_isJust(Data_List_find($51 => Prelude_EqOrd_x3dx3d_Eq_String($51, $3), csegen_794()))) {
11497
11593
  case 1: return Prelude_Types_List_filterAppend({h: 0}, $5a => Data_String_isPrefixOf($2, $5a), $0.a9);
11498
11594
  case 0: return {h: 0};
11499
11595
  }
@@ -11501,13 +11597,19 @@ function BashCompletion_opts($0, $1, $2, $3) {
11501
11597
  }
11502
11598
  }
11503
11599
  default: {
11504
- switch(Data_Maybe_isJust(Data_List_find($65 => Prelude_EqOrd_x3dx3d_Eq_String($65, $3), csegen_788()))) {
11600
+ switch(Data_Maybe_isJust(Data_List_find($65 => Prelude_EqOrd_x3dx3d_Eq_String($65, $3), csegen_794()))) {
11505
11601
  case 1: return Prelude_Types_List_filterAppend({h: 0}, $6e => Data_String_isPrefixOf($2, $6e), $0.a9);
11506
11602
  case 0: return {h: 0};
11507
11603
  }
11508
11604
  }
11509
11605
  }
11510
11606
  }
11607
+ case 'pr': {
11608
+ switch(BashCompletion_isHashPrefix($2)) {
11609
+ case 1: return csegen_791()($0.a10);
11610
+ case 0: return {h: 0};
11611
+ }
11612
+ }
11511
11613
  case 'assign': {
11512
11614
  switch($2) {
11513
11615
  case '--': {
@@ -11519,7 +11621,7 @@ function BashCompletion_opts($0, $1, $2, $3) {
11519
11621
  default: {
11520
11622
  switch(Data_String_isPrefixOf($2, '--dry')) {
11521
11623
  case 1: return {a1: '--dry', a2: {h: 0}};
11522
- case 0: return Prelude_Types_List_filterAppend({h: 0}, $83 => Data_String_isPrefixOf($2, $83), BashCompletion_n__4358_8249_slugsOrLoginsOrLabels($3, $2, $0));
11624
+ case 0: return BashCompletion_n__4506_8427_slugsOrLoginsOrLabels($3, $2, $0);
11523
11625
  }
11524
11626
  }
11525
11627
  }
@@ -11528,6 +11630,19 @@ function BashCompletion_opts($0, $1, $2, $3) {
11528
11630
  }
11529
11631
  }
11530
11632
 
11633
+ /* BashCompletion.isHashPrefix : String -> Bool */
11634
+ function BashCompletion_isHashPrefix($0) {
11635
+ switch(Data_String_isPrefixOf('#', $0)) {
11636
+ case 1: return 1;
11637
+ case 0: return Data_String_isPrefixOf('\u{5c}#', $0);
11638
+ }
11639
+ }
11640
+
11641
+ /* BashCompletion.hashify : String -> String */
11642
+ function BashCompletion_hashify($0) {
11643
+ return ('#'+$0);
11644
+ }
11645
+
11531
11646
  /* BashCompletion.cmdOpts : String -> String -> String -> Maybe (List String) */
11532
11647
  function BashCompletion_cmdOpts($0, $1, $2) {
11533
11648
  switch($1) {
@@ -11555,7 +11670,12 @@ function BashCompletion_cmdOpts($0, $1, $2) {
11555
11670
  case 'pr': {
11556
11671
  switch(Data_String_isPrefixOf($1, '--draft')) {
11557
11672
  case 1: return {a1: {a1: '--draft', a2: {h: 0}}};
11558
- case 0: return {a1: {h: 0}};
11673
+ case 0: {
11674
+ switch(BashCompletion_isHashPrefix($1)) {
11675
+ case 1: return {h: 0};
11676
+ case 0: return {a1: {h: 0}};
11677
+ }
11678
+ }
11559
11679
  }
11560
11680
  }
11561
11681
  default: return {h: 0};
@@ -11571,7 +11691,12 @@ function BashCompletion_cmdOpts($0, $1, $2) {
11571
11691
  case 'pr': {
11572
11692
  switch(Data_String_isPrefixOf($1, '--draft')) {
11573
11693
  case 1: return {a1: {a1: '--draft', a2: {h: 0}}};
11574
- case 0: return {a1: {h: 0}};
11694
+ case 0: {
11695
+ switch(BashCompletion_isHashPrefix($1)) {
11696
+ case 1: return {h: 0};
11697
+ case 0: return {a1: {h: 0}};
11698
+ }
11699
+ }
11575
11700
  }
11576
11701
  }
11577
11702
  default: return {h: 0};
@@ -11584,7 +11709,12 @@ function BashCompletion_cmdOpts($0, $1, $2) {
11584
11709
  case 'pr': {
11585
11710
  switch(Data_String_isPrefixOf($1, '--draft')) {
11586
11711
  case 1: return {a1: {a1: '--draft', a2: {h: 0}}};
11587
- case 0: return {a1: {h: 0}};
11712
+ case 0: {
11713
+ switch(BashCompletion_isHashPrefix($1)) {
11714
+ case 1: return {h: 0};
11715
+ case 0: return {a1: {h: 0}};
11716
+ }
11717
+ }
11588
11718
  }
11589
11719
  }
11590
11720
  default: return {h: 0};
@@ -11594,8 +11724,8 @@ function BashCompletion_cmdOpts($0, $1, $2) {
11594
11724
  }
11595
11725
  case 'contribute': {
11596
11726
  switch($1) {
11597
- case '-': return csegen_790();
11598
- case '--': return csegen_790();
11727
+ case '-': return csegen_796();
11728
+ case '--': return csegen_796();
11599
11729
  default: {
11600
11730
  switch(Data_String_isPrefixOf($1, '--checkout')) {
11601
11731
  case 1: return {a1: {a1: '--checkout', a2: {h: 0}}};
@@ -11607,7 +11737,7 @@ function BashCompletion_cmdOpts($0, $1, $2) {
11607
11737
  case 'graph': {
11608
11738
  switch($1) {
11609
11739
  case '--': return {h: 0};
11610
- case '-': return csegen_792();
11740
+ case '-': return csegen_798();
11611
11741
  default: {
11612
11742
  switch(Data_String_isPrefixOf($1, '--completed')) {
11613
11743
  case 1: return {a1: {a1: '--completed', a2: {h: 0}}};
@@ -11625,7 +11755,7 @@ function BashCompletion_cmdOpts($0, $1, $2) {
11625
11755
  }
11626
11756
  default: {
11627
11757
  switch($2) {
11628
- case 'harmony': return {a1: Prelude_Types_List_filterAppend({h: 0}, $56 => Data_String_isPrefixOf($1, $56), BashCompletion_allRootCmds())};
11758
+ case 'harmony': return {a1: Prelude_Types_List_filterAppend({h: 0}, $5f => Data_String_isPrefixOf($1, $5f), BashCompletion_allRootCmds())};
11629
11759
  default: {
11630
11760
  switch($0) {
11631
11761
  case 'sync': return {a1: {h: 0}};
@@ -11644,7 +11774,12 @@ function BashCompletion_cmdOpts($0, $1, $2) {
11644
11774
  case 'pr': {
11645
11775
  switch(Data_String_isPrefixOf($1, '--draft')) {
11646
11776
  case 1: return {a1: {a1: '--draft', a2: {h: 0}}};
11647
- case 0: return {a1: {h: 0}};
11777
+ case 0: {
11778
+ switch(BashCompletion_isHashPrefix($1)) {
11779
+ case 1: return {h: 0};
11780
+ case 0: return {a1: {h: 0}};
11781
+ }
11782
+ }
11648
11783
  }
11649
11784
  }
11650
11785
  default: return {h: 0};
@@ -11660,7 +11795,12 @@ function BashCompletion_cmdOpts($0, $1, $2) {
11660
11795
  case 'pr': {
11661
11796
  switch(Data_String_isPrefixOf($1, '--draft')) {
11662
11797
  case 1: return {a1: {a1: '--draft', a2: {h: 0}}};
11663
- case 0: return {a1: {h: 0}};
11798
+ case 0: {
11799
+ switch(BashCompletion_isHashPrefix($1)) {
11800
+ case 1: return {h: 0};
11801
+ case 0: return {a1: {h: 0}};
11802
+ }
11803
+ }
11664
11804
  }
11665
11805
  }
11666
11806
  default: return {h: 0};
@@ -11673,7 +11813,12 @@ function BashCompletion_cmdOpts($0, $1, $2) {
11673
11813
  case 'pr': {
11674
11814
  switch(Data_String_isPrefixOf($1, '--draft')) {
11675
11815
  case 1: return {a1: {a1: '--draft', a2: {h: 0}}};
11676
- case 0: return {a1: {h: 0}};
11816
+ case 0: {
11817
+ switch(BashCompletion_isHashPrefix($1)) {
11818
+ case 1: return {h: 0};
11819
+ case 0: return {a1: {h: 0}};
11820
+ }
11821
+ }
11677
11822
  }
11678
11823
  }
11679
11824
  default: return {h: 0};
@@ -11683,8 +11828,8 @@ function BashCompletion_cmdOpts($0, $1, $2) {
11683
11828
  }
11684
11829
  case 'contribute': {
11685
11830
  switch($1) {
11686
- case '-': return csegen_790();
11687
- case '--': return csegen_790();
11831
+ case '-': return csegen_796();
11832
+ case '--': return csegen_796();
11688
11833
  default: {
11689
11834
  switch(Data_String_isPrefixOf($1, '--checkout')) {
11690
11835
  case 1: return {a1: {a1: '--checkout', a2: {h: 0}}};
@@ -11696,7 +11841,7 @@ function BashCompletion_cmdOpts($0, $1, $2) {
11696
11841
  case 'graph': {
11697
11842
  switch($1) {
11698
11843
  case '--': return {h: 0};
11699
- case '-': return csegen_792();
11844
+ case '-': return csegen_798();
11700
11845
  default: {
11701
11846
  switch(Data_String_isPrefixOf($1, '--completed')) {
11702
11847
  case 1: return {a1: {a1: '--completed', a2: {h: 0}}};
@@ -11725,7 +11870,7 @@ function AppVersion_printVersion($0) {
11725
11870
 
11726
11871
  /* AppVersion.appVersion : String */
11727
11872
  const AppVersion_appVersion = __lazy(function () {
11728
- return '2.3.0';
11873
+ return '2.4.1';
11729
11874
  });
11730
11875
 
11731
11876