Ho risolto con
`\AtBeginDocument{
\DeclareRobustCommand{\greektext}{%
\fontencoding{LGR}[color=blue]\fontfamily{artemisia}[/color]\selectfont
\def\encodingdefault{LGR}}}
`Eccomi di nuovo.
Il font Artemisia è fornito in due versioni: una adatta per i txfonts, scalata di un fattore 0.93; l’altra per il font Euler, scalata di un fattore 0.98. Queste impostazioni sono definite nei file .fd. Usandolo con il Palatino la differenza delle dimensioni si nota, almeno nel primo caso.
È possibile, all’interno del file di classe, riportare il font Artemisia alla sua misura normale, ovvero scalarlo di un fattore 1?
Sostituendo \fontfamily{artemisia} con \fontfamily{artemisiaeuler} nel codice qui sopra il risultato è molto buono, ma rimane la curiosità su come scalare i font.
In rete c’è poco 🙁
La cosa più semplice è copiarsi il contenuto del file lgrartemisia.fd nella classe eliminando le stringhe “s * [0.93]”:
`\DeclareFontFamily{LGR}{artemisia}{}
\DeclareFontShape{LGR}{artemisia}{m}{n}{<-> gartemisiarg6a}{}
\DeclareFontShape{LGR}{artemisia}{m}{it}{<-> gartemisiai6a}{}
\DeclareFontShape{LGR}{artemisia}{b}{n}{<-> gartemisiab6a}{}
\DeclareFontShape{LGR}{artemisia}{b}{it}{<-> gartemisiabi6a}{}
\DeclareFontShape{LGR}{artemisia}{m}{sl}{<-> gartemisiao6a}{}
\DeclareFontShape{LGR}{artemisia}{b}{sl}{<-> gartemisiabo6a}{}
\DeclareFontShape{LGR}{artemisia}{m}{sc}{<-> gartemisiasc6a}{}
\DeclareFontShape{LGR}{artemisia}{m}{sco}{<-> gartemisiasco6a}{}
\DeclareFontShape{LGR}{artemisia}{bx}{n}{<-> ssub * artemisia/b/n}{}
\DeclareFontShape{LGR}{artemisia}{bx}{it}{<-> ssub * artemisia/b/it}{}
\DeclareFontShape{LGR}{artemisia}{bx}{sl}{<-> ssub * artemisia/b/sl}{}`
Ciao
Enrico