method output_by_name name =
      List.find (fun o -> o#name = name) pages