"""Writes a delivery note whose every line carries the order it came from, without
printing it.

The Python twin of the `write_carried_facts` example in Rust. A warehouse prints a note
for the driver and keeps a record for itself, and the two have to be paired up again
when the signed sheet comes back. Printing the codes on the note would pair them, at
the price of a column of machine words on a sheet a customer reads.

So the codes travel under the page instead. Each line of the note is drawn inside a
marked run, and the run points at a list of the caller's own facts held once in the
file; the point where the driver signs carries a list of its own. Nothing of any list
is drawn: a program reading the file afterwards finds every code against the line it
belongs to, and an eye reading the sheet finds a delivery note.

The library says nothing about what a list holds. The names and the values here are the
warehouse's own, and another trade would carry other ones.

The words are held in `Words`, once per language, and `HQF_PDF_LANG` picks which set is
drawn. The codes, the quantities and the shelves are the same in both.

Usage: python examples/write_carried_facts.py [out.pdf] [font.ttf]
       HQF_PDF_LANG=fr python examples/write_carried_facts.py
"""

from __future__ import annotations

from dataclasses import dataclass
from pathlib import Path

import _language
import _licence
import _out

import hqf_pdf


@dataclass(frozen=True)
class Carried:
    """What one line of the note carries under the page."""

    order: str
    article: str
    bin: str
    quantity: int


# What each line carries, in the order the note delivers them. A code is a code in every
# language, so these stay out of `Words`.
CARRIED = (
    Carried(order="SO-88412", article="TBL-OAK-180", bin="A-14-3", quantity=1),
    Carried(order="SO-88412", article="CHR-WAL-04", bin="A-09-1", quantity=6),
    Carried(order="SO-88451", article="SBD-3DR-120", bin="B-02-7", quantity=1),
    Carried(order="SO-88451", article="SHF-WAL-090", bin="C-31-2", quantity=4),
    Carried(order="SO-88463", article="CST-STD-01", bin="C-08-5", quantity=2),
    Carried(order="SO-88463", article="LMP-FLR-BRS", bin="D-17-9", quantity=3),
)

# The round the driver is on, carried by the point where the note is signed.
ROUND = "RT-2026-224"

# The van the round is driven in, carried by the same point.
VAN = "DRV-118"


@dataclass(frozen=True)
class Words:
    """Every word the note draws, in one language."""

    title: str
    lead: str
    note: str
    consignee: str
    goods: str
    count: str
    picked: str
    items: tuple[str, ...]
    signature: str
    beneath: str
    carried: str
    fold: str
    folded: str
    caveat: str


# The note in English.
ENGLISH = Words(
    title="A delivery note that knows which order it came from",
    lead=(
        "Every line of the note below carries the order it was picked for, the article "
        "code and the shelf it came off, and prints none of the three. The line is "
        "drawn inside a marked run, and the run points at a list of facts held once in "
        "the file under the warehouse's own names. The sheet that comes back signed is "
        "therefore paired with the records it came from by reading the file, not by "
        "reading the paper."
    ),
    note="The note the driver carries",
    consignee=(
        "Meunier & Filles, 14 rue des Tanneurs, Tours — delivered 13 August 2026"
    ),
    goods="Goods",
    count="Qty",
    picked="Picked by",
    items=(
        "Oak dining table, 180 cm",
        "Dining chair, walnut",
        "Sideboard, three doors",
        "Wall shelf, 90 cm",
        "Coat stand",
        "Floor lamp, brushed steel",
    ),
    signature="Signed on delivery",
    beneath="What travels under the page",
    carried=(
        "Seven lists of facts travel with this sheet: one against each of the six "
        "lines, and one at the point where the driver signs, which carries the round "
        "and the van. Not one letter of any of them is drawn. A list is written once "
        "in the file and pointed at from the page, so a list that belongs to several "
        "places is held once and marked as often as it is needed."
    ),
    fold="The mark that carries nothing",
    folded=(
        "The short stroke in the left margin is where the sheet is folded for a window "
        "envelope, and a mark of its own is put in the page beside it, under a name "
        "and with no facts at all. A place is sometimes all there is to say."
    ),
    caveat=(
        "What a list holds is the caller's business: an order number here, an article "
        "code in a catalogue, a state against a box on a form. The library neither "
        "reads these names nor acts on them — it writes them down and ties them to "
        "what was drawn."
    ),
)

# The note in French.
FRENCH = Words(
    title="Un bon de livraison qui sait de quelle commande il vient",
    lead=(
        ("Chaque ligne du bon ci-dessous contient trois informations qu’elle n’imprime"
         " pas : la commande pour laquelle l’article a été préparé, son code article "
         "et l’étagère d’où il a été sorti. Chaque ligne est entourée d’une balise, et"
         " cette balise renvoie à une liste de renseignements écrite une seule fois "
         "dans le fichier, sous les noms qu’emploie l’entrepôt. Pour rapprocher la "
         "feuille qui revient signée des enregistrements dont elle est issue, on lit "
         "donc le fichier, et non le papier.")
    ),
    note="Le bon que le chauffeur emporte",
    consignee=("Meunier & Filles, 14 rue des Tanneurs, Tours — livraison du 13 août "
               "2026"),
    goods="Désignation",
    count="Qté",
    picked="Préparé par",
    items=(
        "Table de salle à manger en chêne, 180 cm",
        "Chaise de salle à manger en noyer",
        "Buffet trois portes",
        "Étagère murale, 90 cm",
        "Portemanteau",
        "Lampadaire en acier brossé",
    ),
    signature="Signature à la livraison",
    beneath="Ce qui voyage sous la page",
    carried=(
        ("Sept listes de renseignements voyagent avec cette feuille : une pour chacune"
         " des six lignes, et une septième, posée à l’endroit où signe le chauffeur, "
         "qui indique la tournée et le véhicule. Aucune n’apparaît sur la page, pas "
         "même une lettre. Chaque liste est écrite une seule fois dans le fichier, et "
         "la page y renvoie : une liste qui sert à plusieurs endroits n’est donc "
         "écrite qu’une fois, et l’on y renvoie autant de fois qu’il le faut.")
    ),
    fold="La balise qui ne contient rien",
    folded=(
        ("Le petit trait de la marge gauche indique où plier la feuille pour une "
         "enveloppe à fenêtre ; juste à côté, une balise qui lui est propre est posée "
         "sur la page : elle ne contient qu’un nom, et aucun renseignement. Il arrive "
         "qu’un emplacement soit tout ce qu’il y a à dire.")
    ),
    caveat=(
        ("Le contenu d’une liste relève du programme appelant : un numéro de commande "
         "ici, un code article dans un catalogue, l’état d’une case dans un "
         "formulaire. La bibliothèque ne lit pas ces noms et n’en tire aucune "
         "conséquence : elle les inscrit dans le fichier et les rattache à ce qui "
         "figure sur la page.")
    ),
)

# The note in Dutch.
DUTCH = Words(
    title="Een pakbon die weet van welke bestelling hij komt",
    lead=(
        "Elke regel van de pakbon hieronder bevat de bestelling waarvoor hij is "
        "verzameld, de artikelcode en het schap waar hij vandaan kwam, en drukt geen "
        "van de drie af. De regel wordt getekend binnen een gemarkeerd stuk, en dat "
        "stuk wijst naar een lijst gegevens die één keer in het bestand staat onder "
        "de eigen namen van het magazijn. Het blad dat getekend terugkomt wordt dus "
        "aan de gegevens gekoppeld door het bestand te lezen, niet het papier."
    ),
    note="De pakbon die de chauffeur meeneemt",
    consignee=(
        "Meunier & Filles, 14 rue des Tanneurs, Tours — geleverd op 13 augustus 2026"
    ),
    goods="Goederen",
    count="Aantal",
    picked="Verzameld door",
    items=(
        "Eiken eettafel, 180 cm",
        "Eetkamerstoel, notenhout",
        "Dressoir, drie deuren",
        "Wandplank, 90 cm",
        "Kapstok",
        "Staande lamp, geborsteld staal",
    ),
    signature="Getekend bij levering",
    beneath="Wat onder de pagina meereist",
    carried=(
        "Zeven lijsten gegevens reizen met dit blad mee: één bij elk van de zes "
        "regels, en één op de plek waar de chauffeur tekent, met de route en de "
        "bestelwagen. Geen letter ervan wordt getekend. Een lijst wordt één keer in "
        "het bestand geschreven en vanaf de pagina aangewezen, dus een lijst die bij "
        "meerdere plekken hoort, staat er één keer en wordt zo vaak gemarkeerd als "
        "nodig."
    ),
    fold="Het teken dat niets draagt",
    folded=(
        "Het korte streepje in de linkermarge is waar het blad wordt gevouwen voor "
        "een vensterenvelop, en ernaast wordt een eigen markering in de pagina gezet, "
        "met een naam en zonder gegevens. Soms is een plek alles wat er te zeggen "
        "valt."
    ),
    caveat=(
        "Wat een lijst bevat is de zaak van de aanroeper: hier een bestelnummer, een "
        "artikelcode in een catalogus, een status naast een vakje op een formulier. "
        "De bibliotheek leest deze namen niet en doet er niets mee: ze schrijft ze op "
        "en koppelt ze aan wat getekend is."
    ),
)

# The note in Portuguese.
PORTUGUESE = Words(
    title="Uma guia de remessa que sabe de que encomenda vem",
    lead=(
        "Cada linha da guia abaixo leva a encomenda para que foi preparada, o código "
        "do artigo e a prateleira de onde saiu, e não imprime nenhum dos três. A "
        "linha é desenhada dentro de um troço marcado, e o troço aponta para uma "
        "lista de dados guardada uma vez no ficheiro com os nomes que o próprio "
        "armazém usa. A folha que volta assinada emparelha-se assim com os registos "
        "de onde veio lendo o ficheiro, não o papel."
    ),
    note="A guia que o motorista leva",
    consignee=(
        "Meunier & Filles, 14 rue des Tanneurs, Tours — entregue a 13 de agosto de 2026"
    ),
    goods="Mercadoria",
    count="Qtd.",
    picked="Preparado por",
    items=(
        "Mesa de jantar em carvalho, 180 cm",
        "Cadeira de jantar, nogueira",
        "Aparador, três portas",
        "Prateleira de parede, 90 cm",
        "Bengaleiro",
        "Candeeiro de pé, aço escovado",
    ),
    signature="Assinado na entrega",
    beneath="O que viaja por baixo da página",
    carried=(
        "Sete listas de dados viajam com esta folha: uma por cada uma das seis linhas "
        "e uma no ponto onde o motorista assina, que leva a volta e a carrinha. Nem "
        "uma letra de nenhuma é desenhada. Uma lista escreve-se uma vez no ficheiro e "
        "é apontada a partir da página, por isso uma lista que pertence a vários "
        "sítios é guardada uma vez e marcada tantas vezes quantas forem precisas."
    ),
    fold="A marca que não leva nada",
    folded=(
        "O traço curto na margem esquerda é onde a folha se dobra para um envelope de "
        "janela, e ao lado põe-se na página uma marca própria, com um nome e sem dado "
        "nenhum. Às vezes um lugar é tudo o que há a dizer."
    ),
    caveat=(
        "O que uma lista contém é assunto do programa que chama a biblioteca: aqui um "
        "número de encomenda, um código de artigo num catálogo, um estado junto a uma "
        "caixa de um formulário. A biblioteca não lê estes nomes nem age sobre eles: "
        "escreve-os e liga-os ao que foi desenhado."
    ),
)

# The note in Italian.
ITALIAN = Words(
    title="Un documento di trasporto che sa da quale ordine viene",
    lead=(
        "Ogni riga del documento qui sotto porta l’ordine per cui è stata preparata, "
        "il codice articolo e lo scaffale da cui è uscita, e non ne stampa nessuno "
        "dei tre. La riga è disegnata dentro un tratto marcato, e il tratto rimanda a "
        "un elenco di dati tenuto una volta nel file con i nomi propri del magazzino. "
        "Il foglio che torna firmato si abbina così ai registri da cui proviene "
        "leggendo il file, non la carta."
    ),
    note="Il documento che porta l’autista",
    consignee=(
        "Meunier & Filles, 14 rue des Tanneurs, Tours — consegnato il 13 agosto 2026"
    ),
    goods="Merce",
    count="Qtà",
    picked="Preparato da",
    items=(
        "Tavolo da pranzo in rovere, 180 cm",
        "Sedia da pranzo, noce",
        "Credenza, tre ante",
        "Mensola, 90 cm",
        "Appendiabiti",
        "Lampada da terra, acciaio spazzolato",
    ),
    signature="Firmato alla consegna",
    beneath="Ciò che viaggia sotto la pagina",
    carried=(
        "Sette elenchi di dati viaggiano con questo foglio: uno per ciascuna delle "
        "sei righe e uno nel punto in cui firma l’autista, che porta il giro e il "
        "furgone. Non ne è disegnata nemmeno una lettera. Un elenco si scrive una "
        "volta nel file e si richiama dalla pagina, così un elenco che appartiene a "
        "più punti è tenuto una volta e marcato tutte le volte che serve."
    ),
    fold="Il segno che non porta nulla",
    folded=(
        "Il tratto corto nel margine sinistro è dove il foglio si piega per una busta "
        "a finestra, e la pagina vi pone accanto un segno proprio, con un nome e "
        "senza alcun dato. A volte un luogo è tutto ciò che c’è da dire."
    ),
    caveat=(
        "Ciò che un elenco contiene è affare di chi chiama: qui un numero d’ordine, "
        "un codice articolo in un catalogo, uno stato accanto a una casella di un "
        "modulo. La libreria non legge questi nomi né agisce su di essi: li scrive e "
        "li lega a ciò che è stato disegnato."
    ),
)

# The note in Spanish.
SPANISH = Words(
    title="Un albarán que sabe de qué pedido viene",
    lead=(
        "Cada línea del albarán de abajo lleva el pedido para el que se preparó, el "
        "código del artículo y la estantería de la que salió, y no imprime ninguno de "
        "los tres. La línea se dibuja dentro de un tramo marcado, y el tramo apunta a "
        "una lista de datos guardada una vez en el archivo con los nombres propios "
        "del almacén. La hoja que vuelve firmada se empareja así con los registros de "
        "los que salió leyendo el archivo, no el papel."
    ),
    note="El albarán que lleva el conductor",
    consignee=(
        "Meunier & Filles, 14 rue des Tanneurs, Tours — entregado el 13 de agosto de 2026"
    ),
    goods="Mercancía",
    count="Cant.",
    picked="Preparado por",
    items=(
        "Mesa de comedor de roble, 180 cm",
        "Silla de comedor, nogal",
        "Aparador, tres puertas",
        "Estante de pared, 90 cm",
        "Perchero",
        "Lámpara de pie, acero cepillado",
    ),
    signature="Firmado a la entrega",
    beneath="Lo que viaja bajo la página",
    carried=(
        "Siete listas de datos viajan con esta hoja: una por cada una de las seis "
        "líneas y una en el punto donde firma el conductor, que lleva la ruta y la "
        "furgoneta. No se dibuja ni una letra de ninguna. Una lista se escribe una "
        "vez en el archivo y se señala desde la página, así que una lista que "
        "pertenece a varios sitios se guarda una vez y se marca tantas veces como "
        "haga falta."
    ),
    fold="La marca que no lleva nada",
    folded=(
        "El trazo corto del margen izquierdo es donde se dobla la hoja para un sobre "
        "de ventana, y a su lado se pone en la página una marca propia, con un nombre "
        "y sin ningún dato. A veces un lugar es todo lo que hay que decir."
    ),
    caveat=(
        "Lo que contiene una lista es cosa del programa que la usa: aquí un número de "
        "pedido, un código de artículo en un catálogo, un estado frente a una casilla "
        "de un formulario. La biblioteca ni lee estos nombres ni actúa sobre ellos: "
        "los escribe y los ata a lo que se dibujó."
    ),
)

# The note in German.
GERMAN = Words(
    title="Ein Lieferschein, der weiß, aus welchem Auftrag er stammt",
    lead=(
        "Jede Zeile des Lieferscheins unten trägt den Auftrag, für den sie "
        "kommissioniert wurde, die Artikelnummer und das Regal, aus dem sie kam, und "
        "druckt keines der drei. Die Zeile wird in einem markierten Abschnitt "
        "gezeichnet, und dieser Abschnitt verweist auf eine Liste von Angaben, die "
        "einmal in der Datei steht, unter den eigenen Namen des Lagers. Das "
        "unterschrieben zurückkommende Blatt wird also seinen Datensätzen zugeordnet, "
        "indem man die Datei liest, nicht das Papier."
    ),
    note="Der Lieferschein, den der Fahrer mitnimmt",
    consignee=(
        "Meunier & Filles, 14 rue des Tanneurs, Tours — geliefert am 13. August 2026"
    ),
    goods="Ware",
    count="Menge",
    picked="Kommissioniert von",
    items=(
        "Esstisch aus Eiche, 180 cm",
        "Esszimmerstuhl, Nussbaum",
        "Anrichte, drei Türen",
        "Wandregal, 90 cm",
        "Garderobenständer",
        "Stehleuchte, gebürsteter Stahl",
    ),
    signature="Bei Lieferung unterschrieben",
    beneath="Was unter der Seite mitreist",
    carried=(
        "Sieben Listen von Angaben reisen mit diesem Blatt: eine zu jeder der sechs "
        "Zeilen und eine an der Stelle, an der der Fahrer unterschreibt, mit Tour und "
        "Lieferwagen. Kein einziger Buchstabe davon wird gezeichnet. Eine Liste steht "
        "einmal in der Datei, und die Seite verweist auf sie; eine Liste, die zu "
        "mehreren Stellen gehört, steht also einmal da und wird so oft markiert, wie "
        "es nötig ist."
    ),
    fold="Die Markierung, die nichts trägt",
    folded=(
        "Der kurze Strich am linken Rand zeigt, wo das Blatt für einen "
        "Fensterumschlag gefaltet wird, und daneben steht auf der Seite eine eigene "
        "Markierung, mit einem Namen und ganz ohne Angaben. Manchmal ist ein Ort "
        "alles, was es zu sagen gibt."
    ),
    caveat=(
        "Was eine Liste enthält, ist Sache des Aufrufers: hier eine Auftragsnummer, "
        "eine Artikelnummer in einem Katalog, der Zustand eines Kästchens in einem "
        "Formular. Die Bibliothek liest diese Namen nicht und richtet sich nicht nach "
        "ihnen — sie schreibt sie auf und bindet sie an das Gezeichnete."
    ),
)

# Every language the example is written in. A language is added by writing its own set
# of words and naming it here.
WORDS = {_language.ENGLISH: ENGLISH, _language.FRENCH: FRENCH, _language.GERMAN: GERMAN, _language.SPANISH: SPANISH, _language.ITALIAN: ITALIAN, _language.PORTUGUESE: PORTUGUESE, _language.DUTCH: DUTCH}

# The left edge of everything on the page.
LEFT = 72.0

# How wide a block of text is.
WIDTH = 451.0

# How wide the column of goods is.
GOODS_WIDTH = 300.0

# Where the column of quantities begins, and how wide it is.
COUNT_AT = LEFT + GOODS_WIDTH
COUNT_WIDTH = 50.0

# Where the column naming the picker begins.
PICKED_AT = COUNT_AT + COUNT_WIDTH

# How far apart two lines of the note stand.
PITCH = 18.0

# The size the note is set at.
NOTE_SIZE = 9.5

# The grey the page draws its second-rank words in.
GREY = hqf_pdf.Rgb.gray(0.42)

# The grey the rules of the note are drawn in.
RULE = hqf_pdf.Rgb.gray(0.72)

# Who picked each line, which the note does print.
PICKERS = ("MJ", "MJ", "PL", "PL", "SD", "SD")


def block(
    content: hqf_pdf.Content,
    flow: hqf_pdf.TextFlow,
    x: float,
    top: float,
    width: float,
    text: str,
) -> float:
    """Sets a block of words at `top`, and hands back the ordinate it ends at."""
    lines = flow.break_lines(text, width)
    # The binding opens the text object itself, so opening another here would write a
    # pair of operators its twin in Rust does not.
    flow.draw(content, lines, x, top, width)
    return top - flow.height(lines)


def facts_of(line: Carried) -> dict[str, str]:
    """The list of facts one line of the note carries."""
    return {"Order": line.order, "Article": line.article, "Bin": line.bin}


def round_facts() -> dict[str, str]:
    """The list of facts the point where the note is signed carries."""
    return {"Round": ROUND, "Van": VAN}


def lines_of_the_note(
    content: hqf_pdf.Content,
    font: hqf_pdf.FontHandle,
    words: Words,
    lists: list[hqf_pdf.PropertiesHandle],
    top: float,
) -> float:
    """Draws the six lines of the note, each inside the run that carries its facts."""
    goods = hqf_pdf.TextFlow(font, NOTE_SIZE)
    figure = hqf_pdf.TextFlow(font, NOTE_SIZE, align=hqf_pdf.Align.Right)
    picker = hqf_pdf.TextFlow(font, NOTE_SIZE, align=hqf_pdf.Align.Right)

    row = top
    for index, line in enumerate(CARRIED):
        content.begin_marked_with("Line", lists[index])
        block(content, goods, LEFT, row, GOODS_WIDTH, words.items[index])
        block(content, figure, COUNT_AT, row, COUNT_WIDTH, str(line.quantity))
        block(content, picker, PICKED_AT, row, LEFT + WIDTH - PICKED_AT, PICKERS[index])
        content.end_marked()

        content.set_stroke(RULE)
        content.set_line_width(0.4)
        content.move_to(LEFT, row - PITCH + 4.0)
        content.line_to(LEFT + WIDTH, row - PITCH + 4.0)
        content.stroke()
        row -= PITCH
    return row


def build(document: hqf_pdf.Document, font: hqf_pdf.FontHandle, words: Words) -> None:
    """Draws the whole page."""
    lists = [document.add_properties(facts_of(line)) for line in CARRIED]
    round_list = document.add_properties(round_facts())

    title = hqf_pdf.TextFlow(font, 18.0)
    lead = hqf_pdf.TextFlow(font, 10.0)
    label = hqf_pdf.TextFlow(font, 12.0)
    small = hqf_pdf.TextFlow(font, 8.5, color=GREY)
    small_right = hqf_pdf.TextFlow(font, 8.5, align=hqf_pdf.Align.Right, color=GREY)

    content = hqf_pdf.Content()
    top = 790.0
    top = block(content, title, LEFT, top, WIDTH, words.title) - 12.0
    top = block(content, lead, LEFT, top, WIDTH, words.lead) - 22.0

    top = block(content, label, LEFT, top, WIDTH, words.note) - 10.0
    top = block(content, small, LEFT, top, WIDTH, words.consignee) - 12.0

    block(content, small, LEFT, top, GOODS_WIDTH, words.goods)
    block(content, small_right, COUNT_AT, top, COUNT_WIDTH, words.count)
    top = (
        block(
            content, small_right, PICKED_AT, top, LEFT + WIDTH - PICKED_AT, words.picked
        )
        - 4.0
    )

    content.set_stroke(hqf_pdf.Rgb.gray(0.3))
    content.set_line_width(0.6)
    content.move_to(LEFT, top)
    content.line_to(LEFT + WIDTH, top)
    content.stroke()

    top = lines_of_the_note(content, font, words, lists, top - 12.0) - 16.0

    # The point where the driver signs, and the list the round travels in.
    content.mark_point_with("Signature", round_list)
    content.set_stroke(hqf_pdf.Rgb.gray(0.3))
    content.set_line_width(0.5)
    content.move_to(LEFT + WIDTH - 200.0, top)
    content.line_to(LEFT + WIDTH, top)
    content.stroke()
    top = (
        block(content, small_right, LEFT + WIDTH - 200.0, top - 3.0, 200.0, words.signature)
        - 26.0
    )

    # The fold tick, and the mark that carries nothing but its own place.
    content.set_stroke(RULE)
    content.set_line_width(0.4)
    content.move_to(LEFT - 18.0, 561.0)
    content.line_to(LEFT - 8.0, 561.0)
    content.stroke()
    content.mark_point("Fold")

    top = block(content, label, LEFT, top, WIDTH, words.beneath) - 10.0
    top = block(content, lead, LEFT, top, WIDTH, words.carried) - 18.0
    top = block(content, label, LEFT, top, WIDTH, words.fold) - 10.0
    top = block(content, lead, LEFT, top, WIDTH, words.folded) - 20.0

    closing = hqf_pdf.TextFlow(font, 9.0, color=GREY)
    block(content, closing, LEFT, top, WIDTH, words.caveat)

    page = hqf_pdf.Page.a4()
    page.set_content(content)
    document.add_page(page)


def main() -> None:
    language = _language.from_environment()
    words = _language.words_of(WORDS, language)

    # A named file is written as named; the default one carries the language, so the two
    # languages do not overwrite each other in `tmp/`.
    out = _out.output_path(
        Path(_language.file_name("carried_facts.pdf", language)).stem
    )

    document = hqf_pdf.Document()
    document.set_license(_licence.licensed())
    font = document.add_font(hqf_pdf.Font.from_path(_out.font_path()))

    build(document, font, words)

    written = document.write(out)
    print(f"wrote {out}: {written} bytes, {len(CARRIED) + 1} lists carried and none drawn")


if __name__ == "__main__":
    main()