<% USING: namespaces io kernel furnace words prettyprint generic sequences parser ; %> <% "model" get %>

<% dup crud-index [ %> <% ] when* %> <% dup tuple-slots swap class "slot-names" word-prop [ %> <% ] 2each %>

<% dup write %>: