#include "dec.ocm" var ch: seq output ! RAW input ? ch seq i=[0 for 10] seq decout(output, ch, 0) output ! '*n' input ? ch output ! TEXT