
*copyc cst$standard_functions
*copyc tut$input_ordinals

  TYPE
    tut$mapping = array [cst$standard_functions] of tut$input_ordinals;

