Múltiples referencias a la misma nota al pie por página con múltiples conjuntos de notas al pie

Múltiples referencias a la misma nota al pie por página con múltiples conjuntos de notas al pie

Esta es mi primera publicación en esta comunidad en línea. He buscado una respuesta a esta pregunta durante horas. Algunas publicaciones cubren partes de lo que necesito, pero ninguna que encontré lo cubre en detalle.

Estoy creando una edición crítica de un texto griego que tiene (1) un par de docenas de notas al pie por página y (2) dos conjuntos de notas al pie. Algunas de las palabras en el cuerpo principal del texto tendrán notas al pie idénticas y me gustaría que solo aparezca una nota al pie por página. Podría haber varias referencias al mismo pie de página en la misma página, pero el proceso de deduplicación debe "restablecerse" para cada página.

Intenté usar el fixfootpaquete, pero no encuentro cómo hacerlo funcionar con los dos conjuntos de pies de página que estoy usando.

Están sucediendo muchas cosas en el preámbulo, pero esto es lo que estoy usando.

[El código ahora está editado y elimina el preámbulo para mostrar solo las partes necesarias para ilustrar el problema. Para ver una ilustración de una nota al pie duplicada, consulte las dos primeras notas al pie de la primera página.]

\documentclass[12pt]{book}
\usepackage[papersize={6.5in,9.5in},margin=1in,headheight=28pt]{geometry}
\usepackage{layout} % shows you the layout composition of the pages.

\usepackage{fontspec}
\usepackage{reledmac}
\usepackage[polutonikogreek]{babel}
\usepackage{setspace}
\usepackage{etoolbox}
\usepackage{fancyhdr}
\usepackage{perpage} %the perpage package


%footnote sets arrangement
\arrangementX[A]{paragraph}
\arrangementX[B]{twocol}
\colalignX{\justifying}
\makeatletter
\bhooknoteX[A]{\setstretch {\setspace@singlespace}}
\bhookgroupX[A]{\setstretch {\setspace@singlespace}}
\makeatother
\let\footnote\footnoteA
\let\footnoteruleA=\relax
\let\footnoteruleB=\relax

\renewcommand{\thefootnoteA}{\roman{footnote}}
%\usepackage{microtype} % I guess this one is optional
\interfootnotelinepenalty=10000
\setmainfont{Palatino Linotype}
\setsansfont{Gill Sans Std}[
Scale=MatchLowercase,
]
\setmonofont{Andale Mono}[
Scale=MatchLowercase,
]


%This makes the footnote numbering restart for every page
\MakePerPage{footnoteB} %the perpage package command
\let\footnoteBlist\relax%Declare a list
\newcommand{\onlyonefootnoteB}[1]{%The command to be call instead of \footnoteB
    \ifinlist{#1}{\footnoteBlist}%
    {}%True : does nothing
    {%False : add to the list + add footnote
        \listgadd{\footnoteBlist}{#1}%
        \footnoteB{#1}%
    }%
}

\bhookgroupX[B]{%
    \global\let\footnoteBlist\relax%Declare a list
}

\begin{document}

\selectlanguage{greek}

\chapter*{ΚΑΤΑ ΙΩΑΝΝΗΝ}

\thispagestyle{empty}
1 Ἐν ἀρχῇ ἦν ὁ λόγος, καὶ ὁ λόγος ἦν πρὸς τὸν Θεόν, καὶ Θεὸς ἦν ὁ λόγος. 2 οὗτος ἦν ἐν ἀρχῇ πρὸς τὸν Θεόν. 3 πάντα διʼ αὐτοῦ ἐγένετο,\onlyonefootnoteB{γίνομαι 3s 2aor mid ind come to exist} καὶ χωρὶς αὐτοῦ ἐγένετο\onlyonefootnoteB{γίνομαι 3s 2aor mid ind come to exist} οὐδὲ ἕν, ὃ γέγονεν.\onlyonefootnoteB{γίνομαι 3s pf act ind come to exist} 4 ἐν αὐτῷ ζωὴ ἦν, καὶ ἡ ζωὴ ἦν τὸ φῶς τῶν ἀνθρώπων, 5 καὶ τὸ φῶς ἐν τῇ σκοτίᾳ\onlyonefootnoteB{σκοτία, ας, ἡ f darkness} φαίνει, καὶ ἡ σκοτία\onlyonefootnoteB{σκοτία, ας, ἡ f darkness} αὐτὸ οὐ κατέλαβεν.\onlyonefootnoteB{καταλαμβάνω 3s 2aor act ind extinguish; perceive}

6 ἐγένετο\onlyonefootnoteB{γίνομαι 3s 2aor mid ind there was} ἄνθρωπος ἀπεσταλμένος παρὰ Θεοῦ, ὄνομα αὐτῷ Ἰωάννης· 7 οὗτος ἦλθεν\onlyonefootnoteB{ἔρχομαι 3s 2aor act ind appear} εἰς μαρτυρίαν, ἵνα μαρτυρήσῃ περὶ τοῦ φωτός, ἵνα πάντες πιστεύσωσι διʼ αὐτοῦ. 8 οὐκ ἦν ἐκεῖνος τὸ φῶς, ἀλλʼ ἵνα μαρτυρήσῃ περὶ τοῦ φωτός. 9 ἦν τὸ φῶς τὸ ἀληθινόν,\onlyonefootnoteB{ἀληθινός, ή, όν  truthful} ὃ φωτίζει\onlyonefootnoteB{φωτίζω 3s pres act ind enlighten} πάντα ἄνθρωπον ἐρχόμενον\onlyonefootnoteB{ἔρχομαι pres mid or pas part ac s m come} εἰς τὸν κόσμον. 10 ἐν τῷ κόσμῳ ἦν, καὶ ὁ κόσμος διʼ αὐτοῦ ἐγένετο,\onlyonefootnoteB{γίνομαι 3s 2aor mid ind come to exist} καὶ ὁ κόσμος αὐτὸν οὐκ ἔγνω.\onlyonefootnoteB{γινώσκω 3s 2aor act ind know} 11 εἰς τὰ ἴδια ἦλθε,\onlyonefootnoteB{ἔρχομαι 3s 2aor act ind come} καὶ οἱ ἴδιοι αὐτὸν οὐ παρέλαβον.\onlyonefootnoteB{παραλαμβάνω 3p 2aor act ind come} 12 ὅσοι δὲ ἔλαβον\onlyonefootnoteB{λαμβάνω 3p 2aor act ind receive} αὐτόν, ἔδωκεν\onlyonefootnoteB{δίδωμι 3s aor act ind give} αὐτοῖς ἐξουσίαν τέκνα Θεοῦ γενέσθαι,\onlyonefootnoteB{γίνομαι 2aor mid inf become} τοῖς πιστεύουσιν εἰς τὸ ὄνομα αὐτοῦ· 13 οἳ οὐκ ἐξ αἱμάτων, οὐδὲ ἐκ θελήματος σαρκός, οὐδὲ ἐκ θελήματος ἀνδρός, ἀλλʼ ἐκ Θεοῦ ἐγεννήθησαν. 

14 καὶ ὁ λόγος σὰρξ ἐγένετο,\onlyonefootnoteB{γίνομαι 3s 2aor mid ind become} καὶ ἐσκήνωσεν\onlyonefootnoteB{σκηνόω 3s aor act ind take up residence; tabernacle} ἐν ἡμῖν, (καὶ ἐθεασάμεθα\onlyonefootnoteB{θεάομαι 1p aor mid ind behold} τὴν δόξαν αὐτοῦ, δόξαν ὡς μονογενοῦς\onlyonefootnoteB{μονογενής, ές  only one of its kind or class} παρὰ πατρός), πλήρης\onlyonefootnoteB{πλήρης, ες f filled, full} χάριτος καὶ ἀληθείας. 15 Ἰωάννης μαρτυρεῖ περὶ αὐτοῦ, καὶ κέκραγε\onlyonefootnoteB{κράζω 3s pf act ind cry out} λέγων, Οὗτος ἦν ὃν εἶπον,\onlyonefootnoteB{λέγω 1s 2aor act ind say} Ὁ ὀπίσω μου ἐρχόμενος\onlyonefootnoteB{ἔρχομαι pf mid or pas part nom s m come} ἔμπροσθέν μου γέγονεν·\onlyonefootnoteB{γίνομαι 3s pf act ind come} ὅτι πρῶτός μου ἦν. 16 καὶ ἐκ τοῦ πληρώματος\onlyonefootnoteB{πλήρωμα, ατος, τό n fulness} αὐτοῦ ἡμεῖς πάντες ἐλάβομεν,\onlyonefootnoteB{λαμβάνω  receive} καὶ χάριν ἀντὶ\onlyonefootnoteB{ἀντί prep in place of} χάριτος· 17 ὅτι ὁ νόμος διὰ Μωσέως ἐδόθη,\onlyonefootnoteB{δίδωμι 3s aor pas ind grant} ἡ χάρις καὶ ἡ ἀλήθεια διὰ Ἰησοῦ Χριστοῦ ἐγένετο.\onlyonefootnoteB{γίνομαι 3s 2aor mid ind come} 18 Θεὸν οὐδεὶς ἑώρακε πώποτε·\onlyonefootnoteB{πώποτε adv ever, at any time} ὁ μονογενὴς\onlyonefootnoteB{μονογενής, ές m only one of its kind or class} υἱός, ὁ ὢν εἰς τὸν κόλπον\onlyonefootnoteB{κόλπος, ου, ὁ m bosom, breast, chest} τοῦ πατρός ἐκεῖνος ἐξηγήσατο.\onlyonefootnoteB{ἐξηγέομαι 3s aor mid ind expound} 

19 Καὶ αὕτη ἐστὶν ἡ μαρτυρία τοῦ Ἰωάννου, ὅτε ἀπέστειλαν οἱ Ἰουδαῖοι ἐξ Ἱεροσολύμων ἱερεῖς καὶ Λευΐτας,\onlyonefootnoteB{Λευΐτης m Levite} ἵνα ἐρωτήσωσιν αὐτόν, Σὺ τίς εἶ; 20 καὶ ὡμολόγησε,\onlyonefootnoteB{ὁμολογέω 3s aor act ind declare} καὶ οὐκ ἠρνήσατο·\onlyonefootnoteB{ἀρνέομαι 3s aor mid ind deny} καὶ ὡμολόγησεν,\onlyonefootnoteB{ὁμολογέω 3s aor act ind declare} ὅτι Οὐκ εἰμὶ\onlyonefootnoteB{εἰμί 1s pf act ind} ἐγὼ ὁ Χριστός. 21 καὶ ἠρώτησαν αὐτόν, Τί οὖν; Ἠλίας εἶ σύ; καὶ λέγει, Οὐκ εἰμί.\onlyonefootnoteB{εἰμί 1s pf act ind} Ὁ προφήτης εἶ σύ; καὶ ἀπεκρίθη,\onlyonefootnoteB{ἀποκρίνομαι 3s aor mid ind answer, reply} Οὔ. 22 εἶπον οὖν αὐτῷ, Τίς εἶ; ἵνα ἀπόκρισιν\onlyonefootnoteB{ἀπόκρισις, εως, ἡ f response} δῶμεν\onlyonefootnoteB{δίδωμι 1p 2aor act sub give} τοῖς πέμψασιν ἡμᾶς τί λέγεις περὶ σεαυτοῦ; 23 \textit{ἔφη, }\onlyonefootnoteB{φημί 3s impf act ind} \textit{Ἐγὼ }\textit{φωνὴ }\textit{βοῶντος}\onlyonefootnoteB{βοάω pres actv part s gen m call, shout, cry out} \textit{ἐν }\textit{τῇ }\textit{ἐρήμῳ, }\textit{Εὐθύνατε}\onlyonefootnoteB{εὐθύνω 2p aor act straighten} \textit{τὴν }\textit{ὁδὸν }\textit{Κυρίου, }καθὼς εἶπεν Ἠσαΐας ὁ προφήτης. 24 καὶ οἱ ἀπεσταλμένοι ἦσαν ἐκ τῶν Φαρισαίων. 25 καὶ ἠρώτησαν αὐτόν, καὶ εἶπον αὐτῷ, Τί οὖν βαπτίζεις, εἰ σὺ οὐκ εἶ ὁ Χριστός, οὔτε Ἠλίας, οὔτε ὁ προφήτης; 29 Τῇ ἐπαύριον\onlyonefootnoteB{ἐπαύριον adv next day} βλέπει* \footnote{\textbf{\fontspec{Times}{1:29 }}omit ο ιωαννης Pickering, H-F, R-P}ὁ Ἰωάννης τὸν Ἰησοῦν ἐρχόμενον\onlyonefootnoteB{ἔρχομαι pres mid or pas part ac s m come} πρὸς αὐτόν, καὶ λέγει, Ἴδε ὁ ἀμνὸς\onlyonefootnoteB{ἀμνός, οῦ, ὁ m lamb} τοῦ Θεοῦ, ὁ αἴρων τὴν ἁμαρτίαν τοῦ κόσμου. 30 οὗτός ἐστι περὶ οὗ ἐγὼ εἶπον,\onlyonefootnoteB{λέγω 1s 2aor act ind say} Ὀπίσω μου ἔρχεται\onlyonefootnoteB{ἔρχομαι 3s pf mid or pas ind come} ἀνὴρ, ὃς ἔμπροσθέν μου γέγονεν,\onlyonefootnoteB{γίνομαι 3s pf act ind be} ὅτι πρῶτός μου ἦν. 31 κἀγὼ οὐκ ᾔδειν αὐτόν· ἀλλʼ ἵνα φανερωθῇ τῷ Ἰσραὴλ διὰ τοῦτο ἦλθον\onlyonefootnoteB{ἔρχομαι 1s 2aor act ind come} ἐγὼ ἐν τῷ ὕδατι βαπτίζων. 

32 καὶ ἐμαρτύρησεν Ἰωάννης, λέγων ὅτι Τεθέαμαι\onlyonefootnoteB{θεάομαι 1s pf mid or pas ind see, behold, perceive} τὸ Πνεῦμα καταβαῖνον ὡσεὶ* \footnote{\textbf{\fontspec{Times}{1:32 }}ως Patriarchal, Pickering, R-P}περιστερὰν\onlyonefootnoteB{περιστερά, ᾶς, ἡ f pigeon or dove} ἐξ οὐρανοῦ, καὶ ἔμεινεν ἐπʼ αὐτόν. 33 κἀγὼ οὐκ ᾔδειν αὐτόν· ἀλλʼ ὁ πέμψας με βαπτίζειν ἐν ὕδατι ἐκεῖνός μοι εἶπεν, Ἐφʼ ὃν ἂν ἴδῃς\onlyonefootnoteB{ὁράω 2s 2aor act sub see} τὸ Πνεῦμα καταβαῖνον καὶ μένον ἐπʼ αὐτόν, οὗτός ἐστιν ὁ βαπτίζων ἐν Πνεύματι Ἁγίῳ. 34 κἀγὼ ἑώρακα, καὶ μεμαρτύρηκα ὅτι οὗτός ἐστιν ὁ υἱὸς τοῦ Θεοῦ. 35 Τῇ ἐπαύριον\onlyonefootnoteB{ἐπαύριον adv next day} πάλιν εἱστήκει\onlyonefootnoteB{ἵστημι 3s pl act ind stand} ὁ Ἰωάννης, καὶ ἐκ τῶν μαθητῶν αὐτοῦ δύο· 36 καὶ ἐμβλέψας\onlyonefootnoteB{ἐμβλέπω aor act part s n m look at, gaze on} τῷ Ἰησοῦ περιπατοῦντι, λέγει, Ἴδε ὁ ἀμνὸς\onlyonefootnoteB{ἀμνός, οῦ, ὁ m lamb} τοῦ Θεοῦ. 37 καὶ ἤκουσαν αὐτοῦ οἱ δύο μαθηταὶ λαλοῦντος, καὶ ἠκολούθησαν τῷ Ἰησοῦ. 38 στραφεὶς\onlyonefootnoteB{στρέφω 2aor pres part n s m turn around, turn toward} δὲ ὁ Ἰησοῦς καὶ θεασάμενος\onlyonefootnoteB{θεάομαι aor mid part n s m see, look at, behold} αὐτοὺς ἀκολουθοῦντας, λέγει αὐτοῖς, Τί ζητεῖτε; οἱ δὲ εἶπον αὐτῷ, Ῥαββί (ὃ λέγεται ἑρμηνευόμενον,\onlyonefootnoteB{ἑρμηνεύω pres pas part no s n translate} Διδάσκαλε), ποῦ μένεις; 39 λέγει αὐτοῖς, Ἔρχεσθε\onlyonefootnoteB{ἔρχομαι 2p pres mid or pas imp come} καὶ ἴδετε.\onlyonefootnoteB{ὁράω 2p 2aor act imp see} ἦλθον\onlyonefootnoteB{ἔρχομαι 3p 2aor act ind come} καὶ εἶδον\onlyonefootnoteB{ὁράω 3p 2aor act ind see} ποῦ μένει· καὶ παρʼ αὐτῷ ἔμειναν τὴν ἡμέραν ἐκείνην ὥρα* \footnote{\textbf{\fontspec{Times}{1:39 }}ωρα Patriarchal, Pickering, H-F, R-P}δὲ ἦν ὡς δεκάτη.\onlyonefootnoteB{δέκατος, η, ον f tenth} 

40 ἦν Ἀνδρέας ὁ ἀδελφὸς Σίμωνος Πέτρου εἷς ἐκ τῶν δύο τῶν ἀκουσάντων παρὰ Ἰωάννου καὶ ἀκολουθησάντων αὐτῷ. 41 εὑρίσκει οὗτος πρῶτος τὸν* \footnote{\textbf{\fontspec{Times}{1:41 }}omit ὁ Patriarchal, Pickering, H-F, R-P}ἀδελφὸν τὸν ἴδιον Σίμωνα, καὶ λέγει αὐτῷ, Εὑρήκαμεν τὸν Μεσσίαν,\onlyonefootnoteB{Μεσσίας, ου, ὁ m the Messiah = the Anointed One} (ὅ ἐστι μεθερμηνευόμενον\onlyonefootnoteB{μεθερμηνεύω pres pas part no s n translate} ὁ Χριστός.) 42 καὶ ἤγαγεν\onlyonefootnoteB{ἄγω 3s 2aor act ind lead away} αὐτὸν πρὸς τὸν Ἰησοῦν. ἐμβλέψας\onlyonefootnoteB{ἐμβλέπω aor act part s n m look at, gaze on}* \footnote{\textbf{\fontspec{Times}{1:42 }}omit δε Patriarchal, Pickering, H-F, R-P}δὲ αὐτῷ ὁ Ἰησοῦς εἶπε, Σὺ εἶ Σίμων ὁ υἱὸς Ἰωνᾶ· σὺ κληθήσῃ Κηφᾶς, (ὃ ἑρμηνεύεται\onlyonefootnoteB{ἑρμηνεύω 3s pres pas ind translate} Πέτρος.) 

43 Τῇ ἐπαύριον\onlyonefootnoteB{ἐπαύριον adv next day} ἠθέλησεν* \footnote{\textbf{\fontspec{Times}{1:43 }}omit ο ιησους C-P, Pickering, H-F, R-P}ὁ Ἰησοῦς ἐξελθεῖν\onlyonefootnoteB{ἐξέρχομαι 2oar act inf go out} εἰς τὴν Γαλιλαίαν, καὶ εὑρίσκει Φίλιππον, καὶ λέγει αὐτῷ,* \footnote{\textbf{\fontspec{Times}{1:43 }}αυτω ο ιησους H-F, R-P}Ἀκολούθει μοι. 44 ἦν δὲ ὁ Φίλιππος ἀπὸ Βηθσαϊδά, ἐκ τῆς πόλεως Ἀνδρέου καὶ Πέτρου. 45 εὑρίσκει Φίλιππος τὸν Ναθαναήλ, καὶ λέγει αὐτῷ, Ὃν ἔγραψε Μωσῆς ἐν τῷ νόμῳ καὶ οἱ προφῆται εὑρήκαμεν, Ἰησοῦν τὸν υἱὸν τοῦ* \footnote{\textbf{\fontspec{Times}{1:45 }}omit του C-P, Pickering}Ἰωσὴφ τὸν ἀπὸ Ναζαρέθ. 46 καὶ εἶπεν αὐτῷ Ναθαναήλ, Ἐκ Ναζαρὲθ δύναταί τι ἀγαθὸν εἶναι; λέγει αὐτῷ Φίλιππος, Ἔρχου\onlyonefootnoteB{ἔρχομαι 2s pres mid or pas ind come} καὶ ἴδε. 47 εἶδεν\onlyonefootnoteB{ὁράω 3s 2aor act ind see} ὁ Ἰησοῦς τὸν Ναθαναὴλ ἐρχόμενον\onlyonefootnoteB{ἔρχομαι pres mid or pas part ac s m come} πρὸς αὐτὸν, καὶ λέγει περὶ αὐτοῦ, Ἴδε ἀληθῶς\onlyonefootnoteB{ἀληθῶς adv truly} Ἰσραηλίτης,\onlyonefootnoteB{Ἰσραηλίτης, ου, ὁ m Israelite} ἐν ᾧ δόλος\onlyonefootnoteB{δόλος, ου, ὁ m deceit} οὐκ ἔστι. 48 λέγει αὐτῷ Ναθαναήλ, Πόθεν με γινώσκεις; ἀπεκρίθη\onlyonefootnoteB{ἀποκρίνομαι 3s aor mid ind answer, reply} ὁ Ἰησοῦς καὶ εἶπεν αὐτῷ, Πρὸ τοῦ σε Φίλιππον φωνῆσαι, ὄντα ὑπὸ τὴν συκῆν,\onlyonefootnoteB{συκῆ, ῆς, ἡ f fig tree.} εἶδόν\onlyonefootnoteB{ὁράω 1s 2aor act ind see} σε. 49 ἀπεκρίθη\onlyonefootnoteB{ἀποκρίνομαι 3s aor mid ind answer, reply} Ναθαναήλ καὶ λέγει αὐτῷ, Ῥαββί, σὺ εἶ ὁ υἱὸς τοῦ Θεοῦ, σὺ εἶ ὁ βασιλεὺς τοῦ Ἰσραήλ. 50 ἀπεκρίθη\onlyonefootnoteB{ἀποκρίνομαι 3s aor mid ind answer, reply} Ἰησοῦς καὶ εἶπεν αὐτῷ, Ὅτι εἶπόν\onlyonefootnoteB{λέγω 1s 2aor act ind say} σοι, εἶδόν\onlyonefootnoteB{ὁράω 1s 2aor act ind see} σε ὑποκάτω\onlyonefootnoteB{ὑποκάτω adv under, below} τῆς συκῆς,\onlyonefootnoteB{συκῆ, ῆς, ἡ f fig tree.} πιστεύεις; μείζω τούτων ὄψει. 51 καὶ λέγει αὐτῷ, Ἀμὴν ἀμὴν λέγω ὑμῖν, ἀπʼ ἄρτι ὄψεσθε τὸν οὐρανὸν ἀνεῳγότα,\onlyonefootnoteB{ἀνοίγω 2pf pas part ac s m open} καὶ τοὺς ἀγγέλους τοῦ Θεοῦ ἀναβαίνοντας καὶ καταβαίνοντας ἐπὶ τὸν υἱὸν τοῦ ἀνθρώπου. 


\end{document}

Respuesta1

Bien, ahora entiendo que las "notas al pie duplicadas" son "notas al pie con el mismo contenido". La mejor manera de resolver su problema es almacenar las notas a pie de página en una lista. Luego, antes de insertar una nota al pie, puedes probar si ya está en la lista.

Para reiniciar en cada página, debe anteponer el valor almacenado al número de página. Para obtenerlo, utilizará el mecanismo de referencia cruzada de reledmac para obtener el número de página. Cada nota, compuesta o no, tiene una identificación única, almacenada en el onlyonefootnoteBcontador, aumentada en cada nota al pie (compuesta o no). Que nos permiten tener un sistema de cruce de datos automático.

Para administrar la lista, puede usar la herramienta proporcionada por etoolboxel paquete, que reledmac carga.

Eso es

\let\footnoteBlist\relax%Declare a list
\newcounter{onlyonefootnoteB}%Declare a counter to have unique id
\newcommand{\onlyonefootnoteB}[1]{%The command to be call instead of \footnoteB
  \addtocounter{onlyonefootnoteB}{1}%Increase counter value
  \edlabel{B:\theonlyonefootnoteB}%put crossref label
  \xifinlist{\xpageref{B:\theonlyonefootnoteB}-\detokenize{#1}}{\footnoteBlist}%Make test
  {}%True : does nothing
  {%False : add to the list + add footnote
    \listxadd{\footnoteBlist}{\xpageref{B:\theonlyonefootnoteB}-\detokenize{#1}}%
    \footnoteB{#1}%
  }%
}

Tenga en cuenta que lo utilizamos \detokenizepara evitar problemas con el cambio de funciones de fuente.

Finalmente, nuestro código final sería:

\documentclass[12pt]{book}
\usepackage[papersize={6.5in,9.5in},margin=1in,headheight=28pt]{geometry}
\usepackage{layout} % shows you the layout composition of the pages.

\usepackage{fontspec}
\usepackage{reledmac}
\usepackage[polutonikogreek]{babel}
\usepackage{setspace}
\usepackage{etoolbox}
\usepackage{fancyhdr}
\usepackage{perpage} %the perpage package


%footnote sets arrangement
\arrangementX[A]{paragraph}
\arrangementX[B]{twocol}
\colalignX{\justifying}
\makeatletter
\bhooknoteX[A]{\setstretch {\setspace@singlespace}}
\bhookgroupX[A]{\setstretch {\setspace@singlespace}}
\makeatother
\let\footnote\footnoteA
\let\footnoteruleA=\relax
\let\footnoteruleB=\relax
\renewcommand{\thefootnoteA}{\roman{footnote}}
%\usepackage{microtype} % I guess this one is optional
\interfootnotelinepenalty=10000
\setmainfont{Palatino Linotype}
\setsansfont{Gill Sans Std}[
Scale=MatchLowercase,
]
\setmonofont{Andale Mono}[
Scale=MatchLowercase,
]

%This makes the footnote numbering restart for every page
\MakePerPage{footnoteB} %the perpage package command
\let\footnoteBlist\relax%Declare a list
\newcounter{onlyonefootnoteB}%Declare a counter to have unique id
\newcommand{\onlyonefootnoteB}[1]{%The command to be call instead of \footnoteB
  \addtocounter{onlyonefootnoteB}{1}%Increase counter value
  \edlabel{B:\theonlyonefootnoteB}%put crossref label
  \xifinlist{\xpageref{B:\theonlyonefootnoteB}-\detokenize{#1}}{\footnoteBlist}%Make test
  {}%True : does nothing
  {%False : add to the list + add footnote
    \listxadd{\footnoteBlist}{\xpageref{B:\theonlyonefootnoteB}-\detokenize{#1}}%
    \footnoteB{#1}%
  }%
}


\begin{document}
    \selectlanguage{greek}

    \chapter*{ΚΑΤΑ ΙΩΑΝΝΗΝ}

    \thispagestyle{empty}

    1 Ἐν\onlyonefootnoteB{A} ἀρχῇ ἦν\onlyonefootnoteB{A} ὁ λόγος, καὶ ὁ λόγος ἦν πρὸς τὸν θεόν, καὶ θεὸς ἦν ὁ λόγος. 2 Οὗτος ἦν ἐν ἀρχῇ πρὸς τὸν θεόν. 3 Πάντα δι’ αὐτοῦ ἐγένετο,\onlyonefootnoteB{γίνομαι 3s 2aor mid ind come to exist} καὶ χωρὶς αὐτοῦ ἐγένετο\onlyonefootnoteB{γίνομαι 3s 2aor mid ind come to exist} οὐδὲ ἓν ὃ γέγονεν.\onlyonefootnoteB{γίνομαι 3s pf act ind come to exist} 4 Ἐν αὐτῷ ζωὴ ἦν, καὶ ἡ ζωὴ ἦν τὸ φῶς τῶν ἀνθρώπων, 55αὶ τὸ φῶς ἐν τῇ σκοτίᾳ\onlyonefootnoteB{σκοτία, ας, ἡ f darkness; fig. evil world} φαίνει, καὶ ἡ σκοτία\onlyonefootnoteB{σκοτία, ας, ἡ f darkness; fig. evil world} αὐτὸ οὐ κατέλαβεν. 6 Ἐγένετο ἄνθρωπος ἀπεσταλμένος παρὰ θεοῦ, ὄνομα αὐτῷ Ἰωάννης. 7 Οὗτος ἦλθεν\onlyonefootnoteB{ἔρχομαι 3s 2aor act ind. appear} εἰς μαρτυρίαν, ἵνα μαρτυρήσῃ περὶ τοῦ φωτός, ἵνα πάντες πιστεύσωσιν δι’ αὐτοῦ. 8 Οὐκ ἦν ἐκεῖνος τὸ φῶς, ἀλλ’ ἵνα μαρτυρήσῃ περὶ τοῦ φωτός. 9 Ἦν τὸ φῶς τὸ ἀληθινόν,\onlyonefootnoteB{ἀληθινός, ή, όν genuine, authentic, real} ὃ φωτίζει\onlyonefootnoteB{φωτίζω 3s pres act ind enlighten} πάντα ἄνθρωπον ἐρχόμενον\onlyonefootnoteB{ἔρχομαι pres mid or pas part ac s m come} εἰς τὸν κόσμον. 10 Ἐν τῷ κόσμῳ ἦν, καὶ ὁ κόσμος δι’ αὐτοῦ ἐγένετο,\onlyonefootnoteB{γίνομαι 3s 2aor mid ind come to exist} καὶ ὁ κόσμος αὐτὸν οὐκ ἔγνω. 11 Εἰς τὰ ἴδια ἦλθεν,\onlyonefootnoteB{ἔρχομαι 3s 2aor act ind. come} καὶ οἱ ἴδιοι αὐτὸν οὐ παρέλαβον. 12 Ὅσοι δὲ ἔλαβον αὐτόν, ἔδωκεν αὐτοῖς ἐξουσίαν τέκνα θεοῦ γενέσθαι,\onlyonefootnoteB{γίνομαι 2aor mid inf become} τοῖς πιστεύουσιν εἰς τὸ ὄνομα αὐτοῦ· 13 οἳ οὐκ ἐξ αἱμάτων, οὐδὲ ἐκ θελήματος σαρκός, οὐδὲ ἐκ θελήματος ἀνδρός, ἀλλ’ ἐκ θεοῦ ἐγεννήθησαν.\onlyonefootnoteB{γεννάω 3p aor pas ind beget} 14 Καὶ ὁ λόγος σὰρξ ἐγένετο,\onlyonefootnoteB{γίνομαι 3s 2aor mid ind become} καὶ ἐσκήνωσεν ἐν ἡμῖν καὶ ἐθεασάμεθα\onlyonefootnoteB{θεάομαι 1p aor mid ind behold} τὴν δόξαν αὐτοῦ, δόξαν ὡς μονογενοῦς\onlyonefootnoteB{μονογενής, ές unique, only; only begotten} παρὰ πατρός πλήρης\onlyonefootnoteB{πλήρης, ες filled, full} χάριτος καὶ ἀληθείας. 15 Ἰωάννης μαρτυρεῖ περὶ αὐτοῦ, καὶ κέκραγεν\onlyonefootnoteB{κράζω 3s pf act ind come} λέγων, Οὗτος ἦν ὃν εἶπον, Ὁ ὀπίσω μου ἐρχόμενος\onlyonefootnoteB{ἔρχομαι pf mid or pas part nom s m come} ἔμπροσθέν μου γέγονεν·\onlyonefootnoteB{γίνομαι 3s 2aor mid ind come to exist} ὅτι πρῶτός μου ἦν. 16 Καὶ ἐκ τοῦ πληρώματος\onlyonefootnoteB{πλήρωμα, ατος, τό n sum total, fullness} αὐτοῦ ἡμεῖς πάντες ἐλάβομεν,\onlyonefootnoteB{receive} καὶ χάριν ἀντὶ\onlyonefootnoteB{ἀντί prep in place of} χάριτος. 17 Ὅτι ὁ νόμος διὰ Μωσέως ἐδόθη,\onlyonefootnoteB{δίδωμι 3s aor pas ind grant} ἡ χάρις καὶ ἡ ἀλήθεια διὰ Ἰησοῦ χριστοῦ ἐγένετο.\onlyonefootnoteB{γίνομαι 3s 2aor mid ind come} 18 Θεὸν οὐδεὶς ἑώρακεν πώποτε·\onlyonefootnoteB{πώποτε adv ever, at any time} ὁ μονογενὴς\onlyonefootnoteB{μονογενής, ές unique, only; only begotten} υἱός, ὁ ὢν εἰς τὸν κόλπον\onlyonefootnoteB{κόλπος, ου, ὁ m bosom, breast, chest} τοῦ πατρός, ἐκεῖνος ἐξηγήσατο.\onlyonefootnoteB{ἐξηγέομαι 3s aor mid ind expound}

    19 Καὶ αὕτη ἐστὶν ἡ μαρτυρία τοῦ Ἰωάννου, ὅτε ἀπέστειλαν οἱ Ἰουδαῖοι ἐξ Ἱεροσολύμων ἱερεῖς καὶ Λευΐτας\onlyonefootnoteB{Λευΐτης m Levite} ἵνα ἐρωτήσωσιν αὐτόν, Σὺ τίς εἶ; 20 αὶ ὡμολόγησεν,\onlyonefootnoteB{ὁμολογέω 3s aor act ind declare} καὶ οὐκ ἠρνήσατο·\onlyonefootnoteB{ἀρνέομαι 3s aor mid ind deny} καὶ ὡμολόγησεν\onlyonefootnoteB{ὁμολογέω 3s aor act ind declare} ὅτι Οὐκ εἰμὶ ἐγὼ ὁ χριστός. 21 Καὶ ἠρώτησαν αὐτόν, Τί οὖν; Ἠλίας εἶ σύ; Καὶ λέγει, Οὐκ εἰμί. Ὁ προφήτης εἶ σύ; Καὶ ἀπεκρίθη,\onlyonefootnoteB{ἀποκρίνομαι 3s aor mid ind answer, reply} Οὔ. 22 Εἶπον οὖν αὐτῷ, Τίς εἶ; Ἵνα ἀπόκρισιν\onlyonefootnoteB{ἀπόκρισις, εως, ἡ f answer} δῶμεν\onlyonefootnoteB{δίδωμι  give} τοῖς πέμψασιν ἡμᾶς. Τί λέγεις περὶ σεαυτοῦ; 23 Ἔφη, Ἐγὼ φωνὴ βοῶντος\onlyonefootnoteB{βοάω pres actv part s gen m call, shout, cry out} ἐν τῇ ἐρήμῳ, Εὐθύνατε\onlyonefootnoteB{εὐθύνω 2p aor act straighten, make straight} τὴν ὁδὸν κυρίου, καθὼς εἶπεν Ἠσαΐας ὁ προφήτης. 24 Καὶ οἱ ἀπεσταλμένοι ἦσαν ἐκ τῶν Φαρισαίων. 25 Καὶ ἠρώτησαν αὐτόν, καὶ εἶπον αὐτῷ, Τί οὖν βαπτίζεις, εἰ σὺ οὐκ εἶ ὁ χριστός, οὔτε Ἠλίας, οὔτε ὁ προφήτης; 26 Ἀπεκρίθη\onlyonefootnoteB{ἀποκρίνομαι 3s aor mid ind answer, reply} αὐτοῖς ὁ Ἰωάννης λέγων, Ἐγὼ βαπτίζω ἐν ὕδατι· μέσος δὲ ὑμῶν ἕστηκεν ὃν ὑμεῖς οὐκ οἴδατε.\onlyonefootnoteB{A}
    \newpage
    \begin{itemize}
      \renewcommand*{\do}[1]{\item #1}%
        \dolistloop{\footnoteBlist}%
    \end{itemize}
\end{document}

El código después del final newpagenos muestra la lista de notas al pie escritas.

Tenga en cuenta que debido a que utilizamos herramientas de referencia cruzada, necesitará ejecuciones múltiples. Utilice latexmkherramientas similares para asegurarse de obtener un buen número de ejecuciones. En este MWE; eran 3, pero podría ser más para uso en casos reales.

información relacionada