X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fmatita%2Flibrary%2Fdecidable_kit%2Flist_aux.ma;h=a5bf2edb7588ca139325fa040fb2bf75ac148f3c;hb=8272528f48b942a80024aeb9b625d99cfe3f0f44;hp=a7db00c7278292d471ece6424af61ef19ba95062;hpb=fc8cd675d2a0635463e7a5399a17dcbd1360c284;p=helm.git diff --git a/helm/software/matita/library/decidable_kit/list_aux.ma b/helm/software/matita/library/decidable_kit/list_aux.ma index a7db00c72..a5bf2edb7 100644 --- a/helm/software/matita/library/decidable_kit/list_aux.ma +++ b/helm/software/matita/library/decidable_kit/list_aux.ma @@ -12,8 +12,6 @@ (* *) (**************************************************************************) -set "baseuri" "cic:/matita/decidable_kit/list_aux/". - include "list/list.ma". include "decidable_kit/eqtype.ma". include "nat/plus.ma". @@ -70,4 +68,4 @@ cases c; intros (H); [ apply reflect_true | apply reflect_false ] apply H'; reflexivity;]]]] qed. -definition list_eqType : eqType → eqType ≝ λd:eqType.mk_eqType ? ? (lcmpP d). \ No newline at end of file +definition list_eqType : eqType → eqType ≝ λd:eqType.mk_eqType ? ? (lcmpP d).