diff options
author | 2007-08-16 14:52:49 +0000 | |
---|---|---|
committer | 2007-08-16 14:52:49 +0000 | |
commit | 1eac679a065d9b161004fa4da881fdd734531693 (patch) | |
tree | a0ec3c1558531f190dbe65fdef0be78103778cc7 /test-suite/bugs | |
parent | 4e06ff81b384ab51009abfeede8bce5f95f2bf39 (diff) |
Correction du bug #1322
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@10077 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'test-suite/bugs')
-rw-r--r-- | test-suite/bugs/closed/1322.v | 24 |
1 files changed, 24 insertions, 0 deletions
diff --git a/test-suite/bugs/closed/1322.v b/test-suite/bugs/closed/1322.v new file mode 100644 index 000000000..01c06f2c4 --- /dev/null +++ b/test-suite/bugs/closed/1322.v @@ -0,0 +1,24 @@ +Require Import Setoid. + +Section transition_gen. + +Variable I : Type. +Variable I_eq :I -> I -> Prop. +Variable I_eq_equiv : Setoid_Theory I I_eq. + +(* Add Relation I I_eq + reflexivity proved by I_eq_equiv.(Seq_refl I I_eq) + symmetry proved by I_eq_equiv.(Seq_sym I I_eq) + transitivity proved by I_eq_equiv.(Seq_trans I I_eq) +as I_eq_relation. *) + +Add Setoid I I_eq I_eq_equiv as I_with_eq. + +Variable F : I -> Type. +Variable F_morphism : forall i j, I_eq i j -> F i = F j. + + +Add Morphism F with signature I_eq ==> eq as F_morphism2. +Admitted. + +End transition_gen. |