How can I insert the following WinBugs code into Latex as a text format?

Question

How can I insert the following WinBugs code into LaTeX as a text format?

  model
  {
    for(i in 1:nSUB)
    {
      s[i] ~ dnorm(0,tau.precision);
    }
  }

I tried \texttt{}:

\texttt{model
\{   \par
  for(i in 1:nSUB)   \par
  \{   \par
    s[i] $\sim$ dnorm(0,tau.precision);  \par
  \}  \par
\}
}

However, it gives a error message:

{model \{
! Paragraph ended before \text@command was complete. ....

I tried \usepackage{listings}, and used language R because there's no WinBugs language included.

\begin{lstlisting}[language=R]

model
{
  for(i in 1:nSUB)
  {
    s[i] ~ dnorm(0,tau.precision);
  }
}
\end{lstlisting}

There's no error message, but the text still looks very strange.

Answer 1

I don't know WinBugs, but turns out there's a lexer for pygments. You can use the minted environment as follows.

\documentclass{article}
\usepackage{minted}

\begin{document}
\begin{minted}{winbugs}
model
{
  for(i in 1:nSUB)
  {
    s[i] ~ dnorm(0,tau.precision);
  }
}
\end{minted}
\end{document}

The result looks quite reasonable although you can apply a different style if you prefer fewer or more colors. I tend to go with bw.