adjustment of arc shape according to papersize

[Venus' Wink]

Hi All,

Would you see the following to codes?

    http://lilybin.com/57gfma/2

    http://lilybin.com/57gfma/3

The paper widths, and according to them,
the lists of control points for slurs
differ between these examples.

I'd like to switch the control points
on the paper size in one code as:

    If paper-width is 210mm, pass the
    control points for 210mm paper width
    to \shape.

    If paper-width is 297mm, pass the
    control points for 297mm paper width
    to \shape.

    (So far, only for 210mm and for 297mm 
     are enough.)

How could I realize it?

Thanks
Venus' Wink

____________________________________________________________
FREE 3D EARTH SCREENSAVER - Watch the Earth right on your desktop!
Check it out at http://www.inbox.com/earth