<?xml version="1.0" encoding="UTF-8"?>

<?context-directive job ctxfile x-setups.ctx ?>

<cd:interface xmlns:cd="http://www.pragma-ade.com/commands">

    <cd:command name="definenarrower" level="style" category="whitespace layout" file="spac-hor.mkiv">
        <cd:arguments>
            <cd:resolve name="keyword-name"/>
            <cd:resolve name="keyword-name-optional"/>
            <cd:assignments list="yes" optional="yes">
                <cd:inherit name="setupnarrower"/>
            </cd:assignments>
        </cd:arguments>
    </cd:command>

    <cd:command name="setupnarrower" level="style" category="whitespace layout" file="spac-hor.mkiv">
        <cd:arguments>
            <cd:resolve name="keyword-name-list-optional"/>
            <cd:assignments list="yes">
                <cd:parameter name="left">
                    <cd:constant type="cd:dimension"/>
                </cd:parameter>
                <cd:parameter name="middle">
                    <cd:constant type="cd:dimension"/>
                </cd:parameter>
                <cd:parameter name="right">
                    <cd:constant type="cd:dimension"/>
                </cd:parameter>
                <cd:parameter name="default">
                    <cd:constant type="left" prefix="cd:sign" method="none"/>
                    <cd:constant type="middle" prefix="cd:sign" method="none" default="yes"/>
                    <cd:constant type="right" prefix="cd:sign" method="none"/>
                    <cd:constant type="left" prefix="cd:number" method="factor"/>
                    <cd:constant type="middle" prefix="cd:number" method="factor"/>
                    <cd:constant type="right" prefix="cd:number" method="factor"/>
                    <cd:constant type="reset"/>
                </cd:parameter>
                <cd:parameter name="before">
                    <cd:constant type="cd:command"/>
                </cd:parameter>
                <cd:parameter name="after">
                    <cd:constant type="cd:command"/>
                </cd:parameter>
            </cd:assignments>
        </cd:arguments>
    </cd:command>

    <cd:command name="narrower" type="environment" level="document" category="whitespace layout" file="spac-hor.mkiv">
        <cd:arguments>
            <cd:keywords list="yes" optional="yes">
                <cd:constant type="left" prefix="cd:sign" method="none"/>
                <cd:constant type="middle" prefix="cd:sign" method="none"/>
                <cd:constant type="right" prefix="cd:sign" method="none"/>
                <cd:constant type="left" prefix="cd:number" method="factor"/>
                <cd:constant type="middle" prefix="cd:number" method="factor"/>
                <cd:constant type="right" prefix="cd:number" method="factor"/>
                <cd:constant type="reset"/>
                <cd:constant type="reverse"/>
            </cd:keywords>
        </cd:arguments>
    </cd:command>

    <cd:command name="narrower" type="environment" generated="yes" variant="example" level="document" category="whitespace layout" file="spac-hor.mkiv">
        <cd:sequence>
            <cd:variable value="narrower"/>
        </cd:sequence>
        <cd:arguments>
            <cd:keywords list="yes" optional="yes">
                <cd:constant type="left" prefix="cd:sign" method="none"/>
                <cd:constant type="middle" prefix="cd:sign" method="none"/>
                <cd:constant type="right" prefix="cd:sign" method="none"/>
                <cd:constant type="left" prefix="cd:number" method="factor"/>
                <cd:constant type="middle" prefix="cd:number" method="factor"/>
                <cd:constant type="right" prefix="cd:number" method="factor"/>
                <cd:constant type="reset"/>
                <cd:constant type="reverse"/>
            </cd:keywords>
        </cd:arguments>
    </cd:command>

    <cd:command name="narrow" type="environment" level="document" category="whitespace layout" file="spac-hor.mkiv">
        <cd:arguments>
            <cd:resolve name="keyword-name-optional"/>
            <cd:assignments list="yes" optional="yes">
                <cd:inherit name="setupnarrower"/>
            </cd:assignments>
        </cd:arguments>
    </cd:command>

    <cd:command name="narrow" type="environment" variant="name" level="document" category="whitespace layout" file="spac-hor.mkiv">
        <cd:arguments>
            <cd:resolve name="keyword-name-optional"/>
            <cd:keywords list="yes" optional="yes">
                <cd:constant type="left" prefix="cd:sign" method="none"/>
                <cd:constant type="middle" prefix="cd:sign" method="none"/>
                <cd:constant type="right" prefix="cd:sign" method="none"/>
                <cd:constant type="left" prefix="cd:number" method="factor"/>
                <cd:constant type="middle" prefix="cd:number" method="factor"/>
                <cd:constant type="right" prefix="cd:number" method="factor"/>
                <cd:constant type="reset"/>
               <cd:constant type="reverse"/>
            </cd:keywords>
        </cd:arguments>
    </cd:command>

    <cd:command name="narrow" type="environment" variant="assignment" level="document" category="whitespace layout" file="spac-hor.mkiv">
        <cd:arguments>
            <cd:assignments list="yes" optional="yes">
                <cd:inherit name="setupnarrower"/>
            </cd:assignments>
            <cd:keywords list="yes" optional="yes">
                <cd:constant type="left" prefix="cd:sign" method="none"/>
                <cd:constant type="middle" prefix="cd:sign" method="none"/>
                <cd:constant type="right" prefix="cd:sign" method="none"/>
                <cd:constant type="left" prefix="cd:number" method="factor"/>
                <cd:constant type="middle" prefix="cd:number" method="factor"/>
                <cd:constant type="right" prefix="cd:number" method="factor"/>
                <cd:constant type="reset"/>
               <cd:constant type="reverse"/>
            </cd:keywords>
        </cd:arguments>
    </cd:command>

</cd:interface>
