@mattpolzin/harmony 3.1.0 → 3.2.0

This diff represents the content of publicly available package versions that have been released to one of the supported registries. The information contained in this diff is provided for informational purposes only and reflects changes between package versions as they appear in their respective public registries.
Files changed (2) hide show
  1. package/harmony +456 -390
  2. package/package.json +1 -1
package/harmony CHANGED
@@ -734,7 +734,8 @@ function support_system_file_popen (cmd, m) {
734
734
  case "r":
735
735
  io_setting = ['ignore', write_fd, 2]
736
736
  break
737
- case "w", "a":
737
+ case "w":
738
+ case "a":
738
739
  io_setting = [write_fd, 'ignore', 2]
739
740
  break
740
741
  default:
@@ -870,7 +871,7 @@ function x24tcOpt_1($0) {
870
871
  case 0: return {h: 0 /* {TcDone:1} */, a1: $0.a5};
871
872
  default: {
872
873
  const $17 = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3};
873
- const $1b = Data_List_DeleteBy_deleteByx27($1e => $1f => Prelude_Basics_on($22 => $23 => $0.a1.a1.a1($22)($23), csegen_490(), $1e, $1f), $17, $0.a6);
874
+ const $1b = Data_List_DeleteBy_deleteByx27($1e => $1f => Prelude_Basics_on($22 => $23 => $0.a1.a1.a1($22)($23), csegen_492(), $1e, $1f), $17, $0.a6);
874
875
  switch($1b.a1.h) {
875
876
  case 0: /* nothing */ {
876
877
  switch($0.a8) {
@@ -885,7 +886,7 @@ function x24tcOpt_1($0) {
885
886
  }
886
887
  default: {
887
888
  const $6a = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3};
888
- const $6e = Data_List_DeleteBy_deleteByx27($71 => $72 => Prelude_Basics_on($75 => $76 => $0.a1.a1.a1($75)($76), csegen_490(), $71, $72), $6a, $0.a6);
889
+ const $6e = Data_List_DeleteBy_deleteByx27($71 => $72 => Prelude_Basics_on($75 => $76 => $0.a1.a1.a1($75)($76), csegen_492(), $71, $72), $6a, $0.a6);
889
890
  switch($6e.a1.h) {
890
891
  case 0: /* nothing */ {
891
892
  switch($0.a8) {
@@ -910,7 +911,7 @@ function x24tcOpt_1($0) {
910
911
  case 0: return {h: 0 /* {TcDone:1} */, a1: $0.a5};
911
912
  default: {
912
913
  const $c1 = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3};
913
- const $c5 = Data_List_DeleteBy_deleteByx27($c8 => $c9 => Prelude_Basics_on($cc => $cd => $0.a1.a1.a1($cc)($cd), csegen_490(), $c8, $c9), $c1, $0.a6);
914
+ const $c5 = Data_List_DeleteBy_deleteByx27($c8 => $c9 => Prelude_Basics_on($cc => $cd => $0.a1.a1.a1($cc)($cd), csegen_492(), $c8, $c9), $c1, $0.a6);
914
915
  switch($c5.a1.h) {
915
916
  case 0: /* nothing */ {
916
917
  switch($0.a8) {
@@ -925,7 +926,7 @@ function x24tcOpt_1($0) {
925
926
  }
926
927
  default: {
927
928
  const $114 = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2, a3: $0.a5.a1.a3};
928
- const $118 = Data_List_DeleteBy_deleteByx27($11b => $11c => Prelude_Basics_on($11f => $120 => $0.a1.a1.a1($11f)($120), csegen_490(), $11b, $11c), $114, $0.a6);
929
+ const $118 = Data_List_DeleteBy_deleteByx27($11b => $11c => Prelude_Basics_on($11f => $120 => $0.a1.a1.a1($11f)($120), csegen_492(), $11b, $11c), $114, $0.a6);
929
930
  switch($118.a1.h) {
930
931
  case 0: /* nothing */ {
931
932
  switch($0.a8) {
@@ -990,7 +991,7 @@ function Prelude_Show_n__3221_12652_showx27($0, $1, $2, $3) {
990
991
  /* {$tcOpt:4} */
991
992
  function x24tcOpt_4($0) {
992
993
  switch($0.h) {
993
- case 1: /* {TcContinue4:1} */ return {h: 2 /* {TcContinue4:2} */, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4(), a5: $0.a8, a6: {a1: {a1: $0.a5.a2, a2: {a1: Graph_n__5936_1935_graphable($0.a1, $0.a2, $0.a3, $0.a7), a2: Data_List1_forget($0.a10)}}}};
994
+ case 1: /* {TcContinue4:1} */ return {h: 2 /* {TcContinue4:2} */, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4(), a5: $0.a8, a6: {a1: {a1: $0.a5.a2, a2: {a1: Graph_n__5952_6228_graphable($0.a1, $0.a2, $0.a3, $0.a7), a2: Data_List1_forget($0.a10)}}}};
994
995
  case 2: /* {TcContinue4:2} */ {
995
996
  switch($0.a4.h) {
996
997
  case 0: /* nothing */ {
@@ -1009,7 +1010,7 @@ function x24tcOpt_4($0) {
1009
1010
  case undefined: /* cons */ return {h: 0 /* {TcDone:4} */, a1: Data_List1_forget($0.a6.a1.a2)};
1010
1011
  default: {
1011
1012
  switch($0.a6.h) {
1012
- case 0: /* nothing */ return {h: 2 /* {TcContinue4:2} */, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4.a1(), a5: $0.a5.a2, a6: {a1: {a1: $0.a5.a1.a1.a2, a2: {a1: Graph_n__5936_1935_graphable($0.a1, $0.a2, $0.a3, $0.a5.a1), a2: {h: 0}}}}};
1013
+ case 0: /* nothing */ return {h: 2 /* {TcContinue4:2} */, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4.a1(), a5: $0.a5.a2, a6: {a1: {a1: $0.a5.a1.a1.a2, a2: {a1: Graph_n__5952_6228_graphable($0.a1, $0.a2, $0.a3, $0.a5.a1), a2: {h: 0}}}}};
1013
1014
  case undefined: /* just */ {
1014
1015
  const $3b = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2};
1015
1016
  switch(((Data_Date_nextMonth($0.a6.a1.a1.a2)===$0.a5.a1.a1.a2.a2)?1:0)) {
@@ -1023,7 +1024,7 @@ function x24tcOpt_4($0) {
1023
1024
  }
1024
1025
  default: {
1025
1026
  switch($0.a6.h) {
1026
- case 0: /* nothing */ return {h: 2 /* {TcContinue4:2} */, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4.a1(), a5: $0.a5.a2, a6: {a1: {a1: $0.a5.a1.a1.a2, a2: {a1: Graph_n__5936_1935_graphable($0.a1, $0.a2, $0.a3, $0.a5.a1), a2: {h: 0}}}}};
1027
+ case 0: /* nothing */ return {h: 2 /* {TcContinue4:2} */, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4.a1(), a5: $0.a5.a2, a6: {a1: {a1: $0.a5.a1.a1.a2, a2: {a1: Graph_n__5952_6228_graphable($0.a1, $0.a2, $0.a3, $0.a5.a1), a2: {h: 0}}}}};
1027
1028
  case undefined: /* just */ {
1028
1029
  const $71 = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2};
1029
1030
  switch(((Data_Date_nextMonth($0.a6.a1.a1.a2)===$0.a5.a1.a1.a2.a2)?1:0)) {
@@ -1037,7 +1038,7 @@ function x24tcOpt_4($0) {
1037
1038
  }
1038
1039
  default: {
1039
1040
  switch($0.a6.h) {
1040
- case 0: /* nothing */ return {h: 2 /* {TcContinue4:2} */, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4.a1(), a5: $0.a5.a2, a6: {a1: {a1: $0.a5.a1.a1.a2, a2: {a1: Graph_n__5936_1935_graphable($0.a1, $0.a2, $0.a3, $0.a5.a1), a2: {h: 0}}}}};
1041
+ case 0: /* nothing */ return {h: 2 /* {TcContinue4:2} */, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4.a1(), a5: $0.a5.a2, a6: {a1: {a1: $0.a5.a1.a1.a2, a2: {a1: Graph_n__5952_6228_graphable($0.a1, $0.a2, $0.a3, $0.a5.a1), a2: {h: 0}}}}};
1041
1042
  case undefined: /* just */ {
1042
1043
  const $a7 = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2};
1043
1044
  switch(((Data_Date_nextMonth($0.a6.a1.a1.a2)===$0.a5.a1.a1.a2.a2)?1:0)) {
@@ -1061,7 +1062,7 @@ function x24tcOpt_4($0) {
1061
1062
  case undefined: /* cons */ return {h: 0 /* {TcDone:4} */, a1: Data_List1_forget($0.a6.a1.a2)};
1062
1063
  default: {
1063
1064
  switch($0.a6.h) {
1064
- case 0: /* nothing */ return {h: 2 /* {TcContinue4:2} */, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4.a1(), a5: $0.a5.a2, a6: {a1: {a1: $0.a5.a1.a1.a2, a2: {a1: Graph_n__5936_1935_graphable($0.a1, $0.a2, $0.a3, $0.a5.a1), a2: {h: 0}}}}};
1065
+ case 0: /* nothing */ return {h: 2 /* {TcContinue4:2} */, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4.a1(), a5: $0.a5.a2, a6: {a1: {a1: $0.a5.a1.a1.a2, a2: {a1: Graph_n__5952_6228_graphable($0.a1, $0.a2, $0.a3, $0.a5.a1), a2: {h: 0}}}}};
1065
1066
  case undefined: /* just */ {
1066
1067
  const $e4 = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2};
1067
1068
  switch(((Data_Date_nextMonth($0.a6.a1.a1.a2)===$0.a5.a1.a1.a2.a2)?1:0)) {
@@ -1075,7 +1076,7 @@ function x24tcOpt_4($0) {
1075
1076
  }
1076
1077
  default: {
1077
1078
  switch($0.a6.h) {
1078
- case 0: /* nothing */ return {h: 2 /* {TcContinue4:2} */, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4.a1(), a5: $0.a5.a2, a6: {a1: {a1: $0.a5.a1.a1.a2, a2: {a1: Graph_n__5936_1935_graphable($0.a1, $0.a2, $0.a3, $0.a5.a1), a2: {h: 0}}}}};
1079
+ case 0: /* nothing */ return {h: 2 /* {TcContinue4:2} */, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4.a1(), a5: $0.a5.a2, a6: {a1: {a1: $0.a5.a1.a1.a2, a2: {a1: Graph_n__5952_6228_graphable($0.a1, $0.a2, $0.a3, $0.a5.a1), a2: {h: 0}}}}};
1079
1080
  case undefined: /* just */ {
1080
1081
  const $11a = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2};
1081
1082
  switch(((Data_Date_nextMonth($0.a6.a1.a1.a2)===$0.a5.a1.a1.a2.a2)?1:0)) {
@@ -1089,7 +1090,7 @@ function x24tcOpt_4($0) {
1089
1090
  }
1090
1091
  default: {
1091
1092
  switch($0.a6.h) {
1092
- case 0: /* nothing */ return {h: 2 /* {TcContinue4:2} */, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4.a1(), a5: $0.a5.a2, a6: {a1: {a1: $0.a5.a1.a1.a2, a2: {a1: Graph_n__5936_1935_graphable($0.a1, $0.a2, $0.a3, $0.a5.a1), a2: {h: 0}}}}};
1093
+ case 0: /* nothing */ return {h: 2 /* {TcContinue4:2} */, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4.a1(), a5: $0.a5.a2, a6: {a1: {a1: $0.a5.a1.a1.a2, a2: {a1: Graph_n__5952_6228_graphable($0.a1, $0.a2, $0.a3, $0.a5.a1), a2: {h: 0}}}}};
1093
1094
  case undefined: /* just */ {
1094
1095
  const $150 = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2};
1095
1096
  switch(((Data_Date_nextMonth($0.a6.a1.a1.a2)===$0.a5.a1.a1.a2.a2)?1:0)) {
@@ -1113,7 +1114,7 @@ function x24tcOpt_4($0) {
1113
1114
  case undefined: /* cons */ return {h: 0 /* {TcDone:4} */, a1: Data_List1_forget($0.a6.a1.a2)};
1114
1115
  default: {
1115
1116
  switch($0.a6.h) {
1116
- case 0: /* nothing */ return {h: 2 /* {TcContinue4:2} */, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4.a1(), a5: $0.a5.a2, a6: {a1: {a1: $0.a5.a1.a1.a2, a2: {a1: Graph_n__5936_1935_graphable($0.a1, $0.a2, $0.a3, $0.a5.a1), a2: {h: 0}}}}};
1117
+ case 0: /* nothing */ return {h: 2 /* {TcContinue4:2} */, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4.a1(), a5: $0.a5.a2, a6: {a1: {a1: $0.a5.a1.a1.a2, a2: {a1: Graph_n__5952_6228_graphable($0.a1, $0.a2, $0.a3, $0.a5.a1), a2: {h: 0}}}}};
1117
1118
  case undefined: /* just */ {
1118
1119
  const $18d = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2};
1119
1120
  switch(((Data_Date_nextMonth($0.a6.a1.a1.a2)===$0.a5.a1.a1.a2.a2)?1:0)) {
@@ -1127,7 +1128,7 @@ function x24tcOpt_4($0) {
1127
1128
  }
1128
1129
  default: {
1129
1130
  switch($0.a6.h) {
1130
- case 0: /* nothing */ return {h: 2 /* {TcContinue4:2} */, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4.a1(), a5: $0.a5.a2, a6: {a1: {a1: $0.a5.a1.a1.a2, a2: {a1: Graph_n__5936_1935_graphable($0.a1, $0.a2, $0.a3, $0.a5.a1), a2: {h: 0}}}}};
1131
+ case 0: /* nothing */ return {h: 2 /* {TcContinue4:2} */, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4.a1(), a5: $0.a5.a2, a6: {a1: {a1: $0.a5.a1.a1.a2, a2: {a1: Graph_n__5952_6228_graphable($0.a1, $0.a2, $0.a3, $0.a5.a1), a2: {h: 0}}}}};
1131
1132
  case undefined: /* just */ {
1132
1133
  const $1c3 = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2};
1133
1134
  switch(((Data_Date_nextMonth($0.a6.a1.a1.a2)===$0.a5.a1.a1.a2.a2)?1:0)) {
@@ -1141,7 +1142,7 @@ function x24tcOpt_4($0) {
1141
1142
  }
1142
1143
  default: {
1143
1144
  switch($0.a6.h) {
1144
- case 0: /* nothing */ return {h: 2 /* {TcContinue4:2} */, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4.a1(), a5: $0.a5.a2, a6: {a1: {a1: $0.a5.a1.a1.a2, a2: {a1: Graph_n__5936_1935_graphable($0.a1, $0.a2, $0.a3, $0.a5.a1), a2: {h: 0}}}}};
1145
+ case 0: /* nothing */ return {h: 2 /* {TcContinue4:2} */, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4.a1(), a5: $0.a5.a2, a6: {a1: {a1: $0.a5.a1.a1.a2, a2: {a1: Graph_n__5952_6228_graphable($0.a1, $0.a2, $0.a3, $0.a5.a1), a2: {h: 0}}}}};
1145
1146
  case undefined: /* just */ {
1146
1147
  const $1f9 = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2};
1147
1148
  switch(((Data_Date_nextMonth($0.a6.a1.a1.a2)===$0.a5.a1.a1.a2.a2)?1:0)) {
@@ -1163,18 +1164,18 @@ function x24tcOpt_4($0) {
1163
1164
  }
1164
1165
  }
1165
1166
 
1166
- /* Graph.5953:2064:insertNext */
1167
- function Graph_n__5953_2064_insertNext($0, $1, $2, $3, $4, $5, $6, $7, $8, $9) {
1167
+ /* Graph.5969:6357:insertNext */
1168
+ function Graph_n__5969_6357_insertNext($0, $1, $2, $3, $4, $5, $6, $7, $8, $9) {
1168
1169
  return __tailRec(x24tcOpt_4, {h: 1 /* {TcContinue4:1} */, a1: $0, a2: $1, a3: $2, a4: $3, a5: $4, a6: $5, a7: $6, a8: $7, a9: $8, a10: $9});
1169
1170
  }
1170
1171
 
1171
- /* Graph.5936:1938:unfoldGraph */
1172
- function Graph_n__5936_1938_unfoldGraph($0, $1, $2, $3, $4, $5) {
1172
+ /* Graph.5952:6231:unfoldGraph */
1173
+ function Graph_n__5952_6231_unfoldGraph($0, $1, $2, $3, $4, $5) {
1173
1174
  return __tailRec(x24tcOpt_4, {h: 2 /* {TcContinue4:2} */, a1: $0, a2: $1, a3: $2, a4: $3, a5: $4, a6: $5});
1174
1175
  }
1175
1176
 
1176
- /* Graph.5953:2065:insertPlaceholder */
1177
- function Graph_n__5953_2065_insertPlaceholder($0, $1, $2, $3, $4, $5, $6, $7, $8, $9) {
1177
+ /* Graph.5969:6358:insertPlaceholder */
1178
+ function Graph_n__5969_6358_insertPlaceholder($0, $1, $2, $3, $4, $5, $6, $7, $8, $9) {
1178
1179
  return __tailRec(x24tcOpt_4, {h: 3 /* {TcContinue4:3} */, a1: $0, a2: $1, a3: $2, a4: $3, a5: $4, a6: $5, a7: $6, a8: $7, a9: $8, a10: $9});
1179
1180
  }
1180
1181
 
@@ -1498,19 +1499,19 @@ function x24tcOpt_14($0) {
1498
1499
  switch($0.a7.a2.a1.a1.a1) {
1499
1500
  case ',': return {h: 1 /* {TcContinue14:1} */, a1: $0.a6, a2: {a1: $0.a5, a2: {a1: $0.a3, a2: $0.a7.a1}}, a3: $0.a7.a2.a2};
1500
1501
  case '}': return {h: 0 /* {TcDone:14} */, a1: {h: 0 /* Succ0 */, a1: {h: 6 /* JObject */, a1: Prelude_Types_SnocList_x3cx3ex3e($0.a5, {a1: {a1: $0.a3, a2: $0.a7.a1}, a2: {h: 0}})}, a2: $0.a7.a2.a2}};
1501
- default: return {h: 0 /* {TcDone:14} */, a1: Text_ParseError_failInParenEOI($0.a6, {h: 0 /* Symbol */, a1: '{'}, csegen_222(), $0.a7)};
1502
+ default: return {h: 0 /* {TcDone:14} */, a1: Text_ParseError_failInParenEOI($0.a6, {h: 0 /* Symbol */, a1: '{'}, csegen_224(), $0.a7)};
1502
1503
  }
1503
1504
  }
1504
- default: return {h: 0 /* {TcDone:14} */, a1: Text_ParseError_failInParenEOI($0.a6, {h: 0 /* Symbol */, a1: '{'}, csegen_222(), $0.a7)};
1505
+ default: return {h: 0 /* {TcDone:14} */, a1: Text_ParseError_failInParenEOI($0.a6, {h: 0 /* Symbol */, a1: '{'}, csegen_224(), $0.a7)};
1505
1506
  }
1506
1507
  }
1507
- default: return {h: 0 /* {TcDone:14} */, a1: Text_ParseError_failInParenEOI($0.a6, {h: 0 /* Symbol */, a1: '{'}, csegen_222(), $0.a7)};
1508
+ default: return {h: 0 /* {TcDone:14} */, a1: Text_ParseError_failInParenEOI($0.a6, {h: 0 /* Symbol */, a1: '{'}, csegen_224(), $0.a7)};
1508
1509
  }
1509
1510
  }
1510
- default: return {h: 0 /* {TcDone:14} */, a1: Text_ParseError_failInParenEOI($0.a6, {h: 0 /* Symbol */, a1: '{'}, csegen_222(), $0.a7)};
1511
+ default: return {h: 0 /* {TcDone:14} */, a1: Text_ParseError_failInParenEOI($0.a6, {h: 0 /* Symbol */, a1: '{'}, csegen_224(), $0.a7)};
1511
1512
  }
1512
1513
  }
1513
- default: return {h: 0 /* {TcDone:14} */, a1: Text_ParseError_failInParenEOI($0.a6, {h: 0 /* Symbol */, a1: '{'}, csegen_222(), $0.a7)};
1514
+ default: return {h: 0 /* {TcDone:14} */, a1: Text_ParseError_failInParenEOI($0.a6, {h: 0 /* Symbol */, a1: '{'}, csegen_224(), $0.a7)};
1514
1515
  }
1515
1516
  }
1516
1517
  }
@@ -1531,7 +1532,7 @@ function x24tcOpt_15($0) {
1531
1532
  switch($0.a3.h) {
1532
1533
  case 0: /* nil */ return {h: 0 /* {TcDone:15} */, a1: {h: 0}};
1533
1534
  case undefined: /* cons */ {
1534
- switch(Prelude_Types_elemBy(csegen_142(), $0.a2, $0.a3.a1, $0.a1)) {
1535
+ switch(Prelude_Types_elemBy(csegen_144(), $0.a2, $0.a3.a1, $0.a1)) {
1535
1536
  case 1: return {h: 1 /* {TcContinue15:1} */, a1: $0.a1, a2: $0.a2, a3: $0.a3.a2};
1536
1537
  case 0: return {h: 0 /* {TcDone:15} */, a1: {a1: $0.a3.a1, a2: Data_List_n__4927_5480_nubByx27({a1: $0.a3.a1, a2: $0.a1}, $0.a2, $0.a3.a2)}};
1537
1538
  }
@@ -2107,39 +2108,39 @@ function Prelude_Types_x3dx3d_Eq_x28Listx20x24ax29($0, $1, $2) {
2107
2108
 
2108
2109
  /* {$tcOpt:40} */
2109
2110
  function x24tcOpt_40($0) {
2110
- switch($0.a1) {
2111
- case 0n: return {h: 0 /* {TcDone:40} */, a1: $0.a2};
2112
- default: {
2113
- const $4 = ($0.a1-1n);
2114
- switch($0.a2.h) {
2115
- case 0: /* nil */ return {h: 0 /* {TcDone:40} */, a1: {h: 0}};
2116
- case undefined: /* cons */ return {h: 1 /* {TcContinue40:1} */, a1: $4, a2: $0.a2.a2};
2111
+ switch($0.a2.h) {
2112
+ case 0: /* nil */ return {h: 0 /* {TcDone:40} */, a1: {h: 0}};
2113
+ case undefined: /* cons */ {
2114
+ switch($0.a1($0.a2.a1)) {
2115
+ case 1: return {h: 1 /* {TcContinue40:1} */, a1: $0.a1, a2: $0.a2.a2};
2116
+ case 0: return {h: 0 /* {TcDone:40} */, a1: {a1: $0.a2.a1, a2: $0.a2.a2}};
2117
2117
  }
2118
2118
  }
2119
2119
  }
2120
2120
  }
2121
2121
 
2122
- /* Data.List.drop : Nat -> List a -> List a */
2123
- function Data_List_drop($0, $1) {
2122
+ /* Data.List.dropWhile : (a -> Bool) -> List a -> List a */
2123
+ function Data_List_dropWhile($0, $1) {
2124
2124
  return __tailRec(x24tcOpt_40, {h: 1 /* {TcContinue40:1} */, a1: $0, a2: $1});
2125
2125
  }
2126
2126
 
2127
2127
  /* {$tcOpt:41} */
2128
2128
  function x24tcOpt_41($0) {
2129
- switch($0.a3.h) {
2130
- case undefined: /* cons */ {
2131
- switch(Prelude_Types_isDigit($0.a3.a1)) {
2132
- case 1: return {h: 1 /* {TcContinue41:1} */, a1: $0.a1, a2: {a1: $0.a2, a2: $0.a3.a1}, a3: $0.a3.a2, a4: ($0.a4+1n)};
2133
- case 0: return {h: 0 /* {TcDone:41} */, a1: Text_Lex_Shift_rest($0.a1, $0.a2, {a1: $0.a3.a1, a2: $0.a3.a2}, $0.a4)};
2129
+ switch($0.a1) {
2130
+ case 0n: return {h: 0 /* {TcDone:41} */, a1: $0.a2};
2131
+ default: {
2132
+ const $4 = ($0.a1-1n);
2133
+ switch($0.a2.h) {
2134
+ case 0: /* nil */ return {h: 0 /* {TcDone:41} */, a1: {h: 0}};
2135
+ case undefined: /* cons */ return {h: 1 /* {TcContinue41:1} */, a1: $4, a2: $0.a2.a2};
2134
2136
  }
2135
2137
  }
2136
- case 0: /* nil */ return {h: 0 /* {TcDone:41} */, a1: {h: 0 /* Succ */, a1: $0.a2, a2: {h: 0}, a3: $0.a4}};
2137
2138
  }
2138
2139
  }
2139
2140
 
2140
- /* Text.Lex.Shift.digs : AutoShift False */
2141
- function Text_Lex_Shift_digs($0, $1, $2, $3) {
2142
- return __tailRec(x24tcOpt_41, {h: 1 /* {TcContinue41:1} */, a1: $0, a2: $1, a3: $2, a4: $3});
2141
+ /* Data.List.drop : Nat -> List a -> List a */
2142
+ function Data_List_drop($0, $1) {
2143
+ return __tailRec(x24tcOpt_41, {h: 1 /* {TcContinue41:1} */, a1: $0, a2: $1});
2143
2144
  }
2144
2145
 
2145
2146
  /* {$tcOpt:42} */
@@ -2148,15 +2149,15 @@ function x24tcOpt_42($0) {
2148
2149
  case undefined: /* cons */ {
2149
2150
  switch(Prelude_Types_isDigit($0.a3.a1)) {
2150
2151
  case 1: return {h: 1 /* {TcContinue42:1} */, a1: $0.a1, a2: {a1: $0.a2, a2: $0.a3.a1}, a3: $0.a3.a2, a4: ($0.a4+1n)};
2151
- case 0: return {h: 0 /* {TcDone:42} */, a1: Text_Lex_Shift_exp($0.a1, $0.a2, {a1: $0.a3.a1, a2: $0.a3.a2}, $0.a4)};
2152
+ case 0: return {h: 0 /* {TcDone:42} */, a1: Text_Lex_Shift_rest($0.a1, $0.a2, {a1: $0.a3.a1, a2: $0.a3.a2}, $0.a4)};
2152
2153
  }
2153
2154
  }
2154
2155
  case 0: /* nil */ return {h: 0 /* {TcDone:42} */, a1: {h: 0 /* Succ */, a1: $0.a2, a2: {h: 0}, a3: $0.a4}};
2155
2156
  }
2156
2157
  }
2157
2158
 
2158
- /* Text.Lex.Shift.dot : AutoShift False */
2159
- function Text_Lex_Shift_dot($0, $1, $2, $3) {
2159
+ /* Text.Lex.Shift.digs : AutoShift False */
2160
+ function Text_Lex_Shift_digs($0, $1, $2, $3) {
2160
2161
  return __tailRec(x24tcOpt_42, {h: 1 /* {TcContinue42:1} */, a1: $0, a2: $1, a3: $2, a4: $3});
2161
2162
  }
2162
2163
 
@@ -2166,54 +2167,72 @@ function x24tcOpt_43($0) {
2166
2167
  case undefined: /* cons */ {
2167
2168
  switch(Prelude_Types_isDigit($0.a3.a1)) {
2168
2169
  case 1: return {h: 1 /* {TcContinue43:1} */, a1: $0.a1, a2: {a1: $0.a2, a2: $0.a3.a1}, a3: $0.a3.a2, a4: ($0.a4+1n)};
2169
- case 0: return {h: 0 /* {TcDone:43} */, a1: {h: 0 /* Succ */, a1: $0.a2, a2: {a1: $0.a3.a1, a2: $0.a3.a2}, a3: $0.a4}};
2170
+ case 0: return {h: 0 /* {TcDone:43} */, a1: Text_Lex_Shift_exp($0.a1, $0.a2, {a1: $0.a3.a1, a2: $0.a3.a2}, $0.a4)};
2170
2171
  }
2171
2172
  }
2172
2173
  case 0: /* nil */ return {h: 0 /* {TcDone:43} */, a1: {h: 0 /* Succ */, a1: $0.a2, a2: {h: 0}, a3: $0.a4}};
2173
2174
  }
2174
2175
  }
2175
2176
 
2176
- /* Text.Lex.Shift.digits : AutoShift False */
2177
- function Text_Lex_Shift_digits($0, $1, $2, $3) {
2177
+ /* Text.Lex.Shift.dot : AutoShift False */
2178
+ function Text_Lex_Shift_dot($0, $1, $2, $3) {
2178
2179
  return __tailRec(x24tcOpt_43, {h: 1 /* {TcContinue43:1} */, a1: $0, a2: $1, a3: $2, a4: $3});
2179
2180
  }
2180
2181
 
2181
2182
  /* {$tcOpt:44} */
2182
2183
  function x24tcOpt_44($0) {
2184
+ switch($0.a3.h) {
2185
+ case undefined: /* cons */ {
2186
+ switch(Prelude_Types_isDigit($0.a3.a1)) {
2187
+ case 1: return {h: 1 /* {TcContinue44:1} */, a1: $0.a1, a2: {a1: $0.a2, a2: $0.a3.a1}, a3: $0.a3.a2, a4: ($0.a4+1n)};
2188
+ case 0: return {h: 0 /* {TcDone:44} */, a1: {h: 0 /* Succ */, a1: $0.a2, a2: {a1: $0.a3.a1, a2: $0.a3.a2}, a3: $0.a4}};
2189
+ }
2190
+ }
2191
+ case 0: /* nil */ return {h: 0 /* {TcDone:44} */, a1: {h: 0 /* Succ */, a1: $0.a2, a2: {h: 0}, a3: $0.a4}};
2192
+ }
2193
+ }
2194
+
2195
+ /* Text.Lex.Shift.digits : AutoShift False */
2196
+ function Text_Lex_Shift_digits($0, $1, $2, $3) {
2197
+ return __tailRec(x24tcOpt_44, {h: 1 /* {TcContinue44:1} */, a1: $0, a2: $1, a3: $2, a4: $3});
2198
+ }
2199
+
2200
+ /* {$tcOpt:45} */
2201
+ function x24tcOpt_45($0) {
2183
2202
  switch($0.a2.h) {
2184
- case 0: /* nil */ return {h: 0 /* {TcDone:44} */, a1: $0.a1};
2185
- case undefined: /* cons */ return {h: 1 /* {TcContinue44:1} */, a1: {a1: $0.a2.a1, a2: $0.a1}, a2: $0.a2.a2};
2203
+ case 0: /* nil */ return {h: 0 /* {TcDone:45} */, a1: $0.a1};
2204
+ case undefined: /* cons */ return {h: 1 /* {TcContinue45:1} */, a1: {a1: $0.a2.a1, a2: $0.a1}, a2: $0.a2.a2};
2186
2205
  }
2187
2206
  }
2188
2207
 
2189
2208
  /* Prelude.Types.List.reverseOnto : List a -> List a -> List a */
2190
2209
  function Prelude_Types_List_reverseOnto($0, $1) {
2191
- return __tailRec(x24tcOpt_44, {h: 1 /* {TcContinue44:1} */, a1: $0, a2: $1});
2210
+ return __tailRec(x24tcOpt_45, {h: 1 /* {TcContinue45:1} */, a1: $0, a2: $1});
2192
2211
  }
2193
2212
 
2194
- /* {$tcOpt:45} */
2195
- function x24tcOpt_45($0) {
2213
+ /* {$tcOpt:46} */
2214
+ function x24tcOpt_46($0) {
2196
2215
  switch($0.a3.h) {
2197
2216
  case undefined: /* cons */ {
2198
2217
  const $3 = $0.a2($0.a3.a1);
2199
2218
  switch($3.h) {
2200
- case undefined: /* just */ return {h: 1 /* {TcContinue45:1} */, a1: {a1: $0.a1, a2: $3.a1}, a2: $0.a2, a3: $0.a3.a2};
2201
- case 0: /* nothing */ return {h: 1 /* {TcContinue45:1} */, a1: $0.a1, a2: $0.a2, a3: $0.a3.a2};
2219
+ case undefined: /* just */ return {h: 1 /* {TcContinue46:1} */, a1: {a1: $0.a1, a2: $3.a1}, a2: $0.a2, a3: $0.a3.a2};
2220
+ case 0: /* nothing */ return {h: 1 /* {TcContinue46:1} */, a1: $0.a1, a2: $0.a2, a3: $0.a3.a2};
2202
2221
  }
2203
2222
  }
2204
- case 0: /* nil */ return {h: 0 /* {TcDone:45} */, a1: Prelude_Types_SnocList_x3cx3ex3e($0.a1, {h: 0})};
2223
+ case 0: /* nil */ return {h: 0 /* {TcDone:46} */, a1: Prelude_Types_SnocList_x3cx3ex3e($0.a1, {h: 0})};
2205
2224
  }
2206
2225
  }
2207
2226
 
2208
2227
  /* Prelude.Types.List.mapMaybeAppend : SnocList b -> (a -> Maybe b) -> List a -> List b */
2209
2228
  function Prelude_Types_List_mapMaybeAppend($0, $1, $2) {
2210
- return __tailRec(x24tcOpt_45, {h: 1 /* {TcContinue45:1} */, a1: $0, a2: $1, a3: $2});
2229
+ return __tailRec(x24tcOpt_46, {h: 1 /* {TcContinue46:1} */, a1: $0, a2: $1, a3: $2});
2211
2230
  }
2212
2231
 
2213
- /* {$tcOpt:46} */
2214
- function x24tcOpt_46($0) {
2232
+ /* {$tcOpt:47} */
2233
+ function x24tcOpt_47($0) {
2215
2234
  switch($0.a4) {
2216
- case 0n: return {h: 0 /* {TcDone:46} */, a1: {a1: $0.a1, a2: $0.a2}};
2235
+ case 0n: return {h: 0 /* {TcDone:47} */, a1: {a1: $0.a1, a2: $0.a2}};
2217
2236
  default: {
2218
2237
  switch($0.a3.h) {
2219
2238
  case undefined: /* cons */ {
@@ -2225,13 +2244,13 @@ function x24tcOpt_46($0) {
2225
2244
  case 0n: _crashExp('Nat case not covered');
2226
2245
  default: {
2227
2246
  const $a = ($0.a4-1n);
2228
- return {h: 1 /* {TcContinue46:1} */, a1: $0.a1, a2: ($0.a2+1n), a3: $0.a3.a2, a4: $a};
2247
+ return {h: 1 /* {TcContinue47:1} */, a1: $0.a1, a2: ($0.a2+1n), a3: $0.a3.a2, a4: $a};
2229
2248
  }
2230
2249
  }
2231
2250
  }
2232
2251
  default: {
2233
2252
  const $13 = ($0.a4-1n);
2234
- return {h: 1 /* {TcContinue46:1} */, a1: ($0.a1+1n), a2: 0n, a3: $0.a3.a2, a4: $13};
2253
+ return {h: 1 /* {TcContinue47:1} */, a1: ($0.a1+1n), a2: 0n, a3: $0.a3.a2, a4: $13};
2235
2254
  }
2236
2255
  }
2237
2256
  }
@@ -2240,7 +2259,7 @@ function x24tcOpt_46($0) {
2240
2259
  case 0n: _crashExp('Nat case not covered');
2241
2260
  default: {
2242
2261
  const $1d = ($0.a4-1n);
2243
- return {h: 1 /* {TcContinue46:1} */, a1: $0.a1, a2: ($0.a2+1n), a3: $0.a3.a2, a4: $1d};
2262
+ return {h: 1 /* {TcContinue47:1} */, a1: $0.a1, a2: ($0.a2+1n), a3: $0.a3.a2, a4: $1d};
2244
2263
  }
2245
2264
  }
2246
2265
  }
@@ -2251,7 +2270,7 @@ function x24tcOpt_46($0) {
2251
2270
  case 0n: _crashExp('Nat case not covered');
2252
2271
  default: {
2253
2272
  const $27 = ($0.a4-1n);
2254
- return {h: 0 /* {TcDone:46} */, a1: Prelude_Uninhabited_absurd($2d => Data_List_Suffix_uninhabited_Uninhabited_x28x28x28Suffixx20x24bx29x20x28x28x3ax3ax20x24hx29x20x24tx29x29x20Nilx29($2d), $27)};
2273
+ return {h: 0 /* {TcDone:47} */, a1: Prelude_Uninhabited_absurd($2d => Data_List_Suffix_uninhabited_Uninhabited_x28x28x28Suffixx20x24bx29x20x28x28x3ax3ax20x24hx29x20x24tx29x29x20Nilx29($2d), $27)};
2255
2274
  }
2256
2275
  }
2257
2276
  }
@@ -2262,14 +2281,14 @@ function x24tcOpt_46($0) {
2262
2281
 
2263
2282
  /* Text.Bounds.calcEnd : Nat -> Nat -> (cs : List Char) -> Suffix b ys cs -> Position */
2264
2283
  function Text_Bounds_calcEnd($0, $1, $2, $3) {
2265
- return __tailRec(x24tcOpt_46, {h: 1 /* {TcContinue46:1} */, a1: $0, a2: $1, a3: $2, a4: $3});
2284
+ return __tailRec(x24tcOpt_47, {h: 1 /* {TcContinue47:1} */, a1: $0, a2: $1, a3: $2, a4: $3});
2266
2285
  }
2267
2286
 
2268
- /* {$tcOpt:47} */
2269
- function x24tcOpt_47($0) {
2287
+ /* {$tcOpt:48} */
2288
+ function x24tcOpt_48($0) {
2270
2289
  switch($0.h) {
2271
- case 1: /* {TcContinue47:1} */ return {h: 2 /* {TcContinue47:2} */, a1: $0.a3, a2: $0.a2, a3: $0.a1, a4: JSON_Parser_value($0.a3)};
2272
- case 2: /* {TcContinue47:2} */ {
2290
+ case 1: /* {TcContinue48:1} */ return {h: 2 /* {TcContinue48:2} */, a1: $0.a3, a2: $0.a2, a3: $0.a1, a4: JSON_Parser_value($0.a3)};
2291
+ case 2: /* {TcContinue48:2} */ {
2273
2292
  switch($0.a4.h) {
2274
2293
  case 0: /* Succ0 */ {
2275
2294
  switch($0.a4.a2.h) {
@@ -2279,21 +2298,21 @@ function x24tcOpt_47($0) {
2279
2298
  switch($0.a4.a2.a1.a1.h) {
2280
2299
  case 0: /* Symbol */ {
2281
2300
  switch($0.a4.a2.a1.a1.a1) {
2282
- case ',': return {h: 1 /* {TcContinue47:1} */, a1: $0.a3, a2: {a1: $0.a2, a2: $0.a4.a1}, a3: $0.a4.a2.a2};
2283
- case ']': return {h: 0 /* {TcDone:47} */, a1: {h: 0 /* Succ0 */, a1: {h: 5 /* JArray */, a1: Prelude_Types_SnocList_x3cx3ex3e($0.a2, {a1: $0.a4.a1, a2: {h: 0}})}, a2: $0.a4.a2.a2}};
2284
- default: return {h: 0 /* {TcDone:47} */, a1: Text_ParseError_failInParenEOI($0.a3, {h: 0 /* Symbol */, a1: '['}, csegen_222(), $0.a4)};
2301
+ case ',': return {h: 1 /* {TcContinue48:1} */, a1: $0.a3, a2: {a1: $0.a2, a2: $0.a4.a1}, a3: $0.a4.a2.a2};
2302
+ case ']': return {h: 0 /* {TcDone:48} */, a1: {h: 0 /* Succ0 */, a1: {h: 5 /* JArray */, a1: Prelude_Types_SnocList_x3cx3ex3e($0.a2, {a1: $0.a4.a1, a2: {h: 0}})}, a2: $0.a4.a2.a2}};
2303
+ default: return {h: 0 /* {TcDone:48} */, a1: Text_ParseError_failInParenEOI($0.a3, {h: 0 /* Symbol */, a1: '['}, csegen_224(), $0.a4)};
2285
2304
  }
2286
2305
  }
2287
- default: return {h: 0 /* {TcDone:47} */, a1: Text_ParseError_failInParenEOI($0.a3, {h: 0 /* Symbol */, a1: '['}, csegen_222(), $0.a4)};
2306
+ default: return {h: 0 /* {TcDone:48} */, a1: Text_ParseError_failInParenEOI($0.a3, {h: 0 /* Symbol */, a1: '['}, csegen_224(), $0.a4)};
2288
2307
  }
2289
2308
  }
2290
- default: return {h: 0 /* {TcDone:47} */, a1: Text_ParseError_failInParenEOI($0.a3, {h: 0 /* Symbol */, a1: '['}, csegen_222(), $0.a4)};
2309
+ default: return {h: 0 /* {TcDone:48} */, a1: Text_ParseError_failInParenEOI($0.a3, {h: 0 /* Symbol */, a1: '['}, csegen_224(), $0.a4)};
2291
2310
  }
2292
2311
  }
2293
- default: return {h: 0 /* {TcDone:47} */, a1: Text_ParseError_failInParenEOI($0.a3, {h: 0 /* Symbol */, a1: '['}, csegen_222(), $0.a4)};
2312
+ default: return {h: 0 /* {TcDone:48} */, a1: Text_ParseError_failInParenEOI($0.a3, {h: 0 /* Symbol */, a1: '['}, csegen_224(), $0.a4)};
2294
2313
  }
2295
2314
  }
2296
- default: return {h: 0 /* {TcDone:47} */, a1: Text_ParseError_failInParenEOI($0.a3, {h: 0 /* Symbol */, a1: '['}, csegen_222(), $0.a4)};
2315
+ default: return {h: 0 /* {TcDone:48} */, a1: Text_ParseError_failInParenEOI($0.a3, {h: 0 /* Symbol */, a1: '['}, csegen_224(), $0.a4)};
2297
2316
  }
2298
2317
  }
2299
2318
  }
@@ -2301,38 +2320,38 @@ function x24tcOpt_47($0) {
2301
2320
 
2302
2321
  /* JSON.Parser.array : Bounds -> SnocList JSON -> Rule True JSON */
2303
2322
  function JSON_Parser_array($0, $1, $2) {
2304
- return __tailRec(x24tcOpt_47, {h: 1 /* {TcContinue47:1} */, a1: $0, a2: $1, a3: $2});
2323
+ return __tailRec(x24tcOpt_48, {h: 1 /* {TcContinue48:1} */, a1: $0, a2: $1, a3: $2});
2305
2324
  }
2306
2325
 
2307
2326
  /* JSON.Parser.case block in array */
2308
2327
  function JSON_Parser_case__array_6680($0, $1, $2, $3) {
2309
- return __tailRec(x24tcOpt_47, {h: 2 /* {TcContinue47:2} */, a1: $0, a2: $1, a3: $2, a4: $3});
2328
+ return __tailRec(x24tcOpt_48, {h: 2 /* {TcContinue48:2} */, a1: $0, a2: $1, a3: $2, a4: $3});
2310
2329
  }
2311
2330
 
2312
- /* {$tcOpt:48} */
2313
- function x24tcOpt_48($0) {
2331
+ /* {$tcOpt:49} */
2332
+ function x24tcOpt_49($0) {
2314
2333
  switch($0.a3.h) {
2315
- case 0: /* nil */ return {h: 0 /* {TcDone:48} */, a1: $0.a2};
2316
- case undefined: /* cons */ return {h: 1 /* {TcContinue48:1} */, a1: $0.a1, a2: $0.a1($0.a2)($0.a3.a1), a3: $0.a3.a2};
2334
+ case 0: /* nil */ return {h: 0 /* {TcDone:49} */, a1: $0.a2};
2335
+ case undefined: /* cons */ return {h: 1 /* {TcContinue49:1} */, a1: $0.a1, a2: $0.a1($0.a2)($0.a3.a1), a3: $0.a3.a2};
2317
2336
  }
2318
2337
  }
2319
2338
 
2320
2339
  /* Prelude.Types.foldl */
2321
2340
  function Prelude_Types_foldl_Foldable_List($0, $1, $2) {
2322
- return __tailRec(x24tcOpt_48, {h: 1 /* {TcContinue48:1} */, a1: $0, a2: $1, a3: $2});
2341
+ return __tailRec(x24tcOpt_49, {h: 1 /* {TcContinue49:1} */, a1: $0, a2: $1, a3: $2});
2323
2342
  }
2324
2343
 
2325
- /* {$tcOpt:49} */
2326
- function x24tcOpt_49($0) {
2344
+ /* {$tcOpt:50} */
2345
+ function x24tcOpt_50($0) {
2327
2346
  switch($0.a1) {
2328
- case 0n: return {h: 0 /* {TcDone:49} */, a1: Prelude_Uninhabited_absurd($6 => Data_Nat_uninhabited_Uninhabited_x28x28LTEx20x28Sx20x24nx29x29x20Zx29($6), $0.a2)};
2347
+ case 0n: return {h: 0 /* {TcDone:50} */, a1: Prelude_Uninhabited_absurd($6 => Data_Nat_uninhabited_Uninhabited_x28x28LTEx20x28Sx20x24nx29x29x20Zx29($6), $0.a2)};
2329
2348
  default: {
2330
2349
  const $a = ($0.a1-1n);
2331
2350
  switch($0.a2) {
2332
2351
  case 0n: _crashExp('Nat case not covered');
2333
2352
  default: {
2334
2353
  const $e = ($0.a2-1n);
2335
- return {h: 1 /* {TcContinue49:1} */, a1: $a, a2: $e};
2354
+ return {h: 1 /* {TcContinue50:1} */, a1: $a, a2: $e};
2336
2355
  }
2337
2356
  }
2338
2357
  }
@@ -2341,20 +2360,20 @@ function x24tcOpt_49($0) {
2341
2360
 
2342
2361
  /* Data.Nat.LTEImpliesNotGT : LTE a b -> Not (GT a b) */
2343
2362
  function Data_Nat_LTEImpliesNotGT($0, $1) {
2344
- return __tailRec(x24tcOpt_49, {h: 1 /* {TcContinue49:1} */, a1: $0, a2: $1});
2363
+ return __tailRec(x24tcOpt_50, {h: 1 /* {TcContinue50:1} */, a1: $0, a2: $1});
2345
2364
  }
2346
2365
 
2347
- /* {$tcOpt:50} */
2348
- function x24tcOpt_50($0) {
2366
+ /* {$tcOpt:51} */
2367
+ function x24tcOpt_51($0) {
2349
2368
  switch($0.a1.h) {
2350
- case 0: /* nil */ return {h: 0 /* {TcDone:50} */, a1: $0.a2};
2351
- case undefined: /* cons */ return {h: 1 /* {TcContinue50:1} */, a1: $0.a1.a1, a2: {a1: $0.a1.a2, a2: $0.a2}};
2369
+ case 0: /* nil */ return {h: 0 /* {TcDone:51} */, a1: $0.a2};
2370
+ case undefined: /* cons */ return {h: 1 /* {TcContinue51:1} */, a1: $0.a1.a1, a2: {a1: $0.a1.a2, a2: $0.a2}};
2352
2371
  }
2353
2372
  }
2354
2373
 
2355
2374
  /* Prelude.Types.SnocList.(<>>) : SnocList a -> List a -> List a */
2356
2375
  function Prelude_Types_SnocList_x3cx3ex3e($0, $1) {
2357
- return __tailRec(x24tcOpt_50, {h: 1 /* {TcContinue50:1} */, a1: $0, a2: $1});
2376
+ return __tailRec(x24tcOpt_51, {h: 1 /* {TcContinue51:1} */, a1: $0, a2: $1});
2358
2377
  }
2359
2378
 
2360
2379
  /* {__mainExpression:0} */
@@ -2451,68 +2470,68 @@ const csegen_72 = __lazy(function () {
2451
2470
  return {a1: csegen_69(), a2: a => $3 => $4 => $5 => $6 => Data_Promise_liftIO_HasIO_Promise($3, $4, $5, $6)};
2452
2471
  });
2453
2472
 
2454
- /* {csegen:84} */
2455
- const csegen_84 = __lazy(function () {
2473
+ /* {csegen:85} */
2474
+ const csegen_85 = __lazy(function () {
2456
2475
  return $0 => $1 => Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29($0, $1);
2457
2476
  });
2458
2477
 
2459
- /* {csegen:88} */
2460
- const csegen_88 = __lazy(function () {
2478
+ /* {csegen:90} */
2479
+ const csegen_90 = __lazy(function () {
2461
2480
  return {a1: $1 => $2 => Prelude_EqOrd_x3dx3d_Eq_Char($1, $2), a2: $7 => $8 => Prelude_EqOrd_x2fx3d_Eq_Char($7, $8)};
2462
2481
  });
2463
2482
 
2464
- /* {csegen:89} */
2465
- const csegen_89 = __lazy(function () {
2483
+ /* {csegen:91} */
2484
+ const csegen_91 = __lazy(function () {
2466
2485
  return $0 => $1 => ({a1: $0, a2: $1});
2467
2486
  });
2468
2487
 
2469
- /* {csegen:90} */
2470
- const csegen_90 = __lazy(function () {
2488
+ /* {csegen:92} */
2489
+ const csegen_92 = __lazy(function () {
2471
2490
  return $0 => $1 => $2 => $0($1($2));
2472
2491
  });
2473
2492
 
2474
- /* {csegen:92} */
2475
- const csegen_92 = __lazy(function () {
2493
+ /* {csegen:94} */
2494
+ const csegen_94 = __lazy(function () {
2476
2495
  return {a1: $1 => $2 => Prelude_Interfaces_Bool_Semigroup_x3cx2bx3e_Semigroup_AnyBool($1, $2), a2: 0};
2477
2496
  });
2478
2497
 
2479
- /* {csegen:142} */
2480
- const csegen_142 = __lazy(function () {
2498
+ /* {csegen:144} */
2499
+ const csegen_144 = __lazy(function () {
2481
2500
  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)};
2482
2501
  });
2483
2502
 
2484
- /* {csegen:145} */
2485
- const csegen_145 = __lazy(function () {
2503
+ /* {csegen:147} */
2504
+ const csegen_147 = __lazy(function () {
2486
2505
  return $0 => BashCompletion_hashify(BashCompletion_slugify($0));
2487
2506
  });
2488
2507
 
2489
- /* {csegen:147} */
2490
- const csegen_147 = __lazy(function () {
2508
+ /* {csegen:149} */
2509
+ const csegen_149 = __lazy(function () {
2491
2510
  return {a1: '--completed', a2: {a1: 'graph', a2: {h: 0}}};
2492
2511
  });
2493
2512
 
2494
- /* {csegen:151} */
2495
- const csegen_151 = __lazy(function () {
2513
+ /* {csegen:153} */
2514
+ const csegen_153 = __lazy(function () {
2496
2515
  return {a1: {a1: '--checkout', a2: {a1: '-c', a2: {a1: '--ignore', a2: {a1: '-i', a2: {h: 0}}}}}};
2497
2516
  });
2498
2517
 
2499
- /* {csegen:153} */
2500
- const csegen_153 = __lazy(function () {
2518
+ /* {csegen:155} */
2519
+ const csegen_155 = __lazy(function () {
2501
2520
  return {a1: {a1: '--completed', a2: {a1: '-c', a2: {h: 0}}}};
2502
2521
  });
2503
2522
 
2504
- /* {csegen:196} */
2505
- const csegen_196 = __lazy(function () {
2523
+ /* {csegen:198} */
2524
+ const csegen_198 = __lazy(function () {
2506
2525
  return b => a => $0 => $1 => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29($0, $1);
2507
2526
  });
2508
2527
 
2509
- /* {csegen:197} */
2510
- const csegen_197 = __lazy(function () {
2528
+ /* {csegen:199} */
2529
+ const csegen_199 = __lazy(function () {
2511
2530
  return a => $0 => Prelude_Types_join_Monad_x28Eitherx20x24ex29($0);
2512
2531
  });
2513
2532
 
2514
- /* {csegen:198} */
2515
- const csegen_198 = __lazy(function () {
2533
+ /* {csegen:200} */
2534
+ const csegen_200 = __lazy(function () {
2516
2535
  return $0 => {
2517
2536
  const $1 = JSON_Parser_parseJSON({h: 0}, $0);
2518
2537
  switch($1.h) {
@@ -2522,33 +2541,33 @@ const csegen_198 = __lazy(function () {
2522
2541
  };
2523
2542
  });
2524
2543
 
2525
- /* {csegen:199} */
2526
- const csegen_199 = __lazy(function () {
2544
+ /* {csegen:201} */
2545
+ const csegen_201 = __lazy(function () {
2527
2546
  return $0 => $1 => Prelude_Types_max_Ord_Nat($0, $1);
2528
2547
  });
2529
2548
 
2530
- /* {csegen:210} */
2531
- const csegen_210 = __lazy(function () {
2549
+ /* {csegen:212} */
2550
+ const csegen_212 = __lazy(function () {
2532
2551
  return {a1: csegen_39(), a2: $3 => $4 => Prelude_EqOrd_compare_Ord_String($3, $4), a3: $9 => $a => Prelude_EqOrd_x3c_Ord_String($9, $a), a4: $f => $10 => Prelude_EqOrd_x3e_Ord_String($f, $10), a5: $15 => $16 => Prelude_EqOrd_x3cx3d_Ord_String($15, $16), a6: $1b => $1c => Prelude_EqOrd_x3ex3d_Ord_String($1b, $1c), a7: $21 => $22 => Prelude_EqOrd_max_Ord_String($21, $22), a8: $27 => $28 => Prelude_EqOrd_min_Ord_String($27, $28)};
2533
2552
  });
2534
2553
 
2535
- /* {csegen:213} */
2536
- const csegen_213 = __lazy(function () {
2554
+ /* {csegen:215} */
2555
+ const csegen_215 = __lazy(function () {
2537
2556
  return {a1: $1 => $2 => Prelude_EqOrd_x3dx3d_Eq_Integer($1, $2), a2: $7 => $8 => Prelude_EqOrd_x2fx3d_Eq_Integer($7, $8)};
2538
2557
  });
2539
2558
 
2540
- /* {csegen:214} */
2541
- const csegen_214 = __lazy(function () {
2559
+ /* {csegen:216} */
2560
+ const csegen_216 = __lazy(function () {
2542
2561
  return $0 => $1 => Prelude_EqOrd_compare_Ord_Integer($0, $1);
2543
2562
  });
2544
2563
 
2545
- /* {csegen:222} */
2546
- const csegen_222 = __lazy(function () {
2564
+ /* {csegen:224} */
2565
+ const csegen_224 = __lazy(function () {
2547
2566
  return $0 => JSON_Parser_eqJSToken({h: 2 /* EOI */}, $0);
2548
2567
  });
2549
2568
 
2550
- /* {csegen:227} */
2551
- const csegen_227 = __lazy(function () {
2569
+ /* {csegen:229} */
2570
+ const csegen_229 = __lazy(function () {
2552
2571
  const $6 = a => b => {
2553
2572
  switch(JSON_Parser_eqJSON(a, b)) {
2554
2573
  case 1: return 0;
@@ -2558,164 +2577,164 @@ const csegen_227 = __lazy(function () {
2558
2577
  return {a1: $1 => $2 => JSON_Parser_eqJSON($1, $2), a2: $6};
2559
2578
  });
2560
2579
 
2561
- /* {csegen:234} */
2562
- const csegen_234 = __lazy(function () {
2580
+ /* {csegen:236} */
2581
+ const csegen_236 = __lazy(function () {
2563
2582
  const $0 = a => $1 => $2 => ({h: 1 /* Fail0 */, a1: {a1: $2, a2: $1}});
2564
2583
  return $6 => $7 => $0(undefined)($6)($7);
2565
2584
  });
2566
2585
 
2567
- /* {csegen:252} */
2568
- const csegen_252 = __lazy(function () {
2586
+ /* {csegen:254} */
2587
+ const csegen_254 = __lazy(function () {
2569
2588
  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)};
2570
2589
  });
2571
2590
 
2572
- /* {csegen:256} */
2573
- const csegen_256 = __lazy(function () {
2591
+ /* {csegen:258} */
2592
+ const csegen_258 = __lazy(function () {
2574
2593
  return b => a => f => $0 => $1 => $2 => Prelude_Types_traverse_Traversable_x28Eitherx20x24ex29($0, $1, $2);
2575
2594
  });
2576
2595
 
2577
- /* {csegen:270} */
2578
- const csegen_270 = __lazy(function () {
2596
+ /* {csegen:272} */
2597
+ const csegen_272 = __lazy(function () {
2579
2598
  return {a1: $1 => $2 => _add32s($1, $2), a2: $6 => $7 => _mul32s($6, $7), a3: $b => Number(_truncBigInt32($b))};
2580
2599
  });
2581
2600
 
2582
- /* {csegen:294} */
2583
- const csegen_294 = __lazy(function () {
2601
+ /* {csegen:296} */
2602
+ const csegen_296 = __lazy(function () {
2584
2603
  return $0 => Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(2), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($0));
2585
2604
  });
2586
2605
 
2587
- /* {csegen:295} */
2588
- const csegen_295 = __lazy(function () {
2606
+ /* {csegen:297} */
2607
+ const csegen_297 = __lazy(function () {
2589
2608
  return $0 => $1 => $2 => $3 => Data_Promise_x3ex3ex3d_Monad_Promise($0, $1, $2, $3);
2590
2609
  });
2591
2610
 
2592
- /* {csegen:296} */
2593
- const csegen_296 = __lazy(function () {
2611
+ /* {csegen:298} */
2612
+ const csegen_298 = __lazy(function () {
2594
2613
  return $0 => $1 => Data_Promise_either(csegen_51(), Data_PullRequest_parsePullRequestsString($0), $1);
2595
2614
  });
2596
2615
 
2597
- /* {csegen:297} */
2598
- const csegen_297 = __lazy(function () {
2616
+ /* {csegen:299} */
2617
+ const csegen_299 = __lazy(function () {
2599
2618
  return $0 => $1 => Data_Promise_either(csegen_51(), Data_User_parseUserString($0), $1);
2600
2619
  });
2601
2620
 
2602
- /* {csegen:302} */
2603
- const csegen_302 = __lazy(function () {
2621
+ /* {csegen:304} */
2622
+ const csegen_304 = __lazy(function () {
2604
2623
  return $0 => $1 => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29($0, $1);
2605
2624
  });
2606
2625
 
2607
- /* {csegen:315} */
2608
- const csegen_315 = __lazy(function () {
2626
+ /* {csegen:317} */
2627
+ const csegen_317 = __lazy(function () {
2609
2628
  return $0 => Language_JSON_Accessors_array($3 => Data_PullRequest_parsePR($3), $0);
2610
2629
  });
2611
2630
 
2612
- /* {csegen:323} */
2613
- const csegen_323 = __lazy(function () {
2631
+ /* {csegen:325} */
2632
+ const csegen_325 = __lazy(function () {
2614
2633
  return $0 => $1 => $2 => Data_Promise_pure_Applicative_Promise($0, $1, $2);
2615
2634
  });
2616
2635
 
2617
- /* {csegen:324} */
2618
- const csegen_324 = __lazy(function () {
2636
+ /* {csegen:326} */
2637
+ const csegen_326 = __lazy(function () {
2619
2638
  return $0 => Prelude_EqOrd_x3dx3d_Eq_Char($0, '/');
2620
2639
  });
2621
2640
 
2622
- /* {csegen:325} */
2623
- const csegen_325 = __lazy(function () {
2641
+ /* {csegen:327} */
2642
+ const csegen_327 = __lazy(function () {
2624
2643
  return $0 => $0.a2;
2625
2644
  });
2626
2645
 
2627
- /* {csegen:329} */
2628
- const csegen_329 = __lazy(function () {
2646
+ /* {csegen:331} */
2647
+ const csegen_331 = __lazy(function () {
2629
2648
  return $0 => $0.a1;
2630
2649
  });
2631
2650
 
2632
- /* {csegen:340} */
2633
- const csegen_340 = __lazy(function () {
2651
+ /* {csegen:342} */
2652
+ const csegen_342 = __lazy(function () {
2634
2653
  return $0 => $1 => Data_Promise_map_Functor_Promise($4 => Number(_truncUBigInt32($4)), System_time(csegen_72()), $0, $1);
2635
2654
  });
2636
2655
 
2637
- /* {csegen:345} */
2638
- const csegen_345 = __lazy(function () {
2656
+ /* {csegen:347} */
2657
+ const csegen_347 = __lazy(function () {
2639
2658
  return $0 => $1 => $2 => $3 => Prelude_Types_map_Functor_Maybe($2, $3);
2640
2659
  });
2641
2660
 
2642
- /* {csegen:358} */
2643
- const csegen_358 = __lazy(function () {
2661
+ /* {csegen:360} */
2662
+ const csegen_360 = __lazy(function () {
2644
2663
  return $0 => $1 => $2 => Data_Promise_liftIO_HasIO_Promise($5 => Prelude_IO_prim__getStr($5), $0, $1, $2);
2645
2664
  });
2646
2665
 
2647
- /* {csegen:360} */
2648
- const csegen_360 = __lazy(function () {
2666
+ /* {csegen:362} */
2667
+ const csegen_362 = __lazy(function () {
2649
2668
  return $0 => $1 => Data_Promise_pure_Applicative_Promise({h: 0}, $0, $1);
2650
2669
  });
2651
2670
 
2652
- /* {csegen:390} */
2653
- const csegen_390 = __lazy(function () {
2671
+ /* {csegen:392} */
2672
+ const csegen_392 = __lazy(function () {
2654
2673
  return {a1: csegen_9(), a2: a => ({h: 0}), a3: a => $4 => $5 => Prelude_Types_x3cx7cx3e_Alternative_Maybe($4, $5)};
2655
2674
  });
2656
2675
 
2657
- /* {csegen:391} */
2658
- const csegen_391 = __lazy(function () {
2659
- return $0 => Data_List_sort(csegen_210(), $0);
2676
+ /* {csegen:393} */
2677
+ const csegen_393 = __lazy(function () {
2678
+ return $0 => Data_List_sort(csegen_212(), $0);
2660
2679
  });
2661
2680
 
2662
- /* {csegen:392} */
2663
- const csegen_392 = __lazy(function () {
2664
- return $0 => $1 => $2 => FFI_Concurrency_promiseAll(csegen_142(), $0, $1, $2);
2681
+ /* {csegen:394} */
2682
+ const csegen_394 = __lazy(function () {
2683
+ return $0 => $1 => $2 => FFI_Concurrency_promiseAll(csegen_144(), $0, $1, $2);
2665
2684
  });
2666
2685
 
2667
- /* {csegen:400} */
2668
- const csegen_400 = __lazy(function () {
2686
+ /* {csegen:402} */
2687
+ const csegen_402 = __lazy(function () {
2669
2688
  return $0 => $0.a1;
2670
2689
  });
2671
2690
 
2672
- /* {csegen:402} */
2673
- const csegen_402 = __lazy(function () {
2691
+ /* {csegen:404} */
2692
+ const csegen_404 = __lazy(function () {
2674
2693
  return $0 => $1 => Data_Date_compare_Ord_Date($0, $1);
2675
2694
  });
2676
2695
 
2677
- /* {csegen:403} */
2678
- const csegen_403 = __lazy(function () {
2696
+ /* {csegen:405} */
2697
+ const csegen_405 = __lazy(function () {
2679
2698
  return $0 => $0.a2;
2680
2699
  });
2681
2700
 
2682
- /* {csegen:404} */
2683
- const csegen_404 = __lazy(function () {
2684
- return $0 => $1 => Prelude_Basics_on(csegen_402(), csegen_403(), $0, $1);
2701
+ /* {csegen:406} */
2702
+ const csegen_406 = __lazy(function () {
2703
+ return $0 => $1 => Prelude_Basics_on(csegen_404(), csegen_405(), $0, $1);
2685
2704
  });
2686
2705
 
2687
- /* {csegen:417} */
2688
- const csegen_417 = __lazy(function () {
2706
+ /* {csegen:419} */
2707
+ const csegen_419 = __lazy(function () {
2689
2708
  return $0 => $0.a2;
2690
2709
  });
2691
2710
 
2692
- /* {csegen:420} */
2693
- const csegen_420 = __lazy(function () {
2711
+ /* {csegen:422} */
2712
+ const csegen_422 = __lazy(function () {
2694
2713
  return $0 => $0.a1;
2695
2714
  });
2696
2715
 
2697
- /* {csegen:426} */
2698
- const csegen_426 = __lazy(function () {
2716
+ /* {csegen:428} */
2717
+ const csegen_428 = __lazy(function () {
2699
2718
  return date => Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('earliest:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Data_Date_show_Show_Date(date)), a2: {h: 0}}}));
2700
2719
  });
2701
2720
 
2702
- /* {csegen:455} */
2703
- const csegen_455 = __lazy(function () {
2721
+ /* {csegen:457} */
2722
+ const csegen_457 = __lazy(function () {
2704
2723
  return $0 => Util_yesNoPrompt(csegen_72(), 'Would you like to continue creating a Pull Request anyway?');
2705
2724
  });
2706
2725
 
2707
- /* {csegen:490} */
2708
- const csegen_490 = __lazy(function () {
2726
+ /* {csegen:492} */
2727
+ const csegen_492 = __lazy(function () {
2709
2728
  return $0 => $0.a1;
2710
2729
  });
2711
2730
 
2712
- /* {csegen:502} */
2713
- const csegen_502 = __lazy(function () {
2714
- return {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc()}, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc()}, a2: {h: 0}}};
2731
+ /* {csegen:504} */
2732
+ const csegen_504 = __lazy(function () {
2733
+ return {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc()}, a2: {h: 0}};
2715
2734
  });
2716
2735
 
2717
- /* {csegen:518} */
2718
- const csegen_518 = __lazy(function () {
2736
+ /* {csegen:523} */
2737
+ const csegen_523 = __lazy(function () {
2719
2738
  return {a1: ann => $1 => Graph_pretty_Pretty_Date($1), a2: ann => $5 => $6 => Graph_prettyPrec_Pretty_Date($5, $6)};
2720
2739
  });
2721
2740
 
@@ -3489,6 +3508,11 @@ function Text_PrettyPrint_Prettyprinter_Doc_spaces($0) {
3489
3508
  }
3490
3509
  }
3491
3510
 
3511
+ /* Text.PrettyPrint.Prettyprinter.Doc.softline : Doc ann */
3512
+ const Text_PrettyPrint_Prettyprinter_Doc_softline = __lazy(function () {
3513
+ return {h: 7 /* Union */, a1: () => ({h: 1 /* Chara */, a1: ' '}), a2: () => ({h: 3 /* Line */})};
3514
+ });
3515
+
3492
3516
  /* Text.PrettyPrint.Prettyprinter.Doc.round : Double -> Int */
3493
3517
  function Text_PrettyPrint_Prettyprinter_Doc_round($0) {
3494
3518
  switch(Prelude_EqOrd_x3e_Ord_Double($0, Number(0n))) {
@@ -3568,7 +3592,7 @@ function Text_PrettyPrint_Prettyprinter_Doc_hsep($0) {
3568
3592
 
3569
3593
  /* Text.PrettyPrint.Prettyprinter.Doc.hcat : List (Doc ann) -> Doc ann */
3570
3594
  function Text_PrettyPrint_Prettyprinter_Doc_hcat($0) {
3571
- return Text_PrettyPrint_Prettyprinter_Doc_concatWith(csegen_84(), $0);
3595
+ return Text_PrettyPrint_Prettyprinter_Doc_concatWith(csegen_85(), $0);
3572
3596
  }
3573
3597
 
3574
3598
  /* Text.PrettyPrint.Prettyprinter.Doc.hardline : Doc ann */
@@ -3604,6 +3628,11 @@ function Text_PrettyPrint_Prettyprinter_Doc_group($0) {
3604
3628
  }
3605
3629
  }
3606
3630
 
3631
+ /* Text.PrettyPrint.Prettyprinter.Doc.fillSep : List (Doc ann) -> Doc ann */
3632
+ function Text_PrettyPrint_Prettyprinter_Doc_fillSep($0) {
3633
+ return Text_PrettyPrint_Prettyprinter_Doc_concatWith(x => y => Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(x, Text_PrettyPrint_Prettyprinter_Doc_softline()), y), $0);
3634
+ }
3635
+
3607
3636
  /* Text.PrettyPrint.Prettyprinter.Doc.fillBreak : Int -> Doc ann -> Doc ann */
3608
3637
  function Text_PrettyPrint_Prettyprinter_Doc_fillBreak($0, $1) {
3609
3638
  const $4 = w => {
@@ -3622,10 +3651,10 @@ function Text_PrettyPrint_Prettyprinter_Doc_encloseSep($0, $1, $2, $3) {
3622
3651
  case undefined: /* cons */ {
3623
3652
  switch($3.a2.h) {
3624
3653
  case 0: /* nil */ return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29($0, $3.a1), $1);
3625
- default: return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_cat(Data_List_zipWith_Zippable_List(csegen_84(), {a1: $0, a2: Data_List_replicateTR({h: 0}, Prelude_Types_prim__integerToNat((Prelude_Types_List_lengthTR($3)-1n)), $2)}, $3)), $1);
3654
+ default: return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_cat(Data_List_zipWith_Zippable_List(csegen_85(), {a1: $0, a2: Data_List_replicateTR({h: 0}, Prelude_Types_prim__integerToNat((Prelude_Types_List_lengthTR($3)-1n)), $2)}, $3)), $1);
3626
3655
  }
3627
3656
  }
3628
- default: return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_cat(Data_List_zipWith_Zippable_List(csegen_84(), {a1: $0, a2: Data_List_replicateTR({h: 0}, Prelude_Types_prim__integerToNat((Prelude_Types_List_lengthTR($3)-1n)), $2)}, $3)), $1);
3657
+ default: return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_cat(Data_List_zipWith_Zippable_List(csegen_85(), {a1: $0, a2: Data_List_replicateTR({h: 0}, Prelude_Types_prim__integerToNat((Prelude_Types_List_lengthTR($3)-1n)), $2)}, $3)), $1);
3629
3658
  }
3630
3659
  }
3631
3660
 
@@ -3875,12 +3904,12 @@ function Data_String_lines($0) {
3875
3904
 
3876
3905
  /* Data.String.isSuffixOf : String -> String -> Bool */
3877
3906
  function Data_String_isSuffixOf($0, $1) {
3878
- return Data_List_isSuffixOf(csegen_88(), Prelude_Types_fastUnpack($0), Prelude_Types_fastUnpack($1));
3907
+ return Data_List_isSuffixOf(csegen_90(), Prelude_Types_fastUnpack($0), Prelude_Types_fastUnpack($1));
3879
3908
  }
3880
3909
 
3881
3910
  /* Data.String.isPrefixOf : String -> String -> Bool */
3882
3911
  function Data_String_isPrefixOf($0, $1) {
3883
- return Data_List_isPrefixOf(csegen_88(), Prelude_Types_fastUnpack($0), Prelude_Types_fastUnpack($1));
3912
+ return Data_List_isPrefixOf(csegen_90(), Prelude_Types_fastUnpack($0), Prelude_Types_fastUnpack($1));
3884
3913
  }
3885
3914
 
3886
3915
  /* Data.String.fastUnlines : List String -> String */
@@ -3968,7 +3997,7 @@ function Builtin_fst($0) {
3968
3997
  function Prelude_Types_traverse_Traversable_List($0, $1, $2) {
3969
3998
  switch($2.h) {
3970
3999
  case 0: /* nil */ return $0.a2(undefined)({h: 0});
3971
- case undefined: /* cons */ return $0.a3(undefined)(undefined)($0.a3(undefined)(undefined)($0.a2(undefined)(csegen_89()))($1($2.a1)))(Prelude_Types_traverse_Traversable_List($0, $1, $2.a2));
4000
+ case undefined: /* cons */ return $0.a3(undefined)(undefined)($0.a3(undefined)(undefined)($0.a2(undefined)(csegen_91()))($1($2.a1)))(Prelude_Types_traverse_Traversable_List($0, $1, $2.a2));
3972
4001
  }
3973
4002
  }
3974
4003
 
@@ -3982,12 +4011,12 @@ function Prelude_Types_traverse_Traversable_x28Eitherx20x24ex29($0, $1, $2) {
3982
4011
 
3983
4012
  /* Prelude.Types.toList */
3984
4013
  function Prelude_Types_toList_Foldable_Maybe($0) {
3985
- return Prelude_Types_foldr_Foldable_Maybe(csegen_89(), {h: 0}, $0);
4014
+ return Prelude_Types_foldr_Foldable_Maybe(csegen_91(), {h: 0}, $0);
3986
4015
  }
3987
4016
 
3988
4017
  /* Prelude.Types.toList */
3989
4018
  function Prelude_Types_toList_Foldable_x28Eitherx20x24ex29($0) {
3990
- return Prelude_Types_foldr_Foldable_x28Eitherx20x24ex29(csegen_89(), {h: 0}, $0);
4019
+ return Prelude_Types_foldr_Foldable_x28Eitherx20x24ex29(csegen_91(), {h: 0}, $0);
3991
4020
  }
3992
4021
 
3993
4022
  /* Prelude.Types.rangeFromTo */
@@ -4121,7 +4150,7 @@ function Prelude_Types_foldr_Foldable_x28Eitherx20x24ex29($0, $1, $2) {
4121
4150
 
4122
4151
  /* Prelude.Types.foldl */
4123
4152
  function Prelude_Types_foldl_Foldable_x28Eitherx20x24ex29($0, $1, $2) {
4124
- return Prelude_Types_foldr_Foldable_x28Eitherx20x24ex29($6 => $7 => Prelude_Basics_flip(csegen_90(), $c => Prelude_Basics_flip($0, $6, $c), $7), $13 => $13, $2)($1);
4153
+ return Prelude_Types_foldr_Foldable_x28Eitherx20x24ex29($6 => $7 => Prelude_Basics_flip(csegen_92(), $c => Prelude_Basics_flip($0, $6, $c), $7), $13 => $13, $2)($1);
4125
4154
  }
4126
4155
 
4127
4156
  /* Prelude.Types.foldlM */
@@ -4375,7 +4404,7 @@ function Prelude_Types_isAlpha($0) {
4375
4404
 
4376
4405
  /* Prelude.Types.elemBy : Foldable t => (a -> a -> Bool) -> a -> t a -> Bool */
4377
4406
  function Prelude_Types_elemBy($0, $1, $2, $3) {
4378
- return $0.a6(undefined)(undefined)(csegen_92())($1($2))($3);
4407
+ return $0.a6(undefined)(undefined)(csegen_94())($1($2))($3);
4379
4408
  }
4380
4409
 
4381
4410
  /* Prelude.Types.elem : Foldable t => Eq a => a -> t a -> Bool */
@@ -5747,7 +5776,7 @@ function BashCompletion_n__4630_10022_slugsOrLoginsOrLabels($0, $1, $2) {
5747
5776
  case 1: return Prelude_Types_List_mapAppend({h: 0}, $a => ('+'+$a), $2.a11);
5748
5777
  case 0: {
5749
5778
  switch(BashCompletion_isHashPrefix($1)) {
5750
- case 1: return Prelude_Types_List_mapAppend({h: 0}, csegen_145(), $2.a10);
5779
+ case 1: return Prelude_Types_List_mapAppend({h: 0}, csegen_147(), $2.a10);
5751
5780
  case 0: return $2.a9;
5752
5781
  }
5753
5782
  }
@@ -5756,7 +5785,7 @@ function BashCompletion_n__4630_10022_slugsOrLoginsOrLabels($0, $1, $2) {
5756
5785
 
5757
5786
  /* BashCompletion.unslugify : String -> String */
5758
5787
  function BashCompletion_unslugify($0) {
5759
- return Prelude_Types_fastPack(Data_List_replaceOn(csegen_88(), '\u{25cc}', ' ', Prelude_Types_fastUnpack($0)));
5788
+ return Prelude_Types_fastPack(Data_List_replaceOn(csegen_90(), '\u{25cc}', ' ', Prelude_Types_fastUnpack($0)));
5760
5789
  }
5761
5790
 
5762
5791
  /* BashCompletion.unhashify : String -> String */
@@ -5766,7 +5795,7 @@ function BashCompletion_unhashify($0) {
5766
5795
 
5767
5796
  /* BashCompletion.slugify : String -> String */
5768
5797
  function BashCompletion_slugify($0) {
5769
- return Prelude_Types_fastPack(Data_List_replaceOn(csegen_88(), ' ', '\u{25cc}', Prelude_Types_fastUnpack($0)));
5798
+ return Prelude_Types_fastPack(Data_List_replaceOn(csegen_90(), ' ', '\u{25cc}', Prelude_Types_fastUnpack($0)));
5770
5799
  }
5771
5800
 
5772
5801
  /* BashCompletion.script : String */
@@ -5842,7 +5871,7 @@ function BashCompletion_opts($0, $1, $2, $3) {
5842
5871
  case 'graph': return {a1: '--completed', a2: $0.a9};
5843
5872
  case '--completed': return $0.a9;
5844
5873
  default: {
5845
- switch(Data_Maybe_isJust(Data_List_find($59 => Prelude_EqOrd_x3dx3d_Eq_String($59, $3), csegen_147()))) {
5874
+ switch(Data_Maybe_isJust(Data_List_find($59 => Prelude_EqOrd_x3dx3d_Eq_String($59, $3), csegen_149()))) {
5846
5875
  case 1: return Prelude_Types_List_filterAppend({h: 0}, $62 => Data_String_isPrefixOf($2, $62), $0.a9);
5847
5876
  case 0: return {h: 0};
5848
5877
  }
@@ -5850,7 +5879,7 @@ function BashCompletion_opts($0, $1, $2, $3) {
5850
5879
  }
5851
5880
  }
5852
5881
  default: {
5853
- switch(Data_Maybe_isJust(Data_List_find($6d => Prelude_EqOrd_x3dx3d_Eq_String($6d, $3), csegen_147()))) {
5882
+ switch(Data_Maybe_isJust(Data_List_find($6d => Prelude_EqOrd_x3dx3d_Eq_String($6d, $3), csegen_149()))) {
5854
5883
  case 1: return Prelude_Types_List_filterAppend({h: 0}, $76 => Data_String_isPrefixOf($2, $76), $0.a9);
5855
5884
  case 0: return {h: 0};
5856
5885
  }
@@ -5859,7 +5888,7 @@ function BashCompletion_opts($0, $1, $2, $3) {
5859
5888
  }
5860
5889
  case 'pr': {
5861
5890
  switch(BashCompletion_isHashPrefix($2)) {
5862
- case 1: return Prelude_Types_List_mapAppend({h: 0}, csegen_145(), $0.a10);
5891
+ case 1: return Prelude_Types_List_mapAppend({h: 0}, csegen_147(), $0.a10);
5863
5892
  case 0: return {h: 0};
5864
5893
  }
5865
5894
  }
@@ -5977,8 +6006,8 @@ function BashCompletion_cmdOpts($0, $1, $2) {
5977
6006
  }
5978
6007
  case 'contribute': {
5979
6008
  switch($1) {
5980
- case '-': return csegen_151();
5981
- case '--': return csegen_151();
6009
+ case '-': return csegen_153();
6010
+ case '--': return csegen_153();
5982
6011
  default: {
5983
6012
  switch(Data_String_isPrefixOf($1, '--checkout')) {
5984
6013
  case 1: return {a1: {a1: '--checkout', a2: {h: 0}}};
@@ -5995,7 +6024,7 @@ function BashCompletion_cmdOpts($0, $1, $2) {
5995
6024
  case 'graph': {
5996
6025
  switch($1) {
5997
6026
  case '--': return {h: 0};
5998
- case '-': return csegen_153();
6027
+ case '-': return csegen_155();
5999
6028
  default: {
6000
6029
  switch(Data_String_isPrefixOf($1, '--completed')) {
6001
6030
  case 1: return {a1: {a1: '--completed', a2: {h: 0}}};
@@ -6086,8 +6115,8 @@ function BashCompletion_cmdOpts($0, $1, $2) {
6086
6115
  }
6087
6116
  case 'contribute': {
6088
6117
  switch($1) {
6089
- case '-': return csegen_151();
6090
- case '--': return csegen_151();
6118
+ case '-': return csegen_153();
6119
+ case '--': return csegen_153();
6091
6120
  default: {
6092
6121
  switch(Data_String_isPrefixOf($1, '--checkout')) {
6093
6122
  case 1: return {a1: {a1: '--checkout', a2: {h: 0}}};
@@ -6104,7 +6133,7 @@ function BashCompletion_cmdOpts($0, $1, $2) {
6104
6133
  case 'graph': {
6105
6134
  switch($1) {
6106
6135
  case '--': return {h: 0};
6107
- case '-': return csegen_153();
6136
+ case '-': return csegen_155();
6108
6137
  default: {
6109
6138
  switch(Data_String_isPrefixOf($1, '--completed')) {
6110
6139
  case 1: return {a1: {a1: '--completed', a2: {h: 0}}};
@@ -6240,18 +6269,18 @@ function Data_Config_parseConfig($0, $1) {
6240
6269
  }
6241
6270
  };
6242
6271
  const $4 = {a1: $5, a2: a => $d => ({h: 1 /* Right */, a1: $d}), a3: $f};
6243
- const $3 = {a1: $4, a2: csegen_196(), a3: csegen_197()};
6244
- return Prelude_Interfaces_x3ex3dx3e($3, csegen_198(), $20 => Data_Config_n__8195_6496_parseConfigJson($0, $20), $1);
6272
+ const $3 = {a1: $4, a2: csegen_198(), a3: csegen_199()};
6273
+ return Prelude_Interfaces_x3ex3dx3e($3, csegen_200(), $20 => Data_Config_n__8195_6496_parseConfigJson($0, $20), $1);
6245
6274
  }
6246
6275
 
6247
6276
  /* Data.Config.longestSettablePropName : Nat */
6248
6277
  const Data_Config_longestSettablePropName = __lazy(function () {
6249
- return Prelude_Types_foldr_Foldable_List(csegen_199(), 0n, Prelude_Types_List_mapAppend({h: 0}, $8 => Prelude_Types_String_length(Data_Config_propNamex27($8)), Data_Config_settableProps()));
6278
+ return Prelude_Types_foldr_Foldable_List(csegen_201(), 0n, Prelude_Types_List_mapAppend({h: 0}, $8 => Prelude_Types_String_length(Data_Config_propNamex27($8)), Data_Config_settableProps()));
6250
6279
  });
6251
6280
 
6252
6281
  /* Data.Config.json : Config -> JSON */
6253
6282
  function Data_Config_json($0) {
6254
- return {h: 6 /* JObject */, a1: {a1: {a1: 'assignTeams', a2: {h: 3 /* JBool */, a1: $0.a6}}, a2: {a1: {a1: 'assignUsers', a2: {h: 3 /* JBool */, a1: $0.a7}}, a2: {a1: {a1: 'commentOnAssign', a2: {h: 3 /* JBool */, a1: $0.a8}}, a2: {a1: {a1: 'org', a2: {h: 4 /* JString */, a1: $0.a2}}, a2: {a1: {a1: 'repo', a2: {h: 4 /* JString */, a1: $0.a3}}, a2: {a1: {a1: 'defaultRemote', a2: {h: 4 /* JString */, a1: $0.a4}}, a2: {a1: {a1: 'mainBranch', a2: {h: 4 /* JString */, a1: $0.a5}}, a2: {a1: {a1: 'orgMembers', a2: {h: 5 /* JArray */, a1: Prelude_Types_List_mapAppend({h: 0}, $2d => ({h: 4 /* JString */, a1: $2d}), Data_List_sort(csegen_210(), $0.a11))}}, a2: {a1: {a1: 'teamSlugs', a2: {h: 5 /* JArray */, a1: Prelude_Types_List_mapAppend({h: 0}, $3c => ({h: 4 /* JString */, a1: $3c}), Data_List_sort(csegen_210(), $0.a9))}}, a2: {a1: {a1: 'repoLabels', a2: {h: 5 /* JArray */, a1: Prelude_Types_List_mapAppend({h: 0}, $4b => ({h: 4 /* JString */, a1: $4b}), Data_List_sort(csegen_210(), $0.a10))}}, a2: {a1: {a1: 'ignoredPRs', a2: {h: 5 /* JArray */, a1: Prelude_Types_List_mapAppend({h: 0}, $5a => ({h: 1 /* JInteger */, a1: $5a}), Data_List_sort({a1: csegen_213(), a2: csegen_214(), a3: $64 => $65 => Prelude_EqOrd_x3c_Ord_Integer($64, $65), a4: $6a => $6b => Prelude_EqOrd_x3e_Ord_Integer($6a, $6b), a5: $70 => $71 => Prelude_EqOrd_x3cx3d_Ord_Integer($70, $71), a6: $76 => $77 => Prelude_EqOrd_x3ex3d_Ord_Integer($76, $77), a7: $7c => $7d => Prelude_EqOrd_max_Ord_Integer($7c, $7d), a8: $82 => $83 => Prelude_EqOrd_min_Ord_Integer($82, $83)}, $0.a12))}}, a2: {a1: {a1: 'githubPAT', a2: Prelude_Types_maybe(() => ({h: 0 /* JNull */}), () => $8f => ({h: 4 /* JString */, a1: $8f}), $0.a13)}, a2: {a1: {a1: 'updatedAt', a2: {h: 1 /* JInteger */, a1: BigInt($0.a1)}}, a2: {h: 0}}}}}}}}}}}}}}};
6283
+ return {h: 6 /* JObject */, a1: {a1: {a1: 'assignTeams', a2: {h: 3 /* JBool */, a1: $0.a6}}, a2: {a1: {a1: 'assignUsers', a2: {h: 3 /* JBool */, a1: $0.a7}}, a2: {a1: {a1: 'commentOnAssign', a2: {h: 3 /* JBool */, a1: $0.a8}}, a2: {a1: {a1: 'org', a2: {h: 4 /* JString */, a1: $0.a2}}, a2: {a1: {a1: 'repo', a2: {h: 4 /* JString */, a1: $0.a3}}, a2: {a1: {a1: 'defaultRemote', a2: {h: 4 /* JString */, a1: $0.a4}}, a2: {a1: {a1: 'mainBranch', a2: {h: 4 /* JString */, a1: $0.a5}}, a2: {a1: {a1: 'orgMembers', a2: {h: 5 /* JArray */, a1: Prelude_Types_List_mapAppend({h: 0}, $2d => ({h: 4 /* JString */, a1: $2d}), Data_List_sort(csegen_212(), $0.a11))}}, a2: {a1: {a1: 'teamSlugs', a2: {h: 5 /* JArray */, a1: Prelude_Types_List_mapAppend({h: 0}, $3c => ({h: 4 /* JString */, a1: $3c}), Data_List_sort(csegen_212(), $0.a9))}}, a2: {a1: {a1: 'repoLabels', a2: {h: 5 /* JArray */, a1: Prelude_Types_List_mapAppend({h: 0}, $4b => ({h: 4 /* JString */, a1: $4b}), Data_List_sort(csegen_212(), $0.a10))}}, a2: {a1: {a1: 'ignoredPRs', a2: {h: 5 /* JArray */, a1: Prelude_Types_List_mapAppend({h: 0}, $5a => ({h: 1 /* JInteger */, a1: $5a}), Data_List_sort({a1: csegen_215(), a2: csegen_216(), a3: $64 => $65 => Prelude_EqOrd_x3c_Ord_Integer($64, $65), a4: $6a => $6b => Prelude_EqOrd_x3e_Ord_Integer($6a, $6b), a5: $70 => $71 => Prelude_EqOrd_x3cx3d_Ord_Integer($70, $71), a6: $76 => $77 => Prelude_EqOrd_x3ex3d_Ord_Integer($76, $77), a7: $7c => $7d => Prelude_EqOrd_max_Ord_Integer($7c, $7d), a8: $82 => $83 => Prelude_EqOrd_min_Ord_Integer($82, $83)}, $0.a12))}}, a2: {a1: {a1: 'githubPAT', a2: Prelude_Types_maybe(() => ({h: 0 /* JNull */}), () => $8f => ({h: 4 /* JString */, a1: $8f}), $0.a13)}, a2: {a1: {a1: 'updatedAt', a2: {h: 1 /* JInteger */, a1: BigInt($0.a1)}}, a2: {h: 0}}}}}}}}}}}}}}};
6255
6284
  }
6256
6285
 
6257
6286
  /* Data.Config.filename : String */
@@ -6269,7 +6298,7 @@ function Decidable_Equality_decEq_DecEq_FromEqx24a($0, $1, $2) {
6269
6298
 
6270
6299
  /* Decidable.Equality.decEq */
6271
6300
  function Decidable_Equality_decEq_DecEq_Char($0, $1) {
6272
- return Decidable_Equality_decEq_DecEq_FromEqx24a(csegen_88(), $0, $1);
6301
+ return Decidable_Equality_decEq_DecEq_FromEqx24a(csegen_90(), $0, $1);
6273
6302
  }
6274
6303
 
6275
6304
  /* Data.Either.maybeToEither : Lazy e -> Maybe a -> Either e a */
@@ -6813,13 +6842,13 @@ function JSON_Parser_eqJSON($0, $1) {
6813
6842
  }
6814
6843
  case 5: /* JArray */ {
6815
6844
  switch($1.h) {
6816
- case 5: /* JArray */ return Prelude_Types_x3dx3d_Eq_x28Listx20x24ax29(csegen_227(), $0.a1, $1.a1);
6845
+ case 5: /* JArray */ return Prelude_Types_x3dx3d_Eq_x28Listx20x24ax29(csegen_229(), $0.a1, $1.a1);
6817
6846
  default: return 0;
6818
6847
  }
6819
6848
  }
6820
6849
  case 6: /* JObject */ {
6821
6850
  switch($1.h) {
6822
- case 6: /* JObject */ return Prelude_Types_x3dx3d_Eq_x28Listx20x24ax29({a1: $1e => $1f => Prelude_EqOrd_x3dx3d_Eq_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_39(), csegen_227(), $1e, $1f), a2: $28 => $29 => Prelude_EqOrd_x2fx3d_Eq_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_39(), csegen_227(), $28, $29)}, $0.a1, $1.a1);
6851
+ case 6: /* JObject */ return Prelude_Types_x3dx3d_Eq_x28Listx20x24ax29({a1: $1e => $1f => Prelude_EqOrd_x3dx3d_Eq_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_39(), csegen_229(), $1e, $1f), a2: $28 => $29 => Prelude_EqOrd_x2fx3d_Eq_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_39(), csegen_229(), $28, $29)}, $0.a1, $1.a1);
6823
6852
  default: return 0;
6824
6853
  }
6825
6854
  }
@@ -7059,7 +7088,7 @@ function Text_ParseError_failInParenEOI($0, $1, $2, $3) {
7059
7088
  case 1: /* Right */ {
7060
7089
  const $8 = {h: 1 /* Fail0 */, a1: {a1: {h: 9 /* Unexpected */, a1: {h: 1 /* Right */, a1: $3.a1.a1.a1.a1}}, a2: $3.a1.a2}};
7061
7090
  switch($2($3.a1.a1.a1.a1)) {
7062
- case 1: return csegen_234()($0)({h: 8 /* Unclosed */, a1: {h: 1 /* Right */, a1: $1}});
7091
+ case 1: return csegen_236()($0)({h: 8 /* Unclosed */, a1: {h: 1 /* Right */, a1: $1}});
7063
7092
  case 0: return Text_ParseError_failInParen($0, $1, $8);
7064
7093
  }
7065
7094
  }
@@ -7079,7 +7108,7 @@ function Text_ParseError_failInParenEOI($0, $1, $2, $3) {
7079
7108
  case undefined: /* cons */ {
7080
7109
  const $2a = {h: 0 /* Succ0 */, a1: $3.a1, a2: {a1: {a1: $3.a2.a1.a1, a2: $3.a2.a1.a2}, a2: $3.a2.a2}};
7081
7110
  switch($2($3.a2.a1.a1)) {
7082
- case 1: return csegen_234()($0)({h: 8 /* Unclosed */, a1: {h: 1 /* Right */, a1: $1}});
7111
+ case 1: return csegen_236()($0)({h: 8 /* Unclosed */, a1: {h: 1 /* Right */, a1: $1}});
7083
7112
  case 0: return Text_ParseError_failInParen($0, $1, $2a);
7084
7113
  }
7085
7114
  }
@@ -7100,7 +7129,7 @@ function Text_ParseError_failInParen($0, $1, $2) {
7100
7129
  switch($2.a1.h) {
7101
7130
  case undefined: /* cons */ {
7102
7131
  switch($2.a1.a1.h) {
7103
- case 1: /* EOI */ return csegen_234()($0)({h: 8 /* Unclosed */, a1: {h: 1 /* Right */, a1: $1}});
7132
+ case 1: /* EOI */ return csegen_236()($0)({h: 8 /* Unclosed */, a1: {h: 1 /* Right */, a1: $1}});
7104
7133
  default: return {h: 1 /* Fail0 */, a1: $2.a1};
7105
7134
  }
7106
7135
  }
@@ -7109,8 +7138,8 @@ function Text_ParseError_failInParen($0, $1, $2) {
7109
7138
  }
7110
7139
  case 0: /* Succ0 */ {
7111
7140
  switch($2.a2.h) {
7112
- case 0: /* nil */ return csegen_234()($0)({h: 8 /* Unclosed */, a1: {h: 1 /* Right */, a1: $1}});
7113
- case undefined: /* cons */ return csegen_234()($2.a2.a1.a2)({h: 9 /* Unexpected */, a1: {h: 1 /* Right */, a1: $2.a2.a1.a1}});
7141
+ case 0: /* nil */ return csegen_236()($0)({h: 8 /* Unclosed */, a1: {h: 1 /* Right */, a1: $1}});
7142
+ case undefined: /* cons */ return csegen_236()($2.a2.a1.a2)({h: 9 /* Unexpected */, a1: {h: 1 /* Right */, a1: $2.a2.a1.a1}});
7114
7143
  }
7115
7144
  }
7116
7145
  }
@@ -7119,8 +7148,8 @@ function Text_ParseError_failInParen($0, $1, $2) {
7119
7148
  /* Text.ParseError.fail : List (Bounded t) -> Result0 b (Bounded t) ts (Bounded (ParseError t y)) a */
7120
7149
  function Text_ParseError_fail($0) {
7121
7150
  switch($0.h) {
7122
- case undefined: /* cons */ return csegen_234()($0.a1.a2)({h: 9 /* Unexpected */, a1: {h: 1 /* Right */, a1: $0.a1.a1}});
7123
- case 0: /* nil */ return csegen_234()({h: 0})({h: 1 /* EOI */});
7151
+ case undefined: /* cons */ return csegen_236()($0.a1.a2)({h: 9 /* Unexpected */, a1: {h: 1 /* Right */, a1: $0.a1.a1}});
7152
+ case 0: /* nil */ return csegen_236()({h: 0})({h: 1 /* EOI */});
7124
7153
  }
7125
7154
  }
7126
7155
 
@@ -7228,14 +7257,14 @@ function System_File_ReadWrite_readLinesOnto($0, $1, $2, $3, $4) {
7228
7257
  }
7229
7258
  };
7230
7259
  const $26 = {a1: $27, a2: a => $2f => ({h: 1 /* Right */, a1: $2f}), a3: $31};
7231
- const $25 = {a1: $26, a2: csegen_196(), a3: csegen_197()};
7260
+ const $25 = {a1: $26, a2: csegen_198(), a3: csegen_199()};
7232
7261
  const $40 = b => a => func => $41 => {
7233
7262
  switch($41.h) {
7234
7263
  case 0: /* Left */ return {h: 0 /* Left */, a1: $41.a1};
7235
7264
  case 1: /* Right */ return {h: 1 /* Right */, a1: func($41.a1)};
7236
7265
  }
7237
7266
  };
7238
- const $3f = {a1: $40, a2: csegen_252(), a3: csegen_256()};
7267
+ const $3f = {a1: $40, a2: csegen_254(), a3: csegen_258()};
7239
7268
  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));
7240
7269
  }
7241
7270
  default: {
@@ -7534,7 +7563,7 @@ const System_Info_os = __lazy(function () {
7534
7563
 
7535
7564
  /* System.Info.isWindows : Bool */
7536
7565
  const System_Info_isWindows = __lazy(function () {
7537
- return Prelude_Types_elem(csegen_142(), csegen_39(), System_Info_os(), {a1: 'windows', a2: {a1: 'mingw32', a2: {a1: 'cygwin32', a2: {h: 0}}}});
7566
+ return Prelude_Types_elem(csegen_144(), csegen_39(), System_Info_os(), {a1: 'windows', a2: {a1: 'mingw32', a2: {a1: 'cygwin32', a2: {h: 0}}}});
7538
7567
  });
7539
7568
 
7540
7569
  /* Data.Fuel.limit : Nat -> Fuel */
@@ -7689,7 +7718,7 @@ function System_getEnv($0, $1) {
7689
7718
  function System_getArgs($0) {
7690
7719
  const $12 = n => {
7691
7720
  switch(Prelude_EqOrd_x3e_Ord_Int(n, Number(_truncBigInt32(0n)))) {
7692
- 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_270(), a2: $29 => $2a => Prelude_Num_div_Integral_Int($29, $2a), a3: $2f => $30 => Prelude_Num_mod_Integral_Int($2f, $30)}, a2: {a1: {a1: {a1: $38 => $39 => Prelude_EqOrd_x3dx3d_Eq_Int($38, $39), a2: $3e => $3f => Prelude_EqOrd_x2fx3d_Eq_Int($3e, $3f)}, a2: $44 => $45 => Prelude_EqOrd_compare_Ord_Int($44, $45), a3: $4a => $4b => Prelude_EqOrd_x3c_Ord_Int($4a, $4b), a4: $50 => $51 => Prelude_EqOrd_x3e_Ord_Int($50, $51), a5: $56 => $57 => Prelude_EqOrd_x3cx3d_Ord_Int($56, $57), a6: $5c => $5d => Prelude_EqOrd_x3ex3d_Ord_Int($5c, $5d), a7: $62 => $63 => Prelude_EqOrd_max_Ord_Int($62, $63), a8: $68 => $69 => Prelude_EqOrd_min_Ord_Int($68, $69)}, a2: {a1: csegen_270(), a2: $71 => _sub32s(0, $71), a3: $75 => $76 => _sub32s($75, $76)}}}, 0, _sub32s(n, 1)), $7e => $0.a2(undefined)($84 => System_prim__getArg($7e, $84)));
7721
+ 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_272(), a2: $29 => $2a => Prelude_Num_div_Integral_Int($29, $2a), a3: $2f => $30 => Prelude_Num_mod_Integral_Int($2f, $30)}, a2: {a1: {a1: {a1: $38 => $39 => Prelude_EqOrd_x3dx3d_Eq_Int($38, $39), a2: $3e => $3f => Prelude_EqOrd_x2fx3d_Eq_Int($3e, $3f)}, a2: $44 => $45 => Prelude_EqOrd_compare_Ord_Int($44, $45), a3: $4a => $4b => Prelude_EqOrd_x3c_Ord_Int($4a, $4b), a4: $50 => $51 => Prelude_EqOrd_x3e_Ord_Int($50, $51), a5: $56 => $57 => Prelude_EqOrd_x3cx3d_Ord_Int($56, $57), a6: $5c => $5d => Prelude_EqOrd_x3ex3d_Ord_Int($5c, $5d), a7: $62 => $63 => Prelude_EqOrd_max_Ord_Int($62, $63), a8: $68 => $69 => Prelude_EqOrd_min_Ord_Int($68, $69)}, a2: {a1: csegen_272(), a2: $71 => _sub32s(0, $71), a3: $75 => $76 => _sub32s($75, $76)}}}, 0, _sub32s(n, 1)), $7e => $0.a2(undefined)($84 => System_prim__getArg($7e, $84)));
7693
7722
  case 0: return $0.a1.a1.a2(undefined)({h: 0});
7694
7723
  }
7695
7724
  };
@@ -7744,12 +7773,12 @@ function Help_n__4720_1020_heading($0, $1) {
7744
7773
 
7745
7774
  /* Help.4720:1019:argument */
7746
7775
  function Help_n__4720_1019_argument($0, $1) {
7747
- return Help_n__4720_1021_maybeDecorate($0, csegen_294(), $1);
7776
+ return Help_n__4720_1021_maybeDecorate($0, csegen_296(), $1);
7748
7777
  }
7749
7778
 
7750
7779
  /* Help.help : Bool -> String */
7751
7780
  function Help_help($0) {
7752
- return Prelude_Types_foldMap_Foldable_List(csegen_49(), $5 => $5, {a1: 'harmony ', a2: {a1: Help_n__4720_1024_subcommand($0, '<subcommand>'), a2: {a1: '\n\n', a2: {a1: Help_n__4720_1020_heading($0, 'Subcommands'), a2: {a1: ':\n ', a2: {a1: Help_n__4720_1024_subcommand($0, 'help'), a2: {a1: '\n - Print help\n ', a2: {a1: Help_n__4720_1024_subcommand($0, 'version'), a2: {a1: '\n - Print version\n ', a2: {a1: Help_n__4720_1024_subcommand($0, 'config'), a2: {a1: ' {', a2: {a1: Help_n__4720_1019_argument($0, '<property>'), a2: {a1: '} [', a2: {a1: Help_n__4720_1019_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__4720_1019_argument($0, 'properties'), a2: {a1: ': ', a2: {a1: Data_String_Extra_join(', ', csegen_142(), Prelude_Types_List_mapAppend({h: 0}, $4a => Help_n__4720_1022_option($0, $4a), Data_Config_settablePropNames())), a2: {a1: '.\n ', a2: {a1: Help_n__4720_1024_subcommand($0, 'sync'), a2: {a1: '\n - Synchronize local config with information from GitHub.\n ', a2: {a1: Help_n__4720_1024_subcommand($0, 'branch'), a2: {a1: '\n - Print the GitHub URI for the currently checked out branch.\n ', a2: {a1: Help_n__4720_1024_subcommand($0, 'pr'), a2: {a1: ' [', a2: {a1: Help_n__4720_1019_argument($0, '--draft'), a2: {a1: '] [', a2: {a1: Help_n__4720_1019_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__4720_1024_subcommand($0, 'contribute'), a2: {a1: ' [', a2: {a1: Help_n__4720_1019_argument($0, '-c/--checkout'), a2: {a1: '] [', a2: {a1: Help_n__4720_1019_argument($0, '-<num>'), a2: {a1: '] [', a2: {a1: Help_n__4720_1019_argument($0, '-i/--ignore'), a2: {a1: ' {', a2: {a1: Help_n__4720_1019_argument($0, '<uri>/<pr-number>'), 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\n Use dash followed by a number (e.g. \'-3\') to skip that number of\n potential PRs and return the next.\n\n Specify a PR to ignore (only affects the local Harmony config on\n this machine) if you would like to more permanently skip a potential\n PR. Do this with the \'--ignore\' option followed by a GitHub URI or\n Pull Request number.\n ', a2: {a1: Help_n__4720_1024_subcommand($0, 'whoami'), a2: {a1: '\n - Print information about the configured and authenticated user.\n ', a2: {a1: Help_n__4720_1024_subcommand($0, 'reflect'), a2: {a1: '\n - Reflect on the current state of ones own PRs and review requests.\n ', a2: {a1: Help_n__4720_1024_subcommand($0, 'list'), a2: {a1: ' {', a2: {a1: Help_n__4720_1019_argument($0, '<team-slug>'), a2: {a1: '}\n - List the members of the given GitHub Team.\n ', a2: {a1: Help_n__4720_1024_subcommand($0, 'graph'), a2: {a1: ' [', a2: {a1: Help_n__4720_1019_argument($0, '-c/--completed'), a2: {a1: '] {', a2: {a1: Help_n__4720_1019_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__4720_1024_subcommand($0, 'health'), a2: {a1: '\n - Graph all open PRs grouped by the month they were created.\n ', a2: {a1: Help_n__4720_1024_subcommand($0, 'label'), a2: {a1: ' {', a2: {a1: Help_n__4720_1019_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__4720_1024_subcommand($0, 'assign'), a2: {a1: ' {', a2: {a1: Help_n__4720_1019_argument($0, '<team-slug>'), a2: {a1: ' | ', a2: {a1: Help_n__4720_1019_argument($0, '+<user-login>'), a2: {a1: '} [', a2: {a1: Help_n__4720_1019_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__4720_1020_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__4720_1023_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__4720_1023_shell($0, 'autoload -U +X compinit && compinit'), a2: {a1: '\n ', a2: {a1: Help_n__4720_1023_shell($0, 'autoload -U +X bashcompinit && bashcompinit'), a2: {a1: '\n ', a2: {h: 0}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}});
7781
+ return Prelude_Types_foldMap_Foldable_List(csegen_49(), $5 => $5, {a1: 'harmony ', a2: {a1: Help_n__4720_1024_subcommand($0, '<subcommand>'), a2: {a1: '\n\n', a2: {a1: Help_n__4720_1020_heading($0, 'Subcommands'), a2: {a1: ':\n ', a2: {a1: Help_n__4720_1024_subcommand($0, 'help'), a2: {a1: '\n - Print help\n ', a2: {a1: Help_n__4720_1024_subcommand($0, 'version'), a2: {a1: '\n - Print version\n ', a2: {a1: Help_n__4720_1024_subcommand($0, 'config'), a2: {a1: ' {', a2: {a1: Help_n__4720_1019_argument($0, '<property>'), a2: {a1: '} [', a2: {a1: Help_n__4720_1019_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__4720_1019_argument($0, 'properties'), a2: {a1: ': ', a2: {a1: Data_String_Extra_join(', ', csegen_144(), Prelude_Types_List_mapAppend({h: 0}, $4a => Help_n__4720_1022_option($0, $4a), Data_Config_settablePropNames())), a2: {a1: '.\n ', a2: {a1: Help_n__4720_1024_subcommand($0, 'sync'), a2: {a1: '\n - Synchronize local config with information from GitHub.\n ', a2: {a1: Help_n__4720_1024_subcommand($0, 'branch'), a2: {a1: '\n - Print the GitHub URI for the currently checked out branch.\n ', a2: {a1: Help_n__4720_1024_subcommand($0, 'pr'), a2: {a1: ' [', a2: {a1: Help_n__4720_1019_argument($0, '--draft'), a2: {a1: '] [', a2: {a1: Help_n__4720_1019_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__4720_1024_subcommand($0, 'contribute'), a2: {a1: ' [', a2: {a1: Help_n__4720_1019_argument($0, '-c/--checkout'), a2: {a1: '] [', a2: {a1: Help_n__4720_1019_argument($0, '-<num>'), a2: {a1: '] [', a2: {a1: Help_n__4720_1019_argument($0, '-i/--ignore'), a2: {a1: ' {', a2: {a1: Help_n__4720_1019_argument($0, '<uri>/<pr-number>'), 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\n Use dash followed by a number (e.g. \'-3\') to skip that number of\n potential PRs and return the next.\n\n Specify a PR to ignore (only affects the local Harmony config on\n this machine) if you would like to more permanently skip a potential\n PR. Do this with the \'--ignore\' option followed by a GitHub URI or\n Pull Request number.\n ', a2: {a1: Help_n__4720_1024_subcommand($0, 'whoami'), a2: {a1: '\n - Print information about the configured and authenticated user.\n ', a2: {a1: Help_n__4720_1024_subcommand($0, 'reflect'), a2: {a1: '\n - Reflect on the current state of ones own PRs and review requests.\n ', a2: {a1: Help_n__4720_1024_subcommand($0, 'list'), a2: {a1: ' {', a2: {a1: Help_n__4720_1019_argument($0, '<team-slug>'), a2: {a1: '}\n - List the members of the given GitHub Team.\n ', a2: {a1: Help_n__4720_1024_subcommand($0, 'graph'), a2: {a1: ' [', a2: {a1: Help_n__4720_1019_argument($0, '-c/--completed'), a2: {a1: '] {', a2: {a1: Help_n__4720_1019_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__4720_1024_subcommand($0, 'health'), a2: {a1: '\n - Graph all open PRs grouped by the month they were created.\n ', a2: {a1: Help_n__4720_1024_subcommand($0, 'label'), a2: {a1: ' {', a2: {a1: Help_n__4720_1019_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__4720_1024_subcommand($0, 'assign'), a2: {a1: ' {', a2: {a1: Help_n__4720_1019_argument($0, '<team-slug>'), a2: {a1: ' | ', a2: {a1: Help_n__4720_1019_argument($0, '+<user-login>'), a2: {a1: '} [', a2: {a1: Help_n__4720_1019_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__4720_1020_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__4720_1023_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__4720_1023_shell($0, 'autoload -U +X compinit && compinit'), a2: {a1: '\n ', a2: {a1: Help_n__4720_1023_shell($0, 'autoload -U +X bashcompinit && bashcompinit'), a2: {a1: '\n ', a2: {h: 0}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}});
7753
7782
  }
7754
7783
 
7755
7784
  /* FFI.GitHub.show */
@@ -7807,12 +7836,12 @@ function FFI_GitHub_listPullRequestsJsonStr($0, $1, $2, $3, $4, $5) {
7807
7836
  String -> String -> Maybe GitHubPRState -> Fin 101 -> {default 0 _ : Nat} ->
7808
7837
  Promise (List PullRequest) */
7809
7838
  function FFI_GitHub_listPullRequests($0, $1, $2, $3, $4, $5) {
7810
- return Prelude_Basics_flip(csegen_295(), csegen_296(), FFI_GitHub_listPullRequestsJsonStr($0, $1, $2, $3, $4, $5));
7839
+ return Prelude_Basics_flip(csegen_297(), csegen_298(), FFI_GitHub_listPullRequestsJsonStr($0, $1, $2, $3, $4, $5));
7811
7840
  }
7812
7841
 
7813
7842
  /* FFI.GitHub.listPRsForBranch : Octokit => String -> String -> String -> Promise (List PullRequest) */
7814
7843
  function FFI_GitHub_listPRsForBranch($0, $1, $2, $3) {
7815
- return Prelude_Basics_flip(csegen_295(), csegen_296(), $a => $b => FFI_promiseIO($e => $f => $10 => FFI_GitHub_prim__listPRsForBranch($0, $1, $2, $3, $e, $f, $10), $a, $b));
7844
+ return Prelude_Basics_flip(csegen_297(), csegen_298(), $a => $b => FFI_promiseIO($e => $f => $10 => FFI_GitHub_prim__listPRsForBranch($0, $1, $2, $3, $e, $f, $10), $a, $b));
7816
7845
  }
7817
7846
 
7818
7847
  /* FFI.GitHub.listOrgMembers : Octokit => String -> Promise (List String) */
@@ -7827,12 +7856,12 @@ function FFI_GitHub_listMyTeams($0, $1, $2) {
7827
7856
 
7828
7857
  /* FFI.GitHub.getUser : Octokit => String -> Promise User */
7829
7858
  function FFI_GitHub_getUser($0) {
7830
- return Prelude_Interfaces_x3cx3dx3c(csegen_69(), csegen_297(), $7 => $8 => $9 => FFI_promiseIO($c => $d => $e => FFI_GitHub_prim__getUser($0, $7, $c, $d, $e), $8, $9));
7859
+ return Prelude_Interfaces_x3cx3dx3c(csegen_69(), csegen_299(), $7 => $8 => $9 => FFI_promiseIO($c => $d => $e => FFI_GitHub_prim__getUser($0, $7, $c, $d, $e), $8, $9));
7831
7860
  }
7832
7861
 
7833
7862
  /* FFI.GitHub.getSelf : Octokit => Promise User */
7834
7863
  function FFI_GitHub_getSelf($0) {
7835
- return Prelude_Basics_flip(csegen_295(), csegen_297(), $7 => $8 => FFI_promiseIO($b => $c => $d => FFI_GitHub_prim__getSelf($0, $b, $c, $d), $7, $8));
7864
+ return Prelude_Basics_flip(csegen_297(), csegen_299(), $7 => $8 => FFI_promiseIO($b => $c => $d => FFI_GitHub_prim__getSelf($0, $b, $c, $d), $7, $8));
7836
7865
  }
7837
7866
 
7838
7867
  /* FFI.GitHub.getRepoDefaultBranch : Octokit => String -> String -> Promise String */
@@ -7843,7 +7872,7 @@ function FFI_GitHub_getRepoDefaultBranch($0, $1, $2, $3, $4) {
7843
7872
  /* FFI.GitHub.createPR : Octokit => {default False _ : Bool} ->
7844
7873
  String -> String -> String -> String -> String -> String -> Promise PullRequest */
7845
7874
  function FFI_GitHub_createPR($0, $1, $2, $3, $4, $5, $6, $7) {
7846
- return Prelude_Basics_flip(csegen_295(), $c => $d => Data_Promise_either(csegen_51(), Data_PullRequest_parsePullRequestString($c), $d), $16 => $17 => FFI_promiseIO($1a => $1b => $1c => FFI_GitHub_prim__createPR($0, $2, $3, $4, $5, $6, $7, $1, $1a, $1b, $1c), $16, $17));
7875
+ return Prelude_Basics_flip(csegen_297(), $c => $d => Data_Promise_either(csegen_51(), Data_PullRequest_parsePullRequestString($c), $d), $16 => $17 => FFI_promiseIO($1a => $1b => $1c => FFI_GitHub_prim__createPR($0, $2, $3, $4, $5, $6, $7, $1, $1a, $1b, $1c), $16, $17));
7847
7876
  }
7848
7877
 
7849
7878
  /* FFI.GitHub.createComment : Octokit => String -> String -> Integer -> String -> Promise () */
@@ -7854,12 +7883,12 @@ function FFI_GitHub_createComment($0, $1, $2, $3, $4, $5, $6) {
7854
7883
  /* FFI.GitHub.addPullReviewers : Octokit =>
7855
7884
  String -> String -> Integer -> List String -> List String -> Promise (List String) */
7856
7885
  function FFI_GitHub_addPullReviewers($0, $1, $2, $3, $4, $5, $6, $7) {
7857
- return Data_Promise_x3ex3ex3d_Monad_Promise($a => $b => Data_Promise_map_Functor_Promise($e => Data_String_lines($e), $12 => $13 => FFI_promiseIO($16 => $17 => $18 => FFI_GitHub_prim__addPullReviewers($0, $1, $2, $3, '', Data_String_Extra_join(',', csegen_142(), $5), $16, $17, $18), $12, $13), $a, $b), teamReviewers => $2d => $2e => Data_Promise_x3ex3ex3d_Monad_Promise($31 => $32 => Data_Promise_map_Functor_Promise($35 => Data_String_lines($35), $39 => $3a => FFI_promiseIO($3d => $3e => $3f => FFI_GitHub_prim__addPullReviewers($0, $1, $2, $3, Data_String_Extra_join(',', csegen_142(), $4), '', $3d, $3e, $3f), $39, $3a), $31, $32), individualReviewers => $54 => $55 => Data_Promise_pure_Applicative_Promise(Prelude_Types_List_tailRecAppend(teamReviewers, individualReviewers), $54, $55), $2d, $2e), $6, $7);
7886
+ return Data_Promise_x3ex3ex3d_Monad_Promise($a => $b => Data_Promise_map_Functor_Promise($e => Data_String_lines($e), $12 => $13 => FFI_promiseIO($16 => $17 => $18 => FFI_GitHub_prim__addPullReviewers($0, $1, $2, $3, '', Data_String_Extra_join(',', csegen_144(), $5), $16, $17, $18), $12, $13), $a, $b), teamReviewers => $2d => $2e => Data_Promise_x3ex3ex3d_Monad_Promise($31 => $32 => Data_Promise_map_Functor_Promise($35 => Data_String_lines($35), $39 => $3a => FFI_promiseIO($3d => $3e => $3f => FFI_GitHub_prim__addPullReviewers($0, $1, $2, $3, Data_String_Extra_join(',', csegen_144(), $4), '', $3d, $3e, $3f), $39, $3a), $31, $32), individualReviewers => $54 => $55 => Data_Promise_pure_Applicative_Promise(Prelude_Types_List_tailRecAppend(teamReviewers, individualReviewers), $54, $55), $2d, $2e), $6, $7);
7858
7887
  }
7859
7888
 
7860
7889
  /* FFI.GitHub.addPullLabels : Octokit => String -> String -> Integer -> List String -> Promise (List String) */
7861
7890
  function FFI_GitHub_addPullLabels($0, $1, $2, $3, $4, $5, $6) {
7862
- return Data_Promise_map_Functor_Promise($9 => Data_String_lines($9), $d => $e => FFI_promiseIO($11 => $12 => $13 => FFI_GitHub_prim__addLabels($0, $1, $2, $3, Data_String_Extra_join(',', csegen_142(), $4), $11, $12, $13), $d, $e), $5, $6);
7891
+ return Data_Promise_map_Functor_Promise($9 => Data_String_lines($9), $d => $e => FFI_promiseIO($11 => $12 => $13 => FFI_GitHub_prim__addLabels($0, $1, $2, $3, Data_String_Extra_join(',', csegen_144(), $4), $11, $12, $13), $d, $e), $5, $6);
7863
7892
  }
7864
7893
 
7865
7894
  /* FFI.promiseIO : ((String -> PrimIO ()) -> (String -> PrimIO ()) -> PrimIO ()) -> Promise String */
@@ -7964,8 +7993,8 @@ function Data_User_parseUserString($0) {
7964
7993
  }
7965
7994
  };
7966
7995
  const $3 = {a1: $4, a2: a => $c => ({h: 1 /* Right */, a1: $c}), a3: $e};
7967
- const $2 = {a1: $3, a2: csegen_196(), a3: csegen_197()};
7968
- return Prelude_Interfaces_x3ex3dx3e($2, csegen_198(), $1f => Data_User_parseUser($1f), $0);
7996
+ const $2 = {a1: $3, a2: csegen_198(), a3: csegen_199()};
7997
+ return Prelude_Interfaces_x3ex3dx3e($2, csegen_200(), $1f => Data_User_parseUser($1f), $0);
7969
7998
  }
7970
7999
 
7971
8000
  /* Data.User.parseUser : JSON -> Either String User */
@@ -7995,7 +8024,7 @@ function Data_Review_parseState($0) {
7995
8024
 
7996
8025
  /* Data.Review.parseReview : JSON -> Either String Review */
7997
8026
  function Data_Review_parseReview($0) {
7998
- 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_302(), $22 => Data_Review_parseState($22), Language_JSON_Accessors_string($12.a2.a1)), state => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Prelude_Basics_flip(csegen_302(), $2f => Data_Review_parseDateTime($2f), Language_JSON_Accessors_string($12.a2.a2.a1)), submittedAt => ({h: 1 /* Right */, a1: {a1: submittedAt, a2: author, a3: state}}))))));
8027
+ 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_304(), $22 => Data_Review_parseState($22), Language_JSON_Accessors_string($12.a2.a1)), state => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Prelude_Basics_flip(csegen_304(), $2f => Data_Review_parseDateTime($2f), Language_JSON_Accessors_string($12.a2.a2.a1)), submittedAt => ({h: 1 /* Right */, a1: {a1: submittedAt, a2: author, a3: state}}))))));
7999
8028
  }
8000
8029
 
8001
8030
  /* Data.Review.parseDateTime : String -> Either String Date */
@@ -8129,7 +8158,7 @@ function Data_Date_max_Ord_Date($0, $1) {
8129
8158
 
8130
8159
  /* Data.Date.compare */
8131
8160
  function Data_Date_compare_Ord_Date($0, $1) {
8132
- return Prelude_Types_compare_Ord_x28Listx20x24ax29({a1: {a1: $8 => $9 => (($8===$9)?1:0), a2: $d => $e => Prelude_Types_x2fx3d_Eq_Nat($d, $e)}, a2: csegen_214(), a3: $15 => $16 => Prelude_Types_x3c_Ord_Nat($15, $16), a4: $1b => $1c => Prelude_Types_x3e_Ord_Nat($1b, $1c), a5: $21 => $22 => Prelude_Types_x3cx3d_Ord_Nat($21, $22), a6: $27 => $28 => Prelude_Types_x3ex3d_Ord_Nat($27, $28), a7: $2d => $2e => Prelude_Types_max_Ord_Nat($2d, $2e), a8: $33 => $34 => Prelude_Types_min_Ord_Nat($33, $34)}, {a1: $0.a1, a2: {a1: $0.a2, a2: {a1: $0.a3, a2: {h: 0}}}}, {a1: $1.a1, a2: {a1: $1.a2, a2: {a1: $1.a3, a2: {h: 0}}}});
8161
+ return Prelude_Types_compare_Ord_x28Listx20x24ax29({a1: {a1: $8 => $9 => (($8===$9)?1:0), a2: $d => $e => Prelude_Types_x2fx3d_Eq_Nat($d, $e)}, a2: csegen_216(), a3: $15 => $16 => Prelude_Types_x3c_Ord_Nat($15, $16), a4: $1b => $1c => Prelude_Types_x3e_Ord_Nat($1b, $1c), a5: $21 => $22 => Prelude_Types_x3cx3d_Ord_Nat($21, $22), a6: $27 => $28 => Prelude_Types_x3ex3d_Ord_Nat($27, $28), a7: $2d => $2e => Prelude_Types_max_Ord_Nat($2d, $2e), a8: $33 => $34 => Prelude_Types_min_Ord_Nat($33, $34)}, {a1: $0.a1, a2: {a1: $0.a2, a2: {a1: $0.a3, a2: {h: 0}}}}, {a1: $1.a1, a2: {a1: $1.a2, a2: {a1: $1.a3, a2: {h: 0}}}});
8133
8162
  }
8134
8163
 
8135
8164
  /* Data.Date.> */
@@ -8285,8 +8314,8 @@ function Data_PullRequest_parsePullRequestsString($0) {
8285
8314
  }
8286
8315
  };
8287
8316
  const $3 = {a1: $4, a2: a => $c => ({h: 1 /* Right */, a1: $c}), a3: $e};
8288
- const $2 = {a1: $3, a2: csegen_196(), a3: csegen_197()};
8289
- return Prelude_Interfaces_x3ex3dx3e($2, csegen_198(), csegen_315(), $0);
8317
+ const $2 = {a1: $3, a2: csegen_198(), a3: csegen_199()};
8318
+ return Prelude_Interfaces_x3ex3dx3e($2, csegen_200(), csegen_317(), $0);
8290
8319
  }
8291
8320
 
8292
8321
  /* Data.PullRequest.parsePullRequestString : String -> Either String PullRequest */
@@ -8309,13 +8338,13 @@ function Data_PullRequest_parsePullRequestString($0) {
8309
8338
  }
8310
8339
  };
8311
8340
  const $3 = {a1: $4, a2: a => $c => ({h: 1 /* Right */, a1: $c}), a3: $e};
8312
- const $2 = {a1: $3, a2: csegen_196(), a3: csegen_197()};
8313
- return Prelude_Interfaces_x3ex3dx3e($2, csegen_198(), $1f => Data_PullRequest_parsePR($1f), $0);
8341
+ const $2 = {a1: $3, a2: csegen_198(), a3: csegen_199()};
8342
+ return Prelude_Interfaces_x3ex3dx3e($2, csegen_200(), $1f => Data_PullRequest_parsePR($1f), $0);
8314
8343
  }
8315
8344
 
8316
8345
  /* Data.PullRequest.parsePR : JSON -> Either String PullRequest */
8317
8346
  function Data_PullRequest_parsePR($0) {
8318
- 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_302(), $40 => Data_PullRequest_parseState(merged, $40), Language_JSON_Accessors_string($1c.a2.a2.a1)), state => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Prelude_Basics_flip(csegen_302(), $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}})))))))))));
8347
+ 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_304(), $40 => Data_PullRequest_parseState(merged, $40), Language_JSON_Accessors_string($1c.a2.a2.a1)), state => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Prelude_Basics_flip(csegen_304(), $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}})))))))))));
8319
8348
  }
8320
8349
 
8321
8350
  /* Data.PullRequest.parseDateTime : String -> Either String Date */
@@ -8325,7 +8354,7 @@ function Data_PullRequest_parseDateTime($0) {
8325
8354
 
8326
8355
  /* Data.PullRequest.isRequestedReviewer : String -> PullRequest -> Bool */
8327
8356
  function Data_PullRequest_isRequestedReviewer($0, $1) {
8328
- return Prelude_Types_foldMap_Foldable_List(csegen_92(), $6 => Prelude_EqOrd_x3dx3d_Eq_String($6, $0), $1.a6);
8357
+ return Prelude_Types_foldMap_Foldable_List(csegen_94(), $6 => Prelude_EqOrd_x3dx3d_Eq_String($6, $0), $1.a6);
8329
8358
  }
8330
8359
 
8331
8360
  /* Data.PullRequest.isAuthor : String -> PullRequest -> Bool */
@@ -8465,7 +8494,7 @@ function Config_with__withx20blockx20inx20setConfig_1978($0, $1, $2, $3, $4, $5,
8465
8494
  return $7 => {
8466
8495
  switch($5.h) {
8467
8496
  case 0: /* nothing */ return Data_Promise_reject(Prelude_Types_foldMap_Foldable_List(csegen_49(), $f => $f, {a1: $4, a2: {a1: ' is not a valid value for ', a2: {a1: $1, a2: {a1: '.', a2: {h: 0}}}}}), $6, $7);
8468
- case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Types_either(() => $1f => Util_renderIO($5.a1, csegen_72(), $1f), () => csegen_323(), Config_checkConfigConsistency($5.a1)), $2b => $2c => $2d => Config_writeConfig($5.a1, $2c, $2d), $6, $7);
8497
+ case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Types_either(() => $1f => Util_renderIO($5.a1, csegen_72(), $1f), () => csegen_325(), Config_checkConfigConsistency($5.a1)), $2b => $2c => $2d => Config_writeConfig($5.a1, $2c, $2d), $6, $7);
8469
8498
  }
8470
8499
  };
8471
8500
  }
@@ -8515,12 +8544,12 @@ function Config_case__parseGitHubURIx2cparseSuffix_1509($0, $1, $2) {
8515
8544
  default: return {h: 0};
8516
8545
  }
8517
8546
  };
8518
- return Prelude_Types_x3ex3ex3d_Monad_Maybe({a1: Data_String_split(csegen_324(), $2.a1)}, $b);
8547
+ return Prelude_Types_x3ex3ex3d_Monad_Maybe({a1: Data_String_split(csegen_326(), $2.a1)}, $b);
8519
8548
  }
8520
8549
 
8521
8550
  /* Config.8973:2259:repo */
8522
8551
  function Config_n__8973_2259_repo($0, $1, $2, $3, $4) {
8523
- return Prelude_Types_map_Functor_Maybe(csegen_325(), $4);
8552
+ return Prelude_Types_map_Functor_Maybe(csegen_327(), $4);
8524
8553
  }
8525
8554
 
8526
8555
  /* Config.8227:1489:parseSuffix */
@@ -8540,7 +8569,7 @@ function Config_n__8227_1487_parseHTTPS($0, $1) {
8540
8569
 
8541
8570
  /* Config.8973:2258:org */
8542
8571
  function Config_n__8973_2258_org($0, $1, $2, $3, $4) {
8543
- return Prelude_Types_map_Functor_Maybe(csegen_329(), $4);
8572
+ return Prelude_Types_map_Functor_Maybe(csegen_331(), $4);
8544
8573
  }
8545
8574
 
8546
8575
  /* Config.8973:2257:orIfEmpty */
@@ -8644,7 +8673,7 @@ function Config_syncConfig($0, $1, $2, $3, $4) {
8644
8673
  const $32 = {a1: updatedAt, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5, a6: $0.a6, a7: $0.a7, a8: $0.a8, a9: teamSlugs, a10: labelNames, a11: orgMembers, a12: $0.a12, a13: $0.a13, a14: $0.a14};
8645
8674
  return $42 => $43 => Data_Promise_x3ex3ex3d_Monad_Promise($46 => $47 => Data_Promise_map_Functor_Promise($4a => (undefined), $4c => $4d => Config_writeConfig($32, $4c, $4d), $46, $47), $55 => $56 => $57 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_when(csegen_64(), $2, () => $5f => $60 => Data_Promise_x3ex3ex3d_Monad_Promise($63 => $64 => $65 => Data_Promise_liftIO_HasIO_Promise($68 => Prelude_IO_prim__putStr('Your updated configuration is:\n', $68), $63, $64, $65), $70 => $71 => $72 => $73 => Data_Promise_liftIO_HasIO_Promise($76 => Prelude_IO_prim__putStr((Data_Config_show_Show_Config($32)+'\n'), $76), $71, $72, $73), $5f, $60)), $84 => $85 => $86 => Data_Promise_pure_Applicative_Promise($32, $85, $86), $56, $57), $42, $43);
8646
8675
  };
8647
- return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_340(), $31, $2c, $2d);
8676
+ return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_342(), $31, $2c, $2d);
8648
8677
  };
8649
8678
  return Data_Promise_x3ex3ex3d_Monad_Promise($23 => $24 => FFI_GitHub_listOrgMembers($1, $0.a2, $23, $24), $2b, $1f, $20);
8650
8679
  };
@@ -8667,11 +8696,11 @@ function Config_setConfig($0, $1, $2) {
8667
8696
  function Config_propSetter($0, $1) {
8668
8697
  return $2 => {
8669
8698
  switch($0) {
8670
- case 0: return Config_update(csegen_345(), $8 => Config_parseBool($8), b => $c => ({a1: $c.a1, a2: $c.a2, a3: $c.a3, a4: $c.a4, a5: $c.a5, a6: b, a7: $c.a7, a8: $c.a8, a9: $c.a9, a10: $c.a10, a11: $c.a11, a12: $c.a12, a13: $c.a13, a14: $c.a14}), $1, $2);
8671
- case 1: return Config_update(csegen_345(), $22 => Config_parseBool($22), b => $26 => ({a1: $26.a1, a2: $26.a2, a3: $26.a3, a4: $26.a4, a5: $26.a5, a6: $26.a6, a7: b, a8: $26.a8, a9: $26.a9, a10: $26.a10, a11: $26.a11, a12: $26.a12, a13: $26.a13, a14: $26.a14}), $1, $2);
8672
- case 2: return Config_update(csegen_345(), $3c => Config_parseBool($3c), b => $40 => ({a1: $40.a1, a2: $40.a2, a3: $40.a3, a4: $40.a4, a5: $40.a5, a6: $40.a6, a7: $40.a7, a8: b, a9: $40.a9, a10: $40.a10, a11: $40.a11, a12: $40.a12, a13: $40.a13, a14: $40.a14}), $1, $2);
8673
- case 3: return Config_update(csegen_345(), $56 => ({a1: $56}), s => $59 => ({a1: $59.a1, a2: $59.a2, a3: $59.a3, a4: s, a5: $59.a5, a6: $59.a6, a7: $59.a7, a8: $59.a8, a9: $59.a9, a10: $59.a10, a11: $59.a11, a12: $59.a12, a13: $59.a13, a14: $59.a14}), $1, $2);
8674
- case 4: return Config_update(csegen_345(), $6f => ({a1: $6f}), s => $72 => ({a1: $72.a1, a2: $72.a2, a3: $72.a3, a4: $72.a4, a5: $72.a5, a6: $72.a6, a7: $72.a7, a8: $72.a8, a9: $72.a9, a10: $72.a10, a11: $72.a11, a12: $72.a12, a13: {a1: s}, a14: $72.a14}), $1, $2);
8699
+ case 0: return Config_update(csegen_347(), $8 => Config_parseBool($8), b => $c => ({a1: $c.a1, a2: $c.a2, a3: $c.a3, a4: $c.a4, a5: $c.a5, a6: b, a7: $c.a7, a8: $c.a8, a9: $c.a9, a10: $c.a10, a11: $c.a11, a12: $c.a12, a13: $c.a13, a14: $c.a14}), $1, $2);
8700
+ case 1: return Config_update(csegen_347(), $22 => Config_parseBool($22), b => $26 => ({a1: $26.a1, a2: $26.a2, a3: $26.a3, a4: $26.a4, a5: $26.a5, a6: $26.a6, a7: b, a8: $26.a8, a9: $26.a9, a10: $26.a10, a11: $26.a11, a12: $26.a12, a13: $26.a13, a14: $26.a14}), $1, $2);
8701
+ case 2: return Config_update(csegen_347(), $3c => Config_parseBool($3c), b => $40 => ({a1: $40.a1, a2: $40.a2, a3: $40.a3, a4: $40.a4, a5: $40.a5, a6: $40.a6, a7: $40.a7, a8: b, a9: $40.a9, a10: $40.a10, a11: $40.a11, a12: $40.a12, a13: $40.a13, a14: $40.a14}), $1, $2);
8702
+ case 3: return Config_update(csegen_347(), $56 => ({a1: $56}), s => $59 => ({a1: $59.a1, a2: $59.a2, a3: $59.a3, a4: s, a5: $59.a5, a6: $59.a6, a7: $59.a7, a8: $59.a8, a9: $59.a9, a10: $59.a10, a11: $59.a11, a12: $59.a12, a13: $59.a13, a14: $59.a14}), $1, $2);
8703
+ case 4: return Config_update(csegen_347(), $6f => ({a1: $6f}), s => $72 => ({a1: $72.a1, a2: $72.a2, a3: $72.a3, a4: $72.a4, a5: $72.a5, a6: $72.a6, a7: $72.a7, a8: $72.a8, a9: $72.a9, a10: $72.a10, a11: $72.a11, a12: $72.a12, a13: {a1: s}, a14: $72.a14}), $1, $2);
8675
8704
  }
8676
8705
  };
8677
8706
  }
@@ -8752,14 +8781,14 @@ function Config_loadConfig($0, $1, $2) {
8752
8781
  }
8753
8782
  };
8754
8783
  const $a = {a1: $b, a2: a => $13 => ({h: 1 /* Right */, a1: $13}), a3: $15};
8755
- const $9 = {a1: $a, a2: csegen_196(), a3: csegen_197()};
8784
+ const $9 = {a1: $a, a2: csegen_198(), a3: csegen_199()};
8756
8785
  const $24 = b => a => func => $25 => {
8757
8786
  switch($25.h) {
8758
8787
  case 0: /* Left */ return {h: 0 /* Left */, a1: $25.a1};
8759
8788
  case 1: /* Right */ return {h: 1 /* Right */, a1: func($25.a1)};
8760
8789
  }
8761
8790
  };
8762
- const $23 = {a1: $24, a2: csegen_252(), a3: csegen_256()};
8791
+ const $23 = {a1: $24, a2: csegen_254(), a3: csegen_258()};
8763
8792
  return Prelude_Interfaces_Monad_x3ex3ex3d_Monad_Composex28x28x2ex20x24mx29x20x24tx29($0.a1, $9, $23, $4, $5);
8764
8793
  };
8765
8794
  const $3d = $3e => {
@@ -8843,7 +8872,7 @@ function Config_createConfig($0, $1, $2, $3, $4, $5) {
8843
8872
  default: return {a1: Data_String_trim($73)};
8844
8873
  }
8845
8874
  };
8846
- return Data_Promise_map_Functor_Promise($72, csegen_358(), $6f, $70);
8875
+ return Data_Promise_map_Functor_Promise($72, csegen_360(), $6f, $70);
8847
8876
  };
8848
8877
  const $7e = configPAT => $7f => $80 => {
8849
8878
  const $8c = $8d => $8e => $8f => {
@@ -8851,11 +8880,11 @@ function Config_createConfig($0, $1, $2, $3, $4, $5) {
8851
8880
  case undefined: /* just */ {
8852
8881
  const $a3 = remoteGuess => $a4 => $a5 => {
8853
8882
  const $c1 = defaultOrgAndRepo => {
8854
- const $c2 = Config_n__8973_2255_defaultStr($0, $3, $2, $1, csegen_329(), defaultOrgAndRepo);
8883
+ const $c2 = Config_n__8973_2255_defaultStr($0, $3, $2, $1, csegen_331(), defaultOrgAndRepo);
8855
8884
  return $cb => $cc => {
8856
8885
  const $e9 = $ea => $eb => $ec => {
8857
8886
  const $107 = org => {
8858
- const $108 = Config_n__8973_2255_defaultStr($0, $3, $2, $1, csegen_325(), defaultOrgAndRepo);
8887
+ const $108 = Config_n__8973_2255_defaultStr($0, $3, $2, $1, csegen_327(), defaultOrgAndRepo);
8859
8888
  return $111 => $112 => {
8860
8889
  const $12f = $130 => $131 => $132 => {
8861
8890
  const $14d = repo => {
@@ -8876,7 +8905,7 @@ function Config_createConfig($0, $1, $2, $3, $4, $5) {
8876
8905
  const $205 = repoLabels => $206 => $207 => {
8877
8906
  const $211 = orgMembers => {
8878
8907
  const $212 = {a1: updatedAt, a2: org, a3: repo, a4: defaultRemote, a5: mainBranch, a6: assignTeams, a7: assignUsers, a8: commentOnAssign, a9: teamSlugs, a10: repoLabels, a11: orgMembers, a12: {h: 0}, a13: Prelude_Types_map_Functor_Maybe($222 => $222, configPAT), a14: $1de};
8879
- return $225 => $226 => Data_Promise_x3ex3ex3d_Monad_Promise($229 => $22a => Data_Promise_map_Functor_Promise($22d => (undefined), $22f => $230 => Config_writeConfig($212, $22f, $230), $229, $22a), $238 => $239 => $23a => Data_Promise_x3ex3ex3d_Monad_Promise($23d => $23e => $23f => Data_Promise_liftIO_HasIO_Promise($242 => Prelude_IO_prim__putStr('Your new configuration is:\n', $242), $23d, $23e, $23f), $24a => $24b => $24c => Data_Promise_x3ex3ex3d_Monad_Promise($24f => $250 => $251 => Data_Promise_liftIO_HasIO_Promise($254 => Prelude_IO_prim__putStr((Data_Config_show_Show_Config($212)+'\n'), $254), $24f, $250, $251), $260 => $261 => $262 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Types_either(() => $267 => Util_renderIO($212, csegen_72(), $267), () => csegen_323(), Config_checkConfigConsistency($212)), $273 => $274 => $275 => Data_Promise_pure_Applicative_Promise($212, $274, $275), $261, $262), $24b, $24c), $239, $23a), $225, $226);
8908
+ return $225 => $226 => Data_Promise_x3ex3ex3d_Monad_Promise($229 => $22a => Data_Promise_map_Functor_Promise($22d => (undefined), $22f => $230 => Config_writeConfig($212, $22f, $230), $229, $22a), $238 => $239 => $23a => Data_Promise_x3ex3ex3d_Monad_Promise($23d => $23e => $23f => Data_Promise_liftIO_HasIO_Promise($242 => Prelude_IO_prim__putStr('Your new configuration is:\n', $242), $23d, $23e, $23f), $24a => $24b => $24c => Data_Promise_x3ex3ex3d_Monad_Promise($24f => $250 => $251 => Data_Promise_liftIO_HasIO_Promise($254 => Prelude_IO_prim__putStr((Data_Config_show_Show_Config($212)+'\n'), $254), $24f, $250, $251), $260 => $261 => $262 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Types_either(() => $267 => Util_renderIO($212, csegen_72(), $267), () => csegen_325(), Config_checkConfigConsistency($212)), $273 => $274 => $275 => Data_Promise_pure_Applicative_Promise($212, $274, $275), $261, $262), $24b, $24c), $239, $23a), $225, $226);
8880
8909
  };
8881
8910
  return Data_Promise_x3ex3ex3d_Monad_Promise($20a => $20b => FFI_GitHub_listOrgMembers(_, org, $20a, $20b), $211, $206, $207);
8882
8911
  };
@@ -8885,7 +8914,7 @@ function Config_createConfig($0, $1, $2, $3, $4, $5) {
8885
8914
  return Data_Promise_x3ex3ex3d_Monad_Promise($1f1 => $1f2 => FFI_GitHub_listTeams(_, org, $1f1, $1f2), $1f8, $1ed, $1ee);
8886
8915
  };
8887
8916
  };
8888
- return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_340(), $1dd, $1d8, $1d9);
8917
+ return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_342(), $1dd, $1d8, $1d9);
8889
8918
  };
8890
8919
  return Data_Promise_x3ex3ex3d_Monad_Promise($1cf => $1d0 => FFI_GitHub_getRepoDefaultBranch(_, org, repo, $1cf, $1d0), $1d7, $1cb, $1cc);
8891
8920
  };
@@ -8899,22 +8928,22 @@ function Config_createConfig($0, $1, $2, $3, $4, $5) {
8899
8928
  };
8900
8929
  return Data_Promise_x3ex3ex3d_Monad_Promise(Util_yesNoPrompt(csegen_72(), 'Would you like harmony to comment when it assigns reviewers?'), $195, $18d, $18e);
8901
8930
  };
8902
- return Data_Promise_x3ex3ex3d_Monad_Promise($179 => $17a => Data_Promise_map_Functor_Promise($17d => Config_n__8973_2257_orIfEmpty($0, $3, $2, $1, {a1: remoteGuess}, Data_String_trim($17d)), csegen_358(), $179, $17a), $18c, $175, $176);
8931
+ return Data_Promise_x3ex3ex3d_Monad_Promise($179 => $17a => Data_Promise_map_Functor_Promise($17d => Config_n__8973_2257_orIfEmpty($0, $3, $2, $1, {a1: remoteGuess}, Data_String_trim($17d)), csegen_360(), $179, $17a), $18c, $175, $176);
8903
8932
  };
8904
8933
  return Data_Promise_x3ex3ex3d_Monad_Promise($159 => $15a => $15b => Data_Promise_liftIO_HasIO_Promise($15e => Prelude_IO_prim__putStr((Prelude_Types_foldMap_Foldable_List(csegen_49(), $166 => $166, {a1: 'What GitHub remote repo would you like to use harmony for', a2: {a1: $14e, a2: {a1: '?', a2: {h: 0}}}})+'\n'), $15e), $159, $15a, $15b), $173, $155, $156);
8905
8934
  };
8906
8935
  };
8907
- return Data_Promise_x3ex3ex3d_Monad_Promise($135 => $136 => Data_Promise_map_Functor_Promise($139 => Config_n__8973_2257_orIfEmpty($0, $3, $2, $1, Config_n__8973_2259_repo($0, $3, $2, $1, defaultOrgAndRepo), Data_String_trim($139)), csegen_358(), $135, $136), $14d, $131, $132);
8936
+ return Data_Promise_x3ex3ex3d_Monad_Promise($135 => $136 => Data_Promise_map_Functor_Promise($139 => Config_n__8973_2257_orIfEmpty($0, $3, $2, $1, Config_n__8973_2259_repo($0, $3, $2, $1, defaultOrgAndRepo), Data_String_trim($139)), csegen_360(), $135, $136), $14d, $131, $132);
8908
8937
  };
8909
8938
  return Data_Promise_x3ex3ex3d_Monad_Promise($115 => $116 => $117 => Data_Promise_liftIO_HasIO_Promise($11a => Prelude_IO_prim__putStr((Prelude_Types_foldMap_Foldable_List(csegen_49(), $122 => $122, {a1: 'What repository would you like to use harmony for', a2: {a1: $108, a2: {a1: '?', a2: {h: 0}}}})+'\n'), $11a), $115, $116, $117), $12f, $111, $112);
8910
8939
  };
8911
8940
  };
8912
- return Data_Promise_x3ex3ex3d_Monad_Promise($ef => $f0 => Data_Promise_map_Functor_Promise($f3 => Config_n__8973_2257_orIfEmpty($0, $3, $2, $1, Config_n__8973_2258_org($0, $3, $2, $1, defaultOrgAndRepo), Data_String_trim($f3)), csegen_358(), $ef, $f0), $107, $eb, $ec);
8941
+ return Data_Promise_x3ex3ex3d_Monad_Promise($ef => $f0 => Data_Promise_map_Functor_Promise($f3 => Config_n__8973_2257_orIfEmpty($0, $3, $2, $1, Config_n__8973_2258_org($0, $3, $2, $1, defaultOrgAndRepo), Data_String_trim($f3)), csegen_360(), $ef, $f0), $107, $eb, $ec);
8913
8942
  };
8914
8943
  return Data_Promise_x3ex3ex3d_Monad_Promise($cf => $d0 => $d1 => Data_Promise_liftIO_HasIO_Promise($d4 => Prelude_IO_prim__putStr((Prelude_Types_foldMap_Foldable_List(csegen_49(), $dc => $dc, {a1: 'What GitHub org would you like to use harmony for', a2: {a1: $c2, a2: {a1: '?', a2: {h: 0}}}})+'\n'), $d4), $cf, $d0, $d1), $e9, $cb, $cc);
8915
8944
  };
8916
8945
  };
8917
- return Data_Promise_x3ex3ex3d_Monad_Promise($a8 => $a9 => Data_Promise_x3cx7cx3e_Alternative_Promise($ac => $ad => Data_Promise_map_Functor_Promise($b0 => Config_parseGitHubURI($b0), $b4 => $b5 => FFI_Git_remoteURI($0, remoteGuess, $b4, $b5), $ac, $ad), () => csegen_360(), $a8, $a9), $c1, $a4, $a5);
8946
+ return Data_Promise_x3ex3ex3d_Monad_Promise($a8 => $a9 => Data_Promise_x3cx7cx3e_Alternative_Promise($ac => $ad => Data_Promise_map_Functor_Promise($b0 => Config_parseGitHubURI($b0), $b4 => $b5 => FFI_Git_remoteURI($0, remoteGuess, $b4, $b5), $ac, $ad), () => csegen_362(), $a8, $a9), $c1, $a4, $a5);
8918
8947
  };
8919
8948
  return Data_Promise_x3ex3ex3d_Monad_Promise($93 => $94 => Data_Promise_map_Functor_Promise($97 => Config_preferOriginRemote($97), $9b => $9c => FFI_Git_listRemotes($0, $9b, $9c), $93, $94), $a3, $8e, $8f);
8920
8949
  }
@@ -8941,7 +8970,7 @@ function Config_checkConfigConsistency($0) {
8941
8970
 
8942
8971
  /* Config.addIgnoredPRs : Config -> List Integer -> Promise Config */
8943
8972
  function Config_addIgnoredPRs($0, $1, $2, $3) {
8944
- return Config_writeConfig({a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5, a6: $0.a6, a7: $0.a7, a8: $0.a8, a9: $0.a9, a10: $0.a10, a11: $0.a11, a12: Data_List_nub(csegen_213(), Prelude_Types_List_tailRecAppend($0.a12, $1)), a13: $0.a13, a14: $0.a14}, $2, $3);
8973
+ return Config_writeConfig({a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5, a6: $0.a6, a7: $0.a7, a8: $0.a8, a9: $0.a9, a10: $0.a10, a11: $0.a11, a12: Data_List_nub(csegen_215(), Prelude_Types_List_tailRecAppend($0.a12, $1)), a13: $0.a13, a14: $0.a14}, $2, $3);
8945
8974
  }
8946
8975
 
8947
8976
  /* Util.with block in yesNoPrompt,yesUnlessNo */
@@ -9179,7 +9208,7 @@ function Commands_case__casex20blockx20inx20graph_2168($0, $1, $2, $3, $4, $5, $
9179
9208
  case 0: return Data_Promise_pure_Applicative_Promise({h: 0}, $d, $e);
9180
9209
  }
9181
9210
  };
9182
- return Data_Promise_x3ex3ex3d_Monad_Promise($c, completedReviews => Util_renderIO($2, csegen_72(), Graph_reviewsGraph(csegen_210(), {a1: ann => $2f => Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($2f), a2: ann => $33 => $34 => Text_PrettyPrint_Prettyprinter_Doc_prettyPrec_Pretty_String($33, $34)}, $7.a2, $7.a1, $5, completedReviews)), $8, $9);
9211
+ return Data_Promise_x3ex3ex3d_Monad_Promise($c, completedReviews => Util_renderIO($2, csegen_72(), Graph_reviewsGraph(csegen_212(), {a1: ann => $2f => Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($2f), a2: ann => $33 => $34 => Text_PrettyPrint_Prettyprinter_Doc_prettyPrec_Pretty_String($33, $34)}, $7.a2, $7.a1, $5, completedReviews)), $8, $9);
9183
9212
  };
9184
9213
  }
9185
9214
 
@@ -9255,8 +9284,8 @@ function Commands_case__assignx2cpartitionedArgs_1663($0, $1, $2, $3, $4, $5) {
9255
9284
  return Commands_case__casex20blockx20inx20assignx2cpartitionedArgs_1686($0, $1, $2, $3, $4, $5.a1, $5.a2, Data_List_partition($12 => BashCompletion_isHashPrefix($12), $5.a2));
9256
9285
  }
9257
9286
 
9258
- /* Commands.9675:2511:recombineIgnoreArgs */
9259
- function Commands_n__9675_2511_recombineIgnoreArgs($0, $1) {
9287
+ /* Commands.9677:2511:recombineIgnoreArgs */
9288
+ function Commands_n__9677_2511_recombineIgnoreArgs($0, $1) {
9260
9289
  switch($1.h) {
9261
9290
  case 0: /* nil */ return {a1: {h: 0}, a2: {h: 0}};
9262
9291
  case undefined: /* cons */ {
@@ -9265,20 +9294,20 @@ function Commands_n__9675_2511_recombineIgnoreArgs($0, $1) {
9265
9294
  switch($1.a2.h) {
9266
9295
  case 0: /* nil */ return {a1: {h: 0}, a2: {a1: '-i', a2: {h: 0}}};
9267
9296
  case undefined: /* cons */ {
9268
- const $b = Commands_n__9675_2509_parseIgnoreOpt($0, $1.a2.a1);
9297
+ const $b = Commands_n__9677_2509_parseIgnoreOpt($0, $1.a2.a1);
9269
9298
  switch($b.h) {
9270
9299
  case undefined: /* just */ {
9271
- const $f = Commands_n__9675_2511_recombineIgnoreArgs($0, $1.a2.a2);
9300
+ const $f = Commands_n__9677_2511_recombineIgnoreArgs($0, $1.a2.a2);
9272
9301
  return {a1: {a1: $b.a1, a2: $f.a1}, a2: $f.a2};
9273
9302
  }
9274
9303
  case 0: /* nothing */ {
9275
- const $17 = Commands_n__9675_2511_recombineIgnoreArgs($0, $1.a2.a2);
9304
+ const $17 = Commands_n__9677_2511_recombineIgnoreArgs($0, $1.a2.a2);
9276
9305
  return {a1: $17.a1, a2: {a1: '-i', a2: {a1: $1.a2.a1, a2: $17.a2}}};
9277
9306
  }
9278
9307
  }
9279
9308
  }
9280
9309
  default: {
9281
- const $21 = Commands_n__9675_2511_recombineIgnoreArgs($0, $1.a2);
9310
+ const $21 = Commands_n__9677_2511_recombineIgnoreArgs($0, $1.a2);
9282
9311
  return {a1: $21.a1, a2: {a1: $1.a1, a2: $21.a2}};
9283
9312
  }
9284
9313
  }
@@ -9287,26 +9316,26 @@ function Commands_n__9675_2511_recombineIgnoreArgs($0, $1) {
9287
9316
  switch($1.a2.h) {
9288
9317
  case 0: /* nil */ return {a1: {h: 0}, a2: {a1: '--ignore', a2: {h: 0}}};
9289
9318
  case undefined: /* cons */ {
9290
- const $2e = Commands_n__9675_2509_parseIgnoreOpt($0, $1.a2.a1);
9319
+ const $2e = Commands_n__9677_2509_parseIgnoreOpt($0, $1.a2.a1);
9291
9320
  switch($2e.h) {
9292
9321
  case undefined: /* just */ {
9293
- const $32 = Commands_n__9675_2511_recombineIgnoreArgs($0, $1.a2.a2);
9322
+ const $32 = Commands_n__9677_2511_recombineIgnoreArgs($0, $1.a2.a2);
9294
9323
  return {a1: {a1: $2e.a1, a2: $32.a1}, a2: $32.a2};
9295
9324
  }
9296
9325
  case 0: /* nothing */ {
9297
- const $3a = Commands_n__9675_2511_recombineIgnoreArgs($0, $1.a2.a2);
9326
+ const $3a = Commands_n__9677_2511_recombineIgnoreArgs($0, $1.a2.a2);
9298
9327
  return {a1: $3a.a1, a2: {a1: '--ignore', a2: {a1: $1.a2.a1, a2: $3a.a2}}};
9299
9328
  }
9300
9329
  }
9301
9330
  }
9302
9331
  default: {
9303
- const $44 = Commands_n__9675_2511_recombineIgnoreArgs($0, $1.a2);
9332
+ const $44 = Commands_n__9677_2511_recombineIgnoreArgs($0, $1.a2);
9304
9333
  return {a1: $44.a1, a2: {a1: $1.a1, a2: $44.a2}};
9305
9334
  }
9306
9335
  }
9307
9336
  }
9308
9337
  default: {
9309
- const $4c = Commands_n__9675_2511_recombineIgnoreArgs($0, $1.a2);
9338
+ const $4c = Commands_n__9677_2511_recombineIgnoreArgs($0, $1.a2);
9310
9339
  return {a1: $4c.a1, a2: {a1: $1.a1, a2: $4c.a2}};
9311
9340
  }
9312
9341
  }
@@ -9314,33 +9343,33 @@ function Commands_n__9675_2511_recombineIgnoreArgs($0, $1) {
9314
9343
  }
9315
9344
  }
9316
9345
 
9317
- /* Commands.9066:1922:putNameLn */
9318
- function Commands_n__9066_1922_putNameLn($0, $1, $2, $3) {
9346
+ /* Commands.9068:1922:putNameLn */
9347
+ function Commands_n__9068_1922_putNameLn($0, $1, $2, $3) {
9319
9348
  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}}}});
9320
9349
  }
9321
9350
 
9322
- /* Commands.8387:1299:putLabels */
9323
- function Commands_n__8387_1299_putLabels($0, $1, $2, $3, $4) {
9324
- return Text_PrettyPrint_Prettyprinter_Doc_hcat(Data_List_intersperse(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(', '), Prelude_Types_List_mapAppend({h: 0}, $f => Commands_n__8387_1298_putLabel($0, $1, $2, $3, $f), $4)));
9351
+ /* Commands.8389:1299:putLabels */
9352
+ function Commands_n__8389_1299_putLabels($0, $1, $2, $3, $4) {
9353
+ return Text_PrettyPrint_Prettyprinter_Doc_hcat(Data_List_intersperse(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(', '), Prelude_Types_List_mapAppend({h: 0}, $f => Commands_n__8389_1298_putLabel($0, $1, $2, $3, $f), $4)));
9325
9354
  }
9326
9355
 
9327
- /* Commands.8387:1298:putLabel */
9328
- function Commands_n__8387_1298_putLabel($0, $1, $2, $3, $4) {
9356
+ /* Commands.8389:1298:putLabel */
9357
+ function Commands_n__8389_1298_putLabel($0, $1, $2, $3, $4) {
9329
9358
  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)));
9330
9359
  }
9331
9360
 
9332
- /* Commands.8742:1651:partitionedArgs */
9333
- function Commands_n__8742_1651_partitionedArgs($0, $1, $2, $3, $4) {
9361
+ /* Commands.8744:1651:partitionedArgs */
9362
+ function Commands_n__8744_1651_partitionedArgs($0, $1, $2, $3, $4) {
9334
9363
  return Commands_case__assignx2cpartitionedArgs_1663($0, $1, $2, $3, $4, Data_List_partition($e => Data_String_isPrefixOf('+', $e), $4));
9335
9364
  }
9336
9365
 
9337
- /* Commands.9516:2373:parseTeamArg */
9338
- function Commands_n__9516_2373_parseTeamArg($0, $1) {
9366
+ /* Commands.9518:2373:parseTeamArg */
9367
+ function Commands_n__9518_2373_parseTeamArg($0, $1) {
9339
9368
  return {a1: {a1: $1}};
9340
9369
  }
9341
9370
 
9342
- /* Commands.9675:2510:parseSkipArg */
9343
- function Commands_n__9675_2510_parseSkipArg($0, $1) {
9371
+ /* Commands.9677:2510:parseSkipArg */
9372
+ function Commands_n__9677_2510_parseSkipArg($0, $1) {
9344
9373
  const $2 = Prelude_Types_fastUnpack($1);
9345
9374
  switch($2.h) {
9346
9375
  case undefined: /* cons */ {
@@ -9353,15 +9382,15 @@ function Commands_n__9675_2510_parseSkipArg($0, $1) {
9353
9382
  }
9354
9383
  }
9355
9384
 
9356
- /* Commands.9675:2509:parseIgnoreOpt */
9357
- function Commands_n__9675_2509_parseIgnoreOpt($0, $1) {
9358
- const $2 = Data_String_split(csegen_324(), $1);
9385
+ /* Commands.9677:2509:parseIgnoreOpt */
9386
+ function Commands_n__9677_2509_parseIgnoreOpt($0, $1) {
9387
+ const $2 = Data_String_split(csegen_326(), $1);
9359
9388
  const $7 = Data_List1_last($2);
9360
9389
  return Prelude_Types_map_Functor_Maybe($c => $c, Data_String_parsePositive(csegen_2(), $7));
9361
9390
  }
9362
9391
 
9363
- /* Commands.9516:2372:parseCompletedFlag */
9364
- function Commands_n__9516_2372_parseCompletedFlag($0, $1) {
9392
+ /* Commands.9518:2372:parseCompletedFlag */
9393
+ function Commands_n__9518_2372_parseCompletedFlag($0, $1) {
9365
9394
  switch($1) {
9366
9395
  case '-c': return {a1: {h: 0}};
9367
9396
  case '--completed': return {a1: {h: 0}};
@@ -9369,8 +9398,8 @@ function Commands_n__9516_2372_parseCompletedFlag($0, $1) {
9369
9398
  }
9370
9399
  }
9371
9400
 
9372
- /* Commands.9675:2508:parseCheckoutFlag */
9373
- function Commands_n__9675_2508_parseCheckoutFlag($0, $1) {
9401
+ /* Commands.9677:2508:parseCheckoutFlag */
9402
+ function Commands_n__9677_2508_parseCheckoutFlag($0, $1) {
9374
9403
  switch($1) {
9375
9404
  case '-c': return {a1: {h: 0 /* Checkout */}};
9376
9405
  case '--checkout': return {a1: {h: 0 /* Checkout */}};
@@ -9378,13 +9407,13 @@ function Commands_n__9675_2508_parseCheckoutFlag($0, $1) {
9378
9407
  }
9379
9408
  }
9380
9409
 
9381
- /* Commands.10005:2847:isNotIgnored */
9382
- function Commands_n__10005_2847_isNotIgnored($0, $1, $2, $3, $4, $5) {
9410
+ /* Commands.10007:2847:isNotIgnored */
9411
+ function Commands_n__10007_2847_isNotIgnored($0, $1, $2, $3, $4, $5) {
9383
9412
  return Data_Maybe_isNothing(Data_List_find($a => Prelude_EqOrd_x3dx3d_Eq_Integer($a, $5.a1), $4.a12));
9384
9413
  }
9385
9414
 
9386
- /* Commands.9066:1921:forkedUser */
9387
- function Commands_n__9066_1921_forkedUser($0, $1, $2, $3) {
9415
+ /* Commands.9068:1921:forkedUser */
9416
+ function Commands_n__9068_1921_forkedUser($0, $1, $2, $3) {
9388
9417
  return FFI_Concurrency_fork(csegen_72(), ('user --json '+$3));
9389
9418
  }
9390
9419
 
@@ -9474,7 +9503,7 @@ function Commands_parseGraphArgs($0) {
9474
9503
  switch($0.a2.a2.h) {
9475
9504
  case undefined: /* cons */ return {h: 0 /* Left */, a1: 'graph accepts at most one team name and the --completed flag.'};
9476
9505
  default: {
9477
- const $6 = Prelude_Types_traverse_Traversable_List(csegen_9(), $b => Commands_x3cx7cx7cx3e(csegen_390(), $10 => Commands_n__9516_2372_parseCompletedFlag($0, $10), $15 => Commands_n__9516_2373_parseTeamArg($0, $15), $b), $0);
9506
+ const $6 = Prelude_Types_traverse_Traversable_List(csegen_9(), $b => Commands_x3cx7cx7cx3e(csegen_392(), $10 => Commands_n__9518_2372_parseCompletedFlag($0, $10), $15 => Commands_n__9518_2373_parseTeamArg($0, $15), $b), $0);
9478
9507
  switch($6.h) {
9479
9508
  case undefined: /* just */ return {h: 1 /* Right */, a1: $6.a1};
9480
9509
  case 0: /* nothing */ return {h: 0 /* Left */, a1: 'The graph command expects the name of a GitHub Team and optionally --completed as arguments.'};
@@ -9483,7 +9512,7 @@ function Commands_parseGraphArgs($0) {
9483
9512
  }
9484
9513
  }
9485
9514
  default: {
9486
- const $1d = Prelude_Types_traverse_Traversable_List(csegen_9(), $22 => Commands_x3cx7cx7cx3e(csegen_390(), $27 => Commands_n__9516_2372_parseCompletedFlag($0, $27), $2c => Commands_n__9516_2373_parseTeamArg($0, $2c), $22), $0);
9515
+ const $1d = Prelude_Types_traverse_Traversable_List(csegen_9(), $22 => Commands_x3cx7cx7cx3e(csegen_392(), $27 => Commands_n__9518_2372_parseCompletedFlag($0, $27), $2c => Commands_n__9518_2373_parseTeamArg($0, $2c), $22), $0);
9487
9516
  switch($1d.h) {
9488
9517
  case undefined: /* just */ return {h: 1 /* Right */, a1: $1d.a1};
9489
9518
  case 0: /* nothing */ return {h: 0 /* Left */, a1: 'The graph command expects the name of a GitHub Team and optionally --completed as arguments.'};
@@ -9492,7 +9521,7 @@ function Commands_parseGraphArgs($0) {
9492
9521
  }
9493
9522
  }
9494
9523
  default: {
9495
- const $34 = Prelude_Types_traverse_Traversable_List(csegen_9(), $39 => Commands_x3cx7cx7cx3e(csegen_390(), $3e => Commands_n__9516_2372_parseCompletedFlag($0, $3e), $43 => Commands_n__9516_2373_parseTeamArg($0, $43), $39), $0);
9524
+ const $34 = Prelude_Types_traverse_Traversable_List(csegen_9(), $39 => Commands_x3cx7cx7cx3e(csegen_392(), $3e => Commands_n__9518_2372_parseCompletedFlag($0, $3e), $43 => Commands_n__9518_2373_parseTeamArg($0, $43), $39), $0);
9496
9525
  switch($34.h) {
9497
9526
  case undefined: /* just */ return {h: 1 /* Right */, a1: $34.a1};
9498
9527
  case 0: /* nothing */ return {h: 0 /* Left */, a1: 'The graph command expects the name of a GitHub Team and optionally --completed as arguments.'};
@@ -9506,9 +9535,9 @@ function Commands_parseContributeArgs($0) {
9506
9535
  switch($0.h) {
9507
9536
  case 0: /* nil */ return {h: 1 /* Right */, a1: {h: 0}};
9508
9537
  default: {
9509
- const $3 = Commands_n__9675_2511_recombineIgnoreArgs($0, $0);
9538
+ const $3 = Commands_n__9677_2511_recombineIgnoreArgs($0, $0);
9510
9539
  const $7 = Prelude_Types_List_mapAppend({h: 0}, $b => ({h: 1 /* Ignore */, a1: $b}), $3.a1);
9511
- const $e = Prelude_Types_traverse_Traversable_List(csegen_9(), $13 => Commands_x3cx7cx7cx3e(csegen_390(), $18 => Commands_n__9675_2510_parseSkipArg($0, $18), $1d => Commands_n__9675_2508_parseCheckoutFlag($0, $1d), $13), $3.a2);
9540
+ const $e = Prelude_Types_traverse_Traversable_List(csegen_9(), $13 => Commands_x3cx7cx7cx3e(csegen_392(), $18 => Commands_n__9677_2510_parseSkipArg($0, $18), $1d => Commands_n__9677_2508_parseCheckoutFlag($0, $1d), $13), $3.a2);
9512
9541
  return Data_Either_maybeToEither(() => Commands_contributeUsageError(), Prelude_Types_map_Functor_Maybe($29 => Prelude_Types_List_tailRecAppend($7, $29), $e));
9513
9542
  }
9514
9543
  }
@@ -9516,14 +9545,14 @@ function Commands_parseContributeArgs($0) {
9516
9545
 
9517
9546
  /* Commands.list : Config => Octokit => String -> Promise () */
9518
9547
  function Commands_list($0, $1, $2, $3, $4) {
9519
- return Data_Promise_x3ex3ex3d_Monad_Promise($7 => $8 => Data_Promise_map_Functor_Promise(csegen_391(), $d => $e => FFI_GitHub_listTeamMembers($1, $0.a2, $2, $d, $e), $7, $8), teamMemberLogins => $19 => $1a => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Basics_flip(csegen_295(), csegen_392(), Prelude_Types_traverse_Traversable_List(csegen_64(), $27 => Commands_n__9066_1921_forkedUser($1, $2, $0, $27), teamMemberLogins)), teamMembersJson => $2f => $30 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Types_traverse_Traversable_List(csegen_64(), $37 => $38 => Data_Promise_either(csegen_51(), Data_User_parseUser($37), $38), teamMembersJson), teamMembers => Util_renderIO($0, csegen_72(), Text_PrettyPrint_Prettyprinter_Doc_vsep(Prelude_Types_List_mapAppend({h: 0}, $4c => Commands_n__9066_1922_putNameLn($1, $2, $0, $4c), teamMembers))), $2f, $30), $19, $1a), $3, $4);
9548
+ return Data_Promise_x3ex3ex3d_Monad_Promise($7 => $8 => Data_Promise_map_Functor_Promise(csegen_393(), $d => $e => FFI_GitHub_listTeamMembers($1, $0.a2, $2, $d, $e), $7, $8), teamMemberLogins => $19 => $1a => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Basics_flip(csegen_297(), csegen_394(), Prelude_Types_traverse_Traversable_List(csegen_64(), $27 => Commands_n__9068_1921_forkedUser($1, $2, $0, $27), teamMemberLogins)), teamMembersJson => $2f => $30 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Types_traverse_Traversable_List(csegen_64(), $37 => $38 => Data_Promise_either(csegen_51(), Data_User_parseUser($37), $38), teamMembersJson), teamMembers => Util_renderIO($0, csegen_72(), Text_PrettyPrint_Prettyprinter_Doc_vsep(Prelude_Types_List_mapAppend({h: 0}, $4c => Commands_n__9068_1922_putNameLn($1, $2, $0, $4c), teamMembers))), $2f, $30), $19, $1a), $3, $4);
9520
9549
  }
9521
9550
 
9522
9551
  /* Commands.label : Config => Git => Octokit => List String -> Promise () */
9523
9552
  function Commands_label($0, $1, $2, $3, $4, $5) {
9524
9553
  const $20 = $21 => {
9525
9554
  const $23 = Prelude_Types_List_mapAppend({h: 0}, $27 => Commands_unslugifyLabel($0.a10, $27), $3);
9526
- return $2d => $2e => Data_Promise_x3ex3ex3d_Monad_Promise($31 => $32 => Label_addLabels($0, $2, $21.a2, $23, $31, $32), allLabels => Util_renderIO($0, csegen_72(), Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Added'), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Commands_n__8387_1299_putLabels($1, $2, $3, $0, $23), Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_unsafeTextWithoutNewLines(' to PR.'), a2: {h: 0}}))), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_foldMap_Foldable_List(csegen_49(), $61 => $61, {a1: 'All labels for PR of ', a2: {a1: $21.a2.a7, a2: {a1: ':', a2: {h: 0}}}})), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Commands_n__8387_1299_putLabels($1, $2, $3, $0, allLabels), Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_unsafeTextWithoutNewLines('.'), a2: {h: 0}}))), a2: {h: 0}}})), $2d, $2e);
9555
+ return $2d => $2e => Data_Promise_x3ex3ex3d_Monad_Promise($31 => $32 => Label_addLabels($0, $2, $21.a2, $23, $31, $32), allLabels => Util_renderIO($0, csegen_72(), Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Added'), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Commands_n__8389_1299_putLabels($1, $2, $3, $0, $23), Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_unsafeTextWithoutNewLines(' to PR.'), a2: {h: 0}}))), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_foldMap_Foldable_List(csegen_49(), $61 => $61, {a1: 'All labels for PR of ', a2: {a1: $21.a2.a7, a2: {a1: ':', a2: {h: 0}}}})), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Commands_n__8389_1299_putLabels($1, $2, $3, $0, allLabels), Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_unsafeTextWithoutNewLines('.'), a2: {h: 0}}))), a2: {h: 0}}})), $2d, $2e);
9527
9556
  };
9528
9557
  return Data_Promise_x3ex3ex3d_Monad_Promise($8 => $9 => Data_Promise_x3ex3ex3d_Monad_Promise($c => $d => FFI_Git_currentBranch($1, $c, $d), $13 => $14 => $15 => PullRequest_identifyOrCreatePR($0, $1, $2, 0, $13, $14, $15), $8, $9), $20, $4, $5);
9529
9558
  }
@@ -9586,14 +9615,14 @@ function Commands_contribute($0, $1, $2, $3, $4, $5) {
9586
9615
  }
9587
9616
  };
9588
9617
  const $53 = Prelude_Types_List_filterAppend({h: 0}, $56, $13);
9589
- const $5d = Prelude_Types_List_filterAppend({h: 0}, $61 => Commands_n__10005_2847_isNotIgnored($1, $2, $3, $0, configx27, $61), $53);
9618
+ const $5d = Prelude_Types_List_filterAppend({h: 0}, $61 => Commands_n__10007_2847_isNotIgnored($1, $2, $3, $0, configx27, $61), $53);
9590
9619
  const $6a = Data_List_partition($6d => Data_PullRequest_isRequestedReviewer(myLogin, $6d), $5d);
9591
- return Commands_case__contribute_3017($1, $2, $3, $0, openPrs, $13, myLogin, $2a, configx27, $40, $4d, $53, $5d, $6a, Prelude_Interfaces_mapHom({a1: d => b => c => a => $85 => $86 => $87 => ({a1: $85($87.a1), a2: $86($87.a2)}), a2: b => c => a => $90 => $91 => ({a1: $90($91.a1), a2: $91.a2}), a3: a => d => b => $98 => $99 => ({a1: $99.a1, a2: $98($99.a2)})}, $a0 => Data_List_sortBy(csegen_404(), $a0), $6a));
9620
+ return Commands_case__contribute_3017($1, $2, $3, $0, openPrs, $13, myLogin, $2a, configx27, $40, $4d, $53, $5d, $6a, Prelude_Interfaces_mapHom({a1: d => b => c => a => $85 => $86 => $87 => ({a1: $85($87.a1), a2: $86($87.a2)}), a2: b => c => a => $90 => $91 => ({a1: $90($91.a1), a2: $91.a2}), a3: a => d => b => $98 => $99 => ({a1: $99.a1, a2: $98($99.a2)})}, $a0 => Data_List_sortBy(csegen_406(), $a0), $6a));
9592
9621
  };
9593
9622
  return Data_Promise_x3ex3ex3d_Monad_Promise($30, $3f, $2d, $2e);
9594
9623
  };
9595
9624
  };
9596
- return Data_Promise_x3ex3ex3d_Monad_Promise($1f => $20 => Data_Promise_map_Functor_Promise(csegen_400(), FFI_GitHub_getSelf($2), $1f, $20), $29, $1b, $1c);
9625
+ return Data_Promise_x3ex3ex3d_Monad_Promise($1f => $20 => Data_Promise_map_Functor_Promise(csegen_402(), FFI_GitHub_getSelf($2), $1f, $20), $29, $1b, $1c);
9597
9626
  };
9598
9627
  };
9599
9628
  return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listPullRequests($2, $0.a2, $0.a3, {a1: 0}, 100n, 0n), $12, $4, $5);
@@ -9613,7 +9642,7 @@ function Commands_branch($0, $1, $2, $3) {
9613
9642
  /* Commands.assign : Config => Git => Octokit => List String -> {default False _ : Bool} ->
9614
9643
  Promise () */
9615
9644
  function Commands_assign($0, $1, $2, $3, $4) {
9616
- return Commands_case__assign_1766($0, $1, $2, $4, $3, Commands_n__8742_1651_partitionedArgs($0, $1, $2, $4, $3));
9645
+ return Commands_case__assign_1766($0, $1, $2, $4, $3, Commands_n__8744_1651_partitionedArgs($0, $1, $2, $4, $3));
9617
9646
  }
9618
9647
 
9619
9648
  /* Commands.(<||>) : Alternative t => (a -> t b) -> (a -> t b) -> a -> t b */
@@ -9623,7 +9652,7 @@ function Commands_x3cx7cx7cx3e($0, $1, $2, $3) {
9623
9652
 
9624
9653
  /* User.Reflect.case block in case block in reflectOnSelf */
9625
9654
  function User_Reflect_case__casex20blockx20inx20reflectOnSelf_1862($0, $1, $2, $3, $4, $5, $6, $7, $8, $9) {
9626
- const $b = Prelude_Interfaces_mapHom({a1: d => b => c => a => $f => $10 => $11 => ({a1: $f($11.a1), a2: $10($11.a2)}), a2: b => c => a => $1a => $1b => ({a1: $1a($1b.a1), a2: $1b.a2}), a3: a => d => b => $22 => $23 => ({a1: $23.a1, a2: $22($23.a2)})}, $2a => Data_List_headx27(Data_List_sort({a1: {a1: $31 => $32 => Data_Date_x3dx3d_Eq_Date($31, $32), a2: $37 => $38 => Data_Date_x2fx3d_Eq_Date($37, $38)}, a2: $3d => $3e => Data_Date_compare_Ord_Date($3d, $3e), a3: $43 => $44 => Data_Date_x3c_Ord_Date($43, $44), a4: $49 => $4a => Data_Date_x3e_Ord_Date($49, $4a), a5: $4f => $50 => Data_Date_x3cx3d_Ord_Date($4f, $50), a6: $55 => $56 => Data_Date_x3ex3d_Ord_Date($55, $56), a7: $5b => $5c => Data_Date_max_Ord_Date($5b, $5c), a8: $61 => $62 => Data_Date_min_Ord_Date($61, $62)}, Prelude_Types_List_mapAppend({h: 0}, csegen_417(), $2a))), {a1: $7, a2: $9.a1});
9655
+ const $b = Prelude_Interfaces_mapHom({a1: d => b => c => a => $f => $10 => $11 => ({a1: $f($11.a1), a2: $10($11.a2)}), a2: b => c => a => $1a => $1b => ({a1: $1a($1b.a1), a2: $1b.a2}), a3: a => d => b => $22 => $23 => ({a1: $23.a1, a2: $22($23.a2)})}, $2a => Data_List_headx27(Data_List_sort({a1: {a1: $31 => $32 => Data_Date_x3dx3d_Eq_Date($31, $32), a2: $37 => $38 => Data_Date_x2fx3d_Eq_Date($37, $38)}, a2: $3d => $3e => Data_Date_compare_Ord_Date($3d, $3e), a3: $43 => $44 => Data_Date_x3c_Ord_Date($43, $44), a4: $49 => $4a => Data_Date_x3e_Ord_Date($49, $4a), a5: $4f => $50 => Data_Date_x3cx3d_Ord_Date($4f, $50), a6: $55 => $56 => Data_Date_x3ex3d_Ord_Date($55, $56), a7: $5b => $5c => Data_Date_max_Ord_Date($5b, $5c), a8: $61 => $62 => Data_Date_min_Ord_Date($61, $62)}, Prelude_Types_List_mapAppend({h: 0}, csegen_419(), $2a))), {a1: $7, a2: $9.a1});
9627
9656
  return Util_renderIO($0, csegen_72(), User_Reflect_print(Prelude_Types_String_length(User_Reflect_intro()), Prelude_Types_List_lengthTR($4), Prelude_Types_List_lengthTR($9.a1), Prelude_Types_List_lengthTR($9.a2), Prelude_Types_List_lengthTR($8), Prelude_Types_List_lengthTR($7), $5, $b.a1, $b.a2));
9628
9657
  }
9629
9658
 
@@ -9706,21 +9735,21 @@ function User_Reflect_reflectOnSelf($0, $1, $2, $3) {
9706
9735
  const $c = prs => $d => $e => {
9707
9736
  const $1b = myLogin => $1c => $1d => {
9708
9737
  const $39 = reviews => {
9709
- const $3a = Prelude_Types_map_Functor_Maybe(csegen_420(), Data_List_headx27(Data_List_sortBy($43 => $44 => Prelude_Basics_on(csegen_402(), csegen_420(), $43, $44), reviews)));
9738
+ const $3a = Prelude_Types_map_Functor_Maybe(csegen_422(), Data_List_headx27(Data_List_sortBy($43 => $44 => Prelude_Basics_on(csegen_404(), csegen_422(), $43, $44), reviews)));
9710
9739
  const $4d = PullRequest_tuple(prs);
9711
9740
  const $50 = Prelude_Interfaces_mapHom({a1: d => b => c => a => $54 => $55 => $56 => ({a1: $54($56.a1), a2: $55($56.a2)}), a2: b => c => a => $5f => $60 => ({a1: $5f($60.a1), a2: $60.a2}), a3: a => d => b => $67 => $68 => ({a1: $68.a1, a2: $67($68.a2)})}, $6f => Prelude_Types_List_filterAppend({h: 0}, $73 => Prelude_EqOrd_x3dx3d_Eq_String($73.a4, myLogin), $6f), $4d);
9712
- return User_Reflect_case__casex20blockx20inx20reflectOnSelf_1862($0, $1, prs, myLogin, reviews, $3a, $4d, $50.a1, $50.a2, Prelude_Interfaces_mapHom({a1: d => b => c => a => $88 => $89 => $8a => ({a1: $88($8a.a1), a2: $89($8a.a2)}), a2: b => c => a => $93 => $94 => ({a1: $93($94.a1), a2: $94.a2}), a3: a => d => b => $9b => $9c => ({a1: $9c.a1, a2: $9b($9c.a2)})}, $a3 => Prelude_Types_List_filterAppend({h: 0}, $a7 => Prelude_Types_foldMap_Foldable_List(csegen_92(), $ac => Prelude_EqOrd_x3dx3d_Eq_String($ac, myLogin), $a7.a6), $a3), $4d));
9741
+ return User_Reflect_case__casex20blockx20inx20reflectOnSelf_1862($0, $1, prs, myLogin, reviews, $3a, $4d, $50.a1, $50.a2, Prelude_Interfaces_mapHom({a1: d => b => c => a => $88 => $89 => $8a => ({a1: $88($8a.a1), a2: $89($8a.a2)}), a2: b => c => a => $93 => $94 => ({a1: $93($94.a1), a2: $94.a2}), a3: a => d => b => $9b => $9c => ({a1: $9c.a1, a2: $9b($9c.a2)})}, $a3 => Prelude_Types_List_filterAppend({h: 0}, $a7 => Prelude_Types_foldMap_Foldable_List(csegen_94(), $ac => Prelude_EqOrd_x3dx3d_Eq_String($ac, myLogin), $a7.a6), $a3), $4d));
9713
9742
  };
9714
- return Data_Promise_x3ex3ex3d_Monad_Promise(PullRequest_reviewsByUser($0, $1, myLogin, Data_List_take(User_Reflect_reviewDetailsCount(), Prelude_Types_List_reverse(Data_List_sortBy($2d => $2e => Prelude_Basics_on(csegen_402(), csegen_417(), $2d, $2e), PullRequest_combined(prs))))), $39, $1c, $1d);
9743
+ return Data_Promise_x3ex3ex3d_Monad_Promise(PullRequest_reviewsByUser($0, $1, myLogin, Data_List_take(User_Reflect_reviewDetailsCount(), Prelude_Types_List_reverse(Data_List_sortBy($2d => $2e => Prelude_Basics_on(csegen_404(), csegen_419(), $2d, $2e), PullRequest_combined(prs))))), $39, $1c, $1d);
9715
9744
  };
9716
- return Data_Promise_x3ex3ex3d_Monad_Promise($11 => $12 => Data_Promise_map_Functor_Promise(csegen_400(), FFI_GitHub_getSelf($1), $11, $12), $1b, $d, $e);
9745
+ return Data_Promise_x3ex3ex3d_Monad_Promise($11 => $12 => Data_Promise_map_Functor_Promise(csegen_402(), FFI_GitHub_getSelf($1), $11, $12), $1b, $d, $e);
9717
9746
  };
9718
9747
  return Data_Promise_x3ex3ex3d_Monad_Promise(PullRequest_listPartitionedPRs($0, $1, 4n, User_Reflect_prCount()), $c, $2, $3);
9719
9748
  }
9720
9749
 
9721
9750
  /* User.Me.printInfoOnSelf : Config => Octokit => Git => Promise () */
9722
9751
  function User_Me_printInfoOnSelf($0, $1, $2, $3, $4) {
9723
- return Data_Promise_x3ex3ex3d_Monad_Promise($7 => $8 => Data_Promise_map_Functor_Promise($b => User_Me_n__7256_2135_handleUnsetEmail($0, $1, $2, $b), $12 => $13 => FFI_Git_userEmail($2, $12, $13), $7, $8), gitEmail => $1b => $1c => Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_getSelf($1), githubUser => $22 => $23 => Data_Promise_x3ex3ex3d_Monad_Promise($26 => $27 => Data_Promise_map_Functor_Promise(csegen_391(), $2c => $2d => FFI_GitHub_listMyTeams($1, $2c, $2d), $26, $27), githubTeams => Util_renderIO($0, csegen_72(), User_Me_print(gitEmail, githubUser, githubTeams)), $22, $23), $1b, $1c), $3, $4);
9752
+ return Data_Promise_x3ex3ex3d_Monad_Promise($7 => $8 => Data_Promise_map_Functor_Promise($b => User_Me_n__7256_2135_handleUnsetEmail($0, $1, $2, $b), $12 => $13 => FFI_Git_userEmail($2, $12, $13), $7, $8), gitEmail => $1b => $1c => Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_getSelf($1), githubUser => $22 => $23 => Data_Promise_x3ex3ex3d_Monad_Promise($26 => $27 => Data_Promise_map_Functor_Promise(csegen_393(), $2c => $2d => FFI_GitHub_listMyTeams($1, $2c, $2d), $26, $27), githubTeams => Util_renderIO($0, csegen_72(), User_Me_print(gitEmail, githubUser, githubTeams)), $22, $23), $1b, $1c), $3, $4);
9724
9753
  }
9725
9754
 
9726
9755
  /* User.Reflect.print : Nat -> Nat -> Nat -> Nat -> Nat -> Nat -> Maybe Date -> Maybe Date -> Maybe Date -> Doc AnsiStyle */
@@ -9757,8 +9786,8 @@ function User_Reflect_header($0) {
9757
9786
  function User_Reflect_graph($0, $1, $2, $3, $4, $5) {
9758
9787
  const $6 = ($2+$3);
9759
9788
  const $9 = ($5+$4);
9760
- const $c = Prelude_Types_foldr_Foldable_List(csegen_199(), Prelude_Types_String_length(User_Reflect_leftTitle()), {a1: ($6+$1), a2: {a1: $9, a2: {h: 0}}});
9761
- const $1b = Prelude_Types_foldr_Foldable_List(csegen_199(), Prelude_Types_String_length(User_Reflect_rightTitle()), {a1: $6, a2: {a1: $9, a2: {h: 0}}});
9789
+ const $c = Prelude_Types_foldr_Foldable_List(csegen_201(), Prelude_Types_String_length(User_Reflect_leftTitle()), {a1: ($6+$1), a2: {a1: $9, a2: {h: 0}}});
9790
+ const $1b = Prelude_Types_foldr_Foldable_List(csegen_201(), Prelude_Types_String_length(User_Reflect_rightTitle()), {a1: $6, a2: {a1: $9, a2: {h: 0}}});
9762
9791
  const $28 = (($c+$1b)+3n);
9763
9792
  const $2d = ((Number($0)/2.0)-(Number($28)/2.0));
9764
9793
  const $36 = (Prelude_Types_prim__integerToNat(BigInt(Math.trunc($2d)))+Prelude_Types_prim__integerToNat(($c-Prelude_Types_String_length(User_Reflect_leftTitle()))));
@@ -9768,7 +9797,7 @@ function User_Reflect_graph($0, $1, $2, $3, $4, $5) {
9768
9797
 
9769
9798
  /* User.Reflect.details : Nat -> Nat -> Nat -> Nat -> Nat -> Nat -> Maybe Date -> Maybe Date -> Maybe Date -> Doc AnsiStyle */
9770
9799
  function User_Reflect_details($0, $1, $2, $3, $4, $5, $6, $7, $8) {
9771
- return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(User_Reflect_intro()), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_underline(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Requested Reviews:')), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_vsep(Data_List_catMaybes({a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('unreviewed:')}, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_vsep(Data_List_catMaybes({a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('open:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(3), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Nat($2)), a2: {h: 0}}})}, a2: {a1: Prelude_Types_map_Functor_Maybe(csegen_426(), $8), a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('closed:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(1), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Nat($3)), a2: {h: 0}}})}, a2: {h: 0}}}})))}, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('reviews*:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(2), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Nat($1)), a2: {h: 0}}})}, a2: {a1: Prelude_Types_map_Functor_Maybe(date => Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('most recent:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Data_Date_show_Show_Date(date)), a2: {h: 0}}})), $6), a2: {h: 0}}}}}))), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_underline(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Authored Pulls:')), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_vsep(Data_List_catMaybes({a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('open:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(3), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Nat($5)), a2: {h: 0}}})}, a2: {a1: Prelude_Types_map_Functor_Maybe(csegen_426(), $7), a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('closed:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(2), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Nat($4)), a2: {h: 0}}})}, a2: {h: 0}}}}))), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_foldMap_Foldable_List(csegen_49(), $cf => $cf, {a1: '*review count (not PR count) of most recent ', a2: {a1: Data_Fin_show_Show_x28Finx20x24nx29(User_Reflect_reviewDetailsCount()), a2: {a1: ' PRs.', a2: {h: 0}}}}))), a2: {h: 0}}}}}}}}}});
9800
+ return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(User_Reflect_intro()), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_underline(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Requested Reviews:')), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_vsep(Data_List_catMaybes({a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('unreviewed:')}, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_vsep(Data_List_catMaybes({a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('open:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(3), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Nat($2)), a2: {h: 0}}})}, a2: {a1: Prelude_Types_map_Functor_Maybe(csegen_428(), $8), a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('closed:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(1), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Nat($3)), a2: {h: 0}}})}, a2: {h: 0}}}})))}, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('reviews*:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(2), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Nat($1)), a2: {h: 0}}})}, a2: {a1: Prelude_Types_map_Functor_Maybe(date => Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('most recent:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Data_Date_show_Show_Date(date)), a2: {h: 0}}})), $6), a2: {h: 0}}}}}))), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_underline(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Authored Pulls:')), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_vsep(Data_List_catMaybes({a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('open:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(3), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Nat($5)), a2: {h: 0}}})}, a2: {a1: Prelude_Types_map_Functor_Maybe(csegen_428(), $7), a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('closed:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(2), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Nat($4)), a2: {h: 0}}})}, a2: {h: 0}}}}))), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_foldMap_Foldable_List(csegen_49(), $cf => $cf, {a1: '*review count (not PR count) of most recent ', a2: {a1: Data_Fin_show_Show_x28Finx20x24nx29(User_Reflect_reviewDetailsCount()), a2: {a1: ' PRs.', a2: {h: 0}}}}))), a2: {h: 0}}}}}}}}}});
9772
9801
  }
9773
9802
 
9774
9803
  /* User.Reflect.chart : Nat -> Nat -> Nat -> Nat -> Nat -> Nat -> Nat -> Doc AnsiStyle */
@@ -9906,7 +9935,7 @@ function PullRequest_n__10180_2627_editorDescription($0, $1, $2, $3, $4, $5, $6,
9906
9935
 
9907
9936
  /* PullRequest.9490:1962:csv */
9908
9937
  function PullRequest_n__9490_1962_csv($0, $1, $2, $3, $4, $5, $6) {
9909
- return Util_renderString($5, Text_PrettyPrint_Prettyprinter_Doc_encloseSep(Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(', '), Prelude_Types_List_mapAppend({h: 0}, csegen_294(), $6)));
9938
+ return Util_renderString($5, Text_PrettyPrint_Prettyprinter_Doc_encloseSep(Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(', '), Prelude_Types_List_mapAppend({h: 0}, csegen_296(), $6)));
9910
9939
  }
9911
9940
 
9912
9941
  /* PullRequest.10180:2626:createPR */
@@ -9955,7 +9984,7 @@ function PullRequest_n__10180_2626_createPR($0, $1, $2, $3, $4, $5, $6) {
9955
9984
  };
9956
9985
  return Data_Promise_x3ex3ex3d_Monad_Promise($16f => $170 => Util_relativeToRoot($0, '.github/PULL_REQUEST_TEMPLATE.md', $16f, $170), $176, $16b, $16c);
9957
9986
  };
9958
- return Data_Promise_x3ex3ex3d_Monad_Promise($15d => $15e => Data_Promise_map_Functor_Promise($161 => ($13b+Data_String_trim($161)), csegen_358(), $15d, $15e), $16a, $159, $15a);
9987
+ return Data_Promise_x3ex3ex3d_Monad_Promise($15d => $15e => Data_Promise_map_Functor_Promise($161 => ($13b+Data_String_trim($161)), csegen_360(), $15d, $15e), $16a, $159, $15a);
9959
9988
  };
9960
9989
  return Data_Promise_x3ex3ex3d_Monad_Promise($14b => $14c => $14d => Data_Promise_liftIO_HasIO_Promise($150 => Prelude_IO_prim__putStr($13b, $150), $14b, $14c, $14d), $157, $147, $148);
9961
9990
  };
@@ -9964,7 +9993,7 @@ function PullRequest_n__10180_2626_createPR($0, $1, $2, $3, $4, $5, $6) {
9964
9993
  return Data_Promise_x3ex3ex3d_Monad_Promise($12c => $12d => $12e => Data_Promise_liftIO_HasIO_Promise($131 => Prelude_IO_prim__putStr('What would you like the title to be?\n', $131), $12c, $12d, $12e), $138, $128, $129);
9965
9994
  };
9966
9995
  };
9967
- return Data_Promise_x3ex3ex3d_Monad_Promise($10f => $110 => Data_Promise_map_Functor_Promise($113 => Data_String_trim($113), csegen_358(), $10f, $110), $11a, $10b, $10c);
9996
+ return Data_Promise_x3ex3ex3d_Monad_Promise($10f => $110 => Data_Promise_map_Functor_Promise($113 => Data_String_trim($113), csegen_360(), $10f, $110), $11a, $10b, $10c);
9968
9997
  };
9969
9998
  return Data_Promise_x3ex3ex3d_Monad_Promise($ee => $ef => $f0 => Data_Promise_liftIO_HasIO_Promise($f3 => Prelude_IO_prim__putStr((Prelude_Types_foldMap_Foldable_List(csegen_49(), $fb => $fb, {a1: 'What branch are you merging into (ENTER for default: ', a2: {a1: $4.a5, a2: {a1: ')?', a2: {h: 0}}}})+'\n'), $f3), $ee, $ef, $f0), $109, $ea, $eb);
9970
9999
  };
@@ -9989,7 +10018,7 @@ function PullRequest_n__10180_2626_createPR($0, $1, $2, $3, $4, $5, $6) {
9989
10018
  function PullRequest_n__10180_2625_continueGivenUncommittedChanges($0, $1, $2, $3, $4, $5, $6) {
9990
10019
  const $f = $10 => $11 => $12 => {
9991
10020
  switch($10.h) {
9992
- case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_Promise($16 => $17 => $18 => Data_Promise_liftIO_HasIO_Promise($1b => Prelude_IO_prim__putStr('The following files have uncommitted changes:\n', $1b), $16, $17, $18), $23 => $24 => $25 => Data_Promise_x3ex3ex3d_Monad_Promise($28 => $29 => $2a => Data_Promise_liftIO_HasIO_Promise($2d => Prelude_IO_prim__putStr(($10.a1+'\n'), $2d), $28, $29, $2a), csegen_455(), $24, $25), $11, $12);
10021
+ case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_Promise($16 => $17 => $18 => Data_Promise_liftIO_HasIO_Promise($1b => Prelude_IO_prim__putStr('The following files have uncommitted changes:\n', $1b), $16, $17, $18), $23 => $24 => $25 => Data_Promise_x3ex3ex3d_Monad_Promise($28 => $29 => $2a => Data_Promise_liftIO_HasIO_Promise($2d => Prelude_IO_prim__putStr(($10.a1+'\n'), $2d), $28, $29, $2a), csegen_457(), $24, $25), $11, $12);
9993
10022
  case 0: /* nothing */ return Data_Promise_pure_Applicative_Promise(1, $11, $12);
9994
10023
  }
9995
10024
  };
@@ -10000,7 +10029,7 @@ function PullRequest_n__10180_2625_continueGivenUncommittedChanges($0, $1, $2, $
10000
10029
  function PullRequest_n__10180_2624_continueGivenStagedChanges($0, $1, $2, $3, $4, $5, $6) {
10001
10030
  const $f = $10 => $11 => $12 => {
10002
10031
  switch($10.h) {
10003
- case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_Promise($16 => $17 => $18 => Data_Promise_liftIO_HasIO_Promise($1b => Prelude_IO_prim__putStr('The following files have staged but uncommitted changes:\n', $1b), $16, $17, $18), $23 => $24 => $25 => Data_Promise_x3ex3ex3d_Monad_Promise($28 => $29 => $2a => Data_Promise_liftIO_HasIO_Promise($2d => Prelude_IO_prim__putStr(($10.a1+'\n'), $2d), $28, $29, $2a), csegen_455(), $24, $25), $11, $12);
10032
+ case undefined: /* just */ return Data_Promise_x3ex3ex3d_Monad_Promise($16 => $17 => $18 => Data_Promise_liftIO_HasIO_Promise($1b => Prelude_IO_prim__putStr('The following files have staged but uncommitted changes:\n', $1b), $16, $17, $18), $23 => $24 => $25 => Data_Promise_x3ex3ex3d_Monad_Promise($28 => $29 => $2a => Data_Promise_liftIO_HasIO_Promise($2d => Prelude_IO_prim__putStr(($10.a1+'\n'), $2d), $28, $29, $2a), csegen_457(), $24, $25), $11, $12);
10004
10033
  case 0: /* nothing */ return Data_Promise_pure_Applicative_Promise(1, $11, $12);
10005
10034
  }
10006
10035
  };
@@ -10044,7 +10073,7 @@ function PullRequest_reviewsForPrs($0, $1, $2, $3, $4) {
10044
10073
  };
10045
10074
  return Data_Promise_x3ex3ex3d_Monad_Promise($1c, reviews => $43 => $44 => Data_Promise_pure_Applicative_Promise(Prelude_Types_join_Monad_List(reviews), $43, $44), $19, $1a);
10046
10075
  };
10047
- return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Basics_flip(csegen_295(), csegen_392(), Prelude_Types_traverse_Traversable_List(csegen_64(), $11 => PullRequest_n__9263_1704_forkedReviews($0, $1, $2, $11), $2)), $18, $3, $4);
10076
+ return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Basics_flip(csegen_297(), csegen_394(), Prelude_Types_traverse_Traversable_List(csegen_64(), $11 => PullRequest_n__9263_1704_forkedReviews($0, $1, $2, $11), $2)), $18, $3, $4);
10048
10077
  }
10049
10078
 
10050
10079
  /* PullRequest.reviewsByUser : Config => Octokit => String -> List PullRequest -> Promise (List Review) */
@@ -10074,9 +10103,9 @@ function PullRequest_reviewsByUser($0, $1, $2, $3) {
10074
10103
  List PullRequest -> Promise (SortedMap String (List Review)) */
10075
10104
  function PullRequest_reviewsByEachUser($0, $1, $2, $3, $4) {
10076
10105
  const $f = reviews => {
10077
- const $10 = Data_List_groupAllWith(csegen_210(), $15 => $15.a2, reviews);
10106
+ const $10 = Data_List_groupAllWith(csegen_212(), $15 => $15.a2, reviews);
10078
10107
  const $18 = Prelude_Types_List_mapAppend({h: 0}, rs => ({a1: rs.a1.a2, a2: Data_List1_forget(rs)}), $10);
10079
- return $23 => $24 => Data_Promise_pure_Applicative_Promise(Data_SortedMap_fromList(csegen_210(), $18), $23, $24);
10108
+ return $23 => $24 => Data_Promise_pure_Applicative_Promise(Data_SortedMap_fromList(csegen_212(), $18), $23, $24);
10080
10109
  };
10081
10110
  return Data_Promise_x3ex3ex3d_Monad_Promise($7 => $8 => PullRequest_reviewsForPrs($0, $1, $2, $7, $8), $f, $3, $4);
10082
10111
  }
@@ -10090,12 +10119,12 @@ function PullRequest_requestReviewers($0, $1, $2, $3, $4, $5, $6, $7) {
10090
10119
  let $37;
10091
10120
  switch($0.a7) {
10092
10121
  case 1: {
10093
- const $3a = Reviewer_chooseReviewers(csegen_210(), $14.a2, $14.a1, teamMembers, {h: 0}, $2.a4);
10122
+ const $3a = Reviewer_chooseReviewers(csegen_212(), $14.a2, $14.a1, teamMembers, {h: 0}, $2.a4);
10094
10123
  $37 = Reviewer_randomReviewer(csegen_72(), $3a);
10095
10124
  break;
10096
10125
  }
10097
10126
  case 0: {
10098
- $37 = csegen_360();
10127
+ $37 = csegen_362();
10099
10128
  break;
10100
10129
  }
10101
10130
  }
@@ -10214,12 +10243,12 @@ function PullRequest_listx27($0, $1, $2, $3) {
10214
10243
  }
10215
10244
  };
10216
10245
  const $4d = {a1: $4e, a2: a => $56 => ({h: 1 /* Right */, a1: $56}), a3: $58};
10217
- const $4b = Prelude_Types_traverse_Traversable_List($4d, csegen_315(), prJsons);
10246
+ const $4b = Prelude_Types_traverse_Traversable_List($4d, csegen_317(), prJsons);
10218
10247
  return Data_Promise_either(csegen_51(), $4b, $47);
10219
10248
  };
10220
10249
  return Data_Promise_x3ex3ex3d_Monad_Promise($46, pulls => $67 => $68 => Data_Promise_pure_Applicative_Promise(Prelude_Types_join_Monad_List(pulls), $67, $68), $43, $44);
10221
10250
  };
10222
- return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Basics_flip(csegen_295(), $a => $b => $c => FFI_Concurrency_promiseAll({a1: acc => elem => func => init => input => Data_Pagination_foldr_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29(func, init, input), a2: elem => acc => func => init => input => Data_Pagination_foldl_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29(func, init, input), a3: elem => $1a => Data_Pagination_null_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($1a), a4: elem => acc => m => $1e => funcM => init => input => Data_Pagination_foldlM_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($1e, funcM, init, input), a5: elem => $25 => Data_Pagination_toList_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($25), a6: a => m => $29 => f => $2a => Data_Pagination_foldMap_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($29, f, $2a)}, $a, $b, $c), Data_Pagination_traversex27(csegen_64(), $37 => $38 => $39 => $3a => PullRequest_forkedPRs($0, $37, $38, $39, $3a), $1)), $42, $2, $3);
10251
+ return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Basics_flip(csegen_297(), $a => $b => $c => FFI_Concurrency_promiseAll({a1: acc => elem => func => init => input => Data_Pagination_foldr_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29(func, init, input), a2: elem => acc => func => init => input => Data_Pagination_foldl_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29(func, init, input), a3: elem => $1a => Data_Pagination_null_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($1a), a4: elem => acc => m => $1e => funcM => init => input => Data_Pagination_foldlM_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($1e, funcM, init, input), a5: elem => $25 => Data_Pagination_toList_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($25), a6: a => m => $29 => f => $2a => Data_Pagination_foldMap_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($29, f, $2a)}, $a, $b, $c), Data_Pagination_traversex27(csegen_64(), $37 => $38 => $39 => $3a => PullRequest_forkedPRs($0, $37, $38, $39, $3a), $1)), $42, $2, $3);
10223
10252
  }
10224
10253
 
10225
10254
  /* PullRequest.identifyOrCreatePR : Config => Git => Octokit => {default False _ : Bool} ->
@@ -10478,7 +10507,7 @@ function Data_SortedMap_insert($0, $1, $2) {
10478
10507
 
10479
10508
  /* Data.SortedMap.fromList : Ord k => List (k, v) -> SortedMap k v */
10480
10509
  function Data_SortedMap_fromList($0, $1) {
10481
- return Prelude_Basics_flip($4 => $5 => Data_SortedMap_insertFrom(csegen_142(), $4, $5), Data_SortedMap_empty($0), $1);
10510
+ return Prelude_Basics_flip($4 => $5 => Data_SortedMap_insertFrom(csegen_144(), $4, $5), Data_SortedMap_empty($0), $1);
10482
10511
  }
10483
10512
 
10484
10513
  /* Data.SortedMap.empty : Ord k => SortedMap k v */
@@ -10656,7 +10685,7 @@ function Data_Pagination_with__lemma_7043($0, $1, $2, $3, $4) {
10656
10685
 
10657
10686
  /* Data.Pagination.toList */
10658
10687
  function Data_Pagination_toList_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($0) {
10659
- return Data_Pagination_foldr_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29(csegen_89(), {h: 0}, $0);
10688
+ return Data_Pagination_foldr_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29(csegen_91(), {h: 0}, $0);
10660
10689
  }
10661
10690
 
10662
10691
  /* Data.Pagination.null */
@@ -10674,7 +10703,7 @@ function Data_Pagination_foldr_Foldable_x28x28x28Paginationx20x24itemsx29x20x24p
10674
10703
 
10675
10704
  /* Data.Pagination.foldl */
10676
10705
  function Data_Pagination_foldl_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($0, $1, $2) {
10677
- return Data_Pagination_foldr_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($6 => $7 => Prelude_Basics_flip(csegen_90(), $c => Prelude_Basics_flip($0, $6, $c), $7), $13 => $13, $2)($1);
10706
+ return Data_Pagination_foldr_Foldable_x28x28x28Paginationx20x24itemsx29x20x24perPagex29x20x24pagex29($6 => $7 => Prelude_Basics_flip(csegen_92(), $c => Prelude_Basics_flip($0, $6, $c), $7), $13 => $13, $2)($1);
10678
10707
  }
10679
10708
 
10680
10709
  /* Data.Pagination.foldlM */
@@ -10771,31 +10800,36 @@ function Label_addLabels($0, $1, $2, $3, $4, $5) {
10771
10800
  return FFI_GitHub_addPullLabels($1, $0.a2, $0.a3, $2.a1, $3, $4, $5);
10772
10801
  }
10773
10802
 
10774
- /* Graph.6327:2330:yellowDot */
10775
- function Graph_n__6327_2330_yellowDot($0, $1, $2, $3, $4, $5) {
10803
+ /* Graph.6343:6625:yellowDot */
10804
+ function Graph_n__6343_6625_yellowDot($0, $1, $2, $3, $4, $5) {
10776
10805
  return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(3), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('\u{b7}'));
10777
10806
  }
10778
10807
 
10779
- /* Graph.6327:2329:redDot */
10780
- function Graph_n__6327_2329_redDot($0, $1, $2, $3, $4, $5) {
10808
+ /* Graph.6343:6624:redDot */
10809
+ function Graph_n__6343_6624_redDot($0, $1, $2, $3, $4, $5) {
10781
10810
  return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(1), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('\u{25e6}'));
10782
10811
  }
10783
10812
 
10784
- /* Graph.6327:2328:maxValue */
10785
- function Graph_n__6327_2328_maxValue($0, $1, $2, $3, $4, $5, $6) {
10813
+ /* Graph.6343:6623:note */
10814
+ function Graph_n__6343_6623_note($0, $1, $2, $3, $4, $5, $6) {
10815
+ return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_bold(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Note:')), $6);
10816
+ }
10817
+
10818
+ /* Graph.6343:6622:maxValue */
10819
+ function Graph_n__6343_6622_maxValue($0, $1, $2, $3, $4, $5, $6) {
10786
10820
  switch($6.h) {
10787
10821
  case 0: /* nil */ return 0n;
10788
- case undefined: /* cons */ return Prelude_Types_max_Ord_Nat($6.a1.a2, Graph_n__6327_2328_maxValue($0, $1, $2, $3, $4, $5, $6.a2));
10822
+ case undefined: /* cons */ return Prelude_Types_max_Ord_Nat($6.a1.a2, Graph_n__6343_6622_maxValue($0, $1, $2, $3, $4, $5, $6.a2));
10789
10823
  }
10790
10824
  }
10791
10825
 
10792
- /* Graph.5936:1937:link */
10793
- function Graph_n__5936_1937_link($0, $1, $2) {
10826
+ /* Graph.5952:6230:link */
10827
+ function Graph_n__5952_6230_link($0, $1, $2) {
10794
10828
  return Prelude_Types_foldMap_Foldable_List(csegen_49(), $7 => $7, {a1: 'https://github.com/', a2: {a1: $1, a2: {a1: '/', a2: {a1: $0, a2: {a1: '/pulls?q=is%3Apr+is%3Aopen+sort%3Acreated-asc', a2: {h: 0}}}}}});
10795
10829
  }
10796
10830
 
10797
- /* Graph.6327:2327:header */
10798
- function Graph_n__6327_2327_header($0, $1, $2, $3, $4, $5) {
10831
+ /* Graph.6343:6621:header */
10832
+ function Graph_n__6343_6621_header($0, $1, $2, $3, $4, $5) {
10799
10833
  let $35;
10800
10834
  switch(Prelude_Types_null_Foldable_Maybe($2)) {
10801
10835
  case 1: {
@@ -10803,44 +10837,49 @@ function Graph_n__6327_2327_header($0, $1, $2, $3, $4, $5) {
10803
10837
  break;
10804
10838
  }
10805
10839
  case 0: {
10806
- $35 = {a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('1x the number of completed reviews'), Text_PrettyPrint_Prettyprinter_Symbols_parens(Graph_n__6327_2326_greenBox($0, $1, $2, $3, $4, $5)))};
10840
+ $35 = {a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('1x the number of completed reviews'), Text_PrettyPrint_Prettyprinter_Symbols_parens(Graph_n__6343_6620_greenBox($0, $1, $2, $3, $4, $5)))};
10807
10841
  break;
10808
10842
  }
10809
10843
  }
10810
- const $34 = {a1: $35, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Symbols_parens(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Graph_n__6327_2329_redDot($0, $1, $2, $3, $4, $5), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('overlayed on'), Graph_n__6327_2330_yellowDot($0, $1, $2, $3, $4, $5))))}, a2: csegen_502()}};
10811
- const $23 = {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('1x the number of closed PRs with unanswered review requests'), Text_PrettyPrint_Prettyprinter_Symbols_parens(Graph_n__6327_2329_redDot($0, $1, $2, $3, $4, $5)))}, a2: $34};
10812
- const $12 = {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('4x the number of open review requests'), Text_PrettyPrint_Prettyprinter_Symbols_parens(Graph_n__6327_2330_yellowDot($0, $1, $2, $3, $4, $5)))}, a2: $23};
10844
+ const $34 = {a1: $35, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Symbols_parens(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Graph_n__6343_6624_redDot($0, $1, $2, $3, $4, $5), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('overlayed on'), Graph_n__6343_6625_yellowDot($0, $1, $2, $3, $4, $5))))}, a2: csegen_504()}};
10845
+ const $23 = {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('1x the number of closed PRs with unanswered review requests'), Text_PrettyPrint_Prettyprinter_Symbols_parens(Graph_n__6343_6624_redDot($0, $1, $2, $3, $4, $5)))}, a2: $34};
10846
+ const $12 = {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('4x the number of open review requests'), Text_PrettyPrint_Prettyprinter_Symbols_parens(Graph_n__6343_6625_yellowDot($0, $1, $2, $3, $4, $5)))}, a2: $23};
10813
10847
  const $d = {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Weighted review workload.')}, a2: $12};
10814
10848
  const $9 = {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc()}, a2: $d};
10815
10849
  const $7 = Data_List_catMaybes($9);
10816
10850
  return Text_PrettyPrint_Prettyprinter_Doc_vsep($7);
10817
10851
  }
10818
10852
 
10819
- /* Graph.5936:1936:header */
10820
- function Graph_n__5936_1936_header($0, $1, $2) {
10821
- return Text_PrettyPrint_Prettyprinter_Doc_vsep(Data_List_catMaybes({a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc()}, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Open Pull Requests grouped by month created.')}, a2: csegen_502()}}));
10853
+ /* Graph.5952:6229:header */
10854
+ function Graph_n__5952_6229_header($0, $1, $2) {
10855
+ return Text_PrettyPrint_Prettyprinter_Doc_vsep(Data_List_catMaybes({a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc()}, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Open Pull Requests grouped by month created.')}, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc()}, a2: csegen_504()}}}));
10822
10856
  }
10823
10857
 
10824
- /* Graph.6327:2326:greenBox */
10825
- function Graph_n__6327_2326_greenBox($0, $1, $2, $3, $4, $5) {
10858
+ /* Graph.6343:6620:greenBox */
10859
+ function Graph_n__6343_6620_greenBox($0, $1, $2, $3, $4, $5) {
10826
10860
  return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(2), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('\u{25aa}'));
10827
10861
  }
10828
10862
 
10829
- /* Graph.5936:1935:graphable */
10830
- function Graph_n__5936_1935_graphable($0, $1, $2, $3) {
10863
+ /* Graph.5952:6228:graphable */
10864
+ function Graph_n__5952_6228_graphable($0, $1, $2, $3) {
10831
10865
  return {a1: $3.a1.a2, a2: (Prelude_Types_List_lengthTR($3.a2)+1n)};
10832
10866
  }
10833
10867
 
10834
- /* Graph.5444:1524:countInParens */
10835
- function Graph_n__5444_1524_countInParens($0, $1) {
10868
+ /* Graph.6343:6619:footer */
10869
+ function Graph_n__6343_6619_footer($0, $1, $2, $3, $4, $5) {
10870
+ return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Graph_n__6343_6623_note($0, $1, $2, $3, $4, $5, Text_PrettyPrint_Prettyprinter_Util_reflow(Prelude_Types_foldMap_Foldable_List(csegen_49(), $1a => $1a, {a1: 'It is a strongly held opinion of Harmony that the above graph is not a measure of each developers\' productivity.\nIt is a proxy for each developers\' existing PR review workload that may help to understand how Harmony is\nchoosing reviewers or similarly help one developer decide which other developers have capacity to help review\ntheir work.', a2: {h: 0}}))), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {h: 0}}}});
10871
+ }
10872
+
10873
+ /* Graph.5460:5817:countInParens */
10874
+ function Graph_n__5460_5817_countInParens($0, $1) {
10836
10875
  switch(Prelude_Types_x3e_Ord_Nat($1.a2, 4n)) {
10837
10876
  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_49(), $11 => $11, {a1: '(', a2: {a1: Prelude_Show_show_Show_Nat($1.a2), a2: {a1: ')', a2: {h: 0}}}})));
10838
10877
  case 0: return Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('');
10839
10878
  }
10840
10879
  }
10841
10880
 
10842
- /* Graph.5444:1523:coloredLabel */
10843
- function Graph_n__5444_1523_coloredLabel($0, $1) {
10881
+ /* Graph.5460:5816:coloredLabel */
10882
+ function Graph_n__5460_5816_coloredLabel($0, $1) {
10844
10883
  switch((($1.a2===0n)?1:0)) {
10845
10884
  case 1: return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(2), $0.a1(undefined)($1.a1));
10846
10885
  case 0: {
@@ -10857,8 +10896,8 @@ function Graph_n__5444_1523_coloredLabel($0, $1) {
10857
10896
  }
10858
10897
  }
10859
10898
 
10860
- /* Graph.6327:2325:augment */
10861
- function Graph_n__6327_2325_augment($0, $1, $2, $3, $4, $5, $6, $7) {
10899
+ /* Graph.6343:6618:augment */
10900
+ function Graph_n__6343_6618_augment($0, $1, $2, $3, $4, $5, $6, $7) {
10862
10901
  return {a1: $7, a2: Prelude_Types_maybe(() => 0n, () => $d => $d, Data_SortedMap_lookup($7.a1, $6))};
10863
10902
  }
10864
10903
 
@@ -10894,7 +10933,7 @@ function Graph_prettyPrec_Pretty_Date($0, $1) {
10894
10933
 
10895
10934
  /* Graph.label */
10896
10935
  function Graph_label_Graphable_x28PRsOnDatex20x24dateTyx29($0, $1) {
10897
- return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Graph_n__5444_1523_coloredLabel($0, $1), Graph_n__5444_1524_countInParens($0, $1));
10936
+ return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Graph_n__5460_5816_coloredLabel($0, $1), Graph_n__5460_5817_countInParens($0, $1));
10898
10937
  }
10899
10938
 
10900
10939
  /* Graph.label */
@@ -10933,11 +10972,11 @@ function Graph_reviewsGraph($0, $1, $2, $3, $4, $5) {
10933
10972
  break;
10934
10973
  }
10935
10974
  case undefined: /* just */ {
10936
- $15 = Prelude_Types_List_mapAppend({h: 0}, $27 => Graph_n__6327_2325_augment($0, $1, $5, $4, $3, $2, $5.a1, $27), $6);
10975
+ $15 = Prelude_Types_List_mapAppend({h: 0}, $27 => Graph_n__6343_6618_augment($0, $1, $5, $4, $3, $2, $5.a1, $27), $6);
10937
10976
  break;
10938
10977
  }
10939
10978
  }
10940
- const $32 = Prelude_Types_maybe(() => 0n, () => $36 => $36, Prelude_Types_map_Functor_Maybe($3a => Graph_n__6327_2328_maxValue($0, $1, $5, $4, $3, $2, Data_SortedMap_toList($3a)), $5));
10979
+ const $32 = Prelude_Types_maybe(() => 0n, () => $36 => $36, Prelude_Types_map_Functor_Maybe($3a => Graph_n__6343_6622_maxValue($0, $1, $5, $4, $3, $2, Data_SortedMap_toList($3a)), $5));
10941
10980
  switch($6.h) {
10942
10981
  case 0: /* nil */ return Text_PrettyPrint_Prettyprinter_Doc_emptyDoc();
10943
10982
  case undefined: /* cons */ {
@@ -10954,17 +10993,18 @@ function Graph_reviewsGraph($0, $1, $2, $3, $4, $5) {
10954
10993
  }
10955
10994
  }
10956
10995
  const $5d = Graph_graph({a1: $61 => Graph_totalWidth_Graphable_x28AugmentedReviewScorex20x24loginx29($1, $61), a2: $66 => Graph_label_Graphable_x28AugmentedReviewScorex20x24loginx29($1, $66), a3: $6b => Graph_score_Graphable_x28AugmentedReviewScorex20x24loginx29($1, $6b), a4: $70 => Graph_detractor_Graphable_x28AugmentedReviewScorex20x24loginx29($1, $70), a5: $75 => Graph_bonus_Graphable_x28AugmentedReviewScorex20x24loginx29($1, $75)}, $79, $15);
10957
- const $53 = Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Graph_n__6327_2327_header($0, $1, $5, $4, $3, $2), $5d);
10958
- return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29($53, Text_PrettyPrint_Prettyprinter_Doc_line());
10996
+ const $5c = {a1: $5d, a2: {a1: Graph_n__6343_6619_footer($0, $1, $5, $4, $3, $2), a2: {h: 0}}};
10997
+ const $53 = {a1: Graph_n__6343_6621_header($0, $1, $5, $4, $3, $2), a2: $5c};
10998
+ return Text_PrettyPrint_Prettyprinter_Doc_vsep($53);
10959
10999
  }
10960
11000
  }
10961
11001
  }
10962
11002
 
10963
11003
  /* Graph.healthGraph : List PullRequest -> String -> String -> Doc AnsiStyle */
10964
11004
  function Graph_healthGraph($0, $1, $2) {
10965
- const $3 = Data_List_groupBy($6 => $7 => Prelude_Basics_on($a => $b => Prelude_Basics_on($e => $f => (($e===$f)?1:0), $13 => $13.a2, $a, $b), csegen_403(), $6, $7), Data_List_sortBy(csegen_404(), $0));
11005
+ const $3 = Data_List_groupBy($6 => $7 => Prelude_Basics_on($a => $b => Prelude_Basics_on($e => $f => (($e===$f)?1:0), $13 => $13.a2, $a, $b), csegen_405(), $6, $7), Data_List_sortBy(csegen_406(), $0));
10966
11006
  const $20 = Prelude_Types_foldr_Foldable_List(xs => m => Prelude_Types_max_Ord_Nat(Data_List1_length(xs), m), 1n, $3);
10967
- return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Graph_n__5936_1936_header($2, $1, $0), a2: {a1: Graph_graph({a1: $36 => Graph_totalWidth_Graphable_x28PRsOnDatex20x24dateTyx29(csegen_518(), $36), a2: $3c => Graph_label_Graphable_x28PRsOnDatex20x24dateTyx29(csegen_518(), $3c), a3: $42 => Graph_score_Graphable_x28PRsOnDatex20x24dateTyx29(csegen_518(), $42), a4: $48 => Graph_detractor_Graphable_x28PRsOnDatex20x24dateTyx29(csegen_518(), $48), a5: $4e => Graph_bonus_Graphable_x28PRsOnDatex20x24dateTyx29(csegen_518(), $4e)}, $20, Graph_n__5936_1938_unfoldGraph($2, $1, $0, Data_Fuel_limit(48n), $3, {h: 0})), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Graph_n__5936_1937_link($2, $1, $0)), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {h: 0}}}}}});
11007
+ return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Graph_n__5952_6229_header($2, $1, $0), a2: {a1: Graph_graph({a1: $36 => Graph_totalWidth_Graphable_x28PRsOnDatex20x24dateTyx29(csegen_523(), $36), a2: $3c => Graph_label_Graphable_x28PRsOnDatex20x24dateTyx29(csegen_523(), $3c), a3: $42 => Graph_score_Graphable_x28PRsOnDatex20x24dateTyx29(csegen_523(), $42), a4: $48 => Graph_detractor_Graphable_x28PRsOnDatex20x24dateTyx29(csegen_523(), $48), a5: $4e => Graph_bonus_Graphable_x28PRsOnDatex20x24dateTyx29(csegen_523(), $4e)}, $20, Graph_n__5952_6231_unfoldGraph($2, $1, $0, Data_Fuel_limit(48n), $3, {h: 0})), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Graph_n__5952_6230_link($2, $1, $0)), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {h: 0}}}}}});
10968
11008
  }
10969
11009
 
10970
11010
  /* Graph.graphOne : Graphable g => Nat -> g -> Doc AnsiStyle */
@@ -10984,6 +11024,32 @@ function Graph_bar($0, $1, $2, $3) {
10984
11024
  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('\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('\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('\u{25aa}')))), a2: {h: 0}}}}));
10985
11025
  }
10986
11026
 
11027
+ /* Text.PrettyPrint.Prettyprinter.Util.case block in words,helper */
11028
+ function Text_PrettyPrint_Prettyprinter_Util_case__wordsx2chelper_5200($0, $1, $2) {
11029
+ switch($2.h) {
11030
+ case 0: /* nil */ return {h: 0};
11031
+ default: {
11032
+ const $4 = Data_List_break$($7 => Prelude_Types_isSpace($7), $2);
11033
+ return {a1: $4.a1, a2: Text_PrettyPrint_Prettyprinter_Util_n__3825_5188_helper($0, $4.a2)};
11034
+ }
11035
+ }
11036
+ }
11037
+
11038
+ /* Text.PrettyPrint.Prettyprinter.Util.3825:5188:helper */
11039
+ function Text_PrettyPrint_Prettyprinter_Util_n__3825_5188_helper($0, $1) {
11040
+ return Text_PrettyPrint_Prettyprinter_Util_case__wordsx2chelper_5200($0, $1, Data_List_dropWhile($8 => Prelude_Types_isSpace($8), $1));
11041
+ }
11042
+
11043
+ /* Text.PrettyPrint.Prettyprinter.Util.words : String -> List (Doc ann) */
11044
+ function Text_PrettyPrint_Prettyprinter_Util_words($0) {
11045
+ return Prelude_Types_List_mapAppend({h: 0}, $4 => Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($4), Prelude_Types_List_mapAppend({h: 0}, $b => Prelude_Types_fastPack($b), Text_PrettyPrint_Prettyprinter_Util_n__3825_5188_helper($0, Prelude_Types_fastUnpack($0))));
11046
+ }
11047
+
11048
+ /* Text.PrettyPrint.Prettyprinter.Util.reflow : String -> Doc ann */
11049
+ function Text_PrettyPrint_Prettyprinter_Util_reflow($0) {
11050
+ return Text_PrettyPrint_Prettyprinter_Doc_fillSep(Text_PrettyPrint_Prettyprinter_Util_words($0));
11051
+ }
11052
+
10987
11053
  /* AppVersion.printVersion : HasIO io => io () */
10988
11054
  function AppVersion_printVersion($0) {
10989
11055
  return $0.a2(undefined)($6 => Prelude_IO_prim__putStr((Prelude_Types_foldMap_Foldable_List(csegen_49(), $e => $e, {a1: 'Harmony v', a2: {a1: AppVersion_appVersion(), a2: {h: 0}}})+'\n'), $6));
@@ -10991,7 +11057,7 @@ function AppVersion_printVersion($0) {
10991
11057
 
10992
11058
  /* AppVersion.appVersion : String */
10993
11059
  const AppVersion_appVersion = __lazy(function () {
10994
- return '3.1.0';
11060
+ return '3.2.0';
10995
11061
  });
10996
11062
 
10997
11063