Improve type safety of samtools-merge

2 files changed, 4 insertions, 6 deletions

diff --git a/tools/samtools-index.nix b/tools/samtools-index.nix
index aad46a7..6919f97 100644
--- a/tools/samtools-index.nix
+++ b/tools/samtools-index.nix
@@ -10,7 +10,7 @@ with lib;
 with bionix.types;
 
 assert (matchFiletype "samtools-index" { bam = _: true; } input);
-assert (matchSorting "samtools-index" { coord = _: true; } input);
+assert (matchFileSorting "samtools-index" { coord = _: true; } input);
 
 stdenv.mkDerivation {
   name = "samtools-index";
diff --git a/tools/samtools-merge.nix b/tools/samtools-merge.nix
index 6d072b0..eacf520 100644
--- a/tools/samtools-merge.nix
+++ b/tools/samtools-merge.nix
@@ -10,13 +10,11 @@ with nixpkgs;
 with lib;
 
 let
-  inherit (bionix.types) matchFiletype option-sort;
-  inputIsSorted = input: matchFiletype "samtools-merge" {
-       bam = _: true; #{sorting, ...}: sorting == option-sort.some (bionix.types.sorting.coord {});
-     } input;
+  inherit (bionix.types) matchFiletype matchSorting;
+  inputIsHomogenous = length (unique (map (matchFiletype "samtools-merge" {bam = x: x // {sorting = matchSorting "samtools-merge" {coord = _: "coord";} x;};}) inputs)) == 1;
 in
 
-assert (all inputIsSorted inputs);
+assert inputIsHomogenous;
 
 stdenv.mkDerivation {
   name = "samtools-merge";