File: bug_12770.v

package info (click to toggle)
coq 9.1.0%2Bdfsg-3
  • links: PTS, VCS
  • area: main
  • in suites: experimental
  • size: 35,964 kB
  • sloc: ml: 239,908; sh: 4,355; python: 2,985; ansic: 2,644; makefile: 874; lisp: 171; javascript: 63; xml: 24; sed: 2
file content (26 lines) | stat: -rw-r--r-- 417 bytes parent folder | download 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
 
Require Import PrimInt63 PrimFloat PrimArray ssreflect.

Open Scope uint63_scope.

Lemma test : 2 = PrimInt63.add 1 1.
Proof.
  set X := 2.
  rewrite -[X]/(PrimInt63.add 1 1).
  by [].
Qed.

Open Scope float_scope.

Lemma test2 : 2 = 1 + 1.
Proof.
  set X := 2.
  rewrite -[X]/(1 + 1).
  by [].
Qed.

Lemma test3 : [| | 2 |] = [| | 1 + 1 |].
Proof.
  set X := [| | 2 |].
  rewrite -[X]/([| | 1 + 1 |]).
  by [].
Qed.