Segno / Coda on top of rehearsal mark

If you are using \mark \default and e.g. something like \mark \markup { \musicglyph #"scripts.segno" } they will most likely need to be above the same barline.
This snippet shows how to print both marks on top of each other with new scheme functions for use in \set Score.markFormatter = #[functionname].