EG
Size: a a a
EG
AZ
absurd :: Void -> a
absurd a = case a of {}
AZ
AZ
AZ
AZ
AZ
λ
EG
F<T, U>
это U
, то задача решается тривиально.EG
λ
AZ
𝙰𝙸
absurd :: Void -> a
absurd a = case a of {}
AZ
λ
AZ
AZ
AZ
λ
getJust : (ma : Maybe a) -> {isJust ma = true} -> a
λ
Nothing
выводят ложь и через абсурд получают "значение типа" a