X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fground%2Flib%2Fstream_hdtl.ma;h=a23cb4ca8caab2ef31e6eeb7598ead4986d5cf10;hb=dc605ae41c39773f55381f241b1ed3db4acf5edd;hp=5ddd583d1112a74493c882a3f2506286f38f9428;hpb=55c768d7e45babb300b5010463ba3196a68f1bbe;p=helm.git diff --git a/matita/matita/contribs/lambdadelta/ground/lib/stream_hdtl.ma b/matita/matita/contribs/lambdadelta/ground/lib/stream_hdtl.ma index 5ddd583d1..a23cb4ca8 100644 --- a/matita/matita/contribs/lambdadelta/ground/lib/stream_hdtl.ma +++ b/matita/matita/contribs/lambdadelta/ground/lib/stream_hdtl.ma @@ -12,7 +12,7 @@ (* *) (**************************************************************************) -include "ground/notation/functions/downspoon_2.ma". +include "ground/notation/functions/downdashedarrow_2.ma". include "ground/lib/stream.ma". (* HEAD AND TAIL FOR STREAMS ************************************************) @@ -27,7 +27,7 @@ defined. interpretation "tail (streams)" - 'DownSpoon A t = (stream_tl A t). + 'DownDashedArrow A t = (stream_tl A t). (* Basic constructions ******************************************************) @@ -36,10 +36,10 @@ lemma stream_hd_cons (A) (a) (t): // qed. lemma stream_tl_cons (A) (a) (t): - t = ⫰{A}(a⨮t). + t = ⇣{A}(a⨮t). // qed. lemma stream_split_tl (A) (t): - stream_hd A t ⨮ ⫰t = t. + stream_hd A t ⨮ ⇣t = t. #A * // qed.