let
afen fen = of_list (lfen fen)