(  get$("Hello,How,Are,You,Today",MEM):?CommaseparatedList
& :?ReverseList
&   whl
  ' ( !CommaseparatedList:(?element,?CommaseparatedList)
    & !element !ReverseList:?ReverseList
    )
& !CommaseparatedList:?List
&   whl
  ' ( !ReverseList:%?element ?ReverseList
    & (!element.!List):?List
    )
& out$!List
)