\score{ 
\notes < 

\context Staff="default" 
{ 
\notes {
\property Staff.Clef \override #'font-family = #'ancient
\property Staff.Accidentals \override #'font-family = #'ancient
\property Voice.NoteHead \override #'style = #'neo_mensural
\property Staff.Custos \override #'font-family = #'ancient
\clef "petrucci_c1"
\key g \dorian
d''1
\bar "|"
}
} 

> 
\paper { 
\translator{ 
\StaffContext 
\consists Custos_engraver 
} } 
}