Fix visibility in Data.Tensor

This commit is contained in:
Kiana Sheibani 2023-03-06 10:59:05 -05:00
parent cbebb74423
commit 2aa29d4bf5
Signed by: toki
GPG key ID: 6CB106C25E86A9F7

View file

@ -57,6 +57,7 @@ export
Symmetric Either where Symmetric Either where
swap = either Right Left swap = either Right Left
export
Tensor Either Void where Tensor Either Void where
unitl = MkIso (either absurd id) Right unitl = MkIso (either absurd id) Right
unitr = MkIso (either id absurd) Left unitr = MkIso (either id absurd) Left