From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: X-Spam-Checker-Version: SpamAssassin 3.4.2 (2018-09-13) on inbox.vuxu.org X-Spam-Level: X-Spam-Status: No, score=-1.1 required=5.0 tests=DKIM_SIGNED,DKIM_VALID, DKIM_VALID_AU,HEADER_FROM_DIFFERENT_DOMAINS,MAILING_LIST_MULTI, RCVD_IN_DNSWL_NONE autolearn=ham autolearn_force=no version=3.4.2 Received: from minnie.tuhs.org (minnie.tuhs.org [45.79.103.53]) by inbox.vuxu.org (OpenSMTPD) with ESMTP id 04359b68 for ; Wed, 10 Jul 2019 14:34:59 +0000 (UTC) Received: by minnie.tuhs.org (Postfix, from userid 112) id 965BA948FB; Thu, 11 Jul 2019 00:34:57 +1000 (AEST) Received: from minnie.tuhs.org (localhost [127.0.0.1]) by minnie.tuhs.org (Postfix) with ESMTP id 5B9709480A; Thu, 11 Jul 2019 00:34:34 +1000 (AEST) Authentication-Results: minnie.tuhs.org; dkim=pass (1024-bit key; unprotected) header.d=ccc.com header.i=@ccc.com header.b="OgGti1t1"; dkim-atps=neutral Received: by minnie.tuhs.org (Postfix, from userid 112) id 2B44B9480A; Thu, 11 Jul 2019 00:34:32 +1000 (AEST) Received: from mail-pl1-f169.google.com (mail-pl1-f169.google.com [209.85.214.169]) by minnie.tuhs.org (Postfix) with ESMTPS id D4D4F947D8 for ; Thu, 11 Jul 2019 00:34:29 +1000 (AEST) Received: by mail-pl1-f169.google.com with SMTP id c14so1344845plo.0 for ; Wed, 10 Jul 2019 07:34:29 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=ccc.com; s=google; h=mime-version:subject:from:in-reply-to:date:cc :content-transfer-encoding:message-id:references:to; bh=3a3kIWFmG7A1SbYT3kyKNWnAPlOJgj+v60NfAo3K7JA=; b=OgGti1t1WNIoxC0nyND9QTt644ucBD4L6Qj2Hv3UrrXYnzJaMwU6NNifIydBaIS6jZ WvXYBTamNZmyut4qfIYtlSc0JnjEt3Kaz0iggidbLB1MeedroZYWIyDG2p4DmBcJENDv 50IFXujFpg+JkwESlkF57crgbdJER58SWczvg= X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=1e100.net; s=20161025; h=x-gm-message-state:mime-version:subject:from:in-reply-to:date:cc :content-transfer-encoding:message-id:references:to; bh=3a3kIWFmG7A1SbYT3kyKNWnAPlOJgj+v60NfAo3K7JA=; b=Nk36i1BYqkwuYYrP2/CalmhbpO9oCGeP/RU21WkUQMrHWkJptyBnrHYAz8UfRBD21P j84zczM09YVZIrzXYzKlQpCLliacDxMtRw+trPlwKAHI24SbZieb9GAsbn8IeLxJuJHa gDTQDh5wrbq9Nzx7L233i7uDFkoQCLs/M44EjmKyfF8bhkGBw1VTADHBAs1BcxQxuJi0 EjQqy8nruKebPqUjkm4p0wLOa+4wbqRB1GcnNuD32VY44w+vGZvmOrljQk5+AvgxJWRD iKsJtVfk1mCE4ehglSgSEcTBWgce6MOz0baI0t6h+qeH/NOWw47P/2o8cB0mtZEZos3Q Mbag== X-Gm-Message-State: APjAAAUDspBpSRVn8xQN0kWwVopmmsXFRQOwOCtoX2Uw52v9WZcpJeCz PmaLjONu32kWt8ndCU+ejF2q2w== X-Google-Smtp-Source: APXvYqy3v6vERkJtpLS5bKieeYXakyv5DNDtkvi9F+N88UbKwl8FQ1S/o+QoDdNmSCCyjM9fkVj24A== X-Received: by 2002:a17:902:7483:: with SMTP id h3mr39222751pll.28.1562769268982; Wed, 10 Jul 2019 07:34:28 -0700 (PDT) Received: from [172.20.1.214] ([38.119.166.3]) by smtp.gmail.com with ESMTPSA id j1sm2393355pfe.101.2019.07.10.07.34.27 (version=TLS1_2 cipher=ECDHE-RSA-AES128-GCM-SHA256 bits=128/128); Wed, 10 Jul 2019 07:34:27 -0700 (PDT) Content-Type: text/plain; charset=utf-8 Mime-Version: 1.0 (1.0) From: Clem cole X-Mailer: iPhone Mail (16F203) In-Reply-To: Date: Wed, 10 Jul 2019 07:34:26 -0700 Content-Transfer-Encoding: quoted-printable Message-Id: <6FE9B972-531A-461D-B1F8-727CF1B0C277@ccc.com> References: To: "Nelson H. F. Beebe" Subject: Re: [TUHS] Plot 10 Sources X-BeenThere: tuhs@minnie.tuhs.org X-Mailman-Version: 2.1.26 Precedence: list List-Id: The Unix Heritage Society mailing list List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Cc: The Eunuchs Hysterical Society Errors-To: tuhs-bounces@minnie.tuhs.org Sender: "TUHS" Nelson. Good question. The status is unknown last I knew. I=E2=80=99ve per= sonally lost track of anyone at Tek that might have able to help. =20 Also your version seems to be pure FORTRAN-IV not the mortran sources. Part= of my question is I=E2=80=99m not sure if they shipped the pre or post proc= essed version. Somebody like Ed Post (of the old =E2=80=9CReal Programmers d= on=E2=80=99t write Pascal, they use FORTRAN=E2=80=9D) might remember.=20 Sent from my PDP-7 Running UNIX V0 expect things to be almost but not quite.= =20 > On Jul 10, 2019, at 5:51 AM, Nelson H. F. Beebe wrot= e: >=20 > Clem Cole asks on Tue, 9 Jul 2019 21:32:31 -0400: >=20 >>> does anyone know if any version of the Tektronix Plot 10 sources has sur= vived?=20 >=20 > 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: >=20 > % 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 >=20 > % 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 >=20 > % 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 >=20 > The Bitsavers code at >=20 > http://www.bitsavers.org/bits/Tektronix/PLOT_10/TCS_3.0/plot10.ftn >=20 > has a 1974 copyright date, so our code is two years newer. >=20 > 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? >=20 > I no longer remember the conditions under which we got the PLOT 10 > code, and any licensing paperwork has long since gone to recycling. >=20 > --------------------------------------------------------------------------= ----- > - 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.e= du - > - 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/~bee= be/ - > --------------------------------------------------------------------------= -----