ここでtoTheseは同型

toThese :: (Maybe a, Maybe b) -> Maybe (These a b)

法則を使えばinclusion, subsetについて以下の等式が得られる。

inclusion . inclusion = inclusion
inclusion = id

subset <=< subset = subset
subset = Just

subset . include = Just

inclusion @(x∨y) . inclusion @(x ∧ y) = inclusion @(x∨y) . inclusion @(x ∧ y)

フォロー

mention送りまくってしまいました申し訳ありません
QT: fedibird.com/@monoid_patchwork
[参照]

viercc  
ここでtoTheseは同型 toThese :: (Maybe a, Maybe b) -> Maybe (These a b) 法則を使えばinclusion, subsetについて以下の等式が得られる。 inclusion . inclusion = inclusion incl...
ログインして会話に参加
Fedibird

様々な目的に使える、日本の汎用マストドンサーバーです。安定した利用環境と、多数の独自機能を提供しています。