[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 at math.utah.edu> wrote:
> 
> Clem Cole <clemc at 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 at math.utah.edu  -
> - 155 S 1400 E RM 233                       beebe at acm.org  beebe at computer.org -
> - Salt Lake City, UT 84112-0090, USA    URL: http://www.math.utah.edu/~beebe/ -
> -------------------------------------------------------------------------------