~/jendhub

def internal_or_of_false_right

bend-mathlib@0.8.1.0 · order.bend:67

import bend-mathlib@0.8.1.0/order.bend as Order
import Base
import bend-mathlib@0.8.1.0/nat.bend as MNat

67def internal_or_of_false_right(a: Bool, b: Bool, h: {Bool.or(a, b) == True{} : Bool}, ha: {a == False{} : Bool}) -> {b == True{} : Bool}:
68  match a:
69    case False{}:
70      h
71    case True{}:
72      Empty.absurd({b == True{} : Bool}, MNat.internal_false_ne_true(Equal.sym(Bool, True{}, False{}, ha)))

Uses (5)

Used by (1)