Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- Theorem plus_id_exercise : ∀ n m o : nat,
- n = m → m = o → n + m = m + o.
- Proof.
- (* FILL IN HERE *) Admitted.
- plusIdExercise : (n : Nat) ->
- (m : Nat) ->
- (o : Nat) ->
- (n == m) = True ->
- (m == o) = True ->
- (n + m == m + o) = True
- plusIdExercise Z Z Z n_eq_m n_eq_o = Refl
- plusIdExercise (S n) Z Z n_eq_m n_eq_o = absurd
- When checking right hand side of plusIdExercise with expected type
- S n + 0 == 0 + 0 = True
- Type mismatch between
- t -> a (Type of absurd)
- and
- False = True (Expected type)
- Specifically:
- Type mismatch between
- uv => t -> uv
- and
- (=) FalseUnification failure
Add Comment
Please, Sign In to add comment