Hello

 I'm trying to compile the Demos writed by Denis Girou.
And there are some packages that I can't find.
 The File seminar.com use the next package:
    \usepackage{pst-fr3d}           % PSTricks 3D framed boxes
    \usepackage{pst-grad}           % PSTricks gradient mode
    \usepackage{pst-node}           % PSTricks nodes
    \usepackage{pst-slpe}           % Improved PSTricks gradients
    \usepackage{semcolor}           % Seminar colored slides
  and others.
For example the package   "pst-fr3d" I can't find.
 Do you now this class ??, Where I can download it??
Any one compile the demos of Denis Girou??

 Thanks
       Gusti
--
Regards.
gustavo halperin
_________________________________________
Laboratory for Computer Graphics and CAD
Faculty of Mechanical Engineering
Technion - Israel Institute of Technology
Haifa, Israel 32000

Tel:      972-4-829-2334
Fax:    972-4-829-5711
e-mail: [EMAIL PROTECTED] <mailto:[EMAIL PROTECTED]>
_________________________________________
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -*- Mode: Latex -*- %%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% sem-dem.sty --- General utility macros for these Seminar demonstration files
%%
%% Author          : Denis GIROU (CNRS/IDRIS - France) <[EMAIL PROTECTED]>
%% Created the     : Sun Dec  9 21:49:38 2001
%% Last mod. by    : Denis GIROU (CNRS/IDRIS - France) <[EMAIL PROTECTED]>
%% Last mod. the   : Fri Apr  5 21:02:35 2002
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

% Identification of the file (constant parameters)
\def\FileAuthor{Denis Girou}
\def\FileInfoA{Seminar demonstration files}
\def\FileName{\jobname}

% Write identification in the PDF file (if one will be generated)
\newcommand{\HyperSetUp}{%
\hypersetup{pdftitle={\FileInfoA{} - \FileInfoB},
            pdfsubject={\FileName{}
                        [\FileDate{} - Version \FileVersion]},
            pdfauthor={\FileAuthor},
            pdfkeywords={\FileInfoB{} PSTricks Seminar slides}}}

% Header/footer initialization
\def\SeminarStandardHeaderFooterDemos{%
\date{\HLa{\FileDate}}%
\SeminarStandardHeaderFooter
  {\LARGE\HLe{Demonstration of \MakeLowercase{\FileInfoB}}}
  {\HLa{\FileInfoA{} -- \FileInfoB}}
  {\HLa{Version \FileVersion{} -- }}
  {\HLe{\FileAuthor}}}

\SeminarStandardHeaderFooterDemos

% General first slide for all the demonstration files
\newcommand{\SeminarFirstSlide}{{%
\SeminarSlideFrameBackground{SeminarBackgroundSolid}
\begin{slide}
  \ifx\SeminarPaperVersion\AnswerYes
  \else
    \vspace*{\stretch{1}} % Due to the special annotation for full screen mode
  \fi

  \begin{center}
    \psframebox[fillstyle=solid,fillcolor=red,framearc=0.2]{%
      \Large\bfseries\color{yellow}
      \begin{tabular}{c}
        Seminar demonstration files\\
        [EMAIL PROTECTED] demonstration files}}%
        [EMAIL PROTECTED]
        [EMAIL PROTECTED]>[EMAIL PROTECTED]
          [EMAIL PROTECTED]
        \else
          [EMAIL PROTECTED]
        \fi
        \FileInfoB
      \end{tabular}}

    \vspace{1cm}
    \psframebox[fillstyle=solid,fillcolor=LightBlue,
                framesep=0.2,framearc=0.4]{%
      \bfseries
      \begin{tabular}{c}
        \FileAuthor\\
        \FileDate
      \end{tabular}}

    \ifx\SeminarPaperVersion\AnswerYes
    \else
      \vspace{\stretch{1}}
      \hfill%
      \rput[br](0.2,0){%
        \psframebox[linewidth=0.02,framesep=0.05]{%
          \footnotesize\bfseries
          \shortstack[l]{%
            With Acroread, \textcolor{red}{CTRL-L} switch\\[-1mm]
            between full screen and window mode}}}
    \fi
  \end{center}
\end{slide}}}

% List of slides
\newcommand{\SeminarListOfSlides}{{%
% Background changing
\ifx\SeminarColorVersion\AnswerYes
  \renewcommand{\SeminarBackgroundGradientColorBegin}{PaleGreen}%
  \renewcommand{\SeminarBackgroundGradientColorEnd}{green}%
  \renewcommand{\SeminarBackgroundGradientAngle}{-90}%
  \SeminarSlideFrameBackground{SeminarBackgroundGradient}
\fi
\renewcommand{\slidestretch}{0.7}% We compress the lines
\begin{slide}
  \listofslides
\end{slide}}}

\endinput
%%%%%%%%%%%%%%%%%%%%%%%%%%% -*- Mode: Latex -*- %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% seminar.con --- Customization of the Seminar document class.
%%                 We take care to do this for easy adaptations in other
%%                 institutions and contexts.
%%
%% Author          : Denis GIROU (CNRS/IDRIS - France) <[EMAIL PROTECTED]>
%% Created the     : 1993
%% Last mod. by    : Denis GIROU (CNRS/IDRIS - France) <[EMAIL PROTECTED]>
%% Last mod. the   : Wed Jun 19 19:31:03 2002
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

\def\FileVersion{3.1}
\def\FileDate{June 19, 2002}
\typeout{seminar.con file: example of customization of the Seminar
         document class^^J%
         (Version \FileVersion\space of <\FileDate> (D.G.))}

% Packages used
% -------------

% General packages (all are on CTAN)
\usepackage{calc}               % Simple computations with LaTeX variables
\usepackage[hang]{caption2}     % Improved captions
\usepackage{fancybox}           % To have several backgrounds
                                % (must be loaded before `fancyvrb')
\usepackage{fancyhdr}           % Headers and footers definitions
\usepackage{fancyvrb}           % Fancy verbatim environments
\usepackage{pstcol}             % PSTricks with the standard color package
                                % (before `graphicx' for the \scalebox macro)
\usepackage{graphicx}           % Standard graphics package
\usepackage{multido}            % General loop macro
\usepackage{pifont}             % Ding symbols (mainly for lists)
\usepackage{pst-fr3d}           % PSTricks 3D framed boxes
\usepackage{pst-grad}           % PSTricks gradient mode
\usepackage{pst-node}           % PSTricks nodes
\usepackage{pst-slpe}           % Improved PSTricks gradients
\usepackage{semcolor}           % Seminar colored slides
\usepackage{semhelv}            % Seminar helvetica fonts
\usepackage{semlayer}           % Seminar overlays
\usepackage{slidesec}           % Seminar sections and list of slides
\usepackage{thumbpdf}           % Thumbnails for PDF versions
\usepackage[breakwords]{truncate}% To truncate a string at a specified length
\usepackage{url}                % Convenient URL typesetting


[EMAIL PROTECTED]
[EMAIL PROTECTED]

[EMAIL PROTECTED]
  \input{seminar.bug}           % Official bugs corrections
  \input{seminar.bg2}           % Unofficial bugs corrections
                                % (warning: you must load `longtable' before
                                % if you use it)
\else
  \input{/usr/local/vtex/texmf/vtex/config/seminar.con}% Adjust this 
path%%%%%%%%%%%%%%%%%%%
  % As VTeX does not support the HSB color model, we make it identical
  % to the RGB one. This will obviously produce strange color results,
  % but this will allow to compile the sources using here our
  % \PstFrameBoxThreeD macro.
  [EMAIL PROTECTED]@lor@@hsb#2\@@#1}
  [EMAIL PROTECTED]@@hsb#1,#2,#3\@@#4{%
  % From the VTeX [EMAIL PROTECTED]@@rgb definition
  [EMAIL PROTECTED]
  [EMAIL PROTECTED]@[EMAIL PROTECTED]
  [EMAIL PROTECTED]
  [EMAIL PROTECTED]@[EMAIL PROTECTED]
  [EMAIL PROTECTED]
  [EMAIL PROTECTED]@[EMAIL PROTECTED]
  \edef#4{c"[EMAIL PROTECTED]@[EMAIL PROTECTED]@[EMAIL PROTECTED]@c}}%
\fi

% Compatibility patch between `pst-key' and the \RequirePackage macro
% to avoid later a LaTeX warning about the version of `keyval'
% From pst-key.tex
[EMAIL PROTECTED]
% D.G. modification begin - Apr. 25, 2002
%       \expandafter\let\csname [EMAIL PROTECTED]
       \expandafter\xdef\csname [EMAIL PROTECTED]
% D.G. modification end
       \wlog{keyval: #1}}\next
                 [1998/07/23 v1.11 key=value parser (DPC)]

\usepackage[pdffitwindow=true,colorlinks=true,pdfpagemode=UseNone,
            bookmarks=true]{hyperref} % Hyperlinks for PDF versions
                              % (to load after `slidesec', seminar.bg2, etc.)

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

% Definition of new colors
% ------------------------

\definecolor{Apricot}     {cmyk}{0,0.32,0.52,0}
\definecolor{Aquamarine}  {cmyk}{0.82,0,0.30,0}
\definecolor{CadetBlue}   {cmyk}{0.62,0.57,0.23,0}
\definecolor{DarkGray}    {gray}{0.2}
\definecolor{DarkGreen}   {rgb}{0,0.5,0}
\definecolor{ForestGreen} {cmyk}{0.91,0,0.88,0.12}
\definecolor{Gold}        {rgb}{1.,0.84,0.}
\definecolor{Goldenrod}   {cmyk}{0,0.10,0.84,0}
\definecolor{IndianRed}   {rgb}{0.8,0.36,0.36}
\definecolor{Lavender}    {cmyk}{0,0.48,0,0}
\definecolor{LemonChiffon}{rgb}{1.,0.98,0.8}
\definecolor{LightBlue}   {rgb}{0.68,0.85,0.9}
\definecolor{LightCyan}   {rgb}{0.88,1.,1.}
\definecolor{LightGray}   {gray}{0.92}
\definecolor{LightYellow} {rgb}{1.,1.,0.88}
\definecolor{Melon}       {cmyk}{0,0.46,0.50,0}
\definecolor{NavyBlue}    {cmyk}{0.94,0.54,0,0}
\definecolor{Orange}      {rgb}{1.,0.65,0.}
\definecolor{PaleGreen}   {rgb}{0.6,0.98,0.6}
\definecolor{PaleGreenB}  {rgb}{0.9,1,0.9}
\definecolor{Peach}       {cmyk}{0,0.50,0.70,0}
\definecolor{PeachPuff}   {rgb}{1.0,0.85,0.73}
\definecolor{PineGreen}   {cmyk}{0.92,0,0.59,0.25}
\definecolor{Pink}        {rgb}{1.,0.75,0.8}
\definecolor{RoyalBlue}   {cmyk}{1,0.50,0,0}
\definecolor{SeaGreen}    {cmyk}{0.69,0,0.50,0}
\definecolor{Salmon}      {cmyk}{0,0.53,0.38,0}
\definecolor{Sepia}       {cmyk}{0,0.83,1,0.70}
\definecolor{SlateBlue}   {rgb}{0.42,0.35,0.8}
\definecolor{Thistle}     {rgb}{0.85,0.75,0.85}
\definecolor{Turquoise}   {cmyk}{0.85,0,0.20,0}
\definecolor{Violet}      {cmyk}{0.79,0.88,0,0}
\definecolor{YellowOrange}{cmyk}{0,0.42,1,0}

% Definition of the (La)TeX string
\newcommand{\AllTeX}{%
{\textrm{(L\kern-.36em\raise.3ex\hbox{\textsc{%
a}}\kern-.05em)T\kern-.1667em\lower.7ex\hbox{E}\kern-.125emX}}}

% "dinglist" environment
% Redefinition of it to be able to use colored symbols
\renewenvironment{dinglist}[2][black]
{\begin{list}{\ding{#2}}{}}{\end{list}}
% Symbol definitions for these lists
\newcommand{\DingListSymbolA}{43}
\newcommand{\DingListSymbolB}{243}
\newcommand{\DingListSymbolC}{224}
\newcommand{\DingListSymbolD}{219}

% Captions customizations
\setlength{\abovecaptionskip}{1.5mm}

% Centered paragraph title
\newcommand{\CenteredParagraphTitle}[2][LemonChiffon]{%
\centerline{\psshadowbox[fillstyle=solid,fillcolor=#1]{\large\HLe{#2}}}}

% Paragraph title
\newcommand{\ParagraphTitle}[2][LemonChiffon]{%
\noindent\psshadowbox[fillstyle=solid,fillcolor=#1]{\large\HLe{#2}}}

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

% `fancyvrb' customizations
% -------------------------

% Customized "Verbatim" environment
\RecustomVerbatimEnvironment{Verbatim}{Verbatim}
{commandchars=���,fontfamily=tt,frame=single,numbersep=2pt,framerule=0.15mm}

% "OutputResults" environment to emphasize program outputs
\DefineVerbatimEnvironment{OutputResults}{Verbatim}
{commandchars=���,fontfamily=tt,frame=single,numbers=none,
rulecolor=\color{blue},framerule=1mm}

% Not inside the preceding environments themselves, to allow
% local redefinitions
\fvset{baselinestretch=0.9,fontsize=\small,numbers=left}

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

% Seminar macros redefinitions
% ----------------------------

% We redefine the format of entries of the list of slides
\def\listofslides{%
  \hfuzz=7pt                    % To avoid the "Overfull \hbox" messages
  [EMAIL PROTECTED]
    [EMAIL PROTECTED] -- \hyperlink{##4}{##2}}%
                      {\slidenumberline{##3}}}%
  [EMAIL PROTECTED]
    [EMAIL PROTECTED] -- \hyperlink{##4}{##2}}%
                      {\slidenumberline{##3}}}%
  [EMAIL PROTECTED]

[EMAIL PROTECTED]@dottedtocline{1}{1.5em}{2.3em}}

[EMAIL PROTECTED]
  [EMAIL PROTECTED]
  \addtocontents{los}{%
% D.G. modification begin - Jan.  2, 2002
%    [EMAIL PROTECTED]@slidesubsection}{\ignorespaces#1}%
    [EMAIL PROTECTED]@[EMAIL PROTECTED]
                       {\ignorespaces#1}%
% D.G. modification end
      [EMAIL PROTECTED]
  }%
  [EMAIL PROTECTED]
  [EMAIL PROTECTED]@empty
  \else
    {%
      [EMAIL PROTECTED]
        \csname [EMAIL PROTECTED]
      }%
      \makeslidesubheading{#2}%
    }%
  \fi
  \gdef\theslidesubheading{#1}%
  [EMAIL PROTECTED]
    [EMAIL PROTECTED]
      \hyper@@anchor{slideheading.\theslidesubsection}{\relax}%
      [EMAIL PROTECTED]
        {\theslidesubsection}%
        {#1}%
        {slideheading.\theslidesubsection}%
        {2}%
        {toc}%
    \else
      \hyper@@anchor{slideheading.\theHslidesubsection}{\relax}%
      [EMAIL PROTECTED]
        {\theslidesubsection}%
        {#1}%
        {slideheading.\theHslidesubsection}%
        {2}%
        {toc}%
    \fi
  \else
    [EMAIL PROTECTED]@linkcounter
    \hyper@@[EMAIL PROTECTED]
    [EMAIL PROTECTED]
      {\theslidesubsection}%
      {#1}%
      [EMAIL PROTECTED]
      {1}%
      {toc}%
  \fi
}%

% We will need, for demonstration purposes, to define sections and subsections
% without putting them in the list of slides
\def\SlideHeadingsNoListOfSlides{%
[EMAIL PROTECTED]
  \refstepcounter{slidesection}%
  [EMAIL PROTECTED]
% D.G. modification begin - Feb. 22, 2002
%  [EMAIL PROTECTED]
%    [EMAIL PROTECTED]@SCTR}}%
% D.G. modification end
  [EMAIL PROTECTED]
  [EMAIL PROTECTED]@empty\else
    [EMAIL PROTECTED] [EMAIL PROTECTED]
      \makeslideheading{##2}}%
  \fi
  \gdef\theslideheading{##1}%
  \gdef\theslidesubheading{}}
%
[EMAIL PROTECTED]
  \refstepcounter{slidesubsection}%
% D.G. modification begin - Feb. 22, 2002
%  [EMAIL PROTECTED]
%    [EMAIL PROTECTED]@SCTR}}%
% D.G. modification end
  [EMAIL PROTECTED]
  [EMAIL PROTECTED]@empty\else
    [EMAIL PROTECTED] [EMAIL PROTECTED]
      \theslidesubsection}\makeslidesubheading{##2}}%
  \fi
  \gdef\theslidesubheading{##1}}}

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

% Seminar customizations
% ----------------------

% No default frame (really useful for old plastic slides only)
\slideframe{none}

% To center horizontally the headers and footers (see seminar.bug)
\renewcommand{\headwidth}{\textwidth}

% To adjust the frame length to the header and footer ones
% \autoslidemarginstrue

% Headers and footers, using the `fancyhdr' package

\slidepagestyle{fancy}

\newcommand{\SeminarHeader}[1]{\fancyhead[C]{\Large\textbf{\HLe{#1}}}}

\newcommand{\SeminarStandardHeaderFooter}[4]{%
\fancyhf{}%
\fancyhead[R]{\theslide}
\SeminarHeader{#1}
\fancyfoot[L]{\raisebox{2.5mm}{\textbf{#2}}}
\fancyfoot[R]{\raisebox{3mm}{\scriptsize#3 [EMAIL PROTECTED]
              {\tiny\textbf{#4}}}%
% Change of the width of header and footer rules
\def\headrulewidth{0.15mm}%
\def\footrulewidth{0.15mm}%
% Redefinition of the head line separator to have a double one
\def\headrule{%
[EMAIL PROTECTED]
[EMAIL PROTECTED]@width\headwidth \vskip 0.5mm
[EMAIL PROTECTED]@width\headwidth \vskip -1mm}}

% Customization of the headings and subheadings
\renewcommand{\makeslideheading}[1]{%
\CenteredParagraphTitle[red]{%
\textcolor{white}{\textbf{\theslidesection{} -- #1}}}}
\renewcommand{\makeslidesubheading}[1]{%
\CenteredParagraphTitle{\theslidesubsection{} -- #1}}

% For automatic definition of headers
% ("Number - chapter : sub-chapter" or "Number - chapter" if no sub-chapter)
% (we also suppress the first uppercase letter of the sub-chapter name,
% if the optional "AsIs" keyword is not specified)
\def\AsIs{AsIs}
[EMAIL PROTECTED]: }
\newcommand{\SeminarStandardHeader}[1][]{%
\SeminarHeader{%
\ifx\theslidesubheading\empty
  \theslidesection{} -- \theslideheading%
\else
  [EMAIL PROTECTED]
  [EMAIL PROTECTED]
    \theslidesection{} -- [EMAIL PROTECTED]
                            \theslidesubheading%
  \else
    \theslidesection{} -- [EMAIL PROTECTED] %
      [EMAIL PROTECTED]
  \fi
\fi}}

[EMAIL PROTECTED]@[EMAIL PROTECTED]
[EMAIL PROTECTED]@nil{\MakeLowercase{#1}#2}

% Outline of the presentation
\newcommand{\SeminarOutlinePresentation}[4]{%
\ifx\SeminarColorVersion\AnswerYes
  \begingroup
    \SeminarHeader{#1}%
    \def\SeminarOutlinePresentationBoolean{true}%
    \renewcommand{\SeminarBackgroundCompositeColorFirst}{#2}%
    \renewcommand{\SeminarBackgroundCompositeColorSecond}{#3}%
    \SeminarSlideFrameBackground{SeminarBackgroundCompositeE}%
    [EMAIL PROTECTED]
    [EMAIL PROTECTED] by 35mm
    [EMAIL PROTECTED]
    \setlength{\slidewidth}{289mm}%
    \addtolength{\slidewidth}{-\slideleftmargin}%
    \addtolength{\slidewidth}{-\sliderightmargin}%
    \renewcommand{\slidestretch}{0}% To compact the list
    \begin{slide}
      \begingroup
        \hypersetup{linkcolor=#4}%
        \Slidecontents
      \endgroup
    \end{slide}
  \endgroup
\fi}

% Backgrounds
% -----------

% Solid backgrounds
% �����������������

% Default color
\newcommand{\SeminarBackgroundSolidColor}{PeachPuff}

\SeminarNewSlideFrameBackground{SeminarBackgroundSolid}{%
\psframe[linestyle=none,fillstyle=solid,fillcolor=\SeminarBackgroundSolidColor]
        (\SeminarPaperHeight,\SeminarPaperWidth)}

% Gradient backgrounds
% ��������������������

% Default begin color, end color, angle and middle point
\newcommand{\SeminarBackgroundGradientColorBegin}{LightYellow}
\newcommand{\SeminarBackgroundGradientColorEnd}{Gold}
\newcommand{\SeminarBackgroundGradientAngle}{0}
\newcommand{\SeminarBackgroundGradientMidPoint}{0}

\SeminarNewSlideFrameBackground{SeminarBackgroundGradient}{%
\psframe[linestyle=none,fillstyle=gradient,
         gradangle=\SeminarBackgroundGradientAngle,
         gradmidpoint=\SeminarBackgroundGradientMidPoint,
         gradbegin=\SeminarBackgroundGradientColorBegin,
         gradend=\SeminarBackgroundGradientColorEnd]
        (\SeminarPaperHeight,\SeminarPaperWidth)}

% Default slope style, steps and center
\newcommand{\SeminarBackgroundGradientSlopeStyle}{radslope}
\newcommand{\SeminarBackgroundGradientSlopeSteps}{300}
\newcommand{\SeminarBackgroundGradientSlopeCenter}{0.5 0.5}
\newcommand{\SeminarBackgroundGradientSlopeAngle}{0}
\newcommand{\SeminarBackgroundGradientSlopeRadius}{0}

\SeminarNewSlideFrameBackground{SeminarBackgroundGradientSlope}{%
\psframe[linestyle=none,fillstyle=\SeminarBackgroundGradientSlopeStyle,
         slopebegin=\SeminarBackgroundGradientColorBegin,
         slopeend=\SeminarBackgroundGradientColorEnd,
         slopesteps=\SeminarBackgroundGradientSlopeSteps,
         slopecenter=\SeminarBackgroundGradientSlopeCenter,
         slopeangle=\SeminarBackgroundGradientSlopeAngle,
         sloperadius=\SeminarBackgroundGradientSlopeRadius]
        (\SeminarPaperHeight,\SeminarPaperWidth)}

% Composite backgrounds
% ���������������������

% Default colors
\newcommand{\SeminarBackgroundCompositeColorFirst}{LightBlue}
\newcommand{\SeminarBackgroundCompositeColorSecond}{NavyBlue}
\newcommand{\SeminarBackgroundCompositeColorThird}{RoyalBlue}

% Utility macros for the composite backgrounds

[EMAIL PROTECTED]

% The recursion macro used (from David Carlisle)
\def\Recursion #1{%
#1\relax
  [EMAIL PROTECTED]
\else
  [EMAIL PROTECTED]
\fi}

% General definition of a fractal
\def\PstFractal#1{%
\ifx\PstFractalBegin\undefined
\else
  \PstFractalBegin
\fi
\Recursion
  {\ifnum#1>[EMAIL PROTECTED]
  [EMAIL PROTECTED]
   [EMAIL PROTECTED]@ne
   [EMAIL PROTECTED]
  {\PstFractalDefinition}}

\def\PstSpiralSquare#1{%
\def\PstFractalDefinition{\psframe(1,1)}%
\def\PstFractalBegin{\PstFractalDefinition}%
\def\PstFractalRepeat##1{%
  % sqrt(0.2^2 + (1-0.2)^2)=0.824621
  % arcsin(0.2/0.824621)=14.036246
  \rput{-14.036246}(0,0.2){\psset{unit=0.824621}\PstFractal{##1}}}%
\pspicture(1,1)
  \PstFractal{#1}
\endpspicture}

% Composite background A
\SeminarNewSlideFrameBackground{SeminarBackgroundCompositeA}{{%
\psframe[linestyle=none,
         fillstyle=solid,fillcolor=\SeminarBackgroundCompositeColorFirst]
        (\SeminarPaperHeight,\SeminarPaperWidth)%
\rput(4truemm,190truemm){%
  \psframe[linestyle=none,fillstyle=gradient,gradmidpoint=1,gradangle=90,
           gradbegin=\SeminarBackgroundCompositeColorSecond,
           gradend=\SeminarBackgroundCompositeColorFirst](8,0.2)}}
\rput(293truemm,14truemm){%
  \psframe[linestyle=none,fillstyle=gradient,gradmidpoint=1,gradangle=90,
           gradbegin=\SeminarBackgroundCompositeColorFirst,
           gradend=\SeminarBackgroundCompositeColorSecond](-8,0.2)}}

% Composite background B
\SeminarNewSlideFrameBackground{SeminarBackgroundCompositeB}{{%
\psframe[linestyle=none,
         fillstyle=solid,fillcolor=\SeminarBackgroundCompositeColorFirst]
        (\SeminarPaperHeight,\SeminarPaperWidth)%
\rput(4truemm,190truemm){%
  \psframe[linestyle=none,fillstyle=gradient,gradmidpoint=1,gradangle=90,
           gradbegin=\SeminarBackgroundCompositeColorSecond,
           gradend=\SeminarBackgroundCompositeColorFirst](-0.1,0)(5,0.2)
  \psframe[linestyle=none,fillstyle=gradient,gradmidpoint=1,
           gradbegin=\SeminarBackgroundCompositeColorSecond,
           gradend=\SeminarBackgroundCompositeColorFirst](-0.1,0.03)(0.1,-5)}}
\rput(293truemm,14truemm){%
  \psframe[linestyle=none,fillstyle=gradient,gradmidpoint=1,gradangle=90,
           gradbegin=\SeminarBackgroundCompositeColorFirst,
           gradend=\SeminarBackgroundCompositeColorSecond](-5,0.2)(0.1,0)
  \psframe[linestyle=none,fillstyle=gradient,gradmidpoint=1,
           gradbegin=\SeminarBackgroundCompositeColorFirst,
           gradend=\SeminarBackgroundCompositeColorSecond](-0.1,5)(0.1,0)}}

% Composite background C
\SeminarNewSlideFrameBackground{SeminarBackgroundCompositeC}{{%
\psframe[linestyle=none,
         fillstyle=solid,fillcolor=\SeminarBackgroundCompositeColorFirst]
        (\SeminarPaperHeight,\SeminarPaperWidth)}
\psset{xunit=1.3333,linecolor=\SeminarBackgroundCompositeColorSecond}%
[EMAIL PROTECTED]
[EMAIL PROTECTED]@
[EMAIL PROTECTED]
[EMAIL PROTECTED]@
\multido{\nLength=5.5+-0.2,\iAngle=0+1}{30}{%
  \rput{\iAngle}([EMAIL PROTECTED],[EMAIL PROTECTED]){%
    \psframe(-\nLength,-\nLength)(\nLength,\nLength)}}}

% Composite background D
\SeminarNewSlideFrameBackground{SeminarBackgroundCompositeD}{{%
\psset{linestyle=none,fillstyle=gradient,gradmidpoint=0}%
\psframe[gradbegin=\SeminarBackgroundCompositeColorFirst,
         gradend=\SeminarBackgroundCompositeColorSecond]
        (\SeminarPaperHeight,\SeminarPaperWidth)
\multips(4truemm,50truemm)(10truemm,30truemm){3}{%
  \psframe[gradbegin=\SeminarBackgroundCompositeColorSecond,
           gradend=\SeminarBackgroundCompositeColorFirst]
          (5truemm,180truemm)}
[EMAIL PROTECTED]
[EMAIL PROTECTED] -29truemm
\multips([EMAIL PROTECTED],0)(10truemm,-30truemm){3}{%
  \psframe[gradbegin=\SeminarBackgroundCompositeColorSecond,
           gradend=\SeminarBackgroundCompositeColorFirst]
          (5truemm,160truemm)}}}

% Composite background E
\SeminarNewSlideFrameBackground{SeminarBackgroundCompositeE}{{%
\psset{linestyle=none,fillstyle=gradient,gradmidpoint=0.5}%
\psframe[gradbegin=\SeminarBackgroundCompositeColorFirst,
         gradend=\SeminarBackgroundCompositeColorSecond]
        (\SeminarPaperHeight,\SeminarPaperWidth)
\psframe[gradbegin=\SeminarBackgroundCompositeColorSecond,
         gradend=\SeminarBackgroundCompositeColorFirst]
        (5truemm,0)(35truemm,\SeminarPaperWidth)
\multips(10truemm,10truemm)(0,20truemm){11}{%
  \psframe[gradangle=90,
           gradbegin=\SeminarBackgroundCompositeColorFirst,
           gradend=\SeminarBackgroundCompositeColorSecond]
          (20truemm,10truemm)}}}

% Composite background F
\SeminarNewSlideFrameBackground{SeminarBackgroundCompositeF}{{%
\psset{linestyle=none,fillstyle=gradient,gradmidpoint=1,gradangle=90}%
\psframe[gradbegin=\SeminarBackgroundCompositeColorFirst,
         gradend=\SeminarBackgroundCompositeColorSecond]
        (\SeminarPaperHeight,\SeminarPaperWidth)
[EMAIL PROTECTED]
[EMAIL PROTECTED] -15truemm
\psframe[gradbegin=\SeminarBackgroundCompositeColorSecond,
         gradend=\SeminarBackgroundCompositeColorFirst]
        (0,[EMAIL PROTECTED])(\SeminarPaperHeight,\SeminarPaperWidth)
\psframe[gradbegin=\SeminarBackgroundCompositeColorSecond,
         gradend=\SeminarBackgroundCompositeColorFirst]
        (0,0)(\SeminarPaperHeight,15truemm)}}

% Composite background G
\SeminarNewSlideFrameBackground{SeminarBackgroundCompositeG}{{%
\psset{linestyle=none,fillstyle=gradient,gradmidpoint=0,gradangle=30}%
\psframe[gradbegin=\SeminarBackgroundCompositeColorFirst,
         gradend=\SeminarBackgroundCompositeColorSecond]
        (\SeminarPaperHeight,\SeminarPaperWidth)
[EMAIL PROTECTED]
[EMAIL PROTECTED] -15truemm
\psframe[gradbegin=\SeminarBackgroundCompositeColorSecond,
         gradend=\SeminarBackgroundCompositeColorFirst]
        (15truemm,-15truemm)(\SeminarPaperHeight,[EMAIL PROTECTED])
\psframe[gradbegin=\SeminarBackgroundCompositeColorFirst,
         gradend=\SeminarBackgroundCompositeColorSecond]
        (15truemm,0)(\SeminarPaperHeight,15truemm)}}

% Composite background H
\SeminarNewSlideFrameBackground{SeminarBackgroundCompositeH}{{%
\psset{linestyle=none,fillstyle=gradient,gradmidpoint=1}%
\psframe[gradangle=0,gradbegin=\SeminarBackgroundCompositeColorFirst,
         gradend=\SeminarBackgroundCompositeColorSecond]
        (17mm,\SeminarPaperWidth)
[EMAIL PROTECTED]
[EMAIL PROTECTED] -15mm
\psframe[gradangle=90,gradbegin=\SeminarBackgroundCompositeColorFirst,
         gradend=\SeminarBackgroundCompositeColorSecond]
        (0,[EMAIL PROTECTED])(\SeminarPaperHeight,\SeminarPaperWidth)
[EMAIL PROTECTED] 5mm
\psframe*[linecolor=white,framearc=0.3](12mm,-20mm)(300mm,[EMAIL PROTECTED])
[EMAIL PROTECTED] -5mm
\psline[linestyle=solid,linewidth=0.3]{c-c}(4mm,[EMAIL PROTECTED])(90mm,[EMAIL 
PROTECTED])}}

% Composite background I
\SeminarNewSlideFrameBackground{SeminarBackgroundCompositeI}{{%
\psset{linestyle=none,unit=15,fillstyle=gradient,gradmidpoint=0,
       gradbegin=\SeminarBackgroundCompositeColorSecond,
       gradend=\SeminarBackgroundCompositeColorFirst}%
[EMAIL PROTECTED]
[EMAIL PROTECTED]@
[EMAIL PROTECTED]
[EMAIL PROTECTED]@
\rput([EMAIL PROTECTED],[EMAIL PROTECTED]){\PstSpiralSquare{15}}}}

% Composite background J

% Sierpinski carpet
\newcommand{\PstSierpinskiCarpet}[1]{{%
\def\PstFractalDefinition{%
  \psframe(1,1)
  \psframe[fillstyle=solid,fillcolor=white](0.3333,0.3333)(0.6667,0.6667)}%
\def\PstFractalBegin{\PstFractalDefinition}%
\def\PstFractalRepeat##1{%
  \rput(0,0){\psset{xunit=0.3333,yunit=0.3333}\PstFractal{##1}}
  \rput(0.3333,0){\psset{xunit=0.3333,yunit=0.3333}\PstFractal{##1}}
  \rput(0.6667,0){\psset{xunit=0.3333,yunit=0.3333}\PstFractal{##1}}
  \rput(0,0.3333){\psset{xunit=0.3333,yunit=0.3333}\PstFractal{##1}}
  \rput(0.6667,0.3333){\psset{xunit=0.3333,yunit=0.3333}\PstFractal{##1}}
  \rput(0,0.6667){\psset{xunit=0.3333,yunit=0.3333}\PstFractal{##1}}
  \rput(0.3333,0.6667){\psset{xunit=0.3333,yunit=0.3333}\PstFractal{##1}}
  \rput(0.6667,0.6667){\psset{xunit=0.3333,yunit=0.3333}\PstFractal{##1}}}%
\psset{dimen=middle}%
\pspicture(1,1)
  \PstFractal{#1}
\endpspicture}}

\SeminarNewSlideFrameBackground{SeminarBackgroundCompositeJ}{{%
\psset{linestyle=none,xunit=\SeminarPaperHeight,yunit=\SeminarPaperWidth,
       fillstyle=solid,fillcolor=\SeminarBackgroundCompositeColorFirst}%
[EMAIL PROTECTED]
[EMAIL PROTECTED]@
[EMAIL PROTECTED]
[EMAIL PROTECTED]@
\rput([EMAIL PROTECTED],[EMAIL PROTECTED]){\PstSierpinskiCarpet{3}}}}

% Composite background K

% Sierpinski triangle
\newcommand{\PstSierpinskiTriangle}[1]{{%
\def\PstFractalDefinition{%
  \pspolygon(1;0)(1;1)(1;2)
  \rput{-2}(0,0){\pspolygon(0.5;0.5)(0.5;1.5)(0.5;2.5)}}%
\def\PstFractalBegin{\PstFractalDefinition}%
\def\PstFractalRepeat##1{%
  \rput(0.5;0){\psset{unit=0.5}\PstFractal{##1}}
  \rput(0.5;1){\psset{unit=0.5}\PstFractal{##1}}
  \rput(0.5;2){\psset{unit=0.5}\PstFractal{##1}}}%
\rput{90}(0,0){%
  \SpecialCoor
  \degrees[3]
  \psset{dimen=middle}%
  \PstFractal{#1}}}}

\SeminarNewSlideFrameBackground{SeminarBackgroundCompositeK}{{%
\NormalCoor                     % Needed when \SpecialCoor is currently active
\psset{linestyle=none,unit=6.8,fillstyle=gradient,gradmidpoint=0,
       gradbegin=\SeminarBackgroundCompositeColorSecond,
       gradend=\SeminarBackgroundCompositeColorFirst}%
[EMAIL PROTECTED]
[EMAIL PROTECTED]@
[EMAIL PROTECTED]
[EMAIL PROTECTED]@
[EMAIL PROTECTED] -35truemm
\rput([EMAIL PROTECTED],[EMAIL PROTECTED]){\PstSierpinskiTriangle{4}}}}

% Backgrounds with external images
% ��������������������������������

% With image file name
\newcommand{\SeminarBackgroundImageAngle}{0}
\newcommand{\SeminarBackgroundImageFile}{Undefined}

\SeminarNewSlideFrameBackground{SeminarBackgroundImage}{{%
[EMAIL PROTECTED]
[EMAIL PROTECTED]@
[EMAIL PROTECTED]
[EMAIL PROTECTED]@
\rput([EMAIL PROTECTED],[EMAIL PROTECTED]){%
  \includegraphics[angle=\SeminarBackgroundImageAngle,
                   width=\SeminarPaperHeight,height=\SeminarPaperWidth]
                  {\SeminarBackgroundImageFile}}}}

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

% To choice color or black and white version
% ------------------------------------------

% Note: we do not use booleans because we want to manage three states:
% true, false and undefined. We must be able to force the value in front
% of the file, before the \documentclass macro. If this is not done,
% a question will be asked interactively (this can be falsely interactivity,
% using for instance a command like "echo y | latex ..." on Unix systems)

\def\AnswerYes{y}
\def\SeminarColorQuestion{Color version? (y=yes)}
\def\SeminarPaperQuestion{Paper version? (y=yes)}

% Definition of the styles to enrich text (color or black and white version)
\ifx\SeminarColorVersion\undefined
  \typein[\SeminarColorVersion]{^^J\SeminarColorQuestion}
\fi
\ifx\SeminarColorVersion\AnswerYes
  \usepackage{hcolor}
\else
  \usepackage{hbaw}
\fi

% Screen or paper version?
\ifx\SeminarPaperVersion\undefined
  \typein[\SeminarPaperVersion]{^^J\SeminarPaperQuestion}
\fi
\ifx\SeminarPaperVersion\AnswerYes
  \usepackage{nohyperref}       % To deactivate the `hyperref' features
  \overlaysfalse                % To suppress overlays
  [EMAIL PROTECTED] Needed to avoid `hyperref' to collapse with "dvips"
\else
  [EMAIL PROTECTED],210mm}%     A4 format
%  [EMAIL PROTECTED],215.9mm}% Letter format
\fi

% A4 format
\usepackage{sem-a4}
\setlength{\slidewidth}{281mm}
\setlength{\slideheight}{170mm}
\def\SeminarPaperWidth{210truemm}
\def\SeminarPaperHeight{297truemm}

% Letter format
%\setlength{\slidewidth}{261mm}
%\setlength{\slideheight}{176mm}
%\def\SeminarPaperWidth{215.9truemm}
%\def\SeminarPaperHeight{279.4truemm}

% General size parameters for all formats
\renewcommand{\slidetopmargin}{15.5mm}
\renewcommand{\slidebottommargin}{13mm}
\renewcommand{\slideleftmargin}{4mm}
\renewcommand{\sliderightmargin}{4mm}

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

% Some general PSTricks useful add-ons
% ------------------------------------

% Initialization of PSTricks parameters
% �������������������������������������

% As \psset, but, opposite to it, this version allow the following syntax:
% \def\MyPstFrame#1{{%
% \def\Temp{#1}%
% \ifx\Temp\empty
% \else
%   \PstSet{#1}
% \fi
% \begin{pspicture}(2,2)
%   \psframe(2,2)
% \end{pspicture}}}
%
% \def\PstParams{linecolor=red,fillstyle=solid,fillcolor=yellow}
% \MyPstFrame{\PstParams}
%
% The syntax \MyPstFrame{linecolor=cyan,fillstyle=vlines} still work,
% as with \psset

[EMAIL PROTECTED],[EMAIL PROTECTED]

[EMAIL PROTECTED],{%
[EMAIL PROTECTED],[EMAIL PROTECTED]
[EMAIL PROTECTED]@[EMAIL PROTECTED]@i}}

[EMAIL PROTECTED],{%
[EMAIL PROTECTED]@nil
[EMAIL PROTECTED]@[EMAIL PROTECTED]@ii}}

[EMAIL PROTECTED]@nil{\psset{#1=#2}}

% \DoPerChar macro from Juergen Schlegelmilch
% ����������������
% (<[EMAIL PROTECTED]> - posted on c.t.t. Jan. 27, 1998)
[EMAIL PROTECTED]
#1#2%
[EMAIL PROTECTED]
[EMAIL PROTECTED]@empty
\else
  [EMAIL PROTECTED]
\fi}

% To write a text vertically (but with letters horizontal)
% ��������������������������
[EMAIL PROTECTED]@nil}
[EMAIL PROTECTED],\hbox to 0mm{\hss#1\hss}}\,}

% To print a string in a framebox of a specified length
% �����������������������������������������������������
[EMAIL PROTECTED]@[EMAIL PROTECTED]
[EMAIL PROTECTED]
\psset{#1}%
\psframebox[framesep=0.06,,framearc=0.8,
            shadow=true,shadowangle=45,shadowsize=0.1]{%
  \rule[-0.5mm]{0mm}{2.5mm}%
  \truncate[.]{#3}{\hfil#2\hfil}}}}

% To print tabs for the sections
% ������������������������������
\def\SeminarTabs#1#2#3#4{%
% #1 = length for each tab, #2 = font specifications (if changed),
% #3 = color of the current section,
% #4 = color for all sections except the current one
%
% Temporary redefinition of the OvalFrame PostScript macro
% for better look for a tab
[EMAIL PROTECTED]
/OvalFrame {
  x1 x2 eq y1 y2 eq or
     { pop pop x1 y1 moveto x2 y2 L }
     { y1 y2 sub abs
       x1 x2 sub abs
       2 copy gt { exch pop } { pop } ifelse
       2 div exch
       { dup 3 1 roll mul exch } if
       2 copy lt { pop } { exch pop } ifelse
       /b ED
       x1 y1 y2 add 2 div moveto
       x1 y2 x2 y2 b arcto
       x2 y2 x2 y1 b arcto
% D.G. modification begin - Mar. 20, 2002
%       x2 y1 x1 y1 b arcto
%       x1 y1 x1 y2 b arcto
       x2 y1 x1 y1 0 arcto
       x1 y1 x1 y2 0 arcto
% D.G. modification end
       16 { pop } repeat
       closepath }
  ifelse } def}%
%
[EMAIL PROTECTED]@[EMAIL PROTECTED]@nil##4\@@nil}%
[EMAIL PROTECTED]@i##1\ignorespaces [EMAIL PROTECTED]@@nil{%
\pst@@killglue% To eat the end of line after the [EMAIL PROTECTED] macro
[EMAIL PROTECTED]
  \def\SeminarTabsCurrentSectionColor{#3}%
\else
  \def\SeminarTabsCurrentSectionColor{#4}%
\fi
#2% To be able to change the font size, serie, etc.
\hyperlink{##3}{%
  \PstTab[fillstyle=solid,fillcolor=\SeminarTabsCurrentSectionColor]
         {##2}{#1}}}%
[EMAIL PROTECTED]@gobblefour
[EMAIL PROTECTED]

% General annotation macro
% ������������������������

% To add annotations on a page (slide), specially when using overlays
% This is specially useful to add comments on a set of equations
% or on program lines on a listing

[EMAIL PROTECTED]
[EMAIL PROTECTED]
[EMAIL PROTECTED]

[EMAIL PROTECTED]
[EMAIL PROTECTED]

[EMAIL PROTECTED]
[EMAIL PROTECTED]

[EMAIL PROTECTED]
[EMAIL PROTECTED]
[EMAIL PROTECTED]

[EMAIL PROTECTED]
[EMAIL PROTECTED]

[EMAIL PROTECTED]
[EMAIL PROTECTED]

[EMAIL PROTECTED]
[EMAIL PROTECTED]

[EMAIL PROTECTED]
[EMAIL PROTECTED]

[EMAIL PROTECTED]
[EMAIL PROTECTED]

[EMAIL PROTECTED]
[EMAIL PROTECTED]

[EMAIL PROTECTED]
[EMAIL PROTECTED]

[EMAIL PROTECTED]
[EMAIL PROTECTED]

% Default values
\setkeys{psset}{%
AnnotationBoxBaselineskip=0.5mm,
AnnotationBoxCommand=\psframebox,
AnnotationBoxLength=4cm,
AnnotationBoxJustification=r,
AnnotationBoxStyle={linewidth=0.015,framesep=0.05},
AnnotationConnectionCommand=\ncline,
AnnotationConnectionBasicStyle={arrows=->,nodesep=0.1},
AnnotationConnectionSpecialStyle=,
AnnotationReferencePoint=l,
AnnotationTextStyle=\scriptsize,
AnnotationPositionX=13.45,
AnnotationPositionY=0}

\SpecialCoor

[EMAIL PROTECTED]@[EMAIL PROTECTED]
[EMAIL PROTECTED]
\setkeys{psset}{#1}%
[EMAIL PROTECTED]
\rput([EMAIL PROTECTED],0 | #2){%
  [EMAIL PROTECTED](0,[EMAIL PROTECTED]){%
    [EMAIL PROTECTED]
      [EMAIL PROTECTED]@empty
      \else
        [EMAIL PROTECTED]
      \fi
      [EMAIL PROTECTED]
        [EMAIL PROTECTED]
        [EMAIL PROTECTED]
          #3
        \end{minipage}}}}}
[EMAIL PROTECTED]@empty
\else
  [EMAIL PROTECTED]
\fi
[EMAIL PROTECTED]@empty
\else
  [EMAIL PROTECTED]
\fi
[EMAIL PROTECTED]

% To put a right brace to point an annotation
\newcommand{\RightBrace}[1]{{% #1 = number of lines to put the brace around
[EMAIL PROTECTED] pt
[EMAIL PROTECTED]@ne pt
[EMAIL PROTECTED]@
[EMAIL PROTECTED]
  [EMAIL PROTECTED]
\else
  [EMAIL PROTECTED]
\fi
[EMAIL PROTECTED]@[EMAIL PROTECTED]@tempdimb
[EMAIL PROTECTED]@tempdimb
%
[EMAIL PROTECTED]
[EMAIL PROTECTED]<0.5\ht\z@
  [EMAIL PROTECTED]@
\fi
%
$\left [EMAIL PROTECTED]@tempdimc}\right.$}}

% Macros useful when using overlays with the `listings' package
% -------------------------------------------------------------

\def\pnodeLstDown#1{%
[EMAIL PROTECTED]
[EMAIL PROTECTED]
[EMAIL PROTECTED]<0.5\ht\z@
  [EMAIL PROTECTED]@
\else
  [EMAIL PROTECTED]@
\fi
\pnode(0,[EMAIL PROTECTED]){#1}}
[EMAIL PROTECTED](0,0.5\ht\z@){#1}}
\def\rnodeLst#1#2#3{\rnode[#1]{#2}{#3}}

[EMAIL PROTECTED]
\endinput
% End seminar.con

Reply via email to