% (C) Copyright International Business Machines Corporation 23 January 
% 1990.  All Rights Reserved. 
%  
% See the file USERAGREEMENT distributed with this software for full 
% terms and conditions of use. 
% File: tutorial.tex
% SCCS Info: @(#)isil.tex	1.3 2/13/92

% Emphasis command for index page entries
\newcommand{\ii}[1]{{\em #1}}

% Macros to simulate script commands to facilitate automatic
% conversion of NIL manual to Hermes manual in Latex
% SCCS Info: @(#)isil.tex	1.4 2/19/90

% :ih1.gnus:i2.mating habits
\newcommand{\subindex}[2]{\index{#1!#2}}
\newcommand{\defindex}[1]{\index{#1|ii}}

% :figref refid='somefigure'.
\newcommand{\figref}[1]{Figure~\ref{#1} on page~\pageref{#1}}

\newcommand{\tblref}[1]{Table~\ref{#1} on page~\pageref{#1}}

% :hdref refid='somesection'.
\newcommand{\hdref}[1]{Section~\ref{#1} on page~\pageref{#1}}

% :hdref refid='somesection'.
\newcommand{\chapref}[1]{Chapter~\ref{#1} on page~\pageref{#1}}

% :hdref refid='somesection'.
\newcommand{\appref}[1]{Appendix~\ref{#1} on page~\pageref{#1}}

% :note.
\newcommand{\note}{{\bf Note: }}

% :pc.
\newcommand{\parcont}{}

%
% labelled sections
%
\newcommand{\lpart}[2]{\part{#2}\label{#1}}
\newcommand{\lchapter}[2]{\chapter{#2}\label{#1}}
\newcommand{\lsection}[2]{\section{#2}\label{#1}}
\newcommand{\lsubsection}[2]{\subsection{#2}\label{#1}}
\newcommand{\lsubsubsection}[2]{\subsubsection{#2}\label{#1}}


%%
%% nil-specific
%%

\newcommand{\namescase}{$\rightarrow$}
\newcommand{\equals}{$=$}
\newcommand{\nequals}{$<>$}
\newcommand{\move}{$\leftarrow$}
\newcommand{\assign}{$:=$}

\newcommand{\sub}[1]{$_{#1}$}

\newcommand{\nilop}[1]{{\bf #1}}

\newcommand{\gram}[1]{{\it #1}}

\newcommand{\pr}[1]{{\tt #1}}

\newcommand{\xc}[1]{{\it #1}}

\newcommand{\ty}[1]{{\bf #1}}

\newcommand{\tstate}[1]{{\it\{~#1~\}}}

\newcommand{\prts}[1]{{\rm\{ #1 \}}}

\newcommand{\psegpicture}[2]{\vbox to #1{\special{FIGURE #2}}}

\newcommand{\vbar}[0]{{\tt |}}

\newcommand{\impnote}[1]{{\narrower{\bf Implementation Note:} #1\par}}

%
% example environments
%

\newdimen\progindent			% incrment for indenting program examples
\progindent=10pt

\newenvironment{prxmp}{%%%%%%%%%% program example
\begingroup\obeylines\obeyspaces\medskip\tt\parskip 0pt%
%\catcode`\_=11				% treat underscore as an alphabetic
\def\+{\advance\leftskip by\progindent}% for controlling program indentation
\def\-{\advance\leftskip by-\progindent}}%
{\endgroup}				% ending skips and closes group

\newenvironment{xmp}{\begingroup\obeylines\obeyspaces\medskip\it}{\medskip\endgroup}

\newenvironment{grammar}{\begingroup\parskip 0pt}{\endgroup\vskip -12pt}



\newcommand{\op}[1]{\vskip 10pt %\goodbreak
\begingroup
\obeylines\catcode`\_=11		% treat underscore as an alphabetic
\advance\leftskip by 20pt
\leftline{$#1$}}

\newcommand{\eop}{\endgroup}
