feat(hott,library): add additional spacing hints

This commit is contained in:
Leonardo de Moura 2015-09-30 16:52:34 -07:00
parent c9af007994
commit ede23a3267
11 changed files with 70 additions and 74 deletions

View file

@ -56,14 +56,10 @@ rfl
theorem uncurry_curry (f : A × B → C) : uncurry (curry f) = f :=
funext (λ p, match p with (a, b) := rfl end)
precedence `∘'`:60
precedence `on`:1
precedence `$`:1
infixr ∘ := compose
infixr ∘' := dcompose
infixl on := on_fun
infixr $ := app
infixr ` ∘ ` := compose
infixr ` ∘' `:60 := dcompose
infixl ` on `:1 := on_fun
infixr ` $ `:1 := app
notation f ` -[` op `]- ` g := combine f op g
lemma left_id (f : A → B) : id ∘ f = f := rfl