fml/lists.fml

   1 # FML list inspection
   2 #
   3 # $Id: lists.fml,v 1.5 1995/02/23 08:32:07 adam Exp $
   4 \set months {Jan Feb Mar Apr May Jun Jul Aug Sep Oct Nov Dec}
   5 \set days   {31  28  31  30  31  30  31  31  30  31  30  31}
   6 Number of months:
   7 \foreach m {\months}
   8   {Month: \m\n}
   9 \set i 1
  10 Number of days in every month:\n
  11 \while {\i \le \llen \months}
  12 {
  13         \months \index \i : \ \days \index \i
  14         \if {\i \eq 6} {\n} \else {,\ }
  15         \incr \i
  16 }
  17 \n
  18 \foreach ost { {feta ost} brie danbo } { \ost\ }