TPL-40

A PL/I subset.