[From nobody Wed Oct 14 21:23:44 2009
From: &quot;Ronald Mak&quot; &lt;ron.mak@willardlowe.com&gt;
To: &quot;Kenneth Louden&quot; &lt;louden@cs.sjsu.edu&gt;, &quot;Chris Tseng&quot; &lt;tseng@cs.sjsu.edu&gt;, 
	&quot;Cay Horstmann&quot; &lt;Cay.Horstmann@sjsu.edu&gt;
Subject: How to feel really old fast
Date: Fri, 7 Mar 2008 11:48:59 -0700
Message-ID: &lt;004901c88083$ed474080$0200a8c0@DELLD820&gt;
MIME-Version: 1.0
Content-Type: multipart/alternative;
	boundary=&quot;----=_NextPart_000_00AC_01CA4D14.D76251B0&quot;
X-Mailer: Microsoft Office Outlook 11
Thread-Index: AciAg+dfK90kY8i8R6Se7R7kHvoOZA==
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2900.5579

This is a multi-part message in MIME format.

------=_NextPart_000_00AC_01CA4D14.D76251B0
Content-Type: text/plain;
	charset=&quot;US-ASCII&quot;
Content-Transfer-Encoding: 7bit

One of the topics for my CS 160 sections last night was how to deal with
legacy software.
 
I did a live demo in class where I took a working command-line program
(below) written in FORTRAN IV, wrapped it inside of a Java bean, and then
deployed the bean as a web service. So the old FORTRAN program turns into a
service provider over the Internet!
 
What surprised me was the reaction of the students when I showed them the
FORTRAN program. Some said they had &quot;heard of&quot; FORTRAN, but few had actually
seen a program written in it. I explained that this program would have been
punched onto cards, that the C in column 1 was for comments, that the
statements started in column 7, etc. They were totally amazed.
 
I first started programming in FORTRAN at age 14. I used it extensively as a
Stanford undergrad in my numerical analysis and other scientific programming
classes, and when I became a grad student there, I actually taught the
FORTRAN class in the CS dept for two quarters.
 
Last night in front of my students, I was feeling like a legacy myself ...
 
-- Ron
 
P.S. Perhaps I should schedule a field trip for my students to the Computer
History Museum where I've volunteered as a docent (among other tasks).
 
P.P.S. You can get a free open-source FORTRAN compiler for the PC from Open
Watcom (http://www.openwatcom.org/index.php/Main_Page). This originates from
the old WATFOR compiler developed in 1965 at the University of Waterloo in
Canada which first ran on the school's IBM 7040 and 360 systems. I used
WATFOR (and then WATFIV) a lot at Stanford.
 
C     SQUARE ROOT PROGRAM
C
      REAL*8 NUMBER, ROOT
C
C READ NUMBER
C
      READ (5,100) NUMBER
  100 FORMAT (F5.1)
C
C COMPUTE SQUARE ROOT
C
      ROOT = DSQRT(NUMBER)
C
C WRITE SQUARE ROOT
C
      WRITE (6,200) NUMBER, ROOT
  200 FORMAT ('THE SQUARE ROOT OF ', F5.1, ' IS ', F15.10)
C
      STOP
      END

------=_NextPart_000_00AC_01CA4D14.D76251B0
Content-Type: text/html;
	charset=&quot;US-ASCII&quot;
Content-Transfer-Encoding: quoted-printable

&lt;!DOCTYPE HTML PUBLIC &quot;-//W3C//DTD HTML 4.0 Transitional//EN&quot;&gt;
&lt;HTML&gt;&lt;HEAD&gt;
&lt;META HTTP-EQUIV=3D&quot;Content-Type&quot; CONTENT=3D&quot;text/html; =
charset=3Dus-ascii&quot;&gt;


&lt;META content=3D&quot;MSHTML 6.00.6000.16587&quot; name=3DGENERATOR&gt;&lt;/HEAD&gt;
&lt;BODY&gt;
&lt;DIV&gt;&lt;FONT face=3DArial size=3D2&gt;&lt;SPAN class=3D437391718-07032008&gt;One of =
the topics=20
for my CS 160 sections last night was how to deal with legacy=20
software.&lt;/SPAN&gt;&lt;/FONT&gt;&lt;/DIV&gt;
&lt;DIV&gt;&lt;FONT face=3DArial size=3D2&gt;&lt;SPAN=20
class=3D437391718-07032008&gt;&lt;/SPAN&gt;&lt;/FONT&gt;&amp;nbsp;&lt;/DIV&gt;
&lt;DIV&gt;&lt;FONT face=3DArial size=3D2&gt;&lt;SPAN class=3D437391718-07032008&gt;I did =
a live demo in=20
class where I took a working command-line&amp;nbsp;program (below) written =
in=20
FORTRAN IV, wrapped it inside of a Java bean, and then deployed the bean =
as a=20
web service. So the old FORTRAN program turns into a service provider =
over the=20
Internet!&lt;/SPAN&gt;&lt;/FONT&gt;&lt;/DIV&gt;
&lt;DIV&gt;&lt;FONT face=3DArial size=3D2&gt;&lt;SPAN=20
class=3D437391718-07032008&gt;&lt;/SPAN&gt;&lt;/FONT&gt;&amp;nbsp;&lt;/DIV&gt;
&lt;DIV&gt;&lt;FONT face=3DArial size=3D2&gt;&lt;SPAN class=3D437391718-07032008&gt;What =
surprised me=20
was the reaction of the students when I showed them the FORTRAN program. =
Some=20
said they had &quot;heard of&quot; FORTRAN, but few had actually seen a program =
written in=20
it.&amp;nbsp;I explained that this program&amp;nbsp;would have been punched onto =
cards,=20
that the C in column 1 was for comments, that the statements started in =
column=20
7, etc. They were totally amazed.&lt;/SPAN&gt;&lt;/FONT&gt;&lt;/DIV&gt;
&lt;DIV&gt;&lt;FONT face=3DArial size=3D2&gt;&lt;SPAN=20
class=3D437391718-07032008&gt;&lt;/SPAN&gt;&lt;/FONT&gt;&amp;nbsp;&lt;/DIV&gt;
&lt;DIV&gt;&lt;FONT face=3DArial size=3D2&gt;&lt;SPAN class=3D437391718-07032008&gt;I =
first started=20
programming in FORTRAN at age 14. I used it extensively as a Stanford =
undergrad=20
in my numerical analysis and other scientific programming classes, and =
when I=20
became a grad student there, I actually taught the FORTRAN class in the =
CS dept=20
for two quarters.&lt;/SPAN&gt;&lt;/FONT&gt;&lt;/DIV&gt;
&lt;DIV&gt;&lt;FONT face=3DArial size=3D2&gt;&lt;SPAN=20
class=3D437391718-07032008&gt;&lt;/SPAN&gt;&lt;/FONT&gt;&amp;nbsp;&lt;/DIV&gt;
&lt;DIV&gt;&lt;FONT face=3DArial size=3D2&gt;&lt;SPAN class=3D437391718-07032008&gt;Last =
night in front=20
of my students, I was feeling like a legacy myself =
...&lt;/SPAN&gt;&lt;/FONT&gt;&lt;/DIV&gt;
&lt;DIV&gt;&lt;FONT face=3DArial size=3D2&gt;&lt;SPAN=20
class=3D437391718-07032008&gt;&lt;/SPAN&gt;&lt;/FONT&gt;&amp;nbsp;&lt;/DIV&gt;
&lt;DIV&gt;&lt;FONT face=3DArial size=3D2&gt;&lt;SPAN class=3D437391718-07032008&gt;--=20
Ron&lt;/SPAN&gt;&lt;/FONT&gt;&lt;/DIV&gt;
&lt;DIV&gt;&lt;FONT face=3DArial size=3D2&gt;&lt;SPAN=20
class=3D437391718-07032008&gt;&lt;/SPAN&gt;&lt;/FONT&gt;&amp;nbsp;&lt;/DIV&gt;
&lt;DIV&gt;&lt;FONT face=3DArial size=3D2&gt;&lt;SPAN class=3D437391718-07032008&gt;P.S. =
Perhaps I=20
should schedule a field trip for my students to the Computer History =
Museum=20
where I've volunteered as a docent (among other =
tasks).&lt;/SPAN&gt;&lt;/FONT&gt;&lt;/DIV&gt;
&lt;DIV&gt;&lt;FONT face=3DArial size=3D2&gt;&lt;SPAN=20
class=3D437391718-07032008&gt;&lt;/SPAN&gt;&lt;/FONT&gt;&amp;nbsp;&lt;/DIV&gt;
&lt;DIV&gt;&lt;FONT face=3DArial size=3D2&gt;&lt;SPAN class=3D437391718-07032008&gt;P.P.S. =
You can get a=20
free&amp;nbsp;open-source FORTRAN compiler for the PC from Open Watcom (&lt;A=20
href=3D&quot;http://www.openwatcom.org/index.php/Main_Page&quot;&gt;http://www.openwat=
com.org/index.php/Main_Page&lt;/A&gt;).=20
This originates from the old WATFOR compiler developed in 1965 at the =
University=20
of Waterloo in Canada which first ran on the school's IBM 7040 and 360 =
systems.=20
I used WATFOR (and then WATFIV) a lot at Stanford.&lt;/SPAN&gt;&lt;/FONT&gt;&lt;/DIV&gt;
&lt;DIV&gt;&lt;FONT face=3DArial size=3D2&gt;&lt;SPAN=20
class=3D437391718-07032008&gt;&lt;/SPAN&gt;&lt;/FONT&gt;&amp;nbsp;&lt;/DIV&gt;
&lt;DIV&gt;&lt;FONT face=3DCourier&gt;&lt;SPAN =
class=3D437391718-07032008&gt;C&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;=20
SQUARE ROOT PROGRAM&lt;BR&gt;C&lt;BR&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; REAL*8 =
NUMBER,=20
ROOT&lt;BR&gt;C&lt;BR&gt;C READ NUMBER&lt;BR&gt;C&lt;BR&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; READ =
(5,100)=20
NUMBER&lt;BR&gt;&amp;nbsp; 100 FORMAT (F5.1)&lt;BR&gt;C&lt;BR&gt;C COMPUTE SQUARE=20
ROOT&lt;BR&gt;C&lt;BR&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; ROOT =3D =
DSQRT(NUMBER)&lt;BR&gt;C&lt;BR&gt;C WRITE=20
SQUARE ROOT&lt;BR&gt;C&lt;BR&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; WRITE (6,200) NUMBER, =

ROOT&lt;BR&gt;&amp;nbsp; 200 FORMAT ('THE SQUARE ROOT OF ', F5.1, ' IS ',=20
F15.10)&lt;BR&gt;C&lt;BR&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;=20
STOP&lt;BR&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; =
END&lt;/SPAN&gt;&lt;/FONT&gt;&lt;/DIV&gt;&lt;/BODY&gt;&lt;/HTML&gt;

------=_NextPart_000_00AC_01CA4D14.D76251B0--
]