# Fml scripts to display MARC records # $Id: marc.fml,v 1.1 1995/02/10 15:50:57 adam Exp $ \func display rec { Record\n \foreach line {\rec} { \line \index 1 \ \foreach field {\line \index 2} { \field \index 1 \ $\field \index 2 \field \index 3 } \n } } \func f0 rec { \foreach line {\rec} { \line \index 1 \ \line \index 2 \index 1 \index 1 \foreach field {\line \index 2} { \ $\field \index 2\ \field \index 3 } \n } }