% +--------------------------------------------------+
% | Typeset titlesec.tex to get the documentation.   |
% +--------------------------------------------------+
%
% Copyright (c) 1998-2007 by Javier Bezos.
% All Rights Reserved.
%
% This file is part of the titlesec distribution release 2.8
% -----------------------------------------------------------
%
% It may be distributed and/or modified under the
% conditions of the LaTeX Project Public License, either version 1.3
% 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.3 or later is part of all distributions of LaTeX
% version 2003/12/01 or later.
% 
% This work has the LPPL maintenance status "maintained".
% 
% The Current Maintainer of this work is Javier Bezos.

% History of v1.0
% ~~~~~~~~~~~~~~~
% 1998/02/25: Added nops option
% 1998/02/28: Added \@mkboth stuff in \setmarks
% 1998/03/01: Changed test in \ttl@secnum
% 1998/03/03: Corrected some \fil... commands
% 1998/03/03: Replaced the faulty \@hangfrom by new commands
% 1998/03/03: Some \def replaced by \newcommand
% 1998/03/04: .dtx/.ins scheme finally rejected. Useless
%             for users, obtrusive for `readers' and proned
%             to errors
% 1998/03/04: Tidied up documentation
% 1998/03/06: \wordsep renamed and documented
% 1998/03/06: Added dummy asignation in \ttl@chap.
% 1998/03/06: Removed \ttl@xsect and merged into \tl@sect
% 1998/03/06: Added \ProvidesPackage

% History of v1.1
% ~~~~~~~~~~~~~~~~
% 1998/03/25: \chapter corrected, as well as the size options
% 1998/03/26: Added compact option
% 1998/03/26: Added flushleft, flushright and center options
% 1998/04/08: Changed all instances of \noindent by \parindent\z@
% 1998/04/14: Added \filinner, \filouter
% 1998/04/14: Added drop shape
% 1998/05/01: Added rightmargin shape (and margin renamed to
%             leftmargin)
% 1998/05/03: Added \setheadindent
%
% History of v1.2 (unreleased)
% ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
%
% 1998/06/01: Compatibility with AMS classes
% 1998/06/08: On-demand loading of shapes
% 1998/06/11: Frame shape. Some \fil... command
%             modified to work in the label of this
%             chapter shape.
% 1998/07/03: Bottomtitle option (at last...)
% 1998/07/14: ...margin styles bug fixed using a method
%             similar to bottomtitle.
% 1998/07/29: \titleline

%
% History of v2.0
% ~~~~~~~~~~~~~~~~
%
% 1998/08/05 to
% 1998/08/29: Fully reimplemented
%
% History of v2.1
% ~~~~~~~~~~~~~~~~
% 1999/01/05: We define in this file the three basic shapes.
%             Additional ones remain defined in external files.
%             Unified the shapes for sections and chapters.
% 1999/01/05: \ttl@shape merged into \ttl@format@iii.
% 1999/01/05: \titlerule
% 1999/01/07: \ttl@defkeys splitted from \ttl@keys
% 1999/01/10: Added the \part stuff, including a definition of \@openright
% 1999/01/11: Removed unnecessary \ttl@numsecfalse in \ttl@sect@i.
% 1999/01/14: Optimized \titlerule
% 1999/01/27: Changed \titleline to correct the spacing at the
%             top page and to fix a bug which changed the mode
%             to horizontal, thus introducing unwanted space
%             (\makebox -> \@makebox).
% 1999/02/02: \ttl@secnum renamed to \ttl@write and introduced the
%             \ttl@savewrite mechanism to sincronize the toc/marks
%             with the title in case there is a \newpage in <after>.
% 1999/02/03: wrap shape
% 1999/02/03: Added a \kern\z@ for not to avoid hyphenation
%             of the last word. Not strictly necessary, but
%             it is more LaTeX-like.
% 1999/02/05: \partmark defined (and in \setmarks, too).
% 1999/02/08: \ttl@row@i simplified.
% 1999/02/08: \ttl@savefn mechanism.
% 1999/02/10: Removed extra \leavevmode in display
% 1999/02/13: Now \titleline doesn't add the width. It's set.
% 1999/02/17: The part mark is catched, even if unused.
% 1999/02/17: old/newparttoc added.
% 1999/02/18: Changed many TeX assignments to the LaTeX
%             counterpart.
% 1999/02/19: Introduced \ttl@startargs.
%
% History of v2.1.1
% ~~~~~~~~~~~~~~~~~
% 1999/08/04: Moved misplaced lines in \ttl@makeboth
%
% History of v2.2 (unreleased)
% ~~~~~~~~~~~~~~~~~~~~~~~~~~~~
% 1999/11/03: We load titleps if pagestyles are required, but
%             some old definitions are restored.
% 1999/11/06: Improved outermarks test in \ttl@sect@i. Formerly
%             the section number could be printed if a page ended
%             with an unnumebered section followed by a numbered one.
% 1999/11/06: \ttl@startargs now adds (and passes) automatically the
%             section name. Involved macros modified accordingly.
% 1999/11/06: Replaced explicit part names by the parameter in 
%             \ttl@part@i. The same for chapter.
% 1999/11/21: \ttl@try's are not given explicitly, but built by
%             \ttl@setkeys. Intruduced the \ttl@key@... and
%             \ttl@extra@... commands.
% 1999/11/23: Minor problems with keys fixed.
% 1999/12/10: Added the nobottomtitles* option and \ttl@addstretch.
% 2000/01/07: First steps towards the calcwidth feature (basic code). 
% 2000/01/08: (Continued.) \titleline* for rules of width \titlewidth.
%             Option calcwidth implemented.
% 2000/01/12: Finished with changes in wrap.tss (no longer
%             "experimental" :-) ) 
%
% History of v2.3
% ~~~~~~~~~~~~~~~
% 2000/01/19: All keys are grouped in a single file tttkeys. Removed
%             page.tsk and deleted the corresponding code in the sty.
% 2000/01/19: Classes begun.
% 2000/01/19: The level numbers are stored in \ttll@ macros, and not
%             passed as arguments.
% 2000/01/21: Introduced the new mark scheme. It's mostly compatible
%             with the old one, but a compatibility mode seems
%             imposible (it was introduced in a preliminary test
%             but eventually removed).
% 2000/01/23: loadonly package option.
% 2000/02/01: Classes finished. Many things had to be rewritten.
% 2000/02/02: Made partially compatible with hyperref (dvips).
% 2000/02/08: \ttl@savewrite moved from shapes to classes. But
%             explicit page breaks expand it, too, to avoid wrong
%             toc entries.
% 2000/02/18: A new box named \ttl@box stores the title in runin
%             leftmargin etc shapes, to increase reliability.
%             
% (2.3.1 -- 2.3.3: No changes on this file)
%             
% History of v2.3.4
% ~~~~~~~~~~~~~~~~~        
% 2000/05/12: nonindentfirst redefine \titlespacing instead of
%             \@afterindent... so that they don't interfere with
%             the first entry in tocs.
% 2000/05/17: The marks in \ttl@select are protected to prevent
%             endless loop if the title is expanded, say, by 
%             \MakeUppercase.
%      
% History of v2.3.5
% ~~~~~~~~~~~~~~~~~        
% 2000/05/21: Restores missing test for secnumdepth in \ttl@mkchap,
%             and instead of setting \ttl@toclevel in ttlps now is
%             done in \secdef. Except inside the macros, \ttl@toclevel
%             is false, so that an explicit \...mark works. 
% 2000/06/04: \partmark defined with \providecommand
% 2000/06/14: A patch mechanism added, for small bug fixes.
%
% History of v2.4
% ~~~~~~~~~~~~~~~~
% 2001/01/18: Minor changes in code. Essentialy an incremental
%             update.
% 2001/01/22: \titleformat has a new "easy" starred variant.
% 
% History of v2.5
% ~~~~~~~~~~~~~~~
% 2002/01/02  New macros for \ttl@assign. Now * length allow
%             non integer values.
% 2002/03/22  Added \ttl@calc and \ttl@calcneg to make titlesec
%             calc-savvy.
%          -  Merged bug fixes of .new into this file.
%          -  Bugs in frame fixed -- gap in lines, misplaced
%             label, wrong margins (sometimes),
%          -  \leftskip, \rightskip and \linewidth (re)set in
%             margin shapes.
%          -  Removed obsolete flush... options.
%          -  indentafter and noindentafter, new names for
%             indentfirst and nonindentfirst.
%          -  A new level (\titleclass) without its "location"
%             now raises a meaningful error.
%          -  Bug in top-level \titleclass fixed.
% 2002/03/23  Tests for undefined and unformatted sectioning levels,
%             and horizontal material in <format>.
%          -  Missing \if@openright inside \if@twoside in
%             page class added.
%          -  Removed extra (but inoffensive) \expandafter
%             in \ttl@class@iii.
% 2002/03/27  Added \titlewidthfirst and ...last
%          -  "Not definable" gives a  more meaningful message in
%             the context of the package.
%
% History of v.2.6
% ~~~~~~~~~~~~~~~~
% 2004/08/30  Corrected typo in margin \hsiz -> \hsize.
% 2004/10/17  Added a couple of missing \noexpand's in drop.
% 2004/12/01  Removed the error about the mode in block because this
%             style is general purpose.
% 2005/01/16  Missing braces around #2 in the last else part of
%             \ttl@headinline added
%          -  Replaced explicit \makeatother's by a saved value as
%             the macros can be used in a class/package file.
% 2005/01/18  newlinetospace mechanism
% 2005/01/18  // does not break pages; option pageatnewline to
%             restore the LaTeX behaviour.
% 2005/01/19  \...break in top shape. 
%          -  Renumbered several scratch registers to follow the
%             TeXbook (p. 346), with \ttl@box in a few cases. In
%             wrap \titlewidthfirst and \titlewidthlast made global.
%          -  Float heads and foots have now a further argument for
%             additional stuff (eg, to remove rules). Option is now
%             psfloats while floatps enters in compatibility mode.
%          -  \ttl@savetitle in all classes. Option toctitles.
% 2005/01/21  Changed pageatnewline to make it compatible with
%             titletoc, with \ttl@changecentercr.
% 2005/01/22  \...tolist in top class.
%
% History of v.2.7
% ~~~~~~~~~~~~~~~~
% 2007-03-27  Added the `explicit' option.
% 2007-03-27  Added \titlepagestyle.
% 2007-03-29  Fixed wrong number for chapter in log
% 2007-03-29  Patch file named .270 instead of .new
% 2007-05-09  Added <after> to leftmargin, so that you can add stuff
%             at the beginning of the paragraph, eg, the sec number.
% 2007-07-07  Removed the patch mechanism.
% 2007-08-07  `explicit' improved.
%
% History of v.2.8
% ~~~~~~~~~~~~~~~~
% 2007-08-12  \titlepagestyle already used by KOMA-Script. Renamed
%             to \assignpagestyle.
%  
% Notes
% ~~~~~
%
% The following tags are used:
% ttl@  : the generic tag used through the style
% ttlh@ : a shape definition
% ttlf@ : a macro containing the title format
% ttls@ : id. the title space
% ttlp@ : page key related macros
% ttll@ : level number
%
% The ttlf@ and ttls@ contains data in the form {..}{..}.
% Perhaps in future releases they should be converted
% to a prop-like list, similar to that proposed by the
% latex team.
%
% Admittedly, the current implementation seems too
% complicated, but that's necessary in order to provide
% certain compatibility with the sections as defined by the
% used class. Other packages opt for providing the sections
% as defined by standard classes ignoring the class; for
% instance sectsty which does a simple task in a simple and
% nice way. However, that was not my goal.
%
% Release
% ~~~~~~~

\NeedsTeXFormat{LaTeX2e}
\ProvidesPackage{titlesec}[2007/08/12 v2.8 Sectioning titles]

% Initialization
% ~~~~~~~~~~~~~~

\newif\ifttl@ps
\ttl@psfalse

% The \ttl@label switch is used when printing the label in titles.
% A numberless variant makes it to true.
% There is a \ttl@toclabel as well, which is true iff the
% title is numbered; used in toc entries (except default part
% and chapter) and marks (only in titlesec pagestyles).

\newif\ifttl@label
\newif\ifttl@toclabel

\newbox\ttl@box

% A provision for the report style:

\@ifundefined{if@mainmatter}
  {\let\if@mainmatter\iftrue}{}

\@ifundefined{if@openright}
  {\let\if@openright\iftrue}{}

% and the ams styles as well

\@ifundefined{@chapapp}
  {\let\@chapapp\chaptername}{}

\def\ttl@trylist{\ttl@try{}}

\def\ttl@getkeys#1#2{%
  \if\expandafter @\@gobble#1@\@empty
    \edef\ttl@b{\expandafter\@gobble\string#1}%
    \let\ttl@a\ttl@b
  \else
    \makeatletter
    \edef\ttl@d{%
      \noexpand\input{ttlkeys.def}%
      \catcode`\noexpand\@=\the\catcode`\@}%
    \ttl@d
    \ttl@getkeys{#1}{#2}%
  \fi}

% A more meaningful error for \@notdefinable

\expandafter\AtEndOfPackage\expandafter{\expandafter
  \gdef\expandafter\@notdefinable\expandafter{\@notdefinable}}

\def\@notdefinable{%
  \PackageError{titlesec}%
    {Incompatible package}%
    {Titlesec cannot continue defining its own macros 
         because\MessageBreak
     \@backslashchar\reserved@a\space is already used by other package,
         the class\MessageBreak
     or the document.}}

%               +-----------------+
%               |  C L A S S E S  |
%               +-----------------+

\def\ttl@useclass#1#2{%
  \@ifstar
    {\ttl@labelfalse#1{#2}[]}%
    {\ttl@labeltrue\@dblarg{#1{#2}}}}

\def\ttl@straightclass{\ttl@useclass\ttl@straight@i}
\def\ttl@partclass{\ttl@useclass\ttl@part@i}
\def\ttl@topclass{\ttl@useclass\ttl@top@i}
\def\ttl@pageclass{\ttl@useclass\ttl@page@i}

\newcommand\titleclass[1]{%
  \edef\ttl@a{\expandafter\@gobble\string#1}%
  \@ifnextchar[{\@tempswatrue\ttl@class@i{#1}}%
               {\@tempswafalse\ttl@class@ii{#1}}}

\def\ttl@class@i#1[#2]{%
  \@namedef{ttll@\ttl@a}{#2}%
  \expandafter\providecommand\csname\ttl@a title\endcsname{}%%%%
  \@ifundefined{ttl@toplevel}{}%
    {\expandafter\let\csname ttlss@\ttl@a\expandafter\endcsname
       \csname ttlss@\ttl@toplevel\endcsname}%
  \edef\ttl@toplevel{\ttl@a}%
  \ttl@class@ii{#1}}

\def\ttl@class@ii#1#2{%
  \@ifundefined{ttl@#2class}%
    {\PackageError{titlesec}{Unknown sectioning class}%
       {Valid names are top, page and stright}}%
    {\expandafter\let\csname ttl@compat\ttl@a\endcsname\relax
     \@ifundefined{\ttl@a mark}%
       {\@namedef{\ttl@a mark}{\@gobble}}%
       {}%
     \edef#1{%
       \expandafter\noexpand\csname ttl@#2class\endcsname{\ttl@a}}}%
  \if@tempswa
    \expandafter\@gobble
  \else  
    \expandafter\@firstofone
  \fi
    {\@ifnextchar[%
       {\ttl@class@iii}%
       {\@ifundefined{ttll@\ttl@a}%
          {\PackageError{titlesec}{Unknown sectioning level}%
            {\string\titleclass\space with no optional arguments\MessageBreak
             only changes the class of an *existing* level}}}}}

\def\ttl@class@iii[#1]{%
  \edef\ttl@b{\expandafter\@gobble\string#1}%
  \expandafter\let\csname ttlss@\ttl@a\expandafter\endcsname
     \csname ttlss@\ttl@b\endcsname
  \expandafter\edef\csname ttlss@\ttl@b\endcsname{\ttl@a}%
  \let\ttl@a\ttl@toplevel
  \count@\csname ttll@\ttl@toplevel\endcsname
  \ttl@class@iv}

\def\ttl@class@iv{%
  \@ifundefined{ttlss@\ttl@a}{}%
    {\advance\count@\@ne
     \edef\ttl@a{\csname ttlss@\ttl@a\endcsname}%
     \expandafter\edef\csname ttll@\ttl@a\endcsname{\the\count@}%
     \ttl@class@iv}}

% Typesetting Classes: General tools
% ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
% The following command handles the *n spacing
% Some tricks are necessary to multiply a
% skip by a non integer number

\newskip\beforetitleunit
\beforetitleunit=1ex\@plus.3ex\@minus.06ex
\newskip\aftertitleunit
\aftertitleunit=1ex\@plus.1ex

\newdimen\ttl@plus
\newdimen\ttl@minus

\def\ttl@assign#1{%
  \@ifstar
    {\ttl@assign@i{#1}}%
    {\ttl@assign@d{#1}}}

\def\ttl@assign@i#1#2\relax#3{%
  \ttl@plus\z@
  \ttl@minus\z@
  \afterassignment\ttl@assign@ii
  \dimen@\the#3, % <- space 
  #1 =     #2\dimen@
     plus  #2\ttl@plus
     minus #2\ttl@minus}

\def\ttl@assign@ii#1 {% <- space
  \if#1,\else\afterassignment\ttl@assign@ii\fi
  \csname ttl@\string#1\endcsname}

\def\ttl@assign@d#1#2\relax#3{\setlength#1{#2}}

% To be used with \v/vspace to make them calc-savvy

\def\ttl@calc#1#2{%
  {\setlength\@tempskipa{#2}%
   #1\@tempskipa}}

\def\ttl@calcneg#1#2{%
  {\setlength\@tempskipa{#2}%
   #1{-\@tempskipa}}}

% Gets from ttls@ and passes the spacing parameters:

\def\ttl@startargs#1#2{% Get the first arguments, with the spacing
  \@ifundefined{ttlp@#2}%
     {\let\ttl@key@page\@empty}%
     {\ttlp@fetch{#2}}%
  \begingroup
    \def\ttl@b{ttls@#2}%
    \edef\ttl@key@numberless{\ifttl@label//\else/*\fi}%
    \def\ttl@a##1{\csname ttl@key@##1\endcsname}%  Used as elt in try
    \ttl@trylist
    \xdef\ttl@b{\ttl@c}%
  \endgroup
  \ifx\ttl@b\@empty
    \PackageError{titlesec}{Format/spacing not found}%
      {I was unable to find the format corresponding to #2.\MessageBreak
       Maybe you haven't set it with \string\titleformat\space and
       \string\titlespacing}
  \fi
  \expandafter#1\ttl@b{#2}}

% Used in ttl@select

\def\ttl@savefn#1[#2]#3{%
  \ifcase#1%
    \footnotemark[#2]%
    \gdef\ttl@fn{\footnotetext[#2]{#3}}%
  \else
    \footnotemark
    \gdef\ttl@fn{\footnotetext{#3}}%
  \fi}

\def\ttl@nest@error{%
  \PackageError{titlesec}{Nested titles}{Titles must not be nested}}

\def\ttl@hmode@error{%
  \PackageError{titlesec}{Entered in horizontal mode}
    {The <format> argument cannot contain horizontal material\MessageBreak
     such as text, \string\noindent, \string\makebox, etc.}}

% \ttl@select not only selects the right version to be
% used. It also take steps to ensure that a mark
% is not lost inside a box by saving it into \ttl@mk,
% which in turn is used by the sect and chap commands.

\newif\ifttl@explicit

\def\ttl@gmk#1{\gdef\ttl@mk{#1}}

\def\ttl@select#1#2#3#4{%
  \ttl@Hy@saveanchor
  \global\let\ttl@mk\@empty  % global because of rigidchapters
  \global\let\ttl@fn\@empty
  \begingroup
   \everypar{\setbox\z@\lastbox\strut}% or \hskip-\parindent?
   \let\ttl@straight@i\ttl@nest@error
   \let\ttl@top@i     \ttl@nest@error
   \let\ttl@part@i    \ttl@nest@error
   \let\ttl@page@i    \ttl@nest@error
   \let\ttl@newpage\newpage
   \def\newpage{\ttl@savewrite\ttl@newpage}%
   \def\markboth##1##2{\protect\ttl@gmk{\protect\markboth{##1}{##2}}}%
   \def\markright##1{\protect\ttl@gmk{\protect\markright{##1}}}%
   \def\@mkboth##1##2{\protect\ttl@gmk{\protect\@mkboth{##1}{##2}}}%
   \def\footnote{\@ifnextchar[%
     {\ttl@savefn\z@}{\ttl@savefn\@ne[]}}%
   \edef\ttl@key@numberless{\ifttl@label//\else/*\fi}%
   \def\ttl@b{ttlf@#1}%
   \def\ttl@a##1{\csname ttl@key@##1\endcsname}% Used as elt in try
   \ttl@trylist
   \ifttl@explicit
     \def\ttl@passexplicit{#4}% 
     \ttl@c{#4}{#2}{#3}{}% ttl@c is returned by ttl@try with ttlf@...
   \else     
     \let\ttl@passexplicit\@empty 
     \ttl@c{#2}{#3}{#4}% ttl@c is returned by ttl@try with ttlf@...
   \fi
  \endgroup}

\let\ttl@savewrite\@empty

\def\ttl@finmarks{%
  \ttl@savewrite
  \ttl@mk  % Contains a possible mark, returned by \ttl@select
  \ttl@fn} % And a footnote

\def\ttl@try#1{%
  \edef\ttl@c{#1}%  #1 is a list in the form \ttl@a{key}\ttl@a{key}
  \@ifundefined{\ttl@b\ttl@c}{}{%
    \edef\ttl@c{\expandafter\noexpand\csname\ttl@b\ttl@c\endcsname}%
    \def\ttl@a##1{\csname ttl@extra@##1\endcsname}%
    #1%
    \let\ttl@try\@gobble}} % locally modified to `break' testings

% \ttl@write writes marks and toc. tocdepth is taken
% care of when the toc is typesetted and not here.
% Used always through ttl@savewrite

\def\ttl@write#1#2{%
  \ttl@blinemarks
  \csname#1mark\endcsname{#2}%
  \def\ttl@a{\protect\numberline{\@nameuse{the#1}}}%
  \@nameuse{ttl@toc#1}% eg, \ttl@tocpart modifies \ttl@a
  \ttl@addcontentsline{#1}{#2}% Depends on toctitles
  \ttl@elinemarks
  \global\ttl@toclabelfalse}

% Must be preceded by a default \ttl@savewrite, which is used
% in starred variants--\@empty in top and straight classes.
% In straight class, it is preceded by the setting of
% prev marks to provide a "fixed" top mark. Otherwise,
% the default prev mark (= curr mark) is used (restored
% after ttl@labelling in straight). This is the command
% to be hacked if you want to change the behaviour of
% starred variants.

\def\ttl@labelling#1#2{%
  \let\ttl@Hy@saveanchor\@empty
  \ifttl@label  %  First: if star
    \def\ttl@savewrite{\ttl@write{#1}{#2}}%
    \@nameuse{ttl@#1label}%  eg, sets if mainmatter in chapter.
    \ifttl@label  % Second, eg, if not main matter
      \ifnum\@nameuse{ttll@#1}>\c@secnumdepth\relax
        \ttl@labelfalse     % Third: if too deep
      \else
        \ttl@Hy@refstepcounter{#1}%
        \@nameuse{ttl@#1out}%
      \fi
    \fi
  \fi
  \let\ifttl@toclabel\ifttl@label
  \ifx\ttl@savewrite\@empty\else % If marks
    \ifttl@ps
      \ttl@blinemarks
      \csname#1mark\endcsname{#2}%
      \ttl@elinemarks
    \fi
    \ifttl@label\else\ttl@Hy@steplink{#1}\fi
  \fi}

% Executed by ttl@labelling if the name of section is chapter:

\def\ttl@chapterlabel{\if@mainmatter\else\ttl@labelfalse\fi}

% Executed by ttl@labelling if chapter has a number. Note
% you can define messages for other sectioning levels (eg,
% \ttl@sectionout).

\def\ttl@chapterout{\typeout{\chaptertitlename\space\thechapter.}}

% Straight class
% ~~~~~~~~~~~~~
% Default for nobottomtitles. Changed by nobottomtitles*

\def\ttl@addstretch{\advance\@tempskipa-\pagestretch}

% 1:name 2:level 3:indent 4:before 5:after 6:afind [7]:cap 8:title
% The second argument of ttl@sect is the level, which
% is empty if the star version is used. In this case
% neither the toc nor the marks are written.

\def\ttl@straight@i#1[#2]#3{%
  \def\@currentlabelname{#2}% for nameref
  \gdef\ttl@savemark{\csname#1mark\endcsname{#3}}%
  \let\ttl@savewrite\@empty
  \def\ttl@savetitle{#3}%
  \gdef\thetitle{\csname the#1\endcsname}%
  \if@noskipsec \leavevmode \fi
  \par
  \ifttl@ps
    \protected@xdef\ttl@prevmarks{\ttl@marks}%
  \fi
  \ttl@labelling{#1}{#2}%
  \ifttl@ps
    \gdef\ttl@prevmarks{\ttl@marks}%
  \fi
  \ttl@startargs\ttl@straight@ii{#1}{#3}}

% 1:left 2:right 3:before 4:after 5:afterindent 6:name 7:title

\def\ttl@straight@ii#1#2#3#4#5#6#7{%
  \ttl@assign\@tempskipa#3\relax\beforetitleunit
  \if@nobreak
    \ttl@titlespace{\@tempskipa}%
  \else
    \@ifundefined{#6break}%
      {\addpenalty{\@secpenalty}}%
      {\csname#6break\endcsname}%
    \@ifundefined{ttl@ps@\string#6}{}%
      {\PackageWarning{titlesec}{Page style in straight class ignored}}%
    \addvspace{\@tempskipa}%
    \ifdim\bottomtitlespace<\z@
    \else
      \begingroup
       \@tempskipb\pagegoal
       \@tempskipa\pagegoal
       \ttl@addstretch  % \relax if nobottomtitle*
       \advance\@tempskipa-\bottomtitlespace\relax % not a register
       \pagegoal\@tempskipa
       \def\@textbottom{\vskip\z@\@plus.0001fil}%
       \penalty9999
       \pagegoal\@tempskipb
      \endgroup
    \fi
  \fi
  \@afterindenttrue
  \ifcase#5 \@afterindentfalse\fi
  \ttl@assign\@tempskipb#4\relax\aftertitleunit
  \ttl@select{#6}{#1}{#2}{#7}%
  \ttl@finmarks
  \@ifundefined{ttlp@#6}{}{\ttlp@write{#6}}%
  \if@noskipsec
    \global\@nobreakfalse
    \everypar{%
      \if@noskipsec
        \global\@noskipsecfalse
        \clubpenalty\@M
        \hskip-\parindent
        \begingroup
          \@svsechd\unskip{\hspace{\@tempskipb}}%
        \endgroup
      \else
        \clubpenalty\@clubpenalty\everypar{}%
      \fi}%
  \else
    \par\nobreak
    \vspace{\@tempskipb}%
    \@afterheading
  \fi
  \ignorespaces}

% Part class
% ~~~~~~~~~~

\providecommand\partmark[1]{\markboth{}{}}

\def\ttl@part@i#1[#2]#3{%
  \gdef\ttl@savemark{\csname#1mark\endcsname{#3}}%
  \def\ttl@savewrite{\ttl@write{#1}{#3}}%  A default value. Not #2!
  \def\ttl@savetitle{#3}%
  \ttl@labelling{#1}{#2}%
  \ttl@startargs\ttl@part@ii{#1}{#3}}

\def\ttl@part@ii#1#2#3#4#5#6#7{%
  \ttl@assign\@tempskipa#3\relax\beforetitleunit
  \vspace*{\@tempskipa}%
  \@ifundefined{ttl@ps@\string#6}{}%
    {\PackageWarning{titlesec}{Page style in part class ignored}}%
  \global\@afterindenttrue
  \ifcase#5 \global\@afterindentfalse \fi
  \ttl@assign\@tempskipb#4\relax\aftertitleunit 
  \ttl@select{#6}{#1}{#2}{#7}%
  \ttl@finmarks
  \@ifundefined{ttlp@#6}{}{\ttlp@write{#6}}%
  \par\nobreak
  \vspace{\@tempskipb}%
  \@afterheading}

% Page class
% ~~~~~~~~~~

\def\ttl@page@i#1[#2]#3{%
  \gdef\ttl@savemark{\csname#1mark\endcsname{#3}}%
  \def\ttl@savewrite{\ttl@write{#1}{#3}}%  A default value. Not #2!
  \def\ttl@savetitle{#3}%
  \ttl@labelling{#1}{#2}%
  \ttl@startargs\ttl@page@ii{#1}{#3}}

\def\ttl@page@ii#1#2#3#4#5#6#7{%
  \ttl@assign\@tempskipa#3\relax\beforetitleunit
  \if@openright
    \cleardoublepage
  \else
    \clearpage
  \fi
  \@ifundefined{ttl@ps@\string#6}%
    {\thispagestyle{plain}}%
    {\thispagestyle{\@nameuse{ttl@ps@\string#6}}}%
  \if@twocolumn
    \onecolumn
    \@tempswatrue
  \else
    \@tempswafalse
  \fi
  \vspace*{\@tempskipa}%
  \@afterindenttrue
  \ifcase#5 \@afterindentfalse\fi
  \ttl@assign\@tempskipb#4\relax\aftertitleunit
  \ttl@select{#6}{#1}{#2}{#7}%
  \ttl@finmarks
  \@ifundefined{ttlp@#6}{}{\ttlp@write{#6}}%
  \vspace{\@tempskipb}%
  \newpage
  \if@twoside
    \if@openright
      \null
      \@ifundefined{ttl@ps@\string#6}%
        {\thispagestyle{empty}}%
        {\thispagestyle{\@nameuse{ttl@ps@\string#6}}}%
      \newpage
    \fi
  \fi
  \if@tempswa
    \twocolumn
  \fi
  \ignorespaces}

% Top class and some makechapterhead stuff
% ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
%
% \ttl@mkchap is the new make(s)chapterhead.

\def\ttl@mkchap#1#2#3#4#5#6#7{%
  \gdef\ttl@savemark{\csname#6mark\endcsname{#7}}%
  \let\ttl@savewrite\@empty
  \let\ttl@Hy@saveanchor\@empty
  \@ifundefined{ttl@ps@\string#6}{}%
    {\thispagestyle{\@nameuse{ttl@ps@\string#6}}}%
  \let\ifttl@toclabel\ifttl@label
  \ttl@mkchap@i{#1}{#2}{#3}{#4}{#5}{#6}{#7}}

% But \ttl@mkchap@i is used by both makechapterhead and
% the top class.

\def\ttl@mkchap@i#1#2#3#4#5#6#7{%
  \ttl@assign\@tempskipa#3\relax\beforetitleunit
  \vspace*{\@tempskipa}%
  \global\@afterindenttrue
  \ifcase#5 \global\@afterindentfalse\fi
  \ttl@assign\@tempskipb#4\relax\aftertitleunit
  \ttl@topmode{\@tempskipb}{%
    \ttl@select{#6}{#1}{#2}{#7}}%
  \ttl@finmarks  % Outside the box!
  \@ifundefined{ttlp@#6}{}{\ttlp@write{#6}}}

\def\ttl@top@i#1[#2]#3{%
  \gdef\ttl@savemark{\csname#1mark\endcsname{#3}}%
  \let\ttl@savewrite\@empty
  \def\ttl@savetitle{#3}%
  \ttl@labelling{#1}{#2}%
  \ttl@startargs\ttl@top@ii{#1}{#3}}

\def\ttl@top@ii#1#2#3#4#5#6#7{%
  \@ifundefined{#6break}%
    {\if@openright
       \cleardoublepage
     \else
       \clearpage
     \fi}%
    {\csname#6break\endcsname}%
  \@ifundefined{ttl@ps@\string#6}%
    {\thispagestyle{plain}}%
    {\thispagestyle{\@nameuse{ttl@ps@\string#6}}}%
  \global\@topnum\z@
  \@ifundefined{#6tolists}%
    {\addtocontents{lof}{\protect\ttl@tocsep}%
     \addtocontents{lot}{\protect\ttl@tocsep}}
    {\@nameuse{#6tolists}}%
  \if@twocolumn
    \@topnewpage[\ttl@mkchap@i{#1}{#2}{#3}{#4}{#5}{#6}{#7}]%
  \else
    \ttl@mkchap@i{#1}{#2}{#3}{#4}{#5}{#6}{#7}%
    \@afterheading
  \fi
  \ignorespaces}


%     \def\ttl@noskipsectrue{%
%       \if@noskipsec
%     \PackageError{titlesec}{Invalid shape for top class}%
%        {The selected shape only makes sense when merged into\MessageBreak
%         a paragraph. That is impossible in the top class}%
%   \else

\newcommand\chaptertitlename{\@chapapp}
\def\ttl@tocsep{\addvspace{10\p@}}

%               +-----------------+
%               |   S H A P E S   |
%               +-----------------+
%               
% % Reformatting Titles: Interface
% ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

% The surrounding space is stored in a macro
% named \ttls@<section> whose content is
% {left}{right}{before}{after}{afterindent}.
% But if there is the page key, the name is
% \ttls@<section>/<page>

\newcommand\titlespacing{%
  \@ifstar{\ttl@spacing@i{\z@}}{\ttl@spacing@i{\@ne}}}

\def\ttl@spacing@i#1#2#3#4#5{%
  \ttl@getkeys{#2}{titlesec}%
  \@ifnextchar[{%
     \ttl@spacing@ii{#1}{#3}{#4}{#5}%
   }{%
     \ttl@spacing@ii{#1}{#3}{#4}{#5}[\z@]}}

\def\ttl@spacing@ii#1#2#3#4[#5]{%
   \expandafter\def\csname ttls@\ttl@a\endcsname
       {{#2}{#5}{#3}{#4}{#1}}}

% The section name is built in \ttl@a.
% The format is stored in a macro named \ttlf@<section>,
% or \ttlf@<section>/<page> if there is the page spec,
% or \ttlf@.../* if numberless is true
% whose content is
%  \ttl@<shape>{format}{label}{sep}{before}{after}

\newtoks\ttl@toksa

\newcommand\titleformat{%
  \@ifstar{\ttl@format@s}%
          {\ttl@format@i}}

\def\ttl@format@s#1#2{%
  \edef\ttl@a{\expandafter\@gobble\string #1}%
  \@ifundefined{ttlf@\ttl@a}%
    {\PackageError{titlesec}{Not allowed in `easy' settings}
       {The sectiong command you are trying to redefine\MessageBreak
        is not handled by the starred variant (eg, \string\part)}}{}
  \expandafter\expandafter\expandafter
  \ttl@format@si\csname ttlf@\ttl@a \endcsname
  {#2}}

\def\ttl@format@si#1#2#3#4#5#6#7{%
  \@namedef{ttlf@\ttl@a}{#1{#7}{#3}{#4}{#5}{#6}}}

\def\ttl@format@i#1{%
  \@ifnextchar[{\ttl@format@ii{#1}}{\ttl@format@ii{#1}[hang]}}

\def\ttl@format@ii#1[#2]#3#4#5#6{%
  \ttl@getkeys{#1}{titlesec}%
  \ttl@toksa{{#3}{#4}{#5}{#6}}% Save  arguments
  \@ifnextchar[{%
    \ttl@format@iii{#2}%
  }{%
    \ttl@format@iii{#2}[]}}

% First, we get the shape -- if not defined it loads
% the corresponding file.


\def\ttl@format@iii#1[#2]{%
  \@ifundefined{ttlh@#1}{%
    \begingroup
    \makeatletter
    \InputIfFileExists{#1.tss}{}{%
      \PackageError{titlesec}{Unknown shape}%
         {Shapes are defined in files with extension tss\MessageBreak
          Either you have misspelled the shape\MessageBreak
          or there is no a #1.tss file}}%
    \endgroup}{}%
  \@temptokena{#2}%
  \ifttl@explicit
    \edef\ttl@b{%
      \def\expandafter\noexpand\csname ttlf@\ttl@a\endcsname####1%
      {\expandafter\noexpand\csname ttlh@#1\endcsname
       \the\ttl@toksa{\the\@temptokena}}}%
  \else
    \edef\ttl@b{%
      \def\expandafter\noexpand\csname ttlf@\ttl@a\endcsname
      {\expandafter\noexpand\csname ttlh@#1\endcsname
       \the\ttl@toksa{\the\@temptokena}}}%
  \fi
  \ttl@b
  \csname ttl@compat\ttl@a\endcsname}

% Styles
% ~~~~~~

% 1:global 2:label 3:sep 4:style 5:after 6:left 7:right 8:title
% \ttl@<shape> and \ttlh@<shape> take the following eight
% arguments:
% {format}{label}{sep}{before}{after}{left}{right}{title}
% where before and after refer to the format.
% With the option explicit, #4 contains the title and #8 is
% empty.

\def\ttlh@display#1#2#3#4#5#6#7#8{%
  \gdef\ttl@makeline##1{\ttl@calc\hspace{#6}##1\ttl@calc\hspace{#7}}%
  \setlength\leftskip{#6}%
  \setlength\rightskip{#7}%
  \interlinepenalty\@M
  \ttl@changecentercr
  \ttl@beginlongest
    #1\ifhmode\ttl@hmode@error\fi
    \ttl@glcmds
    \parindent\z@
    \ifttl@label
      {#2\strut\@@par}\nobreak\ttl@calc\vspace{#3}%
    \fi
    #4{#8}%
   \kern\z@\strut\@@par
   \nobreak\ttl@midlongest#5\@@par
  \ttl@endlongest}

\def\ttlh@hang#1#2#3#4#5#6#7#8{%
  \gdef\ttl@makeline##1{\ttl@calc\hspace{#6}##1\ttl@calc\hspace{#7}}%
  \setlength\leftskip{#6}%
  \setlength\rightskip{#7}%
  \interlinepenalty\@M
  \ttl@changecentercr
  \ttl@beginlongest
  #1{\ifhmode\ttl@hmode@error\fi
     \ttl@glcmds
     \parindent\z@
     \leavevmode
     \begingroup
       \ifttl@label
          \sbox\z@{#2\strut\ttl@calc\hspace{#3}}%
          \advance\leftskip\wd\z@
          \llap{\box\z@}%
       \fi
       #4{#8}%
       \kern\z@\strut\@@par
     \endgroup
     \nobreak\ttl@midlongest#5\@@par}%
  \ttl@endlongest}

\def\ttlh@runin#1#2#3#4#5#6#7#8{%
  \global\@noskipsectrue
  \gdef\ttl@makeline##1{##1}%
  \ttl@changecentercr
  #1{\ifhmode\ttl@hmode@error\fi
     \global\sbox\ttl@box{%
       \ttl@calc\hspace{#6}%
       \ifttl@label{\strut#2}\ttl@calc\hspace{#3}\fi
       #4{#8}#5\unskip}}%
    \gdef\@svsechd{\unhbox\ttl@box}}

%               +-----------------+
%               |    T O O L S    |
%               +-----------------+
%
% calcwidth
% ~~~~~~~~~
% Implemented after code from soul (but much modified...)

\newdimen\titlewidth
\newdimen\titlewidthlast
\newdimen\titlewidthfirst

\let\ttl@glcmds\relax
\let\ttl@beginlongest\@empty
\let\ttl@midlongest\@empty
\let\ttl@endlongest\@empty

\def\ttl@xbeginlongest#1\ttl@endlongest{%
  \titlewidth\z@
  \titlewidthlast\z@
  \setbox\ttl@box\vbox{%
    \def\ttl@glcmds{%
      \def\\{\@ifstar{\@ifnextchar[{\ttl@bs}{\newline}}%
                     {\@ifnextchar[{\ttl@bs}{\newline}}}%
      \def\ttl@bs[####1]{\newline}%
      \let\@centercr\\%
      \def\ttl@midlongest####1\@@par{}% Very dirty...
      \advance\rightskip 1\leftskip plus 1fil
      \leftskip=\z@}%
    #1}%
  \ttl@boxprocess
  #1}

\def\ttl@boxprocess{%
  \setbox\ttl@box=\vbox{%
    \unvcopy\ttl@box
    \unskip\unpenalty
    \global\setbox\@ne=\lastbox}%
  \ifvoid\@ne
  \else
    \setbox\tw@=\hbox{\hskip-\leftskip\unhbox\@ne\hskip-\rightskip}%
    \titlewidthfirst\wd\tw@
    \ifdim\titlewidth<\titlewidthfirst
	  \titlewidth\titlewidthfirst
	\fi
    \ifdim\titlewidthlast=\z@
      \titlewidthlast\titlewidthfirst
    \fi
    \expandafter\ttl@boxprocess
  \fi}

% Rules
% ~~~~~

\providecommand\titleline{%
  \@ifstar{\ttl@line@i{\hb@xt@\titlewidth}}%
          {\ttl@line@i{}}}

\def\ttl@line@i#1{%
  \@ifnextchar[{\ttl@line{#1}}{\ttl@line{#1}[s]}}

\def\ttl@line#1[#2]#3{%
  \vskip\topskip
  \hrule \@height \z@
  \nobreak
  \vskip-\topskip
  \begingroup
    \parindent\z@
    \everypar{}%
    \leftskip\z@
    \rightskip\z@   %  #1 is either \hb@xt@\titlewidth or empty:
    \@makebox[\hsize][#2]{\ttl@makeline{#1{#3}}}%
    \par
  \endgroup
  \hrule height \z@
  \nobreak}

\providecommand\titlerule{\@ifstar{\ttl@row}{\ttl@rule}}

\let\ttl@leaders\xleaders % For titletoc compatibility

\def\ttl@row{\@ifnextchar[{\ttl@row@i}{\ttl@row@i[\wd\z@]}}
\def\ttl@row@i[#1]#2{%
  \ifvmode\expandafter\titleline\fi
  {\sbox\z@{#2}%
   \ttl@calcneg\hspace{#1}%
   \hskip\wd\z@
   \ttl@leaders\hb@xt@#1{\hss\box\z@}%
   \hfill\kern\z@}}

\def\ttl@rule{\@ifnextchar[{\ttl@rule@i}{\ttl@rule@i[.4\p@]}}
\def\ttl@rule@i[#1]{%
  \ifvmode\expandafter\titleline\fi
  {\leaders\hrule height #1\hfill\kern\z@}}

% Par shapes and space
% ~~~~~~~~~~~~~~~~~~~~

\providecommand\filright{%
  \gdef\ttl@filleft##1{\hskip##1}%
  \gdef\ttl@filright##1{\hfill}%
  \let\\\@centercr
  \advance\rightskip\z@ \@plus 1fil\relax}
\providecommand\filleft{%
  \gdef\ttl@filleft##1{\hfill}%
  \gdef\ttl@filright##1{\hskip##1}%
  \let\\\@centercr
  \advance\leftskip\z@ \@plus 1fil
  \parfillskip\z@}
\providecommand\filcenter{\filleft\filright
  \gdef\ttl@filleft##1{\hfill}}
\providecommand\fillast{%
  \gdef\ttl@filleft##1{\hfill}%
  \gdef\ttl@filright##1{\hfill}%
  \let\\\@centercr
  \filleft\advance\rightskip\z@ \@plus -1fil
  \parfillskip\z@ \@plus 2fil\relax}
\newcommand\filinner{%
  \if@twoside
    \ifodd\count\z@\filleft\else\filright\fi
  \else
    \filleft
  \fi}
\newcommand\filouter{%
  \if@twoside
    \ifodd\count\z@\filright\else\filleft\fi
  \else
    \filright
  \fi}

\newcommand\wordsep{\fontdimen\tw@\font \@plus
  \fontdimen\thr@@\font \@minus \fontdimen4\font}

%               +-----------------+
%               |  O P T I O N S  |
%               +-----------------+


\DeclareOption{pagestyles}{\let\sectiontitle\@empty}
\DeclareOption{floatps}{%
  \ifx\sectiontitle\@empty
    \let\ttl@replace\space
  \else
    \PackageWarning{titlesec}{Ignoring `floatps' without 
      `pagestyles'. This option is now deprecated.}%
  \fi}
\DeclareOption{psfloats}{%
  \ifx\sectiontitle\@empty
    \let\ttl@replace\@empty
  \else
    \PackageWarning{titlesec}{Ignoring `psfloats' without 
      `pagestyles'}%
  \fi}

\DeclareOption{loadonly}{\let\ttl@extract\@empty}

\DeclareOption{outermarks}{%
  \def\ttl@titlemarks{\outertitlemarks}}
\DeclareOption{topmarks}{
  \def\ttl@titlemarks{\toptitlemarks}}
\DeclareOption{botmarks}{%
  \def\ttl@titlemarks{\bottitlemarks}}
\DeclareOption{innermarks}{%
  \def\ttl@titlemarks{\innertitlemarks}}

\DeclareOption{footmarks}{} % Backward compat

\DeclareOption{explicit}{\ttl@explicittrue}

\DeclareOption{clearempty}{%
  \def\cleardoublepage{%
    \clearpage{\ps@empty\if@twoside\ifodd\c@page\else
    \hbox{}\newpage\if@twocolumn\hbox{}\newpage\fi\fi\fi}}}

\DeclareOption{rigidchapters}{%
  \def\ttl@topmode#1#2{\vbox to #1{#2\vfil}}%
  \def\ttl@chapafter{.26\textheight}}
\DeclareOption{rubberchapters}{%
  \def\ttl@topmode#1#2{{#2}\ttl@calc\vspace{#1}}%
  \def\ttl@chapafter{40\p@}}

\DeclareOption{bottomtitles}{%
  \def\bottomtitlespace{-1\p@}}
\DeclareOption{nobottomtitles}{%
  \def\bottomtitlespace{.2\textheight}}
\DeclareOption{nobottomtitles*}{%
  \let\ttl@addstretch\relax
  \def\bottomtitlespace{.2\textheight}}

\DeclareOption{calcwidth}{%
  \let\ttl@beginlongest\ttl@xbeginlongest}

\DeclareOption{aftersep}{%
  \let\ttl@titlespace\@gobble}
\DeclareOption{largestsep}{%
  \let\ttl@titlespace\addvspace}

\DeclareOption{oldparttoc}{%
  \def\ttl@tocpart{\def\ttl@a{\thepart\hspace{1em}}}}
\DeclareOption{newparttoc}{%
  \let\ttl@tocpart\relax}

\DeclareOption{rm}{%
  \protected@xdef\ttl@fonts{\ttl@fonts\protect\rmfamily}}
\DeclareOption{sf}{%
  \protected@xdef\ttl@fonts{\ttl@fonts\protect\sffamily}}
\DeclareOption{tt}{%
  \protected@xdef\ttl@fonts{\ttl@fonts\protect\ttfamily}}
\DeclareOption{md}{%
  \protected@xdef\ttl@fonts{\ttl@fonts\protect\mdseries}}
\DeclareOption{bf}{%
  \protected@xdef\ttl@fonts{\ttl@fonts\protect\bfseries}}
\DeclareOption{up}{%
  \protected@xdef\ttl@fonts{\ttl@fonts\protect\upshape}}
\DeclareOption{it}{%
  \protected@xdef\ttl@fonts{\ttl@fonts\protect\itshape}}
\DeclareOption{sl}{%
  \protected@xdef\ttl@fonts{\ttl@fonts\protect\slshape}}
\DeclareOption{sc}{%
  \protected@xdef\ttl@fonts{\ttl@fonts\protect\scshape}}

\DeclareOption{big}{%
  \gdef\ttl@sizes#1{\ifcase#1\relax\Huge\or\Large\or\large
       \or\normalsize\or\or\or\huge\fi}}
\DeclareOption{medium}{%
  \gdef\ttl@sizes#1{\ifcase#1\relax\huge\or\Large\or\large
       \or\normalsize\or\or\or\LARGE\fi}}
\DeclareOption{small}{%
  \gdef\ttl@sizes#1{\ifcase#1\relax\LARGE\or\large
       \or\normalsize\or\normalsize\or\or\or\Large\fi}}
\DeclareOption{tiny}{%
  \gdef\ttl@sizes#1{\ifcase#1\relax\large\or\normalsize\or
    \normalsize\or\normalsize\or\or\or\normalsize\fi}}

\DeclareOption{raggedleft}{%
  \gdef\ttl@fil{\filleft}}
\DeclareOption{center}{%
  \gdef\ttl@fil{\filcenter}}
\DeclareOption{raggedright}{%
  \gdef\ttl@fil{\filright}}

\DeclareOption{compact}{%
  \gdef\ttl@space{1}%
  \gdef\ttl@chapafter{30\p@}}

% Deprecated. To be remmoved in a major upgrade (3.0)
\DeclareOption{indentfirst}{%
  \gdef\@afterindentfalse{\let\if@afterindent\iftrue}%
  \@afterindenttrue
  \def\titlespacing{%
    \@ifstar{\ttl@spacing@i{\@ne}}{\ttl@spacing@i{\@ne}}}}
\DeclareOption{nonindentfirst}{%
  \def\titlespacing{%
    \@ifstar{\ttl@spacing@i{\z@}}{\ttl@spacing@i{\z@}}}}

% New names
\DeclareOption{indentafter}{%
  \gdef\@afterindentfalse{\let\if@afterindent\iftrue}%
  \@afterindenttrue
  \def\titlespacing{%
    \@ifstar{\ttl@spacing@i{\@ne}}{\ttl@spacing@i{\@ne}}}}
\DeclareOption{noindentafter}{%
  \def\titlespacing{%
    \@ifstar{\ttl@spacing@i{\z@}}{\ttl@spacing@i{\z@}}}}

% newlinetospace
\let\ttl@blinemarks\relax
\let\ttl@elinemarks\relax

\DeclareRobustCommand\ttl@linetosp{%
  \@ifstar{\ttl@linetosp@i}{\ttl@linetosp@i}}%

\def\ttl@linetosp@i{%
  \ifdim\lastskip>\z@\else\space\fi
  \ignorespaces}

\DeclareOption{newlinetospace}{%
  \def\ttl@blinemarks{%
    \let\ttl@e\\%
    \def\\{\ttl@linetosp}}%
  \def\ttl@elinemarks{\let\\\ttl@e}}%

% toctitles
\def\ttl@addcontentsline#1#2{%
  \addcontentsline{toc}{#1}{\ifttl@toclabel\ttl@a\fi#2}}

\DeclareOption{toctitles}{%
  \def\ttl@addcontentsline#1#2{%
    \addcontentsline{toc}{#1}{\ifttl@toclabel\ttl@a\fi\ttl@savetitle}}}

% pageatnewline

\def\ttl@changecentercr{%
  \let\ttl@centercr\@centercr
  \def\@centercr{\@ifstar{\ttl@centercr*}{\ttl@centercr*}}}

\DeclareOption{pageatnewline}{\let\ttl@changecentercr\relax}

\def\ttl@fonts{}

\ExecuteOptions{rubberchapters,bottomtitles,aftersep,oldparttoc,%
  innermarks}

\ProcessOptions

%               +-----------------+
%               | H Y P E R R E F |
%               +-----------------+
%
% These two commands are provided by hyperref. But if they
% are not defined at \begin{document} hyperref has not been
% loaded or it is an old version.

\AtBeginDocument{%
  \ifx\ttl@Hy@steplink\@undefined
    \let\ttl@Hy@steplink\@gobble
    \let\ttl@Hy@refstepcounter\refstepcounter
  \fi}

%               +-----------------+
%               |   PAGE STYLES   |
%               +-----------------+
%
% This is generic:

\newcommand\assignpagestyle[2]{\@namedef{ttl@ps@\string#1}{#2}}

% Old pagestyles
% ~~~~~~~~~~~~~~

\providecommand\newpagestyle{%
  \let\ttl@compatps\@empty % marks the ``old interface''
  \makeatletter
  \edef\ttl@d{%
    \noexpand\input{ttlps.def}%
    \catcode`\noexpand\@=\the\catcode`\@}%
  \ttl@d
  \newpagestyle}
  
\providecommand\renewpagestyle{%
  \let\ttl@compatps\@empty % marks the ``old interface''
  \makeatletter
  \edef\ttl@d{%
    \noexpand\input{ttlps.def}%
    \catcode`\noexpand\@=\the\catcode`\@}%
  \ttl@d
  \renewpagestyle}

\providecommand\widenhead{%
  \let\ttl@compatps\@empty % marks the ``old interface''
  \makeatletter
  \edef\ttl@d{%
    \noexpand\input{ttlps.def}%
    \catcode`\noexpand\@=\the\catcode`\@}%
  \ttl@d
  \widenhead}

% New pagestyles
% ~~~~~~~~~~~~~~

\@ifundefined{sectiontitle}{}{\input{ttlps.def}}

%               +-----------------+
%               |   C O M P A T   |
%               +-----------------+
% Easy setup, i.e., that of package options, is
% taken care of, if necessary.

\renewcommand\secdef[2]{%
  \@ifstar
    {\ttl@labelfalse
     #2}
    {\ttl@labeltrue
     \ifx#1\@chapter
       \if@mainmatter\else\ttl@labelfalse\fi
       \ifnum\ttll@chapter>\c@secnumdepth\ttl@labelfalse\fi
     \else\ifx#1\@part
       \ifnum\ttll@part>\c@secnumdepth\ttl@labelfalse\fi
     \fi\fi
     \let\ifttl@toclabel\ifttl@label
     \@dblarg{#1}}}

\@ifundefined{ttl@extract}{}{\endinput}

\newcommand\titlelabel[1]{%
  \def\@seccntformat##1{#1}}

\expandafter\ifx\csname chapter\endcsname\relax

  \def\ttl@compatpart{\titleclass{\part}{part}\relax}

\else

  \def\ttl@compatchapter{%
    \def\@makechapterhead{%
      \ttl@labeltrue
      \if@mainmatter\else\ttl@labelfalse\fi
      \ifnum\ttll@chapter>\c@secnumdepth\ttl@labelfalse\fi
      \ttl@startargs\ttl@mkchap{chapter}}%
    \def\@makeschapterhead{%
      \ttl@labelfalse
      \if@mainmatter\else\ttl@labelfalse\fi
      \ifnum\ttll@chapter>\c@secnumdepth\ttl@labelfalse\fi
      \ttl@startargs\ttl@mkchap{chapter}}}

  \def\ttl@compatpart{\titleclass{\part}{page}\relax}

\fi

\def\ttl@@extract#1\@startsection#2#3#4#5#6#7#8{%
  \@tempskipa=#5
  \@tempskipb=#6
  \ifdim\@tempskipa<\z@
    \toks@{\titlespacing*#8{#4}}%
    \@tempskipa-\@tempskipa
  \else
    \toks@{\titlespacing#8{#4}}%
  \fi
  \@ifundefined{ttl@space}{}{%
    \ttl@assign\@tempskipa*\ttl@space\relax\beforetitleunit}%
  \ifdim\@tempskipb<\z@
    \if@tempswa
      \titleformat#8[runin]%
         {\ttl@fonts\ttl@sizes{#3}}{\@seccntformat{#2}}%
         {\z@}\ttl@passexplicit
    \else
      \titleformat#8[runin]%
         {#7}{\@seccntformat{#2}}%
         {\z@}\ttl@passexplicit
    \fi
    \@tempskipb-\@tempskipb
  \else
    \if@tempswa
      \titleformat#8%
        {\ttl@fil\ttl@fonts\ttl@sizes{#3}}{\@seccntformat{#2}}%
        {\z@}\ttl@passexplicit 
    \else
      \titleformat#8%
        {#7}{\@seccntformat{#2}}%
        {\z@}\ttl@passexplicit
    \fi
    \@ifundefined{ttl@space}{}{%
      \ttl@assign\@tempskipb*\ttl@space\relax\aftertitleunit}%
  \fi
  \edef\ttl@a{\the\toks@{\the\@tempskipa}{\the\@tempskipb}}
  \ttl@a}

\def\ttl@extract#1{%
  \expandafter\in@\expandafter\@startsection\expandafter{#1}%
  \ifin@
    \expandafter\ttl@@extract#1#1%
  \else
    \PackageWarningNoLine{titlesec}%
      {Non standard sectioning command detected\MessageBreak
       Using default spacing and no format}
    \titlespacing*#1{\z@}{*3}{*2}%
  \fi}

\@tempswafalse

\ifx\ttl@fonts\@empty
  \def\ttl@fonts{\bfseries}
\else
  \@tempswatrue
\fi

\expandafter\ifx\csname ttl@sizes\endcsname\relax
  \gdef\ttl@sizes#1{\ifcase#1\relax\Huge\or\Large\or\large
       \or\normalsize\or\or\or\huge\fi}
\else
  \@tempswatrue
\fi

\expandafter\ifx\csname ttl@fil\endcsname\relax
  \let\ttl@fil\@empty
\else
  \@tempswatrue
\fi

\if@tempswa

  \expandafter\ifx\csname chapter\endcsname\relax\else
   \titleformat\chapter[display]%
    {\@ifundefined{ttl@fil}{\raggedright}{\ttl@fil}\ttl@fonts\ttl@sizes6}
    {\@chapapp\space\thechapter}{.8\baselineskip}{\ttl@sizes\z@\ttl@passexplicit}
  \fi

\fi

\ttl@extract\section
\ttl@extract\subsection
\ttl@extract\subsubsection
\ttl@extract\paragraph
\ttl@extract\subparagraph

\let\ttl@extract\@undefined
\let\ttl@@extract\@undefined

\def\ttl@toplevel{part}

\expandafter\ifx\csname chapter\endcsname\relax

  \@namedef{ttll@part}{0}
  \titleclass{\section}{straight}[\part]

  \titlespacing*{\part}
    {\z@}
    {4ex}
    {3ex}

\else

  \let\ttl@save@mkchap\@makechapterhead
  \let\ttl@save@mkschap\@makeschapterhead

  \def\@makechapterhead#1{%
    \gdef\ttl@savemark{\chaptermark{#1}}%
    \ttl@save@mkchap{#1}%
    \@ifundefined{ttl@ps@\string\chapter}{}%
      {\thispagestyle{\@nameuse{ttl@ps@\string\chapter}}}}

  \def\@makeschapterhead#1{%
    \gdef\ttl@savemark{\chaptermark{#1}}%
    \ttl@save@mkschap{#1}%
    \@ifundefined{ttl@ps@\string\chapter}{}%
      {\thispagestyle{\@nameuse{ttl@ps@\string\chapter}}}}

  \@namedef{ttll@part}{-1}
  \@namedef{ttlss@part}{chapter}
  \@namedef{ttll@chapter}{0}
  \titleclass{\section}{straight}[\chapter]

% The following is unoperant, unless when \chapter / \part
% format is redefined

  \titlespacing*{\part}
    {\z@}
    {\z@\@plus1fil}
    {\z@\@plus1fil}
    
  \titlespacing*\chapter
    {\z@}%
    {50\p@}%
    {\ttl@chapafter}%

\fi

\titleclass{\subsection}   {straight}[\section]
\titleclass{\subsubsection}{straight}[\subsection]
\titleclass{\paragraph}    {straight}[\subsubsection]
\titleclass{\subparagraph} {straight}[\paragraph]

\endinput