diff --git a/byg/src/DependencyGenerator.hs b/byg/src/DependencyGenerator.hs
index d1e1cb3..5522f8e 100644
--- a/byg/src/DependencyGenerator.hs
+++ b/byg/src/DependencyGenerator.hs
@@ -129,7 +129,7 @@ mapDepGenM_ f input = do
 
 filterDepGenM :: (TokenableTo [Bool] v, TokenableTo [a] u) => v -> u -> DepGenM' [a]
 filterDepGenM mask input = do
-  tup <- toTupleToken mask input
+  tup <- toTupleToken input mask
   genDependency (makeDependency tup FilterComp)
 
 zipDepGenM :: (TokenableTo [a] v, TokenableTo [b] u) => v -> u -> DepGenM' [(a, b)]