This code sample is adapted from Clifford B. Anderson and Joseph C. Wicentowski, XQuery for Humanists (College Station: Texas A&M University Press, 2020), 122. Download this code sample in its raw form. View the source on GitHub.

xquery version "3.1";

module namespace tf = "http://xquery.forhumanists.org/tei-functions";

declare namespace tei = "http://www.tei-c.org/ns/1.0";

declare function tf:make-tei-title(
    $title as xs:string,
    $subtitle as xs:string?)
    as element(tei:title) {
    <title type="full" xmlns="http://www.tei-c.org/ns/1.0">
        <title type="main">{ $title }</title>
        <title type="sub">{ $subtitle }</title>
    </title>
};