2014-12-05 22:34:02 +00:00
|
|
|
/-
|
|
|
|
Copyright (c) 2014 Microsoft Corporation. All rights reserved.
|
|
|
|
Released under Apache 2.0 license as described in the file LICENSE.
|
2015-11-21 20:12:45 +00:00
|
|
|
Authors: Leonardo de Moura, Jakob von Raumer, Floris van Doorn
|
2014-12-05 22:34:02 +00:00
|
|
|
-/
|
2015-02-26 18:19:54 +00:00
|
|
|
|
2014-12-05 22:34:02 +00:00
|
|
|
prelude
|
2014-12-05 23:47:04 +00:00
|
|
|
import init.datatypes init.reserved_notation init.tactic init.logic
|
2015-10-12 23:49:10 +00:00
|
|
|
import init.bool init.num init.relation init.wf
|
2015-12-09 05:02:05 +00:00
|
|
|
import init.types init.connectives
|
2014-12-19 22:22:03 +00:00
|
|
|
import init.trunc init.path init.equiv init.util
|
2015-04-24 23:58:50 +00:00
|
|
|
import init.ua init.funext
|
2015-05-22 08:35:38 +00:00
|
|
|
import init.hedberg init.nat init.hit init.pathover
|
2015-05-02 21:17:50 +00:00
|
|
|
|
|
|
|
namespace core
|
2015-12-09 05:02:05 +00:00
|
|
|
export bool unit
|
|
|
|
export empty (hiding elim)
|
|
|
|
export sum (hiding elim)
|
2015-05-05 21:25:35 +00:00
|
|
|
export sigma (hiding pr1 pr2)
|
2015-12-28 18:30:23 +00:00
|
|
|
export [notation] prod
|
|
|
|
export [notation] nat
|
2016-03-19 14:38:05 +00:00
|
|
|
export eq (idp idpath concat inverse transport ap ap10 cast tr_inv homotopy ap11 apdt refl)
|
2015-12-28 18:30:23 +00:00
|
|
|
export [declaration] function
|
2015-05-02 21:17:50 +00:00
|
|
|
export equiv (to_inv to_right_inv to_left_inv)
|
2015-05-18 22:08:19 +00:00
|
|
|
export is_equiv (inv right_inv left_inv adjointify)
|
2016-02-16 01:59:38 +00:00
|
|
|
export [abbreviation] is_trunc
|
2015-05-02 21:17:50 +00:00
|
|
|
end core
|