Đối số ngầm định trong một loại được tính trong Coq

Question

Tôi có thư viện để viết các loại được lập chỉ mục mà không cần phải chỉ rõ chỉ mục. Điều này dẫn đến các loại cấp cao hơn sạch hơn bằng cách ẩn đi hệ thống ống nước không liên quan. Nó đi một cái gì đó như thế này:

Section Indexed. 

Local Open Scope type. 
Context {I : Type} (T : Type) (A B : I -> Type). 

Definition IArrow : I -> Type := 
    fun i => A i -> B i. 

Definition IForall : Type := 
    forall {i}, A i. 

End Indexed. 

Notation "A :-> B" := (IArrow A B) (at level 20, right associativity). 
Notation "[ A ]" := (IForall A) (at level 70). 

Tuy nhiên Coq lờ yêu cầu của tôi để làm cho lượng hóa phổ được giới thiệu bởi IForall ngầm như chứng minh bởi:

Fail Definition id {A : nat -> Type} : [ A :-> A ] := fun a => a. 
Definition id {A : nat -> Type} : [ A :-> A ] := fun (n : nat) a => a. 

Có cách nào cho tôi để có được Coq để thực sự làm cho đối số này tiềm ẩn?

Answer 1

No.

C.f. Bug #3357

Một ngày nọ, tôi hy vọng, PR #668 sẽ được sáp nhập, và sau đó bạn sẽ có thể làm

Notation IArrow A B := 
    (fun i => A i -> B i) 

Notation IForall A := 
    (forall {i}, A i). 

Notation "A :-> B" := (IArrow A B) (at level 20, right associativity). 
Notation "[ A ]" := (IForall A) (at level 70). 

Definition id {A : nat -> Type} : [ A :-> A ] := fun a => a. 
Definition id {A : nat -> Type} : [ A :-> A ] := fun (n : nat) a => a.