From 0fed233a8ca0ae49664e2115038508db416e65f1 Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Thu, 12 Jan 2006 23:55:55 +0000 Subject: fmp git-svn-id: svn://tug.org/texlive/trunk@925 c570f23f-e606-0410-a88d-b1316a301751 --- Master/texmf-dist/tex/latex/fmp/fmp.sty | 138 ++++++++++++++++++++++++++++++++ 1 file changed, 138 insertions(+) create mode 100644 Master/texmf-dist/tex/latex/fmp/fmp.sty (limited to 'Master/texmf-dist/tex/latex/fmp/fmp.sty') diff --git a/Master/texmf-dist/tex/latex/fmp/fmp.sty b/Master/texmf-dist/tex/latex/fmp/fmp.sty new file mode 100644 index 00000000000..8b6481d47ff --- /dev/null +++ b/Master/texmf-dist/tex/latex/fmp/fmp.sty @@ -0,0 +1,138 @@ +%% +%% This is file `fmp.sty', +%% generated with the docstrip utility. +%% +%% The original source files were: +%% +%% fmp.dtx (with options: `package') +%% +%% Copyright 2001 Marco Kuhlmann +%% +%% This program may be distributed and/or modified under the +%% conditions of the LaTeX Project Public License, either version +%% 1.2 of this license or (at your option) any later version. The +%% latest version of this license is in +%% +%% http://www.latex-project.org/lppl.txt +%% +%% and version 1.2 or later is part of all distributions of LaTeX +%% version 1999/12/01 or later. +%% +%% This program consists of the files fmp.ins and fmp.dtx +%% +\NeedsTeXFormat{LaTeX2e}[1995/05/16] +\ProvidesPackage{fmp} +[2001/11/19 v1.1a Support for Functional MetaPost] +\DeclareOption*{\PassOptionsToPackage{\CurrentOption}{graphicx}} +\ProcessOptions +\@ifundefined{pdfoutput}{% + \RequirePackage{graphicx}[1999/02/16]% + \DeclareGraphicsRule{*}{eps}{*}{}}{% + \RequirePackage[pdftex]{graphicx}[1994/12/15]% + \DeclareGraphicsRule{*}{mps}{*}{}} +\RequirePackage{verbatim} +\newwrite\fmp@sourceout +\newwrite\fmp@scriptout +\newif\iffmp@sourceio +\fmp@sourceiofalse +\newif\iffmp@scriptio +\fmp@scriptiofalse +\newcounter{fmpfigure} +\newenvironment*{fmp}{}{} +\def\fmp{% + \begingroup + \@bsphack + \let\do\@makeother\dospecials + \catcode`\^^M\active + \def\verbatim@processline{\fmp@sourcewrite{\the\verbatim@line}}% + \verbatim@start} +\def\endfmp{% + \@esphack + \endgroup} +\def\fmp@sourcewrite#1{% + \iffmp@sourceio \else \global\fmp@sourceiotrue\fmp@sourceopen \fi% + \immediate\write\fmp@sourceout{#1}} +\def\fmp@sourceopen{% + \immediate\openout\fmp@sourceout\fmp@sourcefilename% + \edef\@tempa{\the\fmp@sourcepreamble}% + \immediate\write\fmp@sourceout{\@tempa}} +\newcommand*{\fmpsourcefilename}[1]{% + \gdef\fmp@sourcefilename{#1}} +\@onlypreamble{\fmpsourcefilename} +\def\fmp@sourcefilename{\jobname.hs} +\newtoks\fmp@sourcepreamble +\newcommand*{\fmpsourcepreamble}[1]{% + \global\fmp@sourcepreamble={#1}} +\@onlypreamble{\fmpsourcepreamble} +\newcommand*{\fmpaddtosourcepreamble}[1]{% + \fmp@sourcepreamble=\expandafter{\the\fmp@sourcepreamble#1}} +\@onlypreamble{\fmpaddtosourcepreamble} +\fmp@sourcepreamble={-- This is file `\fmp@sourcefilename', + created automatically. Do not edit!^^J} +\def\fmp@sourceclose{% + \iffmp@sourceio + \edef\@tempa{\the\fmp@sourcepostamble}% + \fmp@sourcewrite{\@tempa}% + \immediate\closeout\fmp@sourceout + \fi} +\AtEndDocument{\fmp@sourceclose} +\newtoks\fmp@sourcepostamble +\newcommand*{\fmpsourcepostamble}[1]{% + \global\fmp@sourcepostamble={#1}} +\@onlypreamble{\fmpsourcepostamble} +\newcommand*{\fmpaddtosourcepostamble}[1]{% + \fmp@sourcepostamble=\expandafter{\the\fmp@sourcepostamble#1}} +\@onlypreamble{\fmpaddtosourcepostamble} +\fmp@sourcepostamble={^^J-- End of file `\fmp@sourcefilename'} +\newcommand*{\fmpfigure}[2][]{% + \fmp@scriptwrite{% + generate "\fmp@figurebasename" \thefmpfigure\space #2}% + \fmp@includegraphics{#1}{\fmp@figurebasename}{\thefmpfigure}% + \refstepcounter{fmpfigure}} +\def\fmp@scriptwrite#1{% + \iffmp@scriptio \else \global\fmp@scriptiotrue\fmp@scriptopen \fi% + \immediate\write\fmp@scriptout{#1}} +\def\fmp@scriptopen{% + \immediate\openout\fmp@scriptout\fmp@scriptfilename% + \edef\@tempa{\the\fmp@scriptpreamble}% + \immediate\write\fmp@scriptout{\@tempa}} +\newtoks\fmp@scriptpreamble +\newcommand*{\fmpscriptpreamble}[1]{% + \global\fmp@scriptpreamble={#1}} +\@onlypreamble{\fmpscriptpreamble} +\newcommand*{\fmpaddtoscriptpreamble}[1]{% + \fmp@scriptpreamble=\expandafter{\the\fmp@scriptpreamble#1}} +\@onlypreamble{\fmpaddtoscriptpreamble} +\fmp@scriptpreamble={hugs \fmp@sourcefilename\space <