
  TYPE
    pft$usage_selector = record
      case option: pft$usage_selector_options of
      = pfc$default_usage_option =
        ,
      = pfc$specific_usage_option =
        usage_selections: pft$usage_selections,
      casend,
    recend;

*copyc pft$usage_selections
*copyc pft$usage_selector_options
