apply lhs
case left.intro.right
a b : Program
X : Formula
W : Type
M : KripkeModel W
w : W
rhs : ¬False
v : W
lhs : relate M a w v ∨ relate M b w v → evaluate M v X
w_b_v : relate M b w v
⊢ evaluate M v X
case left.intro.right
a b : Program
X : Formula
W : Type
M : KripkeModel W
w : W
rhs : ¬False
v : W
lhs : relate M a w v ∨ relate M b w v → evaluate M v X
w_b_v : relate M b w v
⊢ relate M a w v ∨ relate M b w v