# This program tests the "basis" of the Icon system: iconx/start.s, # rt/setbound.s, lib/invoke.s, iconx/interp.s, lib/efail.s, and # lib/pfail.s procedure main() write(&lcase) write(&ucase) write(&level) write(&null) write(&subject) write(&trace) write(&random) write(&pos) end