# FML list inspection
#
-# $Id: lists.fml,v 1.2 1995/02/09 13:07:15 adam Exp $
+# $Id: lists.fml,v 1.5 1995/02/23 08:32:07 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 {,\ }