[ InfixInvSub i;

  print (string) Story, (string) Headline;
  print "  ", (number) #highest_object_number - #lowest_object_number + 1,
      " objects;^";
  print "  non-library object-name constants:";
  InfixList(#lowest_constant_number, #highest_constant_number,
      #constant_names_array, 2);
  print "  ", (number) #highest_class_number - #lowest_class_number + 1,
      "  classes:^    ";
  for (i=#lowest_class_number:i<=#highest_class_number:i++)
      print (name) #class_objects_array-->i, " ";
  new_line;
  print "  non-library arrays:";
  InfixList(#lowest_array_number, #highest_array_number,
      #array_names_array);
  print "  non-library routines:";
  InfixList(#lowest_routine_number, #highest_routine_number,
      #routine_names_array);
  print "  non-library constants:";
  InfixList(#lowest_constant_number, #highest_constant_number,
      #constant_names_array, 0);
  print "  (common) properties:";
  InfixList(#lowest_property_number, 63, #property_names_array);
  print "  (individual) properties:";
  InfixList(64, #highest_property_number, #property_names_array + 126);
  print "  attributes:";
  InfixList(#lowest_attribute_number, #highest_attribute_number,
      #attribute_names_array);
  if (true) return;
  print "  variables:";
  InfixList(#lowest_global_number, #highest_global_number,
      #global_names_array);
  print "  actions:";
  InfixList(#lowest_action_number, #highest_action_number,
      #action_names_array);
  print "  fake actions:";
  InfixList(#lowest_fake_action_number, #highest_fake_action_number,
      #fake_action_names_array);
];