From 469c709f122da80a207769aab3cd038fd1c3d509 Mon Sep 17 00:00:00 2001 From: Adam Megacz Date: Sat, 9 Apr 2011 03:18:59 +0000 Subject: [PATCH] add a notation for composition of isomorphisms --- src/Isomorphisms_ch1_5.v | 1 + src/Notations.v | 1 + 2 files changed, 2 insertions(+) diff --git a/src/Isomorphisms_ch1_5.v b/src/Isomorphisms_ch1_5.v index 8241ead..18eb3db 100644 --- a/src/Isomorphisms_ch1_5.v +++ b/src/Isomorphisms_ch1_5.v @@ -52,6 +52,7 @@ Definition iso_comp `{C:Category}{a b c:C}(i1:Isomorphic a b)(i2:Isomorphic b c) [ setoid_rewrite (iso_comp1 i1) | setoid_rewrite (iso_comp2 i2) ]; reflexivity. Defined. +Notation "a >>≅>> b" := (iso_comp a b). Definition functors_preserve_isos `{C1:Category}`{C2:Category}{Fo}(F:Functor C1 C2 Fo){a b:C1}(i:Isomorphic a b) : Isomorphic (F a) (F b). diff --git a/src/Notations.v b/src/Notations.v index 4bca2f6..26c3ac1 100644 --- a/src/Notations.v +++ b/src/Notations.v @@ -28,6 +28,7 @@ Reserved Notation "a ≅ b" (at level 70, right associativ Reserved Notation "C 'ᵒᴾ'" (at level 1). Reserved Notation "F \ a" (at level 20). Reserved Notation "f >>> g" (at level 45). +Reserved Notation "a >>≅>> b" (at level 45). Reserved Notation "a ~~ b" (at level 54). Reserved Notation "a ~> b" (at level 70, right associativity). Reserved Notation "a ≃ b" (at level 70, right associativity). -- 1.7.10.4