Advertisement
tinyevil

Untitled

Feb 25th, 2018
175
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.18 KB | None | 0 0
  1. Inductive Arrow (A B:Type) : Type :=
  2. | ar_intro : (forall a:A, B) -> Arrow A B.
  3.  
  4. Inductive DepArrow (A:Type) (B:A->Type) : Type :=
  5. | ar_intro : (forall a:A, B a) -> DepArrow A B.
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement