[groff] 01/01: ideal: remove all files in files/ and libfiles/ and reenter 4 useful files.

[Bernd Warken]

bwarken pushed a commit to branch master
in repository groff.

commit 9dbd364e9dc446b2a96765bcc523a8c98d41bebe
Author: Bernd Warken <address@hidden>
Date:   Tue Sep 16 20:14:21 2014 +0200

    ideal: remove all files in files/ and libfiles/ and reenter 4 useful files.
---
 contrib/gideal/ChangeLog                 |   11 ++
 contrib/gideal/Makefile.sub              |   24 ++-
 contrib/gideal/files/README.txt          |   29 +++-
 contrib/gideal/files/opaque_MIT.ideal.ms |  265 ------------------------------
 contrib/gideal/libfiles/103.pdf.gz       |  Bin 0 -> 74766 bytes
 contrib/gideal/libfiles/README.txt       |   25 +--
 contrib/gideal/libfiles/arc.ideal        |   37 ----
 contrib/gideal/libfiles/arrow.ideal      |   21 ---
 contrib/gideal/libfiles/circle.ideal     |   19 --
 contrib/gideal/libfiles/dash.ideal       |   18 --
 contrib/gideal/libfiles/rect.ideal       |   30 ----
 contrib/gideal/libfiles/wavy.ideal       |   20 ---
 12 files changed, 61 insertions(+), 438 deletions(-)

diff --git a/contrib/gideal/ChangeLog b/contrib/gideal/ChangeLog
index 66a7cae..1d539db 100644
--- a/contrib/gideal/ChangeLog
+++ b/contrib/gideal/ChangeLog
@@ -1,3 +1,14 @@
+2014-09-16  Bernd Warken  <address@hidden>
+
+       * gideal.pl: New version 0.9.7
+
+       * libfiles/*, files/*: Remove all of these files because of
+       license problems.
+
+       * libfiles/: Add files `103.pdf.gz' and `README.txt'.
+
+       * files/: Add files `test.groff' and `README.txt'.
+
 2014-09-15  Bernd Warken  <address@hidden>
 
        * files/opaque_MIT.ideal.ms, files/test.groff: Correct license
diff --git a/contrib/gideal/Makefile.sub b/contrib/gideal/Makefile.sub
index 41f3d3e..8a5959b 100644
--- a/contrib/gideal/Makefile.sub
+++ b/contrib/gideal/Makefile.sub
@@ -26,16 +26,20 @@
 MAN1=gideal.n
 MAN7=ideal.n
 
-FILES=opaque_MIT.ideal.ms \
-       test.groff \
-       README.txt
-
-LIBFILES=arc.ideal \
-       arrow.ideal \
-       dash.ideal \
-       rect.ideal \
-       wavy.ideal \
-       README.txt
+# FILES=opaque_MIT.ideal.ms 
+
+FILES=README.txt \
+       test.groff
+
+# LIBFILES=arc.ideal \
+#      arrow.ideal \
+#      dash.ideal \
+#      rect.ideal \
+#      wavy.ideal \
+#      README.txt
+
+LIBFILES=README.txt \
+       103.pdf.gz
 
 MOSTLYCLEANADD=gideal $(MAN1) $(MAN7)
 
diff --git a/contrib/gideal/files/README.txt b/contrib/gideal/files/README.txt
index 36e64dc..9ab8cfb 100644
--- a/contrib/gideal/files/README.txt
+++ b/contrib/gideal/files/README.txt
@@ -1,5 +1,28 @@
-opaque_MIT.ideal.ms:
-       http://web.mit.edu/usrdoc/ditroff/ideal.man/opaque
-
 test.groff:
        easy short file with `ideal parts'
+
+########################################################################
+# License
+
+Copyright (C) 2014 Free Software Foundation, Inc.
+
+This file is written by Bernd Warken <address@hidden>.
+
+This file is part of `gideal', which is part of `groff'.
+
+`groff' is free software; you can redistribute it and/or modify it
+under the terms of the GNU General Public License (GPL) vbersion 2 as
+published by the Free Software Foundation.
+
+`groff' 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.
+
+The GPL2 license text is available in the internet at
+<http://www.gnu.org/licenses/gpl-2.0.html>.
+
+####### Emacs settings
+Local Variables:
+mode: text
+End:
diff --git a/contrib/gideal/files/opaque_MIT.ideal.ms 
b/contrib/gideal/files/opaque_MIT.ideal.ms
deleted file mode 100644
index ab78866..0000000
--- a/contrib/gideal/files/opaque_MIT.ideal.ms
+++ /dev/null
@@ -1,265 +0,0 @@
-.\" Emacs mode: -*- nroff -*-
-.\" This file opaque_MIT.ideal.ms comes from
-.\"   http://web.mit.edu/usrdoc/ditroff/ideal.man/opaque
-.\" This heading part was added by
-.\"   Bernd Warken <address@hidden>.
-.NH 1
-Opaque Boxes
-.PP
-\*(id includes statements to blot out pieces
-of a picture.
-In this section we will sometimes place opaque boxes
-without explicitly drawing any background.
-In such cases, assume
-that we have painted over
-the area with pens as above.
-.NH 2
-Opaque Polygons
-.PP
-\*(id needs to know the vertices of a polygon in order
-to opaque the area it covers.
-The vertices are specified as a list in a
-.IT bdlist
-statement.
-For instance, to opaque a rectangular region using the
-.IT rect
-box defined in Section 3, we could use the following statement:
-.IS
-...libfile rect
-wavy {
-       var start, end, perp, pt1, pt2, ht;
-       perp = (0,1)*(start - end)/abs(start - end);
-       pt1 = 0.25[start,end] + perp*ht;
-       pt2 = 0.75[start,end] - perp*ht;
-       conn start to pt1 to pt2 to end;
-}
-brush {
-       var top, bot;
-       var bwd, bht;
-       var leftpt, rightpt;
-       leftpt = 0.5*(top+bot) - bwd/2;
-       rightpt = 0.5*(top+bot) +bwd/2;
-       conn leftpt to rightpt
-               using 7 wavy {
-                       ht = bht;
-               }<start,end>;
-}
-background {
-       conn (0,1) to (0,-1)
-               using 7 brush {
-                       bwd = 2;
-                       bht = 0.1;
-                       }<top,bot>;
-}
-main {
-       put background {
-       };
-       put rect {
-               opaque;
-               bdlist = sw, se, ne, nw;
-               sw = (-0.4,-0.4);
-               wd = ht = 1;
-       };
-}
-.IF
-.P1
-put rect {
-       opaque;
-       bdlist = sw, se, ne, nw;
-       sw = (-0.4,-0.4);
-       wd = ht = 1;
-};
-
-
-
-
-.P2
-.LP
-The sides of the rectangle are drawn by
-.IT rect :
-they are not supplied automatically by the opaqueing routine.
-If we wanted to save only the interior of the rectangle,
-we could use almost the same statement:
-.IS
-...minx -1.0
-...maxx 1.0
-...miny -1.0
-...maxy 1.0
-main {
-       put background {
-       };
-put rect {
-       opaque exterior;
-       bdlist = sw, se, ne, nw;
-       sw = (-0.4,-0.4);
-       wd = ht = 1;
-};
-}
-.IF
-.P1
-put rect {
-       opaque exterior;
-       bdlist = sw, se, ne, nw;
-       sw = (-0.4,-0.4);
-       wd = ht = 1;
-};
-.P2
-.PP
-If we plan to opaque a lot of rectangles,
-we should include a
-.IT bdlist
-in the definition of
-.IT rect .
-Such a default
-.IT bdlist
-would be referenced only if the parameter section
-of the put statement included an opaque statement
-.IT and
-did not include its own
-.IT bdlist .
-.NH 2
-Opaque Circular Arc Polygons
-.PP
-The edges of opaque regions can also be circular arcs.
-.Ts
-This generalization of the simple boundary statement
-is the most recent addition to \*(id.
-It avoids treating circles and their sectors and segments
-as special cases, and makes opaqueing circular
-arc polygons much easier.
-.Te
-.LP
-To specify a circular arc edge, one gives its endpoints
-and a point through which it passes;
-this ``pass-through'' point is marked in the boundary
-list by the symbol ``\f8^\fP''.
-For example, the boundary list for the sector shown below is
-.IS
-...libfile sector
-main {
-       put background {
-       };
-put sector {
-       center = (-1,-1);
-       radius = 2;
-       startang = 30;
-       endang = 60;
-       opaque;
-};
-}
-.IF
-.P1
-boundary = center, cis(30), ^ cis(45), cis(60);
-
-
-
-
-
-.P2
-.PP
-Another common opaque arc is the segment:
-.IS
-...libfile segment
-main {
-       put background {
-       };
-put segment {
-       center = (-1,-1);
-       radius = 2;
-       startang = 0;
-       endang = 90;
-       opaque;
-};
-}
-.IF
-.P1
-boundary = cis(0), ^ cis(45), cis(90);
-
-
-
-
-
-
-
-
-
-
-.P2
-.PP
-One can construct an opaque circle out of two semicircular edges:
-.IS
-...libfile circle
-main {
-       put background {
-       };
-put circle {
-       radius = 0.5;
-       center = 0;
-       opaque;
-};
-put circle {
-       radius = 1;
-       center = 0;
-       opaque exterior;
-};
-}
-.IF
-.P1
-boundary = cis(0), ^ cis(90), cis(180), ^ cis(270);
-
-
-
-
-
-
-.P2
-.LP
-Here, the outer circle has an opaque exterior,
-while the inner circle has an opaque interior.
-.NH 2
-Order is Important
-.PP
-Without the ability to opaque,
-the order in which boxes are put does not matter.
-But when some boxes are opaque, order obviously
-.IT does
-matter.
-Put statements are executed
-in the order in which they appear in the box definition.
-When an opaque box is drawn, the opaquing is done
-.IT first ,
-then the lines of the box are drawn;
-so, for instance, an opaque
-.IT listnode
-does include the line down its middle separating its
-.IT info
-field from its
-.IT next
-field.
-.NH 2
-Some Hard Facts
-.PP
-Neither text nor splines can be used to opaque objects,
-nor will they be clipped properly if they are in a
-picture and an opaque box is placed over them.
-.Ts
-The problem with text is that \*(id operates as a \*(tf preprocessor,
-so it cannot determine anything about the size of the
-text, and it needs to know that if it is to do anything
-involving opaquing and text.
-.Te
-.Ts
-The problem with splines is more subtle.
-When a line or circular arc is chopped,
-it is easy to specify the lines or circular arcs that remain.
-But when a spline is chopped, the guiding points of the resulting curve pieces
-are hard to determine.
-.Te
-.
-.\" --------------------------------------------------------------------
-.\" Emacs settings
-.\" --------------------------------------------------------------------
-.
-.\" Local Variables:
-.\" mode: nroff
-.\" End:
diff --git a/contrib/gideal/libfiles/103.pdf.gz 
b/contrib/gideal/libfiles/103.pdf.gz
new file mode 100644
index 0000000..da565f4
Binary files /dev/null and b/contrib/gideal/libfiles/103.pdf.gz differ
diff --git a/contrib/gideal/libfiles/README.txt 
b/contrib/gideal/libfiles/README.txt
index 3a98f20..b15c8c6 100644
--- a/contrib/gideal/libfiles/README.txt
+++ b/contrib/gideal/libfiles/README.txt
@@ -1,14 +1,14 @@
-In this directory, there are stored a series of `ideal libfiles'.
-They all come from the `ideal' documentation
-     Computing Science Technical Report No. 103
-     IDEAL User’s Manual - Christopher J. Van Wyk
+103.pdf.gz:
+  CSTR #103 (Computing Science Technical Report No. 103)
 
-Therein the name of the `libfile' files does not have an extension.
-But we added the extension `.ideal' to each libfile file.
+  IDEAL User's Manual
+  Author: Christopher J. Van Wyk, December 1981.
 
-Only the libfile `arc' is lacking.  It's existence was mentioned, but
-not given.  We collected useful information and wrote a new file
-`arc.ideal'.
+  You can find a copy of this file at
+    http://cm.bell-labs.com/cm/cs/cstr/103.ps.gz
+
+  From that document, many ideal examples can be taken.  So please
+  look there for useful information.
 
 
 ########################################################################
@@ -16,7 +16,7 @@ not given.  We collected useful information and wrote a new 
file
 
 Copyright (C) 2014 Free Software Foundation, Inc.
 
-Written by Bernd Warken <address@hidden>.
+This file is written by Bernd Warken <address@hidden>.
 
 This file is part of `gideal', which is part of `groff'.
 
@@ -31,8 +31,3 @@ for more details.
 
 The GPL2 license text is available in the internet at
 <http://www.gnu.org/licenses/gpl-2.0.html>.
-
-####### Emacs settings
-Local Variables:
-mode: text
-End:
diff --git a/contrib/gideal/libfiles/arc.ideal 
b/contrib/gideal/libfiles/arc.ideal
deleted file mode 100644
index 2c139e1..0000000
--- a/contrib/gideal/libfiles/arc.ideal
+++ /dev/null
@@ -1,37 +0,0 @@
-.\" from `Computing Science Technical Report No. 103'
-.\" IDEAL User’s Manual - Christopher J. Van Wyk
-.
-.\" This file is not complete.  The basicdefinition is lacking -
-.\" better do not use it with `...libfile'.
-
-.IS
-/* giving center, radius, and
-starting and ending angles */
-put arc {
-       center = 0;
-       radius = 1;
-       startang = 0;
-       endang = 235;
-};
-/* giving center, starting point,
-and ending angle */
-put arc {
-       center = 0;
-       start = 1;
-       endang = 235;
-};
-/* giving three points on the arc */
-put arc {
-       start = cis(235);
-       midway = -1;
-       end = 0;
-};
-.IE
-.
-.\" --------------------------------------------------------------------
-.\" Emacs settings
-.\" --------------------------------------------------------------------
-.
-.\" Local Variables:
-.\" mode: nroff
-.\" End:
diff --git a/contrib/gideal/libfiles/arrow.ideal 
b/contrib/gideal/libfiles/arrow.ideal
deleted file mode 100644
index 387b9c4..0000000
--- a/contrib/gideal/libfiles/arrow.ideal
+++ /dev/null
@@ -1,21 +0,0 @@
-.\" from `Computing Science Technical Report No. 103'
-.\" IDEAL User’s Manual - Christopher J. Van Wyk
-.
-.IS
-arrow {
-      var tl, hd, head, perp, headang;
-      conn tl to hd;
-      perp = head*(tl-hd)/abs(tl-hd);
-      conn hd + cis(headang)*perp to hd to hd + cis(-headang)*perp;
-      head  ̃ 0.1;
-      headang  ̃ 25;
-}
-.IE
-.
-.\" --------------------------------------------------------------------
-.\" Emacs settings
-.\" --------------------------------------------------------------------
-.
-.\" Local Variables:
-.\" mode: nroff
-.\" End:
diff --git a/contrib/gideal/libfiles/circle.ideal 
b/contrib/gideal/libfiles/circle.ideal
deleted file mode 100644
index 988ba61..0000000
--- a/contrib/gideal/libfiles/circle.ideal
+++ /dev/null
@@ -1,19 +0,0 @@
-.\" from `Computing Science Technical Report No. 103'
-.\" IDEAL User’s Manual - Christopher J. Van Wyk
-.
-.IS
-circle {
-       var center, radius, z1, z2, z3;
-       put CIRCLE {
-               radius = 3;
-       }
-}
-.IE
-.
-.\" --------------------------------------------------------------------
-.\" Emacs settings
-.\" --------------------------------------------------------------------
-.
-.\" Local Variables:
-.\" mode: nroff
-.\" End:
diff --git a/contrib/gideal/libfiles/dash.ideal 
b/contrib/gideal/libfiles/dash.ideal
deleted file mode 100644
index 8c746fb..0000000
--- a/contrib/gideal/libfiles/dash.ideal
+++ /dev/null
@@ -1,18 +0,0 @@
-.\" from `Computing Science Technical Report No. 103'
-.\" IDEAL User’s Manual - Christopher J. Van Wyk
-.
-.IS
-dash {
-     var start, end;
-     conn start to 0.25[start,end];
-     conn 0.75[start,end] to end;
-}
-.IE
-.
-.\" --------------------------------------------------------------------
-.\" Emacs settings
-.\" --------------------------------------------------------------------
-.
-.\" Local Variables:
-.\" mode: nroff
-.\" End:
diff --git a/contrib/gideal/libfiles/rect.ideal 
b/contrib/gideal/libfiles/rect.ideal
deleted file mode 100644
index 70a215f..0000000
--- a/contrib/gideal/libfiles/rect.ideal
+++ /dev/null
@@ -1,30 +0,0 @@
-.\" from `Computing Science Technical Report No. 103'
-.\" IDEAL User’s Manual - Christopher J. Van Wyk
-.
-.IS
-rect {
-       var ne, nw, sw, se,
-       n, e, w, s, c,
-       ht, wd;
-       ne = se + (0,1)*ht;
-       nw = sw + (0,1)*ht;
-       ne = nw + wd;
-       n = (ne+nw)/2;
-       s = (se+sw)/2;
-       e = (ne+se)/2;
-       w = (nw+sw)/2;
-       c = (ne+sw)/2;
-       ht  ̃ 1;
-       wd  ̃ 1.5;
-       bdlist = ne, nw, sw, se;
-       conn ne to nw to sw to se to ne;
-}
-.IE
-.
-.\" --------------------------------------------------------------------
-.\" Emacs settings
-.\" --------------------------------------------------------------------
-.
-.\" Local Variables:
-.\" mode: nroff
-.\" End:
diff --git a/contrib/gideal/libfiles/wavy.ideal 
b/contrib/gideal/libfiles/wavy.ideal
deleted file mode 100644
index 0e23940..0000000
--- a/contrib/gideal/libfiles/wavy.ideal
+++ /dev/null
@@ -1,20 +0,0 @@
-.\" from `Computing Science Technical Report No. 103'
-.\" IDEAL User’s Manual - Christopher J. Van Wyk
-.
-.IS
-wavy {
-       var start, end, perp, pt1, pt2, ht;
-       perp = (0,1)*(start - end)/abs(start - end);
-       pt1 = 0.25[start,end] + perp*ht;
-       pt2 = 0.75[start,end] - perp*ht;
-       conn start to pt1 to pt2 to end;
-}
-.IE
-.
-.\" --------------------------------------------------------------------
-.\" Emacs settings
-.\" --------------------------------------------------------------------
-.
-.\" Local Variables:
-.\" mode: nroff
-.\" End: