¿Cómo puedo obtener comillas rectas en pseudocódigo?

Question

Las comillas en pseudocódigo actualmente tienen este aspecto:

¿Cómo puedo obtener citas que se parezcan más a un entorno de programación y menos como si las hubiera escrito con MS Word?

MWE

\documentclass{article}
\usepackage[pdftex,active,tightpage]{preview}
\setlength\PreviewBorder{2mm}

\usepackage[utf8]{inputenc} % this is needed for umlauts
\usepackage[ngerman]{babel} % this is needed for umlauts
\usepackage[T1]{fontenc}    % this is needed for correct output of umlauts in pdf
\usepackage{amssymb,amsmath,amsfonts} % nice math rendering
\usepackage{algorithm,algpseudocode}

\begin{document}
\begin{preview}
    This is a 'samle' with some "quotes".

    \begin{algorithm}[H]
        \begin{algorithmic}
            \State $a \gets \Call{map}{~}$
            \State $a['x'] \gets 42$
            \State $a["x"] \gets 1337$
        \end{algorithmic}
    \caption{Algorithmus von Stoer und Wanger}
    \label{alg:seq1}
    \end{algorithm}
\end{preview}
\end{document}

Preguntas relacionadas

La pregunta ya fue respondida para algunos otros entornos:

• ¿Citas directas?: Parece que podemos obtener comillas simples con \textquotedbly \textquotesingle, pero quiero comillas simples para todos los entornos algorítmicos sin tener que trastear en mi pseudocódigo
• Consolas: Cotizaciones directas: Esto es para listados
• ¿Cómo puedo obtener comillas dobles rectas en los listados?
• Comillas rectas en tabulación

Answer 1

Puede tener comillas simples, siempre que utilice algunos trucos.

\documentclass{article}

\usepackage[T1]{fontenc}
\usepackage[utf8]{inputenc}
\usepackage[ngerman]{babel}

\usepackage{textcomp}
\usepackage{amssymb,amsmath,amsfonts}
\usepackage{algorithm,algpseudocode}
\usepackage{etoolbox} % for the trick

% setup algorithmic to use straight quotes
\AtBeginEnvironment{algorithmic}{\useupquotes}

% define the command that activates the quotes and redefines them
\newcommand{\useupquotes}{%
  \begingroup\lccode`\~=`\'\lowercase{\endgroup\let~}\algoupquote
  \begingroup\lccode`\~=`\"\lowercase{\endgroup\let~}\algoupquotes
  \catcode`\'=\active\catcode`\"=\active
}

% Customize here (\mbox is necessary because of math mode;
% if needed in subscripts, use \text instead)
\newcommand{\algoupquote}{\mbox{\textquotesingle}}
\newcommand{\algoupquotes}{\mbox{\char`\"}}

\begin{document}
Look at Algorithm~\ref{some} for seeing the quotes.

\begin{algorithm}[htp]
\begin{algorithmic}
\State $a['x'] \gets 42$
\State $a["x"] \gets 1337$
\end{algorithmic}
\caption{Some algorithm}\label{some}
\end{algorithm}
\end{document}

Answer 2

Este es el enfoque de carácter activo, que también utiliza textcomp.

\documentclass{article}
\usepackage[pdftex,active,tightpage]{preview}
\setlength\PreviewBorder{2mm}

\usepackage[utf8]{inputenc} % this is needed for umlauts
\usepackage[ngerman]{babel} % this is needed for umlauts
\usepackage[T1]{fontenc}    % this is needed for correct output of umlauts in pdf
\usepackage{amssymb,amsmath,amsfonts} % nice math rendering
\usepackage{algorithm,algpseudocode}
\usepackage{textcomp}
\let\svalgorithm\algorithm
\catcode`'=\active
\catcode`"=\active
\def\quoteactive{\catcode`'=\active\def'{\makebox{\textquotesingle}}}
\def\qquoteactive{\catcode`"=\active\def"{\makebox{\textquotedbl}}}
\catcode`'=12
\catcode`"=12
\def\algorithm{\quoteactive\qquoteactive\svalgorithm}

\begin{document}
\begin{preview}
    This is a 'sample' with some "quotes"{} or ``quotes''.

    \begin{algorithm}[H]
        \begin{algorithmic}
            \State $a \gets \Call{map}{~}$
            \State $a['x'] \gets 42$
            \State $a["x"] \gets 1337$
        \end{algorithmic}
    \caption{Algorithmus von Stoer und Wanger}
    \label{alg:seq1}
    \end{algorithm}
Restored? ' and ", ``quotations'' or `quotations'
\end{preview}
\end{document}

Answer 3

Probablemente podrías activar las comillas, pero te sugiero incluirlas en una macro (se dará una referencia en¿Citas directas?):

\documentclass{article}

\usepackage[utf8]{inputenc} % this is needed for umlauts
\usepackage[ngerman]{babel} % this is needed for umlauts
\usepackage[T1]{fontenc}    % this is needed for correct output of umlauts in pdf
\usepackage{textcomp}
\usepackage{amssymb,amsmath,amsfonts} % nice math rendering
\usepackage{algorithm,algpseudocode}

\makeatletter
\newcommand{\upquotetype}{}
\newcommand{\upquote@aux}[1]{\text{\upquotetype}#1\text{\upquotetype}}
\newcommand{\upquotesingle}{\renewcommand{\upquotetype}{\textquotesingle}\upquote@aux}
\newcommand{\upquotedouble}{\renewcommand{\upquotetype}{\textquotedbl}\upquote@aux}

\begin{document}
This is a 'sample' with some "quotes".

\begin{algorithm}[H]
  \begin{algorithmic}
    \State $a[\upquotesingle{x}] \gets 42$
    \State $a[\upquotedouble{x}] \gets 1337$
  \end{algorithmic}
  \caption{Some algorithm}
\end{algorithm}
\end{document}