File tree Expand file tree Collapse file tree 1 file changed +2
-2
lines changed Expand file tree Collapse file tree 1 file changed +2
-2
lines changed Original file line number Diff line number Diff line change @@ -68,7 +68,7 @@ mapAll f Dict = (all_NP . hmap f . unAll_NP) Dict
6868mapAll2 :: forall c d xss .
6969 (forall a . Dict c a -> Dict d a )
7070 -> Dict (All2 c ) xss -> Dict (All2 d ) xss
71- mapAll2 f d @ Dict = (all2 . mapAll (mapAll f) . unAll2) d
71+ mapAll2 f d@ Dict = (all2 . mapAll (mapAll f) . unAll2) d
7272
7373-- | If two constraints 'c' and 'd' hold over a type-level
7474-- list 'xs', then the combination of both constraints holds
@@ -77,7 +77,7 @@ mapAll2 f d @ Dict = (all2 . mapAll (mapAll f) . unAll2) d
7777-- @since 0.2
7878--
7979zipAll :: Dict (All c ) xs -> Dict (All d ) xs -> Dict (All (c `And ` d )) xs
80- zipAll dc @ Dict dd = all_NP (hzipWith (\ Dict Dict -> Dict ) (unAll_NP dc) (unAll_NP dd))
80+ zipAll dc@ Dict dd = all_NP (hzipWith (\ Dict Dict -> Dict ) (unAll_NP dc) (unAll_NP dd))
8181
8282-- | If two constraints 'c' and 'd' hold over a type-level
8383-- list of lists 'xss', then the combination of both constraints
You can’t perform that action at this time.
0 commit comments