@mattpolzin/harmony 0.2.0 → 0.3.0

harmony-npm/harmony

@@ -206,6 +206,41 @@ const _strReverse = x => x.split('').reverse().join('')
 const _substr = (o,l,x) => x.slice(o, o + l)
 
 
+const { exec: idris__concurrency_exec } = require('child_process')
+
+// Create a "Future" by forking to another process executing harmony with
+// the given argString (space separated CLI arguments to harmony).
+//
+// The result is a Javascript Promise with the String value of stdout from the forked
+// process. This type of promise is opaquely wrapped in the Idris "Future" type.
+const concurrency_future = argString => {
+  return new Promise(
+    (onSuccess, onFailure) => {
+      idris__concurrency_exec(`harmony ${argString}`,(error, stdout, stderr) => {
+	if (error) { onFailure(stderr) }
+	else { onSuccess(stdout) }
+      })
+    }
+  )
+}
+
+const idris__concurrency_stringyArray = v =>
+  (Array.isArray(v) ? JSON.stringify(v.map(JSON.parse)) : v)
+
+// Await the completion of the given "Future" (Javascript Promise).
+//
+// The assumption is that the result of the promise is JSON. If the promise
+// was a singular Future, it is passed through, but if the result is the
+// the Promise.all of multiple futures, each result is parsed and then the
+// entire array of results is stringified.
+const concurrency_await_stringify = (promise, onSuccess, onFailure) =>
+  promise.then(
+    res => onSuccess(idris__concurrency_stringyArray(res))(),
+    err => onFailure(err)()
+  )
+
+
+
 const SimpleGit = require('simple-git')
 
 const git_git = () =>
@@ -352,7 +387,7 @@ const okit_list_reviewers = (octokit, owner, repo, state, per_page, onSuccess, o
     idris__okit_stringify_error(onFailure)
   )
 
-// list PR reviewers
+// list PRs
 // Executes callback with [{ "pull_number": Int, "author": String, "state": String, "reviewers": [String] }]
 const okit_list_pull_requests = (octokit, owner, repo, state, per_page, onSuccess, onFailure) =>
   idris__okit_unpromisify(
@@ -372,6 +407,24 @@ const okit_add_reviewers = (octokit, owner, repo, pull_number, reviewers, team_r
     idris__okit_stringify_error(onFailure)
   )
 
+// list PR reviews
+const digReviews = reviewsJson =>
+  reviewsJson.map(review => {
+    return {
+      author: review.user.login,
+      state: review.state,
+      submitted_at: review.submitted_at
+    }
+  })
+
+// Executes callback with [{author: String, state: String, submitted_at: String}]
+const okit_list_pr_reviews = (octokit, owner, repo, pull_number, onSuccess, onFailure) =>
+  idris__okit_unpromisify(
+    octokit.rest.pulls.listReviews({ owner, repo, pull_number: Number(pull_number) }),
+    r => onSuccess(JSON.stringify(digReviews(r.data))),
+    idris__okit_stringify_error(onFailure)
+  )
+
 // list team members
 const digUserLogins = usersJson =>
   usersJson.map(u => u.login)
@@ -512,6 +565,7 @@ const System_Random_Node_prim__rnd = (() => Math.random());
 const FFI_GitHub_prim__octokit = okit_octokit;
 const FFI_GitHub_prim__listTeams = okit_list_teams;
 const FFI_GitHub_prim__listTeamMembers = okit_list_team_members;
+const FFI_GitHub_prim__listPullReviews = okit_list_pr_reviews;
 const FFI_GitHub_prim__listPullRequests = okit_list_pull_requests;
 const FFI_GitHub_prim__listPRsForBranch = okit_list_prs;
 const FFI_GitHub_prim__listOrgMembers = okit_list_org_members;
@@ -526,6 +580,12 @@ const FFI_Git_prim__remoteTrackingBranch = git_remote_tracking_branch;
 const FFI_Git_prim__pushNewBranch = git_push_new_branch;
 const FFI_Git_prim__git = git_git;
 const FFI_Git_prim__currentBranch = git_current_branch;
+const FFI_Concurrency_prim__singleton = ((p)=>Promise.all([p]));
+const FFI_Concurrency_prim__neutral = (()=>Promise.all([]));
+const FFI_Concurrency_prim__future = concurrency_future;
+const FFI_Concurrency_prim__flatten = ((p)=>{return new Promise((onSuccess, onFailure) => p.then(r => onSuccess(r.flat()), onFailure))});
+const FFI_Concurrency_prim__both = ((p1,p2)=>Promise.all([p1,p2]));
+const FFI_Concurrency_prim__awaitStringify = concurrency_await_stringify;
 const System_File_Virtual_prim__stdout = (x=>({fd:1, buffer: Buffer.alloc(0), name:'<stdout>', eof: false}));
 const System_File_Virtual_prim__stderr = (x=>({fd:2, buffer: Buffer.alloc(0), name:'<stderr>', eof: false}));
 const System_File_ReadWrite_prim__writeLine = ((filePtr, line) => require('fs').writeSync(filePtr.fd, line, undefined, 'utf-8'));
@@ -721,7 +781,7 @@ function Data_List_lookupBy($0, $1, $2) {
  return __tailRec(x24tcOpt_13, {h: 1, a1: $0, a2: $1, a3: $2});
 }
 
-function x24tcOpt_26($0) {
+function x24tcOpt_27($0) {
  switch($0.a2.h) {
   case 0: return {h: 0, a1: {h: 0}};
   case undefined: {
@@ -735,10 +795,37 @@ function x24tcOpt_26($0) {
 }
 
 function Data_List_mapMaybe($0, $1) {
- return __tailRec(x24tcOpt_26, {h: 1, a1: $0, a2: $1});
+ return __tailRec(x24tcOpt_27, {h: 1, a1: $0, a2: $1});
 }
 
 function x24tcOpt_10($0) {
+ switch($0.a1.h) {
+  case 0: return {h: 0, a1: {a1: $0.a2}};
+  case undefined: {
+   let $5;
+   switch(Prelude_EqOrd_x3ex3d_Ord_Char($0.a1.a1, '0')) {
+    case 1: {
+     $5 = Prelude_EqOrd_x3cx3d_Ord_Char($0.a1.a1, '9');
+     break;
+    }
+    case 0: {
+     $5 = 0;
+     break;
+    }
+   }
+   switch($5) {
+    case 1: return {h: 1, a1: $0.a1.a2, a2: (($0.a2*10n)+Prelude_Cast_cast_Cast_Int_Integer(_sub32s(Prelude_Types_ord($0.a1.a1), Prelude_Types_ord('0'))))};
+    case 0: return {h: 0, a1: {h: 0}};
+   }
+  }
+ }
+}
+
+function Data_String_parseNumWithoutSign($0, $1) {
+ return __tailRec(x24tcOpt_10, {h: 1, a1: $0, a2: $1});
+}
+
+function x24tcOpt_26($0) {
  switch($0.a2.h) {
   case 0: return {h: 0, a1: $0.a1};
   case undefined: return {h: 1, a1: {a1: $0.a2.a1, a2: $0.a1}, a2: $0.a2.a2};
@@ -746,7 +833,7 @@ function x24tcOpt_10($0) {
 }
 
 function Prelude_Types_List_reverseOnto($0, $1) {
- return __tailRec(x24tcOpt_10, {h: 1, a1: $0, a2: $1});
+ return __tailRec(x24tcOpt_26, {h: 1, a1: $0, a2: $1});
 }
 
 function x24tcOpt_9($0) {
@@ -836,7 +923,7 @@ function Prelude_Types_case__compare_3913($0, $1, $2, $3, $4, $5) {
  return __tailRec(x24tcOpt_6, {h: 2, a1: $0, a2: $1, a3: $2, a4: $3, a5: $4, a6: $5});
 }
 
-function x24tcOpt_27($0) {
+function x24tcOpt_28($0) {
  switch($0.a3.h) {
   case 0: return {h: 0, a1: $0.a2};
   case undefined: return {h: 1, a1: $0.a1, a2: $0.a1($0.a2)($0.a3.a1), a3: $0.a3.a2};
@@ -844,7 +931,7 @@ function x24tcOpt_27($0) {
 }
 
 function Prelude_Types_foldl_Foldable_List($0, $1, $2) {
- return __tailRec(x24tcOpt_27, {h: 1, a1: $0, a2: $1, a3: $2});
+ return __tailRec(x24tcOpt_28, {h: 1, a1: $0, a2: $1, a3: $2});
 }
 
 function x24tcOpt_15($0) {
@@ -1062,41 +1149,82 @@ function x24tcOpt_1($0) {
   case 0: {
    switch($0.a6.h) {
     case 0: return {h: 0, a1: {h: 0}};
-    default: return {h: 0, a1: $0.a6};
+    default: {
+     switch($0.a7.h) {
+      case 0: return {h: 0, a1: $0.a6};
+      case 1: return {h: 0, a1: Prelude_Interfaces_x3cx24x3e(csegen_76(), $c => ({a1: $c.a1, a2: Prelude_Types_fromInteger_Num_Nat(0n)}), $0.a6)};
+      default: {
+       switch($0.a6.h) {
+        case 0: {
+         switch($0.a8) {
+          case 1: return {h: 0, a1: {h: 0}};
+          case 0: return {h: 0, a1: $0.a5};
+          default: {
+           const $19 = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2};
+           const $1c = Util_deleteByx27($1f => $20 => Prelude_Basics_on($23 => $24 => $0.a1.a1.a1($23)($24), $2c => Builtin_fst($2c), $1f, $20), $19, $0.a6);
+           switch($1c.a1.h) {
+            case 0: {
+             switch($0.a8) {
+              case 0: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2}, a2: Reviewer_n__3921_909_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $1c.a2, $0.a7, $0.a8)}};
+              case 1: return {h: 1, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5.a2, a6: $1c.a2, a7: $0.a7, a8: $0.a8};
+             }
+            }
+            case undefined: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: Reviewer_n__3936_1018_calc($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a1.a1, $0.a5.a1.a2, $19, $0.a5.a2, $0.a8, $0.a7, $0.a6, $0.a5.a1.a2, $1c.a1.a1.a2)}, a2: Reviewer_n__3921_909_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $1c.a2, $0.a7, $0.a8)}};
+           }
+          }
+         }
+        }
+        default: {
+         const $6a = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2};
+         const $6d = Util_deleteByx27($70 => $71 => Prelude_Basics_on($74 => $75 => $0.a1.a1.a1($74)($75), $7d => Builtin_fst($7d), $70, $71), $6a, $0.a6);
+         switch($6d.a1.h) {
+          case 0: {
+           switch($0.a8) {
+            case 0: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2}, a2: Reviewer_n__3921_909_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $6d.a2, $0.a7, $0.a8)}};
+            case 1: return {h: 1, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5.a2, a6: $6d.a2, a7: $0.a7, a8: $0.a8};
+           }
+          }
+          case undefined: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: Reviewer_n__3936_1018_calc($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a1.a1, $0.a5.a1.a2, $6a, $0.a5.a2, $0.a8, $0.a7, $0.a6, $0.a5.a1.a2, $6d.a1.a1.a2)}, a2: Reviewer_n__3921_909_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $6d.a2, $0.a7, $0.a8)}};
+         }
+        }
+       }
+      }
+     }
+    }
    }
   }
   default: {
    switch($0.a6.h) {
     case 0: {
-     switch($0.a7) {
+     switch($0.a8) {
       case 1: return {h: 0, a1: {h: 0}};
       case 0: return {h: 0, a1: $0.a5};
       default: {
-       const $c = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2};
-       const $f = Util_deleteByx27($12 => $13 => Prelude_Basics_on($16 => $17 => $0.a1.a1.a1($16)($17), $1f => Builtin_fst($1f), $12, $13), $c, $0.a6);
-       switch($f.a1.h) {
+       const $bf = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2};
+       const $c2 = Util_deleteByx27($c5 => $c6 => Prelude_Basics_on($c9 => $ca => $0.a1.a1.a1($c9)($ca), $d2 => Builtin_fst($d2), $c5, $c6), $bf, $0.a6);
+       switch($c2.a1.h) {
         case 0: {
-         switch($0.a7) {
-          case 0: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2}, a2: Reviewer_n__3921_906_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $f.a2, $0.a7)}};
-          case 1: return {h: 1, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5.a2, a6: $f.a2, a7: $0.a7};
+         switch($0.a8) {
+          case 0: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2}, a2: Reviewer_n__3921_909_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $c2.a2, $0.a7, $0.a8)}};
+          case 1: return {h: 1, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5.a2, a6: $c2.a2, a7: $0.a7, a8: $0.a8};
          }
         }
-        case undefined: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: Prelude_Types_x2b_Num_Nat($0.a5.a1.a2, $f.a1.a1.a2)}, a2: Reviewer_n__3921_906_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $f.a2, $0.a7)}};
+        case undefined: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: Reviewer_n__3936_1018_calc($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a1.a1, $0.a5.a1.a2, $bf, $0.a5.a2, $0.a8, $0.a7, $0.a6, $0.a5.a1.a2, $c2.a1.a1.a2)}, a2: Reviewer_n__3921_909_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $c2.a2, $0.a7, $0.a8)}};
        }
       }
      }
     }
     default: {
-     const $4f = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2};
-     const $52 = Util_deleteByx27($55 => $56 => Prelude_Basics_on($59 => $5a => $0.a1.a1.a1($59)($5a), $62 => Builtin_fst($62), $55, $56), $4f, $0.a6);
-     switch($52.a1.h) {
+     const $110 = {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2};
+     const $113 = Util_deleteByx27($116 => $117 => Prelude_Basics_on($11a => $11b => $0.a1.a1.a1($11a)($11b), $123 => Builtin_fst($123), $116, $117), $110, $0.a6);
+     switch($113.a1.h) {
       case 0: {
-       switch($0.a7) {
-        case 0: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2}, a2: Reviewer_n__3921_906_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $52.a2, $0.a7)}};
-        case 1: return {h: 1, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5.a2, a6: $52.a2, a7: $0.a7};
+       switch($0.a8) {
+        case 0: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: $0.a5.a1.a2}, a2: Reviewer_n__3921_909_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $113.a2, $0.a7, $0.a8)}};
+        case 1: return {h: 1, a1: $0.a1, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5.a2, a6: $113.a2, a7: $0.a7, a8: $0.a8};
        }
       }
-      case undefined: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: Prelude_Types_x2b_Num_Nat($0.a5.a1.a2, $52.a1.a1.a2)}, a2: Reviewer_n__3921_906_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $52.a2, $0.a7)}};
+      case undefined: return {h: 0, a1: {a1: {a1: $0.a5.a1.a1, a2: Reviewer_n__3936_1018_calc($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a1.a1, $0.a5.a1.a2, $110, $0.a5.a2, $0.a8, $0.a7, $0.a6, $0.a5.a1.a2, $113.a1.a1.a2)}, a2: Reviewer_n__3921_909_zipReviews($0.a1, $0.a2, $0.a3, $0.a4, $0.a5.a2, $113.a2, $0.a7, $0.a8)}};
      }
     }
    }
@@ -1104,8 +1232,8 @@ function x24tcOpt_1($0) {
  }
 }
 
-function Reviewer_n__3921_906_zipReviews($0, $1, $2, $3, $4, $5, $6) {
- return __tailRec(x24tcOpt_1, {h: 1, a1: $0, a2: $1, a3: $2, a4: $3, a5: $4, a6: $5, a7: $6});
+function Reviewer_n__3921_909_zipReviews($0, $1, $2, $3, $4, $5, $6, $7) {
+ return __tailRec(x24tcOpt_1, {h: 1, a1: $0, a2: $1, a3: $2, a4: $3, a5: $4, a6: $5, a7: $6, a8: $7});
 }
 
 function x24tcOpt_5($0) {
@@ -1248,7 +1376,31 @@ const __mainExpression_0 = __lazy(function () {
  return PrimIO_unsafePerformIO($2 => Main_main($2));
 });
 
-const csegen_13 = __lazy(function () {
+const csegen_2 = __lazy(function () {
+ return {a1: $1 => $2 => ($1+$2), a2: $6 => $7 => ($6*$7), a3: $b => $b};
+});
+
+const csegen_5 = __lazy(function () {
+ return b => a => func => $0 => $1 => $2 => Data_Promise_map_Functor_Promise(func, $0, $1, $2);
+});
+
+const csegen_11 = __lazy(function () {
+ return {a1: csegen_5(), a2: a => $3 => $4 => $5 => Data_Promise_pure_Applicative_Promise($3, $4, $5), a3: b => a => $b => $c => $d => $e => Data_Promise_x3cx2ax3e_Applicative_Promise($b, $c, $d, $e)};
+});
+
+const csegen_17 = __lazy(function () {
+ return {a1: csegen_11(), a2: b => a => $3 => $4 => $5 => $6 => Data_Promise_x3ex3ex3d_Monad_Promise($3, $4, $5, $6), a3: a => $d => $e => $f => Data_Promise_join_Monad_Promise($d, $e, $f)};
+});
+
+const csegen_20 = __lazy(function () {
+ return {a1: csegen_17(), a2: a => $3 => $4 => $5 => $6 => Data_Promise_liftIO_HasIO_Promise($3, $4, $5, $6)};
+});
+
+const csegen_21 = __lazy(function () {
+ return Main_exitError(csegen_20(), 'contribute\'s argument must be -<num> where <num> is an integer.');
+});
+
+const csegen_36 = __lazy(function () {
  const $a = b => a => $b => $c => $d => {
   const $e = $b($d);
   const $11 = $c($d);
@@ -1257,196 +1409,196 @@ const csegen_13 = __lazy(function () {
  return {a1: b => a => func => $1 => $2 => Prelude_IO_map_Functor_IO(func, $1, $2), a2: a => $8 => $9 => $8, a3: $a};
 });
 
-const csegen_16 = __lazy(function () {
+const csegen_39 = __lazy(function () {
  return b => a => $0 => $1 => $2 => {
   const $3 = $0($2);
   return $1($3)($2);
  };
 });
 
-const csegen_20 = __lazy(function () {
+const csegen_43 = __lazy(function () {
  const $5 = a => $6 => $7 => {
   const $8 = $6($7);
   return $8($7);
  };
- const $0 = {a1: csegen_13(), a2: csegen_16(), a3: $5};
+ const $0 = {a1: csegen_36(), a2: csegen_39(), a3: $5};
  return {a1: $0, a2: a => $e => $e};
 });
 
-const csegen_25 = __lazy(function () {
+const csegen_48 = __lazy(function () {
  return $0 => $1 => $2 => $3 => $4 => Prelude_IO_map_Functor_IO($2, $3, $4);
 });
 
-const csegen_31 = __lazy(function () {
+const csegen_54 = __lazy(function () {
  const $4 = a => $5 => $6 => {
   const $7 = $5($6);
   return $7($6);
  };
- return {a1: csegen_13(), a2: csegen_16(), a3: $4};
+ return {a1: csegen_36(), a2: csegen_39(), a3: $4};
 });
 
-const csegen_34 = __lazy(function () {
+const csegen_57 = __lazy(function () {
  return {a1: $1 => $2 => Prelude_EqOrd_x3dx3d_Eq_String($1, $2), a2: $7 => $8 => Prelude_EqOrd_x2fx3d_Eq_String($7, $8)};
 });
 
-const csegen_41 = __lazy(function () {
+const csegen_64 = __lazy(function () {
  return $0 => $1 => $2 => $3 => $4 => $5 => Data_Promise_map_Functor_Promise($2, $3, $4, $5);
 });
 
-const csegen_49 = __lazy(function () {
- return {a1: csegen_34(), 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)};
+const csegen_72 = __lazy(function () {
+ return {a1: csegen_57(), 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)};
 });
 
-const csegen_53 = __lazy(function () {
- return b => a => func => $0 => $1 => $2 => Data_Promise_map_Functor_Promise(func, $0, $1, $2);
+const csegen_76 = __lazy(function () {
+ return $0 => $1 => $2 => $3 => Prelude_Types_map_Functor_List($2, $3);
 });
 
-const csegen_59 = __lazy(function () {
- return {a1: csegen_53(), a2: a => $3 => $4 => $5 => Data_Promise_pure_Applicative_Promise($3, $4, $5), a3: b => a => $b => $c => $d => $e => Data_Promise_x3cx2ax3e_Applicative_Promise($b, $c, $d, $e)};
+const csegen_79 = __lazy(function () {
+ return {a1: x => Prelude_Show_show_Show_String(x), a2: d => x => Prelude_Show_showPrec_Show_String(d, x)};
 });
 
-const csegen_62 = __lazy(function () {
- return $0 => $1 => $2 => $3 => Prelude_Types_map_Functor_List($2, $3);
+const csegen_80 = __lazy(function () {
+ return $0 => $1 => Data_Promise_pure_Applicative_Promise(0, $0, $1);
 });
 
-const csegen_65 = __lazy(function () {
- return {a1: x => Prelude_Show_show_Show_String(x), a2: d => x => Prelude_Show_showPrec_Show_String(d, x)};
+const csegen_85 = __lazy(function () {
+ return Data_Fin_fromInteger(100n, Prelude_Types_fromInteger_Num_Nat(101n));
 });
 
-const csegen_71 = __lazy(function () {
- return {a1: csegen_59(), a2: b => a => $3 => $4 => $5 => $6 => Data_Promise_x3ex3ex3d_Monad_Promise($3, $4, $5, $6), a3: a => $d => $e => $f => Data_Promise_join_Monad_Promise($d, $e, $f)};
+const csegen_90 = __lazy(function () {
+ return $0 => $0.a1;
 });
 
-const csegen_74 = __lazy(function () {
- return {a1: csegen_71(), a2: a => $3 => $4 => $5 => $6 => Data_Promise_liftIO_HasIO_Promise($3, $4, $5, $6)};
+const csegen_91 = __lazy(function () {
+ return $0 => $1 => Data_Date_compare_Ord_Date($0, $1);
 });
 
-const csegen_75 = __lazy(function () {
- return $0 => $1 => Data_Promise_pure_Applicative_Promise(0, $0, $1);
+const csegen_106 = __lazy(function () {
+ return $0 => $0.a2;
 });
 
-const csegen_80 = __lazy(function () {
- return Data_Fin_fromInteger(100n, Prelude_Types_fromInteger_Num_Nat(101n));
+const csegen_109 = __lazy(function () {
+ return $0 => $0.a1;
 });
 
-const csegen_114 = __lazy(function () {
+const csegen_126 = __lazy(function () {
  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 => Prelude_Types_toList_Foldable_List($16), a6: a => m => $1a => f => $1b => Prelude_Types_foldMap_Foldable_List($1a, f, $1b)};
 });
 
-const csegen_115 = __lazy(function () {
+const csegen_129 = __lazy(function () {
  return $0 => $1 => Prelude_Types_max_Ord_Nat($0, $1);
 });
 
-const csegen_118 = __lazy(function () {
+const csegen_133 = __lazy(function () {
  return $0 => $1 => $2 => $3 => Prelude_Types_map_Functor_Maybe($2, $3);
 });
 
-const csegen_119 = __lazy(function () {
+const csegen_134 = __lazy(function () {
  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}}}));
 });
 
-const csegen_136 = __lazy(function () {
+const csegen_159 = __lazy(function () {
  return {a1: {a1: b => a => func => $2 => Control_Monad_ST_map_Functor_x28STx20x24sx29(func, $2), a2: a => $7 => $8 => Control_Monad_ST_pure_Applicative_x28STx20x24sx29($7, $8), a3: b => a => $d => $e => $f => Control_Monad_ST_x3cx2ax3e_Applicative_x28STx20x24sx29($d, $e, $f)}, a2: b => a => $15 => $16 => $17 => Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($15, $16, $17), a3: a => $1d => $1e => Control_Monad_ST_join_Monad_x28STx20x24sx29($1d, $1e)};
 });
 
-const csegen_137 = __lazy(function () {
+const csegen_160 = __lazy(function () {
  return $0 => Control_Monad_ST_pure_Applicative_x28STx20x24sx29({h: 0}, $0);
 });
 
-const csegen_150 = __lazy(function () {
+const csegen_173 = __lazy(function () {
  return $0 => $1 => Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29($0, $1);
 });
 
-const csegen_154 = __lazy(function () {
+const csegen_177 = __lazy(function () {
  return {a1: $1 => $2 => Prelude_EqOrd_x3dx3d_Eq_Char($1, $2), a2: $7 => $8 => Prelude_EqOrd_x2fx3d_Eq_Char($7, $8)};
 });
 
-const csegen_170 = __lazy(function () {
+const csegen_193 = __lazy(function () {
  return $0 => $1 => ({a1: $0, a2: $1});
 });
 
-const csegen_223 = __lazy(function () {
- return {a1: csegen_114(), a2: {a1: $4 => $5 => Prelude_Types_x3cx2bx3e_Semigroup_String($4, $5), a2: Prelude_Types_neutral_Monoid_String()}};
+const csegen_246 = __lazy(function () {
+ return {a1: csegen_126(), a2: {a1: $4 => $5 => Prelude_Types_x3cx2bx3e_Semigroup_String($4, $5), a2: Prelude_Types_neutral_Monoid_String()}};
 });
 
-const csegen_233 = __lazy(function () {
+const csegen_256 = __lazy(function () {
  return b => a => $0 => $1 => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29($0, $1);
 });
 
-const csegen_234 = __lazy(function () {
+const csegen_257 = __lazy(function () {
  return a => $0 => Prelude_Types_join_Monad_x28Eitherx20x24ex29($0);
 });
 
-const csegen_235 = __lazy(function () {
+const csegen_258 = __lazy(function () {
  return $0 => Data_Either_maybeToEither(() => 'Failed to parse JSON', Language_JSON_parse($0));
 });
 
-const csegen_238 = __lazy(function () {
+const csegen_261 = __lazy(function () {
  return b => a => func => $0 => Text_Bounded_map_Functor_WithBounds(func, $0);
 });
 
-const csegen_249 = __lazy(function () {
+const csegen_272 = __lazy(function () {
  return {a1: {a1: $2 => $3 => Prelude_EqOrd_x3dx3d_Eq_Int($2, $3), a2: $8 => $9 => Prelude_EqOrd_x2fx3d_Eq_Int($8, $9)}, a2: $e => $f => Prelude_EqOrd_compare_Ord_Int($e, $f), a3: $14 => $15 => Prelude_EqOrd_x3c_Ord_Int($14, $15), a4: $1a => $1b => Prelude_EqOrd_x3e_Ord_Int($1a, $1b), a5: $20 => $21 => Prelude_EqOrd_x3cx3d_Ord_Int($20, $21), a6: $26 => $27 => Prelude_EqOrd_x3ex3d_Ord_Int($26, $27), a7: $2c => $2d => Prelude_EqOrd_max_Ord_Int($2c, $2d), a8: $32 => $33 => Prelude_EqOrd_min_Ord_Int($32, $33)};
 });
 
-const csegen_263 = __lazy(function () {
+const csegen_286 = __lazy(function () {
  return {a1: {a1: $2 => $3 => Language_JSON_Tokens_x3dx3d_Eq_JSONTokenKind($2, $3), a2: $8 => $9 => Language_JSON_Tokens_x2fx3d_Eq_JSONTokenKind($8, $9)}, a2: {a1: $f => Language_JSON_Tokens_TokType_TokenKind_JSONTokenKind($f), a2: kind => $13 => Language_JSON_Tokens_tokValue_TokenKind_JSONTokenKind(kind, $13)}};
 });
 
-const csegen_303 = __lazy(function () {
+const csegen_326 = __lazy(function () {
  return {a1: {a1: $2 => $3 => Language_JSON_String_Tokens_x3dx3d_Eq_JSONStringTokenKind($2, $3), a2: $8 => $9 => Language_JSON_String_Tokens_x2fx3d_Eq_JSONStringTokenKind($8, $9)}, a2: {a1: $f => Language_JSON_String_Tokens_TokType_TokenKind_JSONStringTokenKind($f), a2: kind => $13 => Language_JSON_String_Tokens_tokValue_TokenKind_JSONStringTokenKind(kind, $13)}};
 });
 
-const csegen_319 = __lazy(function () {
+const csegen_342 = __lazy(function () {
  return $0 => $1 => $2 => $3 => Text_Bounded_map_Functor_WithBounds($2, $3);
 });
 
-const csegen_322 = __lazy(function () {
+const csegen_345 = __lazy(function () {
  return {a1: {a1: 'End of input', a2: {h: 0}}, a2: {h: 0}};
 });
 
-const csegen_366 = __lazy(function () {
- return Prelude_IO_getLine(csegen_74());
+const csegen_389 = __lazy(function () {
+ return Prelude_IO_getLine(csegen_20());
 });
 
-const csegen_387 = __lazy(function () {
- return $0 => $1 => Data_Promise_either(csegen_65(), Data_PullRequest_parsePullRequestsString($0), $1);
+const csegen_413 = __lazy(function () {
+ return $0 => $1 => Data_Promise_either(csegen_79(), Data_PullRequest_parsePullRequestsString($0), $1);
 });
 
-const csegen_388 = __lazy(function () {
- return $0 => $1 => Data_Promise_either(csegen_65(), Data_User_parseUserString($0), $1);
+const csegen_414 = __lazy(function () {
+ return $0 => $1 => Data_Promise_either(csegen_79(), Data_User_parseUserString($0), $1);
 });
 
-const csegen_432 = __lazy(function () {
+const csegen_460 = __lazy(function () {
  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)};
 });
 
-const csegen_436 = __lazy(function () {
+const csegen_464 = __lazy(function () {
  return b => a => f => $0 => $1 => $2 => Prelude_Types_traverse_Traversable_x28Eitherx20x24ex29($0, $1, $2);
 });
 
-const csegen_458 = __lazy(function () {
+const csegen_486 = __lazy(function () {
  return {a1: $1 => $2 => _add32s($1, $2), a2: $6 => $7 => _mul32s($6, $7), a3: $b => Number(_truncBigInt32($b))};
 });
 
-const csegen_472 = __lazy(function () {
+const csegen_501 = __lazy(function () {
  return $0 => $0.a2;
 });
 
-const csegen_486 = __lazy(function () {
+const csegen_515 = __lazy(function () {
  return {a1: {a1: b => a => func => $2 => Prelude_Types_map_Functor_Maybe(func, $2), a2: a => $7 => Prelude_Types_pure_Applicative_Maybe($7), a3: b => a => $b => $c => Prelude_Types_x3cx2ax3e_Applicative_Maybe($b, $c)}, a2: b => a => $11 => $12 => Prelude_Types_x3ex3ex3d_Monad_Maybe($11, $12), a3: a => $17 => Prelude_Types_join_Monad_Maybe($17)};
 });
 
-const csegen_489 = __lazy(function () {
+const csegen_518 = __lazy(function () {
  return $0 => $0.a1;
 });
 
-const csegen_493 = __lazy(function () {
- return Prelude_Interfaces_x3cx24x3e(csegen_41(), $4 => Prelude_Cast_cast_Cast_Integer_Bits32($4), System_time(csegen_74()));
+const csegen_521 = __lazy(function () {
+ return Prelude_Interfaces_x3cx24x3e(csegen_64(), $4 => Prelude_Cast_cast_Cast_Integer_Bits32($4), System_time(csegen_20()));
 });
 
-const csegen_497 = __lazy(function () {
- return {a1: csegen_74(), a2: {a1: x => Data_Config_show_Show_Config(x), a2: d => x => Data_Config_showPrec_Show_Config(d, x)}};
+const csegen_525 = __lazy(function () {
+ return {a1: csegen_20(), a2: {a1: x => Data_Config_show_Show_Config(x), a2: d => x => Data_Config_showPrec_Show_Config(d, x)}};
 });
 
 function prim__add_Integer($0, $1) {
@@ -1461,7 +1613,25 @@ function prim__mul_Integer($0, $1) {
  return ($0*$1);
 }
 
-function Main_n__4782_1794_putNameLn($0, $1, $2, $3) {
+function Main_case__handleConfiguredArgs_2491($0, $1, $2, $3, $4) {
+ switch($4.h) {
+  case undefined: {
+   switch($4.a1) {
+    case '-': {
+     const $7 = Prelude_Types_map_Functor_Maybe($a => Prelude_Cast_cast_Cast_Integer_Nat($a), Data_String_parsePositive(csegen_2(), Prelude_Types_fastPack($4.a2)));
+     switch($7.h) {
+      case undefined: return $14 => $15 => Main_contribute($0, $2, $7.a1, $14, $15);
+      case 0: return csegen_21();
+     }
+    }
+    default: return csegen_21();
+   }
+  }
+  default: return csegen_21();
+ }
+}
+
+function Main_n__4887_2015_putNameLn($0, $1, $2, $3) {
  let $1c;
  switch(Data_String_isSuffixOf('\n', '-')) {
   case 1: {
@@ -1481,12 +1651,19 @@ function Main_n__4782_1794_putNameLn($0, $1, $2, $3) {
  return Text_PrettyPrint_Prettyprinter_Doc_hsep($5);
 }
 
-function Main_n__4674_1703_partitionedArgs($0, $1, $2, $3, $4) {
+function Main_n__5057_2192_printResult($0, $1, $2, $3) {
+ switch($3.h) {
+  case 0: return $5 => $6 => Data_Promise_reject('No open PRs to review!', $5, $6);
+  case undefined: return Prelude_IO_putStrLn(csegen_20(), $3.a1);
+ }
+}
+
+function Main_n__4779_1924_partitionedArgs($0, $1, $2, $3, $4) {
  const $5 = Data_List_partition($8 => Data_String_isPrefixOf('+', $8), $4);
  return {a1: Prelude_Types_map_Functor_List($11 => Data_String_Extra_drop(1n, $11), $5.a1), a2: $5.a2};
 }
 
-function Main_n__4866_1886_maybeDecorated($0, $1, $2, $3) {
+function Main_n__4971_2107_maybeDecorated($0, $1, $2, $3) {
  switch(Data_Config_rf__colors($2)) {
   case 1: return $3;
   case 0: return Text_PrettyPrint_Prettyprinter_Doc_unAnnotate($3);
@@ -1494,136 +1671,179 @@ function Main_n__4866_1886_maybeDecorated($0, $1, $2, $3) {
 }
 
 function Main_resolvex27x27($0) {
- return Data_Promise_resolvex27($3 => $4 => $3, $6 => Main_exitError(csegen_20(), $6), $0);
+ return Data_Promise_resolvex27($3 => $4 => $3, $6 => Main_exitError(csegen_43(), $6), $0);
 }
 
 function Main_main($0) {
- const $1 = System_File_Meta_isTTY(csegen_20(), System_File_Virtual_stdout())($0);
- const $9 = Prelude_Interfaces_x3cx24x3e(csegen_25(), $f => Data_List_drop(2n, $f), System_getArgs(csegen_20()))($0);
+ const $1 = System_File_Meta_isTTY(csegen_43(), System_File_Virtual_stdout())($0);
+ const $9 = Prelude_Interfaces_x3cx24x3e(csegen_48(), $f => Data_List_drop(2n, $f), System_getArgs(csegen_43()))($0);
  let $20;
- switch(Prelude_Types_x3dx3d_Eq_x28Listx20x24ax29(csegen_34(), $9, {a1: 'help', a2: {h: 0}})) {
+ switch(Prelude_Types_x3dx3d_Eq_x28Listx20x24ax29(csegen_57(), $9, {a1: 'help', a2: {h: 0}})) {
   case 1: {
    $20 = 1;
    break;
   }
   case 0: {
-   $20 = Prelude_Types_x3dx3d_Eq_x28Listx20x24ax29(csegen_34(), $9, {a1: '--help', a2: {h: 0}});
+   $20 = Prelude_Types_x3dx3d_Eq_x28Listx20x24ax29(csegen_57(), $9, {a1: '--help', a2: {h: 0}});
    break;
   }
  }
- const $1c = Prelude_Interfaces_when(csegen_13(), $20, () => Prelude_Interfaces_x3ex3e(csegen_31(), Prelude_IO_putStrLn(csegen_20(), Help_help($1)), () => System_exitSuccess(csegen_20())));
- const $18 = Prelude_Interfaces_x3ex3e(csegen_31(), $1c, () => $40 => {
-  const $41 = System_getEnv(csegen_20(), 'GITHUB_PAT')($40);
+ const $1c = Prelude_Interfaces_when(csegen_36(), $20, () => Prelude_Interfaces_x3ex3e(csegen_54(), Prelude_IO_putStrLn(csegen_43(), Help_help($1)), () => System_exitSuccess(csegen_43())));
+ const $18 = Prelude_Interfaces_x3ex3e(csegen_54(), $1c, () => $40 => {
+  const $41 = System_getEnv(csegen_43(), 'GITHUB_PAT')($40);
   switch($41.h) {
    case undefined: {
     const $49 = FFI_GitHub_octokit($41.a1)($40);
-    const $4e = FFI_Git_git(csegen_20())($40);
+    const $4e = FFI_Git_git(csegen_43())($40);
     return Main_handleArgs($4e, $49, $1, $9)($40);
    }
-   case 0: return Main_exitError(csegen_20(), 'GITHUB_PAT environment variable must be set to a personal access token.')($40);
+   case 0: return Main_exitError(csegen_43(), 'GITHUB_PAT environment variable must be set to a personal access token.')($40);
   }
  });
  return $18($0);
 }
 
 function Main_listTeam($0, $1, $2, $3, $4) {
- return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_41(), $b => Data_List_sort(csegen_49(), $b), FFI_GitHub_listTeamMembers($1, $0.a2, $2)), teamMemberLogins => $17 => $18 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Types_traverse_Traversable_List(csegen_59(), FFI_GitHub_getUser($1), teamMemberLogins), teamMembers => $23 => $24 => $25 => Data_Promise_liftIO_HasIO_Promise(Text_PrettyPrint_Prettyprinter_Render_Terminal_putDoc(Text_PrettyPrint_Prettyprinter_Doc_vsep(Prelude_Interfaces_x3cx24x3e(csegen_62(), $30 => Main_n__4782_1794_putNameLn($1, $2, $0, $30), teamMembers))), $23, $24, $25), $17, $18), $3, $4);
+ return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_64(), $b => Data_List_sort(csegen_72(), $b), FFI_GitHub_listTeamMembers($1, $0.a2, $2)), teamMemberLogins => $17 => $18 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Types_traverse_Traversable_List(csegen_11(), FFI_GitHub_getUser($1), teamMemberLogins), teamMembers => $23 => $24 => $25 => Data_Promise_liftIO_HasIO_Promise(Text_PrettyPrint_Prettyprinter_Render_Terminal_putDoc(Text_PrettyPrint_Prettyprinter_Doc_vsep(Prelude_Interfaces_x3cx24x3e(csegen_76(), $30 => Main_n__4887_2015_putNameLn($1, $2, $0, $30), teamMembers))), $23, $24, $25), $17, $18), $3, $4);
 }
 
 function Main_handleConfiguredArgs($0, $1, $2, $3) {
  switch($3.h) {
-  case 0: return $5 => $6 => Data_Promise_reject('You must specify a subcommand as the first argument to harmony.', $5, $6);
+  case 0: return Prelude_IO_putStrLn(csegen_20(), Help_help(Data_Config_rf__colors($0)));
   case undefined: {
    switch($3.a1) {
+    case 'reviews': {
+     switch($3.a2.h) {
+      case undefined: {
+       switch($3.a2.a1) {
+        case '--json': {
+         switch($3.a2.a2.h) {
+          case undefined: {
+           return $11 => {
+            switch($3.a2.a2.a2.h) {
+             case 0: {
+              return $13 => {
+               const $14 = Data_String_parsePositive(csegen_2(), $3.a2.a2.a1);
+               switch($14.h) {
+                case undefined: return Data_Promise_x3ex3ex3d_Monad_Promise($1b => $1c => FFI_GitHub_listPullReviewsJsonStr($2, $0.a2, $0.a3, $14.a1, $1b, $1c), reviewsJsonStr => Prelude_IO_putStr(csegen_20(), reviewsJsonStr), $11, $13);
+                case 0: return Data_Promise_pure_Applicative_Promise(0, $11, $13);
+               }
+              };
+             }
+             default: return $31 => Data_Promise_reject(Prelude_Types_String_x2bx2b('Unexpected command line arguments: ', Prelude_Types_String_x2bx2b(Prelude_Show_show_Show_x28Listx20x24ax29(csegen_79(), $3), '.')), $11, $31);
+            }
+           };
+          }
+          default: return $40 => $41 => Data_Promise_reject(Prelude_Types_String_x2bx2b('Unexpected command line arguments: ', Prelude_Types_String_x2bx2b(Prelude_Show_show_Show_x28Listx20x24ax29(csegen_79(), $3), '.')), $40, $41);
+         }
+        }
+        default: return $50 => $51 => Data_Promise_reject(Prelude_Types_String_x2bx2b('Unexpected command line arguments: ', Prelude_Types_String_x2bx2b(Prelude_Show_show_Show_x28Listx20x24ax29(csegen_79(), $3), '.')), $50, $51);
+       }
+      }
+      default: return $60 => $61 => Data_Promise_reject(Prelude_Types_String_x2bx2b('Unexpected command line arguments: ', Prelude_Types_String_x2bx2b(Prelude_Show_show_Show_x28Listx20x24ax29(csegen_79(), $3), '.')), $60, $61);
+     }
+    }
     case 'sync': {
-     return $c => $d => {
+     return $70 => $71 => {
       switch($3.a2.h) {
-       case 0: return Data_Promise_map_Functor_Promise($11 => 0, $13 => $14 => Config_syncConfig($0, $2, 1, $13, $14), $c, $d);
-       default: return Data_Promise_reject(Prelude_Types_String_x2bx2b('Unexpected command line arguments: ', Prelude_Types_String_x2bx2b(Prelude_Show_show_Show_x28Listx20x24ax29(csegen_65(), $3), '.')), $c, $d);
+       case 0: return Data_Promise_map_Functor_Promise($75 => 0, $77 => $78 => Config_syncConfig($0, $2, 1, $77, $78), $70, $71);
+       default: return Data_Promise_reject(Prelude_Types_String_x2bx2b('Unexpected command line arguments: ', Prelude_Types_String_x2bx2b(Prelude_Show_show_Show_x28Listx20x24ax29(csegen_79(), $3), '.')), $70, $71);
       }
      };
     }
     case 'pr': {
-     return $2b => $2c => {
+     return $8f => $90 => {
       switch($3.a2.h) {
        case 0: {
-        const $47 = $48 => {
-         switch($48.h) {
+        const $ab = $ac => {
+         switch($ac.h) {
           case undefined: {
-           switch($48.a1) {
-            case 0: return Prelude_IO_putStrLn(csegen_74(), Data_PullRequest_rf__webURI($0, $48.a2));
-            default: return csegen_75();
+           switch($ac.a1) {
+            case 0: return Prelude_IO_putStrLn(csegen_20(), Data_PullRequest_rf__webURI($0, $ac.a2));
+            default: return csegen_80();
            }
           }
-          default: return csegen_75();
+          default: return csegen_80();
          }
         };
-        return Data_Promise_x3ex3ex3d_Monad_Promise($30 => $31 => Data_Promise_x3ex3ex3d_Monad_Promise($34 => $35 => FFI_Git_currentBranch($1, $34, $35), $3b => $3c => $3d => PullRequest_identifyOrCreatePR($0, $1, $2, $3b, $3c, $3d), $30, $31), $47, $2b, $2c);
+        return Data_Promise_x3ex3ex3d_Monad_Promise($94 => $95 => Data_Promise_x3ex3ex3d_Monad_Promise($98 => $99 => FFI_Git_currentBranch($1, $98, $99), $9f => $a0 => $a1 => PullRequest_identifyOrCreatePR($0, $1, $2, $9f, $a0, $a1), $94, $95), $ab, $8f, $90);
        }
-       default: return Data_Promise_reject(Prelude_Types_String_x2bx2b('Unexpected command line arguments: ', Prelude_Types_String_x2bx2b(Prelude_Show_show_Show_x28Listx20x24ax29(csegen_65(), $3), '.')), $2b, $2c);
+       default: return Data_Promise_reject(Prelude_Types_String_x2bx2b('Unexpected command line arguments: ', Prelude_Types_String_x2bx2b(Prelude_Show_show_Show_x28Listx20x24ax29(csegen_79(), $3), '.')), $8f, $90);
       }
      };
     }
     case 'reflect': {
-     return $64 => $65 => {
+     return $c8 => $c9 => {
       switch($3.a2.h) {
-       case 0: return User_Reflect_reflectOnSelf($0, $2, $64, $65);
-       default: return Data_Promise_reject(Prelude_Types_String_x2bx2b('Unexpected command line arguments: ', Prelude_Types_String_x2bx2b(Prelude_Show_show_Show_x28Listx20x24ax29(csegen_65(), $3), '.')), $64, $65);
+       case 0: return User_Reflect_reflectOnSelf($0, $2, $c8, $c9);
+       default: return Data_Promise_reject(Prelude_Types_String_x2bx2b('Unexpected command line arguments: ', Prelude_Types_String_x2bx2b(Prelude_Show_show_Show_x28Listx20x24ax29(csegen_79(), $3), '.')), $c8, $c9);
       }
      };
     }
+    case 'contribute': {
+     switch($3.a2.h) {
+      case 0: return $df => $e0 => Main_contribute($0, $2, 0n, $df, $e0);
+      case undefined: {
+       switch($3.a2.a2.h) {
+        case 0: return Main_case__handleConfiguredArgs_2491($0, $1, $2, $3.a2.a1, Prelude_Types_fastUnpack($3.a2.a1));
+        default: return $f0 => $f1 => Data_Promise_reject(Prelude_Types_String_x2bx2b('Unexpected command line arguments: ', Prelude_Types_String_x2bx2b(Prelude_Show_show_Show_x28Listx20x24ax29(csegen_79(), $3), '.')), $f0, $f1);
+       }
+      }
+      default: return $100 => $101 => Data_Promise_reject(Prelude_Types_String_x2bx2b('Unexpected command line arguments: ', Prelude_Types_String_x2bx2b(Prelude_Show_show_Show_x28Listx20x24ax29(csegen_79(), $3), '.')), $100, $101);
+     }
+    }
     case 'list': {
      switch($3.a2.h) {
-      case 0: return $7b => $7c => Data_Promise_reject('The list command expects the name of a GitHub Team as an argument.', $7b, $7c);
+      case 0: return $111 => $112 => Data_Promise_reject('The list command expects the name of a GitHub Team as an argument.', $111, $112);
       case undefined: {
-       return $81 => {
+       return $117 => {
         switch($3.a2.a2.h) {
-         case 0: return $83 => Main_listTeam($0, $2, $3.a2.a1, $81, $83);
-         default: return $8a => Data_Promise_reject(Prelude_Types_String_x2bx2b('Unexpected command line arguments: ', Prelude_Types_String_x2bx2b(Prelude_Show_show_Show_x28Listx20x24ax29(csegen_65(), $3), '.')), $81, $8a);
+         case 0: return $119 => Main_listTeam($0, $2, $3.a2.a1, $117, $119);
+         default: return $120 => Data_Promise_reject(Prelude_Types_String_x2bx2b('Unexpected command line arguments: ', Prelude_Types_String_x2bx2b(Prelude_Show_show_Show_x28Listx20x24ax29(csegen_79(), $3), '.')), $117, $120);
         }
        };
       }
-      default: return $99 => $9a => Data_Promise_reject(Prelude_Types_String_x2bx2b('Unexpected command line arguments: ', Prelude_Types_String_x2bx2b(Prelude_Show_show_Show_x28Listx20x24ax29(csegen_65(), $3), '.')), $99, $9a);
+      default: return $12f => $130 => Data_Promise_reject(Prelude_Types_String_x2bx2b('Unexpected command line arguments: ', Prelude_Types_String_x2bx2b(Prelude_Show_show_Show_x28Listx20x24ax29(csegen_79(), $3), '.')), $12f, $130);
      }
     }
     case 'graph': {
      switch($3.a2.h) {
-      case 0: return $aa => $ab => Data_Promise_reject('The graph command expects the name of a GitHub Team as an argument.', $aa, $ab);
+      case 0: return $140 => $141 => Data_Promise_reject('The graph command expects the name of a GitHub Team as an argument.', $140, $141);
       case undefined: {
-       return $b0 => {
+       return $146 => {
         switch($3.a2.a2.h) {
-         case 0: return $b2 => Main_graphTeam($0, $2, $3.a2.a1, $b0, $b2);
-         default: return $b9 => Data_Promise_reject(Prelude_Types_String_x2bx2b('Unexpected command line arguments: ', Prelude_Types_String_x2bx2b(Prelude_Show_show_Show_x28Listx20x24ax29(csegen_65(), $3), '.')), $b0, $b9);
+         case 0: return $148 => Main_graphTeam($0, $2, $3.a2.a1, $146, $148);
+         default: return $14f => Data_Promise_reject(Prelude_Types_String_x2bx2b('Unexpected command line arguments: ', Prelude_Types_String_x2bx2b(Prelude_Show_show_Show_x28Listx20x24ax29(csegen_79(), $3), '.')), $146, $14f);
         }
        };
       }
-      default: return $c8 => $c9 => Data_Promise_reject(Prelude_Types_String_x2bx2b('Unexpected command line arguments: ', Prelude_Types_String_x2bx2b(Prelude_Show_show_Show_x28Listx20x24ax29(csegen_65(), $3), '.')), $c8, $c9);
+      default: return $15e => $15f => Data_Promise_reject(Prelude_Types_String_x2bx2b('Unexpected command line arguments: ', Prelude_Types_String_x2bx2b(Prelude_Show_show_Show_x28Listx20x24ax29(csegen_79(), $3), '.')), $15e, $15f);
      }
     }
     case 'assign': {
      switch($3.a2.h) {
-      case 0: return $d9 => $da => Data_Promise_reject('The assign commaand expects one or more names of GitHub Teams or Users as arguments.', $d9, $da);
+      case 0: return $16f => $170 => Data_Promise_reject('The assign commaand expects one or more names of GitHub Teams or Users as arguments.', $16f, $170);
       case undefined: {
        switch($3.a2.a1) {
         case '--dry': {
-         return $e0 => {
+         return $176 => {
           switch($3.a2.a2.h) {
-           case 0: return $e2 => Data_Promise_reject('The assign commaand expects one or more names of GitHub Teams or Users as arguments.', $e0, $e2);
-           case undefined: return $e7 => Main_assign($0, $1, $2, {a1: $3.a2.a2.a1, a2: $3.a2.a2.a2}, 1, $e0, $e7);
-           default: return $f2 => Main_assign($0, $1, $2, {a1: $3.a2.a1, a2: $3.a2.a2}, 0, $e0, $f2);
+           case 0: return $178 => Data_Promise_reject('The assign commaand expects one or more names of GitHub Teams or Users as arguments.', $176, $178);
+           case undefined: return $17d => Main_assign($0, $1, $2, {a1: $3.a2.a2.a1, a2: $3.a2.a2.a2}, 1, $176, $17d);
+           default: return $188 => Main_assign($0, $1, $2, {a1: $3.a2.a1, a2: $3.a2.a2}, 0, $176, $188);
           }
          };
         }
-        default: return $fd => $fe => Main_assign($0, $1, $2, {a1: $3.a2.a1, a2: $3.a2.a2}, 0, $fd, $fe);
+        default: return $193 => $194 => Main_assign($0, $1, $2, {a1: $3.a2.a1, a2: $3.a2.a2}, 0, $193, $194);
        }
       }
-      default: return $109 => $10a => Data_Promise_reject(Prelude_Types_String_x2bx2b('Unexpected command line arguments: ', Prelude_Types_String_x2bx2b(Prelude_Show_show_Show_x28Listx20x24ax29(csegen_65(), $3), '.')), $109, $10a);
+      default: return $19f => $1a0 => Data_Promise_reject(Prelude_Types_String_x2bx2b('Unexpected command line arguments: ', Prelude_Types_String_x2bx2b(Prelude_Show_show_Show_x28Listx20x24ax29(csegen_79(), $3), '.')), $19f, $1a0);
      }
     }
-    default: return $119 => $11a => Data_Promise_reject(Prelude_Types_String_x2bx2b('Unexpected command line arguments: ', Prelude_Types_String_x2bx2b(Prelude_Show_show_Show_x28Listx20x24ax29(csegen_65(), $3), '.')), $119, $11a);
+    default: return $1af => $1b0 => Data_Promise_reject(Prelude_Types_String_x2bx2b('Unexpected command line arguments: ', Prelude_Types_String_x2bx2b(Prelude_Show_show_Show_x28Listx20x24ax29(csegen_79(), $3), '.')), $1af, $1b0);
    }
   }
-  default: return $129 => $12a => Data_Promise_reject(Prelude_Types_String_x2bx2b('Unexpected command line arguments: ', Prelude_Types_String_x2bx2b(Prelude_Show_show_Show_x28Listx20x24ax29(csegen_65(), $3), '.')), $129, $12a);
+  default: return $1bf => $1c0 => Data_Promise_reject(Prelude_Types_String_x2bx2b('Unexpected command line arguments: ', Prelude_Types_String_x2bx2b(Prelude_Show_show_Show_x28Listx20x24ax29(csegen_79(), $3), '.')), $1bf, $1c0);
  }
 }
 
@@ -1637,31 +1857,31 @@ function Main_handleArgs($0, $1, $2, $3) {
        switch($3.a2.a2.h) {
         case undefined: {
          switch($3.a2.a2.a2.h) {
-          case 0: return Main_bashCompletion(csegen_20(), $3.a2.a1, $3.a2.a2.a1);
-          default: return Main_resolvex27x27($10 => $11 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3dx3cx3c(csegen_71(), $18 => $19 => $1a => Config_syncIfOld($1, $18, $19, $1a), $21 => $22 => Config_loadOrCreateConfig($0, $1, $2, $21, $22)), _ => Main_handleConfiguredArgs(_, $0, $1, $3), $10, $11));
+          case 0: return Main_bashCompletion(csegen_43(), $3.a2.a1, $3.a2.a2.a1);
+          default: return Main_resolvex27x27($10 => $11 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3dx3cx3c(csegen_17(), $18 => $19 => $1a => Config_syncIfOld($1, $18, $19, $1a), $21 => $22 => Config_loadOrCreateConfig($0, $1, $2, $21, $22)), _ => Main_handleConfiguredArgs(_, $0, $1, $3), $10, $11));
          }
         }
-        default: return Main_resolvex27x27($33 => $34 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3dx3cx3c(csegen_71(), $3b => $3c => $3d => Config_syncIfOld($1, $3b, $3c, $3d), $44 => $45 => Config_loadOrCreateConfig($0, $1, $2, $44, $45)), _ => Main_handleConfiguredArgs(_, $0, $1, $3), $33, $34));
+        default: return Main_resolvex27x27($33 => $34 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3dx3cx3c(csegen_17(), $3b => $3c => $3d => Config_syncIfOld($1, $3b, $3c, $3d), $44 => $45 => Config_loadOrCreateConfig($0, $1, $2, $44, $45)), _ => Main_handleConfiguredArgs(_, $0, $1, $3), $33, $34));
        }
       }
-      default: return Main_resolvex27x27($56 => $57 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3dx3cx3c(csegen_71(), $5e => $5f => $60 => Config_syncIfOld($1, $5e, $5f, $60), $67 => $68 => Config_loadOrCreateConfig($0, $1, $2, $67, $68)), _ => Main_handleConfiguredArgs(_, $0, $1, $3), $56, $57));
+      default: return Main_resolvex27x27($56 => $57 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3dx3cx3c(csegen_17(), $5e => $5f => $60 => Config_syncIfOld($1, $5e, $5f, $60), $67 => $68 => Config_loadOrCreateConfig($0, $1, $2, $67, $68)), _ => Main_handleConfiguredArgs(_, $0, $1, $3), $56, $57));
      }
     }
     case '--bash-completion-script': {
      switch($3.a2.h) {
-      case 0: return Prelude_IO_putStrLn(csegen_20(), BashCompletion_script());
-      default: return Main_resolvex27x27($7f => $80 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3dx3cx3c(csegen_71(), $87 => $88 => $89 => Config_syncIfOld($1, $87, $88, $89), $90 => $91 => Config_loadOrCreateConfig($0, $1, $2, $90, $91)), _ => Main_handleConfiguredArgs(_, $0, $1, $3), $7f, $80));
+      case 0: return Prelude_IO_putStrLn(csegen_43(), BashCompletion_script());
+      default: return Main_resolvex27x27($7f => $80 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3dx3cx3c(csegen_17(), $87 => $88 => $89 => Config_syncIfOld($1, $87, $88, $89), $90 => $91 => Config_loadOrCreateConfig($0, $1, $2, $90, $91)), _ => Main_handleConfiguredArgs(_, $0, $1, $3), $7f, $80));
      }
     }
-    default: return Main_resolvex27x27($a2 => $a3 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3dx3cx3c(csegen_71(), $aa => $ab => $ac => Config_syncIfOld($1, $aa, $ab, $ac), $b3 => $b4 => Config_loadOrCreateConfig($0, $1, $2, $b3, $b4)), _ => Main_handleConfiguredArgs(_, $0, $1, $3), $a2, $a3));
+    default: return Main_resolvex27x27($a2 => $a3 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3dx3cx3c(csegen_17(), $aa => $ab => $ac => Config_syncIfOld($1, $aa, $ab, $ac), $b3 => $b4 => Config_loadOrCreateConfig($0, $1, $2, $b3, $b4)), _ => Main_handleConfiguredArgs(_, $0, $1, $3), $a2, $a3));
    }
   }
-  default: return Main_resolvex27x27($c5 => $c6 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3dx3cx3c(csegen_71(), $cd => $ce => $cf => Config_syncIfOld($1, $cd, $ce, $cf), $d6 => $d7 => Config_loadOrCreateConfig($0, $1, $2, $d6, $d7)), _ => Main_handleConfiguredArgs(_, $0, $1, $3), $c5, $c6));
+  default: return Main_resolvex27x27($c5 => $c6 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3dx3cx3c(csegen_17(), $cd => $ce => $cf => Config_syncIfOld($1, $cd, $ce, $cf), $d6 => $d7 => Config_loadOrCreateConfig($0, $1, $2, $d6, $d7)), _ => Main_handleConfiguredArgs(_, $0, $1, $3), $c5, $c6));
  }
 }
 
 function Main_graphTeam($0, $1, $2, $3, $4) {
- return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listTeamMembers($1, $0.a2, $2), teamMemberLogins => $d => $e => Data_Promise_x3ex3ex3d_Monad_Promise($11 => $12 => PullRequest_listReviewers($0, $1, csegen_80(), $11, $12), $1b => $1c => $1d => $1e => Data_Promise_liftIO_HasIO_Promise(Text_PrettyPrint_Prettyprinter_Render_Terminal_putDoc(Main_n__4866_1886_maybeDecorated($1, $2, $0, Reviewer_reviewsGraph(csegen_49(), {a1: ann => $2e => Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($2e), a2: ann => $32 => $33 => Text_PrettyPrint_Prettyprinter_Doc_prettyPrec_Pretty_String($32, $33)}, $1b.a2, $1b.a1, teamMemberLogins))), $1c, $1d, $1e), $d, $e), $3, $4);
+ return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listTeamMembers($1, $0.a2, $2), teamMemberLogins => $d => $e => Data_Promise_x3ex3ex3d_Monad_Promise($11 => $12 => PullRequest_listReviewers($0, $1, csegen_85(), $11, $12), $1b => $1c => $1d => $1e => Data_Promise_liftIO_HasIO_Promise(Text_PrettyPrint_Prettyprinter_Render_Terminal_putDoc(Main_n__4971_2107_maybeDecorated($1, $2, $0, Reviewer_reviewsGraph(csegen_72(), {a1: ann => $2e => Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($2e), a2: ann => $32 => $33 => Text_PrettyPrint_Prettyprinter_Doc_prettyPrec_Pretty_String($32, $33)}, $1b.a2, $1b.a1, teamMemberLogins))), $1c, $1d, $1e), $d, $e), $3, $4);
 }
 
 function Main_exitError($0, $1) {
@@ -1682,6 +1902,26 @@ function Main_exitError($0, $1) {
  return $0.a1.a2(undefined)(undefined)(System_File_Meta_isTTY($0, System_File_Virtual_stderr()))($f);
 }
 
+function Main_contribute($0, $1, $2, $3, $4) {
+ const $11 = openPrs => $12 => $13 => {
+  const $1e = myLogin => {
+   const $21 = $22 => {
+    switch(Data_PullRequest_isAuthor(myLogin, $22)) {
+     case 1: return 0;
+     case 0: return 1;
+    }
+   };
+   const $1f = Data_List_filter($21, openPrs);
+   const $28 = Data_List_partition($2b => Data_PullRequest_isRequestedReviewer(myLogin, $2b), $1f);
+   const $30 = Prelude_Interfaces_mapHom({a1: d => b => c => a => $34 => $35 => $36 => ({a1: $34($36.a1), a2: $35($36.a2)}), a2: b => c => a => $3f => $40 => ({a1: $3f($40.a1), a2: $40.a2}), a3: a => d => b => $47 => $48 => ({a1: $48.a1, a2: $47($48.a2)})}, $4f => Data_List_sortBy($52 => $53 => Prelude_Basics_on(csegen_91(), $58 => $58.a2, $52, $53), $4f), $28);
+   const $5e = Prelude_Types_map_Functor_Maybe($61 => Data_PullRequest_rf__webURI($0, $61), Data_List_headx27(Data_List_drop($2, Prelude_Types_List_tailRecAppend($30.a1, $30.a2))));
+   return Main_n__5057_2192_printResult($1, $2, $0, $5e);
+  };
+  return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_64(), csegen_90(), FFI_GitHub_getSelf($1)), $1e, $12, $13);
+ };
+ return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listPullRequests($1, $0.a2, $0.a3, {a1: 0}, csegen_85()), $11, $3, $4);
+}
+
 function Main_bashCompletion($0, $1, $2) {
  const $f = $10 => {
   switch($10.h) {
@@ -1697,17 +1937,17 @@ function Main_bashCompletion($0, $1, $2) {
 
 function Main_assign($0, $1, $2, $3, $4, $5, $6) {
  return Data_Promise_x3ex3ex3d_Monad_Promise($9 => $a => Data_Promise_x3ex3ex3d_Monad_Promise($d => $e => FFI_Git_currentBranch($1, $d, $e), $14 => $15 => $16 => PullRequest_identifyOrCreatePR($0, $1, $2, $14, $15, $16), $9, $a), $21 => $22 => $24 => {
-  const $25 = Main_n__4674_1703_partitionedArgs($0, $1, $2, $4, $3);
+  const $25 = Main_n__4779_1924_partitionedArgs($0, $1, $2, $4, $3);
   return PullRequest_requestReviewers($0, $2, $21.a2, $25.a2, $25.a1, $4, $22, $24);
  }, $5, $6);
 }
 
-function User_Reflect_case__casex20blockx20inx20reflectOnSelf_1419($0, $1, $2, $3, $4, $5, $6) {
- const $8 = Prelude_Interfaces_mapHom({a1: d => b => c => a => $c => $d => $e => ({a1: $c($e.a1), a2: $d($e.a2)}), a2: b => c => a => $17 => $18 => ({a1: $17($18.a1), a2: $18.a2}), a3: a => d => b => $1f => $20 => ({a1: $20.a1, a2: $1f($20.a2)})}, $27 => Data_List_headx27(Data_List_sort({a1: {a1: $2e => $2f => Data_Date_x3dx3d_Eq_Date($2e, $2f), a2: $34 => $35 => Data_Date_x2fx3d_Eq_Date($34, $35)}, a2: $3a => $3b => Data_Date_compare_Ord_Date($3a, $3b), a3: $40 => $41 => Data_Date_x3c_Ord_Date($40, $41), a4: $46 => $47 => Data_Date_x3e_Ord_Date($46, $47), a5: $4c => $4d => Data_Date_x3cx3d_Ord_Date($4c, $4d), a6: $52 => $53 => Data_Date_x3ex3d_Ord_Date($52, $53), a7: $58 => $59 => Data_Date_max_Ord_Date($58, $59), a8: $5e => $5f => Data_Date_min_Ord_Date($5e, $5f)}, Prelude_Types_map_Functor_List($66 => $66.a2, $27))), {a1: $4, a2: $6.a1});
- return Prelude_IO_putStrLn(csegen_74(), Util_renderString($0, User_Reflect_print(Prelude_Types_String_length(User_Reflect_intro()), Prelude_Types_List_length($6.a1), Prelude_Types_List_length($6.a2), Prelude_Types_List_length($5), Prelude_Types_List_length($4), $8.a1, $8.a2)));
+function User_Reflect_case__casex20blockx20inx20reflectOnSelf_1618($0, $1, $2, $3, $4, $5, $6, $7, $8, $9) {
+ const $b = Prelude_Interfaces_mapHom({a1: d => b => c => a => $f => $10 => $11 => ({a1: $f($11.a1), a2: $10($11.a2)}), a2: b => c => a => $1a => $1b => ({a1: $1a($1b.a1), a2: $1b.a2}), a3: a => d => b => $22 => $23 => ({a1: $23.a1, a2: $22($23.a2)})}, $2a => Data_List_headx27(Data_List_sort({a1: {a1: $31 => $32 => Data_Date_x3dx3d_Eq_Date($31, $32), a2: $37 => $38 => Data_Date_x2fx3d_Eq_Date($37, $38)}, a2: $3d => $3e => Data_Date_compare_Ord_Date($3d, $3e), a3: $43 => $44 => Data_Date_x3c_Ord_Date($43, $44), a4: $49 => $4a => Data_Date_x3e_Ord_Date($49, $4a), a5: $4f => $50 => Data_Date_x3cx3d_Ord_Date($4f, $50), a6: $55 => $56 => Data_Date_x3ex3d_Ord_Date($55, $56), a7: $5b => $5c => Data_Date_max_Ord_Date($5b, $5c), a8: $61 => $62 => Data_Date_min_Ord_Date($61, $62)}, Prelude_Types_map_Functor_List(csegen_106(), $2a))), {a1: $7, a2: $9.a1});
+ return Prelude_IO_putStrLn(csegen_20(), Util_renderString($0, User_Reflect_print(Prelude_Types_String_length(User_Reflect_intro()), Prelude_Types_List_length($4), Prelude_Types_List_length($9.a1), Prelude_Types_List_length($9.a2), Prelude_Types_List_length($8), Prelude_Types_List_length($7), $5, $b.a1, $b.a2)));
 }
 
-function User_Reflect_n__4102_911_ital($0, $1) {
+function User_Reflect_n__4178_925_ital($0, $1) {
  return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($1));
 }
 
@@ -1715,55 +1955,68 @@ const User_Reflect_rightTitle = __lazy(function () {
  return 'authored';
 });
 
+const User_Reflect_reviewDetailsCount = __lazy(function () {
+ return 25n;
+});
+
 function User_replicatex27($0, $1, $2) {
  return Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color($0), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Data_String_replicate($1, $2)));
 }
 
 function User_Reflect_reflectOnSelf($0, $1, $2, $3) {
- const $13 = history => $14 => $15 => {
-  const $21 = myLogin => {
-   const $22 = Prelude_Interfaces_mapHom({a1: d => b => c => a => $26 => $27 => $28 => ({a1: $26($28.a1), a2: $27($28.a2)}), a2: b => c => a => $31 => $32 => ({a1: $31($32.a1), a2: $32.a2}), a3: a => d => b => $39 => $3a => ({a1: $3a.a1, a2: $39($3a.a2)})}, $41 => Data_List_filter($44 => Prelude_EqOrd_x3dx3d_Eq_String($44.a3, myLogin), $41), history);
-   return User_Reflect_case__casex20blockx20inx20reflectOnSelf_1419($0, $1, history, myLogin, $22.a1, $22.a2, Prelude_Interfaces_mapHom({a1: d => b => c => a => $56 => $57 => $58 => ({a1: $56($58.a1), a2: $57($58.a2)}), a2: b => c => a => $61 => $62 => ({a1: $61($62.a1), a2: $62.a2}), a3: a => d => b => $69 => $6a => ({a1: $6a.a1, a2: $69($6a.a2)})}, $71 => Data_List_filter($74 => Prelude_Interfaces_any(csegen_114(), $79 => Prelude_EqOrd_x3dx3d_Eq_String($79, myLogin), $74.a5), $71), history));
+ const $b = prs => $c => $d => {
+  const $18 = myLogin => $19 => $1a => {
+   const $38 = reviews => {
+    const $39 = Prelude_Types_map_Functor_Maybe(csegen_109(), Data_List_headx27(Data_List_sortBy($42 => $43 => Prelude_Basics_on(csegen_91(), csegen_109(), $42, $43), reviews)));
+    const $4c = PullRequest_tuple(prs);
+    const $4f = Prelude_Interfaces_mapHom({a1: d => b => c => a => $53 => $54 => $55 => ({a1: $53($55.a1), a2: $54($55.a2)}), a2: b => c => a => $5e => $5f => ({a1: $5e($5f.a1), a2: $5f.a2}), a3: a => d => b => $66 => $67 => ({a1: $67.a1, a2: $66($67.a2)})}, $6e => Data_List_filter($71 => Prelude_EqOrd_x3dx3d_Eq_String($71.a3, myLogin), $6e), $4c);
+    return User_Reflect_case__casex20blockx20inx20reflectOnSelf_1618($0, $1, prs, myLogin, reviews, $39, $4c, $4f.a1, $4f.a2, Prelude_Interfaces_mapHom({a1: d => b => c => a => $86 => $87 => $88 => ({a1: $86($88.a1), a2: $87($88.a2)}), a2: b => c => a => $91 => $92 => ({a1: $91($92.a1), a2: $92.a2}), a3: a => d => b => $99 => $9a => ({a1: $9a.a1, a2: $99($9a.a2)})}, $a1 => Data_List_filter($a4 => Prelude_Interfaces_any(csegen_126(), $a9 => Prelude_EqOrd_x3dx3d_Eq_String($a9, myLogin), $a4.a5), $a1), $4c));
+   };
+   return Data_Promise_x3ex3ex3d_Monad_Promise(PullRequest_reviewsForUser($0, $1, myLogin, Data_List_take(Data_Fin_cast_Cast_x28Finx20x24nx29_Nat(User_Reflect_reviewDetailsCount()), Prelude_Types_List_reverse(Data_List_sortBy($2c => $2d => Prelude_Basics_on(csegen_91(), csegen_106(), $2c, $2d), PullRequest_combined(prs))))), $38, $19, $1a);
   };
-  return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_41(), $1c => $1c.a1, FFI_GitHub_getSelf($1)), $21, $14, $15);
+  return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_64(), csegen_90(), FFI_GitHub_getSelf($1)), $18, $c, $d);
  };
- return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_41(), $a => PullRequest_tuple($a), PullRequest_listPartitionedPRs($0, $1, csegen_80())), $13, $2, $3);
+ return Data_Promise_x3ex3ex3d_Monad_Promise(PullRequest_listPartitionedPRs($0, $1, User_Reflect_prCount()), $b, $2, $3);
 }
 
-function User_Reflect_print($0, $1, $2, $3, $4, $5, $6) {
- return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: User_Reflect_graph($0, $1, $2, $3, $4), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: User_Reflect_details($0, $1, $2, $3, $4, $5, $6), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {h: 0}}}}}});
+function User_Reflect_print($0, $1, $2, $3, $4, $5, $6, $7, $8) {
+ return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: User_Reflect_graph($0, $1, $2, $3, $4, $5), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: User_Reflect_details($0, $1, $2, $3, $4, $5, $6, $7, $8), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {h: 0}}}}}});
 }
 
+const User_Reflect_prCount = __lazy(function () {
+ return csegen_85();
+});
+
 const User_Reflect_leftTitle = __lazy(function () {
  return 'requested';
 });
 
 const User_Reflect_intro = __lazy(function () {
- return 'Your current pull request summary (out of the past 100 PRs):';
+ return Prelude_Types_String_x2bx2b('Your current pull request summary (out of the past ', Prelude_Types_String_x2bx2b(Data_Fin_show_Show_x28Finx20x24nx29(User_Reflect_prCount()), ' PRs):'));
 });
 
 function User_Reflect_header($0) {
- return Text_PrettyPrint_Prettyprinter_Doc_indent(Prelude_Cast_cast_Cast_Nat_Int($0), Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: User_Reflect_n__4102_911_ital($0, User_Reflect_leftTitle()), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(' '), a2: {a1: User_Reflect_n__4102_911_ital($0, User_Reflect_rightTitle()), a2: {h: 0}}}}));
+ return Text_PrettyPrint_Prettyprinter_Doc_indent(Prelude_Cast_cast_Cast_Nat_Int($0), Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: User_Reflect_n__4178_925_ital($0, User_Reflect_leftTitle()), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(' '), a2: {a1: User_Reflect_n__4178_925_ital($0, User_Reflect_rightTitle()), a2: {h: 0}}}}));
 }
 
-function User_Reflect_graph($0, $1, $2, $3, $4) {
- const $5 = Prelude_Types_x2b_Num_Nat($1, $2);
- const $9 = Prelude_Types_x2b_Num_Nat($4, $3);
- const $d = Prelude_Types_foldr_Foldable_List(csegen_115(), Prelude_Types_String_length(User_Reflect_leftTitle()), {a1: $5, a2: {a1: $9, a2: {h: 0}}});
- const $1a = Prelude_Types_foldr_Foldable_List(csegen_115(), Prelude_Types_String_length(User_Reflect_rightTitle()), {a1: $5, a2: {a1: $9, a2: {h: 0}}});
- const $27 = Prelude_Types_x2b_Num_Nat(Prelude_Types_x2b_Num_Nat($d, $1a), 3n);
- const $2e = (Prelude_Num_x2f_Fractional_Double(Prelude_Cast_cast_Cast_Nat_Double($0), 2.0)-Prelude_Num_x2f_Fractional_Double(Prelude_Cast_cast_Cast_Nat_Double($27), 2.0));
- const $3b = Prelude_Types_x2b_Num_Nat(Prelude_Cast_cast_Cast_Double_Nat($2e), Prelude_Types_prim__integerToNat(($d-Prelude_Types_String_length(User_Reflect_leftTitle()))));
- const $48 = Prelude_Types_x2b_Num_Nat(Prelude_Cast_cast_Cast_Double_Nat($2e), Prelude_Types_prim__integerToNat(($d-$5)));
- return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: User_Reflect_header($3b), a2: {a1: User_Reflect_chart($0, $1, $2, $3, $4, $48), a2: {h: 0}}});
+function User_Reflect_graph($0, $1, $2, $3, $4, $5) {
+ const $6 = Prelude_Types_x2b_Num_Nat($2, $3);
+ const $a = Prelude_Types_x2b_Num_Nat($5, $4);
+ const $e = Prelude_Types_foldr_Foldable_List(csegen_129(), Prelude_Types_String_length(User_Reflect_leftTitle()), {a1: Prelude_Types_x2b_Num_Nat($6, $1), a2: {a1: $a, a2: {h: 0}}});
+ const $1e = Prelude_Types_foldr_Foldable_List(csegen_129(), Prelude_Types_String_length(User_Reflect_rightTitle()), {a1: $6, a2: {a1: $a, a2: {h: 0}}});
+ const $2b = Prelude_Types_x2b_Num_Nat(Prelude_Types_x2b_Num_Nat($e, $1e), 3n);
+ const $32 = (Prelude_Num_x2f_Fractional_Double(Prelude_Cast_cast_Cast_Nat_Double($0), 2.0)-Prelude_Num_x2f_Fractional_Double(Prelude_Cast_cast_Cast_Nat_Double($2b), 2.0));
+ const $3f = Prelude_Types_x2b_Num_Nat(Prelude_Cast_cast_Cast_Double_Nat($32), Prelude_Types_prim__integerToNat(($e-Prelude_Types_String_length(User_Reflect_leftTitle()))));
+ const $4c = Prelude_Types_x2b_Num_Nat(Prelude_Cast_cast_Cast_Double_Nat($32), Prelude_Types_prim__integerToNat(($e-Prelude_Types_x2b_Num_Nat($6, $1))));
+ return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: User_Reflect_header($3f), a2: {a1: User_Reflect_chart($0, $1, $2, $3, $4, $5, $4c), a2: {h: 0}}});
 }
 
-function User_Reflect_details($0, $1, $2, $3, $4, $5, $6) {
- 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_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_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('open:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Nat($1), a2: {h: 0}}})}, a2: {a1: Prelude_Interfaces_x3cx26x3e(csegen_118(), $6, csegen_119()), a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('closed:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Nat($2), a2: {h: 0}}})}, a2: {h: 0}}}}))), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: 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_pretty_Pretty_Nat($4), a2: {h: 0}}})}, a2: {a1: Prelude_Interfaces_x3cx26x3e(csegen_118(), $5, csegen_119()), a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('closed:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Nat($3), a2: {h: 0}}})}, a2: {h: 0}}}}))), a2: {h: 0}}}}}}}});
+function User_Reflect_details($0, $1, $2, $3, $4, $5, $6, $7, $8) {
+ return Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(User_Reflect_intro()), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_underline(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Requested Reviews:')), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_vsep(Data_List_catMaybes({a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('unreviewed:')}, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_vsep(Data_List_catMaybes({a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('open:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(3), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Nat($2)), a2: {h: 0}}})}, a2: {a1: Prelude_Interfaces_x3cx26x3e(csegen_133(), $8, csegen_134()), a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('closed:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(1), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Nat($3)), a2: {h: 0}}})}, a2: {h: 0}}}})))}, a2: {a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('reviews*:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(2), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Nat($1)), a2: {h: 0}}})}, a2: {a1: Prelude_Interfaces_x3cx26x3e(csegen_133(), $6, date => Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('most recent:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Data_Date_show_Show_Date(date)), a2: {h: 0}}}))), a2: {h: 0}}}}}))), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_underline(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Authored Pulls:')), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_indent(2, Text_PrettyPrint_Prettyprinter_Doc_vsep(Data_List_catMaybes({a1: {a1: Text_PrettyPrint_Prettyprinter_Doc_hsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('open:'), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(3), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_Nat($5)), a2: {h: 0}}})}, a2: {a1: Prelude_Interfaces_x3cx26x3e(csegen_133(), $7, csegen_134()), 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_String_x2bx2b('*review count (not PR count) of most recent ', Prelude_Types_String_x2bx2b(Data_Fin_show_Show_x28Finx20x24nx29(User_Reflect_reviewDetailsCount()), ' PRs.')))), a2: {h: 0}}}}}}}}}});
 }
 
-function User_Reflect_chart($0, $1, $2, $3, $4, $5) {
- return Text_PrettyPrint_Prettyprinter_Doc_indent(Prelude_Cast_cast_Cast_Nat_Int($5), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(User_replicatex27(2, $2, '\u{b7}'), User_replicatex27(3, $1, '<')), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('|'), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(User_replicatex27(3, $4, '>'), User_replicatex27(2, $3, '\u{b7}')))));
+function User_Reflect_chart($0, $1, $2, $3, $4, $5, $6) {
+ return Text_PrettyPrint_Prettyprinter_Doc_indent(Prelude_Cast_cast_Cast_Nat_Int($6), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(User_replicatex27(2, $1, '\u{b7}'), User_replicatex27(1, $3, '\u{25e6}')), User_replicatex27(3, $2, '<')), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e(Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('|'), Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(User_replicatex27(3, $5, '>'), User_replicatex27(2, $4, '\u{b7}')))));
 }
 
 const Util_n__3784_711_startOver = __lazy(function () {
@@ -1893,8 +2146,8 @@ function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__3239_766_push($0, $1,
 function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__3239_768_pop($0, $1, $2) {
  const $9 = $a => {
   switch($a.h) {
-   case undefined: return Prelude_Interfaces_x3ex3e(csegen_136(), $10 => ($1.value=$a.a2), () => $16 => Control_Monad_ST_pure_Applicative_x28STx20x24sx29({a1: $a.a1}, $16));
-   case 0: return csegen_137();
+   case undefined: return Prelude_Interfaces_x3ex3e(csegen_159(), $10 => ($1.value=$a.a2), () => $16 => Control_Monad_ST_pure_Applicative_x28STx20x24sx29({a1: $a.a1}, $16));
+   case 0: return csegen_160();
   }
  };
  return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($5 => ($1.value), $9, $2);
@@ -1913,16 +2166,16 @@ function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__3239_767_peek($0, $1,
 function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__3239_770_go($0, $1, $2, $3) {
  switch($3.h) {
   case 0: return $5 => Control_Monad_ST_pure_Applicative_x28STx20x24sx29(0, $5);
-  case 1: return Prelude_Interfaces_x3ex3e(csegen_136(), $d => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__3239_769_writeOutput($0, $2, Data_String_singleton($3.a1), $d), () => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__3239_770_go($0, $1, $2, $3.a2()));
-  case 2: return Prelude_Interfaces_x3ex3e(csegen_136(), $20 => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__3239_769_writeOutput($0, $2, $3.a2, $20), () => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__3239_770_go($0, $1, $2, $3.a3()));
-  case 3: return Prelude_Interfaces_x3ex3e(csegen_136(), $31 => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__3239_769_writeOutput($0, $2, Prelude_Types_x3cx2bx3e_Semigroup_String(Data_String_singleton('\n'), Text_PrettyPrint_Prettyprinter_Doc_textSpaces($3.a1)), $31), () => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__3239_770_go($0, $1, $2, $3.a2));
+  case 1: return Prelude_Interfaces_x3ex3e(csegen_159(), $d => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__3239_769_writeOutput($0, $2, Data_String_singleton($3.a1), $d), () => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__3239_770_go($0, $1, $2, $3.a2()));
+  case 2: return Prelude_Interfaces_x3ex3e(csegen_159(), $20 => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__3239_769_writeOutput($0, $2, $3.a2, $20), () => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__3239_770_go($0, $1, $2, $3.a3()));
+  case 3: return Prelude_Interfaces_x3ex3e(csegen_159(), $31 => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__3239_769_writeOutput($0, $2, Prelude_Types_x3cx2bx3e_Semigroup_String(Data_String_singleton('\n'), Text_PrettyPrint_Prettyprinter_Doc_textSpaces($3.a1)), $31), () => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__3239_770_go($0, $1, $2, $3.a2));
   case 4: {
    return $44 => {
     const $4c = $4d => {
      switch($4d.h) {
       case undefined: {
        const $4f = Prelude_Types_x3cx2bx3e_Semigroup_x28Listx20x24ax29($3.a1, $4d.a1);
-       return Prelude_Interfaces_x3ex3e(csegen_136(), $57 => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__3239_766_push($0, $1, $4f, $57), () => Prelude_Interfaces_x3ex3e(csegen_136(), $62 => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__3239_769_writeOutput($0, $2, Control_ANSI_SGR_escapeSGR($4f), $62), () => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__3239_770_go($0, $1, $2, $3.a2)));
+       return Prelude_Interfaces_x3ex3e(csegen_159(), $57 => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__3239_766_push($0, $1, $4f, $57), () => Prelude_Interfaces_x3ex3e(csegen_159(), $62 => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__3239_769_writeOutput($0, $2, Control_ANSI_SGR_escapeSGR($4f), $62), () => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__3239_770_go($0, $1, $2, $3.a2)));
       }
       case 0: return $70 => ($1.value={h: 0});
      }
@@ -1935,7 +2188,7 @@ function Text_PrettyPrint_Prettyprinter_Render_Terminal_n__3239_770_go($0, $1, $
     const $7e = _ => $7f => {
      const $87 = $88 => {
       switch($88.h) {
-       case undefined: return Prelude_Interfaces_x3ex3e(csegen_136(), $8e => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__3239_769_writeOutput($0, $2, Control_ANSI_SGR_escapeSGR({a1: {h: 0}, a2: $88.a1}), $8e), () => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__3239_770_go($0, $1, $2, $3.a1));
+       case undefined: return Prelude_Interfaces_x3ex3e(csegen_159(), $8e => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__3239_769_writeOutput($0, $2, Control_ANSI_SGR_escapeSGR({a1: {h: 0}, a2: $88.a1}), $8e), () => Text_PrettyPrint_Prettyprinter_Render_Terminal_n__3239_770_go($0, $1, $2, $3.a1));
        case 0: return $9e => ($1.value={h: 0});
       }
      };
@@ -1952,17 +2205,17 @@ const Text_PrettyPrint_Prettyprinter_Render_Terminal_underline = __lazy(function
 });
 
 function Text_PrettyPrint_Prettyprinter_Render_Terminal_renderString($0) {
- return Data_Maybe_fromMaybe(() => '<internal pretty printing error>', Control_Monad_ST_runST($6 => $7 => Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($a => Control_Monad_ST_newSTRef({a1: Prelude_Types_neutral_Monoid_x28Listx20x24ax29(), a2: {h: 0}}, $a), styleStackRef => $12 => Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($15 => Control_Monad_ST_newSTRef(Prelude_Types_neutral_Monoid_String(), $15), outputRef => Prelude_Interfaces_x3ex3e(csegen_136(), Text_PrettyPrint_Prettyprinter_Render_Terminal_n__3239_770_go($0, styleStackRef, outputRef, $0), () => $25 => {
+ return Data_Maybe_fromMaybe(() => '<internal pretty printing error>', Control_Monad_ST_runST($6 => $7 => Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($a => Control_Monad_ST_newSTRef({a1: Prelude_Types_neutral_Monoid_x28Listx20x24ax29(), a2: {h: 0}}, $a), styleStackRef => $12 => Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($15 => Control_Monad_ST_newSTRef(Prelude_Types_neutral_Monoid_String(), $15), outputRef => Prelude_Interfaces_x3ex3e(csegen_159(), Text_PrettyPrint_Prettyprinter_Render_Terminal_n__3239_770_go($0, styleStackRef, outputRef, $0), () => $25 => {
   const $2c = $2d => {
    switch($2d.h) {
-    case 0: return csegen_137();
+    case 0: return csegen_160();
     case undefined: {
      switch($2d.a2.h) {
       case 0: return Prelude_Interfaces_x3cx24x3e($33 => $34 => $35 => $36 => Control_Monad_ST_map_Functor_x28STx20x24sx29($35, $36), $3b => ({a1: $3b}), $3e => (outputRef.value));
-      default: return csegen_137();
+      default: return csegen_160();
      }
     }
-    default: return csegen_137();
+    default: return csegen_160();
    }
   };
   return Control_Monad_ST_x3ex3ex3d_Monad_x28STx20x24sx29($28 => (styleStackRef.value), $2c, $25);
@@ -1970,7 +2223,7 @@ function Text_PrettyPrint_Prettyprinter_Render_Terminal_renderString($0) {
 }
 
 function Text_PrettyPrint_Prettyprinter_Render_Terminal_renderIO($0) {
- return Prelude_IO_putStrLn(csegen_20(), Text_PrettyPrint_Prettyprinter_Render_Terminal_renderString($0));
+ return Prelude_IO_putStrLn(csegen_43(), Text_PrettyPrint_Prettyprinter_Render_Terminal_renderString($0));
 }
 
 function Text_PrettyPrint_Prettyprinter_Render_Terminal_putDoc($0) {
@@ -2226,10 +2479,10 @@ function Text_PrettyPrint_Prettyprinter_Doc_encloseSep($0, $1, $2, $3) {
   case undefined: {
    switch($3.a2.h) {
     case 0: return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29($0, $3.a1), $1);
-    default: return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_cat(Data_List_zipWith_Zippable_List(csegen_150(), {a1: $0, a2: Data_List_replicate(Prelude_Types_prim__integerToNat((Prelude_Types_List_length($3)-1n)), $2)}, $3)), $1);
+    default: return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_cat(Data_List_zipWith_Zippable_List(csegen_173(), {a1: $0, a2: Data_List_replicate(Prelude_Types_prim__integerToNat((Prelude_Types_List_length($3)-1n)), $2)}, $3)), $1);
    }
   }
-  default: return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_cat(Data_List_zipWith_Zippable_List(csegen_150(), {a1: $0, a2: Data_List_replicate(Prelude_Types_prim__integerToNat((Prelude_Types_List_length($3)-1n)), $2)}, $3)), $1);
+  default: return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx3e_Semigroup_x28Docx20x24annx29(Text_PrettyPrint_Prettyprinter_Doc_cat(Data_List_zipWith_Zippable_List(csegen_173(), {a1: $0, a2: Data_List_replicate(Prelude_Types_prim__integerToNat((Prelude_Types_List_length($3)-1n)), $2)}, $3)), $1);
  }
 }
 
@@ -2326,6 +2579,60 @@ function Data_String_Extra_drop($0, $1) {
  return Prelude_Types_substr($0, Prelude_Types_String_length($1), $1);
 }
 
+function Data_String_with__parsePositivex2cparsePosTrimmed_2962($0, $1, $2, $3, $4) {
+ switch($3) {
+  case '': {
+   switch($4.h) {
+    case 0: return {h: 0};
+    default: {
+     switch($4.a1) {
+      case '+': return Prelude_Types_map_Functor_Maybe($b => $1.a3($b), Data_String_parseNumWithoutSign(Prelude_Types_fastUnpack($4.a2), 0n));
+      default: {
+       let $15;
+       switch(Prelude_EqOrd_x3ex3d_Ord_Char($4.a1, '0')) {
+        case 1: {
+         $15 = Prelude_EqOrd_x3cx3d_Ord_Char($4.a1, '9');
+         break;
+        }
+        case 0: {
+         $15 = 0;
+         break;
+        }
+       }
+       switch($15) {
+        case 1: return Prelude_Types_map_Functor_Maybe($1f => $1.a3($1f), Data_String_parseNumWithoutSign(Prelude_Types_fastUnpack($4.a2), Prelude_Cast_cast_Cast_Int_Integer(_sub32s(Prelude_Types_ord($4.a1), Prelude_Types_ord('0')))));
+        case 0: return {h: 0};
+       }
+      }
+     }
+    }
+   }
+  }
+  default: {
+   switch($4.a1) {
+    case '+': return Prelude_Types_map_Functor_Maybe($35 => $1.a3($35), Data_String_parseNumWithoutSign(Prelude_Types_fastUnpack($4.a2), 0n));
+    default: {
+     let $3f;
+     switch(Prelude_EqOrd_x3ex3d_Ord_Char($4.a1, '0')) {
+      case 1: {
+       $3f = Prelude_EqOrd_x3cx3d_Ord_Char($4.a1, '9');
+       break;
+      }
+      case 0: {
+       $3f = 0;
+       break;
+      }
+     }
+     switch($3f) {
+      case 1: return Prelude_Types_map_Functor_Maybe($49 => $1.a3($49), Data_String_parseNumWithoutSign(Prelude_Types_fastUnpack($4.a2), Prelude_Cast_cast_Cast_Int_Integer(_sub32s(Prelude_Types_ord($4.a1), Prelude_Types_ord('0')))));
+      case 0: return {h: 0};
+     }
+    }
+   }
+  }
+ }
+}
+
 function Data_String_with__asList_2736($0, $1) {
  switch($0) {
   case '': {
@@ -2345,6 +2652,10 @@ function Data_String_n__2942_2537_unlinesx27($0) {
  }
 }
 
+function Data_String_n__3344_2960_parsePosTrimmed($0, $1, $2) {
+ return Data_String_with__parsePositivex2cparsePosTrimmed_2962(undefined, $0, $2, $2, Data_String_strM($2));
+}
+
 function Data_String_trim($0) {
  return Data_String_ltrim(Prelude_Types_reverse(Data_String_ltrim(Prelude_Types_reverse($0))));
 }
@@ -2373,6 +2684,10 @@ function Data_String_replicate($0, $1) {
  return Prelude_Types_fastPack(Data_List_replicate($0, $1));
 }
 
+function Data_String_parsePositive($0, $1) {
+ return Data_String_n__3344_2960_parsePosTrimmed($0, $1, Data_String_trim($1));
+}
+
 function Data_String_ltrim($0) {
  return Data_String_with__ltrim_2752($0, Data_String_asList($0));
 }
@@ -2386,11 +2701,11 @@ function Data_String_lines($0) {
 }
 
 function Data_String_isSuffixOf($0, $1) {
- return Data_List_isSuffixOf(csegen_154(), Prelude_Types_fastUnpack($0), Prelude_Types_fastUnpack($1));
+ return Data_List_isSuffixOf(csegen_177(), Prelude_Types_fastUnpack($0), Prelude_Types_fastUnpack($1));
 }
 
 function Data_String_isPrefixOf($0, $1) {
- return Data_List_isPrefixOf(csegen_154(), Prelude_Types_fastUnpack($0), Prelude_Types_fastUnpack($1));
+ return Data_List_isPrefixOf(csegen_177(), Prelude_Types_fastUnpack($0), Prelude_Types_fastUnpack($1));
 }
 
 function Data_String_indent($0, $1) {
@@ -2478,7 +2793,7 @@ function Prelude_Types_n__6057_4912_hexChars($0) {
 function Prelude_Types_traverse_Traversable_List($0, $1, $2) {
  switch($2.h) {
   case 0: return $0.a2(undefined)({h: 0});
-  case undefined: return $0.a3(undefined)(undefined)($0.a3(undefined)(undefined)($0.a2(undefined)(csegen_170()))($1($2.a1)))(Prelude_Types_traverse_Traversable_List($0, $1, $2.a2));
+  case undefined: return $0.a3(undefined)(undefined)($0.a3(undefined)(undefined)($0.a2(undefined)(csegen_193()))($1($2.a1)))(Prelude_Types_traverse_Traversable_List($0, $1, $2.a2));
  }
 }
 
@@ -2490,7 +2805,7 @@ function Prelude_Types_traverse_Traversable_x28Eitherx20x24ex29($0, $1, $2) {
 }
 
 function Prelude_Types_toList_Foldable_Maybe($0) {
- return Prelude_Types_foldr_Foldable_Maybe(csegen_170(), {h: 0}, $0);
+ return Prelude_Types_foldr_Foldable_Maybe(csegen_193(), {h: 0}, $0);
 }
 
 function Prelude_Types_toList_Foldable_List($0) {
@@ -2498,7 +2813,7 @@ function Prelude_Types_toList_Foldable_List($0) {
 }
 
 function Prelude_Types_toList_Foldable_x28Eitherx20x24ex29($0) {
- return Prelude_Types_foldr_Foldable_x28Eitherx20x24ex29(csegen_170(), {h: 0}, $0);
+ return Prelude_Types_foldr_Foldable_x28Eitherx20x24ex29(csegen_193(), {h: 0}, $0);
 }
 
 function Prelude_Types_rangeFromTo_Range_x24a($0, $1, $2) {
@@ -2668,7 +2983,7 @@ function Prelude_Types_x3ex3ex3d_Monad_Maybe($0, $1) {
 }
 
 function Prelude_Types_x3ex3ex3d_Monad_List($0, $1) {
- return Prelude_Interfaces_concatMap({a1: csegen_114(), a2: {a1: $8 => $9 => Prelude_Types_x3cx2bx3e_Semigroup_x28Listx20x24ax29($8, $9), a2: Prelude_Types_neutral_Monoid_x28Listx20x24ax29()}}, $1, $0);
+ return Prelude_Interfaces_concatMap({a1: csegen_126(), a2: {a1: $8 => $9 => Prelude_Types_x3cx2bx3e_Semigroup_x28Listx20x24ax29($8, $9), a2: Prelude_Types_neutral_Monoid_x28Listx20x24ax29()}}, $1, $0);
 }
 
 function Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29($0, $1) {
@@ -2874,7 +3189,7 @@ function Prelude_Types_isLower($0) {
 }
 
 function Prelude_Types_isHexDigit($0) {
- return Prelude_Types_elem(csegen_154(), Prelude_Types_toUpper($0), Prelude_Types_n__6057_4912_hexChars($0));
+ return Prelude_Types_elem(csegen_177(), Prelude_Types_toUpper($0), Prelude_Types_n__6057_4912_hexChars($0));
 }
 
 function Prelude_Types_isDigit($0) {
@@ -3660,6 +3975,10 @@ function Prelude_Cast_cast_Cast_Nat_Bits16($0) {
  return Prelude_Cast_cast_Cast_Integer_Bits16($0);
 }
 
+function Prelude_Cast_cast_Cast_Integer_Nat($0) {
+ return Prelude_Types_prim__integerToNat($0);
+}
+
 function Prelude_Cast_cast_Cast_Integer_Int16($0) {
  return Number(_truncBigInt16($0));
 }
@@ -3763,6 +4082,19 @@ function Data_List_takeWhile($0, $1) {
  }
 }
 
+function Data_List_take($0, $1) {
+ switch($0) {
+  case 0n: return {h: 0};
+  default: {
+   const $3 = ($0-1n);
+   switch($1.h) {
+    case undefined: return {a1: $1.a1, a2: Data_List_take($3, $1.a2)};
+    default: return {h: 0};
+   }
+  }
+ }
+}
+
 function Data_List_split($0, $1) {
  const $2 = Data_List_break($0, $1);
  switch($2.a2.h) {
@@ -3976,6 +4308,14 @@ function Data_Fin_with__fromInteger_1226($0, $1, $2, $3) {
  return $2.a1;
 }
 
+function Data_Fin_show_Show_x28Finx20x24nx29($0) {
+ return Prelude_Show_show_Show_Integer(Data_Fin_finToInteger($0));
+}
+
+function Data_Fin_cast_Cast_x28Finx20x24nx29_Nat($0) {
+ return Data_Fin_finToNat($0);
+}
+
 function Data_Fin_natToFin($0, $1) {
  switch($0) {
   case 0n: {
@@ -3990,7 +4330,7 @@ function Data_Fin_natToFin($0, $1) {
     case 0n: return {h: 0};
     default: {
      const $9 = ($1-1n);
-     return Prelude_Interfaces_x3cx24x3e(csegen_118(), $10 => (1n+$10), Data_Fin_natToFin($5, $9));
+     return Prelude_Interfaces_x3cx24x3e(csegen_133(), $10 => (1n+$10), Data_Fin_natToFin($5, $9));
     }
    }
   }
@@ -4023,6 +4363,16 @@ function Data_Fin_finToNat($0) {
  }
 }
 
+function Data_Fin_finToInteger($0) {
+ switch($0) {
+  case 0n: return 0n;
+  default: {
+   const $2 = ($0-1n);
+   return (1n+Data_Fin_finToInteger($2));
+  }
+ }
+}
+
 function Data_Maybe_isJust($0) {
  switch($0.h) {
   case 0: return 0;
@@ -4042,7 +4392,7 @@ function Control_Monad_ST_pure_Applicative_x28STx20x24sx29($0, $1) {
 }
 
 function Control_Monad_ST_map_Functor_x28STx20x24sx29($0, $1) {
- return Prelude_Interfaces_x3cx24x3e(csegen_25(), $0, $1);
+ return Prelude_Interfaces_x3cx24x3e(csegen_48(), $0, $1);
 }
 
 function Control_Monad_ST_join_Monad_x28STx20x24sx29($0, $1) {
@@ -4065,7 +4415,7 @@ function Control_Monad_ST_runST($0) {
 }
 
 function Control_Monad_ST_newSTRef($0, $1) {
- const $2 = Data_IORef_newIORef(csegen_20(), $0)($1);
+ const $2 = Data_IORef_newIORef(csegen_43(), $0)($1);
  return $2;
 }
 
@@ -4131,7 +4481,7 @@ function Control_ANSI_SGR_cast_Cast_Blink_String($0) {
 }
 
 function Control_ANSI_SGR_escapeSGR($0) {
- return Prelude_Types_String_x2bx2b('\u{1b}[', Prelude_Types_String_x2bx2b(Prelude_Interfaces_concat(csegen_223(), Data_List_intersperse(';', Prelude_Interfaces_x3cx24x3e(csegen_62(), $11 => Control_ANSI_SGR_n__2894_855_toCode($0, $11), $0))), 'm'));
+ return Prelude_Types_String_x2bx2b('\u{1b}[', Prelude_Types_String_x2bx2b(Prelude_Interfaces_concat(csegen_246(), Data_List_intersperse(';', Prelude_Interfaces_x3cx24x3e(csegen_76(), $11 => Control_ANSI_SGR_n__2894_855_toCode($0, $11), $0))), 'm'));
 }
 
 function Data_Fuel_limit($0) {
@@ -4169,7 +4519,7 @@ function Data_Config_n__3796_4852_parseConfigJson($0, $1) {
 }
 
 function Data_Config_show_Show_Config($0) {
- return Data_String_fastUnlines({a1: Prelude_Types_String_x2bx2b('      updatedAt: ', Prelude_Show_show_Show_Bits32($0.a1)), a2: {a1: Prelude_Types_String_x2bx2b('            org: ', Prelude_Show_show_Show_String($0.a2)), a2: {a1: Prelude_Types_String_x2bx2b('           repo: ', Prelude_Show_show_Show_String($0.a3)), a2: {a1: Prelude_Types_String_x2bx2b('     mainBranch: ', Prelude_Show_show_Show_String($0.a4)), a2: {a1: Prelude_Types_String_x2bx2b('    assignTeams: ', Prelude_Show_show_Show_Bool($0.a5)), a2: {a1: Prelude_Types_String_x2bx2b('commentOnAssign: ', Prelude_Show_show_Show_Bool($0.a6)), a2: {a1: Prelude_Types_String_x2bx2b('      teamSlugs: ', Prelude_Show_show_Show_x28Listx20x24ax29(csegen_65(), $0.a7)), a2: {a1: Prelude_Types_String_x2bx2b('     orgMembers: ', Prelude_Show_show_Show_x28Listx20x24ax29(csegen_65(), $0.a8)), a2: {h: 0}}}}}}}}});
+ return Data_String_fastUnlines({a1: Prelude_Types_String_x2bx2b('      updatedAt: ', Prelude_Show_show_Show_Bits32($0.a1)), a2: {a1: Prelude_Types_String_x2bx2b('            org: ', Prelude_Show_show_Show_String($0.a2)), a2: {a1: Prelude_Types_String_x2bx2b('           repo: ', Prelude_Show_show_Show_String($0.a3)), a2: {a1: Prelude_Types_String_x2bx2b('     mainBranch: ', Prelude_Show_show_Show_String($0.a4)), a2: {a1: Prelude_Types_String_x2bx2b('    assignTeams: ', Prelude_Show_show_Show_Bool($0.a5)), a2: {a1: Prelude_Types_String_x2bx2b('commentOnAssign: ', Prelude_Show_show_Show_Bool($0.a6)), a2: {a1: Prelude_Types_String_x2bx2b('      teamSlugs: ', Prelude_Show_show_Show_x28Listx20x24ax29(csegen_79(), $0.a7)), a2: {a1: Prelude_Types_String_x2bx2b('     orgMembers: ', Prelude_Show_show_Show_x28Listx20x24ax29(csegen_79(), $0.a8)), a2: {h: 0}}}}}}}}});
 }
 
 function Data_Config_showPrec_Show_Config($0, $1) {
@@ -4203,12 +4553,12 @@ function Data_Config_parseConfig($0, $1) {
   }
  };
  const $4 = {a1: $5, a2: a => $d => ({h: 1, a1: $d}), a3: $f};
- const $3 = {a1: $4, a2: csegen_233(), a3: csegen_234()};
- return Prelude_Interfaces_x3ex3dx3e($3, csegen_235(), $20 => Data_Config_n__3796_4852_parseConfigJson($0, $20), $1);
+ const $3 = {a1: $4, a2: csegen_256(), a3: csegen_257()};
+ return Prelude_Interfaces_x3ex3dx3e($3, csegen_258(), $20 => Data_Config_n__3796_4852_parseConfigJson($0, $20), $1);
 }
 
 function Data_Config_json($0) {
- return {h: 5, a1: {a1: {a1: 'mainBranch', a2: {h: 3, a1: $0.a4}}, a2: {a1: {a1: 'assignTeams', a2: {h: 1, a1: $0.a5}}, a2: {a1: {a1: 'commentOnAssign', a2: {h: 1, a1: $0.a6}}, a2: {a1: {a1: 'org', a2: {h: 3, a1: $0.a2}}, a2: {a1: {a1: 'orgMembers', a2: {h: 4, a1: Prelude_Interfaces_x3cx24x3e(csegen_62(), $1f => ({h: 3, a1: $1f}), Data_List_sort(csegen_49(), $0.a8))}}, a2: {a1: {a1: 'repo', a2: {h: 3, a1: $0.a3}}, a2: {a1: {a1: 'teamSlugs', a2: {h: 4, a1: Prelude_Interfaces_x3cx24x3e(csegen_62(), $34 => ({h: 3, a1: $34}), Data_List_sort(csegen_49(), $0.a7))}}, a2: {a1: {a1: 'updatedAt', a2: {h: 2, a1: Prelude_Cast_cast_Cast_Bits32_Double($0.a1)}}, a2: {h: 0}}}}}}}}}};
+ return {h: 5, a1: {a1: {a1: 'mainBranch', a2: {h: 3, a1: $0.a4}}, a2: {a1: {a1: 'assignTeams', a2: {h: 1, a1: $0.a5}}, a2: {a1: {a1: 'commentOnAssign', a2: {h: 1, a1: $0.a6}}, a2: {a1: {a1: 'org', a2: {h: 3, a1: $0.a2}}, a2: {a1: {a1: 'orgMembers', a2: {h: 4, a1: Prelude_Interfaces_x3cx24x3e(csegen_76(), $1f => ({h: 3, a1: $1f}), Data_List_sort(csegen_72(), $0.a8))}}, a2: {a1: {a1: 'repo', a2: {h: 3, a1: $0.a3}}, a2: {a1: {a1: 'teamSlugs', a2: {h: 4, a1: Prelude_Interfaces_x3cx24x3e(csegen_76(), $34 => ({h: 3, a1: $34}), Data_List_sort(csegen_72(), $0.a7))}}, a2: {a1: {a1: 'updatedAt', a2: {h: 2, a1: Prelude_Cast_cast_Cast_Bits32_Double($0.a1)}}, a2: {h: 0}}}}}}}}}};
 }
 
 const Data_Config_filename = __lazy(function () {
@@ -4216,7 +4566,7 @@ const Data_Config_filename = __lazy(function () {
 });
 
 function Language_JSON_Accessors_n__3327_4395_lookupx27($0, $1, $2, $3, $4) {
- return Data_Either_maybeToEither(() => Prelude_Types_String_x2bx2b('Missing required key: ', Prelude_Types_String_x2bx2b($3, '.')), Data_List_lookup(csegen_34(), $3, $4));
+ return Data_Either_maybeToEither(() => Prelude_Types_String_x2bx2b('Missing required key: ', Prelude_Types_String_x2bx2b($3, '.')), Data_List_lookup(csegen_57(), $3, $4));
 }
 
 function Language_JSON_Accessors_string($0) {
@@ -4332,17 +4682,17 @@ function Text_Bounded_mergeBounds($0, $1) {
      switch($1.h) {
       case undefined: {
        switch($1.a2) {
-        case 1: return Prelude_Interfaces_x3cx24x3e(csegen_238(), $e => $1.a1, $0);
+        case 1: return Prelude_Interfaces_x3cx24x3e(csegen_261(), $e => $1.a1, $0);
         default: {
-         const $10 = Prelude_EqOrd_min_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_249(), csegen_249(), Text_Bounded_start($0), Text_Bounded_start($1));
-         const $1c = Prelude_EqOrd_max_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_249(), csegen_249(), Text_Bounded_end($0), Text_Bounded_end($1));
+         const $10 = Prelude_EqOrd_min_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_272(), csegen_272(), Text_Bounded_start($0), Text_Bounded_start($1));
+         const $1c = Prelude_EqOrd_max_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_272(), csegen_272(), Text_Bounded_end($0), Text_Bounded_end($1));
          return {a1: $1.a1, a2: 0, a3: {a1: $10.a1, a2: $10.a2, a3: $1c.a1, a4: $1c.a2}};
         }
        }
       }
       default: {
-       const $30 = Prelude_EqOrd_min_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_249(), csegen_249(), Text_Bounded_start($0), Text_Bounded_start($1));
-       const $3c = Prelude_EqOrd_max_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_249(), csegen_249(), Text_Bounded_end($0), Text_Bounded_end($1));
+       const $30 = Prelude_EqOrd_min_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_272(), csegen_272(), Text_Bounded_start($0), Text_Bounded_start($1));
+       const $3c = Prelude_EqOrd_max_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_272(), csegen_272(), Text_Bounded_end($0), Text_Bounded_end($1));
        return {a1: $1.a1, a2: 0, a3: {a1: $30.a1, a2: $30.a2, a3: $3c.a1, a4: $3c.a2}};
       }
      }
@@ -4353,17 +4703,17 @@ function Text_Bounded_mergeBounds($0, $1) {
    switch($1.h) {
     case undefined: {
      switch($1.a2) {
-      case 1: return Prelude_Interfaces_x3cx24x3e(csegen_238(), $56 => $1.a1, $0);
+      case 1: return Prelude_Interfaces_x3cx24x3e(csegen_261(), $56 => $1.a1, $0);
       default: {
-       const $58 = Prelude_EqOrd_min_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_249(), csegen_249(), Text_Bounded_start($0), Text_Bounded_start($1));
-       const $64 = Prelude_EqOrd_max_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_249(), csegen_249(), Text_Bounded_end($0), Text_Bounded_end($1));
+       const $58 = Prelude_EqOrd_min_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_272(), csegen_272(), Text_Bounded_start($0), Text_Bounded_start($1));
+       const $64 = Prelude_EqOrd_max_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_272(), csegen_272(), Text_Bounded_end($0), Text_Bounded_end($1));
        return {a1: $1.a1, a2: 0, a3: {a1: $58.a1, a2: $58.a2, a3: $64.a1, a4: $64.a2}};
       }
      }
     }
     default: {
-     const $78 = Prelude_EqOrd_min_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_249(), csegen_249(), Text_Bounded_start($0), Text_Bounded_start($1));
-     const $84 = Prelude_EqOrd_max_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_249(), csegen_249(), Text_Bounded_end($0), Text_Bounded_end($1));
+     const $78 = Prelude_EqOrd_min_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_272(), csegen_272(), Text_Bounded_start($0), Text_Bounded_start($1));
+     const $84 = Prelude_EqOrd_max_Ord_x28x7cx28x28Builtinx2ePairx20x24ax29x20x24bx29x2cx28x28Builtinx2eMkPairx20x24ax29x20x24bx29x7cx29(csegen_272(), csegen_272(), Text_Bounded_end($0), Text_Bounded_end($1));
      return {a1: $1.a1, a2: 0, a3: {a1: $78.a1, a2: $78.a2, a3: $84.a1, a4: $84.a2}};
     }
    }
@@ -4504,7 +4854,7 @@ function Language_JSON_Data_stringify($0) {
 }
 
 function Language_JSON_Data_showString($0) {
- return Prelude_Types_String_x2bx2b('\"', Prelude_Types_String_x2bx2b(Prelude_Interfaces_concatMap(csegen_223(), $a => Language_JSON_Data_showChar($a), Prelude_Types_fastUnpack($0)), '\"'));
+ return Prelude_Types_String_x2bx2b('\"', Prelude_Types_String_x2bx2b(Prelude_Interfaces_concatMap(csegen_246(), $a => Language_JSON_Data_showChar($a), Prelude_Types_fastUnpack($0)), '\"'));
 }
 
 function Language_JSON_Data_showChar($0) {
@@ -4604,7 +4954,7 @@ const Language_JSON_Parser_string = __lazy(function () {
 });
 
 const Language_JSON_Parser_rawString = __lazy(function () {
- return {h: 8, a1: 0, a2: Text_Parser_match(csegen_263(), {h: 2}), a3: () => mstr => {
+ return {h: 8, a1: 0, a2: Text_Parser_match(csegen_286(), {h: 2}), a3: () => mstr => {
   switch(mstr.h) {
    case undefined: return {h: 0, a1: mstr.a1};
    case 0: return {h: 4, a1: {h: 0}, a2: 0, a3: 'invalid string'};
@@ -4613,7 +4963,7 @@ const Language_JSON_Parser_rawString = __lazy(function () {
 });
 
 function Language_JSON_Parser_punct($0) {
- return Text_Parser_match(csegen_263(), {h: 4, a1: $0});
+ return Text_Parser_match(csegen_286(), {h: 4, a1: $0});
 }
 
 function Language_JSON_Parser_parseJSON($0) {
@@ -4646,11 +4996,11 @@ const Language_JSON_Parser_object = __lazy(function () {
 });
 
 const Language_JSON_Parser_number = __lazy(function () {
- return Text_Parser_Core_map_Functor_x28x28x28Grammarx20x24statex29x20x24tokx29x20x24cx29(1, $3 => ({h: 2, a1: $3}), Text_Parser_match(csegen_263(), {h: 1}));
+ return Text_Parser_Core_map_Functor_x28x28x28Grammarx20x24statex29x20x24tokx29x20x24cx29(1, $3 => ({h: 2, a1: $3}), Text_Parser_match(csegen_286(), {h: 1}));
 });
 
 const Language_JSON_Parser_null = __lazy(function () {
- return Text_Parser_Core_map_Functor_x28x28x28Grammarx20x24statex29x20x24tokx29x20x24cx29(1, $3 => ({h: 0}), Text_Parser_match(csegen_263(), {h: 3}));
+ return Text_Parser_Core_map_Functor_x28x28x28Grammarx20x24statex29x20x24tokx29x20x24cx29(1, $3 => ({h: 0}), Text_Parser_match(csegen_286(), {h: 3}));
 });
 
 const Language_JSON_Parser_json = __lazy(function () {
@@ -4658,7 +5008,7 @@ const Language_JSON_Parser_json = __lazy(function () {
 });
 
 const Language_JSON_Parser_boolean = __lazy(function () {
- return Text_Parser_Core_map_Functor_x28x28x28Grammarx20x24statex29x20x24tokx29x20x24cx29(1, $3 => ({h: 1, a1: $3}), Text_Parser_match(csegen_263(), {h: 0}));
+ return Text_Parser_Core_map_Functor_x28x28x28Grammarx20x24statex29x20x24tokx29x20x24cx29(1, $3 => ({h: 1, a1: $3}), Text_Parser_match(csegen_286(), {h: 0}));
 });
 
 const Language_JSON_Parser_array = __lazy(function () {
@@ -4842,7 +5192,7 @@ function Text_Lexer_opt($0) {
 }
 
 function Text_Lexer_oneOf($0) {
- return Text_Lexer_Core_pred(x => Prelude_Types_elem(csegen_154(), x, Prelude_Types_fastUnpack($0)));
+ return Text_Lexer_Core_pred(x => Prelude_Types_elem(csegen_177(), x, Prelude_Types_fastUnpack($0)));
 }
 
 function Text_Lexer_non($0) {
@@ -5119,11 +5469,11 @@ function Language_JSON_String_Tokens_charValue($0) {
 }
 
 const Language_JSON_String_Parser_stringChar = __lazy(function () {
- return {h: 12, a1: 1, a2: 1, a3: Text_Parser_match(csegen_303(), 1), a4: () => ({h: 12, a1: 1, a2: 1, a3: Text_Parser_match(csegen_303(), 2), a4: () => Text_Parser_match(csegen_303(), 3)})};
+ return {h: 12, a1: 1, a2: 1, a3: Text_Parser_match(csegen_326(), 1), a4: () => ({h: 12, a1: 1, a2: 1, a3: Text_Parser_match(csegen_326(), 2), a4: () => Text_Parser_match(csegen_326(), 3)})};
 });
 
 const Language_JSON_String_Parser_quotedString = __lazy(function () {
- const $0 = Text_Parser_match(csegen_303(), 0);
+ const $0 = Text_Parser_match(csegen_326(), 0);
  return {h: 8, a1: 0, a2: Text_Parser_between(0, $0, $0, Text_Parser_many(Language_JSON_String_Parser_stringChar())), a3: () => chars => ({h: 11, a1: 0, a2: 0, a3: {h: 3}, a4: {h: 0, a1: Prelude_Types_fastPack(chars)}})};
 });
 
@@ -5191,7 +5541,7 @@ function Text_Parser_between($0, $1, $2, $3) {
 function Text_Parser_Core_case__doParse_3762($0, $1, $2, $3, $4, $5) {
  switch($5.h) {
   case 0: return {h: 0, a1: $5.a1, a2: $5.a2, a3: $5.a3};
-  case 1: return {h: 1, a1: $5.a1, a2: $5.a2, a3: Prelude_Interfaces_x3cx24x3e(csegen_319(), $11 => $5.a3, $5.a3), a4: $5.a4};
+  case 1: return {h: 1, a1: $5.a1, a2: $5.a2, a3: Prelude_Interfaces_x3cx24x3e(csegen_342(), $11 => $5.a3, $5.a3), a4: $5.a4};
  }
 }
 
@@ -5609,18 +5959,18 @@ function Text_Parser_Core_mergeWith($0, $1) {
 function Text_Parser_Core_doParse($0, $1, $2, $3, $4) {
  switch($3.h) {
   case 0: return {h: 1, a1: $1, a2: $2, a3: Text_Bounded_irrelevantBounds($3.a1), a4: $4};
-  case 4: return {h: 0, a1: $2, a2: $3.a2, a3: {a1: {a1: $3.a3, a2: Prelude_Types_x3cx7cx3e_Alternative_Maybe($3.a1, () => Prelude_Interfaces_x3cx24x3e(csegen_118(), $19 => $19.a3, Data_List_headx27($4)))}, a2: {h: 0}}};
+  case 4: return {h: 0, a1: $2, a2: $3.a2, a3: {a1: {a1: $3.a3, a2: Prelude_Types_x3cx7cx3e_Alternative_Maybe($3.a1, () => Prelude_Interfaces_x3cx24x3e(csegen_133(), $19 => $19.a3, Data_List_headx27($4)))}, a2: {h: 0}}};
   case 5: return Text_Parser_Core_case__doParse_2543($0, $1, $3.a1, $4, $2, Text_Parser_Core_doParse($0, $1, $2, $3.a1, $4));
   case 6: return {h: 1, a1: $1, a2: 1, a3: Text_Bounded_irrelevantBounds(0), a4: $4};
   case 7: return Text_Parser_Core_case__doParse_2638($0, $1, $3.a1, $4, $2, Text_Parser_Core_doParse($0, $1, $2, $3.a1, $4));
   case 1: {
    switch($4.h) {
-    case 0: return {h: 0, a1: $2, a2: 0, a3: csegen_322()};
+    case 0: return {h: 0, a1: $2, a2: 0, a3: csegen_345()};
     case undefined: {
      const $44 = $3.a2($4.a1.a1);
      switch($44.h) {
       case 0: return {h: 0, a1: $2, a2: 0, a3: {a1: {a1: $3.a1, a2: {a1: $4.a1.a3}}, a2: {h: 0}}};
-      case undefined: return {h: 1, a1: $1, a2: $2, a3: Prelude_Interfaces_x3cx24x3e(csegen_319(), $58 => $44.a1, $4.a1), a4: $4.a2};
+      case undefined: return {h: 1, a1: $1, a2: $2, a3: Prelude_Interfaces_x3cx24x3e(csegen_342(), $58 => $44.a1, $4.a1), a4: $4.a2};
      }
     }
    }
@@ -5633,7 +5983,7 @@ function Text_Parser_Core_doParse($0, $1, $2, $3, $4) {
   }
   case 2: {
    switch($4.h) {
-    case 0: return {h: 0, a1: $2, a2: 0, a3: csegen_322()};
+    case 0: return {h: 0, a1: $2, a2: 0, a3: csegen_345()};
     case undefined: {
      switch($3.a2($4.a1.a1)) {
       case 1: return {h: 1, a1: $1, a2: $2, a3: Text_Bounded_removeIrrelevance($4.a1), a4: {a1: $4.a1, a2: $4.a2}};
@@ -5662,7 +6012,7 @@ function Text_Parser_Core_doParse($0, $1, $2, $3, $4) {
   case 13: return Text_Parser_Core_case__doParse_3762($0, $1, $3.a1, $4, $2, Text_Parser_Core_doParse($0, $1, $2, $3.a1, $4));
   case 14: {
    switch($4.h) {
-    case 0: return {h: 0, a1: $2, a2: 0, a3: csegen_322()};
+    case 0: return {h: 0, a1: $2, a2: 0, a3: csegen_345()};
     case undefined: return {h: 1, a1: $1, a2: $2, a3: Text_Bounded_irrelevantBounds($4.a1.a3), a4: {a1: $4.a1, a2: $4.a2}};
    }
   }
@@ -5752,43 +6102,43 @@ const Language_JSON_Lexer_jsonTokenMap = __lazy(function () {
  return Text_Lexer_toTokenMap({a1: {a1: Text_Lexer_spaces(), a2: {h: 5}}, a2: {a1: {a1: Text_Lexer_is(','), a2: {h: 4, a1: {h: 0}}}, a2: {a1: {a1: Text_Lexer_is(':'), a2: {h: 4, a1: {h: 1}}}, a2: {a1: {a1: Text_Lexer_is('['), a2: {h: 4, a1: {h: 2, a1: 0}}}, a2: {a1: {a1: Text_Lexer_is(']'), a2: {h: 4, a1: {h: 2, a1: 1}}}, a2: {a1: {a1: Text_Lexer_is('{'), a2: {h: 4, a1: {h: 3, a1: 0}}}, a2: {a1: {a1: Text_Lexer_is('}'), a2: {h: 4, a1: {h: 3, a1: 1}}}, a2: {a1: {a1: Text_Lexer_exact('null'), a2: {h: 3}}, a2: {a1: {a1: Text_Lexer_Core_x3cx7cx3e(Text_Lexer_exact(Language_JSON_Tokens_strTrue()), Text_Lexer_exact(Language_JSON_Tokens_strFalse())), a2: {h: 0}}, a2: {a1: {a1: Language_JSON_Lexer_numberLit(), a2: {h: 1}}, a2: {a1: {a1: Language_JSON_String_permissiveStringLit(), a2: {h: 2}}, a2: {h: 0}}}}}}}}}}}});
 });
 
-function PullRequest_case__identifyOrCreatePRx2ccreatePR_1514($0, $1, $2, $3, $4, $5) {
+function PullRequest_case__identifyOrCreatePRx2ccreatePR_1614($0, $1, $2, $3, $4, $5) {
  switch($5.h) {
   case undefined: return Prelude_Types_strCons($5.a1, $5.a2);
   default: return $3.a4;
  }
 }
 
-function PullRequest_n__4077_1018_userNotice($0, $1, $2, $3, $4, $5, $6) {
+function PullRequest_n__4382_1117_userNotice($0, $1, $2, $3, $4, $5, $6) {
  switch($6.h) {
   case 0: {
    switch($2.h) {
     case 0: return 'no users';
-    default: return PullRequest_n__4077_1017_csv($0, $1, $2, $3, $4, $5, $2);
+    default: return PullRequest_n__4382_1116_csv($0, $1, $2, $3, $4, $5, $2);
    }
   }
-  case undefined: return PullRequest_n__4077_1017_csv($0, $1, $2, $3, $4, $5, {a1: $6.a1, a2: $2});
+  case undefined: return PullRequest_n__4382_1116_csv($0, $1, $2, $3, $4, $5, {a1: $6.a1, a2: $2});
  }
 }
 
-function PullRequest_n__4077_1019_teamNotice($0, $1, $2, $3, $4, $5, $6) {
+function PullRequest_n__4382_1118_teamNotice($0, $1, $2, $3, $4, $5, $6) {
  switch($6.h) {
   case 0: return '';
   case undefined: {
    switch($6.a2.h) {
-    case 0: return Prelude_Types_String_x2bx2b(' and team ', PullRequest_n__4077_1017_csv($0, $1, $2, $3, $4, $5, {a1: $6.a1, a2: {h: 0}}));
-    default: return Prelude_Types_String_x2bx2b(' and teams ', PullRequest_n__4077_1017_csv($0, $1, $2, $3, $4, $5, $6));
+    case 0: return Prelude_Types_String_x2bx2b(' and team ', PullRequest_n__4382_1116_csv($0, $1, $2, $3, $4, $5, {a1: $6.a1, a2: {h: 0}}));
+    default: return Prelude_Types_String_x2bx2b(' and teams ', PullRequest_n__4382_1116_csv($0, $1, $2, $3, $4, $5, $6));
    }
   }
-  default: return Prelude_Types_String_x2bx2b(' and teams ', PullRequest_n__4077_1017_csv($0, $1, $2, $3, $4, $5, $6));
+  default: return Prelude_Types_String_x2bx2b(' and teams ', PullRequest_n__4382_1116_csv($0, $1, $2, $3, $4, $5, $6));
  }
 }
 
-function PullRequest_n__4077_1020_prComment($0, $1, $2, $3, $4, $5, $6) {
+function PullRequest_n__4382_1119_prComment($0, $1, $2, $3, $4, $5, $6) {
  return Prelude_Types_String_x2bx2b(':musical_note: Harmoniously assigned @', Prelude_Types_String_x2bx2b($6, ' to review this PR.'));
 }
 
-function PullRequest_n__4077_1016_maybeDecorate($0, $1, $2, $3, $4, $5, $6) {
+function PullRequest_n__4382_1115_maybeDecorate($0, $1, $2, $3, $4, $5, $6) {
  const $7 = $8 => {
   switch(Data_Config_rf__colors($5)) {
    case 1: return $8;
@@ -5798,19 +6148,23 @@ function PullRequest_n__4077_1016_maybeDecorate($0, $1, $2, $3, $4, $5, $6) {
  return Text_PrettyPrint_Prettyprinter_Render_Terminal_renderString(Text_PrettyPrint_Prettyprinter_Doc_layoutPretty(Text_PrettyPrint_Prettyprinter_Doc_defaultLayoutOptions(), $7($6)));
 }
 
-function PullRequest_n__4077_1017_csv($0, $1, $2, $3, $4, $5, $6) {
- return PullRequest_n__4077_1016_maybeDecorate($0, $1, $2, $3, $4, $5, Text_PrettyPrint_Prettyprinter_Doc_encloseSep(Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(', '), Prelude_Types_map_Functor_List($1a => Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(2), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($1a)), $6)));
+function PullRequest_n__4298_1020_forkedReviews($0, $1, $2, $3, $4) {
+ return FFI_Concurrency_fork(csegen_20(), Prelude_Types_String_x2bx2b('reviews --json ', Prelude_Show_show_Show_Integer($4.a1)));
+}
+
+function PullRequest_n__4382_1116_csv($0, $1, $2, $3, $4, $5, $6) {
+ return PullRequest_n__4382_1115_maybeDecorate($0, $1, $2, $3, $4, $5, Text_PrettyPrint_Prettyprinter_Doc_encloseSep(Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), Text_PrettyPrint_Prettyprinter_Doc_emptyDoc(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(', '), Prelude_Types_map_Functor_List($1a => Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(2), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($1a)), $6)));
 }
 
-function PullRequest_n__4544_1453_createPR($0, $1, $2, $3) {
- return Prelude_Interfaces_x3ex3e(csegen_71(), $8 => $9 => Data_Promise_x3ex3ex3d_Monad_Promise($c => $d => FFI_Git_remoteTrackingBranch($0, $c, $d), $13 => Prelude_Interfaces_when(csegen_59(), Prelude_Types_x3dx3d_Eq_x28Maybex20x24ax29(csegen_34(), $13, {h: 0}), () => Prelude_Interfaces_x3ex3e(csegen_71(), Prelude_IO_putStrLn(csegen_74(), 'Creating a new remote branch...'), () => $27 => $28 => FFI_Git_pushNewBranch($0, 'origin', $2, $27, $28))), $8, $9), () => Prelude_Interfaces_x3ex3e(csegen_71(), Prelude_IO_putStrLn(csegen_74(), Prelude_Types_String_x2bx2b('Creating a new PR for the current branch (', Prelude_Types_String_x2bx2b($2, ').'))), () => Prelude_Interfaces_x3ex3e(csegen_71(), Prelude_IO_putStrLn(csegen_74(), Prelude_Types_String_x2bx2b('What branch are you merging into (ENTER for default: ', Prelude_Types_String_x2bx2b($3.a4, ')?'))), () => $51 => $52 => {
+function PullRequest_n__4850_1553_createPR($0, $1, $2, $3) {
+ return Prelude_Interfaces_x3ex3e(csegen_17(), $8 => $9 => Data_Promise_x3ex3ex3d_Monad_Promise($c => $d => FFI_Git_remoteTrackingBranch($0, $c, $d), $13 => Prelude_Interfaces_when(csegen_11(), Prelude_Types_x3dx3d_Eq_x28Maybex20x24ax29(csegen_57(), $13, {h: 0}), () => Prelude_Interfaces_x3ex3e(csegen_17(), Prelude_IO_putStrLn(csegen_20(), 'Creating a new remote branch...'), () => $27 => $28 => FFI_Git_pushNewBranch($0, 'origin', $2, $27, $28))), $8, $9), () => Prelude_Interfaces_x3ex3e(csegen_17(), Prelude_IO_putStrLn(csegen_20(), Prelude_Types_String_x2bx2b('Creating a new PR for the current branch (', Prelude_Types_String_x2bx2b($2, ').'))), () => Prelude_Interfaces_x3ex3e(csegen_17(), Prelude_IO_putStrLn(csegen_20(), Prelude_Types_String_x2bx2b('What branch are you merging into (ENTER for default: ', Prelude_Types_String_x2bx2b($3.a4, ')?'))), () => $51 => $52 => {
   const $5e = baseBranchInput => {
-   const $5f = PullRequest_case__identifyOrCreatePRx2ccreatePR_1514($0, $1, $2, $3, baseBranchInput, Data_String_strM(baseBranchInput));
-   const $72 = Data_Maybe_fromMaybe(() => '', Prelude_Interfaces_x3cx24x3e(csegen_118(), $7a => Prelude_Types_String_x2bx2b($7a, ' - '), Util_parseJiraPrefix($2)));
-   const $71 = () => Prelude_Interfaces_x3ex3e(csegen_71(), Prelude_IO_putStr(csegen_74(), $72), () => $8a => $8b => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_41(), $92 => Prelude_Types_String_x2bx2b($72, Data_String_trim($92)), csegen_366()), title => Prelude_Interfaces_x3ex3e(csegen_71(), Prelude_IO_putStrLn(csegen_74(), 'What would you like the description to be (two blank lines to finish)?'), () => $a4 => $a5 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_41(), $ac => Data_String_fastUnlines($ac), Util_getManyLines(csegen_74(), Data_Fuel_limit(Prelude_Types_fromInteger_Num_Nat(100n)))), description => Prelude_Interfaces_x3ex3e(csegen_71(), Prelude_IO_putStrLn(csegen_74(), 'Creating PR...'), () => Prelude_Interfaces_x3ex3e(csegen_71(), Prelude_IO_putStrLn(csegen_74(), $2), () => FFI_GitHub_createPR($1, $3.a2, $3.a3, $2, $5f, title, description))), $a4, $a5)), $8a, $8b));
-   return Prelude_Interfaces_x3ex3e(csegen_71(), Prelude_IO_putStrLn(csegen_74(), 'What would you like the title to be?'), $71);
+   const $5f = PullRequest_case__identifyOrCreatePRx2ccreatePR_1614($0, $1, $2, $3, baseBranchInput, Data_String_strM(baseBranchInput));
+   const $72 = Data_Maybe_fromMaybe(() => '', Prelude_Interfaces_x3cx24x3e(csegen_133(), $7a => Prelude_Types_String_x2bx2b($7a, ' - '), Util_parseJiraPrefix($2)));
+   const $71 = () => Prelude_Interfaces_x3ex3e(csegen_17(), Prelude_IO_putStr(csegen_20(), $72), () => $8a => $8b => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_64(), $92 => Prelude_Types_String_x2bx2b($72, Data_String_trim($92)), csegen_389()), title => Prelude_Interfaces_x3ex3e(csegen_17(), Prelude_IO_putStrLn(csegen_20(), 'What would you like the description to be (two blank lines to finish)?'), () => $a4 => $a5 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_64(), $ac => Data_String_fastUnlines($ac), Util_getManyLines(csegen_20(), Data_Fuel_limit(Prelude_Types_fromInteger_Num_Nat(100n)))), description => Prelude_Interfaces_x3ex3e(csegen_17(), Prelude_IO_putStrLn(csegen_20(), 'Creating PR...'), () => Prelude_Interfaces_x3ex3e(csegen_17(), Prelude_IO_putStrLn(csegen_20(), $2), () => FFI_GitHub_createPR($1, $3.a2, $3.a3, $2, $5f, title, description))), $a4, $a5)), $8a, $8b));
+   return Prelude_Interfaces_x3ex3e(csegen_17(), Prelude_IO_putStrLn(csegen_20(), 'What would you like the title to be?'), $71);
   };
-  return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_41(), $59 => Data_String_trim($59), csegen_366()), $5e, $51, $52);
+  return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_64(), $59 => Data_String_trim($59), csegen_389()), $5e, $51, $52);
  })));
 }
 
@@ -5822,10 +6176,59 @@ function PullRequest_tuple($0) {
  return {a1: $0.a1, a2: $0.a2};
 }
 
+function PullRequest_reviewsForUser($0, $1, $2, $3) {
+ const $6 = pr => {
+  let $7;
+  switch(Data_PullRequest_isAuthor($2, pr)) {
+   case 1: {
+    $7 = 1;
+    break;
+   }
+   case 0: {
+    $7 = Data_PullRequest_isRequestedReviewer($2, pr);
+    break;
+   }
+  }
+  switch($7) {
+   case 1: return 0;
+   case 0: return 1;
+  }
+ };
+ const $4 = Data_List_filter($6, $3);
+ return $10 => $11 => {
+  const $2e = reviewsJson => $2f => $30 => {
+   const $32 = $33 => {
+    const $3a = b => a => func => $3b => {
+     switch($3b.h) {
+      case 0: return {h: 0, a1: $3b.a1};
+      case 1: return {h: 1, a1: func($3b.a1)};
+     }
+    };
+    const $44 = b => a => $45 => $46 => {
+     switch($45.h) {
+      case 0: return {h: 0, a1: $45.a1};
+      case 1: {
+       switch($46.h) {
+        case 1: return {h: 1, a1: $45.a1($46.a1)};
+        case 0: return {h: 0, a1: $46.a1};
+       }
+      }
+     }
+    };
+    const $39 = {a1: $3a, a2: a => $42 => ({h: 1, a1: $42}), a3: $44};
+    const $37 = Prelude_Types_traverse_Traversable_List($39, $4f => Language_JSON_Accessors_array($52 => Data_Review_parseReview($52), $4f), reviewsJson);
+    return Data_Promise_either(csegen_79(), $37, $33);
+   };
+   return Data_Promise_x3ex3ex3d_Monad_Promise($32, reviews => $59 => $5a => Data_Promise_pure_Applicative_Promise(Data_List_filter($5f => Data_Review_isAuthor($2, $5f), Prelude_Types_join_Monad_List(reviews)), $59, $5a), $2f, $30);
+  };
+  return Data_Promise_x3ex3ex3d_Monad_Promise($14 => $15 => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Types_traverse_Traversable_List(csegen_11(), $1c => PullRequest_n__4298_1020_forkedReviews($1, $3, $2, $0, $1c), $4), $25 => $26 => $27 => FFI_Concurrency_promise($25, $26, $27), $14, $15), $2e, $10, $11);
+ };
+}
+
 function PullRequest_requestReviewers($0, $1, $2, $3, $4, $5, $6, $7) {
  const $13 = $14 => $15 => $16 => {
   const $2d = teamMembers => {
-   const $2e = Reviewer_chooseReviewers(csegen_49(), $14.a2, $14.a1, teamMembers, {h: 0}, $2.a3);
+   const $2e = Reviewer_chooseReviewers(csegen_72(), $14.a2, $14.a1, teamMembers, {h: 0}, $2.a3);
    return $38 => $39 => {
     const $40 = chosenUser => {
      const $41 = Prelude_Types_List_tailRecAppend(Prelude_Types_toList_Foldable_Maybe(chosenUser), $4);
@@ -5851,31 +6254,31 @@ function PullRequest_requestReviewers($0, $1, $2, $3, $4, $5, $6, $7) {
        break;
       }
      }
-     const $4d = Prelude_Interfaces_when(csegen_59(), $51, () => Prelude_Interfaces_x3ex3e(csegen_71(), $58 => $59 => Data_Promise_map_Functor_Promise($5c => 0, FFI_GitHub_addPullReviewers($1, $0.a2, $0.a3, $2.a1, $41, $47), $58, $59), () => Prelude_Interfaces_when(csegen_59(), $0.a6, () => $71 => $72 => {
+     const $4d = Prelude_Interfaces_when(csegen_11(), $51, () => Prelude_Interfaces_x3ex3e(csegen_17(), $58 => $59 => Data_Promise_map_Functor_Promise($5c => 0, FFI_GitHub_addPullReviewers($1, $0.a2, $0.a3, $2.a1, $41, $47), $58, $59), () => Prelude_Interfaces_when(csegen_11(), $0.a6, () => $71 => $72 => {
       switch(chosenUser.h) {
-       case undefined: return FFI_GitHub_createComment($1, $0.a2, $0.a3, $2.a1, PullRequest_n__4077_1020_prComment($1, $5, $4, $3, $2, $0, chosenUser.a1), $71, $72);
+       case undefined: return FFI_GitHub_createComment($1, $0.a2, $0.a3, $2.a1, PullRequest_n__4382_1119_prComment($1, $5, $4, $3, $2, $0, chosenUser.a1), $71, $72);
        case 0: return Data_Promise_pure_Applicative_Promise(0, $71, $72);
       }
      })));
      let $8b;
      switch(Prelude_Types_null_Foldable_List($41)()) {
       case 1: {
-       $8b = () => Prelude_IO_putStrLn(csegen_74(), PullRequest_n__4077_1016_maybeDecorate($1, $5, $4, $3, $2, $0, Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(3), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Could not pick a user from the given Team ')), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('(perhaps the only option was the author of the pull request?).'), a2: {h: 0}}})));
+       $8b = () => Prelude_IO_putStrLn(csegen_20(), PullRequest_n__4382_1115_maybeDecorate($1, $5, $4, $3, $2, $0, Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(3), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('Could not pick a user from the given Team ')), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String('(perhaps the only option was the author of the pull request?).'), a2: {h: 0}}})));
        break;
       }
       case 0: {
-       $8b = () => Prelude_IO_putStrLn(csegen_74(), PullRequest_n__4077_1016_maybeDecorate($1, $5, $4, $3, $2, $0, Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_String_x2bx2b('Assigned ', Prelude_Types_String_x2bx2b(PullRequest_n__4077_1018_userNotice($1, $5, $4, $3, $2, $0, chosenUser), Prelude_Types_String_x2bx2b(PullRequest_n__4077_1019_teamNotice($1, $5, $4, $3, $2, $0, $47), ' to the open PR ')))), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_String_x2bx2b('for the current branch (', Prelude_Types_String_x2bx2b(Data_PullRequest_rf__webURI($0, $2), ').'))), a2: {h: 0}}})));
+       $8b = () => Prelude_IO_putStrLn(csegen_20(), PullRequest_n__4382_1115_maybeDecorate($1, $5, $4, $3, $2, $0, Text_PrettyPrint_Prettyprinter_Doc_vsep({a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_String_x2bx2b('Assigned ', Prelude_Types_String_x2bx2b(PullRequest_n__4382_1117_userNotice($1, $5, $4, $3, $2, $0, chosenUser), Prelude_Types_String_x2bx2b(PullRequest_n__4382_1118_teamNotice($1, $5, $4, $3, $2, $0, $47), ' to the open PR ')))), a2: {a1: Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Prelude_Types_String_x2bx2b('for the current branch (', Prelude_Types_String_x2bx2b(Data_PullRequest_rf__webURI($0, $2), ').'))), a2: {h: 0}}})));
        break;
       }
      }
-     return Prelude_Interfaces_x3ex3e(csegen_71(), $4d, $8b);
+     return Prelude_Interfaces_x3ex3e(csegen_17(), $4d, $8b);
     };
-    return Data_Promise_x3ex3ex3d_Monad_Promise(Reviewer_randomReviewer(csegen_74(), $2e), $40, $38, $39);
+    return Data_Promise_x3ex3ex3d_Monad_Promise(Reviewer_randomReviewer(csegen_20(), $2e), $40, $38, $39);
    };
   };
-  return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_41(), $1e => Prelude_Types_join_Monad_List($1e), Prelude_Types_traverse_Traversable_List(csegen_59(), $26 => FFI_GitHub_listTeamMembers($1, $0.a2, $26), $3)), $2d, $15, $16);
+  return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_64(), $1e => Prelude_Types_join_Monad_List($1e), Prelude_Types_traverse_Traversable_List(csegen_11(), $26 => FFI_GitHub_listTeamMembers($1, $0.a2, $26), $3)), $2d, $15, $16);
  };
- return Data_Promise_x3ex3ex3d_Monad_Promise($a => $b => PullRequest_listReviewers($0, $1, csegen_80(), $a, $b), $13, $6, $7);
+ return Data_Promise_x3ex3ex3d_Monad_Promise($a => $b => PullRequest_listReviewers($0, $1, csegen_85(), $a, $b), $13, $6, $7);
 }
 
 function PullRequest_partition($0) {
@@ -5887,7 +6290,7 @@ function PullRequest_listReviewers($0, $1, $2, $3, $4) {
 }
 
 function PullRequest_listPartitionedPRs($0, $1, $2) {
- return Prelude_Interfaces_x3cx24x3e(csegen_41(), $7 => PullRequest_partition($7), FFI_GitHub_listPullRequests($1, $0.a2, $0.a3, {h: 0}, $2));
+ return Prelude_Interfaces_x3cx24x3e(csegen_64(), $7 => PullRequest_partition($7), FFI_GitHub_listPullRequests($1, $0.a2, $0.a3, {h: 0}, $2));
 }
 
 function PullRequest_identifyOrCreatePR($0, $1, $2, $3, $4, $5) {
@@ -5901,38 +6304,53 @@ function PullRequest_identifyOrCreatePR($0, $1, $2, $3, $4, $5) {
      }
     };
    }
-   case 0: return Prelude_Interfaces_x3cx24x3e(csegen_41(), $23 => ({a1: 1, a2: $23}), PullRequest_n__4544_1453_createPR($1, $2, $3, $0));
+   case 0: return Prelude_Interfaces_x3cx24x3e(csegen_64(), $23 => ({a1: 1, a2: $23}), PullRequest_n__4850_1553_createPR($1, $2, $3, $0));
    default: return $2c => $2d => Data_Promise_reject('Multiple PRs for the current brach. We only handle 1 PR per branch currently.', $2c, $2d);
   }
  };
  return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listPRsForBranch($2, $0.a2, $0.a3, $3), $f, $4, $5);
 }
 
+function PullRequest_combined($0) {
+ return Prelude_Types_List_tailRecAppend($0.a1, $0.a2);
+}
+
+function Reviewer_with__scoredReviewersx2czipReviewsx2ccalc_1021($0, $1, $2, $3, $4, $5, $6, $7, $8, $9, $a, $b, $c, $d) {
+ switch($b.h) {
+  case 0: return Prelude_Types_x2b_Num_Nat($d, $c);
+  case 1: return Prelude_Types_prim__integerToNat(($d-$c));
+ }
+}
+
 function Reviewer_n__3921_904_weightReviews($0, $1, $2, $3, $4, $5) {
  const $6 = Data_List_groupAllWith($0, $a => $a, $5);
- return Prelude_Interfaces_x3cx26x3e(csegen_62(), $6, xs => ({a1: xs.a1, a2: Prelude_Types_x2a_Num_Nat(Prelude_Types_List_length(Data_List1_forget(xs)), $4)}));
+ return Prelude_Interfaces_x3cx26x3e(csegen_76(), $6, xs => ({a1: xs.a1, a2: Prelude_Types_x2a_Num_Nat(Prelude_Types_List_length(Data_List1_forget(xs)), $4)}));
 }
 
 function Reviewer_n__3921_905_sortx27($0, $1, $2, $3, $4) {
  return Data_List_sortBy($7 => $8 => Prelude_Basics_on($b => $c => Prelude_Types_compare_Ord_Nat($b, $c), $11 => Builtin_snd($11), $7, $8), $4);
 }
 
-function Reviewer_n__4335_1300_graphOne($0, $1, $2, $3, $4, $5, $6, $7) {
+function Reviewer_n__4379_1343_graphOne($0, $1, $2, $3, $4, $5, $6, $7) {
  const $8 = Prelude_Types_prim__integerToNat(($5-$7));
  const $d = Text_PrettyPrint_Prettyprinter_Doc_indent(Prelude_Cast_cast_Cast_Nat_Int($8), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String(Data_String_replicate($7, '#')));
  const $18 = Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), $1.a1(undefined)($6));
  return Text_PrettyPrint_Prettyprinter_Doc_x3cx2bx2bx3e($d, $18);
 }
 
-function Reviewer_n__4335_1301_graph($0, $1, $2, $3, $4, $5, $6) {
- return Text_PrettyPrint_Prettyprinter_Doc_vsep(Prelude_Types_map_Functor_List($b => Prelude_Basics_uncurry($e => $f => Reviewer_n__4335_1300_graphOne($0, $1, $2, $3, $4, $5, $e, $f), $b), $6));
+function Reviewer_n__4379_1344_graph($0, $1, $2, $3, $4, $5, $6) {
+ return Text_PrettyPrint_Prettyprinter_Doc_vsep(Prelude_Types_map_Functor_List($b => Prelude_Basics_uncurry($e => $f => Reviewer_n__4379_1343_graphOne($0, $1, $2, $3, $4, $5, $e, $f), $b), $6));
+}
+
+function Reviewer_n__3936_1018_calc($0, $1, $2, $3, $4, $5, $6, $7, $8, $9, $a, $b, $c) {
+ return Reviewer_with__scoredReviewersx2czipReviewsx2ccalc_1021(undefined, $0, $1, $2, $3, $4, $5, $7, $8, $9, $a, $9, $c, $b);
 }
 
 function Reviewer_scoredReviewers($0, $1, $2, $3) {
  const $4 = Reviewer_n__3921_904_weightReviews($0, $3, $2, $1, 1n, $1);
- const $c = Reviewer_n__3921_904_weightReviews($0, $3, $2, $1, 2n, $2);
- const $14 = Reviewer_n__3921_906_zipReviews($0, $3, $2, $1, $4, $c, 0);
- return Reviewer_n__3921_905_sortx27($0, $3, $2, $1, Reviewer_n__3921_906_zipReviews($0, $3, $2, $1, $14, Reviewer_n__3921_904_weightReviews($0, $3, $2, $1, 0n, $3), 1));
+ const $c = Reviewer_n__3921_904_weightReviews($0, $3, $2, $1, 3n, $2);
+ const $14 = Reviewer_n__3921_909_zipReviews($0, $3, $2, $1, $c, $4, {h: 1, a1: $0, a2: $3, a3: $2, a4: $1}, 0);
+ return Reviewer_n__3921_905_sortx27($0, $3, $2, $1, Reviewer_n__3921_909_zipReviews($0, $3, $2, $1, $14, Reviewer_n__3921_904_weightReviews($0, $3, $2, $1, 0n, $3), {h: 0, a1: $0, a2: $3, a3: $2, a4: $1}, 1));
 }
 
 function Reviewer_reviewsGraph($0, $1, $2, $3, $4) {
@@ -5951,7 +6369,7 @@ function Reviewer_reviewsGraph($0, $1, $2, $3, $4) {
      break;
     }
    }
-   return Reviewer_n__4335_1301_graph($0, $1, $4, $3, $2, $1d, $5);
+   return Reviewer_n__4379_1344_graph($0, $1, $4, $3, $2, $1d, $5);
   }
  }
 }
@@ -6004,37 +6422,41 @@ function FFI_GitHub_pullRequestStateFilter($0) {
 }
 
 function FFI_GitHub_octokit($0) {
- return Prelude_Interfaces_x3cx24x3e(csegen_25(), $5 => $5, $7 => FFI_GitHub_prim__octokit($0, $7));
+ return Prelude_Interfaces_x3cx24x3e(csegen_48(), $5 => $5, $7 => FFI_GitHub_prim__octokit($0, $7));
 }
 
 function FFI_GitHub_listTeams($0, $1) {
- return Prelude_Interfaces_x3cx24x3e(csegen_41(), $6 => Data_String_lines($6), $a => $b => FFI_promiseIO($e => $f => $10 => FFI_GitHub_prim__listTeams($0, $1, $e, $f, $10), $a, $b));
+ return Prelude_Interfaces_x3cx24x3e(csegen_64(), $6 => Data_String_lines($6), $a => $b => FFI_promiseIO($e => $f => $10 => FFI_GitHub_prim__listTeams($0, $1, $e, $f, $10), $a, $b));
 }
 
 function FFI_GitHub_listTeamMembers($0, $1, $2) {
- return Prelude_Interfaces_x3cx24x3e(csegen_41(), $7 => Data_String_lines($7), $b => $c => FFI_promiseIO($f => $10 => $11 => FFI_GitHub_prim__listTeamMembers($0, $1, $2, $f, $10, $11), $b, $c));
+ return Prelude_Interfaces_x3cx24x3e(csegen_64(), $7 => Data_String_lines($7), $b => $c => FFI_promiseIO($f => $10 => $11 => FFI_GitHub_prim__listTeamMembers($0, $1, $2, $f, $10, $11), $b, $c));
+}
+
+function FFI_GitHub_listPullReviewsJsonStr($0, $1, $2, $3, $4, $5) {
+ return FFI_promiseIO($8 => $9 => $a => FFI_GitHub_prim__listPullReviews($0, $1, $2, $3, $8, $9, $a), $4, $5);
 }
 
 function FFI_GitHub_listPullRequests($0, $1, $2, $3, $4) {
  const $5 = FFI_GitHub_pullRequestStateFilter($3);
  const $8 = Prelude_Cast_cast_Cast_Nat_Int16(Data_Fin_finToNat($4));
- return Prelude_Interfaces_x3dx3cx3c(csegen_71(), csegen_387(), $13 => $14 => FFI_promiseIO($17 => $18 => $19 => FFI_GitHub_prim__listPullRequests($0, $1, $2, $5, $8, $17, $18, $19), $13, $14));
+ return Prelude_Interfaces_x3dx3cx3c(csegen_17(), csegen_413(), $13 => $14 => FFI_promiseIO($17 => $18 => $19 => FFI_GitHub_prim__listPullRequests($0, $1, $2, $5, $8, $17, $18, $19), $13, $14));
 }
 
 function FFI_GitHub_listPRsForBranch($0, $1, $2, $3) {
- return Prelude_Interfaces_x3dx3cx3c(csegen_71(), csegen_387(), $a => $b => FFI_promiseIO($e => $f => $10 => FFI_GitHub_prim__listPRsForBranch($0, $1, $2, $3, $e, $f, $10), $a, $b));
+ return Prelude_Interfaces_x3dx3cx3c(csegen_17(), csegen_413(), $a => $b => FFI_promiseIO($e => $f => $10 => FFI_GitHub_prim__listPRsForBranch($0, $1, $2, $3, $e, $f, $10), $a, $b));
 }
 
 function FFI_GitHub_listOrgMembers($0, $1) {
- return Prelude_Interfaces_x3cx24x3e(csegen_41(), $6 => Data_String_lines($6), $a => $b => FFI_promiseIO($e => $f => $10 => FFI_GitHub_prim__listOrgMembers($0, $1, $e, $f, $10), $a, $b));
+ return Prelude_Interfaces_x3cx24x3e(csegen_64(), $6 => Data_String_lines($6), $a => $b => FFI_promiseIO($e => $f => $10 => FFI_GitHub_prim__listOrgMembers($0, $1, $e, $f, $10), $a, $b));
 }
 
 function FFI_GitHub_getUser($0) {
- return Prelude_Interfaces_x3cx3dx3c(csegen_71(), csegen_388(), $7 => $8 => $9 => FFI_promiseIO($c => $d => $e => FFI_GitHub_prim__getUser($0, $7, $c, $d, $e), $8, $9));
+ return Prelude_Interfaces_x3cx3dx3c(csegen_17(), csegen_414(), $7 => $8 => $9 => FFI_promiseIO($c => $d => $e => FFI_GitHub_prim__getUser($0, $7, $c, $d, $e), $8, $9));
 }
 
 function FFI_GitHub_getSelf($0) {
- return Prelude_Interfaces_x3dx3cx3c(csegen_71(), csegen_388(), $7 => $8 => FFI_promiseIO($b => $c => $d => FFI_GitHub_prim__getSelf($0, $b, $c, $d), $7, $8));
+ return Prelude_Interfaces_x3dx3cx3c(csegen_17(), csegen_414(), $7 => $8 => FFI_promiseIO($b => $c => $d => FFI_GitHub_prim__getSelf($0, $b, $c, $d), $7, $8));
 }
 
 function FFI_GitHub_getRepoDefaultBranch($0, $1, $2, $3, $4) {
@@ -6042,7 +6464,7 @@ function FFI_GitHub_getRepoDefaultBranch($0, $1, $2, $3, $4) {
 }
 
 function FFI_GitHub_createPR($0, $1, $2, $3, $4, $5, $6) {
- return Prelude_Interfaces_x3dx3cx3c(csegen_71(), $b => $c => Data_Promise_either(csegen_65(), Data_PullRequest_parsePullRequestString($b), $c), $15 => $16 => FFI_promiseIO($19 => $1a => $1b => FFI_GitHub_prim__createPR($0, $1, $2, $3, $4, $5, $6, $19, $1a, $1b), $15, $16));
+ return Prelude_Interfaces_x3dx3cx3c(csegen_17(), $b => $c => Data_Promise_either(csegen_79(), Data_PullRequest_parsePullRequestString($b), $c), $15 => $16 => FFI_promiseIO($19 => $1a => $1b => FFI_GitHub_prim__createPR($0, $1, $2, $3, $4, $5, $6, $19, $1a, $1b), $15, $16));
 }
 
 function FFI_GitHub_createComment($0, $1, $2, $3, $4, $5, $6) {
@@ -6050,7 +6472,7 @@ function FFI_GitHub_createComment($0, $1, $2, $3, $4, $5, $6) {
 }
 
 function FFI_GitHub_addPullReviewers($0, $1, $2, $3, $4, $5) {
- return Prelude_Interfaces_x3cx24x3e(csegen_41(), $a => Data_String_lines($a), $e => $f => FFI_promiseIO($12 => $13 => $14 => FFI_GitHub_prim__addPullReviewers($0, $1, $2, $3, Data_String_Extra_join(',', csegen_114(), $4), Data_String_Extra_join(',', csegen_114(), $5), $12, $13, $14), $e, $f));
+ return Prelude_Interfaces_x3cx24x3e(csegen_64(), $a => Data_String_lines($a), $e => $f => FFI_promiseIO($12 => $13 => $14 => FFI_GitHub_prim__addPullReviewers($0, $1, $2, $3, Data_String_Extra_join(',', csegen_126(), $4), Data_String_Extra_join(',', csegen_126(), $5), $12, $13, $14), $e, $f));
 }
 
 function FFI_promiseIO($0, $1, $2) {
@@ -6083,7 +6505,7 @@ function Data_Promise_x3cx7cx3e_Alternative_Promise($0, $1, $2, $3) {
 }
 
 function Data_Promise_x3cx2ax3e_Applicative_Promise($0, $1, $2, $3) {
- return Data_Promise_bind($0, f => Prelude_Interfaces_x3cx24x3e(csegen_53(), f, $1), $2, $3);
+ return Data_Promise_bind($0, f => Prelude_Interfaces_x3cx24x3e(csegen_5(), f, $1), $2, $3);
 }
 
 function Data_Promise_resolvex27($0, $1, $2) {
@@ -6130,8 +6552,8 @@ function Data_User_parseUserString($0) {
   }
  };
  const $3 = {a1: $4, a2: a => $c => ({h: 1, a1: $c}), a3: $e};
- const $2 = {a1: $3, a2: csegen_233(), a3: csegen_234()};
- return Prelude_Interfaces_x3ex3dx3e($2, csegen_235(), $1f => Data_User_parseUser($1f), $0);
+ const $2 = {a1: $3, a2: csegen_256(), a3: csegen_257()};
+ return Prelude_Interfaces_x3ex3dx3e($2, csegen_258(), $1f => Data_User_parseUser($1f), $0);
 }
 
 function Data_User_parseUser($0) {
@@ -6142,152 +6564,80 @@ function Data_User_parseUser($0) {
  }
 }
 
-function Data_PullRequest_show_Show_PRState($0) {
- switch($0) {
-  case 0: return 'open';
-  case 1: return 'closed';
- }
-}
-
-function Data_PullRequest_x3dx3d_Eq_PRState($0, $1) {
+function Data_Review_parseState($0) {
  switch($0) {
-  case 0: {
-   switch($1) {
-    case 0: return 1;
-    default: return 0;
-   }
-  }
-  case 1: {
-   switch($1) {
-    case 1: return 1;
-    default: return 0;
-   }
-  }
-  default: return 0;
- }
-}
-
-function Data_PullRequest_rf__webURI($0, $1) {
- return Prelude_Types_String_x2bx2b('https://github.com/', Prelude_Types_String_x2bx2b($0.a2, Prelude_Types_String_x2bx2b('/', Prelude_Types_String_x2bx2b($0.a3, Prelude_Types_String_x2bx2b('/pull/', Prelude_Show_show_Show_Integer($1.a1))))));
-}
-
-function Data_PullRequest_parseState($0) {
- switch($0) {
-  case 'open': return {h: 1, a1: 0};
-  case 'closed': return {h: 1, a1: 1};
-  default: return {h: 0, a1: Prelude_Types_String_x2bx2b('Failed to parse a Pull Request State (open/closed). Found ', Prelude_Types_String_x2bx2b($0, '.'))};
- }
-}
-
-function Data_PullRequest_parsePullRequestsString($0) {
- const $4 = b => a => func => $5 => {
-  switch($5.h) {
-   case 0: return {h: 0, a1: $5.a1};
-   case 1: return {h: 1, a1: func($5.a1)};
-  }
- };
- const $e = b => a => $f => $10 => {
-  switch($f.h) {
-   case 0: return {h: 0, a1: $f.a1};
-   case 1: {
-    switch($10.h) {
-     case 1: return {h: 1, a1: $f.a1($10.a1)};
-     case 0: return {h: 0, a1: $10.a1};
-    }
-   }
-  }
- };
- const $3 = {a1: $4, a2: a => $c => ({h: 1, a1: $c}), a3: $e};
- const $2 = {a1: $3, a2: csegen_233(), a3: csegen_234()};
- return Prelude_Interfaces_x3ex3dx3e($2, csegen_235(), $1f => Language_JSON_Accessors_array($22 => Data_PullRequest_parsePR($22), $1f), $0);
-}
-
-function Data_PullRequest_parsePullRequestString($0) {
- const $4 = b => a => func => $5 => {
-  switch($5.h) {
-   case 0: return {h: 0, a1: $5.a1};
-   case 1: return {h: 1, a1: func($5.a1)};
-  }
- };
- const $e = b => a => $f => $10 => {
-  switch($f.h) {
-   case 0: return {h: 0, a1: $f.a1};
-   case 1: {
-    switch($10.h) {
-     case 1: return {h: 1, a1: $f.a1($10.a1)};
-     case 0: return {h: 0, a1: $10.a1};
-    }
-   }
-  }
- };
- const $3 = {a1: $4, a2: a => $c => ({h: 1, a1: $c}), a3: $e};
- const $2 = {a1: $3, a2: csegen_233(), a3: csegen_234()};
- return Prelude_Interfaces_x3ex3dx3e($2, csegen_235(), $1f => Data_PullRequest_parsePR($1f), $0);
-}
-
-function Data_PullRequest_parsePR($0) {
- const $5 = pr => {
-  const $15 = $16 => {
-   const $21 = number => {
-    const $26 = author => {
-     const $2c = b => a => func => $2d => {
-      switch($2d.h) {
-       case 0: return {h: 0, a1: $2d.a1};
-       case 1: return {h: 1, a1: func($2d.a1)};
+  case 'APPROVED': return {h: 1, a1: 0};
+  case 'COMMENTED': return {h: 1, a1: 1};
+  case 'CHANGES_REQUESTED': return {h: 1, a1: 0};
+  case 'DISMISSED': return {h: 1, a1: 0};
+  default: return {h: 0, a1: 'Failed to parse Review State.'};
+ }
+}
+
+function Data_Review_parseReview($0) {
+ const $5 = review => {
+  const $11 = $12 => {
+   const $1b = author => {
+    const $21 = b => a => func => $22 => {
+     switch($22.h) {
+      case 0: return {h: 0, a1: $22.a1};
+      case 1: return {h: 1, a1: func($22.a1)};
+     }
+    };
+    const $2b = b => a => $2c => $2d => {
+     switch($2c.h) {
+      case 0: return {h: 0, a1: $2c.a1};
+      case 1: {
+       switch($2d.h) {
+        case 1: return {h: 1, a1: $2c.a1($2d.a1)};
+        case 0: return {h: 0, a1: $2d.a1};
+       }
+      }
+     }
+    };
+    const $20 = {a1: $21, a2: a => $29 => ({h: 1, a1: $29}), a3: $2b};
+    const $1f = {a1: $20, a2: csegen_256(), a3: csegen_257()};
+    const $1d = Prelude_Interfaces_x3dx3cx3c($1f, $3a => Data_Review_parseState($3a), Language_JSON_Accessors_string($12.a2.a1));
+    const $40 = state => {
+     const $46 = b => a => func => $47 => {
+      switch($47.h) {
+       case 0: return {h: 0, a1: $47.a1};
+       case 1: return {h: 1, a1: func($47.a1)};
       }
      };
-     const $36 = b => a => $37 => $38 => {
-      switch($37.h) {
-       case 0: return {h: 0, a1: $37.a1};
+     const $50 = b => a => $51 => $52 => {
+      switch($51.h) {
+       case 0: return {h: 0, a1: $51.a1};
        case 1: {
-        switch($38.h) {
-         case 1: return {h: 1, a1: $37.a1($38.a1)};
-         case 0: return {h: 0, a1: $38.a1};
+        switch($52.h) {
+         case 1: return {h: 1, a1: $51.a1($52.a1)};
+         case 0: return {h: 0, a1: $52.a1};
         }
        }
       }
      };
-     const $2b = {a1: $2c, a2: a => $34 => ({h: 1, a1: $34}), a3: $36};
-     const $2a = {a1: $2b, a2: csegen_233(), a3: csegen_234()};
-     const $28 = Prelude_Interfaces_x3dx3cx3c($2a, $45 => Data_PullRequest_parseState($45), Language_JSON_Accessors_string($16.a2.a2.a1));
-     const $4b = state => {
-      const $51 = b => a => func => $52 => {
-       switch($52.h) {
-        case 0: return {h: 0, a1: $52.a1};
-        case 1: return {h: 1, a1: func($52.a1)};
-       }
-      };
-      const $5b = b => a => $5c => $5d => {
-       switch($5c.h) {
-        case 0: return {h: 0, a1: $5c.a1};
-        case 1: {
-         switch($5d.h) {
-          case 1: return {h: 1, a1: $5c.a1($5d.a1)};
-          case 0: return {h: 0, a1: $5d.a1};
-         }
-        }
-       }
-      };
-      const $50 = {a1: $51, a2: a => $59 => ({h: 1, a1: $59}), a3: $5b};
-      const $4f = {a1: $50, a2: csegen_233(), a3: csegen_234()};
-      const $4d = Prelude_Interfaces_x3dx3cx3c($4f, $6a => Data_PullRequest_parseDateTime($6a), Language_JSON_Accessors_string($16.a2.a2.a2.a1));
-      return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29($4d, createdAt => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_array($75 => Language_JSON_Accessors_string($75), $16.a2.a2.a2.a2.a1), reviewers => ({h: 1, a1: {a1: number, a2: createdAt, a3: author, a4: state, a5: reviewers}})));
-     };
-     return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29($28, $4b);
+     const $45 = {a1: $46, a2: a => $4e => ({h: 1, a1: $4e}), a3: $50};
+     const $44 = {a1: $45, a2: csegen_256(), a3: csegen_257()};
+     const $42 = Prelude_Interfaces_x3dx3cx3c($44, $5f => Data_Review_parseDateTime($5f), Language_JSON_Accessors_string($12.a2.a2.a1));
+     return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29($42, submittedAt => ({h: 1, a1: {a1: submittedAt, a2: author, a3: state}}));
     };
-    return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_string($16.a2.a1), $26);
+    return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29($1d, $40);
    };
-   return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_integer($16.a1), $21);
+   return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_string($12.a1), $1b);
   };
-  return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_lookupAll({a1: 'pull_number', a2: {a1: 'author', a2: {a1: 'state', a2: {a1: 'created_at', a2: {a1: 'reviewers', a2: {h: 0}}}}}}, pr), $15);
+  return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_lookupAll({a1: 'author', a2: {a1: 'state', a2: {a1: 'submitted_at', a2: {h: 0}}}}, review), $11);
  };
  return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_object($0), $5);
 }
 
-function Data_PullRequest_parseDateTime($0) {
+function Data_Review_parseDateTime($0) {
  return Data_Either_maybeToEither(() => 'Failed to parse Date', Data_Date_parseDateTimeString($0));
 }
 
+function Data_Review_isAuthor($0, $1) {
+ return Prelude_EqOrd_x3dx3d_Eq_String($1.a2, $0);
+}
+
 function Data_Date_n__2935_4035_parseNat($0, $1, $2) {
  switch($2) {
   case '0': return {a1: 0n};
@@ -6319,7 +6669,7 @@ function Data_Date_n__3042_4142_guardSuccess($0) {
      switch($0.a2.h) {
       case undefined: {
        switch($0.a2.a2.h) {
-        case undefined: return Prelude_Interfaces_x3cx24x3e(csegen_118(), $9 => ({a1: $0.a2.a1, a2: $0.a2.a2.a1, a3: $9}), Data_Date_parsePositiveReversed($0.a2.a2.a2));
+        case undefined: return Prelude_Interfaces_x3cx24x3e(csegen_133(), $9 => ({a1: $0.a2.a1, a2: $0.a2.a2.a1, a3: $9}), Data_Date_parsePositiveReversed($0.a2.a2.a2));
         default: return {h: 0};
        }
       }
@@ -6464,6 +6814,160 @@ function Data_Date_parseDateString($0) {
  return Data_Date_n__3042_4142_guardSuccess(Prelude_Types_foldl_Foldable_List($5 => $6 => Data_Date_n__3042_4143_go($5, $6), {a1: {h: 0}, a2: 0}, Prelude_Types_fastUnpack($0)));
 }
 
+function Data_PullRequest_show_Show_PRState($0) {
+ switch($0) {
+  case 0: return 'open';
+  case 1: return 'closed';
+ }
+}
+
+function Data_PullRequest_x3dx3d_Eq_PRState($0, $1) {
+ switch($0) {
+  case 0: {
+   switch($1) {
+    case 0: return 1;
+    default: return 0;
+   }
+  }
+  case 1: {
+   switch($1) {
+    case 1: return 1;
+    default: return 0;
+   }
+  }
+  default: return 0;
+ }
+}
+
+function Data_PullRequest_rf__webURI($0, $1) {
+ return Prelude_Types_String_x2bx2b('https://github.com/', Prelude_Types_String_x2bx2b($0.a2, Prelude_Types_String_x2bx2b('/', Prelude_Types_String_x2bx2b($0.a3, Prelude_Types_String_x2bx2b('/pull/', Prelude_Show_show_Show_Integer($1.a1))))));
+}
+
+function Data_PullRequest_parseState($0) {
+ switch($0) {
+  case 'open': return {h: 1, a1: 0};
+  case 'closed': return {h: 1, a1: 1};
+  default: return {h: 0, a1: Prelude_Types_String_x2bx2b('Failed to parse a Pull Request State (open/closed). Found ', Prelude_Types_String_x2bx2b($0, '.'))};
+ }
+}
+
+function Data_PullRequest_parsePullRequestsString($0) {
+ const $4 = b => a => func => $5 => {
+  switch($5.h) {
+   case 0: return {h: 0, a1: $5.a1};
+   case 1: return {h: 1, a1: func($5.a1)};
+  }
+ };
+ const $e = b => a => $f => $10 => {
+  switch($f.h) {
+   case 0: return {h: 0, a1: $f.a1};
+   case 1: {
+    switch($10.h) {
+     case 1: return {h: 1, a1: $f.a1($10.a1)};
+     case 0: return {h: 0, a1: $10.a1};
+    }
+   }
+  }
+ };
+ const $3 = {a1: $4, a2: a => $c => ({h: 1, a1: $c}), a3: $e};
+ const $2 = {a1: $3, a2: csegen_256(), a3: csegen_257()};
+ return Prelude_Interfaces_x3ex3dx3e($2, csegen_258(), $1f => Language_JSON_Accessors_array($22 => Data_PullRequest_parsePR($22), $1f), $0);
+}
+
+function Data_PullRequest_parsePullRequestString($0) {
+ const $4 = b => a => func => $5 => {
+  switch($5.h) {
+   case 0: return {h: 0, a1: $5.a1};
+   case 1: return {h: 1, a1: func($5.a1)};
+  }
+ };
+ const $e = b => a => $f => $10 => {
+  switch($f.h) {
+   case 0: return {h: 0, a1: $f.a1};
+   case 1: {
+    switch($10.h) {
+     case 1: return {h: 1, a1: $f.a1($10.a1)};
+     case 0: return {h: 0, a1: $10.a1};
+    }
+   }
+  }
+ };
+ const $3 = {a1: $4, a2: a => $c => ({h: 1, a1: $c}), a3: $e};
+ const $2 = {a1: $3, a2: csegen_256(), a3: csegen_257()};
+ return Prelude_Interfaces_x3ex3dx3e($2, csegen_258(), $1f => Data_PullRequest_parsePR($1f), $0);
+}
+
+function Data_PullRequest_parsePR($0) {
+ const $5 = pr => {
+  const $15 = $16 => {
+   const $21 = number => {
+    const $26 = author => {
+     const $2c = b => a => func => $2d => {
+      switch($2d.h) {
+       case 0: return {h: 0, a1: $2d.a1};
+       case 1: return {h: 1, a1: func($2d.a1)};
+      }
+     };
+     const $36 = b => a => $37 => $38 => {
+      switch($37.h) {
+       case 0: return {h: 0, a1: $37.a1};
+       case 1: {
+        switch($38.h) {
+         case 1: return {h: 1, a1: $37.a1($38.a1)};
+         case 0: return {h: 0, a1: $38.a1};
+        }
+       }
+      }
+     };
+     const $2b = {a1: $2c, a2: a => $34 => ({h: 1, a1: $34}), a3: $36};
+     const $2a = {a1: $2b, a2: csegen_256(), a3: csegen_257()};
+     const $28 = Prelude_Interfaces_x3dx3cx3c($2a, $45 => Data_PullRequest_parseState($45), Language_JSON_Accessors_string($16.a2.a2.a1));
+     const $4b = state => {
+      const $51 = b => a => func => $52 => {
+       switch($52.h) {
+        case 0: return {h: 0, a1: $52.a1};
+        case 1: return {h: 1, a1: func($52.a1)};
+       }
+      };
+      const $5b = b => a => $5c => $5d => {
+       switch($5c.h) {
+        case 0: return {h: 0, a1: $5c.a1};
+        case 1: {
+         switch($5d.h) {
+          case 1: return {h: 1, a1: $5c.a1($5d.a1)};
+          case 0: return {h: 0, a1: $5d.a1};
+         }
+        }
+       }
+      };
+      const $50 = {a1: $51, a2: a => $59 => ({h: 1, a1: $59}), a3: $5b};
+      const $4f = {a1: $50, a2: csegen_256(), a3: csegen_257()};
+      const $4d = Prelude_Interfaces_x3dx3cx3c($4f, $6a => Data_PullRequest_parseDateTime($6a), Language_JSON_Accessors_string($16.a2.a2.a2.a1));
+      return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29($4d, createdAt => Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_array($75 => Language_JSON_Accessors_string($75), $16.a2.a2.a2.a2.a1), reviewers => ({h: 1, a1: {a1: number, a2: createdAt, a3: author, a4: state, a5: reviewers}})));
+     };
+     return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29($28, $4b);
+    };
+    return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_string($16.a2.a1), $26);
+   };
+   return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_integer($16.a1), $21);
+  };
+  return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_lookupAll({a1: 'pull_number', a2: {a1: 'author', a2: {a1: 'state', a2: {a1: 'created_at', a2: {a1: 'reviewers', a2: {h: 0}}}}}}, pr), $15);
+ };
+ return Prelude_Types_x3ex3ex3d_Monad_x28Eitherx20x24ex29(Language_JSON_Accessors_object($0), $5);
+}
+
+function Data_PullRequest_parseDateTime($0) {
+ return Data_Either_maybeToEither(() => 'Failed to parse Date', Data_Date_parseDateTimeString($0));
+}
+
+function Data_PullRequest_isRequestedReviewer($0, $1) {
+ return Prelude_Interfaces_any(csegen_126(), $6 => Prelude_EqOrd_x3dx3d_Eq_String($6, $0), $1.a5);
+}
+
+function Data_PullRequest_isAuthor($0, $1) {
+ return Prelude_EqOrd_x3dx3d_Eq_String($1.a3, $0);
+}
+
 function FFI_Git_case__remoteTrackingBranch_855($0, $1, $2) {
  switch($1) {
   case '': {
@@ -6496,6 +7000,43 @@ function FFI_Git_currentBranch($0, $1, $2) {
  return FFI_promiseIO($5 => $6 => $7 => FFI_Git_prim__currentBranch($0, $5, $6, $7), $1, $2);
 }
 
+function FFI_Concurrency_promise($0, $1, $2) {
+ const $9 = f => $a => $b => {
+  const $1e = str => $1f => $20 => {
+   const $31 = $32 => $33 => $34 => {
+    switch($32.h) {
+     case 4: return Data_Promise_pure_Applicative_Promise($32.a1, $33, $34);
+     default: return Data_Promise_reject(Prelude_Types_String_x2bx2b('Expected a JSON array from futures but got ', Prelude_Types_String_x2bx2b(Language_JSON_Data_show_Show_JSON($32), '.')), $33, $34);
+    }
+   };
+   return Data_Promise_x3ex3ex3d_Monad_Promise($23 => Data_Promise_either(csegen_79(), Data_Either_maybeToEither(() => Prelude_Types_String_x2bx2b('Failed to parse JSON from ', str), Language_JSON_parse(str)), $23), $31, $1f, $20);
+  };
+  return Data_Promise_x3ex3ex3d_Monad_Promise($e => $f => Data_Promise_promisify(ok => err => $12 => FFI_Concurrency_prim__awaitStringify(f, x => ok(x), y => err(y), $12), $e, $f), $1e, $a, $b);
+ };
+ return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_Concurrency_all(csegen_20(), $0), $9, $1, $2);
+}
+
+function FFI_Concurrency_fork($0, $1) {
+ return $0.a2(undefined)($7 => FFI_Concurrency_prim__future($1, $7));
+}
+
+function FFI_Concurrency_all($0, $1) {
+ switch($1.h) {
+  case 0: return $0.a2(undefined)($8 => FFI_Concurrency_prim__neutral($8));
+  case undefined: {
+   switch($1.a2.h) {
+    case 0: return $0.a2(undefined)($11 => FFI_Concurrency_prim__singleton($1.a1, $11));
+    case undefined: {
+     switch($1.a2.a2.h) {
+      case 0: return $0.a2(undefined)($1b => FFI_Concurrency_prim__both($1.a1, $1.a2.a1, $1b));
+      case undefined: return $0.a1.a2(undefined)(undefined)(FFI_Concurrency_all($0, {a1: $1.a2.a2.a1, a2: $1.a2.a2.a2}))(rest => $0.a1.a2(undefined)(undefined)($0.a2(undefined)($3d => FFI_Concurrency_prim__both($1.a1, $1.a2.a1, $3d)))(head => $0.a1.a2(undefined)(undefined)($0.a2(undefined)($51 => FFI_Concurrency_prim__both(head, rest, $51)))(nested => $0.a2(undefined)($5c => FFI_Concurrency_prim__flatten(nested, $5c)))));
+     }
+    }
+   }
+  }
+ }
+}
+
 const System_File_Virtual_stdout = __lazy(function () {
  return System_File_Virtual_prim__stdout();
 });
@@ -6539,14 +7080,14 @@ function System_File_ReadWrite_readLinesOnto($0, $1, $2, $3, $4) {
          }
         };
         const $28 = {a1: $29, a2: a => $31 => ({h: 1, a1: $31}), a3: $33};
-        const $27 = {a1: $28, a2: csegen_233(), a3: csegen_234()};
+        const $27 = {a1: $28, a2: csegen_256(), a3: csegen_257()};
         const $42 = b => a => func => $43 => {
          switch($43.h) {
           case 0: return {h: 0, a1: $43.a1};
           case 1: return {h: 1, a1: func($43.a1)};
          }
         };
-        const $41 = {a1: $42, a2: csegen_432(), a3: csegen_436()};
+        const $41 = {a1: $42, a2: csegen_460(), a3: csegen_464()};
         const $26 = {a1: $27, a2: $41};
         const $23 = {a1: $0.a1, a2: $26};
         return Prelude_Interfaces_Monad_x3ex3ex3d_Monad_Composex28x28x2ex20x24mx29x20x24tx29($23, System_File_ReadWrite_fGetLine($0, $4), str => System_File_ReadWrite_readLinesOnto($0, {a1: str, a2: $1}, 0n, $3.a1(), $4));
@@ -6826,7 +7367,7 @@ const System_Info_os = __lazy(function () {
 });
 
 const System_Info_isWindows = __lazy(function () {
- return Prelude_Types_elem(csegen_34(), System_Info_os(), {a1: 'windows', a2: {a1: 'mingw32', a2: {a1: 'cygwin32', a2: {h: 0}}}});
+ return Prelude_Types_elem(csegen_57(), System_Info_os(), {a1: 'windows', a2: {a1: 'mingw32', a2: {a1: 'cygwin32', a2: {h: 0}}}});
 });
 
 function System_File_Meta_isTTY($0, $1) {
@@ -6860,7 +7401,7 @@ function System_getEnv($0, $1) {
 function System_getArgs($0) {
  const $12 = n => {
   switch(Prelude_EqOrd_x3e_Ord_Int(n, Number(_truncBigInt32(0n)))) {
-   case 1: return Prelude_Interfaces_for({a1: {a1: b => a => func => $1c => Prelude_Types_map_Functor_List(func, $1c), a2: csegen_114(), a3: b => a => f => $23 => $24 => $25 => Prelude_Types_traverse_Traversable_List($23, $24, $25)}, a2: $0.a1.a1}, Prelude_Types_rangeFromTo_Range_x24a({a1: {a1: csegen_458(), a2: $34 => $35 => Prelude_Num_div_Integral_Int($34, $35), a3: $3a => $3b => Prelude_Num_mod_Integral_Int($3a, $3b)}, a2: {a1: csegen_249(), a2: {a1: csegen_458(), a2: $46 => _sub32s(0, $46), a3: $4a => $4b => _sub32s($4a, $4b)}}}, 0, _sub32s(n, 1)), $53 => $0.a2(undefined)($59 => System_prim__getArg($53, $59)));
+   case 1: return Prelude_Interfaces_for({a1: {a1: b => a => func => $1c => Prelude_Types_map_Functor_List(func, $1c), a2: csegen_126(), a3: b => a => f => $23 => $24 => $25 => Prelude_Types_traverse_Traversable_List($23, $24, $25)}, a2: $0.a1.a1}, Prelude_Types_rangeFromTo_Range_x24a({a1: {a1: csegen_486(), a2: $34 => $35 => Prelude_Num_div_Integral_Int($34, $35), a3: $3a => $3b => Prelude_Num_mod_Integral_Int($3a, $3b)}, a2: {a1: csegen_272(), a2: {a1: csegen_486(), a2: $46 => _sub32s(0, $46), a3: $4a => $4b => _sub32s($4a, $4b)}}}, 0, _sub32s(n, 1)), $53 => $0.a2(undefined)($59 => System_prim__getArg($53, $59)));
    case 0: return $0.a1.a1.a2(undefined)({h: 0});
   }
  };
@@ -6886,6 +7427,10 @@ function Help_n__3162_507_subcommand($0, $1) {
  return Help_n__3162_506_maybeDecorate($0, $5 => Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_color(5), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($5)), $1);
 }
 
+function Help_n__3162_510_shell($0, $1) {
+ return Help_n__3162_506_maybeDecorate($0, $5 => Text_PrettyPrint_Prettyprinter_Doc_annotate(Text_PrettyPrint_Prettyprinter_Render_Terminal_italic(), Text_PrettyPrint_Prettyprinter_Doc_pretty_Pretty_String($5)), $1);
+}
+
 function Help_n__3162_506_maybeDecorate($0, $1, $2) {
  switch($0) {
   case 1: return Text_PrettyPrint_Prettyprinter_Render_Terminal_renderString(Text_PrettyPrint_Prettyprinter_Doc_layoutPretty(Text_PrettyPrint_Prettyprinter_Doc_defaultLayoutOptions(), $1($2)));
@@ -6902,17 +7447,17 @@ function Help_n__3162_508_argument($0, $1) {
 }
 
 function Help_help($0) {
- return Prelude_Types_String_x2bx2b('harmony ', Prelude_Types_String_x2bx2b(Help_n__3162_507_subcommand($0, '<subcommand>'), Prelude_Types_String_x2bx2b('\n\n', Prelude_Types_String_x2bx2b(Help_n__3162_509_heading($0, 'Subcommands'), Prelude_Types_String_x2bx2b(':\n  ', Prelude_Types_String_x2bx2b(Help_n__3162_507_subcommand($0, 'help'), Prelude_Types_String_x2bx2b('\n   - Print help\n  ', Prelude_Types_String_x2bx2b(Help_n__3162_507_subcommand($0, 'sync'), Prelude_Types_String_x2bx2b('\n   - Synchronize local config with information from GitHub.\n  ', Prelude_Types_String_x2bx2b(Help_n__3162_507_subcommand($0, 'pr'), Prelude_Types_String_x2bx2b('\n   - Identify an existing PR or create a new one for the current branch.\n  ', Prelude_Types_String_x2bx2b(Help_n__3162_507_subcommand($0, 'reflect'), Prelude_Types_String_x2bx2b('\n   - Reflect on the current state of ones own PRs and review requests.\n  ', Prelude_Types_String_x2bx2b(Help_n__3162_507_subcommand($0, 'list'), Prelude_Types_String_x2bx2b(' ', Prelude_Types_String_x2bx2b(Help_n__3162_508_argument($0, '<team-slug>'), Prelude_Types_String_x2bx2b('\n   - List the members of the given GitHub Team.\n  ', Prelude_Types_String_x2bx2b(Help_n__3162_507_subcommand($0, 'graph'), Prelude_Types_String_x2bx2b(' ', Prelude_Types_String_x2bx2b(Help_n__3162_508_argument($0, '<team-slug>'), Prelude_Types_String_x2bx2b('\n   - Graph the relative review workload of the members of the given GitHub Team.\n  ', Prelude_Types_String_x2bx2b(Help_n__3162_507_subcommand($0, 'assign'), Prelude_Types_String_x2bx2b(' {', Prelude_Types_String_x2bx2b(Help_n__3162_508_argument($0, '<team-slug>'), Prelude_Types_String_x2bx2b(' | ', Prelude_Types_String_x2bx2b(Help_n__3162_508_argument($0, '+<user-login>'), Prelude_Types_String_x2bx2b('} [...]\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', Prelude_Types_String_x2bx2b(Help_n__3162_509_heading($0, 'Bash Completion'), ':\n  You can set up bash completion by adding the following to your resource\n  or bash profile:\n    \n    eval \"$(harmony --bash-completion-script)\"\n    \n  Zsh users will also need to have the following in their resource or\n  zsh profile before the above eval:\n    \n    autoload -U +X compinit && compinit\n    autoload -U +X bashcompinit && bashcompinit\n    '))))))))))))))))))))))))))));
+ return Prelude_Types_String_x2bx2b('harmony ', Prelude_Types_String_x2bx2b(Help_n__3162_507_subcommand($0, '<subcommand>'), Prelude_Types_String_x2bx2b('\n\n', Prelude_Types_String_x2bx2b(Help_n__3162_509_heading($0, 'Subcommands'), Prelude_Types_String_x2bx2b(':\n  ', Prelude_Types_String_x2bx2b(Help_n__3162_507_subcommand($0, 'help'), Prelude_Types_String_x2bx2b('\n   - Print help\n  ', Prelude_Types_String_x2bx2b(Help_n__3162_507_subcommand($0, 'sync'), Prelude_Types_String_x2bx2b('\n   - Synchronize local config with information from GitHub.\n  ', Prelude_Types_String_x2bx2b(Help_n__3162_507_subcommand($0, 'pr'), Prelude_Types_String_x2bx2b('\n   - Identify an existing PR or create a new one for the current branch.\n  ', Prelude_Types_String_x2bx2b(Help_n__3162_507_subcommand($0, 'contribute'), Prelude_Types_String_x2bx2b('\n   - Contribute to an open PR. Prints a URL. Prioritizes PRs you are\n     requested to review but will also return other PRs.\n  ', Prelude_Types_String_x2bx2b(Help_n__3162_507_subcommand($0, 'reflect'), Prelude_Types_String_x2bx2b('\n   - Reflect on the current state of ones own PRs and review requests.\n  ', Prelude_Types_String_x2bx2b(Help_n__3162_507_subcommand($0, 'list'), Prelude_Types_String_x2bx2b(' ', Prelude_Types_String_x2bx2b(Help_n__3162_508_argument($0, '<team-slug>'), Prelude_Types_String_x2bx2b('\n   - List the members of the given GitHub Team.\n  ', Prelude_Types_String_x2bx2b(Help_n__3162_507_subcommand($0, 'graph'), Prelude_Types_String_x2bx2b(' ', Prelude_Types_String_x2bx2b(Help_n__3162_508_argument($0, '<team-slug>'), Prelude_Types_String_x2bx2b('\n   - Graph the relative review workload of the members of the given GitHub Team.\n  ', Prelude_Types_String_x2bx2b(Help_n__3162_507_subcommand($0, 'assign'), Prelude_Types_String_x2bx2b(' {', Prelude_Types_String_x2bx2b(Help_n__3162_508_argument($0, '<team-slug>'), Prelude_Types_String_x2bx2b(' | ', Prelude_Types_String_x2bx2b(Help_n__3162_508_argument($0, '+<user-login>'), Prelude_Types_String_x2bx2b('} [...]\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', Prelude_Types_String_x2bx2b(Help_n__3162_509_heading($0, 'Bash Completion'), Prelude_Types_String_x2bx2b(':\n  You can set up bash completion by adding the following to your resource\n  or bash profile:\n    \n    ', Prelude_Types_String_x2bx2b(Help_n__3162_510_shell($0, 'eval \"$(harmony --bash-completion-script)\"'), Prelude_Types_String_x2bx2b('\n    \n  Zsh users will also need to have the following in their resource or\n  zsh profile before the above eval:\n    \n    ', Prelude_Types_String_x2bx2b(Help_n__3162_510_shell($0, 'autoload -U +X compinit && compinit'), Prelude_Types_String_x2bx2b('\n    ', Prelude_Types_String_x2bx2b(Help_n__3162_510_shell($0, 'autoload -U +X bashcompinit && bashcompinit'), '\n    '))))))))))))))))))))))))))))))))))));
 }
 
-function Config_with__dropPrefixx27x2cdropx27_2587($0, $1, $2) {
+function Config_with__dropPrefixx27x2cdropx27_2580($0, $1, $2) {
  switch($2.h) {
   case 0: return {a1: $2.a1.a1};
   case 1: return {h: 0};
  }
 }
 
-function Config_case__parseGitHubURIx2cparseSuffix_2637($0, $1, $2) {
+function Config_case__parseGitHubURIx2cparseSuffix_2630($0, $1, $2) {
  const $f = $10 => {
   switch($10.h) {
    case undefined: {
@@ -6932,27 +7477,27 @@ function Config_case__parseGitHubURIx2cparseSuffix_2637($0, $1, $2) {
  return Prelude_Types_x3ex3ex3d_Monad_Maybe(Prelude_Types_pure_Applicative_Maybe(Data_String_split($a => Prelude_EqOrd_x3dx3d_Eq_Char($a, '/'), $2.a1)), $f);
 }
 
-function Config_n__4251_2737_repo($0, $1, $2, $3) {
- return Prelude_Types_map_Functor_Maybe(csegen_472(), $3);
+function Config_n__4250_2730_repo($0, $1, $2, $3) {
+ return Prelude_Types_map_Functor_Maybe(csegen_501(), $3);
 }
 
-function Config_n__4142_2622_parseSuffix($0, $1) {
- return Config_case__parseGitHubURIx2cparseSuffix_2637($0, $1, Data_String_break($8 => Prelude_EqOrd_x3dx3d_Eq_Char($8, '.'), $1));
+function Config_n__4141_2615_parseSuffix($0, $1) {
+ return Config_case__parseGitHubURIx2cparseSuffix_2630($0, $1, Data_String_break($8 => Prelude_EqOrd_x3dx3d_Eq_Char($8, '.'), $1));
 }
 
-function Config_n__4142_2624_parseSSH($0, $1) {
- return Prelude_Interfaces_x3ex3dx3e(csegen_486(), $6 => Config_dropPrefixx27('git@github.com:', $6), $b => Config_n__4142_2622_parseSuffix($0, $b), $1);
+function Config_n__4141_2617_parseSSH($0, $1) {
+ return Prelude_Interfaces_x3ex3dx3e(csegen_515(), $6 => Config_dropPrefixx27('git@github.com:', $6), $b => Config_n__4141_2615_parseSuffix($0, $b), $1);
 }
 
-function Config_n__4142_2623_parseHTTPS($0, $1) {
- return Prelude_Interfaces_x3ex3dx3e(csegen_486(), $6 => Config_dropPrefixx27('https://github/com/', $6), $b => Config_n__4142_2622_parseSuffix($0, $b), $1);
+function Config_n__4141_2616_parseHTTPS($0, $1) {
+ return Prelude_Interfaces_x3ex3dx3e(csegen_515(), $6 => Config_dropPrefixx27('https://github/com/', $6), $b => Config_n__4141_2615_parseSuffix($0, $b), $1);
 }
 
-function Config_n__4251_2736_org($0, $1, $2, $3) {
- return Prelude_Types_map_Functor_Maybe(csegen_489(), $3);
+function Config_n__4250_2729_org($0, $1, $2, $3) {
+ return Prelude_Types_map_Functor_Maybe(csegen_518(), $3);
 }
 
-function Config_n__4251_2735_orIfEmpty($0, $1, $2, $3, $4) {
+function Config_n__4250_2728_orIfEmpty($0, $1, $2, $3, $4) {
  switch($3.h) {
   case 0: return $4;
   case undefined: {
@@ -6964,21 +7509,21 @@ function Config_n__4251_2735_orIfEmpty($0, $1, $2, $3, $4) {
  }
 }
 
-function Config_n__4013_2499_oneDayAgo($0, $1, $2) {
+function Config_n__4019_2499_oneDayAgo($0, $1, $2) {
  const $3 = 86400n;
  return $2.a1.a2(undefined)(undefined)(System_time($2))(now => $2.a1.a1.a2(undefined)(Prelude_Cast_cast_Cast_Integer_Bits32((now-$3))));
 }
 
-function Config_n__4251_2738_enterForDefaultStr($0, $1, $2, $3) {
+function Config_n__4250_2731_enterForDefaultStr($0, $1, $2, $3) {
  return Prelude_Types_String_x2bx2b(' (ENTER for default: ', Prelude_Types_String_x2bx2b($3, ')'));
 }
 
-function Config_n__4106_2583_dropx27($0, $1) {
- return Config_with__dropPrefixx27x2cdropx27_2587($0, $1, Data_List_PrefixSuffix_dropPrefix($8 => $9 => Decidable_Equality_decEq_DecEq_Char($8, $9), Prelude_Types_fastUnpack($0), $1));
+function Config_n__4105_2576_dropx27($0, $1) {
+ return Config_with__dropPrefixx27x2cdropx27_2580($0, $1, Data_List_PrefixSuffix_dropPrefix($8 => $9 => Decidable_Equality_decEq_DecEq_Char($8, $9), Prelude_Types_fastUnpack($0), $1));
 }
 
-function Config_n__4251_2739_defaultStr($0, $1, $2, $3, $4) {
- return Data_Maybe_fromMaybe(() => '', Prelude_Types_map_Functor_Maybe($a => Config_n__4251_2738_enterForDefaultStr($0, $1, $2, $3($a)), $4));
+function Config_n__4250_2732_defaultStr($0, $1, $2, $3, $4) {
+ return Data_Maybe_fromMaybe(() => '', Prelude_Types_map_Functor_Maybe($a => Config_n__4250_2731_enterForDefaultStr($0, $1, $2, $3($a)), $4));
 }
 
 function Config_show_Show_ConfigError($0) {
@@ -6995,17 +7540,17 @@ function Config_writeConfig($0, $1, $2) {
    case 0: return Data_Promise_reject(Prelude_Types_String_x2bx2b('Failed to write updated config file to ', Prelude_Types_String_x2bx2b(Data_Config_rf__filepath($0), Prelude_Types_String_x2bx2b(': ', Prelude_Types_String_x2bx2b(System_File_Error_show_Show_FileError(res.a1), '.')))), $13, $14);
   }
  };
- return Data_Promise_x3ex3ex3d_Monad_Promise(System_File_ReadWrite_writeFile(csegen_74(), Data_Config_rf__filepath($0), Language_JSON_Data_format(0n, 2n, Data_Config_json($0))), $12, $1, $2);
+ return Data_Promise_x3ex3ex3d_Monad_Promise(System_File_ReadWrite_writeFile(csegen_20(), Data_Config_rf__filepath($0), Language_JSON_Data_format(0n, 2n, Data_Config_json($0))), $12, $1, $2);
 }
 
 function Config_syncIfOld($0, $1, $2, $3) {
- const $b = $c => {
+ const $b = $c => $d => {
   switch(Prelude_EqOrd_x3c_Ord_Bits32($1.a1, $c)) {
-   case 1: return Prelude_Interfaces_x3ex3e(csegen_71(), Prelude_IO_putStrLn(csegen_74(), 'Syncing config file...'), () => $1b => $1c => Config_syncConfig($1, $0, 0, $1b, $1c));
-   case 0: return $23 => $24 => Data_Promise_pure_Applicative_Promise($1, $23, $24);
+   case 1: return $13 => Config_syncConfig($1, $0, 0, $d, $13);
+   case 0: return $1a => Data_Promise_pure_Applicative_Promise($1, $d, $1a);
   }
  };
- return Data_Promise_x3ex3ex3d_Monad_Promise(Config_n__4013_2499_oneDayAgo($0, $1, csegen_74()), $b, $2, $3);
+ return Data_Promise_x3ex3ex3d_Monad_Promise(Config_n__4019_2499_oneDayAgo($0, $1, csegen_20()), $b, $2, $3);
 }
 
 function Config_syncConfig($0, $1, $2, $3, $4) {
@@ -7013,9 +7558,9 @@ function Config_syncConfig($0, $1, $2, $3, $4) {
   const $14 = orgMembers => $15 => $16 => {
    const $1a = updatedAt => {
     const $1b = {a1: updatedAt, a2: $0.a2, a3: $0.a3, a4: $0.a4, a5: $0.a5, a6: $0.a6, a7: teamSlugs, a8: orgMembers, a9: $0.a9};
-    return Prelude_Interfaces_x3ex3e(csegen_71(), $2a => $2b => Config_writeConfig($1b, $2a, $2b), () => Prelude_Interfaces_x3ex3e(csegen_71(), Prelude_Interfaces_when(csegen_59(), $2, () => Prelude_Interfaces_x3ex3e(csegen_71(), Prelude_IO_putStrLn(csegen_74(), 'Your updated configuration is:'), () => Prelude_IO_printLn(csegen_497(), $0))), () => $48 => $49 => Data_Promise_pure_Applicative_Promise($1b, $48, $49)));
+    return Prelude_Interfaces_x3ex3e(csegen_17(), $2a => $2b => Config_writeConfig($1b, $2a, $2b), () => Prelude_Interfaces_x3ex3e(csegen_17(), Prelude_Interfaces_when(csegen_11(), $2, () => Prelude_Interfaces_x3ex3e(csegen_17(), Prelude_IO_putStrLn(csegen_20(), 'Your updated configuration is:'), () => Prelude_IO_printLn(csegen_525(), $0))), () => $48 => $49 => Data_Promise_pure_Applicative_Promise($1b, $48, $49)));
    };
-   return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_493(), $1a, $15, $16);
+   return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_521(), $1a, $15, $16);
   };
   return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listOrgMembers($1, $0.a2), $14, $c, $d);
  };
@@ -7023,7 +7568,7 @@ function Config_syncConfig($0, $1, $2, $3, $4) {
 }
 
 function Config_parseGitHubURI($0) {
- return Prelude_Types_x3cx7cx3e_Alternative_Maybe(Config_n__4142_2623_parseHTTPS($0, $0), () => Config_n__4142_2624_parseSSH($0, $0));
+ return Prelude_Types_x3cx7cx3e_Alternative_Maybe(Config_n__4141_2616_parseHTTPS($0, $0), () => Config_n__4141_2617_parseSSH($0, $0));
 }
 
 function Config_loadOrCreateConfig($0, $1, $2, $3, $4) {
@@ -7043,7 +7588,7 @@ function Config_loadOrCreateConfig($0, $1, $2, $3, $4) {
    }
   }
  };
- return Data_Promise_x3ex3ex3d_Monad_Promise(Config_loadConfig(csegen_74(), $2), $b, $3, $4);
+ return Data_Promise_x3ex3ex3d_Monad_Promise(Config_loadConfig(csegen_20(), $2), $b, $3, $4);
 }
 
 function Config_loadConfig($0, $1) {
@@ -7066,14 +7611,14 @@ function Config_loadConfig($0, $1) {
    }
   };
   const $b = {a1: $c, a2: a => $14 => ({h: 1, a1: $14}), a3: $16};
-  const $a = {a1: $b, a2: csegen_233(), a3: csegen_234()};
+  const $a = {a1: $b, a2: csegen_256(), a3: csegen_257()};
   const $25 = b => a => func => $26 => {
    switch($26.h) {
     case 0: return {h: 0, a1: $26.a1};
     case 1: return {h: 1, a1: func($26.a1)};
    }
   };
-  const $24 = {a1: $25, a2: csegen_432(), a3: csegen_436()};
+  const $24 = {a1: $25, a2: csegen_460(), a3: csegen_464()};
   const $9 = {a1: $a, a2: $24};
   const $6 = {a1: $0.a1, a2: $9};
   return Prelude_Interfaces_Monad_x3ex3ex3d_Monad_Composex28x28x2ex20x24mx29x20x24tx29($6, $3, $4);
@@ -7133,17 +7678,17 @@ function Config_findConfig($0, $1, $2) {
 }
 
 function Config_dropPrefixx27($0, $1) {
- return Prelude_Types_map_Functor_Maybe($4 => Prelude_Types_fastPack($4), Config_n__4106_2583_dropx27($0, Prelude_Types_fastUnpack($1)));
+ return Prelude_Types_map_Functor_Maybe($4 => Prelude_Types_fastPack($4), Config_n__4105_2576_dropx27($0, Prelude_Types_fastUnpack($1)));
 }
 
 function Config_createConfig($0, $1, $2) {
- return Prelude_Interfaces_x3ex3e(csegen_71(), Prelude_IO_putStrLn(csegen_74(), Prelude_Types_String_x2bx2b('Creating a new configuration (storing in ', Prelude_Types_String_x2bx2b(Data_Config_filename(), ')...'))), () => $13 => $14 => {
+ return Prelude_Interfaces_x3ex3e(csegen_17(), Prelude_IO_putStrLn(csegen_20(), Prelude_Types_String_x2bx2b('Creating a new configuration (storing in ', Prelude_Types_String_x2bx2b(Data_Config_filename(), ')...'))), () => $13 => $14 => {
   const $33 = defaultOrgAndRepo => {
-   const $34 = Config_n__4251_2739_defaultStr($0, $1, $2, csegen_489(), defaultOrgAndRepo);
-   return Prelude_Interfaces_x3ex3e(csegen_71(), Prelude_IO_putStrLn(csegen_74(), Prelude_Types_String_x2bx2b('What GitHub org would you like to use harmony for', Prelude_Types_String_x2bx2b($34, '?'))), () => $4b => $4c => {
+   const $34 = Config_n__4250_2732_defaultStr($0, $1, $2, csegen_518(), defaultOrgAndRepo);
+   return Prelude_Interfaces_x3ex3e(csegen_17(), Prelude_IO_putStrLn(csegen_20(), Prelude_Types_String_x2bx2b('What GitHub org would you like to use harmony for', Prelude_Types_String_x2bx2b($34, '?'))), () => $4b => $4c => {
     const $63 = org => {
-     const $64 = Config_n__4251_2739_defaultStr($0, $1, $2, csegen_472(), defaultOrgAndRepo);
-     return Prelude_Interfaces_x3ex3e(csegen_71(), Prelude_IO_putStrLn(csegen_74(), Prelude_Types_String_x2bx2b('What repository would you like to use harmony for', Prelude_Types_String_x2bx2b($64, '?'))), () => $7b => $7c => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_41(), $83 => Config_n__4251_2735_orIfEmpty($0, $1, $2, Config_n__4251_2737_repo($0, $1, $2, defaultOrgAndRepo), Data_String_trim($83)), csegen_366()), repo => Prelude_Interfaces_x3ex3e(csegen_71(), Prelude_IO_putStrLn(csegen_74(), 'Creating config...'), () => $9d => $9e => {
+     const $64 = Config_n__4250_2732_defaultStr($0, $1, $2, csegen_501(), defaultOrgAndRepo);
+     return Prelude_Interfaces_x3ex3e(csegen_17(), Prelude_IO_putStrLn(csegen_20(), Prelude_Types_String_x2bx2b('What repository would you like to use harmony for', Prelude_Types_String_x2bx2b($64, '?'))), () => $7b => $7c => Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_64(), $83 => Config_n__4250_2728_orIfEmpty($0, $1, $2, Config_n__4250_2730_repo($0, $1, $2, defaultOrgAndRepo), Data_String_trim($83)), csegen_389()), repo => Prelude_Interfaces_x3ex3e(csegen_17(), Prelude_IO_putStrLn(csegen_20(), 'Creating config...'), () => $9d => $9e => {
       const $a9 = mainBranch => $aa => $ab => {
        const $af = updatedAt => {
         const $b0 = {a1: Prelude_Types_String_x2bx2b('./', Data_Config_filename()), a2: $2};
@@ -7151,22 +7696,22 @@ function Config_createConfig($0, $1, $2) {
          const $be = teamSlugs => $bf => $c0 => {
           const $c6 = orgMembers => {
            const $c7 = {a1: updatedAt, a2: org, a3: repo, a4: mainBranch, a5: 1, a6: 1, a7: teamSlugs, a8: orgMembers, a9: $b0};
-           return Prelude_Interfaces_x3ex3e(csegen_71(), $d5 => $d6 => Config_writeConfig($c7, $d5, $d6), () => Prelude_Interfaces_x3ex3e(csegen_71(), Prelude_IO_putStrLn(csegen_74(), 'Your new configuration is:'), () => Prelude_Interfaces_x3ex3e(csegen_71(), Prelude_IO_printLn(csegen_497(), $c7), () => $ee => $ef => Data_Promise_pure_Applicative_Promise($c7, $ee, $ef))));
+           return Prelude_Interfaces_x3ex3e(csegen_17(), $d5 => $d6 => Config_writeConfig($c7, $d5, $d6), () => Prelude_Interfaces_x3ex3e(csegen_17(), Prelude_IO_putStrLn(csegen_20(), 'Your new configuration is:'), () => Prelude_Interfaces_x3ex3e(csegen_17(), Prelude_IO_printLn(csegen_525(), $c7), () => $ee => $ef => Data_Promise_pure_Applicative_Promise($c7, $ee, $ef))));
           };
           return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listOrgMembers($1, org), $c6, $bf, $c0);
          };
          return Data_Promise_x3ex3ex3d_Monad_Promise(FFI_GitHub_listTeams($1, org), $be, $b7, $b8);
         };
        };
-       return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_493(), $af, $aa, $ab);
+       return Data_Promise_x3ex3ex3d_Monad_Promise(csegen_521(), $af, $aa, $ab);
       };
       return Data_Promise_x3ex3ex3d_Monad_Promise($a1 => $a2 => FFI_GitHub_getRepoDefaultBranch($1, org, repo, $a1, $a2), $a9, $9d, $9e);
      }), $7b, $7c));
     };
-    return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_41(), $53 => Config_n__4251_2735_orIfEmpty($0, $1, $2, Config_n__4251_2736_org($0, $1, $2, defaultOrgAndRepo), Data_String_trim($53)), csegen_366()), $63, $4b, $4c);
+    return Data_Promise_x3ex3ex3d_Monad_Promise(Prelude_Interfaces_x3cx24x3e(csegen_64(), $53 => Config_n__4250_2728_orIfEmpty($0, $1, $2, Config_n__4250_2729_org($0, $1, $2, defaultOrgAndRepo), Data_String_trim($53)), csegen_389()), $63, $4b, $4c);
    });
   };
-  return Data_Promise_x3ex3ex3d_Monad_Promise($17 => $18 => Data_Promise_x3cx7cx3e_Alternative_Promise(Prelude_Interfaces_x3cx24x3e(csegen_41(), $1f => Config_parseGitHubURI($1f), $23 => $24 => FFI_Git_remoteURI($0, 'origin', $23, $24)), () => $2b => $2c => Data_Promise_pure_Applicative_Promise({h: 0}, $2b, $2c), $17, $18), $33, $13, $14);
+  return Data_Promise_x3ex3ex3d_Monad_Promise($17 => $18 => Data_Promise_x3cx7cx3e_Alternative_Promise(Prelude_Interfaces_x3cx24x3e(csegen_64(), $1f => Config_parseGitHubURI($1f), $23 => $24 => FFI_Git_remoteURI($0, 'origin', $23, $24)), () => $2b => $2c => Data_Promise_pure_Applicative_Promise({h: 0}, $2b, $2c), $17, $18), $33, $13, $14);
  });
 }
 
@@ -7208,9 +7753,9 @@ function Data_List_PrefixSuffix_dropPrefix($0, $1, $2) {
  }
 }
 
-function BashCompletion_n__2916_497_slugsOrLogins($0, $1, $2) {
+function BashCompletion_n__2921_510_slugsOrLogins($0, $1, $2) {
  switch(Data_String_isPrefixOf('+', $1)) {
-  case 1: return Prelude_Interfaces_x3cx24x3e(csegen_62(), $b => Prelude_Types_strCons('+', $b), $2.a8);
+  case 1: return Prelude_Interfaces_x3cx24x3e(csegen_76(), $b => Prelude_Types_strCons('+', $b), $2.a8);
   case 0: return $2.a7;
  }
 }
@@ -7228,6 +7773,7 @@ function BashCompletion_opts($0, $1, $2) {
      switch($2) {
       case 'harmony': return Data_List_filter($9 => Data_String_isPrefixOf($1, $9), BashCompletion_allRootCmds());
       case 'pr': return {h: 0};
+      case 'contribute': return {h: 0};
       case 'sync': return {h: 0};
       case 'help': return {h: 0};
       case '--help': return {h: 0};
@@ -7243,7 +7789,7 @@ function BashCompletion_opts($0, $1, $2) {
             default: {
              switch($1) {
               case '--': return $0.a7;
-              default: return Data_List_filter($1f => Data_String_isPrefixOf($1, $1f), BashCompletion_n__2916_497_slugsOrLogins($2, $1, $0));
+              default: return Data_List_filter($1f => Data_String_isPrefixOf($1, $1f), BashCompletion_n__2921_510_slugsOrLogins($2, $1, $0));
              }
             }
            }
@@ -7256,7 +7802,7 @@ function BashCompletion_opts($0, $1, $2) {
           default: {
            switch($1) {
             case '--': return $0.a7;
-            default: return Data_List_filter($35 => Data_String_isPrefixOf($1, $35), BashCompletion_n__2916_497_slugsOrLogins($2, $1, $0));
+            default: return Data_List_filter($35 => Data_String_isPrefixOf($1, $35), BashCompletion_n__2921_510_slugsOrLogins($2, $1, $0));
            }
           }
          }
@@ -7271,6 +7817,7 @@ function BashCompletion_opts($0, $1, $2) {
    switch($2) {
     case 'harmony': return Data_List_filter($41 => Data_String_isPrefixOf($1, $41), BashCompletion_allRootCmds());
     case 'pr': return {h: 0};
+    case 'contribute': return {h: 0};
     case 'sync': return {h: 0};
     case 'help': return {h: 0};
     case '--help': return {h: 0};
@@ -7286,7 +7833,7 @@ function BashCompletion_opts($0, $1, $2) {
           default: {
            switch($1) {
             case '--': return $0.a7;
-            default: return Data_List_filter($57 => Data_String_isPrefixOf($1, $57), BashCompletion_n__2916_497_slugsOrLogins($2, $1, $0));
+            default: return Data_List_filter($57 => Data_String_isPrefixOf($1, $57), BashCompletion_n__2921_510_slugsOrLogins($2, $1, $0));
            }
           }
          }
@@ -7299,7 +7846,7 @@ function BashCompletion_opts($0, $1, $2) {
         default: {
          switch($1) {
           case '--': return $0.a7;
-          default: return Data_List_filter($6d => Data_String_isPrefixOf($1, $6d), BashCompletion_n__2916_497_slugsOrLogins($2, $1, $0));
+          default: return Data_List_filter($6d => Data_String_isPrefixOf($1, $6d), BashCompletion_n__2921_510_slugsOrLogins($2, $1, $0));
          }
         }
        }
@@ -7312,7 +7859,7 @@ function BashCompletion_opts($0, $1, $2) {
 }
 
 const BashCompletion_allRootCmds = __lazy(function () {
- return {a1: 'assign', a2: {a1: 'graph', a2: {a1: 'help', a2: {a1: 'list', a2: {a1: 'pr', a2: {a1: 'reflect', a2: {a1: 'sync', a2: {h: 0}}}}}}}};
+ return {a1: 'assign', a2: {a1: 'contribute', a2: {a1: 'graph', a2: {a1: 'help', a2: {a1: 'list', a2: {a1: 'pr', a2: {a1: 'reflect', a2: {a1: 'sync', a2: {h: 0}}}}}}}}};
 });