new environments for Proof General notes
authorpaulson
Wed, 25 May 2005 10:32:20 +0200
changeset 16072 d8a6afbb71ec
parent 16071 e0136cdef722
child 16073 794b37d08a2e
new environments for Proof General notes
doc-src/TutorialI/pgchest.pdf
doc-src/TutorialI/pghead.pdf
doc-src/TutorialI/tutorial.sty
Binary file doc-src/TutorialI/pgchest.pdf has changed
Binary file doc-src/TutorialI/pghead.pdf has changed
--- a/doc-src/TutorialI/tutorial.sty	Wed May 25 10:18:09 2005 +0200
+++ b/doc-src/TutorialI/tutorial.sty	Wed May 25 10:32:20 2005 +0200
@@ -109,14 +109,29 @@
 \def\_{\leavevmode\kern.06em\vbox{\hrule height.2ex width.3em}\hskip0.1em}
 
 
-%%%% ``WARNING'' environment
-\def\dbend{\vtop to 0pt{\vss\hbox{\Huge\bf!}\vss}}
+%%%% ``WARNING'' environment: 2 ! characters separated by negative thin space
+\def\warnbang{\vtop to 0pt{\vss\hbox{\Huge\bf!\!!}\vss}}
 \newenvironment{warn}{\medskip\medbreak\begingroup \clubpenalty=10000 
          \small %%WAS\baselineskip=0.9\baselineskip
          \noindent \hangindent\parindent \hangafter=-2 
-         \hbox to0pt{\hskip-\hangindent\dbend\hfill}\ignorespaces}%
+         \hbox to0pt{\hskip-\hangindent\warnbang\hfill}\ignorespaces}%
         {\par\endgroup\medbreak}
 
+%%%% ``PROOF GENERAL'' environment: full chest
+\def\pgchest{\lower3pt\vbox to 0pt{\vss\hbox{\includegraphics[width=12pt]{pgchest}}\vss}}
+\newenvironment{pgnote}{\medskip\medbreak\begingroup \clubpenalty=10000 
+         \small \noindent \hangindent\parindent \hangafter=-2 
+         \hbox to0pt{\hskip-\hangindent \pgchest\hfill}\ignorespaces}%
+  {\par\endgroup\medbreak}
+
+%%%% ``PROOF GENERAL'' environment: head only
+\def\pghead{\lower3pt\vbox to 0pt{\vss\hbox{\includegraphics[width=12pt]{pghead}}\vss}}
+\newenvironment{pgnoteh}{\medskip\medbreak\begingroup \clubpenalty=10000 
+         \small \noindent \hangindent\parindent \hangafter=-2 
+         \hbox to0pt{\hskip-\hangindent \pghead\hfill}\ignorespaces}%
+  {\par\endgroup\medbreak}
+
+
 
 %%%% Standard logical symbols
 \let\turn=\vdash