X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=fml%2Flists.fml;h=2febf655fe7f511403105dcfe4decdab14125663;hb=4938d0c2e8f4e1eec397c2bfbbc7e23fd150c369;hp=217179eab1ee4dd25cb3151b804d55a19ffcb93b;hpb=332f815feae8b1614c42b0a436f2ab0276d817d8;p=egate.git

diff --git a/fml/lists.fml b/fml/lists.fml
index 217179e..2febf65 100644
--- a/fml/lists.fml
+++ b/fml/lists.fml
@@ -1,17 +1,19 @@
 # FML list inspection
 #
-# $Id: lists.fml,v 1.2 1995/02/09 13:07:15 adam Exp $
+# $Id: lists.fml,v 1.6 1995/02/27 09:01:21 adam Exp $
 \set months {Jan Feb Mar Apr May Jun Jul Aug Sep Oct Nov Dec}
 \set days   {31  28  31  30  31  30  31  31  30  31  30  31}
+Number of months: 
 \foreach m {\months}
   {Month: \m\n}
 \set i 1
 Number of days in every month:\n
-\while {\i \le 12}
+\while {\i \le \llen \months}
 {	
 	\months \index \i : \ \days \index \i
 	\if {\i \eq 6} {\n} \else {,\ }
         \incr \i 
 }
 \n
-\foreach ost { {feta ost} brie danbo } { \ost\ }
+\foreach ost { {feta ost} brie danbo } { \ost\ strlen of \ost\ is 
+\strlen \ost\ }