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