Re: [TUHS] Plot 10 Sources

Re: [TUHS] Plot 10 Sources

[Noel Chiappa]

    > From: "Nelson H. F. Beebe"

    > In our PDP-10 TOPS-20 archive of what was then utah-science .. I find
    > these files:

Thanks very much for doing that search, and congratulations on finding them!

Not that I have the slightest interest/use in the results, but it's so good to
see historical software being saved.

    Noel

Re: [TUHS] Plot 10 Sources

[Clem Cole]

[-- Attachment #1: Type: text/plain, Size: 453 bytes --]

+1  Thank you

On Wed, Jul 10, 2019 at 12:39 PM Noel Chiappa <jnc@mercury.lcs.mit.edu>
wrote:

>     > From: "Nelson H. F. Beebe"
>
>     > In our PDP-10 TOPS-20 archive of what was then utah-science .. I find
>     > these files:
>
> Thanks very much for doing that search, and congratulations on finding
> them!
>
> Not that I have the slightest interest/use in the results, but it's so
> good to
> see historical software being saved.
>
>     Noel
>

[-- Attachment #2: Type: text/html, Size: 883 bytes --]

Re: [TUHS] Plot 10 Sources

[Clem cole]

Nelson.  Good question. The status is unknown last I knew.  I’ve personally lost track of anyone at Tek that might have able to help.  

Also your version seems to be pure FORTRAN-IV not the mortran sources.  Part of my question is I’m not sure if they shipped the pre or post processed version.  Somebody like Ed Post (of the old “Real Programmers don’t write Pascal, they use FORTRAN”) might remember. 

Sent from my PDP-7 Running UNIX V0 expect things to be almost but not quite. 

> On Jul 10, 2019, at 5:51 AM, Nelson H. F. Beebe <beebe@math.utah.edu> wrote:
> 
> Clem Cole <clemc@ccc.com> asks on Tue, 9 Jul 2019 21:32:31 -0400:
> 
>>> does anyone know if any version of the Tektronix Plot 10 sources has survived? 
> 
> In our PDP-10 TOPS-20 archive of what was then utah-science, later
> science.utah.edu (a domain now owned by our Dean's office), I find
> these files:
> 
>    % ls -log
>    total 3768
>    -rw-rw-r-- 1  145899 May 16  1985 agii.for
>    -rw-rw-r-- 1  245190 May 16  1985 ezgr27.for
>    -rw-rw-r-- 1 2132822 May 16  1985 igl.for
>    -rw-rw-r-- 1  289730 May 16  1985 p4663.for
>    -rw-rw-r-- 1  129276 May 16  1985 p4663.ver
>    -rw-rw-r-- 1  149038 May 16  1985 ploter.for
>    -rw-rw-r-- 1  210033 May 16  1985 plt10.for
>    -rw-rw-r-- 1     470 May 16  1985 plt10t.for
> 
>    % wc -l *
>       1815 agii.for
>       7251 ezgr27.for
>      26011 igl.for
>       3577 p4663.for
>       1596 p4663.ver
>       1845 ploter.for
>       2763 plt10.for
>     27 plt10t.for
>      44885 total
> 
>    % head -16 agii.for
>    C***********************************************************************00000010
>    C*                                                                     *00000020
>    C*                4010A02 PLOT 10 ADVANCED GRAPHING II                 *00000030
>    C*                                LEVEL 1                              *00000040
>    C*                                                                     *00000050
>    C*         062-2948-01 STD. SOURCE CARD DECK, 026 PUNCH                *00000060
>    C*         062-2949-01 STD. SOURCE LISTING                             *00000070
>    C*                                                                     *00000080
>    C*            C  COPYRIGHT 1976 TEKTRONIX, INC.                        *00000090
>    C*               ALL RIGHTS RESERVED                                   *00000100
>    C*                                                                     *00000110
>    C*               TEKTRONIX, INC.                                       *00000120
>    C*               P. O. BOX 500                                         *00000130
>    C*               BEAVERTON, OREGON 97077                               *00000140
>    C*                                                                     *00000150
>    C***********************************************************************00000160
> 
> The Bitsavers code at
> 
>    http://www.bitsavers.org/bits/Tektronix/PLOT_10/TCS_3.0/plot10.ftn
> 
> has a 1974 copyright date, so our code is two years newer.
> 
> The question is, what is the copyright status of this code?  Has
> Tektronix (https://www.tek.com/) made any statements about releasing
> it to the public?
> 
> I no longer remember the conditions under which we got the PLOT 10
> code, and any licensing paperwork has long since gone to recycling.
> 
> -------------------------------------------------------------------------------
> - Nelson H. F. Beebe                    Tel: +1 801 581 5254                  -
> - University of Utah                    FAX: +1 801 581 4148                  -
> - Department of Mathematics, 110 LCB    Internet e-mail: beebe@math.utah.edu  -
> - 155 S 1400 E RM 233                       beebe@acm.org  beebe@computer.org -
> - Salt Lake City, UT 84112-0090, USA    URL: http://www.math.utah.edu/~beebe/ -
> -------------------------------------------------------------------------------

Re: [TUHS] Plot 10 Sources

[Nelson H. F. Beebe]

Clem Cole <clemc@ccc.com> asks on Tue, 9 Jul 2019 21:32:31 -0400:

>> does anyone know if any version of the Tektronix Plot 10 sources has survived? 

In our PDP-10 TOPS-20 archive of what was then utah-science, later
science.utah.edu (a domain now owned by our Dean's office), I find
these files:

    % ls -log
    total 3768
    -rw-rw-r-- 1  145899 May 16  1985 agii.for
    -rw-rw-r-- 1  245190 May 16  1985 ezgr27.for
    -rw-rw-r-- 1 2132822 May 16  1985 igl.for
    -rw-rw-r-- 1  289730 May 16  1985 p4663.for
    -rw-rw-r-- 1  129276 May 16  1985 p4663.ver
    -rw-rw-r-- 1  149038 May 16  1985 ploter.for
    -rw-rw-r-- 1  210033 May 16  1985 plt10.for
    -rw-rw-r-- 1     470 May 16  1985 plt10t.for

    % wc -l *
       1815 agii.for
       7251 ezgr27.for
      26011 igl.for
       3577 p4663.for
       1596 p4663.ver
       1845 ploter.for
       2763 plt10.for
	 27 plt10t.for
      44885 total

    % head -16 agii.for
    C***********************************************************************00000010
    C*                                                                     *00000020
    C*                4010A02 PLOT 10 ADVANCED GRAPHING II                 *00000030
    C*                                LEVEL 1                              *00000040
    C*                                                                     *00000050
    C*         062-2948-01 STD. SOURCE CARD DECK, 026 PUNCH                *00000060
    C*         062-2949-01 STD. SOURCE LISTING                             *00000070
    C*                                                                     *00000080
    C*            C  COPYRIGHT 1976 TEKTRONIX, INC.                        *00000090
    C*               ALL RIGHTS RESERVED                                   *00000100
    C*                                                                     *00000110
    C*               TEKTRONIX, INC.                                       *00000120
    C*               P. O. BOX 500                                         *00000130
    C*               BEAVERTON, OREGON 97077                               *00000140
    C*                                                                     *00000150
    C***********************************************************************00000160

The Bitsavers code at

    http://www.bitsavers.org/bits/Tektronix/PLOT_10/TCS_3.0/plot10.ftn

has a 1974 copyright date, so our code is two years newer.

The question is, what is the copyright status of this code?  Has
Tektronix (https://www.tek.com/) made any statements about releasing
it to the public?

I no longer remember the conditions under which we got the PLOT 10
code, and any licensing paperwork has long since gone to recycling.

-------------------------------------------------------------------------------
- Nelson H. F. Beebe                    Tel: +1 801 581 5254                  -
- University of Utah                    FAX: +1 801 581 4148                  -
- Department of Mathematics, 110 LCB    Internet e-mail: beebe@math.utah.edu  -
- 155 S 1400 E RM 233                       beebe@acm.org  beebe@computer.org -
- Salt Lake City, UT 84112-0090, USA    URL: http://www.math.utah.edu/~beebe/ -
-------------------------------------------------------------------------------

Re: [TUHS] Plot 10 Sources

[Clem Cole]

[-- Attachment #1: Type: text/plain, Size: 969 bytes --]

Cool many thanks.

FYI: it's a great start.  It just the Terminal Control System part, there
was about 5 or 6 subsystems, IIRC.  That's a fairly early version (1974)
also, since its Fortran-IV.   Later versions in the late 70's/early 80s
were in MORTRAN, BTW.  I remember an internal argument of the folks in the
terminal group about if Plot 10's GKS system should be done in C - but
FORTRAN still rules the day so, MORTRAN was the compromise.

On Tue, Jul 9, 2019 at 10:51 PM Charles Anthony <charles.unix.pro@gmail.com>
wrote:

>
>
> On Tue, Jul 9, 2019 at 6:33 PM Clem Cole <clemc@ccc.com> wrote:
>
>> Mark's looking at plot got me thinking, does anyone know if any version
>> of the Tektronix Plot 10 sources has survived?   I have googled around and
>> found a few manuals, but never the (Fortran) code itself.
>>
>
> I have a copy, but I don't remember where I found it...
>
> https://drive.google.com/open?id=1cpZvaNXa5v_0wrZfvJ-apWRdUqhvoNg7
>
> -- Charles
>
>

[-- Attachment #2: Type: text/html, Size: 2086 bytes --]

Re: [TUHS] Plot 10 Sources

[Charles Anthony]

[-- Attachment #1: Type: text/plain, Size: 603 bytes --]

On Tue, Jul 9, 2019 at 7:51 PM Charles Anthony <charles.unix.pro@gmail.com>
wrote:

>
>
> On Tue, Jul 9, 2019 at 6:33 PM Clem Cole <clemc@ccc.com> wrote:
>
>> Mark's looking at plot got me thinking, does anyone know if any version
>> of the Tektronix Plot 10 sources has survived?   I have googled around and
>> found a few manuals, but never the (Fortran) code itself.
>>
>
> I have a copy, but I don't remember where I found it...
>
> https://drive.google.com/open?id=1cpZvaNXa5v_0wrZfvJ-apWRdUqhvoNg7
>
>
I found it at bitsavers:

http://www.bitsavers.org/bits/Tektronix/PLOT_10/TCS_3.0/

-- Charles

[-- Attachment #2: Type: text/html, Size: 1619 bytes --]

Re: [TUHS] Plot 10 Sources

[Charles Anthony]

[-- Attachment #1: Type: text/plain, Size: 415 bytes --]

On Tue, Jul 9, 2019 at 6:33 PM Clem Cole <clemc@ccc.com> wrote:

> Mark's looking at plot got me thinking, does anyone know if any version of
> the Tektronix Plot 10 sources has survived?   I have googled around and
> found a few manuals, but never the (Fortran) code itself.
>

I have a copy, but I don't remember where I found it...

https://drive.google.com/open?id=1cpZvaNXa5v_0wrZfvJ-apWRdUqhvoNg7

-- Charles

[-- Attachment #2: Type: text/html, Size: 970 bytes --]

[TUHS] Plot 10 Sources

[Clem Cole]

[-- Attachment #1: Type: text/plain, Size: 205 bytes --]

Mark's looking at plot got me thinking, does anyone know if any version of
the Tektronix Plot 10 sources has survived?   I have googled around and
found a few manuals, but never the (Fortran) code itself.

[-- Attachment #2: Type: text/html, Size: 313 bytes --]