summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/generic/vaucanson-g/vaucanson-g.sty
blob: 33c6513dbc28b3af36ed7eeac5b05a3a4b6bfce8 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%
%% Package `VauCanSon-G'  version 0.4
%%
%% This is file `vaucanson-g.sty'.
%%
%% IMPORTANT NOTICE:
%%
%% Copyright (C) 2002-2008 Sylvain Lombardy and Jacques Sakarovitch
%%
%% This package may be distributed under the terms of the LaTeX Project
%% Public License, as described in lppl.txt in the base LaTeX distribution.
%% Either version 1.0 or, at your option, any later version.
%%
%% DESCRIPTION:
%%
%%   `vaucanson-g.sty' is the wrapper for the package `VauCanSon-G'
%%  
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\ProvidesPackage{vaucanson-g}%
   [2008/10/27 package wrapper for VauCanSon-G  v. 0.4]
   \def\fileversion{0.4}
   \def\filedate{2008/10/27}
\DeclareOption{default}{} % default option 
\DeclareOption{slides}{\AtEndOfPackage{\input VCPref-slides.tex}}
\DeclareOption{beamer}{\AtEndOfPackage{\input VCPref-beamer.tex}}  
% next is preparation for a user defined style file 
\DeclareOption{mystyle}{\AtEndOfPackage{\input VCPref-mystyle.tex}}  
%%%% option for compatibility with 0.3 (thanks, Akim, for the option) 
\DeclareOption{pstricks1-10}{} % explicit option is now unnecessary
\ProcessOptions
%%%%
\RequirePackage{ifthen}
\RequirePackage[pst]{xcolor}
% compatibility with older version of xcolor
\input{VCColor-names.def}  
% 
\RequirePackage{pstricks}
% PSTricks 1.10 changed \scalebox.  Compatibility hack.
\@ifpackagelater{pstricks}{2005/08/20}%
   {\def\scalebox{\psscalebox}}{}%
\RequirePackage{pst-node}
\RequirePackage{pst-plot}
\RequirePackage{pst-coil}
\RequirePackage{multido}
\RequirePackage{pst-3d}
\RequirePackage{calc}
\input Vaucanson-G.tex
% PSTricks 1.10 changed the interface.  Compatibility hack.
\@ifpackagelater{pstricks}{2005/08/20}
   {%
    \def\VaucProjectionOnSecondComponent(#1,#2)(#3,#4){#2}%
    \def\VaucProjectionOnFourthComponent(#1,#2)(#3,#4){#4}%
    \newlength{\VaucMinHeight}%
    \newlength{\VaucMaxHeight}%
    \renewenvironment{VCPicture}[2][.5]%
      {\settoheight{\VertShiftH}{$\{$}%
       \settodepth{\VertShiftD}{$\{$}%
       \setlength{\VertShift}{.5\VertShiftD-.5\VertShiftH}%
       \pssetlength{\VaucMinHeight}{\VaucProjectionOnSecondComponent#2}%
       \pssetlength{\VaucMaxHeight}{\VaucProjectionOnFourthComponent#2}%
       \addtolength{\VaucMinHeight}{-\VaucMaxHeight}%
       \begin{pspicture}[shift=#1\VaucMinHeight]#2%
       \ifVCFrame \FrameStyle \psframe#2\fi%
       \ifVCGrid \FrameStyle\GridStyle \psgrid#2\fi}%
      {\RstState\RstEdge\end{pspicture}}%
   }%
   {}
\input VCPref-default.tex % Initialization with default values
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\endinput