doc-src/LaTeXsugar/Sugar/document/Sugar.tex
changeset 15984 bc6ead9d6628
parent 15960 9bd6550dc004
child 16001 554836ed1f1b
equal deleted inserted replaced
15983:a53abeedc879 15984:bc6ead9d6628
   132 results in \isa{{\isasymlbrakk}P{\isacharsemicolon}\ Q{\isasymrbrakk}\ {\isasymLongrightarrow}\ P\ {\isasymand}\ Q}.
   132 results in \isa{{\isasymlbrakk}P{\isacharsemicolon}\ Q{\isasymrbrakk}\ {\isasymLongrightarrow}\ P\ {\isasymand}\ Q}.
   133 
   133 
   134 This \verb!no_vars! business can become a bit tedious.
   134 This \verb!no_vars! business can become a bit tedious.
   135 If you would rather never see question marks, simply put
   135 If you would rather never see question marks, simply put
   136 \begin{verbatim}
   136 \begin{verbatim}
   137 reset show_var_qmarks;
   137 reset show_question_marks;
   138 \end{verbatim}
   138 \end{verbatim}
   139 at the beginning of your file \texttt{ROOT.ML}.
   139 at the beginning of your file \texttt{ROOT.ML}.
   140 The rest of this document is produced with this flag reset.%
   140 The rest of this document is produced with this flag reset.%
   141 \end{isamarkuptext}%
   141 \end{isamarkuptext}%
   142 \isamarkuptrue%
   142 \isamarkuptrue%
   377 
   377 
   378   \begin{quote}
   378   \begin{quote}
   379     \verb!setup {!\verb!*!\\
   379     \verb!setup {!\verb!*!\\
   380     \verb!let!\\
   380     \verb!let!\\
   381     \verb!  fun my_lhs ctxt (Const ("==", _) $ t $ _) = t!\\
   381     \verb!  fun my_lhs ctxt (Const ("==", _) $ t $ _) = t!\\
   382     \verb!    | my_lhs ctxt (Const ("Trueprop", _) $ t) = my_lhs t!\\
   382     \verb!    | my_lhs ctxt (Const ("Trueprop", _) $ t) = my_lhs ctxt t!\\
   383     \verb!    | my_lhs ctxt (Const ("==>", _) $ _ $ t) = my_lhs t!\\
   383     \verb!    | my_lhs ctxt (Const ("==>", _) $ _ $ t) = my_lhs ctxt t!\\
   384     \verb!    | my_lhs ctxt (_ $ t $ _) = t!\\
   384     \verb!    | my_lhs ctxt (_ $ t $ _) = t!\\
   385     \verb!    | my_lhs ctxt _ = error ("Binary operator expected")!\\
   385     \verb!    | my_lhs ctxt _ = error ("Binary operator expected")!\\
   386     \verb!  in [TermStyle.update_style "new_lhs" my_lhs]!\\
   386     \verb!  in [TermStyle.update_style "new_lhs" my_lhs]!\\
   387     \verb!end;!\\
   387     \verb!end;!\\
   388     \verb!*!\verb!}!\\
   388     \verb!*!\verb!}!\\