blob: 0f528f14aec81365b4c77391a390d97329de3a3d (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
|
(* -*- coding: utf-8; -*- *)
Require Import Utf8.
(* Printing of unicode notation, in *goals* *)
Lemma test : ∀ A:Prop, A -> A.
auto.
Qed.
(* Parsing of unicode notation here, printing in *goals* *)
Lemma test2 : ∀ A:Prop, A → A.
intro.
intro.
auto.
Qed.
(* Printing of unicode notation, in *response* *)
Check (fun (X:Set)(x:X) => x).
(* Parsing of unicode notation here, printing in *response* *)
Check (∀A, A→A).
|
