
  TYPE
    jmt$output_device = ost$name;

*copyc ost$name
