X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fground_2%2Flib%2Fstreams_tls.ma;h=d2d6bcc30d690c92da266b5df8b9e907d395ad89;hb=5832735b721c0bd8567c8f0be761a9136363a2a6;hp=96b9abe98521280fbb067685fb0fdf4e5e70d528;hpb=064980eacc2efe70ffee96134d75dfa37506fc36;p=helm.git

diff --git a/matita/matita/contribs/lambdadelta/ground_2/lib/streams_tls.ma b/matita/matita/contribs/lambdadelta/ground_2/lib/streams_tls.ma
index 96b9abe98..d2d6bcc30 100644
--- a/matita/matita/contribs/lambdadelta/ground_2/lib/streams_tls.ma
+++ b/matita/matita/contribs/lambdadelta/ground_2/lib/streams_tls.ma
@@ -17,9 +17,9 @@ include "ground_2/lib/streams_hdtl.ma".
 
 (* STREAMS ******************************************************************)
 
-let rec tls (A:Type[0]) (n:nat) on n: stream A → stream A ≝ ?.
+rec definition tls (A:Type[0]) (n:nat) on n: stream A → stream A ≝ ?.
 cases n -n [ #t @t | #n #t @tl @(tls … n t) ]
-qed.
+defined.
 
 interpretation "recursive tail (strams)" 'Drops n f = (tls ? n f).