diff options
| -rw-r--r-- | Master/texmf-dist/doc/plain/gfnotation/COPYING | 674 | ||||
| -rw-r--r-- | Master/texmf-dist/doc/plain/gfnotation/GFnotation-doc.pdf | bin | 0 -> 167160 bytes | |||
| -rw-r--r-- | Master/texmf-dist/doc/plain/gfnotation/GFnotation-doc.tex | 1186 | ||||
| -rw-r--r-- | Master/texmf-dist/doc/plain/gfnotation/README | 33 | ||||
| -rw-r--r-- | Master/texmf-dist/tex/plain/gfnotation/GFnotation.tex | 2175 | ||||
| -rwxr-xr-x | Master/tlpkg/bin/tlpkg-ctan-check | 2 | ||||
| -rwxr-xr-x | Master/tlpkg/libexec/ctan2tds | 1 | ||||
| -rw-r--r-- | Master/tlpkg/tlpsrc/collection-plainextra.tlpsrc | 1 | ||||
| -rw-r--r-- | Master/tlpkg/tlpsrc/gfnotation.tlpsrc | 0 |
9 files changed, 4071 insertions, 1 deletions
diff --git a/Master/texmf-dist/doc/plain/gfnotation/COPYING b/Master/texmf-dist/doc/plain/gfnotation/COPYING new file mode 100644 index 00000000000..94a9ed024d3 --- /dev/null +++ b/Master/texmf-dist/doc/plain/gfnotation/COPYING @@ -0,0 +1,674 @@ + GNU GENERAL PUBLIC LICENSE + Version 3, 29 June 2007 + + Copyright (C) 2007 Free Software Foundation, Inc. <http://fsf.org/> + Everyone is permitted to copy and distribute verbatim copies + of this license document, but changing it is not allowed. + + Preamble + + The GNU General Public License is a free, copyleft license for +software and other kinds of works. + + The licenses for most software and other practical works are designed +to take away your freedom to share and change the works. By contrast, +the GNU General Public License is intended to guarantee your freedom to +share and change all versions of a program--to make sure it remains free +software for all its users. We, the Free Software Foundation, use the +GNU General Public License for most of our software; it applies also to +any other work released this way by its authors. You can apply it to +your programs, too. + + When we speak of free software, we are referring to freedom, not +price. Our General Public Licenses are designed to make sure that you +have the freedom to distribute copies of free software (and charge for +them if you wish), that you receive source code or can get it if you +want it, that you can change the software or use pieces of it in new +free programs, and that you know you can do these things. + + To protect your rights, we need to prevent others from denying you +these rights or asking you to surrender the rights. Therefore, you have +certain responsibilities if you distribute copies of the software, or if +you modify it: responsibilities to respect the freedom of others. + + For example, if you distribute copies of such a program, whether +gratis or for a fee, you must pass on to the recipients the same +freedoms that you received. You must make sure that they, too, receive +or can get the source code. And you must show them these terms so they +know their rights. + + Developers that use the GNU GPL protect your rights with two steps: +(1) assert copyright on the software, and (2) offer you this License +giving you legal permission to copy, distribute and/or modify it. + + For the developers' and authors' protection, the GPL clearly explains +that there is no warranty for this free software. For both users' and +authors' sake, the GPL requires that modified versions be marked as +changed, so that their problems will not be attributed erroneously to +authors of previous versions. + + Some devices are designed to deny users access to install or run +modified versions of the software inside them, although the manufacturer +can do so. This is fundamentally incompatible with the aim of +protecting users' freedom to change the software. The systematic +pattern of such abuse occurs in the area of products for individuals to +use, which is precisely where it is most unacceptable. Therefore, we +have designed this version of the GPL to prohibit the practice for those +products. If such problems arise substantially in other domains, we +stand ready to extend this provision to those domains in future versions +of the GPL, as needed to protect the freedom of users. + + Finally, every program is threatened constantly by software patents. +States should not allow patents to restrict development and use of +software on general-purpose computers, but in those that do, we wish to +avoid the special danger that patents applied to a free program could +make it effectively proprietary. To prevent this, the GPL assures that +patents cannot be used to render the program non-free. + + The precise terms and conditions for copying, distribution and +modification follow. + + TERMS AND CONDITIONS + + 0. Definitions. + + "This License" refers to version 3 of the GNU General Public License. + + "Copyright" also means copyright-like laws that apply to other kinds of +works, such as semiconductor masks. + + "The Program" refers to any copyrightable work licensed under this +License. Each licensee is addressed as "you". "Licensees" and +"recipients" may be individuals or organizations. + + To "modify" a work means to copy from or adapt all or part of the work +in a fashion requiring copyright permission, other than the making of an +exact copy. The resulting work is called a "modified version" of the +earlier work or a work "based on" the earlier work. + + A "covered work" means either the unmodified Program or a work based +on the Program. + + To "propagate" a work means to do anything with it that, without +permission, would make you directly or secondarily liable for +infringement under applicable copyright law, except executing it on a +computer or modifying a private copy. Propagation includes copying, +distribution (with or without modification), making available to the +public, and in some countries other activities as well. + + To "convey" a work means any kind of propagation that enables other +parties to make or receive copies. Mere interaction with a user through +a computer network, with no transfer of a copy, is not conveying. + + An interactive user interface displays "Appropriate Legal Notices" +to the extent that it includes a convenient and prominently visible +feature that (1) displays an appropriate copyright notice, and (2) +tells the user that there is no warranty for the work (except to the +extent that warranties are provided), that licensees may convey the +work under this License, and how to view a copy of this License. If +the interface presents a list of user commands or options, such as a +menu, a prominent item in the list meets this criterion. + + 1. Source Code. + + The "source code" for a work means the preferred form of the work +for making modifications to it. "Object code" means any non-source +form of a work. + + A "Standard Interface" means an interface that either is an official +standard defined by a recognized standards body, or, in the case of +interfaces specified for a particular programming language, one that +is widely used among developers working in that language. + + The "System Libraries" of an executable work include anything, other +than the work as a whole, that (a) is included in the normal form of +packaging a Major Component, but which is not part of that Major +Component, and (b) serves only to enable use of the work with that +Major Component, or to implement a Standard Interface for which an +implementation is available to the public in source code form. A +"Major Component", in this context, means a major essential component +(kernel, window system, and so on) of the specific operating system +(if any) on which the executable work runs, or a compiler used to +produce the work, or an object code interpreter used to run it. + + The "Corresponding Source" for a work in object code form means all +the source code needed to generate, install, and (for an executable +work) run the object code and to modify the work, including scripts to +control those activities. However, it does not include the work's +System Libraries, or general-purpose tools or generally available free +programs which are used unmodified in performing those activities but +which are not part of the work. For example, Corresponding Source +includes interface definition files associated with source files for +the work, and the source code for shared libraries and dynamically +linked subprograms that the work is specifically designed to require, +such as by intimate data communication or control flow between those +subprograms and other parts of the work. + + The Corresponding Source need not include anything that users +can regenerate automatically from other parts of the Corresponding +Source. + + The Corresponding Source for a work in source code form is that +same work. + + 2. Basic Permissions. + + All rights granted under this License are granted for the term of +copyright on the Program, and are irrevocable provided the stated +conditions are met. This License explicitly affirms your unlimited +permission to run the unmodified Program. The output from running a +covered work is covered by this License only if the output, given its +content, constitutes a covered work. This License acknowledges your +rights of fair use or other equivalent, as provided by copyright law. + + You may make, run and propagate covered works that you do not +convey, without conditions so long as your license otherwise remains +in force. You may convey covered works to others for the sole purpose +of having them make modifications exclusively for you, or provide you +with facilities for running those works, provided that you comply with +the terms of this License in conveying all material for which you do +not control copyright. Those thus making or running the covered works +for you must do so exclusively on your behalf, under your direction +and control, on terms that prohibit them from making any copies of +your copyrighted material outside their relationship with you. + + Conveying under any other circumstances is permitted solely under +the conditions stated below. Sublicensing is not allowed; section 10 +makes it unnecessary. + + 3. Protecting Users' Legal Rights From Anti-Circumvention Law. + + No covered work shall be deemed part of an effective technological +measure under any applicable law fulfilling obligations under article +11 of the WIPO copyright treaty adopted on 20 December 1996, or +similar laws prohibiting or restricting circumvention of such +measures. + + When you convey a covered work, you waive any legal power to forbid +circumvention of technological measures to the extent such circumvention +is effected by exercising rights under this License with respect to +the covered work, and you disclaim any intention to limit operation or +modification of the work as a means of enforcing, against the work's +users, your or third parties' legal rights to forbid circumvention of +technological measures. + + 4. Conveying Verbatim Copies. + + You may convey verbatim copies of the Program's source code as you +receive it, in any medium, provided that you conspicuously and +appropriately publish on each copy an appropriate copyright notice; +keep intact all notices stating that this License and any +non-permissive terms added in accord with section 7 apply to the code; +keep intact all notices of the absence of any warranty; and give all +recipients a copy of this License along with the Program. + + You may charge any price or no price for each copy that you convey, +and you may offer support or warranty protection for a fee. + + 5. Conveying Modified Source Versions. + + You may convey a work based on the Program, or the modifications to +produce it from the Program, in the form of source code under the +terms of section 4, provided that you also meet all of these conditions: + + a) The work must carry prominent notices stating that you modified + it, and giving a relevant date. + + b) The work must carry prominent notices stating that it is + released under this License and any conditions added under section + 7. This requirement modifies the requirement in section 4 to + "keep intact all notices". + + c) You must license the entire work, as a whole, under this + License to anyone who comes into possession of a copy. This + License will therefore apply, along with any applicable section 7 + additional terms, to the whole of the work, and all its parts, + regardless of how they are packaged. This License gives no + permission to license the work in any other way, but it does not + invalidate such permission if you have separately received it. + + d) If the work has interactive user interfaces, each must display + Appropriate Legal Notices; however, if the Program has interactive + interfaces that do not display Appropriate Legal Notices, your + work need not make them do so. + + A compilation of a covered work with other separate and independent +works, which are not by their nature extensions of the covered work, +and which are not combined with it such as to form a larger program, +in or on a volume of a storage or distribution medium, is called an +"aggregate" if the compilation and its resulting copyright are not +used to limit the access or legal rights of the compilation's users +beyond what the individual works permit. Inclusion of a covered work +in an aggregate does not cause this License to apply to the other +parts of the aggregate. + + 6. Conveying Non-Source Forms. + + You may convey a covered work in object code form under the terms +of sections 4 and 5, provided that you also convey the +machine-readable Corresponding Source under the terms of this License, +in one of these ways: + + a) Convey the object code in, or embodied in, a physical product + (including a physical distribution medium), accompanied by the + Corresponding Source fixed on a durable physical medium + customarily used for software interchange. + + b) Convey the object code in, or embodied in, a physical product + (including a physical distribution medium), accompanied by a + written offer, valid for at least three years and valid for as + long as you offer spare parts or customer support for that product + model, to give anyone who possesses the object code either (1) a + copy of the Corresponding Source for all the software in the + product that is covered by this License, on a durable physical + medium customarily used for software interchange, for a price no + more than your reasonable cost of physically performing this + conveying of source, or (2) access to copy the + Corresponding Source from a network server at no charge. + + c) Convey individual copies of the object code with a copy of the + written offer to provide the Corresponding Source. This + alternative is allowed only occasionally and noncommercially, and + only if you received the object code with such an offer, in accord + with subsection 6b. + + d) Convey the object code by offering access from a designated + place (gratis or for a charge), and offer equivalent access to the + Corresponding Source in the same way through the same place at no + further charge. You need not require recipients to copy the + Corresponding Source along with the object code. If the place to + copy the object code is a network server, the Corresponding Source + may be on a different server (operated by you or a third party) + that supports equivalent copying facilities, provided you maintain + clear directions next to the object code saying where to find the + Corresponding Source. Regardless of what server hosts the + Corresponding Source, you remain obligated to ensure that it is + available for as long as needed to satisfy these requirements. + + e) Convey the object code using peer-to-peer transmission, provided + you inform other peers where the object code and Corresponding + Source of the work are being offered to the general public at no + charge under subsection 6d. + + A separable portion of the object code, whose source code is excluded +from the Corresponding Source as a System Library, need not be +included in conveying the object code work. + + A "User Product" is either (1) a "consumer product", which means any +tangible personal property which is normally used for personal, family, +or household purposes, or (2) anything designed or sold for incorporation +into a dwelling. In determining whether a product is a consumer product, +doubtful cases shall be resolved in favor of coverage. For a particular +product received by a particular user, "normally used" refers to a +typical or common use of that class of product, regardless of the status +of the particular user or of the way in which the particular user +actually uses, or expects or is expected to use, the product. A product +is a consumer product regardless of whether the product has substantial +commercial, industrial or non-consumer uses, unless such uses represent +the only significant mode of use of the product. + + "Installation Information" for a User Product means any methods, +procedures, authorization keys, or other information required to install +and execute modified versions of a covered work in that User Product from +a modified version of its Corresponding Source. The information must +suffice to ensure that the continued functioning of the modified object +code is in no case prevented or interfered with solely because +modification has been made. + + If you convey an object code work under this section in, or with, or +specifically for use in, a User Product, and the conveying occurs as +part of a transaction in which the right of possession and use of the +User Product is transferred to the recipient in perpetuity or for a +fixed term (regardless of how the transaction is characterized), the +Corresponding Source conveyed under this section must be accompanied +by the Installation Information. But this requirement does not apply +if neither you nor any third party retains the ability to install +modified object code on the User Product (for example, the work has +been installed in ROM). + + The requirement to provide Installation Information does not include a +requirement to continue to provide support service, warranty, or updates +for a work that has been modified or installed by the recipient, or for +the User Product in which it has been modified or installed. Access to a +network may be denied when the modification itself materially and +adversely affects the operation of the network or violates the rules and +protocols for communication across the network. + + Corresponding Source conveyed, and Installation Information provided, +in accord with this section must be in a format that is publicly +documented (and with an implementation available to the public in +source code form), and must require no special password or key for +unpacking, reading or copying. + + 7. Additional Terms. + + "Additional permissions" are terms that supplement the terms of this +License by making exceptions from one or more of its conditions. +Additional permissions that are applicable to the entire Program shall +be treated as though they were included in this License, to the extent +that they are valid under applicable law. If additional permissions +apply only to part of the Program, that part may be used separately +under those permissions, but the entire Program remains governed by +this License without regard to the additional permissions. + + When you convey a copy of a covered work, you may at your option +remove any additional permissions from that copy, or from any part of +it. (Additional permissions may be written to require their own +removal in certain cases when you modify the work.) You may place +additional permissions on material, added by you to a covered work, +for which you have or can give appropriate copyright permission. + + Notwithstanding any other provision of this License, for material you +add to a covered work, you may (if authorized by the copyright holders of +that material) supplement the terms of this License with terms: + + a) Disclaiming warranty or limiting liability differently from the + terms of sections 15 and 16 of this License; or + + b) Requiring preservation of specified reasonable legal notices or + author attributions in that material or in the Appropriate Legal + Notices displayed by works containing it; or + + c) Prohibiting misrepresentation of the origin of that material, or + requiring that modified versions of such material be marked in + reasonable ways as different from the original version; or + + d) Limiting the use for publicity purposes of names of licensors or + authors of the material; or + + e) Declining to grant rights under trademark law for use of some + trade names, trademarks, or service marks; or + + f) Requiring indemnification of licensors and authors of that + material by anyone who conveys the material (or modified versions of + it) with contractual assumptions of liability to the recipient, for + any liability that these contractual assumptions directly impose on + those licensors and authors. + + All other non-permissive additional terms are considered "further +restrictions" within the meaning of section 10. If the Program as you +received it, or any part of it, contains a notice stating that it is +governed by this License along with a term that is a further +restriction, you may remove that term. If a license document contains +a further restriction but permits relicensing or conveying under this +License, you may add to a covered work material governed by the terms +of that license document, provided that the further restriction does +not survive such relicensing or conveying. + + If you add terms to a covered work in accord with this section, you +must place, in the relevant source files, a statement of the +additional terms that apply to those files, or a notice indicating +where to find the applicable terms. + + Additional terms, permissive or non-permissive, may be stated in the +form of a separately written license, or stated as exceptions; +the above requirements apply either way. + + 8. Termination. + + You may not propagate or modify a covered work except as expressly +provided under this License. Any attempt otherwise to propagate or +modify it is void, and will automatically terminate your rights under +this License (including any patent licenses granted under the third +paragraph of section 11). + + However, if you cease all violation of this License, then your +license from a particular copyright holder is reinstated (a) +provisionally, unless and until the copyright holder explicitly and +finally terminates your license, and (b) permanently, if the copyright +holder fails to notify you of the violation by some reasonable means +prior to 60 days after the cessation. + + Moreover, your license from a particular copyright holder is +reinstated permanently if the copyright holder notifies you of the +violation by some reasonable means, this is the first time you have +received notice of violation of this License (for any work) from that +copyright holder, and you cure the violation prior to 30 days after +your receipt of the notice. + + Termination of your rights under this section does not terminate the +licenses of parties who have received copies or rights from you under +this License. If your rights have been terminated and not permanently +reinstated, you do not qualify to receive new licenses for the same +material under section 10. + + 9. Acceptance Not Required for Having Copies. + + You are not required to accept this License in order to receive or +run a copy of the Program. Ancillary propagation of a covered work +occurring solely as a consequence of using peer-to-peer transmission +to receive a copy likewise does not require acceptance. However, +nothing other than this License grants you permission to propagate or +modify any covered work. These actions infringe copyright if you do +not accept this License. Therefore, by modifying or propagating a +covered work, you indicate your acceptance of this License to do so. + + 10. Automatic Licensing of Downstream Recipients. + + Each time you convey a covered work, the recipient automatically +receives a license from the original licensors, to run, modify and +propagate that work, subject to this License. You are not responsible +for enforcing compliance by third parties with this License. + + An "entity transaction" is a transaction transferring control of an +organization, or substantially all assets of one, or subdividing an +organization, or merging organizations. If propagation of a covered +work results from an entity transaction, each party to that +transaction who receives a copy of the work also receives whatever +licenses to the work the party's predecessor in interest had or could +give under the previous paragraph, plus a right to possession of the +Corresponding Source of the work from the predecessor in interest, if +the predecessor has it or can get it with reasonable efforts. + + You may not impose any further restrictions on the exercise of the +rights granted or affirmed under this License. For example, you may +not impose a license fee, royalty, or other charge for exercise of +rights granted under this License, and you may not initiate litigation +(including a cross-claim or counterclaim in a lawsuit) alleging that +any patent claim is infringed by making, using, selling, offering for +sale, or importing the Program or any portion of it. + + 11. Patents. + + A "contributor" is a copyright holder who authorizes use under this +License of the Program or a work on which the Program is based. The +work thus licensed is called the contributor's "contributor version". + + A contributor's "essential patent claims" are all patent claims +owned or controlled by the contributor, whether already acquired or +hereafter acquired, that would be infringed by some manner, permitted +by this License, of making, using, or selling its contributor version, +but do not include claims that would be infringed only as a +consequence of further modification of the contributor version. For +purposes of this definition, "control" includes the right to grant +patent sublicenses in a manner consistent with the requirements of +this License. + + Each contributor grants you a non-exclusive, worldwide, royalty-free +patent license under the contributor's essential patent claims, to +make, use, sell, offer for sale, import and otherwise run, modify and +propagate the contents of its contributor version. + + In the following three paragraphs, a "patent license" is any express +agreement or commitment, however denominated, not to enforce a patent +(such as an express permission to practice a patent or covenant not to +sue for patent infringement). To "grant" such a patent license to a +party means to make such an agreement or commitment not to enforce a +patent against the party. + + If you convey a covered work, knowingly relying on a patent license, +and the Corresponding Source of the work is not available for anyone +to copy, free of charge and under the terms of this License, through a +publicly available network server or other readily accessible means, +then you must either (1) cause the Corresponding Source to be so +available, or (2) arrange to deprive yourself of the benefit of the +patent license for this particular work, or (3) arrange, in a manner +consistent with the requirements of this License, to extend the patent +license to downstream recipients. "Knowingly relying" means you have +actual knowledge that, but for the patent license, your conveying the +covered work in a country, or your recipient's use of the covered work +in a country, would infringe one or more identifiable patents in that +country that you have reason to believe are valid. + + If, pursuant to or in connection with a single transaction or +arrangement, you convey, or propagate by procuring conveyance of, a +covered work, and grant a patent license to some of the parties +receiving the covered work authorizing them to use, propagate, modify +or convey a specific copy of the covered work, then the patent license +you grant is automatically extended to all recipients of the covered +work and works based on it. + + A patent license is "discriminatory" if it does not include within +the scope of its coverage, prohibits the exercise of, or is +conditioned on the non-exercise of one or more of the rights that are +specifically granted under this License. You may not convey a covered +work if you are a party to an arrangement with a third party that is +in the business of distributing software, under which you make payment +to the third party based on the extent of your activity of conveying +the work, and under which the third party grants, to any of the +parties who would receive the covered work from you, a discriminatory +patent license (a) in connection with copies of the covered work +conveyed by you (or copies made from those copies), or (b) primarily +for and in connection with specific products or compilations that +contain the covered work, unless you entered into that arrangement, +or that patent license was granted, prior to 28 March 2007. + + Nothing in this License shall be construed as excluding or limiting +any implied license or other defenses to infringement that may +otherwise be available to you under applicable patent law. + + 12. No Surrender of Others' Freedom. + + If conditions are imposed on you (whether by court order, agreement or +otherwise) that contradict the conditions of this License, they do not +excuse you from the conditions of this License. If you cannot convey a +covered work so as to satisfy simultaneously your obligations under this +License and any other pertinent obligations, then as a consequence you may +not convey it at all. For example, if you agree to terms that obligate you +to collect a royalty for further conveying from those to whom you convey +the Program, the only way you could satisfy both those terms and this +License would be to refrain entirely from conveying the Program. + + 13. Use with the GNU Affero General Public License. + + Notwithstanding any other provision of this License, you have +permission to link or combine any covered work with a work licensed +under version 3 of the GNU Affero General Public License into a single +combined work, and to convey the resulting work. The terms of this +License will continue to apply to the part which is the covered work, +but the special requirements of the GNU Affero General Public License, +section 13, concerning interaction through a network will apply to the +combination as such. + + 14. Revised Versions of this License. + + The Free Software Foundation may publish revised and/or new versions of +the GNU General Public License from time to time. Such new versions will +be similar in spirit to the present version, but may differ in detail to +address new problems or concerns. + + Each version is given a distinguishing version number. If the +Program specifies that a certain numbered version of the GNU General +Public License "or any later version" applies to it, you have the +option of following the terms and conditions either of that numbered +version or of any later version published by the Free Software +Foundation. If the Program does not specify a version number of the +GNU General Public License, you may choose any version ever published +by the Free Software Foundation. + + If the Program specifies that a proxy can decide which future +versions of the GNU General Public License can be used, that proxy's +public statement of acceptance of a version permanently authorizes you +to choose that version for the Program. + + Later license versions may give you additional or different +permissions. However, no additional obligations are imposed on any +author or copyright holder as a result of your choosing to follow a +later version. + + 15. Disclaimer of Warranty. + + THERE IS NO WARRANTY FOR THE PROGRAM, TO THE EXTENT PERMITTED BY +APPLICABLE LAW. EXCEPT WHEN OTHERWISE STATED IN WRITING THE COPYRIGHT +HOLDERS AND/OR OTHER PARTIES PROVIDE THE PROGRAM "AS IS" WITHOUT WARRANTY +OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING, BUT NOT LIMITED TO, +THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR +PURPOSE. THE ENTIRE RISK AS TO THE QUALITY AND PERFORMANCE OF THE PROGRAM +IS WITH YOU. SHOULD THE PROGRAM PROVE DEFECTIVE, YOU ASSUME THE COST OF +ALL NECESSARY SERVICING, REPAIR OR CORRECTION. + + 16. Limitation of Liability. + + IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING +WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MODIFIES AND/OR CONVEYS +THE PROGRAM AS PERMITTED ABOVE, BE LIABLE TO YOU FOR DAMAGES, INCLUDING ANY +GENERAL, SPECIAL, INCIDENTAL OR CONSEQUENTIAL DAMAGES ARISING OUT OF THE +USE OR INABILITY TO USE THE PROGRAM (INCLUDING BUT NOT LIMITED TO LOSS OF +DATA OR DATA BEING RENDERED INACCURATE OR LOSSES SUSTAINED BY YOU OR THIRD +PARTIES OR A FAILURE OF THE PROGRAM TO OPERATE WITH ANY OTHER PROGRAMS), +EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE POSSIBILITY OF +SUCH DAMAGES. + + 17. Interpretation of Sections 15 and 16. + + If the disclaimer of warranty and limitation of liability provided +above cannot be given local legal effect according to their terms, +reviewing courts shall apply local law that most closely approximates +an absolute waiver of all civil liability in connection with the +Program, unless a warranty or assumption of liability accompanies a +copy of the Program in return for a fee. + + END OF TERMS AND CONDITIONS + + How to Apply These Terms to Your New Programs + + If you develop a new program, and you want it to be of the greatest +possible use to the public, the best way to achieve this is to make it +free software which everyone can redistribute and change under these terms. + + To do so, attach the following notices to the program. It is safest +to attach them to the start of each source file to most effectively +state the exclusion of warranty; and each file should have at least +the "copyright" line and a pointer to where the full notice is found. + + <one line to give the program's name and a brief idea of what it does.> + Copyright (C) <year> <name of author> + + This program is free software: you can redistribute it and/or modify + it under the terms of the GNU General Public License as published by + the Free Software Foundation, either version 3 of the License, or + (at your option) any later version. + + This program is distributed in the hope that it will be useful, + but WITHOUT ANY WARRANTY; without even the implied warranty of + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + GNU General Public License for more details. + + You should have received a copy of the GNU General Public License + along with this program. If not, see <http://www.gnu.org/licenses/>. + +Also add information on how to contact you by electronic and paper mail. + + If the program does terminal interaction, make it output a short +notice like this when it starts in an interactive mode: + + <program> Copyright (C) <year> <name of author> + This program comes with ABSOLUTELY NO WARRANTY; for details type `show w'. + This is free software, and you are welcome to redistribute it + under certain conditions; type `show c' for details. + +The hypothetical commands `show w' and `show c' should show the appropriate +parts of the General Public License. Of course, your program's commands +might be different; for a GUI interface, you would use an "about box". + + You should also get your employer (if you work as a programmer) or school, +if any, to sign a "copyright disclaimer" for the program, if necessary. +For more information on this, and how to apply and follow the GNU GPL, see +<http://www.gnu.org/licenses/>. + + The GNU General Public License does not permit incorporating your program +into proprietary programs. If your program is a subroutine library, you +may consider it more useful to permit linking proprietary applications with +the library. If this is what you want to do, use the GNU Lesser General +Public License instead of this License. But first, please read +<http://www.gnu.org/philosophy/why-not-lgpl.html>. diff --git a/Master/texmf-dist/doc/plain/gfnotation/GFnotation-doc.pdf b/Master/texmf-dist/doc/plain/gfnotation/GFnotation-doc.pdf Binary files differnew file mode 100644 index 00000000000..a32c0c75f0b --- /dev/null +++ b/Master/texmf-dist/doc/plain/gfnotation/GFnotation-doc.pdf diff --git a/Master/texmf-dist/doc/plain/gfnotation/GFnotation-doc.tex b/Master/texmf-dist/doc/plain/gfnotation/GFnotation-doc.tex new file mode 100644 index 00000000000..d57cc991057 --- /dev/null +++ b/Master/texmf-dist/doc/plain/gfnotation/GFnotation-doc.tex @@ -0,0 +1,1186 @@ +% This file is part of the CTAN package named gfnotation. +% +% This is the users guide to the TeX macros ``GFnotation.tex''. +% GFnotation.tex: typeset G. Frege's notation of the Begriffsschrift or +% the Grundgesetze der Arithmetik in plain TeX +% +% Copyright (C) 2015 Udo Wermuth (author) +% +% This program is free software: you can redistribute it and/or modify +% it under the terms of the GNU General Public License as published by +% the Free Software Foundation, either version 3 of the License, or +% (at your option) any later version. +% +% This program is distributed in the hope that it will be useful, +% but WITHOUT ANY WARRANTY; without even the implied warranty of +% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +% GNU General Public License for more details. +% +% You should have received a copy of the GNU General Public License +% along with this program. If not, see <http://www.gnu.org/licenses/>. +% %%% +% %%% GFnotation +% %%% +\input amssym.def +\catcode`\ß=11 +\let\nosubst=f +\let\showrotation=t \input rotate +\let\fgefontsknown=t +\input GFnotation +\gfbslognotationtrue +\gfbszeigestatstrue +% %%% +% %%% verbatim macros (from manmac.tex) +% %%% +\newskip\ttglue {\tt\global\ttglue=0.5em plus 0.25em minus 0.15em } +\def\ttverbatim{\begingroup \frenchspacing + \catcode`\\=12 \catcode`\{=12 \catcode`\}=12 \catcode`\$=12 \catcode`\&=12 + \catcode`\#=12 \catcode`\%=12 \catcode`\~=12 \catcode`\_=12 \catcode`\^=12 + \obeyspaces \obeylines \tt} +\def\verbatimspace{\ifvmode\indent\fi\space} +{\obeyspaces \gdef\makespaceverbspace{\def {\verbatimspace}}} +\outer\def\verbatim{$$\ifdim\parskip>0pt + \abovedisplayskip=\parskip \abovedisplayshortskip=\parskip + \belowdisplayskip=\parskip \belowdisplayshortskip=\parskip + \else + \abovedisplayskip=3pt \abovedisplayshortskip=3pt + \belowdisplayskip=3pt \belowdisplayshortskip=3pt + \fi + \let\par=\endgraf \ttverbatim \makespaceverbspace \parskip=0pt + \catcode`\§=0 \advance\leftskip by 10pt \ttfinish} +{\catcode`\§=0 §catcode`§\=12 % § is temporary escape character + §obeylines % end of line is active + §gdef§ttfinish#1^^M#2\endverbatim{§vbox{#2}§endgroup$$}} +\catcode`\¤=\active +{\obeylines \gdef¤{\ttverbatim \spaceskip\ttglue \let^^M=\ \let¤=\endgroup}} +% %%% +% %%% Examples +% %%% +\def\Econt{\goodbreak\bgroup + \parskip=0pt \leftskip=3\parindent \rightskip=\leftskip \parindent=0pt } +\def\Epause{\par\egroup} +\def\Example#1{\bigskip\Econt\noindent{\bf Example #1.}\ } +\def\Eend#1{\ifnum#1>0 \vskip-\baselineskip\fi + \hfill\vrule height 7pt depth 1pt width 3pt \Epause\bigskip} +% %%% +% %%% hyphenation exceptions +% %%% +\hyphenation{Gottlob Frege Begriffs-schrift Grund-gesetze} +% %%% +% %%% other +% %%% +\def\\{\par\vskip0pt plus.3\vsize\penalty-253\vskip0pt plus-.3\vsize\relax} +\def\AmSTeX{$\cal A\kern-.1667em\lower.5ex\hbox{$\cal M$}\kern-.075em S$-\TeX} +\def\La{L\kern-3pt \raise.42ex\hbox{$\scriptstyle A$}} +\def\LaTeX{\La\kern-.15em\TeX} +% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +\parskip=0.25\baselineskip +\settabs 6 \columns +% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +\font\titlefont=cmssdc10 at 36pt +\font\subtitlefont=cmssdc10 at 17pt +% +\centerline{\titlefont Users Guide} +\bigskip +\centerline{\subtitlefont GFnotation.tex (version 2.9, 29.03.2015)} + +% %%%%%%%%%%% +\beginsection 1. Description + +This package implements macros to typeset formulas and inferences in +Gottlob Frege's notation in the style of his ``Begriffsschrift, eine der +arithmetischen nachgebildete Formelsprache des reinen Denkens'' (see +[1]) or in the style of his main work ``Grundgesetze der Arithmetik'' +(see [2]). Here is an example of a single +formula: \frege|{..\gA.{*.a.{f(\da)}}}. And this is a complete +inference: +\nlp4\*_[-\*-:-\ce{$\gA$} +\nlp4\*___\*_'-\ce{$\gB$} +\nlp4\*_[-\*---\ce{$\gB$} +\nlp4\*---\*---\*--- +\nlp4\*_[-\*---\ce{$\gA$} . + +The package has two input formats, the so-called ``symbolic +representation'' and the ``short form.'' The short form outputs the +formulas either in the style of Frege's {\it Begriffsschrift\/} or in +the style that is used in his {\it Grundgesetze}. The above formulas +are in the style of the {\it Begriffsschrift\/}; here is the first one +in the style of the {\it Grundgesetze\/}: +\toggleGGstyle\frege|{..\gA.{*.a.{f(\da)}}}.\toggleGGstyle + +{\it Note\/}: This users guide shows how to work with the package. +It does not explain the constructions and symbols in Frege's +notation. + + +% %%%%%%%%%%% +\beginsection 2. Elements of Frege's notation + +{\bf a) Letters.}\ Frege used lowercase roman letters, $a$, $b$, +$c$, \dots, uppercase Greek letters $\gA$, $\gB$, $\gG$, \dots, +lowercase Greek letters $\ka$, $\kb$, $\kg$, \dots, and Fraktur +letters $\da$, $\de$, $\dF$, \dots\thinspace. + +\noindent +{\bf b) Formulas (Begriffsschrift).}\ +The following notation is used by Frege to build formulas: +\smallskip +\+&{\it Content stroke\/}: \*---\ze{$\gA$}. + &&{\it Judgment\/}: \*[--\ze{$\gA$}.\cr +\smallskip +\+&{\it Negation\/}: \*-~-\ze{$\gA$}. + &&{\it Affirmation\/}: \*-+-\ze{$\gA$}.\cr + \smallskip +\+&{\it Condition\/}: \frege .{..\gB.\gA}. + &&{\it Generality\/}: \frege .{*.a.{\gF(\da)}}.\cr +\+&{\it Condition stroke\/}: \*_!_. + &&{\it Definition\/}: \*"3- $((\gA)\equiv\gB)$.\cr +\smallskip +\+&{\it Substitution\/}: $a$\*_|_$f(a)$.\cr + +\noindent +{\bf c) Inferences (Begriffsschrift).}\ +For inferences two types of lines are used: +\smallskip +\+&{\it Single line\/}: \*---\*---. + &&{\it Double lines\/}: \*===\*===.\cr +\smallskip +\+&{\it Separator between inference chains\/}:\cr +\decollator4 + +\noindent +{\bf d) Terminal symbols (Begriffsschrift).}\ +Four special constructions appear in the {\it Begriffsschrift\/}: +\smallskip +\+&$\gfvererbe\kd\ka{{x(\ka)}}{{f(\kd,\ka)}}$, \quad$\gffolgt\kg\kb{f(x_\kg,y_\kb)}$, +\quad$\gfgehoertan\kg\kb{f(x_\kg,z_\kb)}$, \quad$\gfeindeutig\kd\ke{f(\kd,\ke)}$.\cr + +\toggleGGstyle +\gfbskeinekompaktehoehlungtrue +\noindent +{\bf e) Formulas (Grundgesetze).}\ +The following notation is used by Frege to build formulas: +\smallskip +\+&{\it Content stroke\/}: \frege.{=.\gA}. + &&{\it Judgment\/}: \frege|{=.\gA}.\cr +\smallskip +\+&{\it Negation\/}: \frege.{=-\gA}. + &&{\it Affirmation\/}: \frege.{=+\gA}.\cr + \smallskip +\+&{\it Condition\/}: \frege .{..\gB.\gA}. + &&{\it Generality\/}: \frege .{*.a.{\gF(\da)}}.\cr +\+&{\it Condition stroke\/}: \*_!_. + &&{\it Definition\/}: \*"39 $\gA=\gB$.\cr + +\noindent +{\bf f) Inferences (Grundgesetze).}\ +For inferences eight types are used: +\smallskip +\+&{\it Single line\/}: \*?--\*?--. + &&{\it Double lines\/}: \*?==\*?==.\cr +\smallskip +\+&{\it Dashed line\/}: \*?-_\*?-_. + &&{\it Dashed double lines\/}: \*?=_\*?=_.\cr +\smallskip +\+&{\it Single/double line\/}: \*?=*\*?=*. + &&{\it Dot/dashed line\/}: \*?.-\*?.-.\cr +\smallskip +\+&{\it Contraposition\/}: \*?>x. + &&{\it Quantification\/}: \*?>u.\cr +\smallskip +\+&{\it Separator\/}: \gfggtrenner.\cr + +\noindent +{\bf g) Special symbols (Grundgesetze).}\ +Several special characters appear in the {\it Grundgesetze\/}: +\smallskip +\+&{\it symbols\/}: $\Gbf$ \G0 \G1 $\Guu$\cr +\smallskip +\+&{\it unary operators\/}: \G! $\kasl$ \GI\ $\G>$ \G- \G~ $\G*$ + $\G6$ $\Gf$ $\Gp$ $\GUorg$ $\Gnorg$ +&&&{\it last two from the fge fonts\/}: $\GU$ $\Gn$\cr +\smallskip +\+&{\it binary operators\/}: $\G^$ $\G_$ $\G;$ $\Gfm$ $\Gsm$ + $\G<$ $\Gmf$ $\Gl$ +&&&{\it rotated\/}: $\Gy$ $\Ge$ $\Gc$ $\GF$ $\Gss$\cr +\toggleGGstyle + + +% %%%%%%%%%%% +\beginsection 3. How to load the package + +The package requires characters that come with \AmSTeX\ (see [3]); +the following statement must be given before the package is loaded: +¤\input amssym.def¤. Then the package is loaded with the statement +¤\input GFnotation¤. + +The package has two styles: the one that is used in the {\it +Begriffsschrift\/} and the one that is used in the {\it Grundgesetze}. +If you want to work with the style of the {\it Grundgesetze\/} several +external flags are available. + +First, if only inferences without substitutions are needed the line +¤\let\nosubst=t¤ should be entered before ¤GFnotation¤ is loaded. This +avoids typesetting errors and saves some \TeX\ registers. Second, the +flag ¤\let\showrotation=t¤ can be set to output some terminal symbols +of the {\it Grundgesetze\/} rotated. Then ¤\input rotate¤ (see [4]) +must be stated too. Otherwise the symbols are not shown as rotated +symbols (some DVI screen drivers can't do PS-rotation). The affected +symbols are shown in Section~2g. Third, the flag +¤\let\fgefontsknown=t¤ can be set to indicate that the fge-fonts by +J.~J.~Green (see~[5]) are available. Then some symbols of these fonts +are used in the output. The affected symbols are shown in Section~2g. + +After the package has been loaded two flags can be set (independent of the +style). +\item{1.}¤\gfbslognotationtrue¤ writes all formulas, which are given in the +short form, in their symbolic representation into the log file of the +\TeX\ run. +\item{2.}¤\gfbszeigestatstrue¤ writes a \TeX\ message for each formula in +short form if its number of lines is a new maximum. + +By default the package activates the style that is used in the {\it +Begriffsschrift}. To switch to the style of the {\it Grundgesetze\/} +the global acting command ¤\toggleGGstyle¤ shall be given. + +Therefore a typical start is coded in the following way if the style +of the {\it Begriffschrift\/} is required: +\verbatim +\input amssym.def +\input GFnotation +\gfbslognotationtrue % log short form formulas in symbolic representation +\gfbszeigestatstrue % inform about maximum number of lines of short form formulas +\endverbatim + +Otherwise, the style of the {\it Grundgesetze\/} is started with +\verbatim +\input amssym.def +%%% external flags: +\let\nosubst=t % substitutions aren't needed +\let\showrotation=t \input rotate % activate this line if PS-rotation works +%\let\fgefontsknown=t % activate this line if the fge-fonts are available +\input GFnotation +%%% internal flags: +\gfbslognotationtrue % log short form formulas in symbolic representation +\gfbszeigestatstrue % inform about maximum number of lines of short form formulas +%%% define the style of the output: +\toggleGGstyle % use the style of the Grundgesetze +\endverbatim + + +% %%%%%%%%%%% +\beginsection 4. Shortcuts for letters + +The characters that Frege used (except the roman letters) are coded +with two letter shortcuts. The first letter indicates how the second +letter is output. Uppercase Greek letters are introduced by `g', +lowercase Greek letters by `k', and the Fraktur letters by `d': +¤$\gA$¤ outputs~$\gA$, ¤$\ka$¤ outputs~$\ka$, and ¤$\da$¤ +outputs~$\da$. + +Here is the list of the uppercase Greek letters; the coding follows~[6]. +\smallskip +\+&¤$\gA$¤: $\gA$& ¤$\gB$¤: $\gB$& ¤$\gG$¤: $\gG$& ¤$\gD$¤: $\gD$& ¤$\gE$¤: $\gE$\cr +\+&¤$\gZ$¤: $\gZ$& ¤$\gH$¤: $\gH$& ¤$\gJ$¤: $\gJ$& ¤$\gI$¤: $\gI$& ¤$\gK$¤: $\gK$\cr +\+&¤$\gL$¤: $\gL$& ¤$\gM$¤: $\gM$& ¤$\gN$¤: $\gN$& ¤$\gX$¤: $\gX$& ¤$\gO$¤: $\gO$\cr +\+&¤$\gP$¤: $\gP$& ¤$\gR$¤: $\gR$& ¤$\gS$¤: $\gS$& ¤$\gT$¤: $\gT$& ¤$\gU$¤: $\gU$\cr +\+&¤$\gF$¤: $\gF$& ¤$\gQ$¤: $\gQ$& ¤$\gY$¤: $\gY$& ¤$\gW$¤: $\gW$\cr + +For the Fraktur letters only a subset of the alphabets is provided; +these are the letters that appear in the {\it Begriffsschrift\/} or in +part~1 of Vol.~1 of the {\it Grundgesetze\/}: +\smallskip +\+&¤$\da$¤: $\da$& ¤$\dc$¤: $\dc$& ¤$\dd$¤: $\dd$& ¤$\de$¤: $\de$& ¤$\df$¤: $\df$\cr +\+&¤$\dg$¤: $\dg$& ¤$\dm$¤: $\dm$& ¤$\dn$¤: $\dn$& ¤$\ddo$¤: $\ddo$&¤$\ddp$¤: $\ddp$\cr +\+&¤$\dq$¤: $\dq$& ¤$\dr$¤: $\dr$& ¤$\dt$¤: $\dt$& ¤$\du$¤: $\du$& ¤$\dF$¤: $\dF$\cr + +{\it Note\/}: Commands like ¤\dp¤ or ¤\do¤ shouldn't change their +plain \TeX\ meaning. Therefore the commands for the letters `o' and +`p' are build with two `d's. + +\begingroup\def\ds{{\frak s}} % keep this definition local +You can add more letters using a simple +¤\def¤. For example, to add $\ds$ declare ¤\def\ds{{\frak s}}¤. +\endgroup + + +% %%%%%%%%%%% +\beginsection 5. Input of formulas using the + ``symbolic representation'' (Begriffsschrift) + +This input format gives complete control over the output of the +formulas. But it requires some amount of typing. All formulas are +built from symbols and three of them are grouped into the argument of +a control symbol. The control symbol is the ¤\*¤. (The original +meaning as discretionary multiplication is kept in the new control +word ¤\discretionarytimes¤.) + +In total there are 35 symbols. In the following list the parentheses +contain the sequence ¤\*"#"¤ if symbol `{\tt\#}' is explained. The +first collection lists the important symbols that are used for +hand-coding the formulas in Frege's notation. +\smallskip +% 11 symbols +\item{\tt\char95 }(\*"_") is the empty space; +\item{\tt-}(\*"-") is a horizontal line for the content stroke and the inference rule; +\item{\tt\~}(\*"~") is a horizontal line with centered negation; +\item{\tt+}(\*"+") is a horizontal line with two centered negation indicators (affirmation); +\item{\tt:}(\*":") is the then-part of the condition; +\item{\tt'}(\*"'") is the if-part of the condition; +\item{\tt!}(\*"!") is a vertical line for the condition stroke; +\item{\tt[}(\*"[") is a vertical line placed left and starts a horizontal line; +\item{\tt|}(\*"|") is the vertical line for the substitution; +\item{\tt3}(\*"3") are two vertical lines used for {\it definitions\/}; +\item{\tt=}(\*"=") are two horizontal lines. + +\smallskip\noindent +The following symbols extend the basic list and can be used to +fine-tune the output. +\smallskip +% 8 symbols (sum=19) +\item{\tt"}(\*""") is a skip, that is, no output at all; +\item{\tt(}(\*"(") negation but the indication of negation is moved to the left; +\item{\tt)}(\*")") negation with the indicator moved to the right; +\item{\tt<}(\*"<") negation: the indicator is placed at the left end; +\item{\tt>}(\*">") negation: the indicator is placed at the right end; +\item{\tt\^{}}(\*"^") affirmation with indicators moved to the left; +\item{\tt/}(\*"/") affirmation with indicators moved to the right; +\item{\tt]}(\*"]") is a vertical line placed right, that is, only the judgment stroke is printed. + +For the generality a letter must be given. Therefore the parentheses +contain the sequence ¤\*#a.¤ (¤\*@a"¤ for {\tt @}). Instead of the +letter `a' any other letter can be used that is available in the +Fraktur font (see Section~4). A triple for the generality must be +started with one of the following symbols {\tt.,`;@}. If it is not +the {\tt @} then the symbol after the letter must be one of +{\tt.,`;}\thinspace. +\smallskip +% 5 symbols (sum=24) +\item{\tt.}(\*.a.) is a short vertical line; +\item{\tt,}(\*,a.) is a short vertical line with a centered negation indicator; +\item{\tt`}(\*`a.) represents negation but the indicator is moved to the left; +\item{\tt;}(\*;a.) is a short vertical line with affirmation; +\item{\tt @}(\*@a") signals (without any output) that a letter for the generality follows. + +{\it Note\/}: The letter `{\tt\ss}' is special. It uses the content of +the token register ¤\dsz¤. For example, with the default ¤\dsz={\xi}¤ +¤\*.¤{\tt\ss}¤.¤ outputs \*.ß.. Of course, {\tt\ss} must be a letter +so for plain \TeX\ the command ¤\catcode`\¤{\tt\ss}¤=11¤ must be +entered before ¤\input GFnotation¤ is done. + +\Example1 +The formula \ +\vtop{% + \hbox{\strut\*[-:\*--- $\gA$} + \hbox{\strut\*__'\*.a. $f(\da)$}} +of Section~1 can be coded in the following way: +\verbatim +\vtop{% + \hbox{\strut\*[-:\*--- $\gA$} + \hbox{\strut\*__'\*.a. $f(\da)$}} +\endverbatim\Eend1 + +The last list contains symbols that are used by the short form. The +symbols do not try to have a mnemonic representation for their +output. Most of these symbols can ``change'' and stand for one of two +symbols from the above lists. +\smallskip +% 11 symbols (sum=35) +\item{\tt0}negation either moved to the left or the right: {\tt0=()} +\item{\tt1}affirmation: {\tt1=\^{}/} +\item{\tt2}again affirmation: {\tt2=\^{}+} +\item{\tt4}not required content strokes: {\tt4=-"} +\item{\tt5}not required empty space: {\tt5=\char95"} +\item{\tt6}judgment strokes: {\tt6=[]} +\item{\tt7}negated generality: {\tt7=`,} +\item{\tt8}again negation: {\tt8=<\~{}} +\item{\tt9}represents a content stroke that has only one third of its usual length; +\item{\tt*}is a skip whose length is multiplied by $5/3$ to get back into alignment after a {\tt9}; +\item{\tt\$} is used only with a generality and represents either a short content stroke or an empty space. + + +% %%%%%%%%%%% +\beginsection 6. Input for inference chains in the + ``symbolic representation'' (Begriffsschrift) + +In order to typeset complete inferences several formulas must be +positioned in a chain and the rule for the inference has to be entered. +The construction of Example~1 with ¤\vtop¤, ¤\hbox¤, and ¤\strut¤ is +shortened to a single command ¤\nlp¤. The terminal symbols become +an argument of a second command ¤\ce¤. +\smallskip +\item{1.}¤\nlp<n>¤ starts a new line and sets the following text {\tt<n>} units to the right; +\item{2.}¤\ce{<s>}¤ outputs the string {\tt<s>} with some spacing at the end of a line. + +\Example2 +This is the implementation of the inference in Section~1, that is +\nlp4\*_[-\*-:-\ce{$\gA$} +\nlp4\*___\*_'-\ce{$\gB$} +\nlp4\*_[-\*---\ce{$\gB$} +\nlp4\*---\*---\*--- +\nlp4\*_[-\*---\ce{$\gA$}\qquad: +\smallskip +\verbatim +\nlp4\*_[-\*-:-\ce{$\gA$} +\nlp4\*___\*_'-\ce{$\gB$} +\nlp4\*_[-\*---\ce{$\gB$} +\nlp4\*---\*---\*--- +\nlp4\*_[-\*---\ce{$\gA$} . +\endverbatim\Eend1 + +\noindent +For complete inferences with substitutions more commands are +required: +\smallskip +\item{3.}¤\ci{<s>}¤ is like ¤\ce¤ but must be used in the line and spaces that follow are ignored; +\item{4.}¤\nlpc<n>{<s>}¤ acts like ¤\nlp<n>¤ and sets the string {\tt<s>} to the left in the white space; +\item{5.}¤\fono{<m>}¤ outputs {\tt<m>} as the number of the formula at the right end of the previous line; +\item{6.}¤\rep<n><f>¤ repeats the ¤\*¤-formula {\tt<f>} {\tt<n>} times; +\item{7.}¤\bcc<n>/<p><m>:<c><f>\ecc¤ typesets an inference rule. +{\tt<n>} is the position to the right, {\tt<m>} is a formula number used in the inference, +and {\tt<f>} is the rule itself. The parameter {\tt<p>} is either `l', 'm', or `r' to +position the formula number to the left, in the middle, or to the right. +And {\tt<c>} is either `.'\ or `:'\ to output one or two colons after the formula number. + +\Example3 +The following code +\Epause +\verbatim + \nlp4\ci{\hss\thinspace58\hss}\rep3\*___\*_[-\*-:-\*---\*-:-\ce{$f(b)$} +\nlpc4{$f(A)$}\*_|_\*-:-\ci{$f(A)$}\rep2\*___\*_!_\*___\*_'-\ce{$g(b)$} + \nlp4\*_|_\*_'-\ci{$g(A)$}\rep2\*___\*_'-\*.a.\*-:-\ce{$f(\da)$} + \nlpc4{$c$}\*_|_\ci{$b$} \rep3\*___\*___\*___\*_'-\ce{$g(\da)$} + \bcc4/m30:.\rep3\*___\null \rep6\*---\ecc + \nlpc4{$a$}\*_|_\ci{$f(b)$} \rep2\*___\*_[-\*-:-\*-:-\*,a.\*-:-\ce{$f(\da)$} + \nlpc4{$c$}\*_|_\ci{$g(b)$} \rep2\*___\*___\*_!_\*_!_\*___\*_'-\ce{$g(\da)$} + \nlpc4{$b$}\*_|_\*.a.\*-:-\ci{$f(\da)$} \*___\*_!_\*_'-\*---\*--(\ce{$f(b)$} + \nlp4\*_|_\*___\*_'-\ci{$g(\da)$} \*___\*_'-\*---\*---\*---\ce{$g(b)$} +\fono{59} +\endverbatim\Econt + +outputs formula~59 of the {\it Begriffsschrift}: +\smallskip + \nlp4\ci{\hss\thinspace58\hss}\rep3\*___\*_[-\*-:-\*---\*-:-\ce{$f(b)$} +\nlpc4{$f(A)$}\*_|_\*-:-\ci{$f(A)$}\rep2\*___\*_!_\*___\*_'-\ce{$g(b)$} + \nlp4\*_|_\*_'-\ci{$g(A)$}\rep2\*___\*_'-\*.a.\*-:-\ce{$f(\da)$} + \nlpc4{$c$}\*_|_\ci{$b$} \rep3\*___\*___\*___\*_'-\ce{$g(\da)$} + \bcc4/m30:.\rep3\*___\null \rep6\*---\ecc + \nlpc4{$a$}\*_|_\ci{$f(b)$} \rep2\*___\*_[-\*-:-\*-:-\*,a.\*-:-\ce{$f(\da)$} + \nlpc4{$c$}\*_|_\ci{$g(b)$} \rep2\*___\*___\*_!_\*_!_\*___\*_'-\ce{$g(\da)$} + \nlpc4{$b$}\*_|_\*.a.\*-:-\ci{$f(\da)$} \*___\*_!_\*_'-\*---\*--(\ce{$f(b)$} + \nlp4\*_|_\*___\*_'-\ci{$g(\da)$} \*___\*_'-\*---\*---\*---\ce{$g(b)$} +\fono{59}\Eend0 + +\noindent +One more command is required for collections of inferences: +\item{8.}¤\decollator<l>¤ outputs a thick line of width ¤0.<l>\hsize¤. The line is +centered. It is preceded and followed by vertical space. + +\Example4 +Here are some inferences of the {\it Begriffsschrift\/}: +\outof p3,0"1"with\thatis +\formula p9|{..{..a.b}.a} +\followswith p3"8"a.p8s5 +\substituting p3 d:a \whichgives +\formula p9|{..{..a.a}.b} +\named "26" +\decollator4 +\outof p3,0"26"with b:{..{..a.b}.a} \thatis +\formula p8|{..{=.{..a.a}}.{..{..a.b}.a}} +\followswith p3"1"a:p8s5 +\formula p8|{=.{=.{..a.a}}} +\named "27" + +The command ¤\decollator4¤ appears after formula~26. +\Eend0 + + +% %%%%%%%%%%% +\beginsection 7. Input of formulas using the ``short form'' + +This input format reduces the amount of typing compared to the +symbolic representation. It follows given rules and produces as an +intermediate step the code of the symbolic representation. + +The input is recursively entered using four constructions: +\smallskip +\item{1.}{\tt=<}sign{\tt>\char"7B<}formula{\tt>\char"7D} to add a +signed content stroke in front of a formula; +\item{2.}{\tt<}sign{\tt><}sign{\tt>\char"7B<}formula{\tt>\char"7D<}% + sign{\tt>\char"7B<}formula{\tt>\char"7D} +to build a signed condition from two signed formulas; +\item{3.}{\tt*<}sign{\tt><}character{\tt><}sign{\tt>\char"7B<}% + formula{\tt>\char"7D} to add a signed +concavity in front of a signed formula; +\item{4.}{\tt!\char92<}nameofdef{\tt><}arguments{\tt>} to insert a +previously defined subformula. + +\noindent +Here {\tt<}formula{\tt>} is either a valid formula constructed with +the four rules or a terminal string (both are typeset in math mode) +and {\tt<}sign{\tt>} is one of the following symbols: +\item{\tt.} represents no sign; +\item{\tt-} represents the negation; +\item{\tt+} represents the affirmation. + +In rule~4 {\tt<}nameofdef{\tt>} is together with the preceding +backslash a defined control word that has at most three arguments +given in {\tt<}arguments{\tt>}. The control word must define a part +of a formula. This rule implements {\sl macro expansion\/} to avoid +retyping of often used parts in formulas. + +Most formulas are created by rules~2 and~3; rule~1 is only needed to +type a single line. + +{\it Important note\/}: The braces around {\tt<}formula{\tt>} can be +omitted if the formula is a terminal string that consists of a single +token. Double curly braces are required around terminal strings that +have more than five tokens. But single braces must always be used for +formulas in rules 1--3, which are not terminal strings. (In Example~5 +below case~i shows that a single token needs no braces. The cases ii +and~iii show the use of single and double curly braces.) + +Formulas that are created by the above rules must be given to the +following commands: +\smallskip +\item{1.}¤\frege<j>{<f>}¤ where {\tt<f>} is a formula created by the above +stated rules and {\tt<j>} is either `{\tt.}'\ or `{\tt|}'. +\item{2.}¤\formula p<n><j>{<f>}¤ adds a position parameter {\tt<p>} to +move the formula {\tt<n>} units to the right. + +\noindent +The formula {\tt<f>} is output as a judgment if {\tt<j>} equals +{\tt|}. The command ¤\frege¤ shall be used in running text, +¤\formula¤ in vertical mode. But ¤\frege¤ doesn't start a paragraph; +use ¤\indent¤ (or ¤\noindent¤) if ¤\frege¤ is the first item +in a paragraph. + +\Example5 +\def\0#1{*.a.{#1(\da)}} +Here are a few examples for all four rules: +\smallskip +\advance\leftskip by 20pt +\item{i)}¤\frege|{=-\gA}¤ outputs \frege|{=-\gA}. +\item{ii)}¤\frege.{-.\gA-{{g(\ka,\kb)}}}¤ outputs \frege.{-.\gA-{{g(\ka,\kb)}}}. +\item{iii)}¤\frege.{*-a+{f(\da)}}¤ outputs \frege.{*-a+{f(\da)}}. +\item{iv)}¤\def\0#1{*.a.{#1(\da)}}¤ together with ¤\frege|{-.\gA-{!\0f}}¤ +outputs \frege|{-.\gA-{!\0f}}. +\smallskip +\advance\leftskip by -20pt +The output of iv) is nearly the formula of Section~1 (\frege|{..\gA.{!\0f}}); +it can be coded (without ¤\0¤) as ¤\frege|{..\gA.{*.a.{f(\da)}}}¤. +\Eend0 + +Of course, a formula in Frege's notation that has several lines is not +easy to read in a sequential form. The periods and braces do not help +to make the structure of that formula easy to recognize. +I suggest to copy a Frege formula from left to right and from bottom +to top and to use more than one line for the sequential coding. + +\Example6 +This example shows how to construct in a structured manner the short +form of a given formula, which is written in Frege's notation. +The formula is \frege|{.-{..\gA.\gB}.{*.a.{..\gG-\gD}}}. + +Step~1: The formula is a judgment and starts at the left with a +condition, whose upper line contains a negation indicator. +So the coding starts with +\verbatim +\frege|{.-{}.{}} +\endverbatim + +Or write it in two lines to make the structure visible: +\verbatim +\frege|{.-{} + .{}} +\endverbatim + +Step~2: The bottom part starts with a concavity, so the input becomes +\verbatim +\frege|{.-{} + .{*.a.{}}} +\endverbatim + +Step~3: A simple condition comes after the concavity +\verbatim +\frege|{.-{} + .{*.a.{..\gG-\gD}}} +\endverbatim + +And the final step is to add the condition in the upper part: +\verbatim +\frege|{.-{..\gA.\gB} + .{*.a.{..\gG-\gD}}} +\endverbatim +\medskip +{\it Note\/}: The input +\verbatim +\frege|{..{-.\gA.\gB} + .{*.a.{..\gG-\gD}}} +\endverbatim +outputs +\frege|{..{-.\gA.\gB} + .{*.a.{..\gG-\gD}}}, +which looks very similar to the given formula but, of course, +the negation indicator in the upper part has moved a little bit +to the right. +\Eend0 + + +% %%%%%%%%%%% +\beginsection 8. Inferences of the Begriffsschrift in the ``short form'' + +Five commands are available to typeset inferences with the short form: +\smallskip +\item{1.}¤\outof p<n>,<o>"<m>"with<r>\thatis¤ starts the inference chain. +The parameter {\tt<n>} is the number of units the output is moved to +the right, {\tt<m>} is a number of a formula, {\tt<o>} is an offset to +position the number {\tt<m>} {\tt<o>} lines lower, and {\tt<r>} is +either empty or a space separated list of pairs {\tt v:F} to indicate +the substitution of {\tt v} by the formula {\tt F}. +\item{2.}¤\use p<n>"<m>"¤ is a shortcut of ¤\outof¤ if the parameters {\tt<o>} +and {\tt<r>} are not needed; {\tt<o>} is set 0 and {\tt<r>} is empty. +\item{3.}¤\followswith p<n>"<m>"a<c>p<N>s<l>¤ draws the inference rule and +can be expressed in the ¤\bcc¤ macro of Section~6, no~7, as +¤\bcc{<n>}/m{<m>}:<c>\rep(<N>-<n>)\*___\rep{<l>}\*---\ecc¤. +\item{4.}¤\substituting p<n> <r>\whichgives¤ has the usual position parameter +{\tt<n>} and a list of substitutions {\tt<r>} in the above described form {\tt +v:F}. +\item{5.}¤\named "<m>"¤ outputs the number {\tt<m>} as the number of the +previous formula. + +An inference chain is typically typed with the sequence: +\verbatim +\outof ... with ... \thatis +\formula ... +\followswith ... +\substituting ... \whichgives +\formula ... +\named ... +\endverbatim + +\noindent +or if no substitution in the first formula is required, the ¤\outof¤ line +is replaced by the simpler ¤\use¤. + +\Example7 +The formula of Example~3 +\smallskip +\outof p4,0"58"with f(A):{..{f(A)}.{g(A)}} + c:b +\thatis +\formula p8|{..{..{f(b)}.{g(b)}} + .{*.a.{..{f(\da)}.{g(\da)}}}} +\followswith p4"30"a.p8s6 +\substituting p4 a:{f(b)} + c:{g(b)} + b:{*.a.{..{f(\da)}.{g(\da)}}} +\whichgives +\formula p8|{..{..{*-a.{..{f(\da)}.{g(\da)}}} + -{f(b)}} + .{g(b)}} +\named "59" + +\bigskip +has this coding: +\verbatim +\outof p4,0"58"with f(A):{..{f(A)}.{g(A)}} + c:b +\thatis +\formula p8|{..{..{f(b)}.{g(b)}} + .{*.a.{..{f(\da)}.{g(\da)}}}} +\followswith p4"30"a.p8s6 +\substituting p4 a:{f(b)} + c:{g(b)} + b:{*.a.{..{f(\da)}.{g(\da)}}} +\whichgives +\formula p8|{..{..{*-a.{..{f(\da)}.{g(\da)}}} + -{f(b)}} + .{g(b)}} +\named "59" +\endverbatim\Eend1 + + +% %%%%%%%%%%% +\beginsection 9. Terminal symbols of the Begriffsschrift + +In part~3 of the {\it Begriffsschrift\/} four symbols are +defined. They are available as \TeX\ commands. The commands get more +flexibility than the {\it Begriffsschrift\/} requires as all possible +content can be addressed by parameters. + +\item{1.}¤\gfvererbe¤ with four parameters: +¤$\gfvererbe\kd\ka{x(\ka)}{f(\kd,\ka)}$¤ outputs +$\gfvererbe\kd\ka{x(\ka)}{f(\kd,\ka)}$. +\item{2.}¤\gffolgt¤ with three parameters: +¤$\gffolgt\kg\kb{f(x_\kg,y_\kb)}$¤ outputs $\gffolgt\kg\kb{f(x_\kg,y_\kb)}$. +\item{3.}¤\gfgehoertan¤ with three parameters: +¤$\gfgehoertan\kg\kb{f(x_\kg,z_\kb)}$¤ outputs +$\gfgehoertan\kg\kb{f(x_\kg,z_\kb)}$. +\item{4.}¤\gfeindeutig¤ with three parameters: +¤$\gfeindeutig\kd\ke{f(\kd,\ke)}$¤ outputs $\gfeindeutig\kd\ke{f(\kd,\ke)}$. + +\noindent +I use shortcuts for these special terminal symbols and reduce the +number of parameters to the amount that is used in the text; +see Example~11 below. + + +% %%%%%%%%%%% +\beginsection 10. Output style of the Grundgesetze + +\toggleGGstyle +Frege made changes to the notation in his main work. A command and +several flags are defined to switch from the style of the {\it +Begriffsschrift\/} to the style of the {\it Grundgesetze}. +\smallskip +\item{1.}¤\toggleGGstyle¤ switches the styles; the default is the style of +the {\it Begriffsschrift}. Several of the changes are global so even +if the switch is made inside a group it shall be called a second time +to switch it back. This happens when it is called for the first time: +\itemitem{a)}¤\gfbsuseGGstyletrue¤ is set. Together with a call to +¤\gfbsneuestriche¤ the thickness of the lines is changed. +\itemitem{b)}¤\gfbskompakttrue¤ is set. This reduces the width of the formulas +that are input with the short form. +\itemitem{c)}¤\gfggschlussweisetrue¤ is set. This activates more symbols +to express the eight inferences of the {\it Grundgesetze\/} (see Section~12). +\itemitem{d)}¤\gfbsfonoohnepunkttrue¤ is set. No period after the number of +a formula is set in ¤\fono¤ or ¤\named¤. +\itemitem{e)}¤\gfbsnegdirekttrue¤ is set. The negation indicator touches +the content stroke. +\item{2.}The flags can be set individually, for example, to get a compact output +but keep the line thicknesses etc.\ of the {\it Begriffsschrift}. +\item{3.}To control the compact output of the generality when the flag +¤\gfbskompakttrue¤ is set more flags are available. Examples are given to +show how these flags influences the output. +\itemitem{$\alpha$)}The output is not compact if ¤\gfbskeinekompaktehoehlungtrue¤ +is set. At the left the flag is false and at the right true; the source code +is ¤\frege|{..{*-a.{\gY(\da)}}.{*.e.{\gF(\de)}}}¤: +\smallskip\indent\indent +{\gfbskompakttrue \gfbskeinekompaktehoehlungfalse +\frege|{..{*-a.{\gY(\da)}}.{*.e.{\gF(\de)}}} +}\quad +{\gfbskompakttrue \gfbskeinekompaktehoehlungtrue +\frege|{..{*-a.{\gY(\da)}}.{*.e.{\gF(\de)}}} +}. +\itemitem{$\beta$)}The output of the short form rule~1 (with the {\tt=}) can +have no effect except if the flag named ¤\gfbsaussagesichtbartrue¤ is set. +At the left the flag is false and at the right true; the line reads +¤\frege.{=.a} vs \frege.{=.{=.a}}¤: +{\gfbskompakttrue \gfbsaussagesichtbarfalse +\frege.{=.a} vs \frege.{=.{=.a}} +}\quad +{\gfbskompakttrue \gfbsaussagesichtbartrue +\frege.{=.a} vs \frege.{=.{=.a}} +} + +{\it Note\/}: Both input forms, the symbolic representation and the +short form, can be used with this style. But only the short form +creates smaller formulas if ¤\gfbscompakttrue¤ is set. The width of a +formula in symbolic representation must be changed manually if it is +not coded with the symbols of the last list in Section~5. + +\Example8 +Here is the example of Sections 1 and~5; it is coded in the +short form as ¤\frege|{..\gA.{*.a.{f(\da)}}}¤: +\frege|{..\gA.{*.a.{f(\da)}}}. +\Eend0 + + +% %%%%%%%%%%% +\beginsection 11. Setting formulas in parentheses and brackets (Grundgesetze) + +In the {\it Grundgesetze\/} some formulas must be placed in +parentheses or brackets. A few commands are provided to make this an +easy task. +\smallskip +\item{1.}¤\pfrege<x><j>{<f>}¤ acts like ¤\frege<j>{<f>}¤ and adds parentheses around +this formula. The result is stored in a box with the number {\tt<x>}. In total +there are four boxes for this task. +\item{2.}¤\bfrege<y><j>{<f>}¤ is like ¤\pfrege¤ but the formula is placed between +brackets. The pool of boxes is independent from the ¤\pfrege¤ boxes and there are +four boxes. +\item{3.}¤\pparens<x><M>¤ places the math {\tt<M>} with parentheses in the box +numbered {\tt<x>}. The boxes are taken from the pool that is available for +¤\pfrege¤. +\item{4.}¤\bparens<y><M>¤ acts like ¤\pparens¤ but it uses brackets and the +pool of boxes of ¤\bfrege¤. +\item{5.}¤\pfbox<x>¤ outputs box number {\tt<x>} from the ¤\pfrege¤ pool. +\item{6.}¤\bfbox<y>¤ outputs the box {\tt<y>} from the pool used by ¤\bfrege¤. + +\Example9 +The following formula appears on page~115 of the {\it Grundgesetze}, +vol.~1. +\Epause +\smallskip +\begingroup +\pfrege1.{.-{\ke=c}.{\ke\G^v}} +\pfrege2.{.-{\ke=b}.{\ke\G^u}} +\bfrege1.{-.{\ke=n}.{{\ke\G^\kesl\pfbox1}}} +\bfrege2.{-.{\ke=m}.{{\ke\G^\kesl\pfbox2}}} +\bfrege3.{--{{\ke\G^(\ka\G^q)}}-{..{\ke=b}-{\ka=c}}} +\pfrege1.{-.{\ke=n}.{{\ke\G^\kesl\pfbox1}}} +\pfrege2.{-.{\ke=m}.{{\ke\G^\kesl\pfbox2}}} +\pparens3{\kesl\bfbox1\G^\G>q} +\pparens4{\bfbox1\G^\G>\kasl\kesl\bfbox3} + +$$\frege|{..{..{..{{\kesl\pfbox2\G^\pfbox4}} + -{{b\G^\kesl\pfbox2}}} + -{{c\G^\kesl\pfbox1}}} + .{{\kesl\pfbox2\G^\pfbox3}}} +$$ +\endgroup +\Econt +And here is the source: +\verbatim +\pfrege1.{.-{\ke=c}.{\ke\G^v}} +\pfrege2.{.-{\ke=b}.{\ke\G^u}} +\bfrege1.{-.{\ke=n}.{{\ke\G^\kesl\pfbox1}}} +\bfrege2.{-.{\ke=m}.{{\ke\G^\kesl\pfbox2}}} +\bfrege3.{--{{\ke\G^(\ka\G^q)}}-{..{\ke=b}-{\ka=c}}} +\pfrege1.{-.{\ke=n}.{{\ke\G^\kesl\pfbox1}}} +\pfrege2.{-.{\ke=m}.{{\ke\G^\kesl\pfbox2}}} +\pparens3{\kesl\bfbox1\G^\G>q} +\pparens4{\bfbox1\G^\G>\kasl\kesl\bfbox3} +\endverbatim\smallskip\verbatim +$$\frege|{..{..{..{{\kesl\pfbox2\G^\pfbox4}} + -{{b\G^\kesl\pfbox2}}} + -{{c\G^\kesl\pfbox1}}} + .{{\kesl\pfbox2\G^\pfbox3}}} +$$\endverbatim\Eend1 + + +% %%%%%%%%%%% +\beginsection 12. Inferences of the Grundgesetze + +The list entry~1c of Section~10 needs some explanation as it extends +the list of available symbols for inferences. Two of the symbols have +no output ({\tt?}\ and {\tt>}). In the following list the text in +parentheses contains the sequence ¤\*?#"¤ or ¤\*?>#¤ for the symbol +`{\tt\#}'. +\smallskip +\item{\tt ?} (must be the first in the triple) signals that the next +two symbols build an inference line in the style of the {\it +Grundgesetze\/}. Such symbols use 50\% more space than ordinary symbols. +\item{\tt -}(\*?-") is a single horizontal stroke; +\item{\tt .}(\*?.") is a single (centered) period; +\item{\tt =}(\*?=") is a double stroke; +\item{\tt *}(\*?*") is a single stroke in the height of the upper line of the +double stroke; +\item{\tt\char95 }(\*?_") is an empty space; +\item{\tt "}(\*?"") is a skip; +\item{\tt >}has no output; the next symbol must be a {\sl transition-sign\/}: +\itemitem{\tt x}(\*?>x) it must follow a {\tt >}; +\itemitem{\tt u}(\*?>u) it must follow a {\tt >}. + +\noindent +Inferences of the {\it Grundgesetze\/} are separated by a new type of line: +\item{1.}¤\separator¤ outputs a thick line with a centered dot. + +\Example{10} +Here is an inference chain from the {\it Grundgesetze\/}: +\smallskip +\advance\rightskip by 2\rightskip +\use p3"III" +\formula p5|{.-{*.f.{..{\df(a)}.{\df(a)}}}-{a=a}} +\nlp{6.5}\*?>x +\formula p5|{..{a=a}.{*.f.{..{\df(a)}.{\df(a)}}}} +\named "$\ka$" +\separator +\use p3"I" +\formula p5|{..{f(a)}.{f(a)}} +\nlp5\*?_"\*?>u +\formula p5|{*.f.{..{\df(a)}.{\df(a)}}} +\named"$\kb$" +\bcc3/m$\ka$:.\*__"\rep3\*?--\ecc +\formula p5|{=.{a=a}} +\named"IIIe" + +\rightskip=\leftskip +\medskip +And this is the code: +\verbatim +\use p3"III" +\formula p5|{.-{*.f.{..{\df(a)}.{\df(a)}}}-{a=a}} +\nlp{6.5}\*?>x +\formula p5|{..{a=a}.{*.f.{..{\df(a)}.{\df(a)}}}} +\named "$\ka$" +\separator +\use p3"I" +\formula p5|{..{f(a)}.{f(a)}} +\nlp5\*?_"\*?>u +\formula p5|{*.f.{..{\df(a)}.{\df(a)}}} +\named"$\kb$" +\bcc3/m$\ka$:.\*__"\rep3\*?--\ecc +\formula p5|{=.{a=a}} +\named"IIIe" +\endverbatim\Eend1 + + +% %%%%%%%%%%% +\beginsection 13. Terminal symbols of the Grundgesetze + +The {\it Grundgesetze\/} has not such complex constructions as the +{\it Begriffsschrift\/} (see Section~9). But it contains a lot of +special symbols. +\smallskip +\settabs 2 \columns +\def\hsnor#1.{\hbox to 3em{\hss#1.}\ } +\+\hsnor1.¤\G!¤: $\G!\kx$.& +\hsnor16.¤\Gfm¤: $u\Gfm q$.\cr +\+\hsnor2.¤\kasl¤: $\kasl\gF(\ka)$.& +\hsnor17.¤\Gsm¤: $p\Gsm q$.\cr +\+\hsnor3.¤\G^¤: $a\G^b$.& +\hsnor18.¤\G<¤: $p\G<q$.\cr +\+\hsnor4.¤\GI¤: $\GI p$.& +\hsnor19.¤\Gy¤: $p\Gy q$.\cr +\+\hsnor5.¤\G>¤: $\G>p$.& +\hsnor20.¤\Ge¤: $p\Ge q$.\cr +\+\hsnor6.¤\GU¤: $\GUorg p$ (or $\GU p$).& +\hsnor21.¤\Gc¤: $p\Gc q$.\cr +\+\hsnor7.¤\Gn¤: $\Gnorg u$ (or $\Gn u$).& +\hsnor22.¤\Gmf¤: $p\Gmf q$.\cr +\+\hsnor8.¤\G0¤: $\G0$.& +\hsnor23.¤\G*¤: $\G*t$.\cr +\+\hsnor9.¤\G1¤: $\G1$.& +\hsnor24.¤\G6¤: $\G6s$.\cr +\+\hsnor10.¤\Gbf¤ or ¤\Gff¤: $\Gbf$.& +\hsnor25.¤\Gf¤: $\Gf s$.\cr +\+\hsnor11.¤\G-¤: $\G-q$.& +\hsnor26.¤\GF¤: $s\GF u$.\cr +\+\hsnor12.¤\G~¤: $\G~q$.& +\hsnor27.¤\Gl¤: $s\Gl u$.\cr +\+\hsnor13.¤\G_¤: $p\G_q$.& +\hsnor28.¤\Gp¤: $\Gp s$.\cr +\+\hsnor14.¤\Guu¤: $\Guu$.& +\hsnor29.¤\Gss¤ or ¤\Gsz¤: $s\Gss p$.\cr +\+\hsnor15.¤\G;¤: $o\G;a$.\cr + +\noindent +The symbols are constructed with the Computer Modern +and \AmSTeX\ fonts. But with the external flag ¤\fgefontsknown¤ the +second symbol in numbers 6 and 7 is selected (see Section~3). + +Several symbols are rotated and this requires the package {\tt +rotate.tex}. The output of unrotated symbols is activated by default; +the external flag ¤\let\showrotation=t¤ must be given to activate +rotation (see Section~3). +\toggleGGstyle + + +% %%%%%%%%%%% +\beginsection 14. Typesetting definitions + +The following command is provided to typeset definitions: +\smallskip +\item{1.}¤\gfdefinition p<n><J> <j>{<f>}=<e>¤ outputs the formula +¤\frege<j>{<f>}¤ in parentheses and sets it equal to the new symbol +{\tt<e>} if the parameter {\tt<J>} is either {\tt|} to type a judgment +or {\tt.}\ for a definition. In the style of the {\it Grundgesetze\/} +the parameter {\tt<J>} can also be {\tt:}. In this case write ¤<j><f>¤ +and this is interpreted as a math formula and not as a formula created +by ¤\frege¤. The parameter {\tt<n>} is the position parameter to move +the output the given amount of units to the right. + +\noindent +The output of a definition depends on the style. + +\Example{11} +The definition in formula~69 of the {\it Begriffsschrift\/} is: +\smallskip +\def\1#1{{\gfvererbe\kd\ka{#1(\ka)}{f(\kd,\ka)}}} +\gfdefinition p4. .{*.d.{..{*.a.{..{F(\da)}.{{f(\dd,\da)}}}}.{F(\dd)}}}={\1F} +\smallskip +In the style of the {\it Grundgesetze\/} the output is: +\smallskip +\toggleGGstyle +\def\1#1{{\gfvererbe\kd\ka{#1(\ka)}{f(\kd,\ka)}}} +\gfdefinition p4. .{*.d.{..{*.a.{..{F(\da)} + .{{f(\dd,\da)}}}} + .{F(\dd)}}}={\1F} +\toggleGGstyle +\smallskip +And here is the source (note that ¤\1¤ is a normal macro and needs no +macro expansion): +\verbatim +\def\1#1{{\gfvererbe\kd\ka{#1(\ka)}{f(\kd,\ka)}}} +\gfdefinition p4. .{*.d.{..{*.a.{..{F(\da)} + .{{f(\dd,\da)}}}} + .{F(\dd)}}}={\1F} +\endverbatim\Eend1 + +\Example{12} +Here is an example of the {\it Grundgesetze}, in which the {\tt<J>} is +a colon. +\smallskip +\advance\rightskip by 2\rightskip +\toggleGGstyle +\gfdefinition p4: \kesl(o\G^(a\G^\ke))={o\G;a} +\named "$\gX$" +\toggleGGstyle +\smallskip +\rightskip=\leftskip +And this is the source: +\verbatim +\gfdefinition p4: \kesl(o\G^(a\G^\ke))={o\G;a} +\named "$\gX$" +\endverbatim\Eend1 + + +% %%%%%%%%%%% +\beginsection 15. Commands to improve page breaks + +The formulas are never broken. A page or column break must appear +at a decollator, separator, or after an inference rule. To gain some +space the formulas can be typeset in a smaller height and depth. +(¤\offinterlineskip¤ should be set.) +\smallskip +\item{1.}¤\gfbssetzeabstand<h><d>¤ sets the height and depth between the lines to +{\tt<h>}\thinspace pt and {\tt<d>}\thinspace pt, resp.; +\item{2.}¤\gfbsreduziereabstandum<nn>¤ reduces the height and depth each by {\tt<nn>}\% +({\tt<nn>} is a two-digit number); +\item{3.}¤\gfbsabstandzuruecksetzen¤ sets height and depth to the values of ¤\strutbox¤. + +\Example{13} +The right formula uses ¤\gfbsreduziereabstandum20¤: +\smallskip +\begingroup +\offinterlineskip +\setbox0=\hbox to .3\hsize{\vtop to 30pt{% + \nlp4\*_[-\*-:-\*---\ce{$a$} + \nlp4\*___\*_'-\*-:-\ce{$c$} + \nlp4\*___\*___\*_'-\ce{$e$}\vss}\hss} +\setbox1=\hbox to .3\hsize{\vtop to 30pt{% + \nlp1\*_[-\*-:-\*---\ce{$a$} + \gfbsreduziereabstandum20 + \nlp1\*___\*_'-\*-:-\ce{$c$} + \nlp1\*___\*___\*_'-\ce{$e$}\vss}\hss} +\centerline{\box0 \box1 } +\gfbsabstandzuruecksetzen +\endgroup + +And this is the code: +\verbatim +\offinterlineskip +\setbox0=\hbox to .3\hsize{\vtop to 30pt{% + \nlp4\*_[-\*-:-\*---\ce{$a$} + \nlp4\*___\*_'-\*-:-\ce{$c$} + \nlp4\*___\*___\*_'-\ce{$e$}\vss}\hss} +\setbox1=\hbox to .3\hsize{\vtop to 30pt{% + \nlp1\*_[-\*-:-\*---\ce{$a$} + \gfbsreduziereabstandum20 + \nlp1\*___\*_'-\*-:-\ce{$c$} + \nlp1\*___\*___\*_'-\ce{$e$}\vss}\hss} +\centerline{\box0 \box1 } +\gfbsabstandzuruecksetzen +\endverbatim\Eend1 + + +% %%%%%%%%%%% +\beginsection 16. List of parameters + +Nearly all aspects of the lines that build the structure of Frege's +notation is controlled by parameters. They can be changed to fit +better with a certain type of font. But note that a couple of tests +have been made with these values to guarantee, for example, that the +affirmation can be placed in front of a quantification.\\ + +\noindent +Here is the list of registers that make up the style of the +{\it Begriffsschrift}. +\item{1.}$¤\gfbsvolleeinheit¤=\rm0.57\,em$; width of one ¤\*¤ triple +\item{2.}$¤\gfbsraise¤=\rm0.5\,ex$; height of the horizontal line +\item{3.}$¤\gfbsneg¤=\rm0.25\,ex$; height of the negation indicator +\item{4.}$¤\gfbsstrichdicke¤=\rm0.5\,pt$; thickness of the horizontal line +\item{5.}$¤\gfbsurteildicke¤=\rm1\,pt$; thickness of the judgment stroke\\ +\item{6.}$¤\gfbsuht¤=\rm1.5\,ex$; height of the judgment stroke\\ +\item{7.}$¤\gfbsudp¤=\rm0.5\,ex$; depth of the judgment stroke\\ +\item{8.}$¤\gfbsersetzungdicke¤=\rm0.8\,pt$; thickness of the substitution line\\ +\item{9.}$¤\gfbsdefdicke¤=\rm0.75\,pt$; thickness of the definition strokes +\item{10.}$¤\gfbsschlussabstand¤=\rm2.5\,pt$; distance of double lines in an inference +\item{11.}$¤\gfbsschlussdicke¤=\rm0.8\,pt$; thickness of the second line in an inference +\item{12.}$¤\gfbsdpabstand¤=\rm0.2\,em$; distance between colons in front of an inference +\smallskip +\item{13.}$¤\gfbsmaxanzahlzeilen¤=25$; the maximal amount of lines +in a single formula of the short form (the package declares for each +line one or two token and skip registers; two registers of each kind +are needed if substitutions are allowed); +\item{14.}$¤\gfbsnegpct¤=70$; when ¤\ifgfbsnegdirect¤ is set to false the negation +indicator has only a height of this percentage so that a gap occurs. +\smallskip +\noindent +And this is the list of additional dimen parameters for the style of +the {\it Grundgesetze}. +\item{15.}$¤\gfggstrichdicke¤=\rm0.58\,pt$; common line thickness +\item{16.}$¤\gfggraise¤=\rm0.14\,ex$; height of horizontal line +\item{17.}$¤\gfggneg¤=\rm0.47\,ex$; height of negation indicator +\item{18.}$¤\gfgguht¤=\rm1.4\,ex$; height of the judgment stroke +\item{19.}$¤\gfggudp¤=\rm0.9\,ex$; depth of the judgment stroke +\item{20.}$¤\gfggdpabstand¤=\rm0.06\,em$; distance between colons in front of an inference + + +% %%%%%%%%%%% +\beginsection 17. Related work + +Other people have worked on the problem to typeset Frege's notation +in \TeX\ too. J.~Parsons has developed a package {\it begriff.sty\/} +for \LaTeX\ (see [7]). Later the package was improved by +Q.~Pamp~([8]). A team that translated the {\it Grundgesetze\/} created +its own package from {\it begriff.sty\/} and called it {\it +grundgesetze.sty\/} (see [9]). It uses the fonts [5] that J.~J.~Green +has developed for the special terminal symbols in the {\it +Grundgesetze}. + + +% %%%%%%%%%%% +\beginsection 18. References + +\raggedright\frenchspacing +\item{[1]}Gottlob Frege, + {\sl Begriffsschrift, eine der arithmetischen nachgebildete Formelsprache + des reinen\hfil\break Denkens\/} + (Halle an der Saale: Louis Nebert, 1879) +\item{}``Begriffsschrift, a formula language, modeled upon that of arthmetic, for + pure thought,'' in: Jean van Heijenoort (ed.), + {\sl From Frege to G\"odel: A Sourcebook in Mathematical Logic, + 1879--1931\/},\hfil\break(Cambridge, MA: Harvard University Press, 1967), 1--82; + translation by S. Bauer-Mengelberg + +\item{[2]}Gottlob Frege, + {\sl Grundgesetze der Arithmetik --- begriffsschriftlich abgeleitet\/} + (Jena: Hermann Pohle, Volume 1 1893, Volume 2 1903) +\item{}{\sl Basic Laws of Arithmetic\/} (Oxford: Oxford Univ. Press, 2013); + translation by Philip A. Ebert, Marcus Rossberg, Crispin Wright + +\item{[3]}American Mathematical Society, {\tt amstex}, + ¤http://www.ams.org/publications/authors/tex/tex¤ or + ¤http://www.ctan.org/tex-archive/macros/amstex¤ + (accessed: 2014-11-29) + +\item{[4]}{\tt rotate}, + ¤http://www.ctan.org/tex-archive/macros/plain/contrib/misc¤ + (accessed: 2014-11-29) + +\item{[5]}J. J. Green, {\tt fge}, + ¤http://www.ctan.org/tex-archive/fonts/fge¤ + (accessed: 2014-11-29) + +\item{[6]}Silvio Levy, ``Using Greek fonts with \TeX,'' + TUGboat {\bf 9,1} (1988), 20--24 + +\item{[7]}Josh Parsons, {\tt begriff.sty}, + ¤http://www.ctan.org/tex-archive/macros/latex/contrib/begriff¤ + (accessed: 2014-11-29) + +\item{[8]}Quirin Pamp, {\tt frege.sty}, + ¤http://www.ctan.org/tex-archive/macros/latex/contrib/frege¤ + (accessed: 2014-11-29) + +\item{[9]}Marcus Rossberg, {\tt grundgesetze.sty}, + ¤http://www.ctan.org/tex-archive/macros/latex/contrib/¤\hfil\break¤grundgesetze¤ + (accessed: 2014-11-29) + +\bye +% Local Variables: +% coding: iso-latin-9-unix +% End: diff --git a/Master/texmf-dist/doc/plain/gfnotation/README b/Master/texmf-dist/doc/plain/gfnotation/README new file mode 100644 index 00000000000..04e678e9259 --- /dev/null +++ b/Master/texmf-dist/doc/plain/gfnotation/README @@ -0,0 +1,33 @@ +GFnotation.tex implements macros to typeset formulas and inferences in +Gottlob Frege's notation that is used in his book ``Begriffsschrift, eine +der arithmetischen nachgebildete Formelsprache des reinen Denkens'' or +in the style of his main work ``Grundgesetze der Arithmetik.'' + +Besides the two output styles the macros provide two input styles. A +``symbolic representation'' that codes each element of the notation +with three symbols. And a ``short form'' that generates the notation +recursively from a sequential input. + +This package is released under the GNU General Public License. +See the file COPYING. + + +The package requires the following files and packages from CTAN: + + 1) amssym.def (from amstex) + 2) amsfonts + 3) rotate.tex + 4) fge fonts (optional) + You need item 4) to compile the users guide. + + +The package consists of the following files: + +gfnotation.tex -- the macros for the notation + version 2.9, 29.03.2015 +gfnotation-doc.pdf -- a users guide +gfnotation-doc.tex -- the source of the users guide +README -- this file + +Copyright (C) 2015 Udo Wermuth (author) + u dot wermuth (at) icloud dot com diff --git a/Master/texmf-dist/tex/plain/gfnotation/GFnotation.tex b/Master/texmf-dist/tex/plain/gfnotation/GFnotation.tex new file mode 100644 index 00000000000..0b861634fed --- /dev/null +++ b/Master/texmf-dist/tex/plain/gfnotation/GFnotation.tex @@ -0,0 +1,2175 @@ +% This file is part of the CTAN package named gfnotation. +% +% GFnotation.tex: typeset G. Frege's notation of the Begriffsschrift or +% the Grundgesetze der Arithmetik in plain TeX +% +% Copyright (C) 2015 Udo Wermuth (author) +% +% This program is free software: you can redistribute it and/or modify +% it under the terms of the GNU General Public License as published by +% the Free Software Foundation, either version 3 of the License, or +% (at your option) any later version. +% +% This program is distributed in the hope that it will be useful, +% but WITHOUT ANY WARRANTY; without even the implied warranty of +% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +% GNU General Public License for more details. +% +% You should have received a copy of the GNU General Public License +% along with this program. If not, see <http://www.gnu.org/licenses/>. +\message{[(GFnotation.tex) Version 2.9 --- 29.03.2015 10:45]} +% Werte für den Stil der Begriffsschrift +% die Weite eines \*-Makroteils (Voreinstellung 0.57 em) +\newdimen\gfbsvolleeinheit \gfbsvolleeinheit = 0.57 em +% die Höhe der horizontalen Striche (Voreinstellung 0.5 ex) +\newdimen\gfbsraise \gfbsraise = 0.5 ex +% die Höhe des Negationstriches (Voreinstellung 0.25 ex) +\newdimen\gfbsneg \gfbsneg = 0.25 ex +% die Dicke der horizontalen Striche (Voreinstellung 0.5 pt) +\newdimen\gfbsstrichdicke \gfbsstrichdicke = 0.5 pt +% die Dicke des Urteilsstrichs (Voreinstellung 0.1 em) +\newdimen\gfbsurteildicke \gfbsurteildicke = 0.1 em +% die Höhe (ohne Strichdicke) (Voreinstellung 1.5 ex) +\newdimen\gfbsuht \gfbsuht = 1.5 ex +% die Tiefe des Urteilsstrichs (Voreinstellung 0.5 ex) +\newdimen\gfbsudp \gfbsudp = 0.5 ex +% die Dicke des Ersetzungsstrichs (Voreinstellung 0.08 em) +\newdimen\gfbsersetzungdicke \gfbsersetzungdicke = 0.08 em +% die Dicke eines Definitionsstrichs (Voreinstellung 0.075 em) +\newdimen\gfbsdefdicke \gfbsdefdicke = 0.075 em +% der Abstand der Striche bei Schlussketten (Voreinstellung 2.5 pt) +\newdimen\gfbsschlussabstand \gfbsschlussabstand = 2.5 pt +% und die Dicke des dickeren Striches (Voreinstellung 0.8 pt) +\newdimen\gfbsschlussdicke \gfbsschlussdicke = 0.8 pt +% der Abstand in Schlussweisen zwischen Doppelpunkten +\newdimen\gfbsdpabstand \gfbsdpabstand = 0.2 em +% Werte für den Grundgesetzestil +% Einheitsstrichdicke (Voreinstellung 0.58 pt) +\newdimen\gfggstrichdicke \gfggstrichdicke = 0.58 pt +% Höhe des Inhaltsstriches (Voreinstellung 0.14 ex) +\newdimen\gfggraise \gfggraise = 0.14 ex +% Höhe Negationszeichen (Voreinstellung 0.47 ex) +\newdimen\gfggneg \gfggneg = 0.47 ex +% Höhe des Urteilsstriches (Voreinstellung 1.4 ex) +\newdimen\gfgguht \gfgguht = 1.4 ex +% Tiefe des Urteilstriches (Voreinstellung 0.9 ex) +\newdimen\gfggudp \gfggudp = 0.9 ex +% der Abstand in Schlussweisen zwischen Doppelpunkten +\newdimen\gfggdpabstand \gfggdpabstand = 0.06 em +% Prozentangabe für die Höhe eines kurzen Negationsstrichs +\newcount\gfbsnegpct \gfbsnegpct=70 +% Die kompakte Notation benötigt für die Zeilen Register +\newcount\gfbsmaxanzahlzeilen \gfbsmaxanzahlzeilen=25 +% +% ab hier keine Änderungen vornehmen (außer am Ende Buchstaben) +% +% Setze folgendes Zeichen für Zeilenumbruch in Meldungen ein +\newlinechar=`\^^J +% Substitutionen können unterdrückt werden +\newif\ifgfbskeinesubst +\ifx t\nosubst + \message{^^JOK, substitutions are disabled^^J}% + \gfbskeinesubsttrue +\else + \gfbskeinesubstfalse +\fi +\newif\ifggsymloaded +\ifx t\fgefontsknown + \message{^^JThe family ggfam with the fge-fonts is active.^^J}% + \ggsymloadedtrue +\else + \ggsymloadedfalse +\fi +\newif\ifggrotiere +\ifx t\showrotation + \ggrotieretrue +\else + \message{^^JRotated symbols are shown unrotated.^^J}% + \ggrotierefalse +\fi +\catcode`@=11 +\def\mynewfam{\alloc@8\fam\chardef\sixt@@n} +\catcode`@=12 +\ifggsymloaded + \font\tengg=fgerm10 \font\tenggi=fgeit10 + \font\ninegg=fgerm10 at 9pt \font\nineggi=fgeit10 at 9pt + \font\eightgg=fgerm10 at 8pt \font\eightggi=fgeit10 at 8pt + \mynewfam\ggfam +\fi +\font\nineeufm=eufm9 +\font\eighteufm=eufm8 +\font\sixeufm=eufm6 +\font\tencmmib=cmmib10 \skewchar\tencmmib='177 +\font\ninecmmib=cmmib9 \skewchar\ninecmmib='177 +\font\eightcmmib=cmmib8 \skewchar\eightcmmib='177 +\font\sevencmmib=cmmib7 \skewchar\sevencmmib='177 +\font\sixcmmib=cmmib6 \skewchar\sixcmmib='177 +\font\fivecmmib=cmmib5 \skewchar\fivecmmib='177 +\expandafter\ifx\csname cmmibfam\endcsname\relax + \mynewfam\cmmibfam +\else + \message{^^JThe family cmmibfam is already defined.^^J}% +\fi +\font\tencmbsy=cmbsy10 \skewchar\tencmbsy='60 +\font\ninecmbsy=cmbsy9 \skewchar\ninecmbsy='60 +\font\eightcmbsy=cmbsy8 \skewchar\eightcmbsy='60 +\font\sevencmbsy=cmbsy7 \skewchar\sevencmbsy='60 +\font\sixcmbsy=cmbsy6 \skewchar\sixcmbsy='60 +\font\fivecmbsy=cmbsy5 \skewchar\fivecmbsy='60 +\expandafter\ifx\csname cmbsyfam\endcsname\relax + \mynewfam\cmbsyfam +\else + \message{^^JThe family cmbsyfam is already defined.^^J}% +\fi +\font\sevenit=cmti7 +\font\sixit=cmti7 at 6pt +\font\fiveit=cmti7 at 5pt +\font\twelvei=cmmi10 at 12pt \skewchar\twelvei='177 +\def\hexno#1{\ifcase#1 0\or 1\or 2\or 3\or 4\or 5\or 6\or 7\or 8\or + 9\or A\or B\or C\or D\or E\or F\fi} +\newtoks\gftextfontaenderung +\newdimen\ufdimi \newdimen\ufdimii +\def\bstenpoint{% + \scriptfont\itfam=\sevenit + \scriptscriptfont\itfam=\fiveit + \textfont\eufmfam=\teneufm + \scriptfont\eufmfam=\seveneufm + \scriptscriptfont\eufmfam=\fiveeufm + \textfont\cmmibfam=\tencmmib + \scriptfont\cmmibfam=\sevencmmib + \scriptscriptfont\cmmibfam=\fivecmmib + \textfont\cmbsyfam=\tencmbsy + \scriptfont\cmbsyfam=\sevencmbsy + \scriptscriptfont\cmbsyfam=\fivecmbsy + \ifggsymloaded + \textfont\ggfam=\tengg + \fi + \font\ffont=cmdunh10 at 8pt \font\nfont=cmsl12 + \font\ufont=cmdunh10 at 9pt {\ufont\global\ufdimi=0.07em \global\ufdimii=0.5ex }% + \gftextfontaenderung={\textfont1=\twelvei \textfont\msbfam=\sevenmsb + \ifggsymloaded\textfont\ggfam=\tenggi\fi}} +\def\bsninepoint{% + \scriptfont\itfam=\sixit + \scriptscriptfont\itfam=\fiveit + \textfont\eufmfam=\nineeufm + \scriptfont\eufmfam=\sixeufm + \scriptscriptfont\eufmfam=\fiveeufm + \textfont\cmmibfam=\ninecmmib + \scriptfont\cmmibfam=\sixcmmib + \scriptscriptfont\cmmibfam=\fivecmmib + \textfont\cmbsyfam=\ninecmbsy + \scriptfont\cmbsyfam=\sixcmbsy + \scriptscriptfont\cmbsyfam=\fivecmbsy + \ifggsymloaded + \textfont\ggfam=\ninegg + \fi + \font\ffont=cmdunh10 at 7pt \font\nfont=cmsl10 at 11pt + \font\ufont=cmdunh10 at 8pt {\ufont\global\ufdimi=0.11em \global\ufdimii=0.6ex }% + \gftextfontaenderung={\textfont1=\twelvei\textfont\msbfam=\sixmsb + \ifggsymloaded\textfont\ggfam=\nineggi\fi}} +\def\bseightpoint{% + \scriptfont\itfam=\sixit + \scriptscriptfont\itfam=\fiveit + \textfont\eufmfam=\eighteufm + \scriptfont\eufmfam=\sixeufm + \scriptscriptfont\eufmfam=\fiveeufm + \textfont\cmmibfam=\eightcmmib + \scriptfont\cmmibfam=\sixcmmib + \scriptscriptfont\cmmibfam=\fivecmmib + \textfont\cmbsyfam=\eightcmbsy + \scriptfont\cmbsyfam=\sixcmbsy + \scriptscriptfont\cmbsyfam=\fivecmbsy + \ifggsymloaded + \textfont\ggfam=\eightgg + \fi + \font\ffont=cmdunh10 at 6pt \font\nfont=cmsl10 + \font\ufont=cmdunh10 at 7pt {\ufont\global\ufdimi=0.16em \global\ufdimii=0.6ex }% + \gftextfontaenderung={\textfont1=\teni\textfont\msbfam=\fivemsb + \ifggsymloaded\textfont\ggfam=\eightggi\fi}} +\bstenpoint +\def\AmSTeX{$\cal A\kern-.1667em\lower.5ex\hbox{$\cal M$}\kern-.075em S$-\TeX} +\newhelp\gfbskeinbuchstabeinhoehlunghilfe{% +Either in the current or in the previously typed \string\* macro you must have^^J% +used as the last symbol one of (1) \string$, %$% +(2) \string., (3) \string,, (4) \string;,^^J% +(5) \string`, (6) 7, or (7) \string @ and now a character is expected that is^^J% +used as the variable for the ``for all''.} +\newhelp\gfbsunbekanntessymbolhilfe{% +The shown character is not handled by the \string\* macro.^^J% +Here is the list of allowed characters:^^J% +(1) \string" (nothing), (2) \string_ (empty box), (3) \string- (content stroke),^^J% +(4) \string<, \string(, \string~, \string), or \string> (negation), +(5) \string+, \string^, or \string/ (double negation),^^J% +(6) \string: (then), (7) \string' (if), (8) \string! (connector then-if),^^J% +(9) \string[ (judgement left), (10) \string] (judgement right),^^J% +(11) \string| (substitution bar), (12) \string= (double inference rule),^^J% +(13) \string. (half \string-), (14) \string, (half \string~), ^^J% +(15) \string` (half \string~ moved left), (16) \string; (half \string+),^^J% +(17) \string @ (for all), (18) \string$ (either \string. or half \string"),^^J% $ +(19) 0 (either \string( or \string)), (20) 1 (either \string^ or \string/), +(21) 2 (either \string^ or \string+),^^J% +(22) 3 , (23) 4 (either \string- or \string"),^^J% +(24) 5 (either \string_ or \string"), (25) 6 (either \string[ or \string]), +(26) 7 (either \string` or \string,),^^J% +(27) 8 (either \string< or \string~), (28) 9 (only 1/3 of \string-).^^J% +(13)-(16), and (26) signal a ``for all'' and must be paired^^J% +(any combination allowed).^^J% +(18) signals also a ``for all'' and must be paired with itself.} +\newhelp\gfbshaelftehilfe{% +After a signaled ``for all'' one of (1) \string., (2) \string,, (3) \string;,^^J% +(4) \string`, or (5) 7 must directly follow the variable. These symbols must be^^J% +paired in any combination around the character that is used as the^^J% +variable in the ``for all''.} +\newhelp\gfbsklammerhilfe{% +A ``for all'' was signaled by a dollar sign. This must be followed by^^J% +a dollar sign. The other symbols to signal the end of a ``for all''^^J% +cannot be used here, that is \string., \string,, \string`, or \string; are not allowed.} +\newhelp\gfggschlussweisehilfe{% +The `\string?' cannot be used if the style is set to follow the Begriffsschrift.^^J% +Either the style for the Grundgesetze must be used or the `\string?' sign has to^^J% +be invoked: You have to set `\string\gfggschlussweisetrue' to use this command.^^J% +You can activate the style of the Grundgesetze with the command \string\toggleGGstyle.} +\newhelp\gfbszwischenzeichenhilfe{% +A character for a single conclusion sign must be introduced by a `\string>'.^^J% +The character was found but no `\string>' has been read before.} +\newhelp\gfbszwischenzeichenfehlthilfe{% +You have entered a `\string>' so that the next conclusion symbol must be^^J% +either an `x' or an `u'.} +\newhelp\gfbsunbekannterschlusshilfe{% +The symbol is not allowed in a \string\*? macro. Here is a list of known symbols:^^J% +(1) \string_ (empty box), (2) \string" (nothing), (3) \string- (single line),^^J% +(4) \string. (single dot), (5) \string= (double line),^^J% +(6) \string* (line and empty box as double line),^^J% +(7) \string> (signal single character), (8) x (cross), and (9) u (brace).^^J% +(8) and (9) must be signaled by (7).} +\newhelp\gfbsnegwdhhilfe{% +The repetition needs a nonnegative counter to output the^^J% +text parameters. The negative value is ignored.} +\newhelp\gfbspositionunbekannthilfe{% +To position the formula number use either l for left, m for middle,^^J% +or r for right.} +\newhelp\gfbsdoppelpunkthilfe{% +The number of colons (one or two) is given by the number of periods:^^J% +the period gives one colon, the colon two.} +\newhelp\gfbszuvieleparameterhilfe{% +A statement has only three parameters. But here you have used more.^^J% +The parameter is ignored but it might belong to the next construction^^J% +and can cause more errors if the grouping was not correct.} +\newhelp\gfbsfalschesvzhilfe{% +A sign must be one of (1) \string-, (2) \string+, or (3) \string..^^J% +They have the meaning negation, confirmation (double negation), and no sign, resp.} +\newhelp\gfbskeinbuchstabeanhoehlungspositionhilfe{% +A ``for all'' variable must be a letter.^^J% +Other error messages from building the \string\*-macros will follow.} +\newhelp\gfbsfalscherstarthilfe{% +A formula must start either with `\string|' or `\string.'.^^J% +The second parameter to \string\formel\space must be one of these characters.} +\newhelp\gfbsnurterminalhilfe{% +Only a terminal string was entered, no valid Frege formula found.} +\newhelp\gfbsnurnullinaushilfe{% +As substitutions are disabled, a number can only be written in the^^J% +first line of a formula. The input is ignored and 0 is used instead.} +\newhelp\gfbskeinesubsthilfe{% +The last parameter is substitution information and should be empty.^^J% +You have disabled the use of substitutions in the compact notation^^J% +by asigning the value ``t'' to \string\nosubst. Don't make this setting^^J% +before the package is loaded if you need substitutions.} +\newhelp\gfbsleeresubsthilfe{% +You cannot substitute a character by a space. Probably some space occurs^^J% +directly after the colon that should be removed.} +\newhelp\gfbszweiteposzugrosshilfe{% +The position for the formel number must be to the left^^J% +of the postition of the line. Assuming a small positive distance.} +\newhelp\gfbskeinelaengehilfe{% +The line denoting the conclusion can only be drawn if it^^J% +has a positive length. More errors will follow.} +\newhelp\gfbsdoppelpunktzahlhilfe{% +The third symbol must be either a period or a colon to^^J% +give the number of colons. More erros will follow.} +\newhelp\gfbsposabstandhilfe{% +The p-parameter of the substitution is not smaller than the^^J% +p-parameter of the formula. A small distance is assumed, but^^J% +that might result in a wrong output.} +\newhelp\ggunbekannteboxnummer{% +There are four boxes for \string\pfrege\space and \string\pparens, and^^J% +four boxes for \string\bfrege\space and \string\bparens.^^J% +To output a box \string\pfbox\space and \string\bfbox\space are used.^^J% +The listed macros need as the first parameter a number^^J% +in the range 1 and 4. Other numbers are ignored.} +\newhelp\ggkeinbekanntessymbol{% +Macro \string\G\space does not know how to handle the argument.} +\newhelp\ggkeinvokalbuchstabe{% +For a value-range the spiritus lenis must be applied to a^^J% +lowercase greek vowel (\string\alpha, \string\epsilon).^^J% +The greek letter is given as the argument of the macro and^^J% +must be expresssed here by its latin representation,^^J% +f.e., a for \string\alpha. Other letters are rejected.} +% \ff ist der Formelnummernfont +\let\ff=\rm +\newdimen\gfbssdicke \newdimen\gfbsudicke +\newdimen\gfbsddicke +\newdimen\gfbsedicke \newdimen\gfbsfdicke +\newdimen\gfbshoehe +\newdimen\gfbsneght \newdimen\gfbsnegdp +\gfbssdicke=\gfbsstrichdicke \gfbsudicke=\gfbsurteildicke +\gfbsddicke=\gfbsdefdicke +\gfbsedicke=\gfbsersetzungdicke \gfbsfdicke=\gfbsschlussdicke +\gfbshoehe=\gfbsraise \gfbsnegdp=\gfbsneg +% die Überlappung der Striche an den Fugen +\newdimen\gfbsueberlappung \gfbsueberlappung = -0.001 em +% eine \gfbseinheit ist um die Überlappung kleiner als die volle Einheit +\newdimen\gfbseinheit \gfbseinheit = \gfbsvolleeinheit + \advance\gfbseinheit by \gfbsueberlappung +% für zwei Einheiten wird ebenfalls ein Wert benötigt +\newdimen\gfbszweiheit \gfbszweiheit = 2\gfbsvolleeinheit + \advance\gfbszweiheit by \gfbsueberlappung +% aus drei Teilen wird ein Element erzeugt +\newdimen\gfbselementdimen \gfbselementdimen = 3\gfbseinheit +% die Gesamthöhe der horizontalen Striche +\newdimen\gfbsht \newdimen\gfgght +\gfbsht=\gfbshoehe \advance\gfbsht by \gfbssdicke \gfgght=\gfbsht +% \gfbsrulefill ändert sich mit dem Stil, \gfggrulefill bleibt konstant +\def\gfbsrulefill{\leaders\hrule height \gfbsht depth -\gfbshoehe\hfill} +\def\gfggrulefill{\leaders\hrule height \gfgght depth -\gfbsraise\hfill} +% die Strichdicke noch beim Urteilsstrich addieren +\newdimen\gfbsfuht \newdimen\gfbsfudp +\gfbsfuht=\gfbsuht \advance\gfbsfuht by \gfbssdicke +\gfbsfudp=\gfbsudp +% die Position der Schlussstriche berechnen +\newdimen\gfbsos \newdimen\gfbsus +\gfbsos=\gfbsschlussabstand \advance\gfbsos by \gfbsfdicke +\gfbsus=\gfbsos \advance\gfbsus by -\gfbssdicke +% und der Abstand bei Doppelpunkten +\newdimen\gfbsdpa +\gfbsdpa=\gfbsdpabstand +\def\gfbsneuestriche{% + \ifgfbsuseGGstyle + \global\gfbssdicke=\gfggstrichdicke + \global\gfbsudicke=\gfggstrichdicke + \global\gfbsddicke=\gfggstrichdicke + \global\gfbsedicke=\gfggstrichdicke + \global\gfbsfdicke=\gfggstrichdicke + \global\gfbshoehe=\gfggraise + \global\gfbsnegdp=\gfggneg + \global\gfbsfuht=\gfgguht + \global\gfbsfudp=\gfggudp + \global\gfbsdpa=\gfggdpabstand + \else + \global\gfbssdicke=\gfbsstrichdicke + \global\gfbsudicke=\gfbsurteildicke + \global\gfbsddicke=\gfbsdefdicke + \global\gfbsedicke=\gfbsersetzungdicke + \global\gfbsfdicke=\gfbsschlussdicke + \global\gfbshoehe=\gfbsraise + \global\gfbsnegdp=\gfbsneg + \global\gfbsfuht=\gfbsuht + \global\gfbsfudp=\gfbsudp + \global\gfbsdpa=\gfbsdpabstand + \fi + \global\gfbsht=\gfbshoehe + \global\advance\gfbsht by \gfbssdicke + \gdef\gfbsrulefill{\leaders\hrule height \gfbsht depth -\gfbshoehe\hfill}% + \global\advance\gfbsfuht by \gfbssdicke + \global\gfbsos=\gfbsschlussabstand \global\advance\gfbsos by \gfbsfdicke + \global\gfbsus=\gfbsos \global\advance\gfbsus by -\gfbssdicke +} +\newif\ifgfbsuseGGstyle \gfbsuseGGstylefalse +% true falls der Negationsstrich den Inhaltsstrich berühren soll +\newif\ifgfbsnegdirekt \gfbsnegdirektfalse +\newif\ifgfbshoehlung \gfbshoehlungfalse +\newif\ifgfbskompakt \gfbskompaktfalse +\newif\ifgfbszweitehaelfte \gfbszweitehaelftefalse +\newif\ifgfbsklammerzu \gfbsklammerzufalse +\newif\ifgfggschlussweise \gfggschlussweisefalse +\newif\ifgfbszwischenzeichen +\mathchardef\diagup="0\hexno\msbfam1E +\mathchardef\diagdown="0\hexno\msbfam1F +\newdimen\gfbsfonosenken +\newbox\gfbsbox \newdimen\gfbsboxht \newdimen\gfbsboxdp +\newif\ifgfbsfonoohnepunkt \gfbsfonoohnepunktfalse +\newbox\ggpboxi \newbox\ggbboxi % Boxen für \pfrege und \bfrege +\newbox\ggpboxii \newbox\ggbboxii +\newbox\ggpboxiii \newbox\ggbboxiii % und für \pparens und \bparens +\newbox\ggpboxiv \newbox\ggbboxiv +\def\gfbsteilelement#1{% + \ifgfbshoehlung % Zeichen in eine Höhlung setzen (1. \fi) + \ifcat \noexpand#1a\else + \errhelp=\gfbskeinbuchstabeinhoehlunghilfe + \errmessage{A ``for all'' variable must be a letter not `\string#1'}% + \fi + \ifdim\gfbssdicke<0.59 pt + \setbox0=\hbox{$\mathchar"015E$}% plain \TeX Vorgabe + \else + \setbox0=\hbox{$\mathchar"0\hexno\cmmibfam5E$}% + \fi + \dimen0 = \gfbseinheit \advance\dimen0 by -0.5\wd0 + \dimen2 = \wd0 \divide\dimen2 by 18 \advance\dimen0 by 1.5\dimen2 + \hbox to \gfbszweiheit{% + \hbox to\dimen0{\gfbsrulefill}% + \kern-1.2\dimen2 + \raise\gfbshoehe\hbox{% + \lower\ht0\hbox{% + \ifx#1ß$\buildrel{\the\dsz}\over{\box0}$% + \else$\buildrel{{\frak #1}}\over{\box0}$% + \fi + }% + }% + \nobreak + \kern-1.5\dimen2 + \gfbsrulefill + }% + \kern\gfbsueberlappung + \gfbshoehlungfalse + \else + \ifx #1$%$% halber Inhaltsstrich oder Leerstelle nach Höhlung + \ifgfbsklammerzu + \gfbsklammerzufalse + \else + \gfbsklammerzutrue + \gfbshoehlungtrue + \fi + \ifgfbszweitehaelfte + \errhelp=\gfbshaelftehilfe + \errmessage{Unexpected `\string#1' after signaled ``for all''}% + \gfbszweitehaelftefalse + \fi + \ifgfbskompakt\relax + \else + \hbox to 0.5\gfbsvolleeinheit{\gfbsrulefill}\kern0.5\gfbsueberlappung + \nobreak + \fi + \else + \ifgfbsklammerzu + \errhelp=\gfbsklammerhilfe + \errmessage{A \string$ expected, not `\string#1'}%$ + \gfbsklammerzufalse + \fi + \ifx #1.% halber Inhaltsstrich + \hbox to 0.5\gfbsvolleeinheit{\gfbsrulefill}\kern0.5\gfbsueberlappung + \nobreak + \ifgfbszweitehaelfte + \gfbszweitehaelftefalse + \else + \gfbshoehlungtrue + \gfbszweitehaelftetrue + \fi + \else\ifx #1,% halber verneinter Inhaltsstrich + \hbox to 0.5\gfbsvolleeinheit{\gfbsrulefill}\kern0.5\gfbsueberlappung + \nobreak + \ifgfbszweitehaelfte\hskip-0.3\gfbseinheit + \else\hskip-0.2\gfbseinheit\fi + \hskip-0.5\gfbssdicke + \ifgfbsnegdirekt + \vrule width \gfbssdicke height \gfbshoehe depth \gfbsnegdp + \else + \gfbsneght=.01\gfbshoehe \multiply\gfbsneght by \gfbsnegpct + \vrule width \gfbssdicke height \gfbsneght depth \gfbsnegdp + \fi + \nobreak + \hskip-0.5\gfbssdicke + \ifgfbszweitehaelfte\hskip0.3\gfbseinheit + \else\hskip0.2\gfbseinheit\fi + \ifgfbszweitehaelfte + \gfbszweitehaelftefalse + \else + \gfbshoehlungtrue + \gfbszweitehaelftetrue + \fi + \else\ifx #1`% halber ganz links verneinter Inhaltsstrich + \hbox to 0.5\gfbsvolleeinheit{\gfbsrulefill}\kern0.5\gfbsueberlappung + \nobreak + \hskip-0.5\gfbseinheit + \ifgfbsnegdirekt + \vrule width \gfbssdicke height \gfbshoehe depth \gfbsnegdp + \else + \gfbsneght=.01\gfbshoehe \multiply\gfbsneght by \gfbsnegpct + \vrule width \gfbssdicke height \gfbsneght depth \gfbsnegdp + \fi + \nobreak + \hskip-\gfbssdicke + \hskip0.5\gfbseinheit + \ifgfbszweitehaelfte + \gfbszweitehaelftefalse + \else + \gfbshoehlungtrue + \gfbszweitehaelftetrue + \fi + \else\ifx #1;% halber doppelt verneinter Inhaltsstrich + \hbox to 0.5\gfbsvolleeinheit{\gfbsrulefill}\kern0.5\gfbsueberlappung + \nobreak + \ifgfbszweitehaelfte\hskip-0.42\gfbseinheit + \else\hskip-0.27\gfbseinheit\fi + \hskip-\gfbssdicke + \ifgfbsnegdirekt + \vrule width \gfbssdicke height \gfbshoehe depth \gfbsnegdp + \else + \gfbsneght=.01\gfbshoehe \multiply\gfbsneght by \gfbsnegpct + \vrule width \gfbssdicke height \gfbsneght depth \gfbsnegdp + \fi + \nobreak + \hskip0.27\gfbseinheit + \hskip-\gfbssdicke + \ifgfbsnegdirekt + \vrule width \gfbssdicke height \gfbshoehe depth \gfbsnegdp + \else + \gfbsneght=.01\gfbshoehe \multiply\gfbsneght by \gfbsnegpct + \vrule width \gfbssdicke height \gfbsneght depth \gfbsnegdp + \fi + \nobreak + \ifgfbszweitehaelfte\hskip0.15\gfbseinheit\fi + \ifgfbszweitehaelfte + \gfbszweitehaelftefalse + \else + \gfbshoehlungtrue + \gfbszweitehaelftetrue + \fi + \else\ifx #17% variable Negation + \ifgfbskompakt + \hbox to 0.5\gfbsvolleeinheit{\gfbsrulefill}\kern0.5\gfbsueberlappung + \nobreak + \ifgfbszweitehaelfte\hskip-0.3\gfbseinheit + \else\hskip-0.2\gfbseinheit\fi + \hskip-0.5\gfbssdicke + \ifgfbsnegdirekt + \vrule width \gfbssdicke height \gfbshoehe depth \gfbsnegdp + \else + \gfbsneght=.01\gfbshoehe \multiply\gfbsneght by \gfbsnegpct + \vrule width \gfbssdicke height \gfbsneght depth \gfbsnegdp + \fi + \nobreak + \hskip-0.5\gfbssdicke + \ifgfbszweitehaelfte\hskip0.3\gfbseinheit + \else\hskip0.2\gfbseinheit\fi + \else + \hbox to 0.5\gfbsvolleeinheit{\gfbsrulefill}\kern0.5\gfbsueberlappung + \nobreak + \hskip-0.5\gfbseinheit + \ifgfbsnegdirekt + \vrule width \gfbssdicke height \gfbshoehe depth \gfbsnegdp + \else + \gfbsneght=.01\gfbshoehe \multiply\gfbsneght by \gfbsnegpct + \vrule width \gfbssdicke height \gfbsneght depth \gfbsnegdp + \fi + \nobreak + \hskip-\gfbssdicke + \hskip0.5\gfbseinheit + \fi + \ifgfbszweitehaelfte + \gfbszweitehaelftefalse + \else + \gfbshoehlungtrue + \gfbszweitehaelftetrue + \fi + \else + \ifgfbszweitehaelfte + \errhelp=\gfbshaelftehilfe + \errmessage{Unexpected `\string#1' after signaled ``for all''}% + \gfbszweitehaelftefalse + \fi + \ifx #1"% Leerstelle + \relax + \else\ifx #1_% leer + \hskip\gfbseinheit + \else\ifx #1-% Inhaltsstrich + \hbox to \gfbsvolleeinheit{\gfbsrulefill}\kern\gfbsueberlappung + \nobreak + \else\ifx #1=% Schlusskette + \vrule height \gfbsos depth -\gfbsus width \gfbsvolleeinheit + \nobreak + \hskip-\gfbsvolleeinheit + \vrule height \gfbsfdicke depth 0pt width \gfbsvolleeinheit + \nobreak + \kern\gfbsueberlappung + \else + \ifx #1~% verneinter Inhaltsstrich + \hbox to \gfbsvolleeinheit{\gfbsrulefill}\kern\gfbsueberlappung + \nobreak + \hskip-0.5\gfbseinheit + \hskip-0.5\gfbssdicke + \ifgfbsnegdirekt + \vrule width \gfbssdicke height \gfbshoehe depth \gfbsnegdp + \else + \gfbsneght=.01\gfbshoehe \multiply\gfbsneght by \gfbsnegpct + \vrule width \gfbssdicke height \gfbsneght depth \gfbsnegdp + \fi + \nobreak + \hskip-0.5\gfbssdicke + \hskip0.5\gfbseinheit + \else\ifx #1(% Negation mitte-links + \hbox to \gfbsvolleeinheit{\gfbsrulefill}\kern\gfbsueberlappung + \nobreak + \hskip-0.75\gfbseinheit + \hskip-0.5\gfbssdicke + \ifgfbsnegdirekt + \vrule width \gfbssdicke height \gfbshoehe depth \gfbsnegdp + \else + \gfbsneght=.01\gfbshoehe \multiply\gfbsneght by \gfbsnegpct + \vrule width \gfbssdicke height \gfbsneght depth \gfbsnegdp + \fi + \nobreak + \hskip-0.5\gfbssdicke + \hskip0.75\gfbseinheit + \else\ifx #1<% Negation ganz links + \hbox to \gfbsvolleeinheit{\gfbsrulefill}\kern\gfbsueberlappung + \nobreak + \hskip-\gfbseinheit + \ifgfbsnegdirekt + \vrule width \gfbssdicke height \gfbshoehe depth \gfbsnegdp + \else + \gfbsneght=.01\gfbshoehe \multiply\gfbsneght by \gfbsnegpct + \vrule width \gfbssdicke height \gfbsneght depth \gfbsnegdp + \fi + \nobreak + \hskip-\gfbssdicke + \hskip\gfbseinheit + \else\ifx #1)% Negation mitte-rechts + \hbox to \gfbsvolleeinheit{\gfbsrulefill}\kern\gfbsueberlappung + \nobreak + \hskip-0.25\gfbseinheit + \hskip-0.5\gfbssdicke + \ifgfbsnegdirekt + \vrule width \gfbssdicke height \gfbshoehe depth \gfbsnegdp + \else + \gfbsneght=.01\gfbshoehe \multiply\gfbsneght by \gfbsnegpct + \vrule width \gfbssdicke height \gfbsneght depth \gfbsnegdp + \fi + \nobreak + \hskip-0.5\gfbssdicke + \hskip0.25\gfbseinheit + \else\ifx #1>% Negation ganz rechts + \hbox to \gfbsvolleeinheit{\gfbsrulefill}\kern\gfbsueberlappung + \nobreak + \hskip-\gfbssdicke + \ifgfbsnegdirekt + \vrule width \gfbssdicke height \gfbshoehe depth \gfbsnegdp + \else + \gfbsneght=.01\gfbshoehe \multiply\gfbsneght by \gfbsnegpct + \vrule width \gfbssdicke height \gfbsneght depth \gfbsnegdp + \fi + \nobreak + \else\ifx #1+% doppelter verneinter Inhaltsstrich + \hbox to \gfbsvolleeinheit{\gfbsrulefill}\kern\gfbsueberlappung + \nobreak + \hskip-0.75\gfbseinheit + \hskip-0.5\gfbssdicke + \ifgfbsnegdirekt + \vrule width \gfbssdicke height \gfbshoehe depth \gfbsnegdp + \else + \gfbsneght=.01\gfbshoehe \multiply\gfbsneght by \gfbsnegpct + \vrule width \gfbssdicke height \gfbsneght depth \gfbsnegdp + \fi + \nobreak + \hskip0.5\gfbseinheit + \hskip-\gfbssdicke + \ifgfbsnegdirekt + \vrule width \gfbssdicke height \gfbshoehe depth \gfbsnegdp + \else + \gfbsneght=.01\gfbshoehe \multiply\gfbsneght by \gfbsnegpct + \vrule width \gfbssdicke height \gfbsneght depth \gfbsnegdp + \fi + \nobreak + \hskip-0.5\gfbssdicke + \hskip0.25\gfbseinheit + \else\ifx #1^% doppelter verneinter Inhaltsstrich links + \hbox to \gfbsvolleeinheit{\gfbsrulefill}\kern\gfbsueberlappung + \nobreak + \hskip-\gfbseinheit + \ifgfbsnegdirekt + \vrule width \gfbssdicke height \gfbshoehe depth \gfbsnegdp + \else + \gfbsneght=.01\gfbshoehe \multiply\gfbsneght by \gfbsnegpct + \vrule width \gfbssdicke height \gfbsneght depth \gfbsnegdp + \fi + \nobreak + \hskip0.5\gfbseinheit + \hskip-\gfbssdicke + \ifgfbsnegdirekt + \vrule width \gfbssdicke height \gfbshoehe depth \gfbsnegdp + \else + \gfbsneght=.01\gfbshoehe \multiply\gfbsneght by \gfbsnegpct + \vrule width \gfbssdicke height \gfbsneght depth \gfbsnegdp + \fi + \nobreak + \hskip-\gfbssdicke + \hskip0.5\gfbseinheit + \else\ifx #1/% doppelter verneinter Inhaltsstrich rechts + \hbox to \gfbsvolleeinheit{\gfbsrulefill}\kern\gfbsueberlappung + \nobreak + \hskip-0.5\gfbseinheit + \hskip-\gfbssdicke + \ifgfbsnegdirekt + \vrule width \gfbssdicke height \gfbshoehe depth \gfbsnegdp + \else + \gfbsneght=.01\gfbshoehe \multiply\gfbsneght by \gfbsnegpct + \vrule width \gfbssdicke height \gfbsneght depth \gfbsnegdp + \fi + \nobreak + \hskip0.5\gfbseinheit + \hskip-\gfbssdicke + \ifgfbsnegdirekt + \vrule width \gfbssdicke height \gfbshoehe depth \gfbsnegdp + \else + \gfbsneght=.01\gfbshoehe \multiply\gfbsneght by \gfbsnegpct + \vrule width \gfbssdicke height \gfbsneght depth \gfbsnegdp + \fi + \nobreak + \else + \ifx #1:% dann-Verbindung + \hbox to \gfbsvolleeinheit{\gfbsrulefill}\kern\gfbsueberlappung + \nobreak + \hskip-0.5\gfbseinheit + \hskip-0.5\gfbssdicke + \vrule width \gfbssdicke height \gfbshoehe + \nobreak + \hskip-0.5\gfbssdicke + \hskip0.5\gfbseinheit + \else\ifx #1'% wenn-Verbindung + \hskip0.5\gfbsvolleeinheit + \hskip-0.5\gfbssdicke + \vrule width \gfbssdicke depth -\gfbshoehe + \nobreak + \hskip-0.5\gfbssdicke + \hbox to 0.5\gfbsvolleeinheit{\gfbsrulefill}\kern0.5\gfbsueberlappung + \nobreak + \kern0.5\gfbsueberlappung + \else\ifx #1!% senkrechter Strich für Verlängerungen zwischen dann und wenn + \hskip0.5\gfbseinheit + \hskip-0.5\gfbssdicke + \vrule width \gfbssdicke + \nobreak + \hskip-0.5\gfbssdicke + \hskip0.5\gfbseinheit + \else + \ifx #1[% Urteilsstrich + \smash{\vrule width \gfbsudicke height \gfbsfuht depth \gfbsfudp}% + \nobreak + \hskip-\gfbsudicke + \hbox to \gfbsvolleeinheit{\gfbsrulefill}\kern\gfbsueberlappung + \nobreak + \else\ifx #1]% Urteilsstrich rechtsbündig + \hskip\gfbseinheit + \hskip-\gfbsudicke + \smash{\vrule width \gfbsudicke height \gfbsfuht depth \gfbsfudp}% + \else\ifx #13% Definitionsstriche rechtsbündig + \hskip\gfbseinheit + \hskip-4\gfbsddicke + \smash{\vrule width \gfbsddicke height \gfbsfuht depth \gfbsfudp}% + \nobreak + \hskip2\gfbsddicke + \smash{\vrule width \gfbsddicke height \gfbsfuht depth \gfbsfudp}% + \else\ifx #1|% Ersetzungsstrich + \hskip0.5\gfbseinheit + \hskip-0.5\gfbsedicke + \vrule width \gfbsedicke + \nobreak + \hskip-0.5\gfbsedicke + \hskip0.5\gfbseinheit + \else\ifx #1@% Vorbereitung für eine Höhlung + \gfbshoehlungtrue + \else + \ifx #10% Negation mitte-links oder mitte-rechts + \ifgfbskompakt + \hbox to \gfbsvolleeinheit{\gfbsrulefill}\kern\gfbsueberlappung + \nobreak + \hskip-0.25\gfbseinheit + \hskip-0.5\gfbssdicke + \ifgfbsnegdirekt + \vrule width \gfbssdicke height \gfbshoehe depth \gfbsnegdp + \else + \gfbsneght=.01\gfbshoehe \multiply\gfbsneght by \gfbsnegpct + \vrule width \gfbssdicke height \gfbsneght depth \gfbsnegdp + \fi + \nobreak + \hskip-0.5\gfbssdicke + \hskip0.25\gfbseinheit + \else + \hbox to \gfbsvolleeinheit{\gfbsrulefill}\kern\gfbsueberlappung + \nobreak + \hskip-0.75\gfbseinheit + \hskip-0.5\gfbssdicke + \ifgfbsnegdirekt + \vrule width \gfbssdicke height \gfbshoehe depth \gfbsnegdp + \else + \gfbsneght=.01\gfbshoehe \multiply\gfbsneght by \gfbsnegpct + \vrule width \gfbssdicke height \gfbsneght depth \gfbsnegdp + \fi + \nobreak + \hskip-0.5\gfbssdicke + \hskip0.75\gfbseinheit + \fi + \else\ifx #11% Doppelte Negation links oder rechts + \ifgfbskompakt + \hbox to \gfbsvolleeinheit{\gfbsrulefill}\kern\gfbsueberlappung + \nobreak + \hskip-0.5\gfbseinheit + \hskip-\gfbssdicke + \ifgfbsnegdirekt + \vrule width \gfbssdicke height \gfbshoehe depth \gfbsnegdp + \else + \gfbsneght=.01\gfbshoehe \multiply\gfbsneght by \gfbsnegpct + \vrule width \gfbssdicke height \gfbsneght depth \gfbsnegdp + \fi + \nobreak + \hskip0.5\gfbseinheit + \hskip-\gfbssdicke + \ifgfbsnegdirekt + \vrule width \gfbssdicke height \gfbshoehe depth \gfbsnegdp + \else + \gfbsneght=.01\gfbshoehe \multiply\gfbsneght by \gfbsnegpct + \vrule width \gfbssdicke height \gfbsneght depth \gfbsnegdp + \fi + \nobreak + \else + \hbox to \gfbsvolleeinheit{\gfbsrulefill}\kern\gfbsueberlappung + \nobreak + \hskip-\gfbseinheit + \ifgfbsnegdirekt + \vrule width \gfbssdicke height \gfbshoehe depth \gfbsnegdp + \else + \gfbsneght=.01\gfbshoehe \multiply\gfbsneght by \gfbsnegpct + \vrule width \gfbssdicke height \gfbsneght depth \gfbsnegdp + \fi + \nobreak + \hskip0.5\gfbseinheit + \hskip-\gfbssdicke + \ifgfbsnegdirekt + \vrule width \gfbssdicke height \gfbshoehe depth \gfbsnegdp + \else + \gfbsneght=.01\gfbshoehe \multiply\gfbsneght by \gfbsnegpct + \vrule width \gfbssdicke height \gfbsneght depth \gfbsnegdp + \fi + \nobreak + \hskip-\gfbssdicke + \hskip0.5\gfbseinheit + \fi + \else\ifx #12% Doppelte Negation links oder zentriert + \ifgfbskompakt + \hbox to \gfbsvolleeinheit{\gfbsrulefill}\kern\gfbsueberlappung + \nobreak + \hskip-0.75\gfbseinheit + \hskip-0.5\gfbssdicke + \ifgfbsnegdirekt + \vrule width \gfbssdicke height \gfbshoehe depth \gfbsnegdp + \else + \gfbsneght=.01\gfbshoehe \multiply\gfbsneght by \gfbsnegpct + \vrule width \gfbssdicke height \gfbsneght depth \gfbsnegdp + \fi + \nobreak + \hskip0.5\gfbseinheit + \hskip-\gfbssdicke + \ifgfbsnegdirekt + \vrule width \gfbssdicke height \gfbshoehe depth \gfbsnegdp + \else + \gfbsneght=.01\gfbshoehe \multiply\gfbsneght by \gfbsnegpct + \vrule width \gfbssdicke height \gfbsneght depth \gfbsnegdp + \fi + \nobreak + \hskip-0.5\gfbssdicke + \hskip0.25\gfbseinheit + \else + \hbox to \gfbsvolleeinheit{\gfbsrulefill}\kern\gfbsueberlappung + \nobreak + \hskip-\gfbseinheit + \ifgfbsnegdirekt + \vrule width \gfbssdicke height \gfbshoehe depth \gfbsnegdp + \else + \gfbsneght=.01\gfbshoehe \multiply\gfbsneght by \gfbsnegpct + \vrule width \gfbssdicke height \gfbsneght depth \gfbsnegdp + \fi + \nobreak + \hskip0.5\gfbseinheit + \hskip-\gfbssdicke + \ifgfbsnegdirekt + \vrule width \gfbssdicke height \gfbshoehe depth \gfbsnegdp + \else + \gfbsneght=.01\gfbshoehe \multiply\gfbsneght by \gfbsnegpct + \vrule width \gfbssdicke height \gfbsneght depth \gfbsnegdp + \fi + \nobreak + \hskip-\gfbssdicke + \hskip0.5\gfbseinheit + \fi + \else\ifx #14% Inhaltsstrich oder Leerstelle + \ifgfbskompakt\relax + \else + \hbox to \gfbsvolleeinheit{\gfbsrulefill}\kern\gfbsueberlappung + \nobreak + \fi + \else\ifx #15% leer oder Leerstelle + \ifgfbskompakt\relax + \else + \hskip\gfbseinheit + \fi + \else\ifx #16% Urteil links- oder rechtsbündig + \ifgfbskompakt + \hskip\gfbseinheit + \hskip-\gfbsudicke + \smash{\vrule width \gfbsudicke height \gfbsfuht depth \gfbsfudp}% + \else + \smash{\vrule width \gfbsudicke height \gfbsfuht depth \gfbsfudp}% + \nobreak + \hskip-\gfbsudicke + \hbox to \gfbsvolleeinheit{\gfbsrulefill}\kern\gfbsueberlappung + \nobreak + \fi + \else\ifx #18% Negation ganz links oder zentriert + \ifgfbskompakt + \hbox to \gfbsvolleeinheit{\gfbsrulefill}\kern\gfbsueberlappung + \nobreak + \hskip-0.5\gfbseinheit + \hskip-0.5\gfbssdicke + \ifgfbsnegdirekt + \vrule width \gfbssdicke height \gfbshoehe depth \gfbsnegdp + \else + \gfbsneght=.01\gfbshoehe \multiply\gfbsneght by \gfbsnegpct + \vrule width \gfbssdicke height \gfbsneght depth \gfbsnegdp + \fi + \nobreak + \hskip-0.5\gfbssdicke + \hskip0.5\gfbseinheit + \else + \hbox to \gfbsvolleeinheit{\gfbsrulefill}\kern\gfbsueberlappung + \nobreak + \hskip-\gfbseinheit + \ifgfbsnegdirekt + \vrule width \gfbssdicke height \gfbshoehe depth \gfbsnegdp + \else + \gfbsneght=.01\gfbshoehe \multiply\gfbsneght by \gfbsnegpct + \vrule width \gfbssdicke height \gfbsneght depth \gfbsnegdp + \fi + \nobreak + \hskip-\gfbssdicke + \hskip\gfbseinheit + \fi + \else\ifx #19% Drittelstrich + \hbox to 0.333333\gfbsvolleeinheit{\gfbsrulefill}\kern0.3333\gfbsueberlappung + \nobreak + \else\ifx #1*% 5/3 Leerstelle + \hskip1.666667\gfbseinheit + \else + \errhelp=\gfbsunbekanntessymbolhilfe + \errmessage{`\string#1' is not allowed in a \string\* macro}% + \fi\fi\fi\fi\fi\fi\fi\fi\fi + \fi\fi\fi\fi\fi + \fi\fi\fi + \fi\fi\fi\fi\fi\fi\fi\fi + \fi\fi\fi\fi + \fi\fi\fi\fi\fi\fi + \fi +} +\let\discretionarytimes=\* +\def\*#1#2#3{% + \ifx #1?% Schlussweise aus den Grundgesetzen + \ifgfggschlussweise + \gfbsschluss{#2}% + \gfbsschluss{#3}% + \else + \errhelp=\gfggschlussweisehilfe + \errmessage{You cannot use this construction in style Begriffsschrift}% + \fi + \else + \gfbsteilelement{#1}% + \gfbsteilelement{#2}% + \gfbsteilelement{#3}% + \fi +} +\def\toggleGGstyle{% + \ifgfbsuseGGstyle% gehe zum Stil der Begriffsschrift über + \gfbskompaktfalse + \gfbsfonoohnepunktfalse + \gfggschlussweisefalse + \gfbsnegdirektfalse + \gfbsuseGGstylefalse + \else% verwende den Stil der Grundgesetze + \gfbskompakttrue + \gfbsfonoohnepunkttrue + \gfggschlussweisetrue + \gfbsnegdirekttrue + \gfbsuseGGstyletrue + \fi + \gfbsneuestriche +} +\def\gfbsschluss#1{% + \ifx #1x% Wendung + \ifgfbszwischenzeichen + \kern\gfbsueberlappung + \hbox to 3\gfbsvolleeinheit{\hss$\diagdown$\llap{$\diagup$}\hss}% + \kern2\gfbsueberlappung + \else + \errhelp=\gfbszwischenzeichenhilfe + \errmessage{An `x' must be introduced by `\string>'}% + \fi + \gfbszwischenzeichenfalse + \else\ifx #1u% Wandlung + \ifgfbszwischenzeichen + \kern\gfbsueberlappung + \hbox to 3\gfbsvolleeinheit{$\setbox0=\hbox{$\braceld$}% + \bracelu\leaders\vrule height\ht0 depth0pt\hfill\braceru$}% + \kern2\gfbsueberlappung + \else + \errhelp=\gfbszwischenzeichenhilfe + \errmessage{An `u' must be introduced by `\string>'}% + \fi + \gfbszwischenzeichenfalse + \else + \ifgfbszwischenzeichen + \errhelp=\gfbszwischenzeichenfehlthilfe + \errmessage{Either `x' or `u' expected}% + \gfbszwischenzeichenfalse + \fi + \ifx #1-% einzeln: Strich + \hbox to 1.5\gfbsvolleeinheit{\gfggrulefill}\kern1.5\gfbsueberlappung + \else\ifx #1.% einzeln: zentrierter Punkt + \hbox to 1.5\gfbsvolleeinheit{\hss$\cdot$\hss}\kern1.5\gfbsueberlappung + \else + \ifx #1=% doppelt: Strich oben, Strich unten + \vrule height \gfbsos depth -\gfbsus width 1.5\gfbsvolleeinheit + \nobreak + \hskip-1.5\gfbsvolleeinheit + \vrule height \gfbsfdicke depth 0pt width 1.5\gfbsvolleeinheit + \kern1.5\gfbsueberlappung + \else\ifx #1*% doppelt: Strich oben, leer unten + \vrule height \gfbsos depth -\gfbsus width 1.5\gfbsvolleeinheit + \kern1.5\gfbsueberlappung + \else + \ifx #1_% Leerraum + \hskip1.5\gfbseinheit + \else\ifx #1"% Leerstelle + \relax + \else\ifx #1>% Einzelsymbol (Wendung oder Wandlung) folgt + \gfbszwischenzeichentrue + \else % nicht erlaubt + \errhelp=\gfbsunbekannterschlusshilfe + \errmessage{`\string#1' is not allowed in a \string\*? macro}% + \fi\fi\fi + \fi\fi + \fi\fi + \fi\fi +} +\newcount\gfbswiederholung +\def\wdh#1#2#3#4#5{% + \gfbswiederholung=#1 + \ifnum\gfbswiederholung<0 + \errhelp=\gfbsnegwdhhilfe + \errmessage{Repetition count cannot be negative, found \string#1}% + \else + \loop + \ifnum\gfbswiederholung>0 + #2#3#4#5% + \advance\gfbswiederholung by -1 + \repeat + \fi +} +\def\nzp#1{% + \ifvmode\noindent\else\hfil\break\fi + \gfbsstrut + \hskip#1\gfbselementdimen + \relax + \global\gfbsfonosenken=0pt +} +\let\nlp\nzp +\def\gfbsstrut{% + \relax\ifmmode\copy\gfbsbox\else\unhcopy\gfbsbox\fi +} +\def\gfbsabstandzuruecksetzen{% + \global\gfbsboxht=\ht\strutbox \global\gfbsboxdp=\dp\strutbox + \global\setbox\gfbsbox=\hbox{% + \vrule height\the\gfbsboxht depth\the\gfbsboxdp width0pt }% +} +\gfbsabstandzuruecksetzen +\def\gfbssetzeabstand#1#2{% + \global\gfbsboxht=#1pt \global\gfbsboxdp=#2pt % + \global\setbox\gfbsbox=\hbox{% + \vrule height\the\gfbsboxht depth\the\gfbsboxdp width0pt }% +} +\def\gfbsreduziereabstandum#1#2{% + \global\advance\gfbsboxht by -0.#1#2\gfbsboxht + \global\advance\gfbsboxdp by -0.#1#2\gfbsboxdp + \global\setbox\gfbsbox=\hbox{% + \vrule height\the\gfbsboxht depth\the\gfbsboxdp width0pt }% +} +\def\zi#1{% + \hbox to \gfbselementdimen{\rm\thinspace #1\hss}\ignorespaces +} +\def\ze#1{% + \hbox{\rm\thinspace #1}% +} +\newif\ifgfbsinnen % false: Zeichen werden mit \ze gesetzt, true: mit \zi +\def\nzpz#1#2{\nzp{#1}\llap{#2}} +\let\nlpz\nzpz +\def\fono#1{% + \hfill\lower\gfbsfonosenken\hbox{\rm({\ff #1}\ifgfbsfonoohnepunkt\else.\fi}% +} +\def\bss#1/#2#3:#4#5\ess{% + \nzp{#1}% + \ifx #2l% + \ifx #4.% + \hbox to \gfbseinheit{\rm\hss({\ff #3})\rlap{\kern\gfbsdpa:}\hss}% + \else\ifx #4:% + \hbox to \gfbseinheit{\rm\hss({\ff #3})\rlap{\kern\gfbsdpa:\kern\gfbsdpa:}\hss}% + \else + \errhelp=\gfbsdoppelpunkthilfe + \errmessage{Either a period or a colon is expected for the number of colons}% + \hbox to \gfbseinheit{\rm\hss({\ff #3})\rlap{\kern\gfbsdpa:\kern\gfbsdpa:}\hss}% + \fi\fi + \hskip2\gfbseinheit + \else\ifx #2r% + \hskip2\gfbseinheit + \ifx #4.% + \hbox to \gfbseinheit{\rm\hss({\ff #3})\rlap{\kern\gfbsdpa:}\hss}% + \else\ifx #4:% + \hbox to \gfbseinheit{\rm\hss({\ff #3})\rlap{\kern\gfbsdpa:\kern\gfbsdpa:}\hss}% + \else + \errhelp=\gfbsdoppelpunkthilfe + \errmessage{Either a period or a colon is expected for the number of colons}% + \hbox to \gfbseinheit{\rm\hss({\ff #3})\rlap{\kern\gfbsdpa:\kern\gfbsdpa:}\hss}% + \fi\fi + \else\ifx #2m% + \hskip\gfbseinheit + \ifx #4.% + \hbox to \gfbseinheit{\rm\hss({\ff #3})\rlap{\kern\gfbsdpa:}\hss}% + \else\ifx #4:% + \hbox to \gfbseinheit{\rm\hss({\ff #3})\rlap{\kern\gfbsdpa:\kern\gfbsdpa:}\hss}% + \else + \errhelp=\gfbsdoppelpunkthilfe + \errmessage{Either a period or a colon is expected for the number of colons}% + \hbox to \gfbseinheit{\rm\hss({\ff #3})\rlap{\kern\gfbsdpa:\kern\gfbsdpa:}\hss}% + \fi\fi + \hskip\gfbseinheit + \else + \errhelp=\gfbspositionunbekannthilfe + \errmessage{Only l, m, and r are allowed as position parameter}% + \hskip\gfbseinheit + \ifx #4.% + \hbox to \gfbseinheit{\rm\hss({\ff #3})\rlap{\kern\gfbsdpa:}\hss}% + \else\ifx #4:% + \hbox to \gfbseinheit{\rm\hss({\ff #3})\rlap{\kern\gfbsdpa:\kern\gfbsdpa:}\hss}% + \else + \errhelp=\gfbsdoppelpunkthilfe + \errmessage{Either a period or a colon is expected for the number of colons}% + \hbox to \gfbseinheit{\rm\hss({\ff #3})\rlap{\kern\gfbsdpa:\kern\gfbsdpa:}\hss}% + \fi\fi + \hskip\gfbseinheit + \fi\fi\fi + {\let\gfbsrulefill\gfggrulefill #5}% + \vadjust{\penalty-15}\ignorespaces +} +% +% ab hier folgt die Zeilennotation +% +\newtoks\dsz \dsz={\xi}% wird für Buchstaben ß eingesetzt +\newcount\gfbstmpcount +\catcode`@=11 +\def\mynewskip{\alloc@2\skip\skipdef\insc@unt} +\def\mynewtoks{\alloc@5\toks\toksdef\@cclvi} +\catcode`@=12 +\gfbstmpcount=\gfbsmaxanzahlzeilen +\ifgfbskeinesubst + \advance\gfbstmpcount by 1 +\else + \multiply\gfbstmpcount by 2 +\fi +\let\rom\romannumeral +\count255=1 +\loop + \expandafter\mynewtoks\csname gfbstoks\rom\count255\endcsname + \expandafter\mynewskip\csname gfbsskip\rom\count255\endcsname +\ifnum\count255<\gfbstmpcount + \advance\count255 by 1 +\repeat +\newcount\gfbshaengtan \newcount\gfbsgehtbis \newcount\gfbsanzahl +\newif\ifgfbsdannwenn +\newtoks\gfbselement \newcount\gfbszeile +\newcount\gfbsanzahlplus \newcount\gfbsanzahlfest +\newtoks\gfbsprefix +\newif\ifgfbsaussagesichtbar \gfbsaussagesichtbarfalse +\newcount\gfbsgrenze \newcount\gfbszaehler +\newif\ifgfbskeinekompaktehoehlung \gfbskeinekompaktehoehlungfalse +\newcount\gfbserstezeile \newcount\gfbsersteanzahl \newcount\gfbserstegehtbis +\newcount\gfbszweitezeile \newcount\gfbszweitegehtbis +\newif\ifvzzz \newif\ifvzez +\newcount\gfbseinzug +\newif\ifgfbsnurterminal +\newcount\gfbsgrundeinzug \newcount\gfbssubststart +\gfbsgrundeinzug=0 +\gfbssubststart=\gfbsmaxanzahlzeilen \advance\gfbssubststart by 1 +\newif\ifgfbslognotation \gfbslognotationfalse +\newif\ifgfbszeigestats \gfbszeigestatsfalse +\newcount\gfbsmaxformelzeile +\newcount\gfbsvorgaenger \gfbsvorgaenger=0 +\def\setskip#1#2#3#4{% + %\skip-Register = \gfbsanzahl plus \gfbshaengtan minus \gfbsgehtbis + \global\csname gfbsskip\rom#1\endcsname=#2pt plus #3pt minus #4pt% +} +\def\verschlucke#1#2{\relax} +\def\getskip#1.#2 #3 #4.#5 #6 #7.#8{% + \global\gfbsanzahl=#1% + \global\gfbshaengtan=#4% + \global\gfbsgehtbis=#7% + \verschlucke +} +\def\gfbsformel#1#2#3#4#5{% + \gfbsdannwennfalse + \ifx #1.% dann-wenn Beziehung + \gfbsdannwenntrue + \else\ifx #1-% dann-wenn + \gfbsdannwenntrue + \else\ifx #1+% dann-wenn + \gfbsdannwenntrue + \else\ifx #1*% Höhlung + \global\gfbsnurterminalfalse + \ifcat \noexpand#3a\else + \errhelp=\gfbskeinbuchstabeanhoehlungspositionhilfe + \errmessage{Symbol `\string#3' not allowed as variable}% + \fi + \bgroup\gfbsvorgaenger=2 + \ifx #2.\ifx #4.\ifgfbskeinekompaktehoehlung\else + \gfbsvorgaenger=3 + \fi\fi\fi \gfbsformel #5{}{}{}{}\egroup + \expandafter\getskip\the\csname gfbsskip\rom\gfbszeile\endcsname + \gfbstmpcount=0 % Anzahl der benutzen . + \ifx #2-% + \ifnum\gfbsvorgaenger<2 \gfbselement={\*,#3}% + \else\ifnum\gfbsvorgaenger=2 \gfbselement={\*`#3}% + \else\gfbselement={\*7#3}% + \fi\fi + \else\ifx #2+% + \gfbselement={\*;#3}% + \else\ifx #2.% + \gfbselement={\*.#3}\gfbstmpcount=1 + \else + \errhelp=\gfbsfalschesvzhilfe + \errmessage{Symbol `\string#2' not allowed as sign}% + \gfbselement={\*___}\gfbsprefix={\*___}\gfbsanzahlfest=3 + \fi\fi\fi + \ifx #4-% ebenso nach der Höhlung + \gfbselement=\expandafter{\the\gfbselement,}% + \else\ifx #4+% + \gfbselement=\expandafter{\the\gfbselement;}% + \else\ifx #4.% + \gfbselement=\expandafter{\the\gfbselement.}% + \advance\gfbstmpcount by 1 + \else + \errhelp=\gfbsfalschesvzhilfe + \errmessage{Symbol `\string#4' not allowed as sign}% + \gfbselement={\*___}\gfbsprefix={\*___}\gfbsanzahlfest=3 + \fi\fi\fi + \ifnum\gfbstmpcount=2 + \ifgfbskeinekompaktehoehlung + \gfbsprefix={\*___}\gfbsanzahlfest=3 + \else\gfbselement={\*$#3$}\gfbsprefix={\*5__}\gfbsanzahlfest=2 + \fi + \else + \gfbsprefix={\*___}\gfbsanzahlfest=3 + \fi + \gfbsanzahlplus=3 + \edef\gfbstoken{\the\gfbselement\the\csname gfbstoks\rom\gfbszeile\endcsname}% + \global\csname gfbstoks\rom\gfbszeile\endcsname=\expandafter{\gfbstoken}% + \ifgfbskompakt + \global\advance\gfbsanzahl by \gfbsanzahlfest + \else + \global\advance\gfbsanzahl by \gfbsanzahlplus + \fi + \setskip{\the\gfbszeile}{\the\gfbsanzahl}{\the\gfbshaengtan}{\the\gfbsgehtbis}% + \gfbsfuegelinksan{\gfbszeile}{\gfbsgehtbis}% + \else\ifx #1=% Aussage + \global\gfbsnurterminalfalse + \def\gfbstest{#4}% + \ifx\gfbstest\empty + \def\gfbstest{#5}% + \ifx\gfbstest\empty\else + \errhelp=\gfbszuvieleparameterhilfe + \errmessage{Too many parameters for statement (found `\string#5')}% + \fi + \else + \errhelp=\gfbszuvieleparameterhilfe + \errmessage{Too many parameters for statement (found `\string#4')}% + \fi + \bgroup\gfbsvorgaenger=4 \gfbsformel #3{}{}{}{}\egroup + \expandafter\getskip\the\csname gfbsskip\rom\gfbszeile\endcsname + \ifx #2-% auf Negation bzw. doppelte Negation prüfen + \ifnum\gfbsvorgaenger>6 \gfbselement={\*484}\else\gfbselement={\*4~4}\fi + \gfbsprefix={\*5_5}\gfbsanzahlfest=1 + \else\ifx #2+% + \ifnum\gfbsvorgaenger>6 \gfbselement={\*424}\else\gfbselement={\*4+4}\fi + \gfbsprefix={\*5_5}\gfbsanzahlfest=1 + \else\ifx #2.% + \ifgfbsaussagesichtbar + \gfbselement={\*4-4}\gfbsprefix={\*5_5}\gfbsanzahlfest=1 + \else + \gfbselement={\*444}\gfbsprefix={\*555}\gfbsanzahlfest=0 + \fi + \else + \errhelp=\gfbsfalschesvzhilfe + \errmessage{Symbol `\string#2' not allowed as sign}% + \gfbselement={\*___}\gfbsprefix={\*___}\gfbsanzahlfest=3 + \fi\fi\fi + \gfbsanzahlplus=3 + \edef\gfbstoken{\the\gfbselement\the\csname gfbstoks\rom\gfbszeile\endcsname}% + \global\csname gfbstoks\rom\gfbszeile\endcsname=\expandafter{\gfbstoken}% + \ifgfbskompakt + \global\advance\gfbsanzahl by \gfbsanzahlfest + \else + \global\advance\gfbsanzahl by \gfbsanzahlplus + \fi + \setskip{\the\gfbszeile}{\the\gfbsanzahl}{\the\gfbshaengtan}{\the\gfbsgehtbis}% + \gfbsfuegelinksan{\gfbszeile}{\gfbsgehtbis}% + \else\ifx #1!% Sequenz oder Makroaufruf + \gfbselement=\expandafter{#2#3#4#5}% + \edef\gfbstoken{\the\gfbselement}% + \bgroup\expandafter\gfbsformel\gfbstoken {}{}{}{}\egroup + \else % einzelnes Zeichen + \ifgfbsinnen + \gfbselement={\zi{$#1#2#3#4#5$}}% + \else + \gfbselement={\ze{$#1#2#3#4#5$}}% + \fi + \edef\gfbstoken{\the\gfbselement\the\csname gfbstoks\rom\gfbszeile\endcsname}% + \global\csname gfbstoks\rom\gfbszeile\endcsname=\expandafter{\gfbstoken}% + \setskip{\the\gfbszeile}3{\the\gfbszeile}{\the\gfbszeile}% + \fi\fi\fi\fi\fi\fi + \ifgfbsdannwenn + \global\gfbsnurterminalfalse + \bgroup\gfbsvorgaenger=5 \gfbsformel #3{}{}{}{}\egroup + \expandafter\getskip\the\csname gfbsskip\rom\gfbszeile\endcsname + \gfbserstezeile=\gfbszeile + \gfbsersteanzahl=\gfbsanzahl + \gfbserstegehtbis=\gfbsgehtbis + \gfbszeile=\gfbsgehtbis \advance\gfbszeile by 1 + \bgroup\gfbsvorgaenger=6 \gfbsformel #5{}{}{}{}\egroup + \expandafter\getskip\the\csname gfbsskip\rom\gfbszeile\endcsname + \gfbszweitezeile=\gfbszeile + \gfbszweitegehtbis=\gfbsgehtbis + \global\vzezfalse + \ifx #2-% + \global\vzeztrue + \else\ifx #2+% + \global\vzeztrue + \else\ifx #2.\else + \errhelp=\gfbsfalschesvzhilfe + \errmessage{Symbol `\string#2' not allowed as sign}% + \gfbselement={\*___}\gfbsprefix={\*___}\gfbsanzahlfest=3 + \fi\fi\fi + \global\vzzzfalse + \ifx #4-% + \global\vzzztrue + \else\ifx #4+% + \global\vzzztrue + \else\ifx #4.\else + \errhelp=\gfbsfalschesvzhilfe + \errmessage{Symbol `\string#4' not allowed as sign}% + \gfbselement={\*___}\gfbsprefix={\*___}\gfbsanzahlfest=3 + \fi\fi\fi + {\advance\gfbsersteanzahl by -\gfbsanzahl + \ifnum\gfbsersteanzahl>0 % fülle zweite Zeile auf + \advance\gfbsersteanzahl by -1 + \gfbstmpcount=\gfbsersteanzahl + \loop + \ifnum\gfbstmpcount>2 + \advance\gfbstmpcount by -3 + \repeat + \ifcase\gfbstmpcount + \gfbselement={\*""}\gfbsprefix={\*""_}\gfbsanzahlplus=1 \gfbsanzahlfest=1 + \or\gfbselement={\*"-}\gfbsprefix={\*"__}\gfbsanzahlplus=2 \gfbsanzahlfest=2 + \or\gfbselement={\*-}\gfbsprefix={\*___}\gfbsanzahlplus=3 \gfbsanzahlfest=3 + \fi + \advance\gfbsersteanzahl by -\gfbstmpcount + \ifnum\gfbstmpcount=2 + \gfbselement=\expandafter{\the\gfbselement-}% + \fi + \ifvzzz + \ifx #4-% + \gfbselement=\expandafter{\the\gfbselement(}% + \else + \gfbselement=\expandafter{\the\gfbselement+}% + \fi + \global\vzzzfalse + \else + \gfbselement=\expandafter{\the\gfbselement-}% + \fi + \edef\gfbstoken{\the\gfbselement\the\csname gfbstoks\rom\gfbszeile\endcsname}% + \global\csname gfbstoks\rom\gfbszeile\endcsname=\expandafter{\gfbstoken}% + \ifgfbskompakt + \global\advance\gfbsanzahl by \gfbsanzahlfest + \else + \global\advance\gfbsanzahl by \gfbsanzahlplus + \fi + \setskip{\the\gfbszeile}{\the\gfbsanzahl}{\the\gfbshaengtan}{\the\gfbsgehtbis}% + \gfbsfuegelinksan{\gfbszeile}{\gfbsgehtbis}% + \gfbselement={\*---}\gfbsprefix={\*___}\gfbsanzahlfest=3 \gfbsanzahlplus=3 + \loop + \ifnum\gfbsersteanzahl>2 + \edef\gfbstoken{\the\gfbselement\the\csname gfbstoks\rom\gfbszeile\endcsname}% + \global\csname gfbstoks\rom\gfbszeile\endcsname=\expandafter{\gfbstoken}% + \ifgfbskompakt + \global\advance\gfbsanzahl by \gfbsanzahlfest + \else + \global\advance\gfbsanzahl by \gfbsanzahlplus + \fi + \setskip{\the\gfbszeile}{\the\gfbsanzahl}{\the\gfbshaengtan}{\the\gfbsgehtbis}% + \gfbsfuegelinksan{\gfbszeile}{\gfbsgehtbis}% + \advance\gfbsersteanzahl by -3 + \repeat + \fi + \ifnum\gfbsersteanzahl<0 % fülle erste Zeile auf + \advance\gfbsersteanzahl by 1 + \gfbstmpcount=-\gfbsersteanzahl + \loop + \ifnum\gfbstmpcount>2 + \advance\gfbstmpcount by -3 + \repeat + \ifcase\gfbstmpcount + \gfbselement={\*""}\gfbsprefix={\*""_}\gfbsanzahlplus=1 \gfbsanzahlfest=1 + \or\gfbselement={\*"-}\gfbsprefix={\*"__}\gfbsanzahlplus=2 \gfbsanzahlfest=2 + \or\gfbselement={\*-}\gfbsprefix={\*___}\gfbsanzahlplus=3 \gfbsanzahlfest=3 + \fi + \advance\gfbsersteanzahl by \gfbstmpcount + \ifnum\gfbstmpcount=2 + \gfbselement=\expandafter{\the\gfbselement-}% + \fi + \ifvzez + \ifx #2-% + \gfbselement=\expandafter{\the\gfbselement(}% + \else + \gfbselement=\expandafter{\the\gfbselement+}% + \fi + \global\vzezfalse + \else + \gfbselement=\expandafter{\the\gfbselement-}% + \fi + \advance\gfbstmpcount by 1 + \edef\gfbstoken{\the\gfbselement\the\csname gfbstoks\rom\gfbserstezeile\endcsname}% + \global\csname gfbstoks\rom\gfbserstezeile\endcsname=\expandafter{\gfbstoken}% + \global\advance\csname gfbsskip\rom\gfbserstezeile\endcsname by \number\gfbstmpcount pt + \gfbsfuegelinksan{\gfbserstezeile}{\gfbserstegehtbis}% + \gfbselement={\*---}\gfbsprefix={\*___}\gfbsanzahlfest=3 \gfbsanzahlplus=3 + \loop + \ifnum\gfbsersteanzahl<-2 + \edef\gfbstoken{\the\gfbselement\the\csname gfbstoks\rom\gfbserstezeile\endcsname}% + \global\csname gfbstoks\rom\gfbserstezeile\endcsname=\expandafter{\gfbstoken}% + \global\advance\csname gfbsskip\rom\gfbserstezeile\endcsname by 3 pt + \gfbsfuegelinksan{\gfbserstezeile}{\gfbserstegehtbis}% + \advance\gfbsersteanzahl by 3 + \repeat + \fi}% + \gfbszeile=\gfbserstezeile + \expandafter\getskip\the\csname gfbsskip\rom\gfbszeile\endcsname + \gfbsanzahlfest=0 + \gfbsanzahlplus=3 + \ifx #1-% auf Negation bzw. doppelte Negation prüfen + \ifnum\gfbsvorgaenger<2 \gfbselement={\*):}% + \else\ifnum\gfbsvorgaenger<4 \gfbselement={\*~:}% + \else\ifnum\gfbsvorgaenger<7 \gfbselement={\*8:}% + \else\gfbselement={\*0:}\fi\fi\fi + \gfbsprefix={\*_!}\gfbsanzahlfest=2 + \else\ifx #1+% + \ifnum\gfbsvorgaenger<2 \gfbselement={\*/:}% + \else\ifnum\gfbsvorgaenger>6 \gfbselement={\*1:}% + \else\gfbselement={\*+:}% + \fi\fi + \gfbsprefix={\*_!}\gfbsanzahlfest=2 + \else\ifx #1.% + \gfbselement={\*4:}\gfbsprefix={\*5!}\gfbsanzahlfest=1 + \fi\fi\fi + \ifvzez + \ifx #2-% + \gfbselement=\expandafter{\the\gfbselement(}% + \else + \gfbselement=\expandafter{\the\gfbselement+}% + \fi + \advance\gfbsanzahlfest by 1 + \gfbsprefix=\expandafter{\the\gfbsprefix_}% + \else + \ifvzzz + \gfbselement=\expandafter{\the\gfbselement-}% + \advance\gfbsanzahlfest by 1 + \gfbsprefix=\expandafter{\the\gfbsprefix_}% + \else + \gfbselement=\expandafter{\the\gfbselement4}% + \gfbsprefix=\expandafter{\the\gfbsprefix5}% + \fi + \fi + \edef\gfbstoken{\the\gfbselement\the\csname gfbstoks\rom\gfbszeile\endcsname}% + \global\csname gfbstoks\rom\gfbszeile\endcsname=\expandafter{\gfbstoken}% + \ifgfbskompakt + \global\advance\gfbsanzahl by \gfbsanzahlfest + \else + \global\advance\gfbsanzahl by \gfbsanzahlplus + \fi + \setskip{\the\gfbszeile}{\the\gfbsanzahl}{\the\gfbshaengtan}{\the\gfbsgehtbis}% + \gfbsfuegelinksan{\gfbszeile}{\gfbsgehtbis}% + \gfbszeile=\gfbszweitezeile + \expandafter\getskip\the\csname gfbsskip\rom\gfbszeile\endcsname + \gfbsanzahlplus=3 + \ifx #1.% + \gfbselement={\*5}\gfbsprefix={\*5}\gfbsanzahlfest=0 + \else + \gfbselement={\*_}\gfbsprefix={\*_}\gfbsanzahlfest=1 + \fi + \ifvzzz + \ifx #4-% + \gfbselement=\expandafter{\the\gfbselement'(}% + \else + \gfbselement=\expandafter{\the\gfbselement'+}% + \fi + \advance\gfbsanzahlfest by 2 + \gfbsprefix=\expandafter{\the\gfbsprefix__}% + \else + \ifvzez + \gfbselement=\expandafter{\the\gfbselement'-}% + \advance\gfbsanzahlfest by 2 + \gfbsprefix=\expandafter{\the\gfbsprefix__}% + \else + \gfbselement=\expandafter{\the\gfbselement'4}% + \advance\gfbsanzahlfest by 1 + \gfbsprefix=\expandafter{\the\gfbsprefix_5}% + \fi\fi + \edef\gfbstoken{\the\gfbselement\the\csname gfbstoks\rom\gfbszeile\endcsname}% + \global\csname gfbstoks\rom\gfbszeile\endcsname=\expandafter{\gfbstoken}% + \ifgfbskompakt + \global\advance\gfbsanzahl by \gfbsanzahlfest + \else + \global\advance\gfbsanzahl by \gfbsanzahlplus + \fi + \setskip{\the\gfbszeile}{\the\gfbsanzahl}{\the\gfbshaengtan}{\the\gfbsgehtbis}% + \gfbsfuegelinksan{\gfbszeile}{\gfbsgehtbis}% + \setskip{\the\gfbszweitezeile}{\the\gfbsanzahl}{\the\gfbserstezeile}{\the\gfbsgehtbis}% + \gfbszeile=\gfbserstezeile + \expandafter\getskip\the\csname gfbsskip\rom\gfbszeile\endcsname + \setskip{\the\gfbszeile}{\the\gfbsanzahl}{\the\gfbshaengtan}{\the\gfbszweitegehtbis}% + \fi +} +\def\gfbsfuegelinksan#1#2{\bgroup + \gfbstmpcount=0 \advance\gfbstmpcount by #2% höchste zu ändernde Zeilennummer + \count255=0 \advance\count255 by #1% Startzeile (nicht zu ändern) + \loop + \ifnum\gfbstmpcount>\count255 + \edef\gfbstoken{\the\gfbsprefix\the\csname gfbstoks\rom\gfbstmpcount\endcsname}% + \global\csname gfbstoks\rom\gfbstmpcount\endcsname=\expandafter{\gfbstoken}% + \ifgfbskompakt + \global\advance\csname gfbsskip\rom\gfbstmpcount\endcsname + by \number\gfbsanzahlfest pt + \else + \global\advance\csname gfbsskip\rom\gfbstmpcount\endcsname + by \number\gfbsanzahlplus pt + \fi + \advance\gfbstmpcount by -1 + \repeat +\egroup} +\outer\def\formel p#1#2#3{% + \global\gfbseinzug=#1% + \global\gfbszeile=1 + \setskip 1011 + \gfbsanzahlfest=0 \gfbsanzahlplus=0 \gfbsprefix={}\gfbselement={}% + \gfbsnurterminaltrue + \bgroup\gfbsvorgaenger=8 \gfbsformel #3{}{}{}{}\egroup + \expandafter\getskip\the\csname gfbsskip\rom\gfbszeile\endcsname + \ifx #2|% | markiert ein Urteil, sonst ist es eine Vorstellung + \gfbsprefix={\*55_}% + \ifnum\gfbsanzahl<4 % Formel besteht nur aus einem Terminal + \ifgfbsnurterminal + \errhelp=\gfbsnurterminalhilfe + \errmessage{No Frege formula entered}% + \gfbselement={\*55]}\gfbsanzahlfest=1 + \else\gfbselement={\*5]9}\gfbsanzahlfest=2 + \fi + \else\gfbselement={\*556}\gfbsanzahlfest=1 + \fi + \else\ifx #2.% + \gfbsprefix={\*555}% + \ifnum\gfbsanzahl<4 % Formel besteht nur aus einem Terminal + \ifgfbsnurterminal + \errhelp=\gfbsnurterminalhilfe + \errmessage{No Frege formula entered}% + \gfbselement={\*555}\gfbsanzahlfest=0 + \else\gfbselement={\*559}\gfbsanzahlfest=1 + \fi + \else\gfbselement={\*554}\gfbsanzahlfest=0 + \fi + \else + \errhelp=\gfbsfalscherstarthilfe + \errmessage{Unknown formula type `\string#2'}% + \gfbselement={\*___}\gfbsprefix={\*___}\gfbsanzahlfest=3 + \fi\fi + \gfbsanzahlplus=3 + \edef\gfbstoken{\the\gfbselement\the\csname gfbstoks\rom\gfbszeile\endcsname}% + \global\csname gfbstoks\rom\gfbszeile\endcsname=\expandafter{\gfbstoken}% + \ifgfbskompakt + \global\advance\gfbsanzahl by \gfbsanzahlfest + \else + \global\advance\gfbsanzahl by \gfbsanzahlplus + \fi + \setskip{\the\gfbszeile}{\the\gfbsanzahl}{\the\gfbshaengtan}{\the\gfbsgehtbis}% + \gfbsfuegelinksan{\gfbszeile}{\gfbsgehtbis}% + \expandafter\getskip\the\gfbsskipi\relax + \ifnum\gfbsmaxformelzeile<\gfbsgehtbis + \global\gfbsmaxformelzeile=\gfbsgehtbis + \ifgfbszeigestats\zeigezeilenstatistik\fi + \fi + \gfbszaehler=\gfbshaengtan + \gfbsgrenze=1 \advance\gfbsgrenze by \gfbsgehtbis + \gfbszeile=\gfbssubststart + \ifnum\gfbsgrundeinzug>0 + \advance\gfbseinzug by -\gfbsgrundeinzug + \ifnum\gfbseinzug>0\else + \errhelp=\gfbsposabstandhilfe + \errmessage{The formula must be positioned to the right of substitutions}% + \gfbseinzug=2 + \fi\fi + \par\noindent\leavevmode + \vbox\bgroup\offinterlineskip + \loop + \ifnum\gfbszaehler<\gfbsgrenze + \bgroup + \count255=\csname gfbsskip\rom\gfbszeile\endcsname + \divide\count255 by 65536 + \gfbstmpcount=\count255 + \divide\gfbstmpcount by 3 + \advance\gfbseinzug by -\gfbstmpcount + \multiply\gfbstmpcount by -3 + \advance\gfbstmpcount by \count255 + \ifcase\gfbstmpcount + \edef\gfbstoken{\noexpand\wdh\noexpand{\the\gfbseinzug + \noexpand}\noexpand\*___}% + \or + \advance\gfbseinzug by -1 + \edef\gfbstoken{\noexpand\*"__\noexpand\wdh\noexpand{\the\gfbseinzug + \noexpand}\noexpand\*___}% + \or + \advance\gfbseinzug by -1 + \edef\gfbstoken{\noexpand\*""_\noexpand\wdh\noexpand{\the\gfbseinzug + \noexpand}\noexpand\*___}% + \fi + \global\gfbselement=\expandafter{\gfbstoken}% + \egroup + \hbox{% + \nlp{\the\gfbsgrundeinzug}% + \the\csname gfbstoks\rom\gfbszeile\endcsname + \the\gfbselement + \the\csname gfbstoks\rom\gfbszaehler\endcsname + }% + \ifgfbslognotation + \dimen255=\csname gfbsskip\rom\gfbszeile\endcsname + \wlog{\string\nlp\string{\the\gfbsgrundeinzug\string}}% + \ifdim\dimen255>0pt \wlog{\the\csname gfbstoks\rom\gfbszeile\endcsname}\fi + \wlog{\the\gfbselement}% + \wlog{\the\csname gfbstoks\rom\gfbszaehler\endcsname}% + \fi + \global\csname gfbstoks\rom\gfbszaehler\endcsname={}% + \global\csname gfbsskip\rom\gfbszaehler\endcsname=0pt + \global\advance\gfbszaehler by 1 + \global\csname gfbstoks\rom\gfbszeile\endcsname={}% + \global\csname gfbsskip\rom\gfbszeile\endcsname=0pt + \ifgfbskeinesubst\else + \global\advance\gfbszeile by 1 + \fi + \repeat + \ifgfbskeinesubst\else + \loop + \ifnum\csname gfbsskip\rom\gfbszeile\endcsname>0 + \hbox{\nlp{\the\gfbsgrundeinzug}\the\csname gfbstoks\rom\gfbszeile\endcsname}% + \ifgfbslognotation + \wlog{\string\nlp\string{\the\gfbsgrundeinzug\string}}% + \wlog{\the\csname gfbstoks\rom\gfbszeile\endcsname}% + \fi + \global\csname gfbstoks\rom\gfbszeile\endcsname={}% + \global\csname gfbsskip\rom\gfbszeile\endcsname=0pt + \global\advance\gfbszeile by 1 + \repeat + \fi + \egroup + \gfbsgrundeinzug=0 +} +\def\gfbsaus p#1,#2"#3"mit#4\also{% + \global\gfbsgrundeinzug=#1% + \gfbszeile=\the\gfbssubststart + \ifgfbskeinesubst + \ifnum #2>0 + \errhelp=\gfbsnurnullinaushilfe + \errmessage{Zero expected; read ``#2''}% + \fi + \else + \advance\gfbszeile by #2% + \fi + \global\csname gfbstoks\rom\gfbszeile\endcsname={\zi{\hss\thinspace #3\hss}}% + \setskip{\the\gfbszeile}3{\the\gfbszeile}{\the\gfbszeile}% + \gfbsanzahlfest=0 \gfbsanzahlplus=0 \gfbsprefix={}\gfbselement={}% + \def\next{#4}% + \ifx\next\empty + \else\ifgfbskeinesubst + \errhelp=\gfbskeinesubsthilfe + \errmessage{Substitutions disabled}% + \else + \bgroup + \gfbsinnentrue + \advance\gfbszeile by 1 + \gfbssubst #4\gfbssubstend + \egroup + \fi\fi +} +\outer\def\aus p#1,#2"#3"mit#4\also{% + \gfbsaus p#1,#2"#3"mit#4\also +} +\outer\def\verwende p#1"#2"{% + \gfbsaus p#1,0"#2"mit\also +} +\let\ziehan\verwende +\def\gfbssubst#1:#2 #3\gfbssubstend{% + \def\gfbstest{#1}% + \ifx\gfbstest\empty% Ende der Substitutionen + \null + \else + \def\gfbstest{#2}% + \ifx\gfbstest\empty + \if#1\ \else + \errhelp=\gfbsleeresubsthilfe + \errmessage{Empty substitution}% + \fi + \bgroup\gfbsformel \ {}{}{}{}{}\egroup + \else + \gfbsanzahlplus=0 \gfbsanzahlfest=0 \gfbsprefix={}\gfbselement={}% + \bgroup\gfbsvorgaenger=1 \gfbsformel #2{}{}{}{}{}\egroup + \fi + \expandafter\getskip\the\csname gfbsskip\rom\gfbszeile\endcsname + \gfbselement={\*_|_}\gfbsprefix={\*_|_}\gfbsanzahlfest=3 \gfbsanzahlplus=3 + \edef\gfbstoken{\the\gfbselement\the\csname gfbstoks\rom\gfbszeile\endcsname}% + \global\csname gfbstoks\rom\gfbszeile\endcsname=\expandafter{\gfbstoken}% + \ifgfbskompakt + \global\advance\gfbsanzahl by \gfbsanzahlfest + \else + \global\advance\gfbsanzahl by \gfbsanzahlplus + \fi + \setskip{\the\gfbszeile}{\the\gfbsanzahl}{\the\gfbshaengtan}{\the\gfbsgehtbis}% + \gfbsfuegelinksan{\gfbszeile}{\gfbsgehtbis}% + \gfbselement={\llap{$#1$}}% + \edef\gfbstoken{\the\gfbselement\the\csname gfbstoks\rom\gfbszeile\endcsname}% + \global\csname gfbstoks\rom\gfbszeile\endcsname=\expandafter{\gfbstoken}% + \def\gfbstest{#3}% + \ifx\gfbstest\empty + \else + \gfbsanzahlplus=0 \gfbsanzahlfest=0 \gfbsprefix={}\gfbselement={}% + \bgroup + \gfbszeile=\gfbsgehtbis + \advance\gfbszeile by 1 + \gfbssubst #3\gfbssubstend + \egroup + \fi + \fi +} +\outer\def\folgtmit p#1"#2"a#3p#4s#5{% + \gfbsgrundeinzug=#4 \advance\gfbsgrundeinzug by -#1 + \advance\gfbsgrundeinzug by -1 + \ifnum #1<#4\else + \errhelp=\gfbszweiteposzugrosshilfe + \errmessage{The second p-value must be larger than the first}% + \gfbsgrundeinzug=1 + \fi + \ifnum 0>#5 + \errhelp=\gfbskeinelaengehilfe + \errmessage{The s-value must be nonnegative}% + \fi + \ifx #3.% + \else + \ifx #3:\else + \errhelp=\gfbsdoppelpunktzahlhilfe + \errmessage{Invalid symbol `#3' for number of colons}% + \fi + \fi + \bss{#1}/m{#2}:#3\wdh{\the\gfbsgrundeinzug}\*___\wdh{#5}\*---\ess + \ifgfbslognotation + \wlog{\string\bss\string{#1\string}/m\string{#2\string}:#3% + \string\wdh\string{\the\gfbsgrundeinzug\string}\string\*___% + \string\wdh\string{#5\string}\string\*---\string\ess}% + \fi +} +\def\gfbsdurch p#1 #2\folgende{% + \ifgfbskeinesubst + \errhelp=\gfbskeinesubsthilfe + \errmessage{Substitutions disabled}% + \fi + \global\gfbsgrundeinzug=#1% + \gfbszeile=\the\gfbssubststart + \setskip{\the\gfbszeile}0{\the\gfbszeile}{\the\gfbszeile}% + \gfbsanzahlfest=0 \gfbsanzahlplus=0 \gfbsprefix={}\gfbselement={}% + \bgroup\gfbsinnentrue\gfbssubst #2\gfbssubstend\egroup +} +\outer\def\durch p#1 #2\folgende{% + \gfbsdurch p#1 #2\folgende +} +\def\formelName "#1"{% + \fono{#1}% + \ifgfbslognotation + \wlog{\string\fono\string{#1\string}}% + \wlog{==========}% + \wlog{}% + \fi + \ignorespaces +} +\outer\def\genannt{\formelName} +\def\zeigezeilenstatistik{\bgroup + \message{^^JMaximum number of lines: \the\gfbsmaxformelzeile. }% +\egroup} +\def\frege#1#2{% + \global\gfbszeile=1 + \setskip 1011 + \gfbselement={}\gfbsprefix={}\gfbsanzahlfest=0 \gfbsanzahlplus=0 + \gfbsnurterminaltrue + \bgroup\gfbsvorgaenger=7 \gfbsformel #2{}{}{}{}\egroup + \expandafter\getskip\the\csname gfbsskip\rom\gfbszeile\endcsname + \ifx #1|% Urteil + \gfbsprefix={\*""_}% + \ifnum\gfbsanzahl<4 + \ifgfbsnurterminal + \errhelp=\gfbsnurterminalhilfe + \errmessage{No Frege formula entered}% + \gfbselement={\*""[}\gfbsanzahlfest=1 + \else\gfbselement={\*"]9}\gfbsanzahlfest=2 + \fi + \else\gfbselement={\*""6}\gfbsanzahlfest=1 + \fi + \else\ifx #1.% + \gfbsprefix={\*""5}% + \ifnum\gfbsanzahl<4 + \ifgfbsnurterminal + \errhelp=\gfbsnurterminalhilfe + \errmessage{No Frege formula entered}% + \gfbselement={\*""5}\gfbsanzahlfest=0 + \else\gfbselement={\*"--}\gfbsanzahlfest=2 + \fi + \else\gfbselement={\*""4}\gfbsanzahlfest=0 + \fi + \else + \errhelp=\gfbsfalscherstarthilfe + \errmessage{Unknown formula type `\string#1'}% + \gfbselement={\*""-}\gfbsprefix={\*""_}\gfbsanzahlfest=1 + \fi\fi + \gfbsanzahlplus=1 + \edef\gfbstoken{\the\gfbselement\the\csname gfbstoks\rom\gfbszeile\endcsname}% + \global\csname gfbstoks\rom\gfbszeile\endcsname=\expandafter{\gfbstoken}% + \ifgfbskompakt + \global\advance\gfbsanzahl by \gfbsanzahlfest + \else + \global\advance\gfbsanzahl by \gfbsanzahlplus + \fi + \setskip{\the\gfbszeile}{\the\gfbsanzahl}{\the\gfbshaengtan}{\the\gfbsgehtbis}% + \gfbsfuegelinksan{\gfbszeile}{\gfbsgehtbis}% + \expandafter\getskip\the\gfbsskipi\relax + \gfbszaehler=\gfbshaengtan \gfbsgrenze=1 \advance\gfbsgrenze by \gfbsgehtbis + \leavevmode\vtop\bgroup\offinterlineskip + \loop + \ifnum\gfbszaehler<\gfbsgrenze + \hbox{\gfbsstrut\the\csname gfbstoks\rom\gfbszaehler\endcsname}% + \global\csname gfbstoks\rom\gfbszaehler\endcsname={}% + \global\csname gfbsskip\rom\gfbszaehler\endcsname=0pt + \global\advance\gfbszaehler by 1 + \repeat + \egroup +} +\def\klammerfrege#1#2#3#4#5#6#7{% \frege#1#2 mit Klammern #3 und #4; +% #5=1 <=> ohne \frege#1; #6 Boxtyp; #7 Boxnr. + \setbox0=\hbox{\ifnum#5=0 \frege#1{#2}\else#2\fi}\dimen0=\ht0 + \setbox1=\hbox{(}\advance\dimen0 by .5\dp1 + \setbox0=\hbox{\delimiterfactor=100 \delimitershortfall=8pt + $\left#3\vcenter{\box0}\right#4$}% + \dimen1=\ht0 \advance\dimen1 by -\dimen0 + \ifnum#7>0 \ifnum#7<5 + \global\setbox\csname gg#6box\romannumeral#7\endcsname=\hbox{% + \vbox to\dimen0{\hbox{\lower\dimen1\box0}}}% + \else\errhelp=\ggunbekannteboxnummer + \errmessage{The box number must be 1, 2, 3, or 4}% + \fi + \else\errhelp=\ggunbekannteboxnummer + \errmessage{The box number must be \string>0 and \string<5}% + \fi + \ignorespaces +} +\def\pfrege#1#2#3{\klammerfrege#2{#3}()0p{#1}}% +\def\bfrege#1#2#3{\klammerfrege#2{#3}[]0b{#1}}% +\def\pparens#1#2{\klammerfrege{}{$#2$}()1p{#1}}% +\def\bparens#1#2{\klammerfrege{}{$#2$}[]1b{#1}}% +\def\ggpoderbboxausgeben#1#2{\ifnum#1>0 + \ifnum#1<5 + \copy\csname gg#2box\romannumeral#1\endcsname + \else\errhelp=\ggunbekannteboxnummer + \errmessage{The box number must be 1, 2, 3, or 4}% + ??? + \fi + \else\errhelp=\ggunbekannteboxnummer + \errmessage{The box number must be \string>0 and \string<5}% + ??? +\fi} +\def\pfbox#1{\ggpoderbboxausgeben{#1}p} +\def\bfbox#1{\ggpoderbboxausgeben{#1}b} +% +% weitere Einstellungen +% +\def\erklaerung p#1#2 #3#4=#5{% +\ifgfbsuseGGstyle + \nlp{#1}\ifx #2|\*_[-\else\*_39\fi + $\; + \vtop{\hbox{% + \ifx #2:% + $#3#4$% + \else + \frege #3{#4}% + \fi}} + =\vtop{\hbox{$#5$}}$% + \else\nlp{#1}\ifx #2|\*_[-\else\*_3-\fi + $\left\lgroup + \left\lgroup + \vcenter{\hbox{\frege #3{#4}}} + \right\rgroup + \equiv\vcenter{\hbox{$#5$}}% + \right\rgroup$% + \fi +} +\def\gfvererbe#1#2#3#4{{% + \setbox0=\vbox{\offinterlineskip\hbox{\gfbsstrut$#1$}\hbox{$\vert$}\hbox{\gfbsstrut$#2$}}% + \setbox2=\vbox{\offinterlineskip\hbox{\gfbsstrut$#3$}\hbox{\phantom{$\vert$}}\hbox{\gfbsstrut$#4$}}% + \ifdim\ht0>\ht2 + \global\gfbsfonosenken=0.5\ht0 \global\advance\gfbsfonosenken by -\dp0 + \else\global\gfbsfonosenken=0.5\ht2 \global\advance\gfbsfonosenken by -\dp2 \fi + \vcenter{\unvbox0 }\!\left(\vcenter{\unvbox2 }\right.% +}} +\def\gffolgt#1#2#3{% + \!\!{\textstyle\phantom t#1\atop\textstyle\phantom)\widetilde#2}#3% +} +\def\gfgehoertan#1#2#3{% + \!\!{\textstyle\phantom t\underline#1\atop\textstyle\phantom{)}\widetilde#2}#3% +} +\def\gfeindeutig#1#2#3{{% + \setbox0=\vbox{\offinterlineskip\hbox{\gfbsstrut$#1$}\hbox{\rm I}\hbox{\gfbsstrut$#2$}}% + \setbox2=\vbox{\hbox{\gfbsstrut$#3$}}% + \ifdim\ht0>\ht2 + \global\gfbsfonosenken=0.5\ht0 \global\advance\gfbsfonosenken by -\dp0 + \else\global\gfbsfonosenken=0.5\ht2 \global\advance\gfbsfonosenken by -\dp2 \fi + \vcenter{\unvbox0 }\vcenter{\unvbox2 }% +}} +\def\G#1{% + \ifx#1!% 1. Eintrag + \hbox{$\scriptstyle\mathchar"0\hexno\cmbsyfam6E + \mkern-9.1mu + \mathchar"0\hexno\cmbsyfam6E$}% + \else\ifx#1^% 2. Eintrag + \mathbin{\raise.5ex + \hbox{$\scriptscriptstyle\mathchar"0\hexno\cmmibfam5F$}}% + \else\ifx#1>% 3. Eintrag + \hbox{$\mathchar"0269\thinspace$}% + \else\ifx#10% 4. Eintrag + {\rm0\raise.35ex\llap{$\scriptstyle\mathchar"026E$\kern.02em}}% + \else\ifx#11% 5. Eintrag + {\rm1\raise.35ex\llap{$\scriptscriptstyle\mathchar"026E$\kern.05em}}% + \else\ifx#1-% 6. Eintrag + \hbox{\lower1ex\hbox{$\acute{\raise1ex\hbox{{\tt\char95 }}}\>$}}% + \else\ifx#1~% 7. Eintrag + \hbox{% + \lower.7ex\hbox{$\acute{\raise.3ex\hbox{\smash{$\mathchar"0\hexno\msafam60$}}}\>$}}% + \else\ifx#1_% 8. Eintrag + \mathbin{\hbox{% + \vrule width0.4pt height0.25ex depth0pt + \vrule width0.6em height0.4pt depth0pt + \vrule width0.4pt height0.25ex depth0pt}}% + \else\ifx#1;% 9. Eintrag + \mathbin{\mskip-2mu;}% + \else\ifx#1<% 10. Eintrag + \mathbin{{\scriptstyle\mathchar"026E}% + \hskip-.375em \hbox to.5em{\rm + \leaders\hrule height 1.35ex depth -1.22ex\hfill}}% + \else\ifx#1*% 11. Eintrag + \mathord{{}_{\textstyle*\,}}% + \else\ifx#16% 12. Eintrag + \mathchar"0\hexno\msbfam67 + \else\errhelp\ggkeinbekanntessymbol + \errmessage{^^JUnknown symbol after \string\G}% + ??? + \fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi +} +\newif\ifgefunden +\def\ist #1 in #2?{% + \def\finde##1#1##2\ednif{% + \ifx\empty##2\empty + \gefundenfalse + \else + \gefundentrue + \fi + \ignorespaces}% + \finde#2#1\ednif +} +\def\gfwerteverlauf#1{% + \ist #1 in ae?\ifgefunden + \hbox{{$\mathaccent"0027\csname k#1\endcsname$}}% + \else\errhelp=\ggkeinvokalbuchstabe + \errmessage{The operator must be applied to a lowercase (greek) vowel}% + \mathaccent"0027\ka + \fi}% +\def\kasl{\gfwerteverlauf{a}} +\def\kesl{\gfwerteverlauf{e}} +\def\GI{\hbox{\rm I\kern.05em}} +\def\GU{\hbox{\ufont + \setbox0=\hbox{\ufont U}\dimen0=\wd0 \advance\dimen0 by.05em + \rlap{\raise.1ex\hbox to\dimen0{\leaders\hrule height.11ex\hfill\kern.1em}}\kern-.01em + \lower\ufdimii\box0\kern\ufdimi + \llap{\raise.4ex\hbox{$\the\gftextfontaenderung\mathchar"0\hexno\msbfam1F$}}% + \kern0.1em +}} +\ifggsymloaded + \let\GUorg=\GU + \def\GU{\setbox0=\hbox{$\GUorg$}% + \mathord{\hbox to \wd0{\hss$\mathchar"0\hexno\ggfam55$\hss}}}% +\fi +\def\Gn{\hbox{\lower.2ex\hbox{\nfont + n\kern.1em}% + \llap{\raise.2ex\hbox{$\the\gftextfontaenderung\scriptstyle\mathchar"015E$}}}\kern.01em} +\ifggsymloaded + \let\Gnorg=\Gn + \def\Gn{\setbox0=\hbox{$\Gnorg$}% + \mathord{\hbox to \wd0{\hss$\the\gftextfontaenderung\mathchar"0\hexno\ggfam11$\hss}}}% +\fi +\def\Gbf{\mkern0mu \setbox0=\hbox{{\ffont f}}\ffont + \kern-.02em\copy0\kern-\wd0 \kern.04em\copy0\kern-\wd0 + \kern-.02em\raise.03ex\box0 \kern.1em + \llap{\raise2ex\hbox{\ffont.}}} +\let\Gff\Gbf +\def\Guu{\mathop{\kern0pt + \smash{\hbox{$\scriptscriptstyle\mathchar"0\hexno\cmmibfam5E\mkern-4mu\mathchar"0\hexno\cmmibfam5E$}}}% + \limits^{\lower.1ex\hbox{{$\the\gftextfontaenderung\mathchar"015F$}}}} +\def\Gfm{\mathbin{\mathop{\kern0pt \smash{-}}% + \limits^{\raise.2ex\hbox{$\scriptstyle\mathchar"2\hexno\msafam61$}}}} +\def\Gsm{\mathbin{\mathop{\kern0pt \smash{-}}% + \limits^{\raise.2ex\hbox{$\scriptstyle\mathchar"2\hexno\msafam60$}}}} +\newbox\ggunrotbox \newbox\ggrotbox +\def\ggrotate#1#2#3{\global\setbox\ggunrotbox=\hbox{#1}% + \expandafter\ifx\csname rot#2\endcsname\relax + \message{^^JCan't do that kind of rotation.^^J}% + \global\setbox\ggrotbox=\copy\ggunrotbox + \else + \ifnum#3=0 \else\ht\ggunrotbox=#3ex \fi + \global\setbox\ggrotbox=\hbox{\csname rot#2\endcsname\ggunrotbox}% + \global\setbox\ggunrotbox=\hbox to\wd\ggrotbox{\hss#1\hss}% + \fi} +\def\prtggrotbox{\ifggrotiere\box\ggrotbox\else\box\ggunrotbox\fi} +\def\Gy{\ggrotate{\hbox{\accent22 y}}u1% + \mathbin{\prtggrotbox}} +\def\Ge{\ggrotate{\lower.65ex\hbox{% + $\scriptscriptstyle\mathchar"0\hexno\cmmibfam2C$}% + \llap{e\kern-.1em}}u1% + \mathbin{\,\prtggrotbox\,}} +\def\Gc{\ggrotate{\lower.64ex\hbox{% + $\scriptscriptstyle\mathchar"0\hexno\cmmibfam2C$}% + \llap{c\kern-.1em}}u1% + \mathbin{\,\prtggrotbox\,}} +\def\Gmf{\mathbin{\mathop{\kern0pt \smash{\scriptstyle\mathchar"2\hexno\msafam61}}% + \limits^{\lower1ex\hbox{$\scriptstyle-$}}}} +\def\Gf{\ggrotate{$f$}u0% + \mathord{\ifggrotiere\rlap{\raise.1ex\hbox{$\scriptstyle\gamma$}}\kern.025em\lower.5ex\box\ggrotbox + \else\rlap{\raise.4ex\hbox{$\scriptstyle\gamma$}}\kern.02em\box\ggunrotbox\fi}} +\def\GF{\ggrotate{$F$}u1% + \mathbin{\prtggrotbox}} +\def\Gl{\mathbin{\hbox{\l}}} +\def\Gp{\mathord{% + \rlap{\raise.45ex\hbox{$\scriptstyle\gamma$}}\kern.15em + \hbox{$p$}\,}} +\def\Gss{\ggrotate{\ss}u0% + \mathbin{\ifggrotiere\lower.5ex\box\ggrotbox\else\box\ggunrotbox\fi}} +\let\Gsz\Gss +% Zuordnung nach TUGboat, V.9, p.20 +\def\gA{A} +\def\gB{B} +\def\gG{{\it\Gamma}} +\def\gD{{\it\Delta}} +\def\gL{{\it\Lambda}} +\def\gM{M} +\def\gN{N} +\def\gR{P} +\def\gS{{\it\Sigma}} +\def\gF{{\it\Phi}} +\def\gQ{X} +\def\gY{{\it\Psi}} +\def\gE{E} +\def\gZ{Z} +\def\gH{H} +\def\gJ{{\it\Theta}} +\def\gI{I} +\def\gK{K} +\def\gX{{\it\Xi}} +\def\gO{O} +\def\gP{{\it\Pi}} +\def\gT{T} +\def\gU{{\it\Upsilon}} +\def\gW{{\it\Omega}} +\def\ka{\alpha} +\def\kb{\beta} +\def\kg{\gamma} +\def\kd{\delta} +\def\ke{\epsilon} +\def\kz{\zeta} +\def\kh{\eta} +\def\kj{\vartheta} +\def\ki{\iota} +\def\kk{\kappa} +\def\kl{\lambda} +\def\km{\mu} +\def\kn{\nu} +\def\kx{\xi} +\def\ko{o} +\def\kp{\pi} +\def\kr{\varrho} +\def\ks{\sigma} +\def\kt{\tau} +\def\ku{\upsilon} +\def\kf{\varphi} +\def\kq{\chi} +\def\ky{\psi} +\def\kw{\omega} +\def\da{{\frak a}} +\def\dd{{\frak d}} +\def\de{{\frak e}} +\def\df{{\frak f}} +\def\dF{{\frak F}} +\def\dc{{\frak c}} +\def\dg{{\frak g}} +\def\dm{{\frak m}} +\def\dn{{\frak n}} +\def\ddo{{\frak o}} +\def\ddp{{\frak p}} +\def\dq{{\frak q}} +\def\dr{{\frak r}} +\def\dt{{\frak t}} +\def\du{{\frak u}} +\def\trenner #1{% + \vskip 0pt plus 0.5\baselineskip minus 0.25\baselineskip + \centerline{\hbox to 0.#1\hsize{\leaders\hrule height 1pt\hfill}}% + \vskip 2pt plus 0.5\baselineskip minus 0.25\baselineskip +} +\def\gfggtrenner{\hbox to 6\gfbseinheit{\leaders\hrule height 1pt\hfill}% + \ \lower.5ex\hbox{$\bullet$}\ + \hbox to 6\gfbseinheit{\leaders\hrule height 1pt\hfill}% +} +\def\ggtrenner{% + \vskip 0pt plus 0.5\baselineskip minus 0.25\baselineskip + \centerline{\hskip\leftskip\gfggtrenner\hskip\rightskip}% + \vskip 2pt plus 0.5\baselineskip minus 0.25\baselineskip +} +\let\nlpc\nzpz % NewLine Position Character +\let\ci\zi % Character Inside +\let\ce\ze % Character End +\let\rep\wdh % REPeat +\def\bcc#1/#2#3:#4#5\ecc{% ConClusion + \bss#1/#2#3:#4#5\ess +} +\let\formula\formel +\let\followswith\folgtmit +\let\named\genannt +\let\use\verwende +\let\decollator\trenner +\let\separator\ggtrenner +\outer\def\outof p#1,#2"#3"with#4\thatis{% + \gfbsaus p#1,#2"#3"mit#4\also +} +\outer\def\substituting p#1 #2\whichgives{% + \gfbsdurch p#1 #2\folgende +} +\let\gfdefinition\erklaerung +% Local Variables: +% coding: iso-latin-9-unix +% End: diff --git a/Master/tlpkg/bin/tlpkg-ctan-check b/Master/tlpkg/bin/tlpkg-ctan-check index 3f64be3e539..6298b5d7665 100755 --- a/Master/tlpkg/bin/tlpkg-ctan-check +++ b/Master/tlpkg/bin/tlpkg-ctan-check @@ -252,7 +252,7 @@ my @TLP_working = qw( gb4e gcard gchords gcite gender geschichtsfrkl genealogy genealogytree gene-logic genmisc genmpage gentium-tug gentle geometry geometry-de - german germbib germkorr getfiledate getmap getoptk + german germbib germkorr getfiledate getmap getoptk gfnotation gfsartemisia gfsbaskerville gfsbodoni gfscomplutum gfsdidot gfsneohellenic gfsporson gfssolomos ghab ghsystem gillcm gillius gincltex ginpenc gitinfo gitinfo2 diff --git a/Master/tlpkg/libexec/ctan2tds b/Master/tlpkg/libexec/ctan2tds index 1f89ff6b473..bd4c4e9d0ca 100755 --- a/Master/tlpkg/libexec/ctan2tds +++ b/Master/tlpkg/libexec/ctan2tds @@ -1497,6 +1497,7 @@ $standardtex='\.(.bx|cfg|sty|clo|ldf|cls|def|fd|fontspec|cmap|4ht)$'; 'geometry-de', 'NULL', # all doc 'german', '\.sty', 'getoptk', '\.tex', + 'gfnotation', 'notation\.tex', 'ginpenc', '\.gie|\.sty', 'graphics-pln','^[^e].*\.tex|.*\.sty', # not exmpl* 'greek-inputenc', '\.def|\.dfu$', diff --git a/Master/tlpkg/tlpsrc/collection-plainextra.tlpsrc b/Master/tlpkg/tlpsrc/collection-plainextra.tlpsrc index 344ba4c0164..476a3d5145b 100644 --- a/Master/tlpkg/tlpsrc/collection-plainextra.tlpsrc +++ b/Master/tlpkg/tlpsrc/collection-plainextra.tlpsrc @@ -10,6 +10,7 @@ depend fixpdfmag depend font-change depend fontch depend getoptk +depend gfnotation depend graphics-pln depend hyplain depend js-misc diff --git a/Master/tlpkg/tlpsrc/gfnotation.tlpsrc b/Master/tlpkg/tlpsrc/gfnotation.tlpsrc new file mode 100644 index 00000000000..e69de29bb2d --- /dev/null +++ b/Master/tlpkg/tlpsrc/gfnotation.tlpsrc |