*ODDPROG  T: TYPE STRAW BERRIES OR ELSE
A: $FRUIT
          M: STRAW BERRIES
      J   N: *ODDPROG
          T: I SURE LIKE $FRUIT AND CREAM
      J    : *ODDPROG