home *** CD-ROM | disk | FTP | other *** search
/ Meeting Pearls 3 / Meeting_Pearls_III.iso / Pearls / texmf / inputs / latex / unpacked / flafter.sty < prev    next >
Encoding:
Text File  |  1995-06-21  |  6.8 KB  |  190 lines
  1. %% 
  2. %% This is file `flafter.sty', generated 
  3. %% on <1995/6/21> with the docstrip utility (2.2i).
  4. %% 
  5. %% The original source files were:
  6. %% 
  7. %% ltoutput.dtx  (with options: `flafter,trace')
  8. %% 
  9. %% This is a generated file. 
  10. %% 
  11. %% Copyright 1993-1995 the LaTeX3 project and any individual authors 
  12. %% listed elsewhere in this file. All rights reserved. 
  13. %% 
  14. %% For further copyright information see the file legal.txt, and any 
  15. %% other copyright notices in this file. 
  16. %% 
  17. %% This file is part of the LaTeX2e system. 
  18. %% ---------------------------------------- 
  19. %% This system is distributed in the hope that it will be useful, 
  20. %% but WITHOUT ANY WARRANTY; without even the implied warranty of 
  21. %% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. 
  22. %% 
  23. %% For error reports concerning UNCHANGED versions of this file no more 
  24. %% than one year old, see bugs.txt. 
  25. %% 
  26. %% Please do not request updates from us directly. Primary 
  27. %% distribution is through the CTAN archives. 
  28. %% 
  29. %% 
  30. %% IMPORTANT COPYRIGHT NOTICE: 
  31. %% 
  32. %% You are NOT ALLOWED to distribute this file alone. 
  33. %% 
  34. %% You are allowed to distribute this file under the condition that it is 
  35. %% distributed together with all the files listed in manifest.txt. 
  36. %% 
  37. %% If you receive only some of these files from someone, complain! 
  38. %% 
  39. %% Permission is granted to copy this file to another file with a clearly 
  40. %% different name and to customize the declarations in that copy to serve 
  41. %% the needs of your installation, provided that you comply with 
  42. %% the conditions in the file legal.txt. 
  43. %% 
  44. %% However, NO PERMISSION is granted to generate or to distribute a 
  45. %% modified version of this file under its original name. 
  46. %% 
  47. %% You are NOT ALLOWED to change this file. 
  48. %% 
  49. %% 
  50. %% MODIFICATION ADVICE: 
  51. %% 
  52. %% If you want to customize this file, it is best to make a copy of the 
  53. %% source file(s) from which it was produced. Use a different name for 
  54. %% your copy(ies) and modify the copy(ies); this will ensure that your 
  55. %% modifications do not get overwritten when you install a new release of 
  56. %% the standard system. You should also ensure that your modified source 
  57. %% file does not generate any modified file with the same name as a 
  58. %% standard file. You can then easily distribute your modifications by 
  59. %% distributing the modified and renamed copy of the source file, taking 
  60. %% care to observe the conditions in legal.txt; this will ensure that 
  61. %% other users can safely use your modifications. 
  62. %% 
  63. %% You will also need to produce your own, suitably named, .ins file to 
  64. %% control the generation of files from your source file; this file 
  65. %% should contain your own preambles for the files it generates, not 
  66. %% those in the standard .ins files. 
  67. %% 
  68. %% The names of the source files used are shown above. 
  69. %% 
  70. %% 
  71. %%% File: ltoutput
  72. \def \@addtocurcol {%
  73.   \tr@ce{***Start addtocurcol}%
  74.    \@insertfalse
  75.    \@setfloattypecounts
  76.    \ifnum \@fpstype=8
  77.      \tr@ce{fpstype !p only (addtocurcol): \the \@fpstype = 8?}%
  78.    \else
  79.      \ifnum \@fpstype=24
  80.        \tr@ce{fpstype p only (addtocurcol): \the \@fpstype = 24?}%
  81.      \else
  82.        \@flsettextmin
  83.        \tr@ce{textfloatsheight (before) = \the \@textfloatsheight}%
  84.        \advance \@textmin \@textfloatsheight
  85.        \@reqcolroom \@pageht
  86.        \tr@ce{textmin + textfloatsheight: \the \@textmin}%
  87.        \tr@ce{page-so-far: \the \@reqcolroom}%
  88.        \ifdim \@textmin>\@reqcolroom
  89.          \@reqcolroom \@textmin
  90.          \tr@ce{ORD? textmin being used}%
  91.        \fi
  92.        \advance \@reqcolroom \ht\@currbox
  93.        \tr@ce{float size = \the \ht \@currbox (addtocurcol)}%
  94.        \tr@ce{colroom = \the \@colroom (addtocurcol)}%
  95.        \tr@ce{reqcolroom = \the \@reqcolroom (addtocurcol)}%
  96.        \ifdim \@colroom>\@reqcolroom
  97.          \@flsetnum \@colnum
  98.          \ifnum \@colnum>\z@
  99.            \@bitor\@currtype\@deferlist
  100.            \tr@ce{deferlist: \@deferlist: (addtocurcol-before)}%
  101.            \if@test
  102.              \tr@ce{type already on list: defer (addtocurcol)}%
  103.            \else
  104.              \@bitor\@currtype\@botlist
  105.            \tr@ce{botlist: \@botlist: (addtocurcol-before)}%
  106.              \if@test
  107.                \tr@ce{type already on list: bot---sent to addtobot}%
  108.                \@addtobot
  109.              \else
  110.                \tr@ce{fpstype \ifodd \@tempcnta OK \else not \fi
  111.                       here: \the \@fpstype}%
  112.                \ifodd \count\@currbox
  113.                  \advance \@reqcolroom \intextsep
  114.                  \ifdim \@colroom>\@reqcolroom
  115.                    \global \advance \@colnum \m@ne
  116.                    \global \advance \@textfloatsheight \ht\@currbox
  117.                    \global \advance \@textfloatsheight 2\intextsep
  118.                    \@cons \@midlist \@currbox
  119.                    \tr@ce{***Success: here}%
  120.                    \tr@ce{textfloatsheight (after-here) =
  121.                         \the \@textfloatsheight}%
  122.                    \tr@ce{colnum (after-here) = \the \@colnum}%
  123.                    \if@nobreak
  124.                    \else
  125.                      \addpenalty \interlinepenalty
  126.                    \fi
  127.                    \vskip \intextsep
  128.                    \box\@currbox
  129.                    \penalty\interlinepenalty
  130.                    \vskip\intextsep
  131.                    \ifnum\outputpenalty <-\@Mii \vskip -\parskip\fi
  132.                    \outputpenalty \z@
  133.                    \@inserttrue
  134.                  \else
  135.                    \tr@ce{Fail---no room at 2nd test of colroom
  136.                                  (addtocorcol \string\intextsep)}%
  137.                  \fi
  138.                \fi
  139.                \if@insert
  140.                \else
  141.                  \tr@ce{not here: sent to addtobot}%
  142.                  \@addtobot
  143.                \fi
  144.              \fi
  145.            \fi
  146.          \else
  147.            \tr@ce{Fail: colnum = \the \@colnum:
  148.                         fpstype \the \@fpstype=ORD?}%
  149.            \ifnum \@fpstype<\sixt@@n
  150.              \tr@ce{ERROR: BANG float not successful (addtocurcol)}%
  151.            \fi
  152.          \fi
  153.        \else
  154.          \tr@ce{Fail---no room: fl box ht: \the \ht \@currbox
  155.                                                      (addtocurcol)}%
  156.        \fi
  157.      \fi
  158.    \fi
  159.    \if@insert
  160.    \else
  161.      \@resethfps
  162.      \tr@ce{put on deferlist (addtocurcol)}%
  163.      \@cons\@deferlist\@currbox
  164.      \tr@ce{deferlist: \@deferlist: (addtocurcol-after)}%
  165.    \fi
  166. }
  167. \def \@tracemessage #1{\typeout{LaTeX2e: #1}}
  168. \def \tracefloats{\let \tr@ce \@tracemessage}
  169. \def \notrace {\let \tr@ce \@gobble}
  170. \notrace
  171. \def \@traceval #1{\tr@ce{\string #1 = \the #1}}
  172. \def \tracefloatvals{%
  173.   \@dblfloatplacement
  174.   \@floatplacement
  175.   \@traceval\@colnum
  176.   \@traceval\@colroom
  177.   \@traceval\@topnum
  178.   \@traceval\@toproom
  179.   \@traceval\@botnum
  180.   \@traceval\@botroom
  181.   \@traceval\@fpmin
  182.   \tr@ce{\string\textfraction = \textfraction}%
  183.   \@traceval\@dbltopnum
  184.   \@traceval\@dbltoproom
  185. }
  186. \providecommand\tr@ce[1]{}
  187. \endinput
  188. %% 
  189. %% End of file `flafter.sty'.
  190.