pst-stru (11oct15)

git-svn-id: svn://tug.org/texlive/trunk@38613 c570f23f-e606-0410-a88d-b1316a301751

5 files changed, 273 insertions, 219 deletions

diff --git a/Master/texmf-dist/doc/generic/pst-stru/Changes b/Master/texmf-dist/doc/generic/pst-stru/Changes
index 32baac925d6..67f37aa6130 100644
--- a/Master/texmf-dist/doc/generic/pst-stru/Changes
+++ b/Master/texmf-dist/doc/generic/pst-stru/Changes
@@ -1,8 +1,11 @@
-pst-stru.tex -----------------------------
+pst-stru.sty --------
 
-0.11  2006/10/25  First CTAN public release. (hv)
 
+pst-stru.tex --------
+v. 0.13  2015-10-08  - fix bug with length in PS code (hv)
+v. 0.12  2007-07-22  - adding license
+                     - using always \ps@object
 
-pst-stru.sty -----------------------------
- 2006/10/25  First CTAN public release.
 
+pst-stru-doc.tex --------
+v. 1.00  2007-07-22  new documentation
diff --git a/Master/texmf-dist/doc/generic/pst-stru/README b/Master/texmf-dist/doc/generic/pst-stru/README
index dc991ce8c14..3792e6b01dd 100644
--- a/Master/texmf-dist/doc/generic/pst-stru/README
+++ b/Master/texmf-dist/doc/generic/pst-stru/README
@@ -7,4 +7,4 @@ civil engineering analysis (beams, portals, archs, piles).
 It can be used either with TeX or LaTeX.
 
 Put the files pst-stru.sty|tex into an existing local
-TEXMF tree and then run texhash to update the data base.
\ No newline at end of file
+TEXMF tree and then run texhash to update the data base.
diff --git a/Master/texmf-dist/doc/generic/pst-stru/pst-stru-doc.bib b/Master/texmf-dist/doc/generic/pst-stru/pst-stru-doc.bib
new file mode 100644
index 00000000000..9d26d653369
--- /dev/null
+++ b/Master/texmf-dist/doc/generic/pst-stru/pst-stru-doc.bib
@@ -0,0 +1,78 @@
+%% -*-bibtex-*-
+@STRING{tugboat	= {TUGboat} }
+@STRING{dtk	= {{D}ie {\TeX}nische {K}om{\"o}die} }
+
+@Book{companion,
+  author	= {Michel Goosens and Frank Mittelbach and Sebastian Rahtz and Denis Roegel and Herbert Vo\ss},
+  title		= {The {\LaTeX} {G}raphics {C}ompanion},
+  publisher	= {{Addison-Wesley Publishing Company}},
+  year		= {2007},
+  edition	= {second},
+  address	= {Boston, Mass.}
+}
+
+@Article{girou:01:,
+  author	= {Denis Girou},
+  title		= {Pr\'esentation de {PST}ricks},
+  journal	= {Cahier {GUT}enberg},
+  year		= 1994,
+  volume	= {16},
+  month		= apr,
+  pages		= {21-70}
+}
+
+@Article{girou:02:,
+  author	= {{Timothy Van} Zandt and Denis Girou},
+  title		= {Inside {PST}ricks},
+  journal	= TUGboat,
+  year		= 1994,
+  volume	= {15},
+  month		= sep,
+  pages		= {239-246}
+}
+
+@Book{PostScript,
+  Author         = {Kollock, Nikolai G.},
+  Title          = {Post{S}cript richtig eingesetzt: vom {K}onzept zum
+                   praktischen {E}insatz},
+  Publisher      = {IWT},
+  Address        = {Vaterstetten},
+  year           = 1989,
+}
+
+@Manual{pstricks,
+  Title          = {PSTricks - {\PS} macros for generic {\TeX}},
+  Author         = {{Timothy Van} Zandt},
+  Organization   = {},
+  Address        = {\url{http://www.tug.org/application/PSTricks}},
+  Note           = {},
+  year           = 1993
+}
+
+@Manual{pst-coil,
+  Title          = {\texttt{pst-coil}: Coils and zigzags},
+  Author         = {{Timothy Van} Zandt},
+  Organization   = {},
+  Address        = {\url{CTAN:graphics/pstricks/generic/}},
+  Note           = {},
+  year           = 1999
+}
+
+@Manual{multido,
+  Title          = {\texttt{multido.tex} - a loop macro, that supports fixed-point addition},
+  Author         = {{Timothy Van} Zandt},
+  Organization   = {},
+  Address        = {\url{CTAN:/graphics/pstricks/generic/multido.tex}},
+  Note           = {},
+  year           = 1997
+}
+
+@Book{PSTricks2,
+  author	= {Herbert Vo\ss{}},
+  title		= {\texttt{PSTricks} -- {G}rafik f\"ur \TeX{} und \LaTeX},
+  edition	= {forth},
+  publisher	= {DANTE -- Lehmanns},
+  year		= {2007},
+  address	= {Heidelberg/Hamburg}
+}
+
diff --git a/Master/texmf-dist/doc/generic/pst-stru/pst-stru-doc.pdf b/Master/texmf-dist/doc/generic/pst-stru/pst-stru-doc.pdf
index cde5d43f2ce..a81fd6587e3 100644
--- a/Master/texmf-dist/doc/generic/pst-stru/pst-stru-doc.pdf
+++ b/Master/texmf-dist/doc/generic/pst-stru/pst-stru-doc.pdf
diff --git a/Master/texmf-dist/doc/generic/pst-stru/pst-stru-doc.tex b/Master/texmf-dist/doc/generic/pst-stru/pst-stru-doc.tex
index a39c3ee151e..81327a6f870 100644
--- a/Master/texmf-dist/doc/generic/pst-stru/pst-stru-doc.tex
+++ b/Master/texmf-dist/doc/generic/pst-stru/pst-stru-doc.tex
@@ -1,30 +1,70 @@
-\documentclass[11pt]{article}
+\documentclass[english,11pt]{article}
+%
 \usepackage[T1]{fontenc}
 \usepackage[latin9]{inputenc}
-\usepackage[scaled]{luximono}
-\usepackage[a4paper,tmargin=2cm,bmargin=1cm,includeheadfoot]{geometry}
-\usepackage{fancyhdr,showexpl}
-\usepackage{pstricks}
-\usepackage{pst-stru}
-\usepackage{fp-eval}
-
-\DeclareRobustCommand\cs[1]{\texttt{\char`\\#1}}
-\lhead{\texttt{pst-stru}}\rhead{A PSTricks package for structural schemes}
-\pagestyle{fancy}
+\listfiles
+\usepackage[scaled=0.85]{luximono}
+\usepackage{lmodern}
+\usepackage{xspace}
+\usepackage[bottom]{footmisc}
+\usepackage{tabularx}
+\usepackage{longtable}
+\usepackage[NewCommands,NewParameters]{ragged2e}
+\usepackage[dvipsnames]{pstricks}
+\usepackage{pst-stru,multido,fp}
+\definecolor{hellgelb}{rgb}{1,1,0.8}
+%
+\def\PST{{\texttt{PSTricks}}\xspace}
+\def\PDF{{\texttt{PDF}}\xspace}
+\def\pst{{\texttt{pstricks}}\xspace}
+\def\PS{PostScript\xspace}
+\newcommand*\CMD[1]{{\UrlFont\texttt{\textbackslash #1}}}
+%
+\def\tIndex#1{\index{#1@{\UrlFont\texttt{#1}}}}
+\def\cIndex#1{\index{#1@\CMD{#1}}}
+\def\pIndex#1{\index{Parameter@\textbf{Parameter}!{\UrlFont\texttt{#1}}}}
+\def\ppIndex#1{\index{Parameter@\textbf{Parameter}!{#1}}}
+\def\sIndex#1{\index{Syntax@\textbf{Syntax}!\CMD{#1}}}
+\def\csIndex#1{\sIndex{#1}\cIndex{#1}}
+\def\PIndex#1{\index{Paket@\textbf{Paket}!\texttt{#1}}}
+\def\mIndex#1{\texttt{#1}\tIndex{#1}\pIndex{#1}}
+%
+\pretolerance=500
+\tolerance=1000 
+\hbadness=3000
+\vbadness=3000
+\hyphenpenalty=400
+
+\usepackage{showexpl}% not a real PSTricks package
+\usepackage{babel}
+\usepackage{makeidx,luximono}
+\makeindex
+\usepackage[dvips,colorlinks,linktocpage]{hyperref} % PDF-support
+%
+\lstset{explpreset={numbers=left,numberstyle=\tiny,numbersep=.3em,
+  xleftmargin=1em,columns=flexible,language=PSTricks,keywordstyle=\small\ttfamily\bfseries,
+  moredelim=**[is][\bf\color{blue}]},
+  pos=t,width=-99pt,
+  overhang=0pt,hsep=\columnsep,vsep=\bigskipamount,basicstyle=\ttfamily\small}
+%
 
 \begin{document}
-
-\title{\texttt{pst-stru}\\ A PSTricks package to draw structural schemes in
-civil engineering analysis (beams, portals, archs, piles)\\ \normalsize ver. 0.11}
+%
+\title{\texttt{pst-stru}:\newline Structural schemes v0.12}
 \author{Giuseppe Matarazzo\thanks{%
 Thanks to Manuel Luque who inspired and initially supported this work.\newline
 Documentation revised by Herbert Voß\newline
 This program can be redistributed and/or modified under the terms
 of the LaTeX Project Public License Distributed from CTAN archives
 in directory macros/latex/base/lppl.txt.}}
-\date{\today}
 \maketitle
 
+
+\begin{abstract}
+\texttt{pst-stru} is a PSTricks package to draw structural schemes in
+civil engineering analysis (beams, portals, archs, piles).
+\end{abstract}
+
 \tableofcontents
 
 \clearpage
@@ -34,23 +74,17 @@ in directory macros/latex/base/lppl.txt.}}
 \begin{LTXexample}
 \psset{arrowsize=0.8mm,arrowinset=0}
 \begin{pspicture}(-5,-1)(5,5)
-\pnode(0,2.4) {OO}
-\pnode(-4,0) {A}
-\pnode(4,0) {B}
-\node(A)
-\node(B)
-\psplot[linecolor=red,linewidth=2pt]{-4}{4}{x neg x mul 0.15 mul 2.4 add}
-\rput{-39.8}(A){\hinge}
-\rput{39.8}(B){\hinge}
-\rput{0}(OO){\interhinge}
-\rput{-5}(OO){\clockCouple}
-\rput{5}(OO){\noclockCouple}
-\rput(0,3.2){\Large M}
- \pcline [offset=-7mm,linecolor=blue]{|-|}(-4,0)(0,0)
- \lput*{:U}{\large 4.00 m}
- \pcline [offset=-7mm,linecolor=blue]{|-|}(0,0)(4,0)
- \lput*{:U}{\large 4.00 m}
- \pcline [offset=0,linecolor=blue]{|-|}(-4.4,0)(-4.4,2.4)
+  \pnode(0,2.4){OO}\pnode(-4,0){A}\pnode(4,0){B}
+  \node(A)\node(B)
+  \psplot[linecolor=red,linewidth=2pt]{-4}{4}{x neg x mul 0.15 mul 2.4 add}
+  \rput{-39.8}(A){\hinge}\rput{39.8}(B){\hinge}\rput{0}(OO){\interhinge}
+  \rput{-5}(OO){\clockCouple}\rput{5}(OO){\noclockCouple}
+  \rput(0,3.2){\Large M}
+  \pcline [offset=-7mm,linecolor=blue]{|-|}(-4,0)(0,0)
+  \lput*{:U}{\large 4.00 m}
+  \pcline[offset=-7mm,linecolor=blue]{|-|}(0,0)(4,0)
+  \lput*{:U}{\large 4.00 m}
+  \pcline[offset=0pt,linecolor=blue]{|-|}(-4.4,0)(-4.4,2.4)
  \lput*{:U}{2.40 m}
 \end{pspicture}
 \end{LTXexample}
@@ -60,7 +94,7 @@ in directory macros/latex/base/lppl.txt.}}
 concentrated load P at the center line}
 
 \noindent
-{\em Bernoulli's Equation}: $EJ\eta''=-M$ \\
+{\emph Bernoulli's Equation}: $EJ\eta''=-M$ \\
 \noindent
 The {\bf elastic curve} of the assigned beam AB (P loaded at mid-span) is
 obtained by computing the Bending Moment of the auxiliary beam A'B'
@@ -70,65 +104,50 @@ to which is applied the BM of AB (EJ=const)
    \quad \quad 0 \leq x \leq l/2
 \]
 
-\begin{LTXexample}
-\begin{pspicture}[showgrid=true](-1,-2.4)(9,4.5)
-\pnode(0,3){A}  \pnode(8,3){B}
-\pnode(0,0){A1} \pnode(8,0){B1}
-\pnode(4,0){M}  
-\psline[linewidth=1.5pt](0,3)(8,3)  % Beam AB
-\psArrowCivil[RotArrows=0,length=1.5,start=0.5,%
+\begin{LTXexample}[wide=true]
+\begin{pspicture}(-1,-2.4)(9,4.5)
+  \pnode(0,3){A}\pnode(8,3){B}\pnode(0,0){A1}\pnode(8,0){B1}\pnode(4,0){M}  
+  \psline[linewidth=1.5pt](0,3)(8,3)  % Beam AB
+  \psArrowCivil[RotArrows=0,length=1.5,start=0.5,%
     linecolor=blue,arrowsize=1.8mm,OffsetLabel=0.2,linewidth=1pt](A)(B){\rput{90}{P}}
-\rput{0}(A){\hinge}  \rput{0}(B){\roller}
-\psline[linecolor=red,fillcolor=yellow,fillstyle=solid](0,0)(4,1)(8,0)
-\rput(0,2){\Large A} \rput(8,2){\Large B}
-%% 1st half load
- \multido{\nStart=1.00+0.05}{-19}{%
- \psArrowCivil[RotArrows=0,length=\nStart,start=\nStart,%
-     linecolor=magenta](A1)(M){}}
-%% 2nd half load
- \multido{\nStart=1.00+0.05}{-19}{%
- \psArrowCivil[RotArrows=180,length=\nStart,start=\nStart,%
-     linecolor=magenta](B1)(M){}}
-\pcline[offset=0,linecolor=black]{<->}(4,0)(4,1)
- \lput*{:R}{\bf d}
-\rput(6,1){$d=P\frac{l}{2}$}
-\rput(0,0.5){\Large A'} \rput(8,0.5){\Large B'}
-\pcline[offset=0,linecolor=blue]{|-|}(0,-2)(8,-2)
-\lput*{:U}{\bf $l$}
-% Paramenters #1 P = 6  #2 l=8 #3 scale factor =0.02
-%----------- Elastic curve of beam AB ----------------------
-\def\ElasticAB#1#2#3{#1 16.0 div #2 #2 x mul mul mul
+  \rput{0}(A){\hinge}  \rput{0}(B){\roller}
+  \psline[linecolor=red,fillcolor=yellow,fillstyle=solid](0,0)(4,1)(8,0)
+  \rput(0,2){\Large A} \rput(8,2){\Large B}
+  %% 1st half load
+  \multido{\nStart=1.00+0.05}{-19}{%
+   \psArrowCivil[RotArrows=0,length=\nStart,start=\nStart,linecolor=magenta](A1)(M){}}
+  %% 2nd half load
+  \multido{\nStart=1.00+0.05}{-19}{%
+    \psArrowCivil[RotArrows=180,length=\nStart,start=\nStart,linecolor=magenta](B1)(M){}}
+  \pcline{<->}(4,0)(4,1)\lput*{:R}{\bf d}
+  \rput(6,1){$d=P\frac{l}{2}$} \rput(0,0.5){\Large A'} \rput(8,0.5){\Large B'}
+  \pcline[linecolor=blue]{|-|}(0,-2)(8,-2)\lput*{:U}{\bf $l$}
+  % Paramenters #1 P = 6  #2 l=8 #3 scale factor =0.02
+  %----------- Elastic curve of beam AB ----------------------
+  \def\ElasticAB#1#2#3{#1 16.0 div #2 #2 x mul mul mul
                      #1 -12.0 div x x x mul mul mul add #3 mul neg}
-\pscustom[linecolor=blue,linewidth=1pt,fillstyle=solid,fillcolor=lightgray]{%
-  \psplot[]{0.0}{4.0}{\ElasticAB{6}{8}{0.02}}
-  \psline[](4,0)(0,0)}
-\psline[linewidth=1.5pt](0,0)(8,0)  % Beam A'B'
+  \pscustom[linecolor=blue,linewidth=1pt,fillstyle=solid,fillcolor=lightgray]{%
+    \psplot[]{0.0}{4.0}{\ElasticAB{6}{8}{0.02}}
+  \psline(4,0)(0,0)}
+  \psline[linewidth=1.5pt](0,0)(8,0)  % Beam A'B'
 \end{pspicture}
 \end{LTXexample}
 
 
 \clearpage
 \section{Antisymmetric distributed load}
-\begin{LTXexample}
-\begin{pspicture}(-3,-3)(4,3)
-\pnode(0,1.5) {OO}
-\pnode(1.5,1.5) {C}
-\pnode(-1.5,1.5) {D}
-\pnode(-1.5,0) {A}
-\pnode(1.5,0) {B}
-\node(A)
-\node(B)
-\psline[linecolor=red](A)(D)(C)(B)
-\rput{0}(A){\hinge}
-\rput{90}(B){\guide}
-\psframe[fillstyle=solid,fillcolor=yellow](-1.5,1.5)(0,1.7)
-\psframe[fillstyle=solid,fillcolor=yellow](0,1.3)(1.5,1.5)
-\multido{\nStart=0.0+0.0833}{13}{%
-  \psArrowCivil[RotArrows=0,length=0.2,start=\nStart,%
-    linecolor=blue](D)(OO){}
-  \psArrowCivil[RotArrows=180,length=0.2,start=\nStart,%
-    linecolor=blue](OO)(C){}}
-\rput{0}(OO){\interhinge}
+\begin{LTXexample}[wide=true]
+\begin{pspicture}(-3,-0.5)(4,2)
+  \pnode(0,1.5){OO}\pnode(1.5,1.5){C}\pnode(-1.5,1.5){D}\pnode(-1.5,0) {A}\pnode(1.5,0){B}
+  \node(A)\node(B)
+  \psline[linecolor=red](A)(D)(C)(B)
+  \rput{0}(A){\hinge}\rput{90}(B){\guide}
+  \psframe[fillstyle=solid,fillcolor=yellow](-1.5,1.5)(0,1.7)
+  \psframe[fillstyle=solid,fillcolor=yellow](0,1.3)(1.5,1.5)
+  \multido{\nStart=0.0+0.0833}{13}{%
+    \psArrowCivil[RotArrows=0,length=0.2,start=\nStart,linecolor=blue](D)(OO){}
+    \psArrowCivil[RotArrows=180,length=0.2,start=\nStart,linecolor=blue](OO)(C){}}
+  \rput{0}(OO){\interhinge}
 \end{pspicture}
 \end{LTXexample}
 
@@ -161,12 +180,9 @@ to which is applied the BM of AB (EJ=const)
   \psline[linecolor=blue,arrowinset=0]{->}(E2)(E1)}}
 
 \begin{LTXexample}
-\begin{pspicture}(-1,-2.5)(5,2)
-\psgrid[subgriddiv=0,griddots=10,gridlabels=7pt,gridcolor=gray]
-\pnode(0,0) {A1}
-\pnode(4,0) {B1}
-\uput[180](A1){\Large A$_1$}
-\uput[0](B1){\Large B$_1$}
+\begin{pspicture}(-1,-1.5)(5,1)
+\pnode(0,0){A1}\pnode(4,0){B1}
+\uput[180](A1){\Large A$_1$}\uput[0](B1){\Large B$_1$}
 %-----------------------------------------
 % Parameters
 % #1 m = 0.5       y = mùx + n       (1)
@@ -174,8 +190,7 @@ to which is applied the BM of AB (EJ=const)
 %----------- line 1 -------  --------------------------
 \pscustom[linecolor=blue,linewidth=1pt,fillstyle=solid,fillcolor=yellow]{
 \psplot[linecolor=blue]{0}{4}{\retta{0.5}{-1}}
-\psline(B1)(A1)}
-\rettaTeX{0.5}{-1}
+\psline(B1)(A1)}\rettaTeX{0.5}{-1}
 \psline[linecolor=red,linewidth=1.5pt](A1)(B1)  % Beam A1-B1
 \end{pspicture}
 \end{LTXexample}
@@ -183,8 +198,7 @@ to which is applied the BM of AB (EJ=const)
 \clearpage
 \section{Triangular load}
 \begin{LTXexample}
-\begin{pspicture}(-1,-2.5)(5,2)
-\psgrid[subgriddiv=0,griddots=10,gridlabels=7pt,gridcolor=gray]
+\begin{pspicture}(-1,-1)(5,1)
 %-----------------------------------------
 % Parameters
 % #1 m = 0.25       y = mùx + n      (2)
@@ -202,63 +216,31 @@ to which is applied the BM of AB (EJ=const)
 \end{pspicture}
 \end{LTXexample}
 
-\clearpage
-\section{Triangular load}
 \begin{LTXexample}
-\begin{pspicture}(-1,-2.5)(5,2)
-\psgrid[subgriddiv=0,griddots=10,gridlabels=7pt,gridcolor=gray]
+\begin{pspicture}(-1,-1)(5,1)
 %-----------------------------------------
 % Parameters
 % #1 m = -0.5      y = mùx + n      (2)
 % #2 n = 1
 %----------- line 2 ------- Triangular load --------------------------
-\pnode(0,0) {A3}
-\pnode(4,0) {B3}
-\uput[180](A3){\Large A$_3$}
-\uput[0](B3){\Large B$_3$}
-\pscustom[linecolor=blue,linewidth=1pt,fillstyle=solid,fillcolor=cyan]{
-\psplot[linecolor=blue]{0}{4}{\retta{-0.5}{1}}
-\psline(B3)(A3)}
-\rettaTeX{-0.5}{1}
-\psline[linecolor=red,linewidth=1.5pt](A3)(B3)  % Beam A3-B3
-\end{pspicture}
-\end{LTXexample}
-
-\clearpage
-\section{Antisymmetric load}
-\begin{LTXexample}
-\begin{pspicture}(-1,-2)(5,2)
-\psgrid[subgriddiv=0,griddots=10,gridlabels=7pt,gridcolor=gray]
-\pnode(0,0) {A1}
-\pnode(4,0) {B1}
-\uput[180](A1){\Large A$_4$}
-\uput[0](B1){\Large B$_4$}
-%-----------------------------------------
-% Parameters
-% #1 m = -0.5       y = mùx + n       (1)
-% #2 n = 1
-%----------- line 1 ------- Antisymmetric load --------------------------
-\pscustom[linecolor=blue,linewidth=1pt,fillstyle=solid,fillcolor=yellow]{
-\psplot[linecolor=blue]{0}{4}{\retta{-0.5}{1}}
-\psline(B1)(A1)}
-\rettaTeX{-0.5}{1}
-\psline[linecolor=red,linewidth=1.5pt](A1)(B1)  % Beam A1-B1
+  \pnode(0,0){A3}\pnode(4,0){B3}
+  \uput[180](A3){\Large A$_3$}\uput[0](B3){\Large B$_3$}
+  \pscustom[linecolor=blue,linewidth=1pt,fillstyle=solid,fillcolor=cyan]{
+    \psplot[linecolor=blue]{0}{4}{\retta{-0.5}{1}}
+  \psline(B3)(A3)}\rettaTeX{-0.5}{1}
+  \psline[linecolor=red,linewidth=1.5pt](A3)(B3)  % Beam A3-B3
 \end{pspicture}
 \end{LTXexample}
 
 \clearpage
 \section{Loads: Position and naming}
-\begin{LTXexample}
-\begin{pspicture}(-3,-3)(3,3)
-\psgrid[subgriddiv=0,griddots=10,gridlabels=7pt,gridcolor=magenta]
+\begin{LTXexample}[wide=true]
+\begin{pspicture}(-3,-2.5)(3,2)
 % ------ KNOTS definition -----------
-\pnode(-2,0){A}    \pnode(1.5,0){B}
-\pnode(1.5,-1.5){E}\pnode(1.5,1.5){F}
-\pnode(3,0){G}
- \node(A) \node(E) \node(B) \node(F) \node(G)
+\pnode(-2,0){A}\pnode(1.5,0){B}\pnode(1.5,-1.5){E}\pnode(1.5,1.5){F}\pnode(3,0){G}
+\node(A) \node(E) \node(B) \node(F) \node(G)
 % ------ Structure drawing and fixed ends position -----------
- \psline[linecolor=red](A)(G)
- \psline[linecolor=red](E)(F)
+ \psline[linecolor=red](A)(G) \psline[linecolor=red](E)(F)
  \rput{-90}(A){\fixedend}    %   left FE
  \rput{0}(E){\fixedend}      % bottom FE
  \rput{-160}(F){\fixedend}   %    top FE
@@ -271,14 +253,10 @@ to which is applied the BM of AB (EJ=const)
 \psArrowCivil[RotArrows=-200,length=1.0,start=0.47,%
     linecolor=blue,OffsetLabel=-0.3](A)(B){\rput{-70}{T}}
 % ------ Spans measures -----------
- \pcline [offset=-5mm]{|-|}(-2,-1.5)(1.5,-1.5)
- \lput*{:U}{\scriptsize 3.50 m}
- \pcline [offset=-5mm]{|-|}(1.5,-1.5)(3,-1.5)
- \lput*{:U}{\scriptsize 1.50 m}
- \pcline [offset=5mm]{|-|}(-2,-1.5)(-2,1.5)
- \lput*{:U}{\scriptsize 3.00 m}
- \pcline [offset=0mm]{|-|}(2,0)(2,1.5)
- \lput*{:U}{\scriptsize 1.50 m}
+ \pcline [offset=-5mm]{|-|}(-2,-1.5)(1.5,-1.5)\lput*{:U}{\scriptsize 3.50 m}
+ \pcline [offset=-5mm]{|-|}(1.5,-1.5)(3,-1.5) \lput*{:U}{\scriptsize 1.50 m}
+ \pcline [offset=5mm]{|-|}(-2,-1.5)(-2,1.5)   \lput*{:U}{\scriptsize 3.00 m}
+ \pcline [offset=0mm]{|-|}(2,0)(2,1.5)        \lput*{:U}{\scriptsize 1.50 m}
 \end{pspicture}
 \end{LTXexample}
 
@@ -286,62 +264,51 @@ to which is applied the BM of AB (EJ=const)
 \clearpage
 \section{Distributed load}
 
-\begin{LTXexample}
+\begin{LTXexample}[wide=true]
 \def\BMdistributed#1#2#3{#2 x sub 0.5 #1 x mul mul mul #3 mul}
-\begin{pspicture}(-1,-2)(11,2)
-\psgrid[subgriddiv=0,griddots=10,gridlabels=7pt,gridcolor=magenta]
-\pnode(0,0) {A}
-\pnode(10,0) {B}
-\rput{0}(A){\hinge}
-\rput{0}(B){\roller}
-\rput(0,-1){\Large A}
-\rput(10,-1){\Large B}
-\psline[linecolor=blue](A)(B)
+\begin{pspicture}(-1,-1.5)(11,2)
+  \pnode(0,0){A}\pnode(10,0) {B}
+  \rput{0}(A){\hinge}\rput{0}(B){\roller}\rput(0,-1){\Large A}\rput(10,-1){\Large B}
+  \psline[linecolor=blue](A)(B)
 %==========================================================================
 % Paramenters
 % #1 q = 12
 % #2 l = 10
 % #3 scale factor =0.01: to be multiplied by (10/l)^2 (when l<> 10)
 %----------- BM distributed load ----------------------
- \pscustom[linecolor=blue,linewidth=1pt,fillstyle=solid,fillcolor=cyan]{
+  \pscustom[linecolor=blue,linewidth=1pt,fillstyle=solid,fillcolor=cyan]{
    \psplot[linecolor=blue]{0}{10}{\BMdistributed{12}{10}{0.01}}
    \psline[](10,0)(0,0)}
-\psset{arrowsize=1.5mm}
- \multido{\nStart=0.0+0.2}{51}{%
- \pnode(\nStart,0){E1}
- \pnode(! /x \nStart\space def
-       x \BMdistributed{12}{10}{0.01}){E2}
- \psline[linecolor=blue,arrowinset=0,arrowsize=1mm]{->}(E2)(E1)}
+  \psset{arrowsize=1.5mm}
+  \multido{\nStart=0.0+0.2}{51}{%
+    \pnode(\nStart,0){E1}\pnode(! /x \nStart\space def x \BMdistributed{12}{10}{0.01}){E2}
+    \psline[linecolor=blue,arrowinset=0,arrowsize=1mm]{->}(E2)(E1)}
 \end{pspicture}
 \end{LTXexample}
 
 
-\psset{arrowsize=0.8mm,arrowinset=0}
 \clearpage
+\psset{arrowsize=0.8mm,arrowinset=0}
 \section{Macro \texttt{\textbackslash triload}}
 
 \begin{LTXexample}
-\begin{pspicture}[showgrid=true](-1,-4)(11,3)
-% Total span is (K+1) times L, say AC=(K+1)*L  [K=dimensionless value]
-% ------------------------------------
- \triload[K=1,P=8,L=5] % k=1 -> AB=BC
-% \triload[K=0.333,P=8,L=7.5] % k=1/3, like example 6
-% \triload[K=2,P=8,L=3]  % k=2 -> BM always NEGATIVE in the whole structure
-% \triload[K=2.5,P=8,L=2] % k>2 -> Reaction in C downwards
-% ------------------------------------
+\begin{pspicture}(-1,-3.5)(11,3)
+  % Total span is (K+1) times L, say AC=(K+1)*L  [K=dimensionless value]
+  \triload[K=1,P=8,L=5] % k=1 -> AB=BC
+  % \triload[K=0.333,P=8,L=7.5] % k=1/3, like example 6
+  % \triload[K=2,P=8,L=3]  % k=2 -> BM always NEGATIVE in the whole structure
+  % \triload[K=2.5,P=8,L=2] % k>2 -> Reaction in C downwards
 \end{pspicture}
 \end{LTXexample}
 
 \begin{LTXexample}
-\begin{pspicture}(-1,-6)(11,3)
-% \psgrid[subgriddiv=0,griddots=10,gridlabels=7pt,gridcolor=magenta]
- % Total span is (K+1) times L, say AC=(K+1)*L  [K=dimensionless value]
-% ------------------------------------
-% \triload[K=1,P=8,L=5] % k=1 -> AB=BC
- \triload[K=0.333,P=8,L=7.5] % k=1/3, like example 6
-% \triload[K=2,P=8,L=3]  % k=2 -> BM always NEGATIVE in the whole structure
-% \triload[K=2.5,P=8,L=2] % k>2 -> Reaction in C downwards
-% ------------------------------------
+\begin{pspicture}(-1,-5.5)(11,2.5)
+  % \psgrid[subgriddiv=0,griddots=10,gridlabels=7pt,gridcolor=magenta]
+  % Total span is (K+1) times L, say AC=(K+1)*L  [K=dimensionless value]
+  % \triload[K=1,P=8,L=5] % k=1 -> AB=BC
+  \triload[K=0.333,P=8,L=7.5] % k=1/3, like example 6
+  % \triload[K=2,P=8,L=3]  % k=2 -> BM always NEGATIVE in the whole structure
+  % \triload[K=2.5,P=8,L=2] % k>2 -> Reaction in C downwards
 \end{pspicture}
 \end{LTXexample}
 
@@ -375,25 +342,21 @@ to which is applied the BM of AB (EJ=const)
 \clearpage
 \section{Non-symmetric superimposed dead load}
 
-\begin{LTXexample}
-\begin{pspicture}(-3,-3)(3,3)
-\pnode(-2,0){A}   \pnode(2,0) {B}
-\pnode(0,1.5){V}  \pnode(-2,1.5) {A0}
-\pnode(2,1.5){B0}
-\node(A) \node(B) \node(V)
-\psline[linecolor=red](A)(V)(B)(A)
-\rput{0}(A){\hinge} \rput{0}(B){\roller}
+\begin{LTXexample}[wide=true]
+\begin{pspicture}(-3,-1)(3,2)
+  \pnode(-2,0){A}\pnode(2,0){B}\pnode(0,1.5){V}\pnode(-2,1.5) {A0}\pnode(2,1.5){B0}
+  \node(A)\node(B)\node(V)
+  \psline[linecolor=red](A)(V)(B)(A)
+  \rput{0}(A){\hinge} \rput{0}(B){\roller}
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %        Non-symmetric superimposed dead load
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-\psframe[fillstyle=solid,fillcolor=green](-2,1.5)(0,1.7)
-\psframe[fillstyle=solid,fillcolor=yellow](2,0)(2.2,1.5)
-\multido{\nStart=0.0+0.0833}{13}{%
-\psArrowCivil[RotArrows=0,length=0.2,start=\nStart,%
-    linecolor=black](A0)(V){}
-%        Lateral load  (i.e. wind)
-\psArrowCivil[RotArrows=180,length=0.2,start=\nStart,%
-    linecolor=blue](B)(B0){}}
+  \psframe[fillstyle=solid,fillcolor=green](-2,1.5)(0,1.7)
+  \psframe[fillstyle=solid,fillcolor=yellow](2,0)(2.2,1.5)
+  \multido{\nStart=0.0+0.0833}{13}{%
+    \psArrowCivil[RotArrows=0,length=0.2,start=\nStart,linecolor=black](A0)(V){}
+  %        Lateral load  (i.e. wind)
+  \psArrowCivil[RotArrows=180,length=0.2,start=\nStart,linecolor=blue](B)(B0){}}
 \end{pspicture}
 \end{LTXexample}
 
@@ -401,28 +364,23 @@ to which is applied the BM of AB (EJ=const)
 
 \clearpage
 \section{Distributed load for all beams}
-\begin{LTXexample}
-\begin{pspicture}(-1,-2)(13,2)
-\psgrid[subgriddiv=0,griddots=10,gridlabels=7pt,gridcolor=gray]
-\pnode(0,0) {A} \pnode(12,0) {B} \pnode(12,0.4) {B1}
- \node (A)
- \rput(-0.5,0){\Large A}
- \rput(12.5,0){\Large B}
+
+\begin{LTXexample}[wide=true]
+\begin{pspicture}(-1,-1)(13,1)
+\pnode(0,0){A}\pnode(12,0){B}\pnode(12,0.4){B1}
+ \node (A) \rput(-0.5,0){\Large A} \rput(12.5,0){\Large B}
 \psline[linecolor=blue,linewidth=1.5pt](A)(B)  % join A-B
 %------------------------------------------------------------
  \psframe[linecolor=blue,fillcolor=green,fillstyle=solid](A)(B1)
 %
 % distributed load for all beams
-\multido{\nBegin=0+0.025}{41}{%
-\psArrowCivil[RotArrows=0,length=0.4,start=\nBegin,%
-    linecolor=black](A)(B){}}
+ \multido{\nBegin=0+0.025}{41}{%
+  \psArrowCivil[RotArrows=0,length=0.4,start=\nBegin,linecolor=black](A)(B){}}
 %
 % recursive routine
  \multido{\rStart=0.00+3.00}{5}{%
- \pnode(0,0){E1}
- \pnode(\rStart,0){E2}
-  \rput{0}(E2){\hinge}
- \psline[linecolor=blue,arrowinset=0,arrowsize=1mm]{o-o}(E1)(E2)}
+   \pnode(0,0){E1}\pnode(\rStart,0){E2}\rput{0}(E2){\hinge}
+   \psline[linecolor=blue,arrowinset=0,arrowsize=1mm]{o-o}(E1)(E2)}
 \end{pspicture}
 \end{LTXexample}
 
@@ -431,8 +389,7 @@ to which is applied the BM of AB (EJ=const)
 
 \begin{center}
 \psset{xunit=0.5cm,yunit=0.5cm}   % Scaling
-\begin{pspicture}(-3,-2)(16,32)
-\psgrid[subgriddiv=0,griddots=10,gridlabels=7pt,gridcolor=magenta]
+\begin{pspicture}(-3,-1.5)(16,31)
 % ------ KNOTS definition -----------
 \pnode(0,0) {A0}\pnode(5,0) {B0} \pnode(12,0) {C0}
   \node (A0)  \node (B0)  \node (C0)
@@ -613,7 +570,7 @@ to which is applied the BM of AB (EJ=const)
 \psset{unit=1cm}   % Scaling
 
 \clearpage
-\section{Simple Beam with one overhang: TRIANGULAR distributed load p}
+\section[Triangular distributed load p]{Simple Beam with one overhang: triangular distributed load p}
 
 \begin{LTXexample}
 \begin{pspicture}(-1,-3.5)(9,1.5)
@@ -658,4 +615,20 @@ to which is applied the BM of AB (EJ=const)
 \end{LTXexample}
 
 
+
+\nocite{*}
+\bgroup
+\raggedright
+\bibliographystyle{plain}
+\bibliography{\jobname}
+\egroup
+
+\printindex
+
+
 \end{document}
+
+
+
+\begin{LTXexample}[pos=t]
+\end{LTXexample}