
  TYPE
    jmt$input_application_index = 0 .. jmc$maximum_input_applications;

  CONST
    jmc$ve_input_application_index = 1,
    jmc$unassigned_input_index = 0;

*copyc jmc$maximum_input_applications

