I'm trying to make a Scheme construction (my first!) which will automatically center align a piece of text under a Hairpin object. The code I've got so far is below. This would save laboriously individually adjusting the #'extra-offset values of each TextScript.
What I can't find is how to do the center-aligning! Any suggestions?
Many thanks,
Vivian.